📄 parser.lst
字号:
0050 700D JNZ ?ELSE15
0052 7E02 MOV R6,#002H
0054 7FBC MOV R7,#0BCH
0056 E4 CLR A
0057 FC MOV R4,A
0058 7D64 MOV R5,#064H
005A 120000 R LCALL _beep
005D 800B SJMP ?NXT15
005F ?ELSE15:
005F 7E03 MOV R6,#003H
0061 7FE8 MOV R7,#0E8H
0063 E4 CLR A
0064 FC MOV R4,A
0065 7D64 MOV R5,#064H
0067 120000 R LCALL _beep
006A ?NXT15:
; SOURCE LINE # 14
006A 120000 R LCALL nokey
006D ?NXT12:
; SOURCE LINE # 16
006D AF00 R MOV R7,k2
006F 120000 R LCALL _high
0072 EF MOV A,R7
0073 6065 JZ ?NXT16
; SOURCE LINE # 17
0075 120000 R LCALL resetpfpm
0078 8F00 R MOV c,R7
007A E500 R MOV A,c
007C 6007 JZ ?NXT17
007E 7E00 R MOV R6,#HIGH(?STR?PARSER?BASE)
0080 7F00 R MOV R7,#LOW(?STR?PARSER?BASE)
0082 120000 R LCALL _putstr
0085 ?NXT17:
; SOURCE LINE # 18
0085 7F40 MOV R7,#040H
0087 7D0C MOV R5,#00CH
0089 120000 R LCALL _util
008C 8F00 R MOV c,R7
008E AF00 R MOV R7,c
0090 120000 R LCALL _putok
0093 120000 R LCALL putcr
; SOURCE LINE # 19
0096 E500 R MOV A,c
0098 7010 JNZ ?ELSE18
009A 7F47 MOV R7,#047H
009C 7D31 MOV R5,#031H
009E 120000 R LCALL _led
00A1 7F52 MOV R7,#052H
00A3 7D30 MOV R5,#030H
00A5 120000 R LCALL _led
00A8 800E SJMP ?NXT18
00AA ?ELSE18:
00AA 7F47 MOV R7,#047H
00AC 7D30 MOV R5,#030H
00AE 120000 R LCALL _led
00B1 7F52 MOV R7,#052H
00B3 7D31 MOV R5,#031H
00B5 120000 R LCALL _led
00B8 ?NXT18:
; SOURCE LINE # 20
00B8 120000 R LCALL release
; SOURCE LINE # 21
00BB E500 R MOV A,c
00BD 700D JNZ ?ELSE19
00BF 7E02 MOV R6,#002H
00C1 7FBC MOV R7,#0BCH
00C3 E4 CLR A
00C4 FC MOV R4,A
00C5 7D64 MOV R5,#064H
00C7 120000 R LCALL _beep
00CA 800B SJMP ?NXT19
00CC ?ELSE19:
00CC 7E03 MOV R6,#003H
00CE 7FE8 MOV R7,#0E8H
00D0 E4 CLR A
00D1 FC MOV R4,A
00D2 7D64 MOV R5,#064H
00D4 120000 R LCALL _beep
00D7 ?NXT19:
; SOURCE LINE # 22
00D7 120000 R LCALL nokey
00DA ?NXT16:
; SOURCE LINE # 24
00DA AF00 R MOV R7,k3
00DC 120000 R LCALL _high
00DF EF MOV A,R7
00E0 6066 JZ ?NXT20
; SOURCE LINE # 25
00E2 120000 R LCALL resetpfpm
00E5 8F00 R MOV c,R7
00E7 E500 R MOV A,c
00E9 6007 JZ ?NXT21
00EB 7E00 R MOV R6,#HIGH(?STR?PARSER?BASE)
00ED 7F00 R MOV R7,#LOW(?STR?PARSER?BASE)
00EF 120000 R LCALL _putstr
00F2 ?NXT21:
; SOURCE LINE # 26
00F2 7F40 MOV R7,#040H
00F4 7D0D MOV R5,#00DH
00F6 120000 R LCALL _util
00F9 EF MOV A,R7
00FA 4200 R ORL c,A
00FC AF00 R MOV R7,c
00FE 120000 R LCALL _putok
0101 120000 R LCALL putcr
; SOURCE LINE # 27
0104 E500 R MOV A,c
0106 7010 JNZ ?ELSE22
0108 7F47 MOV R7,#047H
010A 7D31 MOV R5,#031H
010C 120000 R LCALL _led
010F 7F52 MOV R7,#052H
0111 7D30 MOV R5,#030H
0113 120000 R LCALL _led
0116 800E SJMP ?NXT22
0118 ?ELSE22:
0118 7F47 MOV R7,#047H
011A 7D30 MOV R5,#030H
011C 120000 R LCALL _led
011F 7F52 MOV R7,#052H
0121 7D31 MOV R5,#031H
0123 120000 R LCALL _led
0126 ?NXT22:
; SOURCE LINE # 28
0126 120000 R LCALL release
; SOURCE LINE # 29
0129 E500 R MOV A,c
012B 700D JNZ ?ELSE23
012D 7E02 MOV R6,#002H
012F 7FBC MOV R7,#0BCH
0131 E4 CLR A
0132 FC MOV R4,A
0133 7D64 MOV R5,#064H
0135 120000 R LCALL _beep
0138 800B SJMP ?NXT23
013A ?ELSE23:
013A 7E03 MOV R6,#003H
013C 7FE8 MOV R7,#0E8H
013E E4 CLR A
013F FC MOV R4,A
0140 7D64 MOV R5,#064H
0142 120000 R LCALL _beep
0145 ?NXT23:
; SOURCE LINE # 30
0145 120000 R LCALL nokey
0148 ?NXT20:
0148 22 RET
; FUNCTION bakekey (END)
; FUNCTION pgmkey (BEGIN)
; SOURCE LINE # 35
0000 AF00 R MOV R7,k1
0002 120000 R LCALL _high
0005 EF MOV A,R7
0006 606D JZ ?NXT36
; SOURCE LINE # 36
0008 120000 R LCALL resetpfpm
000B 8F00 R MOV c,R7
000D E500 R MOV A,c
000F 6007 JZ ?NXT37
0011 7E00 R MOV R6,#HIGH(?STR?PARSER?BASE)
0013 7F00 R MOV R7,#LOW(?STR?PARSER?BASE)
0015 120000 R LCALL _putstr
0018 ?NXT37:
; SOURCE LINE # 37
0018 7E00 R MOV R6,#HIGH(?STR?PARSER?BASE + 00DH)
001A 7F00 R MOV R7,#LOW(?STR?PARSER?BASE + 00DH)
001C 120000 R LCALL _putstr
; SOURCE LINE # 38
001F 7F40 MOV R7,#040H
0021 7D02 MOV R5,#002H
0023 120000 R LCALL _util
0026 EF MOV A,R7
0027 4200 R ORL c,A
0029 AF00 R MOV R7,c
002B 120000 R LCALL _putok
002E 120000 R LCALL putcr
; SOURCE LINE # 39
0031 E500 R MOV A,c
0033 7010 JNZ ?ELSE38
0035 7F47 MOV R7,#047H
0037 7D31 MOV R5,#031H
0039 120000 R LCALL _led
003C 7F52 MOV R7,#052H
003E 7D30 MOV R5,#030H
0040 120000 R LCALL _led
0043 800E SJMP ?NXT38
0045 ?ELSE38:
0045 7F47 MOV R7,#047H
0047 7D30 MOV R5,#030H
0049 120000 R LCALL _led
004C 7F52 MOV R7,#052H
004E 7D31 MOV R5,#031H
0050 120000 R LCALL _led
0053 ?NXT38:
; SOURCE LINE # 40
0053 120000 R LCALL release
; SOURCE LINE # 41
0056 E500 R MOV A,c
0058 700D JNZ ?ELSE39
005A 7E02 MOV R6,#002H
005C 7FBC MOV R7,#0BCH
005E E4 CLR A
005F FC MOV R4,A
0060 7D64 MOV R5,#064H
0062 120000 R LCALL _beep
0065 800B SJMP ?NXT39
0067 ?ELSE39:
0067 7E03 MOV R6,#003H
0069 7FE8 MOV R7,#0E8H
006B E4 CLR A
006C FC MOV R4,A
006D 7D64 MOV R5,#064H
006F 120000 R LCALL _beep
0072 ?NXT39:
; SOURCE LINE # 42
0072 120000 R LCALL nokey
0075 ?NXT36:
; SOURCE LINE # 44
0075 AF00 R MOV R7,k2
0077 120000 R LCALL _high
007A EF MOV A,R7
007B 606D JZ ?NXT40
; SOURCE LINE # 45
007D 120000 R LCALL resetpfpm
0080 8F00 R MOV c,R7
0082 E500 R MOV A,c
0084 6007 JZ ?NXT41
0086 7E00 R MOV R6,#HIGH(?STR?PARSER?BASE)
0088 7F00 R MOV R7,#LOW(?STR?PARSER?BASE)
008A 120000 R LCALL _putstr
008D ?NXT41:
; SOURCE LINE # 46
008D 7E00 R MOV R6,#HIGH(?STR?PARSER?BASE + 022H)
008F 7F00 R MOV R7,#LOW(?STR?PARSER?BASE + 022H)
0091 120000 R LCALL _putstr
; SOURCE LINE # 47
0094 7F80 MOV R7,#080H
0096 7D02 MOV R5,#002H
0098 120000 R LCALL _util
009B EF MOV A,R7
009C 4200 R ORL c,A
009E AF00 R MOV R7,c
00A0 120000 R LCALL _putok
00A3 120000 R LCALL putcr
; SOURCE LINE # 48
00A6 E500 R MOV A,c
00A8 7010 JNZ ?ELSE42
00AA 7F47 MOV R7,#047H
00AC 7D31 MOV R5,#031H
00AE 120000 R LCALL _led
00B1 7F52 MOV R7,#052H
00B3 7D30 MOV R5,#030H
00B5 120000 R LCALL _led
00B8 800E SJMP ?NXT42
00BA ?ELSE42:
00BA 7F47 MOV R7,#047H
00BC 7D30 MOV R5,#030H
00BE 120000 R LCALL _led
00C1 7F52 MOV R7,#052H
00C3 7D31 MOV R5,#031H
00C5 120000 R LCALL _led
00C8 ?NXT42:
; SOURCE LINE # 49
00C8 120000 R LCALL release
; SOURCE LINE # 50
00CB E500 R MOV A,c
00CD 700D JNZ ?ELSE43
00CF 7E02 MOV R6,#002H
00D1 7FBC MOV R7,#0BCH
00D3 E4 CLR A
00D4 FC MOV R4,A
00D5 7D64 MOV R5,#064H
00D7 120000 R LCALL _beep
00DA 800B SJMP ?NXT43
00DC ?ELSE43:
00DC 7E03 MOV R6,#003H
00DE 7FE8 MOV R7,#0E8H
00E0 E4 CLR A
00E1 FC MOV R4,A
00E2 7D64 MOV R5,#064H
00E4 120000 R LCALL _beep
00E7 ?NXT43:
; SOURCE LINE # 51
00E7 120000 R LCALL nokey
00EA ?NXT40:
; SOURCE LINE # 53
00EA AF00 R MOV R7,k3
00EC 120000 R LCALL _high
00EF EF MOV A,R7
00F0 606D JZ ?NXT44
; SOURCE LINE # 54
00F2 120000 R LCALL resetpfpm
00F5 8F00 R MOV c,R7
00F7 E500 R MOV A,c
00F9 6007 JZ ?NXT45
00FB 7E00 R MOV R6,#HIGH(?STR?PARSER?BASE)
00FD 7F00 R MOV R7,#LOW(?STR?PARSER?BASE)
00FF 120000 R LCALL _putstr
0102 ?NXT45:
; SOURCE LINE # 55
0102 7E00 R MOV R6,#HIGH(?STR?PARSER?BASE + 036H)
0104 7F00 R MOV R7,#LOW(?STR?PARSER?BASE + 036H)
0106 120000 R LCALL _putstr
; SOURCE LINE # 56
0109 7F40 MOV R7,#040H
010B 7D01 MOV R5,#001H
010D 120000 R LCALL _util
0110 EF MOV A,R7
0111 4200 R ORL c,A
0113 AF00 R MOV R7,c
0115 120000 R LCALL _putok
0118 120000 R LCALL putcr
; SOURCE LINE # 57
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -