📄 lc72131.asm
字号:
bb315: ljmp aa7c9
bb318: ljmp bb291;38f
bb320: JB 12H,BB315
JB 13H,BB315
jnb 04h,bb319
setb 2ch
ljmp bb24b
bb319: clr 2ch
MOV 1DH,#0C8H
BB343: MOV A,1CH
BB34B: CJNE A,#01H,BB36C
LCALL AAD48
LCALL AAC72
MOV A,19H
CLR C
MOV B,#02H
DIV AB
CJNE A,#00,BB364
BB358: MOV 19H,A
MOV 1EH,A
MOV DPTR,#0000H
lCALL AA05F
LJMP AACB5
BB364: DEC A
MOV B,#02H
MUL AB
LJMP BB358
BB36C: LCALL AAD48
LCALL AAC4C
MOV A,1AH
CLR C
MOV B,#02H
DIV AB
CJNE A,#00H,BB382
BB376: MOV 1AH,A
MOV 1EH,A
MOV DPTR,#0000H
lCALL AA05F
LJMP AACB5
BB382: DEC A
MOV B,#02H
MUL AB
LJMP BB376
BB291: CJNE A,#0AH,BB38F ;DELAY
CLR 28H
CLR 04H
MOV 1DH,#0C8H
MOV 1CH,#02H
LCALL AAD48
LCALL AAC95
BB39E: MOV A,1BH
CLR C
MOV B,#0CH
DIV AB
BB3A5: CJNE A,#08H,BB3B8
MOV A,#00H
MOV B,#0CH
MUL AB
BB3AC: MOV 1BH,A
MOV 1EH,A
MOV DPTR,#0000H
lCALL AA05F
LJMP AACB5
BB3B8: INC A
MOV B,#0CH
MUL AB
LJMP BB3AC
BB38A: LJMP AA7C9
BB38F: CJNE A,#03H,BB411
JB 12H,BB38A
JB 13H,BB38A
JNB 04H,BB390
SETB 2DH
LJMP BB24B
BB390: CLR 2DH
MOV 1DH,#0C8H
BB3C0: MOV A,1CH
BB3C8: CJNE A,#01H,BB3ED
LCALL AAD48
LCALL AAC72
MOV A,19H
CLR C
MOV B,#02H
DIV AB
BB3D2: CJNE A,#22H,BB3E5
MOV B,#02H
MUL AB
BB3D9: MOV 19H,A
MOV 1EH,A
MOV DPTR,#0000H
lCALL AA05F
LJMP AACB5
BB3E5: INC A
MOV B,#02H
MUL AB
LJMP BB3D9
BB3ED: LCALL AAD48
LCALL AAC4C
MOV A,1AH
CLR C
MOV B,#02H
DIV AB
CJNE A,#22H,BB407
MOV B,#02H
MUL AB
BB3FB: MOV 1AH,A
MOV 1EH,A
MOV DPTR,#0000H
lCALL AA05F
LJMP AACB5
BB407: INC A
MOV B,#02H
MUL AB
LJMP BB3FB
BB40F: LJMP AA7C9
BB411: CJNE A,#08h,BB45B ;NOISE TEST 14h
JB 12H,BB40F
JNB 04H,BB421
CLR 04H
MOV 43H,#01H
LJMP AA7C9
BB421: LCALL BB30B
LCALL AAD44
MOV 43H,#01H
SETB 04H
SETB 0A6H
SETB 0A5H
CLR 21H
CLR 20H
LCALL AACEE ;L-CH
RET
BB45B: CJNE A,#12h,BB497 ;CENTER MODE 15h
CLR 04H
MOV A,17H
SWAP A
RR A
ANL A,#07H
JZ BB469
CJNE A,#01H,BB497
BB469: MOV A,17H
ANL A,#03H
INC A
ANL A,#03H
bb474: JNZ BB47C
ANL 17H,#0FCH ;NORMAL
BB475: MOV DPTR,#0000H
lCALL AA05F
LJMP AA7C9
BB47C: CJNE A,#01H,BB487 ;WIDE
ANL 17H,#0FCH
ORL 17H,#01H
SJMP BB475
BB487: CJNE A,#02H,BB492 ;phton
BB488: ANL 17H,#0FCH
ORL 17H,#02H
SJMP BB475
BB492: ANL 17H,#0FCH
SJMP BB475
BB497: CJNE A,#07H,BB4BC ;SPEAK A,B REMOUTE KEY 18h
CLR 04H
MOV A,18H
MOV C,0E4H
MOV 0E1H,C
MOV C,0E3H
MOV 0E0H,C
ANL A,#03H
INC A
ANL A,#03H
MOV C,0E0H
MOV 0E3H,C
MOV C,0E1H
MOV 0E4H,C
ANL A,#18H
ANL 18H,#0E7H
ORL A,18H
MOV 18H,A
LJMP AA7C9
BB4BC: CJNE A,#19H,BB4F0 ;PROTECT
BB4BF: CLR 0AFH
SETB 86H
CLR 81H
CLR 82H
BB4C7: MOV R0,#04H
BB4C9: PUSH 00H
CPL 95H
LCALL AABD7
LCALL AAE6B
CPL 95H
LCALL AAD48
LCALL AA85C
LCALL AAE6B
POP 00H
DJNZ R0,BB4C9
JNB 87H,BB4C7
SETB 0AFH
CLR 95H
CLR 86H
LCALL AA7C9
CLR 01H
RET
BB4F0: CJNE A,#1AH,BB4FB ;VOLUM +
SETB 0B1H
LCALL AAE79
CLR 0B1H
RET
BB4FB: CJNE A,#1BH,BB506 ;VOLUM -
SETB 0B0H
LCALL AAE79
CLR 0B0H
RET
BB506: LJMP AA7C9
BB508: ORL 87H,#01H
SJMP BB508
AA50D: CLR 0AFH
PUSH 0E0H
PUSH 0D0H
PUSH 00H
PUSH 01H
PUSH 06H
PUSH 07H
ACALL AA52C
POP 07H
POP 06H
POP 01H
POP 00H
POP 0D0H
POP 0E0H
SETB 0AFH
RETI
AA52C: ACALL AA5F1
CJNE A,#0FFH,BB532
RET
BB532: JZ BB53F
BB535: ACALL AA5DF
JB 10H,BB53F
ACALL AA5F1
CJNE A,#0FFH,BB540
BB53F: RET
BB540: JNZ BB53F
BB543: ACALL AA5DF
JB 10H,BB53F
ACALL AA5F1
CJNE A,#0FFH,BB54E
RET
BB54E: JZ BB53F
BB551: ACALL AA5DF
JB 10H,BB53F
ACALL AA5F1
CJNE A,#0FFH,BB55C
RET
BB55C: MOV R0,#08H
BB55D: ACALL AA5DF
JB 10H,BB53F
ACALL AA5F1
CJNE A,#0FFH,BB567
RET
BB567: MOV C,0E0H
MOV 0FH,C
MOV A,21H
RL A
MOV 21H,A
DJNZ R0,BB55D
; ACALL AA5DF
; JB 10H,BB53F
; ACALL AA5F1
; CJNE A,#0FFH,BB576
; RET
;BB576: MOV C,0E0H
; MOV 0EH,C
; ACALL AA5DF
; JB 10H,BB53F
; ACALL AA5F1
; CJNE A,#0FFH,BB585
; RET
;BB585: MOV C,0E0H
; MOV 0DH,C
; ACALL AA5DF
; JB 10H,BB53F
; ACALL AA5F1
; CJNE A,#0FFH,BB594
; RET
;BB594: MOV C,0E0H
; MOV 0CH,C
; ACALL AA5DF
; JB 10H,BB53F
; ACALL AA5F1
; CJNE A,#0FFH,BB5A3
; RET
;BB5A3: MOV C,0E0H
; MOV 0BH,C
; ACALL AA5DF
; JB 10H,BB5B1
; ACALL AA5F1
; CJNE A,#0FFH,BB5B2
;BB5B1: RET
;BB5B2: MOV C,0E0H
; MOV 0AH,C
; ACALL AA5DF
; JB 10H,BB5B1
; ACALL AA5F1
; CJNE A,#0FFH,BB5C1
; RET
;BB5C1: MOV C,0E0H
; MOV 09H,C
; ACALL AA5DF
; JB 10H,BB5B1
; ACALL AA5F1
; CJNE A,#0FFH,BB5D0
; RET
;BB5D0: MOV C,0E0H
; MOV 08H,C
JB 11H,BB5DA
SETB 11H
RET
BB5DA: SETB 03H
CLR 11H
RET
AA5DF: PUSH 00H
MOV R0,#00H
BB5E3: JNB 0B2H,BB5EC
DJNZ R0,BB5E3
SETB 10H
SJMP BB5EE
BB5EC: CLR 10H
BB5EE: POP 00H
RET
AA5F1: MOV A,#00H
BB5F3: INC A
JNB 0B2H,BB5F3
MOV 13H,A
CLR C
SUBB A,#20H
JC BB612
CLR C
MOV A,13H
SUBB A,#9DH
JNC BB612
CLR C
MOV A,13H
SUBB A,#4AH
JC BB60F
MOV A,#01H
RET
BB60F: MOV A,#00H
RET
BB612: MOV A,#0FFH
RET
AA615: anl 35h,#00h
anl 33h,#0feh
anl 3eh,#03h
anl 37h,#0feh
MOV A,0AH
CJNE A,#06H,BB616 ;TAPE2
LCALL AAD48
ORL 33H,#02H
ORL 34H,#12H
ORL 35H,#0EEH
ORL 36H,#00H
ORL 37H,#0E6H
ORL 38H,#00H
ORL 39H,#0F2H
ORL 3AH,#00H
ORL 3BH,#0B6H
ORL 3CH,#00H
clr 54h
SETB 83H
CLR 84H
SETB 85H
ANL 31H,#07H
ANL 35H,#0FEH
RET
BB616: CJNE A,#05H,BB639 ;AUX
LCALL AAD48
ORL 35H,#0eeh;0DCH
MOV 36H,#00h;01H
ORL 37H,#7ch;0F8H
MOV 38H,#00H
ORL 39H,#00H
MOV 3AH,#2dh;5AH
SETB 85H
CLR 84H
CLR 83H
clr 54h
ANL 31H,#07H
ANL 35H,#0FEH
RET
BB639: CJNE A,#04H,BB658 ;LD
LCALL AAD48
ORL 35H,#70h;0E0H
MOV 36H,#00H
ORL 37H,#1eh;3CH
MOV 38H,#12h;24H
SETB 83H
SETB 84H
SETB 85H
clr 54h
ANL 31H,#07H
ORL 31H,#28H
ANL 35H,#0FEH
RET
BB658: CJNE A,#03H,BB677 ;VCD AV
LCALL AAD48
ORL 35H,#60H;0eeh;0DCH
MOV 36H,#24H;00h;01H
ORL 37H,#72H;60h;0C0H
MOV 38H,#00H;24h;48H
ORL 39H,#1EH
ORL 3AH,#12H
CLR 83H
SETB 84H
CLR 85H
clr 54h
ANL 31H,#07H
ORL 31H,#18H
ANL 35H,#0FEH
RET
BB677: JNZ BB69E
LCALL AAD48 ;TAPE1
ORL 33H,#02h;04H
MOV 34H,#12h;24H
ORL 35H,#0eeh;0DCH
MOV 36H,#00h;01H
ORL 37H,#0e6h;0CCH
MOV 38H,#00h;01H
ORL 39H,#0f2h;0E4H
MOV 3AH,#00h;01H
ORL 3BH,#00H
ORL 3CH,#12H
CLR 83H
CLR 84H
CLR 85H
clr 54h
ANL 31H,#07H
ANL 35H,#0FEH
RET
BB69E: CJNE A,#01H,BB6BA ;CD
LCALL AAD48
ORL 35H,#72h;0E4H
MOV 36H,#00H
ORL 37H,#1eh;3CH
MOV 38H,#12h;24H
CLR 83H
SETB 84H
SETB 85H
clr 54h
ANL 31H,#07H
ANL 35H,#0FEH
RET
BB6BA: ;TUNER
setb 54h
anl 31h,#07h
lcall aa0bc
jz bb6e2
orl 31h,#80h
anl 3eh,#0f7h
orl 3eh,#04h ;mhz
ajmp bb6e3
bb6e2: orl 31h,#40h
anl 3eh,#0fbh ;khz
orl 3eh,#08h
bb6e3: LCALL send
LCALL PPP2
orl 35h,#01h
mov a,17h
anl a,#08h
jz bb6e4a
orl 37h,#01h ;stero
ajmp bb6e4b
bb6e4a: anl 37h,#0feh
bb6e4b: mov a,17h
anl a,#10h
cjne a,#10h,bb6e4c
orl 33h,#01h
ret
bb6e4c:;anl 33h,#0feh
BB6E4: RET
AA6E5: JB 16H,BB6ED
MOV A,1CH
CJNE A,#02H,BB6E4
BB6ED: CLR 16H
MOV A,1BH
MOV 0BH,A
LCALL AACB8
anl 3eh,#0fdh
ANL 40H,#0fbh;0E6H
JB 13H,BB72D
ORL 40h,#04h;#10H
BB72D: RET
AA72E: MOV A,18H
MOV C,0E4H
MOV 0E1H,C
MOV C,0E3H
MOV 0E0H,C
ANL A,#03H
JNZ BB744
ANL 31H,#0F9H
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -