📄 main.lis
字号:
0617 060000 add [__r1],<_FirstKeyArray
061A 0E0000 adc [__r0],>_FirstKeyArray
061D 5100 mov A,[__r0]
061F 10 push X
0620 5800 mov X,[__r1]
0622 28 romx
0623 20 pop X
0624 391F cmp A,31
0626 B00D jnz L80
0628 .dbline 380
0628 ; }
0628 52FB mov A,[X-5]
062A 5300 mov [__r1],A
062C 52FA mov A,[X-6]
062E 60D5 mov REG[0xd5],A
0630 5002 mov A,2
0632 3F00 mvi [__r1],A
0634 L80:
0634 .dbline 381
0634 ; }
0634 62D000 mov REG[0xd0],>__r0
0637 52FC mov A,[X-4]
0639 5300 mov [__r1],A
063B 5000 mov A,0
063D 08 push A
063E 5100 mov A,[__r1]
0640 08 push A
0641 5000 mov A,0
0643 08 push A
0644 5003 mov A,3
0646 08 push A
0647 7C0000 xcall __mul16
064A 38FC add SP,-4
064C 5100 mov A,[__rX]
064E 5300 mov [__r1],A
0650 5100 mov A,[__rY]
0652 5300 mov [__r0],A
0654 060000 add [__r1],<_FirstKeyArray
0657 0E0000 adc [__r0],>_FirstKeyArray
065A 5100 mov A,[__r0]
065C 10 push X
065D 5800 mov X,[__r1]
065F 28 romx
0660 20 pop X
0661 842D xjmp L69
0663 L76:
0663 .dbline 385
0663 ; }
0663 ; }
0663 ; }
0663 ; }
0663 62D000 mov REG[0xd0],>_KeyProStatus
0666 5100 mov A,[_KeyProStatus]
0668 62D000 mov REG[0xd0],>__r0
066B 67 asr A
066C 67 asr A
066D 67 asr A
066E 67 asr A
066F 67 asr A
0670 2107 and A,7
0672 5300 mov [__r0],A
0674 260001 and [__r0],1
0677 3C0001 cmp [__r0],1
067A B039 jnz L82
067C .dbline 386
067C ; }
067C .dbline 387
067C ; }
067C 52FB mov A,[X-5]
067E 5300 mov [__r1],A
0680 52FA mov A,[X-6]
0682 60D5 mov REG[0xd5],A
0684 5001 mov A,1
0686 3F00 mvi [__r1],A
0688 .dbline 389
0688 ; }
0688 ; }
0688 52FC mov A,[X-4]
068A 5300 mov [__r1],A
068C 5000 mov A,0
068E 08 push A
068F 5100 mov A,[__r1]
0691 08 push A
0692 5000 mov A,0
0694 08 push A
0695 5003 mov A,3
0697 08 push A
0698 7C0000 xcall __mul16
069B 38FC add SP,-4
069D 5100 mov A,[__rX]
069F 5300 mov [__r1],A
06A1 5100 mov A,[__rY]
06A3 5300 mov [__r0],A
06A5 060000 add [__r1],<_FirstKeyArray
06A8 0E0000 adc [__r0],>_FirstKeyArray
06AB 5100 mov A,[__r0]
06AD 10 push X
06AE 5800 mov X,[__r1]
06B0 28 romx
06B1 20 pop X
06B2 83DC xjmp L69
06B4 L82:
06B4 .dbline 392
06B4 ; }
06B4 ; }
06B4 ; }
06B4 62D000 mov REG[0xd0],>_KeyProStatus
06B7 5100 mov A,[_KeyProStatus]
06B9 62D000 mov REG[0xd0],>__r0
06BC 67 asr A
06BD 67 asr A
06BE 67 asr A
06BF 67 asr A
06C0 67 asr A
06C1 67 asr A
06C2 67 asr A
06C3 2101 and A,1
06C5 5300 mov [__r0],A
06C7 260001 and [__r0],1
06CA 3C0001 cmp [__r0],1
06CD B114 jnz L84
06CF .dbline 393
06CF ; }
06CF .dbline 396
06CF ; }
06CF ; }
06CF ; }
06CF 52FC mov A,[X-4]
06D1 5300 mov [__r1],A
06D3 5000 mov A,0
06D5 08 push A
06D6 5100 mov A,[__r1]
06D8 08 push A
06D9 5000 mov A,0
06DB 08 push A
06DC 5003 mov A,3
06DE 08 push A
06DF 7C0000 xcall __mul16
06E2 38FC add SP,-4
06E4 5100 mov A,[__rX]
06E6 5300 mov [__r1],A
06E8 5100 mov A,[__rY]
06EA 5300 mov [__r0],A
06EC 5100 mov A,[__r1]
06EE 0101 add A,<_FirstKeyArray+1
06F0 5300 mov [__r3],A
06F2 5100 mov A,[__r0]
06F4 0901 adc A,>_FirstKeyArray+1
06F6 10 push X
06F7 5800 mov X,[__r3]
06F9 28 romx
06FA 20 pop X
06FB 5300 mov [__r2],A
06FD 470008 tst [__r2],8
0700 B015 jnz L90
0702 060001 add [__r1],<_FirstKeyArray+1
0705 0E0001 adc [__r0],>_FirstKeyArray+1
0708 5100 mov A,[__r0]
070A 10 push X
070B 5800 mov X,[__r1]
070D 28 romx
070E 20 pop X
070F 5300 mov [__r0],A
0711 470004 tst [__r0],4
0714 A09E jz L86
0716 L90:
0716 .dbline 397
0716 ; }
0716 .dbline 399
0716 ; }
0716 ; }
0716 62D000 mov REG[0xd0],>__r0
0719 52FC mov A,[X-4]
071B 5300 mov [__r1],A
071D 5000 mov A,0
071F 08 push A
0720 5100 mov A,[__r1]
0722 08 push A
0723 5000 mov A,0
0725 08 push A
0726 5003 mov A,3
0728 08 push A
0729 7C0000 xcall __mul16
072C 38FC add SP,-4
072E 5100 mov A,[__rX]
0730 5300 mov [__r1],A
0732 5100 mov A,[__rY]
0734 5300 mov [__r0],A
0736 060001 add [__r1],<_FirstKeyArray+1
0739 0E0001 adc [__r0],>_FirstKeyArray+1
073C 5100 mov A,[__r0]
073E 10 push X
073F 5800 mov X,[__r1]
0741 28 romx
0742 20 pop X
0743 67 asr A
0744 67 asr A
0745 67 asr A
0746 67 asr A
0747 210F and A,15
0749 5300 mov [__r0],A
074B 52FB mov A,[X-5]
074D 5300 mov [__r3],A
074F 52FA mov A,[X-6]
0751 60D5 mov REG[0xd5],A
0753 5100 mov A,[__r0]
0755 3F00 mvi [__r3],A
0757 .dbline 401
0757 ; }
0757 ; }
0757 52FC mov A,[X-4]
0759 5300 mov [__r1],A
075B 5000 mov A,0
075D 08 push A
075E 5100 mov A,[__r1]
0760 08 push A
0761 5000 mov A,0
0763 08 push A
0764 5003 mov A,3
0766 08 push A
0767 7C0000 xcall __mul16
076A 38FC add SP,-4
076C 5100 mov A,[__rX]
076E 5300 mov [__r1],A
0770 5100 mov A,[__rY]
0772 5300 mov [__r0],A
0774 060001 add [__r1],<_FirstKeyArray+1
0777 0E0001 adc [__r0],>_FirstKeyArray+1
077A 5100 mov A,[__r0]
077C 10 push X
077D 5800 mov X,[__r1]
077F 28 romx
0780 20 pop X
0781 210F and A,15
0783 5401 mov [X+1],A
0785 .dbline 402
0785 ; }
0785 52FC mov A,[X-4]
0787 5300 mov [__r1],A
0789 5000 mov A,0
078B 08 push A
078C 5100 mov A,[__r1]
078E 08 push A
078F 5000 mov A,0
0791 08 push A
0792 5003 mov A,3
0794 08 push A
0795 7C0000 xcall __mul16
0798 38FC add SP,-4
079A 5100 mov A,[__rX]
079C 5300 mov [__r1],A
079E 5100 mov A,[__rY]
07A0 5300 mov [__r0],A
07A2 060002 add [__r1],<_FirstKeyArray+2
07A5 0E0002 adc [__r0],>_FirstKeyArray+2
07A8 5100 mov A,[__r0]
07AA 10 push X
07AB 5800 mov X,[__r1]
07AD 28 romx
07AE 20 pop X
07AF 5400 mov [X+0],A
07B1 .dbline 403
07B1 ; }
07B1 8030 xjmp L87
07B3 L86:
07B3 .dbline 405
07B3 ; }
07B3 ; }
07B3 62D000 mov REG[0xd0],>__r0
07B6 52FC mov A,[X-4]
07B8 5300 mov [__r1],A
07BA 5000 mov A,0
07BC 08 push A
07BD 5100 mov A,[__r1]
07BF 08 push A
07C0 5000 mov A,0
07C2 08 push A
07C3 5003 mov A,3
07C5 08 push A
07C6 7C0000 xcall __mul16
07C9 38FC add SP,-4
07CB 5100 mov A,[__rX]
07CD 5300 mov [__r1],A
07CF 5100 mov A,[__rY]
07D1 5300 mov [__r0],A
07D3 060000 add [__r1],<_FirstKeyArray
07D6 0E0000 adc [__r0],>_FirstKeyArray
07D9 5100 mov A,[__r0]
07DB 10 push X
07DC 5800 mov X,[__r1]
07DE 28 romx
07DF 20 pop X
07E0 82AE xjmp L69
07E2 L87:
07E2 .dbline 407
07E2 ; }
07E2 ; }
07E2 L84:
07E2 .dbline 409
07E2 ; }
07E2 ; }
07E2 62D000 mov REG[0xd0],>_KeyProStatus
07E5 5100 mov A,[_KeyProStatus]
07E7 62D000 mov REG[0xd0],>__r0
07EA 67 asr A
07EB 67 asr A
07EC 67 asr A
07ED 67 asr A
07EE 67 asr A
07EF 67 asr A
07F0 2103 and A,3
07F2 5300 mov [__r0],A
07F4 260001 and [__r0],1
07F7 3C0001 cmp [__r0],1
07FA B0FB jnz L94
07FC .dbline 410
07FC ; }
07FC .dbline 411
07FC ; }
07FC 52FC mov A,[X-4]
07FE 5300 mov [__r1],A
0800 5000 mov A,0
0802 08 push A
0803 5100 mov A,[__r1]
0805 08 push A
0806 5000 mov A,0
0808 08 push A
0809 5003 mov A,3
080B 08 push A
080C 7C0000 xcall __mul16
080F 38FC add SP,-4
0811 5100 mov A,[__rX]
0813 5300 mov [__r1],A
0815 5100 mov A,[__rY]
0817 5300 mov [__r0],A
0819 060001 add [__r1],<_FirstKeyArray+1
081C 0E0001 adc [__r0],>_FirstKeyArray+1
081F 5100 mov A,[__r0]
0821 10 push X
0822 5800 mov X,[__r1]
0824 28 romx
0825 20 pop X
0826 5300 mov [__r0],A
0828 470004 tst [__r0],4
082B A09B jz L96
082D .dbline 412
082D ; }
082D .dbline 414
082D ; }
082D ; }
082D 52FC mov A,[X-4]
082F 5300 mov [__r1],A
0831 5000 mov A,0
0833 08 push A
0834 5100 mov A,[__r1]
0836 08 push A
0837 5000 mov A,0
0839 08 push A
083A 5003 mov A,3
083C 08 push A
083D 7C0000 xcall __mul16
0840 38FC add SP,-4
0842 5100 mov A,[__rX]
0844 5300 mov [__r1],A
0846 5100 mov A,[__rY]
0848 5300 mov [__r0],A
084A 060001 add [__r1],<_FirstKeyArray+1
084D 0E0001 adc [__r0],>_FirstKeyArray+1
0850 5100 mov A,[__r0]
0852 10 push X
0853 5800 mov X,[__r1]
0855 28 romx
0856 20 pop X
0857 67 asr A
0858 67 asr A
0859 67 asr A
085A 67 asr A
085B 210F
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -