📄 ui_directory2_scroll.lst
字号:
\ 03C4 ?0032:
224 }
225 else
226 {
227 if(temp_record.filetype==TYPE_FILE)
\ 03C4 3A0000 LD A,(temp_record)
\ 03C7 3D DEC A
\ 03C8 201C JR NZ,?0039
\ 03CA ?0038:
228 ResShowPic(MFILE,13,menu_pos_list[i-top]-1);
\ 03CA DD4EFC LD C,(IX-4)
\ 03CD DD46FD LD B,(IX-3)
\ 03D0 FDE5 PUSH IY
\ 03D2 E1 POP HL
\ 03D3 A7 AND A
\ 03D4 ED42 SBC HL,BC
\ 03D6 010000 LD BC,menu_pos_list
\ 03D9 09 ADD HL,BC
\ 03DA 7E LD A,(HL)
\ 03DB C6FF ADD A,255
\ 03DD 4F LD C,A
\ 03DE C5 PUSH BC
\ 03DF 0E0D LD C,13
\ 03E1 11C600 LD DE,198
\ 03E4 181F JR ?0093
\ 03E6 ?0039:
229 else if(temp_record.filetype==TYPE_DIR)
\ 03E6 3A0000 LD A,(temp_record)
\ 03E9 B7 OR A
\ 03EA 201D JR NZ,?0042
\ 03EC ?0041:
230 ResShowPic(MDIR,10,menu_pos_list[i-top]-4);
\ 03EC DD4EFC LD C,(IX-4)
\ 03EF DD46FD LD B,(IX-3)
\ 03F2 FDE5 PUSH IY
\ 03F4 E1 POP HL
\ 03F5 ED42 SBC HL,BC
\ 03F7 010000 LD BC,menu_pos_list
\ 03FA 09 ADD HL,BC
\ 03FB 7E LD A,(HL)
\ 03FC C6FC ADD A,252
\ 03FE 4F LD C,A
\ 03FF C5 PUSH BC
\ 0400 0E0A LD C,10
\ 0402 11AF00 LD DE,175
\ 0405 ?0093:
\ 0405 CD5E04 CALL LWRD ?0108
\ 0408 F1 POP AF
\ 0409 ?0042:
\ 0409 ?0040:
231 }
232 SetTextPos(explorer_str_x_def, menu_pos_list[i-top]-2);
\ 0409 DD4EFC LD C,(IX-4)
\ 040C DD46FD LD B,(IX-3)
\ 040F FDE5 PUSH IY
\ 0411 E1 POP HL
\ 0412 A7 AND A
\ 0413 ED42 SBC HL,BC
\ 0415 010000 LD BC,menu_pos_list
\ 0418 CD7B04 CALL LWRD ?0111
233 DisplayBytes =Count_Byte(temp_record.longname,string_id);
234 PutS(temp_record.longname,DisplayBytes);
\ 041B ?0030:
\ 041B FD23 INC IY
\ 041D C3E602 JP LWRD ?0028
\ 0420 ?0027:
235 } // for
236 ScrollString(scroll_buf, TRUE,string_id,®ion_scroll);
\ 0420 210000 LD HL,region_scroll
\ 0423 E5 PUSH HL
\ 0424 DD6E0C LD L,(IX+12)
\ 0427 E5 PUSH HL
\ 0428 CD4C04 CALL LWRD ?0107
\ 042B E1 POP HL
\ 042C E1 POP HL
237 if(strlen(scroll_buf)<20)
\ 042D 210000 LD HL,scroll_buf
\ 0430 CD0000 CALL LWRD ?STRLEN_L11
\ 0433 011400 LD BC,20
\ 0436 A7 AND A
\ 0437 ED42 SBC HL,BC
\ 0439 3003 JR NC,?0044
\ 043B ?0043:
238 ScrollFlag=0;
\ 043B ?0097:
\ 043B AF XOR A
\ 043C 1802 JR ?0094
239 else
\ 043E ?0044:
240 ScrollFlag=1;
\ 043E 3E01 LD A,1
\ 0440 ?0094:
\ 0440 320000 LD (ScrollFlag),A
\ 0443 ?0045:
\ 0443 ?0023:
\ 0443 ?0007:
241 }
242 } //else scrollflag = 0
243 }
\ 0443 DDF9 LD SP,IX
\ 0445 DDE1 POP IX
\ 0447 FDE1 POP IY
\ 0449 C30000 JP LWRD ?BANK_FAST_LEAVE_L08
\ 044C ?0107:
\ 044C 0E01 LD C,1
\ 044E ?0106:
\ 044E 110000 LD DE,scroll_buf
\ 0451 3E00 LD A,BYTE3 ScrollString
\ 0453 210000 LD HL,LWRD ScrollString
\ 0456 C30000 JP LWRD ?BANK_CALL_DIRECT_L08
\ 0459 ?0109:
\ 0459 0EC2 LD C,194
\ 045B 112600 LD DE,38
\ 045E ?0108:
\ 045E 3E00 LD A,BYTE3 ResShowPic
\ 0460 210000 LD HL,LWRD ResShowPic
\ 0463 C30000 JP LWRD ?BANK_CALL_DIRECT_L08
\ 0466 ?0110:
\ 0466 CD0000 CALL LWRD ?S_MUL_L02
\ 0469 210000 LD HL,OnePageRecord
\ 046C 19 ADD HL,DE
\ 046D 4D LD C,L
\ 046E 44 LD B,H
\ 046F 110000 LD DE,temp_record
\ 0472 3E00 LD A,BYTE3 TransOneRecord
\ 0474 218D00 LD HL,LWRD TransOneRecord
\ 0477 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 047A C9 RET
\ 047B ?0111:
\ 047B 09 ADD HL,BC
\ 047C 7E LD A,(HL)
\ 047D C6FE ADD A,254
\ 047F 4F LD C,A
\ 0480 1E20 LD E,32
\ 0482 CD0000 CALL LWRD SetTextPos
\ 0485 DD4E0C LD C,(IX+12)
\ 0488 111900 LD DE,temp_record+25
\ 048B 3E00 LD A,BYTE3 Count_Byte
\ 048D 210000 LD HL,LWRD Count_Byte
\ 0490 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 0493 4D LD C,L
\ 0494 111900 LD DE,temp_record+25
\ 0497 CD0000 CALL LWRD PutS
\ 049A C9 RET
\ 049B init_dir_buf:
244
245
246 //********************************************************************************
247 //* Description :建立快速查询表,目录更新时需要重新调用此函数
248 //*
249 //** Arguments :
250 //*
251 //* Returns :
252 //*
253 //* Notes :
254 //*
255 //********************************************************************************
256 void init_dir_buf(void)
257 {
\ 049B C5 PUSH BC
\ 049C D5 PUSH DE
\ 049D FDE5 PUSH IY
\ 049F DDE5 PUSH IX
\ 04A1 21DCFF LD HL,65500
\ 04A4 39 ADD HL,SP
\ 04A5 F9 LD SP,HL
258 WORD i, tmp, total;
259 char Backbuf[32];
260 BOOL direxist;
261
262 Initdirbuf(); //清除目录检索表
\ 04A6 3E00 LD A,BYTE3 Initdirbuf
\ 04A8 210000 LD HL,LWRD Initdirbuf
\ 04AB CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
263 tmp = 1;
264
265 FS_Backup(Backbuf,FS_BACKUP_DIRINFO,0);//目录项备份
\ 04AE 210000 LD HL,0
\ 04B1 E5 PUSH HL
\ 04B2 0E02 LD C,2
\ 04B4 2E06 LD L,6
\ 04B6 39 ADD HL,SP
\ 04B7 EB EX DE,HL
\ 04B8 CD0000 CALL LWRD FS_Backup
\ 04BB E1 POP HL
266 dir_total_num=count_dir_num();
\ 04BC 3E00 LD A,BYTE3 count_dir_num
\ 04BE 210000 LD HL,LWRD count_dir_num
\ 04C1 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 04C4 224B00 LD (dir_total_num),HL
267 file_total_num=GetFileTotalCur(FALSE);
\ 04C7 1E00 LD E,0
\ 04C9 3E00 LD A,BYTE3 GetFileTotalCur
\ 04CB 210000 LD HL,LWRD GetFileTotalCur
\ 04CE CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 04D1 224D00 LD (file_total_num),HL
268 list_total_num=dir_total_num+file_total_num+1;
\ 04D4 ED4B4B00 LD BC,(dir_total_num)
\ 04D8 09 ADD HL,BC
\ 04D9 23 INC HL
\ 04DA 224F00 LD (list_total_num),HL
269 fselTotal=file_total_num;
\ 04DD 2A4D00 LD HL,(file_total_num)
\ 04E0 220000 LD (fselTotal),HL
270
271 for(i = 1; i <= dir_total_num; i++)
\ 04E3 DD210100 LD IX,1
\ 04E7 210000 LD HL,0
\ 04EA 39 ADD HL,SP
\ 04EB 3601 LD (HL),1
\ 04ED 23 INC HL
\ 04EE 3600 LD (HL),0
\ 04F0 ?0047:
\ 04F0 2B DEC HL
\ 04F1 4E LD C,(HL)
\ 04F2 23 INC HL
\ 04F3 46 LD B,(HL)
\ 04F4 2A4B00 LD HL,(dir_total_num)
\ 04F7 A7 AND A
\ 04F8 ED42 SBC HL,BC
\ 04FA DAB905 JP C,?0046
\ 04FD ?0048:
\ 04FD ?0051:
272 {
273 while(1)
274 {
275 if(tmp == 1)
\ 04FD DDE5 PUSH IX
\ 04FF E1 POP HL
\ 0500 3E01 LD A,1
\ 0502 AD XOR L
\ 0503 B4 OR H
\ 0504 200D JR NZ,?0054
\ 0506 ?0053:
276 FS_Dir(file_name, Ui_IgnoreExt, FS_DIR_DIR);
\ 0506 0E81 LD C,129
\ 0508 C5 PUSH BC
\ 0509 010000 LD BC,Ui_IgnoreExt
\ 050C 110000 LD DE,file_name
\ 050F CD0000 CALL LWRD FS_Dir
\ 0512 E1 POP HL
\ 0513 ?0054:
277 if(tmp > 1)
\ 0513 DDE5 PUSH IX
\ 0515 C1 POP BC
\ 0516 210100 LD HL,1
\ 0519 A7 AND A
\ 051A ED42 SBC HL,BC
\ 051C 300D JR NC,?0056
\ 051E ?0055:
278 FS_Dir(file_name, Ui_IgnoreExt, FS_DIR_DIR_CONT);
\ 051E 0E01 LD C,1
\ 0520 C5 PUSH BC
\ 0521 010000 LD BC,Ui_IgnoreExt
\ 0524 110000 LD DE,file_name
\ 0527 CD0000 CALL LWRD FS_Dir
\ 052A E1 POP HL
\ 052B ?0056:
279 tmp++;
280 FS_Backup(Backbuf,FS_BACKUP_DIRINFO,0);//目录项备份
\ 052B 210000 LD HL,0
\ 052E E5 PUSH HL
\ 052F 0E02 LD C,2
\ 0531 2E06 LD L,6
\ 0533 39 ADD HL,SP
\ 0534 EB EX DE,HL
\ 0535 CD0000 CALL LWRD FS_Backup
\ 0538 E1 POP HL
281 total = GetFileTotal(file_name, TRUE);
\ 0539 0E01 LD C,1
\ 053B 110000 LD DE,file_name
\ 053E 3E00 LD A,BYTE3 GetFileTotal
\ 0540 210000 LD HL,LWRD GetFileTotal
\ 0543 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -