📄 ui_playlist2.lst
字号:
\ 0229 DD6EFE LD L,(IX-2)
\ 022C DD66FF LD H,(IX-1)
\ 022F ED42 SBC HL,BC
\ 0231 4D LD C,L
\ 0232 44 LD B,H
\ 0233 210100 LD HL,menu_pos_list+1
\ 0236 09 ADD HL,BC
\ 0237 7E LD A,(HL)
\ 0238 C6FF ADD A,255
\ 023A 4F LD C,A
\ 023B C5 PUSH BC
\ 023C CD5803 CALL LWRD ?0047
\ 023F F1 POP AF
149 if(i==active)
\ 0240 DD4E0C LD C,(IX+12)
\ 0243 0600 LD B,0
\ 0245 DD6EFE LD L,(IX-2)
\ 0248 DD66FF LD H,(IX-1)
\ 024B A7 AND A
\ 024C ED42 SBC HL,BC
\ 024E 2047 JR NZ,?0028
\ 0250 ?0027:
150 {
151 ResShowPic(FILEBCK, explorer_str_x_def-2, menu_pos_list[i-top+1]-4);
\ 0250 DD4E02 LD C,(IX+2)
\ 0253 DD6EFE LD L,(IX-2)
\ 0256 DD66FF LD H,(IX-1)
\ 0259 A7 AND A
\ 025A ED42 SBC HL,BC
\ 025C 4D LD C,L
\ 025D 44 LD B,H
\ 025E 210100 LD HL,menu_pos_list+1
\ 0261 09 ADD HL,BC
\ 0262 7E LD A,(HL)
\ 0263 C6FC ADD A,252
\ 0265 4F LD C,A
\ 0266 C5 PUSH BC
\ 0267 0E1E LD C,30
\ 0269 113200 LD DE,50
\ 026C CD5D03 CALL LWRD ?0046
\ 026F F1 POP AF
152 ResShowPic(DHTHK,194, menu_pos_list[i-top+1]+6);
\ 0270 DD4E02 LD C,(IX+2)
\ 0273 0600 LD B,0
\ 0275 DD6EFE LD L,(IX-2)
\ 0278 DD66FF LD H,(IX-1)
\ 027B A7 AND A
\ 027C ED42 SBC HL,BC
\ 027E 4D LD C,L
\ 027F 44 LD B,H
\ 0280 210100 LD HL,menu_pos_list+1
\ 0283 09 ADD HL,BC
\ 0284 7E LD A,(HL)
\ 0285 C606 ADD A,6
\ 0287 4F LD C,A
\ 0288 C5 PUSH BC
\ 0289 0EC2 LD C,194
\ 028B 112E00 LD DE,46
\ 028E CD5D03 CALL LWRD ?0046
\ 0291 F1 POP AF
153 SetPenColor(Color_WHITE_def);
\ 0292 CDA503 CALL LWRD ?0053
154 continue;
\ 0295 183F JR ?0026
\ 0297 ?0028:
155 }
156 else
157 SetPenColor(Color_WHITE_def);
\ 0297 48 LD C,B
\ 0298 CDA803 CALL LWRD ?0054
158 output8(0x4e,input8(0x4e) | 0x08);
\ 029B DB4E IN A,(78)
\ 029D CBDF SET 3,A
\ 029F D34E OUT (78),A
159 read_idm_data_playlist(Longnamebuf,i-top);
\ 02A1 DD4E02 LD C,(IX+2)
\ 02A4 0600 LD B,0
\ 02A6 DD6EFE LD L,(IX-2)
\ 02A9 DD66FF LD H,(IX-1)
\ 02AC A7 AND A
\ 02AD ED42 SBC HL,BC
\ 02AF 4D LD C,L
\ 02B0 44 LD B,H
\ 02B1 DD5E0E LD E,(IX+14)
\ 02B4 DD560F LD D,(IX+15)
\ 02B7 3E00 LD A,BYTE3 read_idm_data_playlist
\ 02B9 21C700 LD HL,LWRD read_idm_data_playlist
\ 02BC CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
160 SetTextPos(explorer_str_x_def, menu_pos_list[i-top+1]-2);
\ 02BF DD4E02 LD C,(IX+2)
\ 02C2 0600 LD B,0
\ 02C4 DD6EFE LD L,(IX-2)
\ 02C7 DD66FF LD H,(IX-1)
\ 02CA A7 AND A
\ 02CB ED42 SBC HL,BC
\ 02CD 010100 LD BC,menu_pos_list+1
\ 02D0 CD6503 CALL LWRD ?0048
161 PutS(Longnamebuf,-1);
\ 02D3 CD8A03 CALL LWRD ?0051
\ 02D6 ?0026:
\ 02D6 DD34FE INC (IX-2)
\ 02D9 2003 JR NZ,?0036
\ 02DB DD34FF INC (IX-1)
\ 02DE ?0036:
\ 02DE C31402 JP LWRD ?0024
\ 02E1 ?0023:
162 }
163 read_idm_data_playlist(Longnamebuf,active-top);
\ 02E1 DD6E0C LD L,(IX+12)
\ 02E4 A7 AND A
\ 02E5 ED42 SBC HL,BC
\ 02E7 4D LD C,L
\ 02E8 44 LD B,H
\ 02E9 DD5E0E LD E,(IX+14)
\ 02EC DD560F LD D,(IX+15)
\ 02EF 3E00 LD A,BYTE3 read_idm_data_playlist
\ 02F1 21C700 LD HL,LWRD read_idm_data_playlist
\ 02F4 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
164 PlayListScrollRegion.y= menu_pos_list[active-top+1]-2;
\ 02F7 DD4E02 LD C,(IX+2)
\ 02FA 0600 LD B,0
\ 02FC 60 LD H,B
\ 02FD DD6E0C LD L,(IX+12)
\ 0300 A7 AND A
\ 0301 ED42 SBC HL,BC
\ 0303 010100 LD BC,menu_pos_list+1
165 SetBackgdColor(Color_BULE_Scroll_def);
\ 0306 CD2503 CALL LWRD ?0042
166 Scroll_PlayList(Longnamebuf, TRUE,string_id,&PlayListScrollRegion);
\ 0309 E5 PUSH HL
\ 030A DD6E10 LD L,(IX+16)
\ 030D E5 PUSH HL
\ 030E CD3903 CALL LWRD ?0044
\ 0311 E1 POP HL
\ 0312 E1 POP HL
167 if(strlen(Longnamebuf)<20)
\ 0313 CD9503 CALL LWRD ?0052
\ 0316 3003 JR NC,?0030
\ 0318 ?0029:
168 ScrollFlag=0;
\ 0318 AF XOR A
\ 0319 1802 JR ?0038
169 else
\ 031B ?0030:
170 ScrollFlag=1;
\ 031B 3E01 LD A,1
\ 031D ?0038:
\ 031D 320000 LD (ScrollFlag),A
\ 0320 ?0031:
\ 0320 ?0022:
\ 0320 ?0016:
171 } //else
172 }
173 // SetAsciiFont(FONT_TYPE_SMALL);
174 }
\ 0320 FDE1 POP IY
\ 0322 C30000 JP LWRD ?BANK_LEAVE_DIRECT_L08
\ 0325 ?0042:
\ 0325 09 ADD HL,BC
\ 0326 7E LD A,(HL)
\ 0327 C6FE ADD A,254
\ 0329 320100 LD (PlayListScrollRegion+1),A
\ 032C ?0041:
\ 032C 010000 LD BC,0
\ 032F 111F00 LD DE,31
\ 0332 CD0000 CALL LWRD SetBackgdColor
\ 0335 210000 LD HL,PlayListScrollRegion
\ 0338 C9 RET
\ 0339 ?0044:
\ 0339 0E01 LD C,1
\ 033B ?0043:
\ 033B DD5E0E LD E,(IX+14)
\ 033E DD560F LD D,(IX+15)
\ 0341 3E00 LD A,BYTE3 Scroll_PlayList
\ 0343 210000 LD HL,LWRD Scroll_PlayList
\ 0346 C30000 JP LWRD ?BANK_CALL_DIRECT_L08
\ 0349 ?0045:
\ 0349 CD0000 CALL LWRD ?UC_MOD_L01
\ 034C 4F LD C,A
\ 034D 0600 LD B,0
\ 034F C5 PUSH BC
\ 0350 FDE1 POP IY
\ 0352 210100 LD HL,menu_pos_list+1
\ 0355 09 ADD HL,BC
\ 0356 7E LD A,(HL)
\ 0357 C9 RET
\ 0358 ?0047:
\ 0358 0E0D LD C,13
\ 035A 117900 LD DE,121
\ 035D ?0046:
\ 035D 3E00 LD A,BYTE3 ResShowPic
\ 035F 210000 LD HL,LWRD ResShowPic
\ 0362 C30000 JP LWRD ?BANK_CALL_DIRECT_L08
\ 0365 ?0048:
\ 0365 09 ADD HL,BC
\ 0366 7E LD A,(HL)
\ 0367 C6FE ADD A,254
\ 0369 4F LD C,A
\ 036A ?0049:
\ 036A 1E20 LD E,32
\ 036C C30000 JP LWRD SetTextPos
\ 036F ?0050:
\ 036F FDE5 PUSH IY
\ 0371 C1 POP BC
\ 0372 DD5E0E LD E,(IX+14)
\ 0375 DD560F LD D,(IX+15)
\ 0378 3E00 LD A,BYTE3 read_idm_data_playlist
\ 037A 21C700 LD HL,LWRD read_idm_data_playlist
\ 037D CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 0380 010000 LD BC,0
\ 0383 11FFFF LD DE,65535
\ 0386 CD0000 CALL LWRD SetPenColor
\ 0389 C9 RET
\ 038A ?0051:
\ 038A 0EFF LD C,255
\ 038C DD5E0E LD E,(IX+14)
\ 038F DD560F LD D,(IX+15)
\ 0392 C30000 JP LWRD PutS
\ 0395 ?0052:
\ 0395 DD6E0E LD L,(IX+14)
\ 0398 DD660F LD H,(IX+15)
\ 039B CD0000 CALL LWRD ?STRLEN_L11
\ 039E 011400 LD BC,20
\ 03A1 A7 AND A
\ 03A2 ED42 SBC HL,BC
\ 03A4 C9 RET
\ 03A5 ?0053:
\ 03A5 010000 LD BC,0
\ 03A8 ?0054:
\ 03A8 11FFFF LD DE,65535
\ 03AB C30000 JP LWRD SetPenColor
175
\ 0000 RSEG IDM_COM_FSL_D
\ 0000 com_fname:
\ 0A00 DEFS 2560
\ 0A00 END
Errors: none
Warnings: none
Code size: 942
Constant size: 0
Static variable size: Data(2560) Iram(0)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -