📄 ui_director2.lst
字号:
189 SetPenColor(Color_BLACK_def);
\ 020E 010000 LD BC,0
\ 0211 59 LD E,C
\ 0212 50 LD D,B
\ 0213 CD0000 CALL LWRD SetPenColor
190 if(!Disk) //主盘目录
\ 0216 AF XOR A
\ 0217 DDB60E OR (IX+14)
\ 021A 0E01 LD C,1
\ 021C C5 PUSH BC
\ 021D 0EFF LD C,255
\ 021F C5 PUSH BC
\ 0220 DD4E0C LD C,(IX+12)
\ 0223 2005 JR NZ,?0019
\ 0225 ?0018:
191 ResShowMultiString( VSTOPM1,string_id, 255, 1);
\ 0225 117902 LD DE,633
\ 0228 1803 JR ?0077
192 else
\ 022A ?0019:
193 ResShowMultiString( VSTOPM2,string_id, 255, 1);
\ 022A 117A02 LD DE,634
\ 022D ?0077:
\ 022D 3E00 LD A,BYTE3 ResShowMultiString
\ 022F 210000 LD HL,LWRD ResShowMultiString
\ 0232 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 0235 F1 POP AF
\ 0236 F1 POP AF
\ 0237 ?0020:
194 SetBackgdColor(Color_MENU_def);
\ 0237 010000 LD BC,0
\ 023A 11FFFF LD DE,65535
\ 023D CD0000 CALL LWRD SetBackgdColor
195 ///-SetTextOutMode(0);
196
197 for(i=top;i<=bottom;i++)
\ 0240 DD6EFC LD L,(IX-4)
\ 0243 DD66FD LD H,(IX-3)
\ 0246 E5 PUSH HL
\ 0247 FDE1 POP IY
\ 0249 ?0022:
\ 0249 FDE5 PUSH IY
\ 024B C1 POP BC
\ 024C DD6EFE LD L,(IX-2)
\ 024F DD66FF LD H,(IX-1)
\ 0252 A7 AND A
\ 0253 ED42 SBC HL,BC
\ 0255 DA1C03 JP C,?0021
\ 0258 ?0023:
198 {
199 if(i==active)
\ 0258 DD6E0A LD L,(IX+10)
\ 025B DD660B LD H,(IX+11)
\ 025E ED42 SBC HL,BC
\ 0260 201E JR NZ,?0026
\ 0262 ?0025:
200 {
201 ResShowPic(FILEBCK, 12, menu_pos_list[i-top]-1);
\ 0262 DD4EFC LD C,(IX-4)
\ 0265 DD46FD LD B,(IX-3)
\ 0268 FDE5 PUSH IY
\ 026A E1 POP HL
\ 026B A7 AND A
\ 026C ED42 SBC HL,BC
\ 026E 010000 LD BC,menu_pos_list
\ 0271 09 ADD HL,BC
\ 0272 7E LD A,(HL)
\ 0273 C6FF ADD A,255
\ 0275 4F LD C,A
\ 0276 C5 PUSH BC
\ 0277 CD6603 CALL LWRD ?0090
\ 027A F1 POP AF
202 SetPenColor(Color_WHITE_def);
\ 027B CD8303 CALL LWRD ?0093
203 SetBackgdColor(0x00003358);
\ 027E 180E JR ?0078
204 }
205 else
\ 0280 ?0026:
206 {
207 SetPenColor(Color_BLACK_def);
\ 0280 010000 LD BC,0
\ 0283 59 LD E,C
\ 0284 50 LD D,B
\ 0285 CD0000 CALL LWRD SetPenColor
208 SetBackgdColor(Color_MENU_def);
\ 0288 010000 LD BC,0
\ 028B 11FFFF LD DE,65535
\ 028E ?0078:
\ 028E CD0000 CALL LWRD SetBackgdColor
\ 0291 ?0027:
209 }
210
211 output8(0x4e,input8(0x4e) | 0x08);
\ 0291 DB4E IN A,(78)
\ 0293 CBDF SET 3,A
\ 0295 D34E OUT (78),A
212 TransOneRecord(&temp_record,&OnePageRecord[i-top]); //将idm中记录数据读取到temp_record中
\ 0297 DD4EFC LD C,(IX-4)
\ 029A DD46FD LD B,(IX-3)
\ 029D FDE5 PUSH IY
\ 029F E1 POP HL
\ 02A0 A7 AND A
\ 02A1 ED42 SBC HL,BC
\ 02A3 4D LD C,L
\ 02A4 44 LD B,H
\ 02A5 114B00 LD DE,75
\ 02A8 CD0000 CALL LWRD ?S_MUL_L02
\ 02AB 210000 LD HL,OnePageRecord
\ 02AE 19 ADD HL,DE
\ 02AF 4D LD C,L
\ 02B0 44 LD B,H
\ 02B1 110000 LD DE,temp_record
\ 02B4 3E00 LD A,BYTE3 TransOneRecord
\ 02B6 218D00 LD HL,LWRD TransOneRecord
\ 02B9 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
213 if(temp_record.filetype==TYPE_FILE)
\ 02BC 3A0000 LD A,(temp_record)
\ 02BF 3D DEC A
\ 02C0 201C JR NZ,?0029
\ 02C2 ?0028:
214 ResShowPic(MFILE,0,menu_pos_list[i-top]+2);
\ 02C2 DD4EFC LD C,(IX-4)
\ 02C5 DD46FD LD B,(IX-3)
\ 02C8 FDE5 PUSH IY
\ 02CA E1 POP HL
\ 02CB A7 AND A
\ 02CC ED42 SBC HL,BC
\ 02CE 010000 LD BC,menu_pos_list
\ 02D1 09 ADD HL,BC
\ 02D2 7E LD A,(HL)
\ 02D3 C602 ADD A,2
\ 02D5 4F LD C,A
\ 02D6 C5 PUSH BC
\ 02D7 0E00 LD C,0
\ 02D9 11C600 LD DE,198
\ 02DC 181B JR ?0079
\ 02DE ?0029:
215 else if(temp_record.filetype==TYPE_DIR)
\ 02DE 3A0000 LD A,(temp_record)
\ 02E1 B7 OR A
\ 02E2 2019 JR NZ,?0032
\ 02E4 ?0031:
216 {
217 ResShowPic(MDIR,0,menu_pos_list[i-top]);
\ 02E4 DD4EFC LD C,(IX-4)
\ 02E7 DD46FD LD B,(IX-3)
\ 02EA FDE5 PUSH IY
\ 02EC E1 POP HL
\ 02ED ED42 SBC HL,BC
\ 02EF 010000 LD BC,menu_pos_list
\ 02F2 09 ADD HL,BC
\ 02F3 4E LD C,(HL)
\ 02F4 C5 PUSH BC
\ 02F5 4F LD C,A
\ 02F6 11AF00 LD DE,175
\ 02F9 ?0079:
\ 02F9 CD6B03 CALL LWRD ?0089
\ 02FC F1 POP AF
\ 02FD ?0032:
\ 02FD ?0030:
218 }
219 SetTextPos(12, menu_pos_list[i-top]);
\ 02FD DD4EFC LD C,(IX-4)
\ 0300 DD46FD LD B,(IX-3)
\ 0303 FDE5 PUSH IY
\ 0305 E1 POP HL
\ 0306 A7 AND A
\ 0307 ED42 SBC HL,BC
\ 0309 010000 LD BC,menu_pos_list
\ 030C CD7C03 CALL LWRD ?0092
220 PutS(temp_record.longname,-1);
\ 030F 0EFF LD C,255
\ 0311 111900 LD DE,temp_record+25
\ 0314 CD0000 CALL LWRD PutS
221 }
222 }
\ 0317 FD23 INC IY
\ 0319 C34902 JP LWRD ?0022
\ 031C ?0021:
\ 031C ?0017:
223 SetPenColor(oldDC_sav.PenColor);
\ 031C DD4EF6 LD C,(IX-10)
\ 031F DD46F7 LD B,(IX-9)
\ 0322 DD5EF4 LD E,(IX-12)
\ 0325 DD56F5 LD D,(IX-11)
\ 0328 CD0000 CALL LWRD SetPenColor
224 SetBackgdColor(oldDC_sav.BackgdColor);
\ 032B 210600 LD HL,6
\ 032E 39 ADD HL,SP
\ 032F 5E LD E,(HL)
\ 0330 23 INC HL
\ 0331 56 LD D,(HL)
\ 0332 23 INC HL
\ 0333 4E LD C,(HL)
\ 0334 23 INC HL
\ 0335 46 LD B,(HL)
\ 0336 CD0000 CALL LWRD SetBackgdColor
225 }
\ 0339 DDF9 LD SP,IX
\ 033B DDE1 POP IX
\ 033D FDE1 POP IY
\ 033F C30000 JP LWRD ?BANK_FAST_LEAVE_L08
\ 0342 ?0088:
\ 0342 CD0000 CALL LWRD ?US_MOD_L02
\ 0345 DD73F2 LD (IX-14),E
\ 0348 DD72F3 LD (IX-13),D
\ 034B 0E4B LD C,75
\ 034D CD0000 CALL LWRD ?S_MUL_L02
\ 0350 210000 LD HL,OnePageRecord
\ 0353 19 ADD HL,DE
\ 0354 4D LD C,L
\ 0355 44 LD B,H
\ 0356 110000 LD DE,temp_record
\ 0359 3E00 LD A,BYTE3 TransOneRecord
\ 035B 218D00 LD HL,LWRD TransOneRecord
\ 035E CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 0361 3A0000 LD A,(temp_record)
\ 0364 3D DEC A
\ 0365 C9 RET
\ 0366 ?0090:
\ 0366 0E0C LD C,12
\ 0368 112C00 LD DE,44
\ 036B ?0089:
\ 036B 3E00 LD A,BYTE3 ResShowPic
\ 036D 210000 LD HL,LWRD ResShowPic
\ 0370 C30000 JP LWRD ?BANK_CALL_DIRECT_L08
\ 0373 ?0091:
\ 0373 210000 LD HL,menu_pos_list
\ 0376 DD4EF2 LD C,(IX-14)
\ 0379 DD46F3 LD B,(IX-13)
\ 037C ?0092:
\ 037C 09 ADD HL,BC
\ 037D 4E LD C,(HL)
\ 037E 1E0C LD E,12
\ 0380 C30000 JP LWRD SetTextPos
\ 0383 ?0093:
\ 0383 010000 LD BC,0
\ 0386 11FFFF LD DE,65535
\ 0389 CD0000 CALL LWRD SetPenColor
\ 038C 010000 LD BC,0
\ 038F 115833 LD DE,13144
\ 0392 C9 RET
\ 0393 init_dir_buf:
226
227
228 //********************************************************************************
229 //* Description :建立快速查询表,目录更新时需要重新调用此函数
230 //*
231 //** Arguments :
232 //*
233 //* Returns :
234 //*
235 //* Notes :
236 //*
237 //********************************************************************************
238 void init_dir_buf(void)
239 {
\ 0393 C5 PUSH BC
\ 0394 D5 PUSH DE
\ 0395 FDE5 PUSH IY
\ 0397 DDE5 PUSH IX
\ 0399 21DCFF LD HL,65500
\ 039C 39 ADD HL,SP
\ 039D F9 LD SP,HL
240 WORD i, tmp, total;
241 char Backbuf[32];
242 BOOL direxist;
243
244 Initdirbuf(); //清除目录检索表
\ 039E 3E00 LD A,BYTE3 Initdirbuf
\ 03A0 210000 LD HL,LWRD Initdirbuf
\ 03A3 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
245 tmp = 1;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -