📄 ui_pop_up_list.lst
字号:
\ 0296 210000 LD HL,LWRD ResShowPic
\ 0299 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 029C F1 POP AF
167 else
\ 029D C36003 JP LWRD ?0027
\ 02A0 ?0025:
168 ResShowPic(MENUPTR1+key, 166, 19+tmp%(list->total-1)+(tmp/(list->total-1))*active);
\ 02A0 FD4E02 LD C,(IY+2)
\ 02A3 FD4603 LD B,(IY+3)
\ 02A6 0B DEC BC
\ 02A7 DD5EE2 LD E,(IX-30)
\ 02AA DD56E3 LD D,(IX-29)
\ 02AD CD0000 CALL LWRD ?SS_DIV_L02
\ 02B0 43 LD B,E
\ 02B1 DD7EE0 LD A,(IX-32)
\ 02B4 CD0000 CALL LWRD ?C_MUL_L01
\ 02B7 FD4E02 LD C,(IY+2)
\ 02BA FD4603 LD B,(IY+3)
\ 02BD 0B DEC BC
\ 02BE DD5EE2 LD E,(IX-30)
\ 02C1 DD56E3 LD D,(IX-29)
\ 02C4 CD0000 CALL LWRD ?SS_MOD_L02
\ 02C7 83 ADD A,E
\ 02C8 C613 ADD A,19
\ 02CA 4F LD C,A
\ 02CB C5 PUSH BC
\ 02CC 0EA6 LD C,166
\ 02CE DD5EFA LD E,(IX-6)
\ 02D1 1600 LD D,0
\ 02D3 21BA00 LD HL,186
\ 02D6 19 ADD HL,DE
\ 02D7 EB EX DE,HL
\ 02D8 3E00 LD A,BYTE3 ResShowPic
\ 02DA 210000 LD HL,LWRD ResShowPic
\ 02DD CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 02E0 F1 POP AF
\ 02E1 ?0026:
\ 02E1 ?0023:
169 }
170 }
171 else
\ 02E1 187D JR ?0027
\ 02E3 ?0021:
172 {
173 SetPenColor(Color_BLACK_def);
\ 02E3 010000 LD BC,0
\ 02E6 110000 LD DE,0
\ 02E9 CD0000 CALL LWRD SetPenColor
174 SetBackgdColor(Color_MENU_def);
\ 02EC 010000 LD BC,0
\ 02EF 11FFFF LD DE,65535
\ 02F2 CD0000 CALL LWRD SetBackgdColor
175 TextOutRect(&tregion ,1);
\ 02F5 0E01 LD C,1
\ 02F7 210400 LD HL,4
\ 02FA 39 ADD HL,SP
\ 02FB 5D LD E,L
\ 02FC 54 LD D,H
\ 02FD CD0000 CALL LWRD TextOutRect
176 ResShowMultiString(list->strid[n+i], list->string_id,3, menu_pos_list[i]);
\ 0300 210000 LD HL,menu_pos_list
\ 0303 DD4EE8 LD C,(IX-24)
\ 0306 DD46E9 LD B,(IX-23)
\ 0309 09 ADD HL,BC
\ 030A 5E LD E,(HL)
\ 030B D5 PUSH DE
\ 030C 1E03 LD E,3
\ 030E D5 PUSH DE
\ 030F FD4E08 LD C,(IY+8)
\ 0312 FD6E00 LD L,(IY+0)
\ 0315 FD6601 LD H,(IY+1)
\ 0318 E5 PUSH HL
\ 0319 DD6EE8 LD L,(IX-24)
\ 031C DD66E9 LD H,(IX-23)
\ 031F DD5EF4 LD E,(IX-12)
\ 0322 DD56F5 LD D,(IX-11)
\ 0325 19 ADD HL,DE
\ 0326 29 ADD HL,HL
\ 0327 EB EX DE,HL
\ 0328 E1 POP HL
\ 0329 19 ADD HL,DE
\ 032A 5E LD E,(HL)
\ 032B 23 INC HL
\ 032C 56 LD D,(HL)
\ 032D 3E00 LD A,BYTE3 ResShowMultiString
\ 032F 210000 LD HL,LWRD ResShowMultiString
\ 0332 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 0335 F1 POP AF
\ 0336 F1 POP AF
177 TextOutRect(&tregion ,0);
\ 0337 0E00 LD C,0
\ 0339 210400 LD HL,4
\ 033C 39 ADD HL,SP
\ 033D 5D LD E,L
\ 033E 54 LD D,H
\ 033F CD0000 CALL LWRD TextOutRect
178
179 ResShowPic(MENUARR, constX, menu_pos_list[i]-1);
\ 0342 210000 LD HL,menu_pos_list
\ 0345 DD4EE8 LD C,(IX-24)
\ 0348 DD46E9 LD B,(IX-23)
\ 034B 09 ADD HL,BC
\ 034C 7E LD A,(HL)
\ 034D C6FF ADD A,255
\ 034F 4F LD C,A
\ 0350 C5 PUSH BC
\ 0351 DD4EFC LD C,(IX-4)
\ 0354 11B200 LD DE,178
\ 0357 3E00 LD A,BYTE3 ResShowPic
\ 0359 210000 LD HL,LWRD ResShowPic
\ 035C CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 035F F1 POP AF
\ 0360 ?0027:
\ 0360 DD34E8 INC (IX-24)
\ 0363 C23101 JP NZ,?0015
\ 0366 DD34E9 INC (IX-23)
\ 0369 C33101 JP LWRD ?0015
\ 036C ?0014:
180 }
181 }
182
183 need_draw = FALSE;
\ 036C DD36FB00 LD (IX-5),0
\ 0370 ?0008:
184 }//need draw
185 if(value_changed)
\ 0370 AF XOR A
\ 0371 DDB6FD OR (IX-3)
\ 0374 CAD605 JP Z,?0029
\ 0377 ?0028:
186 {
187 ///-show_active_list1(list,old_active,active);
188
189 //---------------------//
190 //清除旧的活动菜单项
191 tmp = old_active%6;
\ 0377 010600 LD BC,6
\ 037A DD5EF2 LD E,(IX-14)
\ 037D DD56F3 LD D,(IX-13)
\ 0380 CD0000 CALL LWRD ?SS_MOD_L02
\ 0383 DD73E2 LD (IX-30),E
\ 0386 DD72E3 LD (IX-29),D
192 if(list->total > LIST_NUM_ONE_PAGE)
\ 0389 FD4E02 LD C,(IY+2)
\ 038C FD4603 LD B,(IY+3)
\ 038F 210600 LD HL,6
\ 0392 F680 OR 128
\ 0394 ED42 SBC HL,BC
\ 0396 E29A03 JP PO,?0080
\ 0399 AC XOR H
\ 039A ?0080:
\ 039A F2BC03 JP P,?0031
\ 039D ?0030:
193 ResShowPic(MENUBCK3, 0, menu_pos_list[tmp]-1);
\ 039D 210000 LD HL,menu_pos_list
\ 03A0 DD4EE2 LD C,(IX-30)
\ 03A3 DD46E3 LD B,(IX-29)
\ 03A6 09 ADD HL,BC
\ 03A7 7E LD A,(HL)
\ 03A8 C6FF ADD A,255
\ 03AA 4F LD C,A
\ 03AB C5 PUSH BC
\ 03AC 0E00 LD C,0
\ 03AE 11B700 LD DE,183
\ 03B1 3E00 LD A,BYTE3 ResShowPic
\ 03B3 210000 LD HL,LWRD ResShowPic
\ 03B6 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 03B9 F1 POP AF
194 else
\ 03BA 181D JR ?0032
\ 03BC ?0031:
195 ResShowPic(MENUBCK1, 0, menu_pos_list[tmp]-1);
\ 03BC 210000 LD HL,menu_pos_list
\ 03BF DD4EE2 LD C,(IX-30)
\ 03C2 DD46E3 LD B,(IX-29)
\ 03C5 09 ADD HL,BC
\ 03C6 7E LD A,(HL)
\ 03C7 C6FF ADD A,255
\ 03C9 4F LD C,A
\ 03CA C5 PUSH BC
\ 03CB 0E00 LD C,0
\ 03CD 11B500 LD DE,181
\ 03D0 3E00 LD A,BYTE3 ResShowPic
\ 03D2 210000 LD HL,LWRD ResShowPic
\ 03D5 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 03D8 F1 POP AF
\ 03D9 ?0032:
196
197 SetPenColor(Color_BLACK_def);
\ 03D9 010000 LD BC,0
\ 03DC 110000 LD DE,0
\ 03DF CD0000 CALL LWRD SetPenColor
198 SetBackgdColor(Color_MENU_def);
\ 03E2 010000 LD BC,0
\ 03E5 11FFFF LD DE,65535
\ 03E8 CD0000 CALL LWRD SetBackgdColor
199
200 TextOutRect(&tregion ,1);
\ 03EB 0E01 LD C,1
\ 03ED 210400 LD HL,4
\ 03F0 39 ADD HL,SP
\ 03F1 5D LD E,L
\ 03F2 54 LD D,H
\ 03F3 CD0000 CALL LWRD TextOutRect
201 ResShowMultiString(list->strid[old_active],list->string_id, 3, menu_pos_list[tmp]);
\ 03F6 210000 LD HL,menu_pos_list
\ 03F9 DD4EE2 LD C,(IX-30)
\ 03FC DD46E3 LD B,(IX-29)
\ 03FF 09 ADD HL,BC
\ 0400 5E LD E,(HL)
\ 0401 D5 PUSH DE
\ 0402 1E03 LD E,3
\ 0404 D5 PUSH DE
\ 0405 FD4E08 LD C,(IY+8)
\ 0408 FD6E00 LD L,(IY+0)
\ 040B FD6601 LD H,(IY+1)
\ 040E E5 PUSH HL
\ 040F DD6EF2 LD L,(IX-14)
\ 0412 DD66F3 LD H,(IX-13)
\ 0415 29 ADD HL,HL
\ 0416 EB EX DE,HL
\ 0417 E1 POP HL
\ 0418 19 ADD HL,DE
\ 0419 5E LD E,(HL)
\ 041A 23 INC HL
\ 041B 56 LD D,(HL)
\ 041C 3E00 LD A,BYTE3 ResShowMultiString
\ 041E 210000 LD HL,LWRD ResShowMultiString
\ 0421 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 0424 F1 POP AF
\ 0425 F1 POP AF
202 TextOutRect(&tregion ,0);
\ 0426 0E00 LD C,0
\ 0428 210400 LD HL,4
\ 042B 39 ADD HL,SP
\ 042C 5D LD E,L
\ 042D 54 LD D,H
\ 042E CD0000 CALL LWRD TextOutRect
203
204 ResShowPic(MENUARR, constX, menu_pos_list[tmp]-1);
\ 0431 210000 LD HL,menu_pos_list
\ 0434 DD4EE2 LD C,(IX-30)
\ 0437 DD46E3 LD B,(IX-29)
\ 043A 09 ADD HL,BC
\ 043B 7E LD A,(HL)
\ 043C C6FF ADD A,255
\ 043E 5F LD E,A
\ 043F D5 PUSH DE
\ 0440 DD4EFC LD C,(IX-4)
\ 0443 11B200 LD DE,178
\ 0446 3E00 LD A,BYTE3 ResShowPic
\ 0448 210000 LD HL,LWRD ResShowPic
\ 044B CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 044E F1 POP AF
205
206 tmp = active%6;
\ 044F 010600 LD BC,6
\ 0452 DD5EE0 LD E,(IX-32)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -