⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 ui_delete3.lst

📁 炬力方案176*132软件源码,适用于AK1025
💻 LST
📖 第 1 页 / 共 3 页
字号:
   \   00E9  DDE1              POP     IX
   \   00EB  FDE1              POP     IY
   \   00ED  C30000            JP      LWRD ?BANK_FAST_LEAVE_L08
   \   00F0            read_idm_data_filelist:
     60          
     61          //读数据到数组name中
     62          void read_idm_data_filelist(char *name, int count)
     63          {
   \   00F0  C5                PUSH    BC
   \   00F1  D5                PUSH    DE
   \   00F2  F5                PUSH    AF
     64               byte status;
     65               status = input8(0x05);
   \   00F3  DB05              IN      A,(5)
   \   00F5  210000            LD      HL,0
   \   00F8  39                ADD     HL,SP
   \   00F9  77                LD      (HL),A
     66               output8(0x05 ,0xf6);
   \   00FA  3EF6              LD      A,246
   \   00FC  D305              OUT     (5),A
     67               memcpy(name, com_delname[count], 50);
   \   00FE  013200            LD      BC,50
   \   0101  D5                PUSH    DE
   \   0102  210600            LD      HL,6
   \   0105  39                ADD     HL,SP
   \   0106  5E                LD      E,(HL)
   \   0107  23                INC     HL
   \   0108  56                LD      D,(HL)
   \   0109  CD0000            CALL    LWRD ?S_MUL_L02
   \   010C  210000            LD      HL,com_delname
   \   010F  19                ADD     HL,DE
   \   0110  D1                POP     DE
   \   0111  C32400            JP      LWRD ?0027
     68               output8(0x05, status);
     69          }
   \   0114            ShowFilelist:
     70          
     71          
     72          /********************************************************************************
     73          * Description : show the directory.
     74          *
     75          * Arguments  :
     76          *            location: get thedisk type
     77          *            Invpath: the "\" or name
     78          *            Namebuf:the string you will display
     79          *            type : show file kind
     80          *            string_id: language type
     81          * Returns     :
     82          *            other:    Successful
     83          *            0:    Fail, detail information in fselError
     84          * Notes       :  only display the valid directory
     85          *
     86          ********************************************************************************/
     87          void ShowFilelist(int top,int bottom,int Old_active,int active,BYTE string_id)
     88          {
   \   0114  FDE5              PUSH    IY
   \   0116  DDE5              PUSH    IX
   \   0118  DD210000          LD      IX,0
   \   011C  DD39              ADD     IX,SP
   \   011E  C5                PUSH    BC
   \   011F  D5                PUSH    DE
   \   0120  21CCFF            LD      HL,65484
   \   0123  39                ADD     HL,SP
   \   0124  F9                LD      SP,HL
     89          
     90              int i,tmp;
     91              char        Longnamebuf[50];
     92              // SetAsciiFont(FONT_TYPE_SMALL);
     93              ///-SetTextOutMode(1);
     94          
     95           if(Old_active!=active)
   \   0125  DD6E0A            LD      L,(IX+10)
   \   0128  DD660B            LD      H,(IX+11)
   \   012B  DD4E08            LD      C,(IX+8)
   \   012E  DD4609            LD      B,(IX+9)
   \   0131  A7                AND     A
   \   0132  ED42              SBC     HL,BC
   \   0134  CAEB01            JP      Z,?0010
   \   0137            ?0009:
     96            {
     97               //清除旧的活动列表项
     98               tmp=Old_active%6;
   \   0137  010600            LD      BC,6
   \   013A  DD5E08            LD      E,(IX+8)
   \   013D  DD5609            LD      D,(IX+9)
   \   0140  CDF102            CALL    LWRD ?0029
     99               ResShowPic(FILEBCK1, 12, menu_pos_list[tmp]-1);
   \   0143  C6FF              ADD     A,255
   \   0145  4F                LD      C,A
   \   0146  C5                PUSH    BC
   \   0147  0E0C              LD      C,12
   \   0149  112D00            LD      DE,45
   \   014C  CD0503            CALL    LWRD ?0030
   \   014F  F1                POP     AF
    100               ResShowPic(MFILE,0,menu_pos_list[tmp]+2);
   \   0150  210000            LD      HL,menu_pos_list
   \   0153  DD4EC8            LD      C,(IX-56)
   \   0156  DD46C9            LD      B,(IX-55)
   \   0159  09                ADD     HL,BC
   \   015A  7E                LD      A,(HL)
   \   015B  C602              ADD     A,2
   \   015D  5F                LD      E,A
   \   015E  D5                PUSH    DE
   \   015F  CD0003            CALL    LWRD ?0031
   \   0162  F1                POP     AF
    101               SetTextPos(12, menu_pos_list[tmp]);
   \   0163  CD0D03            CALL    LWRD ?0033
    102               read_idm_data_filelist(Longnamebuf,tmp);
   \   0166  DD4EC8            LD      C,(IX-56)
   \   0169  DD46C9            LD      B,(IX-55)
   \   016C  210200            LD      HL,2
   \   016F  39                ADD     HL,SP
   \   0170  EB                EX      DE,HL
   \   0171  3E00              LD      A,BYTE3 read_idm_data_filelist
   \   0173  21F000            LD      HL,LWRD read_idm_data_filelist
   \   0176  CD0000            CALL    LWRD ?BANK_CALL_DIRECT_L08
    103               SetPenColor(Color_BLACK_def);                     //取列表名
   \   0179  CD1D03            CALL    LWRD ?0035
    104               SetBackgdColor(Color_MENU_def);
   \   017C  CD0000            CALL    LWRD SetBackgdColor
    105               PutS(Longnamebuf, -1);
   \   017F  0EFF              LD      C,255
   \   0181  210200            LD      HL,2
   \   0184  39                ADD     HL,SP
   \   0185  EB                EX      DE,HL
   \   0186  CD0000            CALL    LWRD PutS
    106          
    107               //显示当前活动项
    108               tmp=active%6;
   \   0189  010600            LD      BC,6
   \   018C  DD5E0A            LD      E,(IX+10)
   \   018F  DD560B            LD      D,(IX+11)
   \   0192  CDF102            CALL    LWRD ?0029
    109               ResShowPic(MFILE,0,menu_pos_list[tmp]+2);
   \   0195  C602              ADD     A,2
   \   0197  4F                LD      C,A
   \   0198  C5                PUSH    BC
   \   0199  48                LD      C,B
   \   019A  CD0203            CALL    LWRD ?0032
   \   019D  F1                POP     AF
    110               ResShowPic(FILEBCK,  12, menu_pos_list[tmp]-1);
   \   019E  210000            LD      HL,menu_pos_list
   \   01A1  DD4EC8            LD      C,(IX-56)
   \   01A4  DD46C9            LD      B,(IX-55)
   \   01A7  09                ADD     HL,BC
   \   01A8  7E                LD      A,(HL)
   \   01A9  C6FF              ADD     A,255
   \   01AB  5F                LD      E,A
   \   01AC  D5                PUSH    DE
   \   01AD  0E0C              LD      C,12
   \   01AF  112C00            LD      DE,44
   \   01B2  CD0503            CALL    LWRD ?0030
   \   01B5  F1                POP     AF
    111               SetTextPos(12, menu_pos_list[tmp]);
   \   01B6  CD0D03            CALL    LWRD ?0033
    112               read_idm_data_filelist(Longnamebuf,tmp);
   \   01B9  DD4EC8            LD      C,(IX-56)
   \   01BC  DD46C9            LD      B,(IX-55)
   \   01BF  210200            LD      HL,2
   \   01C2  39                ADD     HL,SP
   \   01C3  EB                EX      DE,HL
   \   01C4  3E00              LD      A,BYTE3 read_idm_data_filelist
   \   01C6  21F000            LD      HL,LWRD read_idm_data_filelist
   \   01C9  CD0000            CALL    LWRD ?BANK_CALL_DIRECT_L08
    113               SetPenColor(Color_WHITE_def);                     //取列表名
   \   01CC  010000            LD      BC,0
   \   01CF  11FFFF            LD      DE,65535
   \   01D2  CD0000            CALL    LWRD SetPenColor
    114               SetBackgdColor(0x00003358);
   \   01D5  010000            LD      BC,0
   \   01D8  115833            LD      DE,13144
   \   01DB  CD0000            CALL    LWRD SetBackgdColor
    115               PutS(Longnamebuf, -1);
   \   01DE  0EFF              LD      C,255
   \   01E0  210200            LD      HL,2
   \   01E3  39                ADD     HL,SP
   \   01E4  EB                EX      DE,HL
   \   01E5  CD0000            CALL    LWRD PutS
    116            }
    117           else  //if(Old_active==active)               刷新一页屏
   \   01E8  C3E602            JP      LWRD ?0012
   \   01EB            ?0010:
    118            {
    119              ///-SetTextOutMode(1);
    120              SetBackgdColor(0x0000df1c);
   \   01EB  4D                LD      C,L
   \   01EC  44                LD      B,H
   \   01ED  111CDF            LD      DE,57116
   \   01F0  CD0000            CALL    LWRD SetBackgdColor
    121              ResShowPic(MENUTWO1,0,0);
   \   01F3  0E00              LD      C,0
   \   01F5  C5                PUSH    BC
   \   01F6  11C400            LD      DE,196
   \   01F9  CD0503            CALL    LWRD ?0030
   \   01FC  F1                POP     AF
    122              SetPenColor(Color_BLACK_def);
   \   01FD  010000            LD      BC,0
   \   0200  59                LD      E,C
   \   0201  50                LD      D,B
   \   0202  CD0000            CALL    LWRD SetPenColor
    123              ResShowMultiString(CDELFILE,string_id, 255, 1);
   \   0205  0E01              LD      C,1
   \   0207  C5                PUSH    BC
   \   0208  0EFF              LD      C,255
   \   020A  C5                PUSH    BC
   \   020B  DD4E0C            LD      C,(IX+12)
   \   020E  113E02            LD      DE,574
   \   0211  3E00              LD      A,BYTE3 ResShowMultiString
   \   0213  210000            LD      HL,LWRD ResShowMultiString
   \   0216  CD0000            CALL    LWRD ?BANK_CALL_DIRECT_L08
   \   0219  F1                POP     AF
   \   021A  F1                POP     AF
    124              SetBackgdColor(Color_MENU_def);
   \   021B  010000            LD      BC,0
   \   021E  11FFFF            LD      DE,65535
   \   0221  CD0000            CALL    LWRD SetBackgdColor
    125              ///-SetTextOutMode(0);
    126              //显示列表名
    127                for(i=top;i<=bottom;i++)
   \   0224  DD6EFC            LD      L,(IX-4)
   \   0227  DD66FD            LD      H,(IX-3)
   \   022A  E5                PUSH    HL
   \   022B  FDE1              POP     IY
   \   022D            ?0013:
   \   022D  FDE5              PUSH    IY
   \   022F  C1                POP     BC
   \   0230  DD6EFE            LD      L,(IX-2)
   \   0233  DD66FF            LD      H,(IX-1)
   \   0236  F680              OR      128
   \   0238  ED42              SBC     HL,BC
   \   023A  E23E02            JP      PO,?0025
   \   023D  AC                XOR     H
   \   023E            ?0025:
   \   023E  FAE602            JP      M,?0012
   \   0241            ?0014:
    128                {
    129                 tmp=i%6;
   \   0241  010600            LD      BC,6
   \   0244  FDE5              PUSH    IY
   \   0246  D1                POP     DE
   \   0247  CD0000            CALL    LWRD ?SS_MOD_L02
   \   024A  DD73C8            LD      (IX-56),E
   \   024D  DD72C9            LD      (IX-55),D
    130                 if(i==active)

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -