📄 sh69pall.lst
字号:
246 0x004c 0x7d2f 246: LDI AD_CON,NUMA
247 0x004d 0x7c14 247: LDI AD_EN,NUM8
248
249 0x004e 0x544b 249: SBI CPLFLG,NUM8
250 0x004f 0x9052 250: BAZ LEDOFF
251 0x0050 0x7c4b 251: LDI CPLFLG,NUM8
252 0x0051 0xe053 252: JMP DSLCD
253 253: LEDOFF:
254 0x0052 0x784b 254: LDI CPLFLG,NUM0
255 255: DSLCD:
256 0x0053 0x384b 256: LDA CPLFLG,NUM0
257 0x0054 0x3c09 257: STA PORT_B,NUM0
258 0x0055 0xe034 258: JMP MAINLP
259
260 260: ;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
261 261: ; subprogram
262 262: ;::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
263 263: DELAY:
264 0x0056 0x58c3 264: SBIM PARM,01H
265 0x0057 0x9859 265: BC $+2
266 0x0058 0xd400 266: RTNI
267 0x0059 0x7fc2 267: LDI CT2,0FH
268 0x005a 0x7fc1 268: LDI CT1,0FH
269 0x005b 0x7fc0 269: LDI CT0,0FH
270 0x005c 0x58c0 270: SBIM CT0,01H
271 0x005d 0x985c 271: BC $-1
272 0x005e 0x58c1 272: SBIM CT1,01H
273 0x005f 0x985b 273: BC $-4
274 0x0060 0x58c2 274: SBIM CT2,01H
275 0x0061 0x985a 275: BC $-7
276 0x0062 0x7c1e 276: LDI WDT,1000B
277 0x0063 0xe056 277: JMP DELAY
278 278: ;**************************************************************
279 279: CLRLCD:
280 0x0064 0x7b12 280: LDI DPH,6
281 0x0065 0x7811 281: LDI DPM,0
282 0x0066 0x7810 282: LDI DPL,0
283 0x0067 0x7863 283: LDI NUM,00H
284 284: SETZ:
285 0x0068 0x7860 285: LDI MUS_N,00H
286 286: SETZLP:
287 0x0069 0x7840 287: LDI CT0,00H
288 0x006a 0x3840 288: LDA CT0,0
289 0x006b 0x3c0f 289: STA INX
290 290:
291 0x006c 0x7c1e 291: LDI WDT,1000B
292 292:
293 0x006d 0x4890 293: ADIM DPL,01H
294 0x006e 0x57e0 294: SBI MUS_N,0FH
295 0x006f 0x9072 295: BAZ SETTWO
296 0x0070 0x48e0 296: ADIM MUS_N,01H
297 0x0071 0xe069 297: JMP SETZLP
298 298: SETTWO:
299 0x0072 0x50e3 299: SBI NUM,01H
300 0x0073 0x9079 300: BAZ CLRRET
301 0x0074 0x48e3 301: ADIM NUM,01H
302 0x0075 0x7b12 302: LDI DPH,NUM6
303 0x0076 0x7911 303: LDI DPM,NUM2
304 0x0077 0x7810 304: LDI DPL,NUM0
305 0x0078 0xe068 305: JMP SETZ
306 306: CLRRET:
307 0x0079 0xd400 307: RTNI
308 308: ;*********************************************************************
309 309: CLOCK:
310 0x007a 0x54f0 310: SBI SEC_L,NUM9
311 0x007b 0x907e 311: BAZ SECHADD
312 0x007c 0x48f0 312: ADIM SEC_L,NUM1
313 0x007d 0xd400 313: RTNI
314 314: SECHADD:
315 0x007e 0x7870 315: LDI SEC_L,NUM0
316 0x007f 0x5371 316: SBI SEC_H,NUM6
317 0x0080 0x9083 317: BAZ MINLADD
318 0x0081 0x48f1 318: ADIM SEC_H,NUM1
319 0x0082 0xd400 319: RTNI
320 320: MINLADD:
321 0x0083 0x7871 321: LDI SEC_H,NUM0
322 0x0084 0x54f2 322: SBI MIN_L,NUM9
323 0x0085 0x9088 323: BAZ MINHADD
324 0x0086 0x48f2 324: ADIM MIN_L,NUM1
325 0x0087 0xd400 325: RTNI
326 326: MINHADD:
327 0x0088 0x7872 327: LDI MIN_L,NUM0
328 0x0089 0x5373 328: SBI MIN_H,NUM6
329 0x008a 0x908d 329: BAZ HOURLADD
330 0x008b 0x48f3 330: ADIM MIN_H,NUM1
331 0x008c 0xd400 331: RTNI
332 332: HOURLADD:
333 0x008d 0x7873 333: LDI MIN_H,NUM0
334 0x008e 0x5274 334: SBI HOURL,NUM4
335 0x008f 0x9092 335: BAZ HOURHADD
336 0x0090 0x48f4 336: ADIM HOURL,NUM1
337 0x0091 0xd400 337: RTNI
338 338: HOURHADD:
339 0x0092 0x7874 339: LDI HOURL,NUM0
340 0x0093 0x5175 340: SBI HOURH,NUM2
341 0x0094 0x9097 341: BAZ HOUROV
342 0x0095 0x48f5 342: ADIM HOURH,NUM1
343 0x0096 0xd400 343: RTNI
344 344: HOUROV:
345 0x0097 0x7875 345: LDI HOURH,NUM0
346 0x0098 0xd400 346: RTNI
347 347: ;*********************************************************************
348 348: DISPCLK:
349 0x0099 0x7912 349: LDI DPH,NUM2
350 0x009a 0x7811 350: LDI DPM,NUM0
351 0x009b 0x7810 351: LDI DPL,NUM0
352 0x009c 0x3875 352: LDA HOURH,NUM0
353 0x009d 0x3c0f 353: STA INX
354 0x009e 0x4890 354: ADIM DPL,NUM1
355 0x009f 0x3874 355: LDA HOURL,NUM0
356 0x00a0 0x3c0f 356: STA INX
357 0x00a1 0x4890 357: ADIM DPL,NUM1
358 0x00a2 0x3873 358: LDA MIN_H,NUM0
359 0x00a3 0x3c0f 359: STA INX
360 0x00a4 0x4890 360: ADIM DPL,NUM1
361 0x00a5 0x3872 361: LDA MIN_L,NUM0
362 0x00a6 0x3c0f 362: STA INX
363 0x00a7 0x4890 363: ADIM DPL,NUM1
364 0x00a8 0x3871 364: LDA SEC_H,NUM0
365 0x00a9 0x3c0f 365: STA INX
366 0x00aa 0x4890 366: ADIM DPL,NUM1
367 0x00ab 0x3870 367: LDA SEC_L,NUM0
368 0x00ac 0x3c0f 368: STA INX
369 0x00ad 0x4890 369: ADIM DPL,NUM1
370 0x00ae 0x7b41 370: LDI CT1,NUM6
371 0x00af 0x794c 371: LDI DISTMP0,NUM2
372 0x00b0 0xc0b2 372: CALL DISPM
373 0x00b1 0xd400 373: RTNI
374 374: ;*********************************************************************
375 375: ;IN:DISTMP0(BEGIN),CT1(LEN)
376 376: ;*********************************************************************
377 377: DISPM:
378 0x00b2 0x7840 378: LDI CT0,NUM0
379 0x00b3 0x794d 379: LDI DISTMP1,NUM2
380 0x00b4 0x7912 380: LDI DPH,NUM2
381 0x00b5 0x7811 381: LDI DPM,NUM0
382 0x00b6 0x7810 382: LDI DPL,NUM0
383 383: DISPLP:
384 0x00b7 0x380f 384: LDA INX
385 0x00b8 0x3c50 385: STA TEMP0
386 0x00b9 0x3c4f 386: STA DISTMP3
387 0x00ba 0x784e 387: LDI DISTMP2,NUM0
388 388: FIND3:
389 0x00bb 0x384f 389: LDA DISTMP3
390 390: ; BAZ NEXTDS
391 0x00bc 0x48cf 391: ADIM DISTMP3,NUM1
392 0x00bd 0x7846 392: LDI AC_B,NUM0
393 0x00be 0x044e 393: ADCM DISTMP2
394 394: ; SBIM TEMP0,NUM1
395 395: ; BAZ NEXTDS
396 396: ; JMP FIND3
397 397: NEXTDS:
398 0x00bf 0xc0d4 398: CALL DISPONE
399 0x00c0 0x58c1 399: SBIM CT1,NUM1
400 0x00c1 0x90d3 400: BAZ DISRET
401 0x00c2 0x494c 401: ADIM DISTMP0,NUM2
402 0x00c3 0x90c5 402: BAZ NEXTCOM
403 0x00c4 0xe0ca 403: JMP ADDAD
404 404: NEXTCOM:
405 0x00c5 0x3d4d 405: STA DISTMP1,NUM2
406 0x00c6 0x3c4c 406: STA DISTMP0,NUM0
407 407:
408 0x00c7 0x50c0 408: SBI CT0,NUM1
409 0x00c8 0x90d3 409: BAZ DISRET
410 0x00c9 0x48c0 410: ADIM CT0,NUM1
411 411: ADDAD:
412 0x00ca 0x7912 412: LDI DPH,NUM2
413 0x00cb 0x3852 413: LDA TEMP2
414 0x00cc 0x3c11 414: STA DPM
415 0x00cd 0x3853 415: LDA TEMP3
416 0x00ce 0x3c10 416: STA DPL
417 0x00cf 0x4890 417: ADIM DPL,NUM1
418 0x00d0 0x7846 418: LDI AC_B,0
419 0x00d1 0x0411 419: ADCM DPM
420 0x00d2 0xe0b7 420: JMP DISPLP
421 421: DISRET:
422 0x00d3 0xd400 422: RTNI
423 423: ;*********************************************************************
424 424: ;IN:DISTMP0(BEGIN),DISTMP1(COM),DISTMP2,DISTMP3
425 425: ;*********************************************************************
426 426: DISPONE:
427 0x00d4 0x3811 427: LDA DPM
428 0x00d5 0x3c52 428: STA TEMP2
429 0x00d6 0x3810 429: LDA DPL
430 0x00d7 0x3c53 430: STA TEMP3
431 0x00d8 0x384e 431: LDA DISTMP2,NUM0
432 0x00d9 0x3c0e 432: STA TBR
433 0x00da 0x384f 433: LDA DISTMP3,NUM0
434 434:
435 0x00db 0xc200 435: CALL DISPTAB
436 0x00dc 0x3c42 436: STA CT2
437 437:
438 0x00dd 0x7b12 438: LDI DPH,NUM6
439 0x00de 0x384d 439: LDA DISTMP1,NUM0
440 0x00df 0x3c11 440: STA DPM,NUM0
441 0x00e0 0x384c 441: LDA DISTMP0,NUM0
442 0x00e1 0x3c10 442: STA DPL,NUM0
443 0x00e2 0x380e 443: LDA TBR,NUM0
444 0x00e3 0x3c0f 444: STA INX
445 445:
446 0x00e4 0x4890 446: ADIM DPL,NUM1
447 0x00e5 0x3842 447: LDA CT2,NUM0
448 0x00e6 0x3c0f 448: STA INX
449 0x00e7 0xd400 449: RTNI
450 450: ;*********************************************************************
451 451: ;TABLE
452 452: ;*********************************************************************
453 453: ;lcdtab: ;Dcgb0Efa
454 454: ; Db 0D7H,50H,0B5H,0F1H,72H,0E3H,0E7H
455 455: ; 0 1 2 3 4 5 6
456 456: ; Db 51H,0F7H,0F3H,20H,0D0H,86H, 0H, 87H
457 457: ; 7 8 9 - * # None C
458 458: ; Db 0A7H,07H,57H,0F4H,0D6H,086H,76H,27H,77H
459 459: ; E T N D U L H F A
460 460: ORG 0200H
461 0x0200 0xf7ff 461: DISPTAB: TJMP
462 462:
463 0x0201 0xd07d 463: RTNW 07H,0DH ;0
464 0x0202 0xd005 464: RTNW 00H,05H ;1
465 0x0203 0xd05b 465: RTNW 05H,0BH ;2
466 0x0204 0xd01f 466: RTNW 01H,0FH ;3
467 0x0205 0xd027 467: RTNW 02H,07H ;4
468 0x0206 0xd03e 468: RTNW 03H,0EH ;5
469 0x0207 0xd07e 469: RTNW 07H,0EH ;6
470 0x0208 0xd015 470: RTNW 01H,05H ;7
471 0x0209 0xd07f 471: RTNW 07H,0FH ;8
472 0x020a 0xd03f 472: RTNW 03H,0FH ;9
473 0x020b 0xd002 473: RTNW 00H,02H
474 0x020c 0xd00d 474: RTNW 00H,0DH ;*
475 0x020d 0xd068 475: RTNW 06H,08H ;#
476 0x020e 0xd000 476: RTNW 00H,00H ;NONE
477 0x020f 0xd078 477: RTNW 07H,08H ;C
478 0x0210 0xd07a 478: RTNW 07H,0AH ;E
479 0x0211 0xd070 479: RTNW 07H,00H ;T
480 0x0212 0xd075 480: RTNW 07H,05H ;N
481 0x0213 0xd04f 481: RTNW 04H,0FH ;D
482 0x0214 0xd06d 482: RTNW 06H,0DH ;U
483 0x0215 0xd068 483: RTNW 06H,08H ;L
484 0x0216 0xd067 484: RTNW 06H,07H ;H
485 0x0217 0xd072 485: RTNW 07H,02H ;F
486 0x0218 0xd077 486: RTNW 07H,07H ;A
487 487: ;===================================================================
488 488: END
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -