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

📄 keyboard.lst

📁 基于HC908GP32的计算器完整程序
💻 LST
📖 第 1 页 / 共 5 页
字号:
    841A B6 43        ldA	*__r3
    841C 87           pshA	
    841D B6 42        ldA	*__r2
    841F 87           pshA	
    8420 CD 8F70      jsr	__divmod16s
    8423 A7 02        aiS	#2
    8425 4E 4C42      mov	*__rhi,*__r2
    8428 4E 4D43      mov	*__rlo,*__r3
    842B B6 42        ldA	*__r2
    842D 55 40        ldHX	*__r0
    842F F7           stA	0,X
    8430 B6 43        ldA	*__r3
    8432 E7 01        stA	1,X
    8434 3F 40        clr	*__r0
    8436 B6 B3        ldA	0xFFFFFFB3
    8438 B7 41        stA	*__r1
    843A 38 41        lsl	*__r1
    843C 39 40        rol	*__r0
    843E B6 41        ldA	*__r1
    8440 AB 72        add	#114
    8442 B7 41        stA	*__r1
    8444 B6 40        ldA	*__r0
    8446 A9 00        adc	#0
    8448 B7 40        stA	*__r0
    844A 4F           clrA	
    844B 55 40        ldHX	*__r0
    844D F7           stA	0,X
    844E 4F           clrA	
    844F E7 01        stA	1,X
    8451 95           tSX	
    8452 B6 B3        ldA	0xFFFFFFB3
    8454 A1 00        cmp	#0
    8456 23 2C        bls	0x8484
    8458 3F 40        clr	*__r0
    845A B6 B3        ldA	0xFFFFFFB3
    845C AB A1        add	#-95
    845E B7 41        stA	*__r1
    8460 B6 40        ldA	*__r0
    8462 A9 00        adc	#0
    8464 B7 40        stA	*__r0
    8466 55 40        ldHX	*__r0
    8468 F6           ldA	0,X
    8469 95           tSX	
    846A A1 2D        cmp	#45
    846C 26 16        bne	0x8484
    846E 3F 40        clr	*__r0
    8470 B6 B3        ldA	0xFFFFFFB3
    8472 AB A2        add	#-94
    8474 B7 41        stA	*__r1
    8476 B6 40        ldA	*__r0
    8478 A9 00        adc	#0
    847A B7 40        stA	*__r0
    847C A6 2D        ldA	#45
    847E 55 40        ldHX	*__r0
    8480 F7           stA	0,X
    8481 95           tSX	
    8482 20 14        bra	0x8498
    8484 3F 40        clr	*__r0
    8486 B6 B3        ldA	0xFFFFFFB3
    8488 AB A2        add	#-94
    848A B7 41        stA	*__r1
    848C B6 40        ldA	*__r0
    848E A9 00        adc	#0
    8490 B7 40        stA	*__r0
    8492 A6 2B        ldA	#43
    8494 55 40        ldHX	*__r0
    8496 F7           stA	0,X
    8497 95           tSX	
    8498 3C B3        inc	0xFFFFFFB3
    849A B6 B7        ldA	0xFFFFFFB7
    849C A0 01        sub	#1
    849E B7 40        stA	*__r0
    84A0 B6 B3        ldA	0xFFFFFFB3
    84A2 B1 40        cmp	*__r0
    84A4 24 03        bcc	0x84A9
    84A6 CC 82D6      jmp	0x82D6
    84A9 4E 7270      mov	*_r,*_res
    84AC 4E 7371      mov	*_r+1,*_res+1
    84AF 3F B2        clr	0xFFFFFFB2
    84B1 CC 8546      jmp	0x8546
    84B4 3F 40        clr	*__r0
    84B6 B6 B2        ldA	0xFFFFFFB2
    84B8 AB A2        add	#-94
    84BA B7 41        stA	*__r1
    84BC B6 40        ldA	*__r0
    84BE A9 00        adc	#0
    84C0 B7 40        stA	*__r0
    84C2 55 40        ldHX	*__r0
    84C4 F6           ldA	0,X
    84C5 95           tSX	
    84C6 A1 2B        cmp	#43
    84C8 26 32        bne	0x84FC
    84CA 3F 40        clr	*__r0
    84CC B6 B2        ldA	0xFFFFFFB2
    84CE B7 41        stA	*__r1
    84D0 55 40        ldHX	*__r0
    84D2 AF 01        aiX	#1
    84D4 35 40        stHX	*__r0
    84D6 38 41        lsl	*__r1
    84D8 39 40        rol	*__r0
    84DA B6 41        ldA	*__r1
    84DC AB 72        add	#114
    84DE B7 41        stA	*__r1
    84E0 B6 40        ldA	*__r0
    84E2 A9 00        adc	#0
    84E4 B7 40        stA	*__r0
    84E6 55 40        ldHX	*__r0
    84E8 E6 01        ldA	1,X
    84EA B7 41        stA	*__r1
    84EC F6           ldA	0,X
    84ED 95           tSX	
    84EE B7 40        stA	*__r0
    84F0 B6 71        ldA	*_res+1
    84F2 BB 41        add	*__r1
    84F4 B7 71        stA	*_res+1
    84F6 B6 70        ldA	*_res
    84F8 B9 40        adc	*__r0
    84FA B7 70        stA	*_res
    84FC 3F 40        clr	*__r0
    84FE B6 B2        ldA	0xFFFFFFB2
    8500 AB A2        add	#-94
    8502 B7 41        stA	*__r1
    8504 B6 40        ldA	*__r0
    8506 A9 00        adc	#0
    8508 B7 40        stA	*__r0
    850A 55 40        ldHX	*__r0
    850C F6           ldA	0,X
    850D 95           tSX	
    850E A1 2D        cmp	#45
    8510 26 32        bne	0x8544
    8512 3F 40        clr	*__r0
    8514 B6 B2        ldA	0xFFFFFFB2
    8516 B7 41        stA	*__r1
    8518 55 40        ldHX	*__r0
    851A AF 01        aiX	#1
    851C 35 40        stHX	*__r0
    851E 38 41        lsl	*__r1
    8520 39 40        rol	*__r0
    8522 B6 41        ldA	*__r1
    8524 AB 72        add	#114
    8526 B7 41        stA	*__r1
    8528 B6 40        ldA	*__r0
    852A A9 00        adc	#0
    852C B7 40        stA	*__r0
    852E 55 40        ldHX	*__r0
    8530 E6 01        ldA	1,X
    8532 B7 41        stA	*__r1
    8534 F6           ldA	0,X
    8535 95           tSX	
    8536 B7 40        stA	*__r0
    8538 B6 71        ldA	*_res+1
    853A B0 41        sub	*__r1
    853C B7 71        stA	*_res+1
    853E B6 70        ldA	*_res
    8540 B2 40        sbc	*__r0
    8542 B7 70        stA	*_res
    8544 3C B2        inc	0xFFFFFFB2
    8546 B6 B7        ldA	0xFFFFFFB7
    8548 A0 01        sub	#1
    854A B7 40        stA	*__r0
    854C B6 B2        ldA	0xFFFFFFB2
    854E B1 40        cmp	*__r0
    8550 24 03        bcc	0x8555
    8552 CC 84B4      jmp	0x84B4
    8555 B6 71        ldA	*_res+1
    8557 B7 41        stA	*__r1
    8559 B6 70        ldA	*_res
    855B B7 40        stA	*__r0
    855D 81           rts	
_isrKBI:
  KB_valve             --> X+0
    855E 8B           pshH	
    855F B6 40        ldA	*__r0
    8561 87           pshA	
    8562 B6 41        ldA	*__r1
    8564 87           pshA	
    8565 B6 42        ldA	*__r2
    8567 87           pshA	
    8568 B6 43        ldA	*__r3
    856A 87           pshA	
    856B B6 44        ldA	*__r4
    856D 87           pshA	
    856E B6 45        ldA	*__r5
    8570 87           pshA	
    8571 B6 46        ldA	*__r6
    8573 87           pshA	
    8574 B6 47        ldA	*__r7
    8576 87           pshA	
    8577 B6 48        ldA	*__r8
    8579 87           pshA	
    857A B6 49        ldA	*__r9
    857C 87           pshA	
    857D B6 4A        ldA	*__r10
    857F 87           pshA	
    8580 B6 4B        ldA	*__r11
    8582 87           pshA	
    8583 B6 4C        ldA	*__rhi
    8585 87           pshA	
    8586 B6 4D        ldA	*__rlo
    8588 87           pshA	
    8589 A7 FD        aiS	#-3
    858B 95           tSX	
    858C 9B           seI	
    858D 12 1A        Bset	1,0x1A
    858F A6 01        ldA	#1
    8591 B7 C0        stA	0xFFFFFFC0
    8593 B6 C0        ldA	0xFFFFFFC0
    8595 A1 01        cmp	#1
    8597 27 03        beq	0x859C
    8599 CC 8CA7      jmp	0x8CA7
    859C 3F C0        clr	0xFFFFFFC0
    859E CD 8DF1      jsr	_KB_Scan
    85A1 95           tSX	
    85A2 B7 41        stA	*__r1
    85A4 E7 02        stA	2,X
    85A6 87           pshA	
    85A7 CD 8E44      jsr	_KB_Def
    85AA A7 01        aiS	#1
    85AC 95           tSX	
    85AD B7 41        stA	*__r1
    85AF E7 02        stA	2,X
    85B1 7F           clr	0,X
    85B2 E7 01        stA	1,X
    85B4 F6           ldA	0,X
    85B5 B7 40        stA	*__r0
    85B7 55 40        ldHX	*__r0
    85B9 65 002A      cpHX	#0x002A
    85BC 95           tSX	
    85BD 90 03        bge	0x85C2
    85BF CC 8C46      jmp	0x8C46
    85C2 E6 01        ldA	1,X
    85C4 B7 41        stA	*__r1
    85C6 F6           ldA	0,X
    85C7 B7 40        stA	*__r0
    85C9 55 40        ldHX	*__r0
    85CB 65 003D      cpHX	#0x003D
    85CE 95           tSX	
    85CF 93 03        ble	0x85D4
    85D1 CC 8C46      jmp	0x8C46
    85D4 E6 01        ldA	1,X
    85D6 A0 2A        sub	#42
    85D8 B7 41        stA	*__r1
    85DA F6           ldA	0,X
    85DB A2 00        sbc	#0
    85DD B7 40        stA	*__r0
    85DF 38 41        lsl	*__r1
    85E1 39 40        rol	*__r0
    85E3 B6 41        ldA	*__r1
    85E5 AB 63        add	#99
    85E7 B7 41        stA	*__r1
    85E9 B6 40        ldA	*__r0
    85EB A9 80        adc	#-128
    85ED B7 40        stA	*__r0
    85EF 55 40        ldHX	*__r0
    85F1 E6 01        ldA	1,X
    85F3 B7 41        stA	*__r1
    85F5 F6           ldA	0,X
    85F6 95           tSX	
    85F7 B7 40        stA	*__r0
    85F9 B6 41        ldA	*__r1
    85FB 87           pshA	
    85FC B6 40        ldA	*__r0
    85FE 87           pshA	
    85FF 81           rts	
    8600 3F 40        clr	*__r0
    8602 B6 6F        ldA	0x6F
    8604 B7 41        stA	*__r1
    8606 55 40        ldHX	*__r0
    8608 AF 01        aiX	#1
    860A 35 42        stHX	*__r2
    860C 4E 436F      mov	*__r3,0x6F
    860F AB 4E        add	#78
    8611 B7 41        stA	*__r1
    8613 B6 40        ldA	*__r0
    8615 A9 00        adc	#0
    8617 B7 40        stA	*__r0
    8619 A6 31        ldA	#49
    861B 55 40        ldHX	*__r0
    861D F7           stA	0,X
    861E 95           tSX	
    861F 3F 6E        clr	0x6E
    8621 CC 8C46      jmp	0x8C46
    8624 3F 40        clr	*__r0
    8626 B6 6F        ldA	0x6F
    8628 B7 41        stA	*__r1
    862A 55 40        ldHX	*__r0
    862C AF 01        aiX	#1
    862E 35 42        stHX	*__r2
    8630 4E 436F      mov	*__r3,0x6F
    8633 AB 4E        add	#78
    8635 B7 41        stA	*__r1
    8637 B6 40        ldA	*__r0
    8639 A9 00        adc	#0
    863B B7 40        stA	*__r0
    863D A6 32        ldA	#50
    863F 55 40        ldHX	*__r0
    8641 F7           stA	0,X
    8642 95           tSX	
    8643 3F 6E        clr	0x6E
    8645 CC 8C46      jmp	0x8C46
    8648 3F 40        clr	*__r0
    864A B6 6F        ldA	0x6F
    864C B7 41        stA	*__r1
    864E 55 40        ldHX	*__r0
    8650 AF 01        aiX	#1
    8652 35 42        stHX	*__r2
    8654 4E 436F      mov	*__r3,0x6F
    8657 AB 4E        add	#78
    8659 B7 41        stA	*__r1
    865B B6 40        ldA	*__r0
    865D A9 00        adc	#0
    865F B7 40        stA	*__r0
    8661 A6 33        ldA	#51
    8663 55 40        ldHX	*__r0
    8665 F7           stA	0,X
    8666 95           tSX	
    8667 3F 6E        clr	0x6E
    8669 CC 8C46      jmp	0x8C46
    866C 3F 40        clr	*__r0
    866E B6 6F        ldA	0x6F
    8670 B7 41        stA	*__r1
    8672 55 40        ldHX	*__r0
    8674 AF 01        aiX	#1
    8676 35 42        stHX	*__r2
    8678 4E 436F      mov	*__r3,0x6F
    867B AB 4E        add	#78
    867D B7 41        stA	*__r1
    867F B6 40        ldA	*__r0
    8681 A9 00        adc	#0
    8683 B7 40        stA	*__r0
    8685 A6 34        ldA	#52
    8687 55 40        ldHX	*__r0
    8689 F7           stA	0,X
    868A 95           tSX	
    868B 3F 6E        clr	0x6E
    868D CC 8C46      jmp	0x8C46
    8690 3F 40        clr	*__r0
    8692 B6 6F        ldA	0x6F
    8694 B7 41        stA	*__r1
    8696 55 40        ldHX	*__r0
    8698 AF 01        aiX	#1
    869A 35 42        stHX	*__r2
    869C 4E 436F      mov	*__r3,0x6F
    869F AB 4E        add	#78
    86A1 B7 41        stA	*__r1
    86A3 B6 40        ldA	*__r0
    86A5 A9 00        adc	#0
    86A7 B7 40        stA	*__r0
    86A9 A6 35        ldA	#53
    86AB 55 40        ldHX	*__r0
    86AD F7           stA	0,X
    86AE 95           tSX	
    86AF 3F 6E        clr	0x6E
    86B1 CC 8C46      jmp	0x8C46
    86B4 3F 40        clr	*__r0
    86B6 B6 6F        ldA	0x6F
    86B8 B7 41        stA	*__r1
    86BA 55 40        ldHX	*__r0
    86BC AF 01        aiX	#1
    86BE 35 42        stHX	*__r2
    86C0 4E 436F      mov	*__r3,0x6F
    86C3 AB 4E        add	#78
    86C5 B7 41        stA	*__r1
    86C7 B6 40        ldA	*__r0
    86C9 A9 00        adc	#0
    86CB B7 40        stA	*__r0
    86CD A6 36        ldA	#54
    86CF 55 40        ldHX	*__r0
    86D1 F7           stA	0,X
    86D2 95           tSX	
    86D3 3F 6E        clr	0x6E
    86D5 CC 8C46      jmp	0x8C46
    86D8 3F 40        clr	*__r0
    86DA B6 6F        ldA	0x6F
    86DC B7 41        stA	*__r1

⌨️ 快捷键说明

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