ui_licensinf.lst
来自「炬力方案176*132软件源码,适用于AK1025」· LST 代码 · 共 1,103 行 · 第 1/4 页
LST
1,103 行
\ 01BC DD4E0C LD C,(IX+12)
\ 01BF 115A02 LD DE,602
\ 01C2 CD0001 CALL LWRD ?0107
\ 01C5 F1 POP AF
\ 01C6 F1 POP AF
232 itoa_4(infbuf->RemainPlayCnt, tmpbuf);
\ 01C7 210200 LD HL,2
\ 01CA 39 ADD HL,SP
\ 01CB 4D LD C,L
\ 01CC 44 LD B,H
\ 01CD FD5E01 LD E,(IY+1)
\ 01D0 FD5602 LD D,(IY+2)
\ 01D3 1825 JR ?0098
233 SetTextPos(80, 70);
234 delstartzero(tmpbuf);
235 PutS(tmpbuf, -1);
236 //if (lan_id == LAN_ID_ENGLISH)
237 //{
238 // SetTextPos()
239 //}
240 ResShowMultiString(TTIMES, lan_id, 124, 70);
241 return TRUE;
242 }
\ 01D5 ?0047:
243
244 case OriginalPlayCntDisp_def:
245 if ((infbuf->switchflag & on_PLAYCNT_def) == 0)
\ 01D5 FDCB006E BIT 5,(IY+0)
\ 01D9 CA1E03 JP Z,?0068
\ 01DC ?0048:
246 {
247 return FALSE;
248 }
\ 01DC ?0049:
249 else
250 {
251 char tmpbuf[5];
252 //显示标题
253 ClearScreen(NULL);
\ 01DC CD2503 CALL LWRD ?0106
254 ResShowMultiString(OPLAYCNT, lan_id, 255, 90);
\ 01DF C5 PUSH BC
\ 01E0 0EFF LD C,255
\ 01E2 C5 PUSH BC
\ 01E3 DD4E0C LD C,(IX+12)
\ 01E6 115F02 LD DE,607
\ 01E9 CD0001 CALL LWRD ?0107
\ 01EC F1 POP AF
\ 01ED F1 POP AF
255 itoa_4(infbuf->originalPlayCnt, tmpbuf);
\ 01EE 210200 LD HL,2
\ 01F1 39 ADD HL,SP
\ 01F2 4D LD C,L
\ 01F3 44 LD B,H
\ 01F4 FD5E03 LD E,(IY+3)
\ 01F7 FD5604 LD D,(IY+4)
\ 01FA ?0098:
\ 01FA CD2E03 CALL LWRD ?0110
256 SetTextPos(80, 70);
257 delstartzero(tmpbuf);
\ 01FD 39 ADD HL,SP
\ 01FE CD4103 CALL LWRD ?0111
258 PutS(tmpbuf, -1);
\ 0201 39 ADD HL,SP
\ 0202 EB EX DE,HL
\ 0203 CD0000 CALL LWRD PutS
259 ResShowMultiString(TTIMES, lan_id, 124, 70);
\ 0206 0E46 LD C,70
\ 0208 C5 PUSH BC
\ 0209 0E7C LD C,124
\ 020B C5 PUSH BC
\ 020C DD4E0C LD C,(IX+12)
\ 020F 116102 LD DE,609
\ 0212 CD0001 CALL LWRD ?0107
\ 0215 F1 POP AF
\ 0216 F1 POP AF
260 return TRUE;
\ 0217 1842 JR ?0101
261
262 }
\ 0219 ?0050:
263
264 case BeginDateTimeDisp_def:
265 if ((infbuf->switchflag & on_BEGINDAT_def) == 0)
\ 0219 FDCB0066 BIT 4,(IY+0)
\ 021D CA1E03 JP Z,?0068
\ 0220 ?0051:
266 {
267 return FALSE;
268 }
\ 0220 ?0052:
269 else
270 {
271
272 //显示日期时间
273 DateTime_t *pBeginDateTime;
274 pBeginDateTime = (DateTime_t *)&infbuf->BeginDate;
\ 0220 210500 LD HL,5
\ 0223 FDE5 PUSH IY
\ 0225 C1 POP BC
\ 0226 09 ADD HL,BC
275 DisplayDate(BEGINDAT, pBeginDateTime, subcnt, lan_id);
\ 0227 DD4E0C LD C,(IX+12)
\ 022A C5 PUSH BC
\ 022B DD4E0A LD C,(IX+10)
\ 022E C5 PUSH BC
\ 022F 4D LD C,L
\ 0230 44 LD B,H
\ 0231 115B02 LD DE,603
\ 0234 181B JR ?0105
276 return TRUE;
277 }
\ 0236 ?0053:
278
279
280 case ExpDateTimeDisp_def:
281 if ((infbuf->switchflag & on_EXPDATE_def) == 0)
\ 0236 FDCB005E BIT 3,(IY+0)
\ 023A CA1E03 JP Z,?0068
\ 023D ?0054:
282 {
283 return FALSE;
284 }
\ 023D ?0055:
285 else
286 {
287 DateTime_t *pExpDateTime;
288 pExpDateTime = (DateTime_t *)&infbuf->ExpDate;
\ 023D 210C00 LD HL,12
\ 0240 FDE5 PUSH IY
\ 0242 C1 POP BC
\ 0243 09 ADD HL,BC
289 DisplayDate(EXPDATE, pExpDateTime, subcnt, lan_id);
\ 0244 DD4E0C LD C,(IX+12)
\ 0247 C5 PUSH BC
\ 0248 DD4E0A LD C,(IX+10)
\ 024B C5 PUSH BC
\ 024C 4D LD C,L
\ 024D 44 LD B,H
\ 024E 115C02 LD DE,604
\ 0251 ?0105:
\ 0251 3E00 LD A,BYTE3 DisplayDate
\ 0253 215003 LD HL,LWRD DisplayDate
\ 0256 CD0000 CALL LWRD ?BANK_CALL_DIRECT_L08
\ 0259 E1 POP HL
\ 025A E1 POP HL
290 return TRUE;
\ 025B ?0101:
\ 025B 1842 JR ?0102
291 }
\ 025D ?0056:
292
293 case RemainTimeDisp_def:
294 if ((infbuf->switchflag & on_REMAINTM_def) == 0)
\ 025D FDCB0056 BIT 2,(IY+0)
\ 0261 CA1E03 JP Z,?0068
\ 0264 ?0057:
295 {
296 return FALSE;
297 }
\ 0264 ?0058:
298 else
299 {
300 char tmpbuf[5];
301 ClearScreen(NULL);
\ 0264 CD2503 CALL LWRD ?0106
302 ResShowMultiString(REMAINTM, lan_id, 255, 90);
\ 0267 C5 PUSH BC
\ 0268 0EFF LD C,255
\ 026A C5 PUSH BC
\ 026B DD4E0C LD C,(IX+12)
\ 026E 115D02 LD DE,605
\ 0271 CD0001 CALL LWRD ?0107
\ 0274 F1 POP AF
\ 0275 F1 POP AF
303 itoa_4(infbuf->RemainTime, tmpbuf);
\ 0276 210200 LD HL,2
\ 0279 39 ADD HL,SP
\ 027A 4D LD C,L
\ 027B 44 LD B,H
\ 027C FD5E13 LD E,(IY+19)
\ 027F FD5614 LD D,(IY+20)
\ 0282 CD2E03 CALL LWRD ?0110
304 SetTextPos(80, 70);
305 delstartzero(tmpbuf);
\ 0285 39 ADD HL,SP
\ 0286 CD4103 CALL LWRD ?0111
306 PutS(tmpbuf, -1);
\ 0289 39 ADD HL,SP
\ 028A EB EX DE,HL
\ 028B CD0000 CALL LWRD PutS
307 ResShowMultiString(HOURS, lan_id, 124, 70);
\ 028E 0E46 LD C,70
\ 0290 C5 PUSH BC
\ 0291 0E7C LD C,124
\ 0293 C5 PUSH BC
\ 0294 DD4E0C LD C,(IX+12)
\ 0297 116202 LD DE,610
\ 029A CD0001 CALL LWRD ?0107
\ 029D F1 POP AF
\ 029E F1 POP AF
308 return TRUE;
\ 029F ?0102:
\ 029F 1841 JR ?0103
309 }
\ 02A1 ?0059:
310
311 case RemainStoreTimeDisp_def:
312 if ((infbuf->switchflag & on_REMAINST_def) == 0)
\ 02A1 FDCB004E BIT 1,(IY+0)
\ 02A5 2877 JR Z,?0068
\ 02A7 ?0060:
313 {
314 return FALSE;
315 }
\ 02A7 ?0061:
316 else
317 {
318 char tmpbuf[5];
319 ClearScreen(NULL);
\ 02A7 CD2503 CALL LWRD ?0106
320 ResShowMultiString(REMAINST, lan_id, 255, 90);
\ 02AA C5 PUSH BC
\ 02AB 0EFF LD C,255
\ 02AD C5 PUSH BC
\ 02AE DD4E0C LD C,(IX+12)
\ 02B1 115E02 LD DE,606
\ 02B4 CD0001 CALL LWRD ?0107
\ 02B7 F1 POP AF
\ 02B8 F1 POP AF
321 itoa_4(infbuf->RemainStoreTime, tmpbuf);
\ 02B9 210200 LD HL,2
\ 02BC 39 ADD HL,SP
\ 02BD 4D LD C,L
\ 02BE 44 LD B,H
\ 02BF FD5E15 LD E,(IY+21)
\ 02C2 FD5616 LD D,(IY+22)
\ 02C5 CD2E03 CALL LWRD ?0110
322 SetTextPos(80, 70);
323 delstartzero(tmpbuf);
\ 02C8 39 ADD HL,SP
\ 02C9 CD4103 CALL LWRD ?0111
324 PutS(tmpbuf, -1);
\ 02CC 39 ADD HL,SP
\ 02CD EB EX DE,HL
\ 02CE CD0000 CALL LWRD PutS
325 ResShowMultiString(TDAY, lan_id, 124, 70);
\ 02D1 0E46 LD C,70
\ 02D3 C5 PUSH BC
\ 02D4 0E7C LD C,124
\ 02D6 C5 PUSH BC
\ 02D7 DD4E0C LD C,(IX+12)
\ 02DA 116002 LD DE,608
\ 02DD CD0001 CALL LWRD ?0107
\ 02E0 F1 POP AF
\ 02E1 F1 POP AF
326 return TRUE;
\ 02E2 ?0103:
\ 02E2 1836 JR ?0067
327 }
\ 02E4 ?0062:
328
329 case DealOnClkBckDisp_def:
330 if ((infbuf->switchflag & on_DEALCLKBCK_def) == 0)
\ 02E4 FDCB0046 BIT 0,(IY+0)
\ 02E8 2834 JR Z,?0068
\ 02EA ?0063:
331 {
332 return FALSE;
333 }
\ 02EA ?0064:
334 else
335 {
336 if (infbuf->DealOnClkBck == 0)
\ 02EA FD7E17 LD A,(IY+23)
\ 02ED B7 OR A
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?