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

📄 bh1415.asm

📁 本程序经过本人测试通过。BH1415F添加液晶显示1602屏
💻 ASM
📖 第 1 页 / 共 2 页
字号:
; ==============================================
;====Power Disassembler for MCS-51 and 6502====
;==============================================
;   Writen by: 覃远高
;   Copyright: 覃远高
;      E-mail: qinyg@163.net
;         Tel: 0755-2282553
; Last Update: 20.Aug,1999
;==============================================
;===========Disassemble information============
;==============================================
;    File Name: D:\My Documents\Desktop\BH1415.Bin
;         Type: MCS-51反编译器
;         Date: 2009-3-31
;==============================================
;==============================================
Q0000:             LJMP  Q066D
;===========================================
Q0003:             NOP
                   NOP
                   NOP
                   NOP
                   NOP
                   NOP
                   NOP
                   NOP
Q000B:             LJMP  Q062A
;===========================================
Q000E:             MOV   A,0BH
                   JZ    Q003E
                   MOV   A,0BH
                   CJNE  A,#01H,Q001E
                   MOV   C,20H.0
                   MOV   20H.1,C
Q001B:             LCALL Q01D1
Q001E:             MOV   A,0BH
                   CJNE  A,#02H,Q002A
Q0023:             MOV   C,20H.0
                   MOV   20H.1,C
                   LCALL Q0492
Q002A:             MOV   A,0AH
                   SETB  C
                   SUBB  A,#64H
                   JC    Q003E
                   CLR   A
                   MOV   0BH,A
                   SETB  20H.1
                   LCALL Q01D1
                   SETB  20H.1
                   LCALL Q0492
Q003E:             RET
;===========================================
Q003F:		DB 00H,00H,00H,00H,00H,00H,00H	;.......
;===========================================
Q0046:             MOV   A,0CH
                   ADD   A,#FEH
                   JZ    Q007A
                   DEC   A
                   JZ    Q0098
                   DEC   A
                   JNZ   Q0055
                   LJMP  Q00D9
;===========================================
Q0055:             ADD   A,#E5H
                   JNZ   Q005C
                   LJMP  Q0123
;===========================================
Q005C:             ADD   A,#F6H
                   JNZ   Q0063
                   LJMP  Q017C
;===========================================
Q0063:             ADD   A,#28H
                   JZ    Q006A
                   LJMP  Q01D0
;===========================================
Q006A:             JNB   P1.7,Q0072
                   LCALL Q03CE
                   SJMP  Q0094
Q0072:             CLR   A
                   MOV   0BH,A
                   LCALL Q0643
                   SJMP  Q0094
Q007A:             JNB   P1.7,Q0080
                   LJMP  Q01D0
;===========================================
Q0080:             INC   0BH
                   SETB  20H.1
                   LCALL Q01D1
                   SETB  20H.1
                   LCALL Q0492
                   MOV   A,0BH
                   CJNE  A,#03H,Q0094
                   CLR   A
                   MOV   0BH,A
Q0094:             CLR   A
                   MOV   0CH,A
                   RET
;===========================================
Q0098:             JNB   P1.7,Q009E
                   LJMP  Q01D0
;===========================================
Q009E:             MOV   A,0BH
                   CJNE  A,#01H,Q00C2
                   INC   09H
                   MOV   A,09H
                   JNZ   Q00AB
                   INC   08H
Q00AB:             SETB  C
                   SUBB  A,#DCH
                   MOV   A,08H
                   SUBB  A,#05H
                   JC    Q00BA
                   MOV   08H,#01H
                   MOV   09H,#F4H
Q00BA:             SETB  20H.1
                   LCALL Q01D1
                   LCALL Q04FF
Q00C2:             MOV   A,0BH
                   CJNE  A,#02H,Q00D7
                   MOV   A,0DH
                   JZ    Q00CD
                   DEC   0DH
Q00CD:             SETB  20H.1
                   LCALL Q0492
                   MOV   R7,0DH
                   LCALL Q0454
Q00D7:             SJMP  Q011D
Q00D9:             JNB   P1.7,Q00DF
                   LJMP  Q01D0
;===========================================
Q00DF:             MOV   A,0BH
                   CJNE  A,#01H,Q0105
                   MOV   A,09H
                   DEC   09H
                   JNZ   Q00EC
                   DEC   08H
Q00EC:             CLR   C
                   MOV   A,09H
                   SUBB  A,#F4H
                   MOV   A,08H
                   SUBB  A,#01H
                   JNC   Q00FD
                   MOV   08H,#05H
                   MOV   09H,#DCH
Q00FD:             SETB  20H.1
                   LCALL Q01D1
                   LCALL Q04FF
Q0105:             MOV   A,0BH
                   CJNE  A,#02H,Q011D
                   MOV   A,0DH
                   CLR   C
                   SUBB  A,#53H
                   JNC   Q0113
                   INC   0DH
Q0113:             SETB  20H.1
                   LCALL Q0492
                   MOV   R7,0DH
                   LCALL Q0454
Q011D:             CLR   A
                   MOV   0CH,A
                   LJMP  Q01CD
;===========================================
Q0123:             JNB   P1.7,Q0129
                   LJMP  Q01D0
;===========================================
Q0129:             MOV   A,0BH
                   CJNE  A,#01H,Q0152
                   MOV   A,#0AH
                   ADD   A,09H
                   MOV   09H,A
                   CLR   A
                   ADDC  A,08H
                   MOV   08H,A
                   SETB  C
                   MOV   A,09H
                   SUBB  A,#DCH
                   MOV   A,08H
                   SUBB  A,#05H
                   JC    Q014A
                   MOV   08H,#01H
                   MOV   09H,#F4H
Q014A:             SETB  20H.1
                   LCALL Q01D1
                   LCALL Q04FF
Q0152:             MOV   A,0BH
                   CJNE  A,#02H,Q0173
                   MOV   A,0DH
                   SETB  C
                   SUBB  A,#04H
                   JC    Q0166
                   MOV   A,#FBH
                   ADD   A,0DH
                   MOV   0DH,A
                   SJMP  Q0169
Q0166:             CLR   A
                   MOV   0DH,A
Q0169:             SETB  20H.1
                   LCALL Q0492
                   MOV   R7,0DH
                   LCALL Q0454
Q0173:             MOV   R7,#58H
                   MOV   R6,#02H
                   LCALL Q0582
                   SJMP  Q01CD
Q017C:             JB    P1.7,Q01D0
                   MOV   A,0BH
                   CJNE  A,#01H,Q01A9
                   MOV   A,#F6H
                   ADD   A,09H
                   MOV   09H,A
                   MOV   A,#FFH
                   ADDC  A,08H
                   MOV   08H,A
                   CLR   C
                   MOV   A,09H
                   SUBB  A,#F4H
                   MOV   A,08H
                   SUBB  A,#01H
                   JNC   Q01A1
                   MOV   08H,#05H
                   MOV   09H,#DCH
Q01A1:             SETB  20H.1
                   LCALL Q01D1
                   LCALL Q04FF
Q01A9:             MOV   A,0BH
                   CJNE  A,#02H,Q01C6
                   MOV   A,#05H
                   ADD   A,0DH
                   MOV   0DH,A
                   SETB  C
                   SUBB  A,#53H
                   JC    Q01BC
                   MOV   0DH,#53H
Q01BC:             SETB  20H.1
                   LCALL Q0492
                   MOV   R7,0DH
                   LCALL Q0454
Q01C6:             MOV   R7,#58H
                   MOV   R6,#02H
                   LCALL Q0582
Q01CD:             LCALL Q05F4
Q01D0:             RET
;===========================================
Q01D1:             MOV   R3,09H
                   MOV   R2,08H
                   JNB   20H.1,Q022A
                   MOV   R7,#C5H
                   LCALL Q060F
                   LCALL Q04C9
                   MOV   R4,#00H
                   MOV   R5,#0AH
                   MOV   R7,03H
                   MOV   R6,02H
                   LCALL Q02D7
                   MOV   R2,06H
                   MOV   R3,07H
                   MOV   R7,#C3H
                   LCALL Q060F
                   LCALL Q04C9
                   MOV   R4,#00H
                   MOV   R5,#0AH
                   MOV   R7,03H
                   MOV   R6,02H
                   LCALL Q02D7
                   MOV   R2,06H
                   MOV   R3,07H
                   MOV   R7,#C2H
                   LCALL Q060F
                   LCALL Q04C9
                   MOV   R7,#C1H
                   LCALL Q060F
                   MOV   R6,02H
                   MOV   R7,03H
                   MOV   R4,#00H
                   MOV   R5,#0AH
                   LCALL Q02D7
                   MOV   A,R7
                   ORL   A,R6
                   JZ    Q0226
                   MOV   R7,#31H
                   SJMP  Q0245
Q0226:             MOV   R7,#20H
                   SJMP  Q0245
Q022A:             MOV   R7,#C1H
                   LCALL Q060F
                   MOV   R7,#20H
                   LCALL Q04D8
                   MOV   R7,#20H
                   LCALL Q04D8
                   MOV   R7,#20H
                   LCALL Q04D8
                   MOV   R7,#C5H
                   LCALL Q060F
                   MOV   R7,#20H
Q0245:             LCALL Q04D8
                   RET
;===========================================
Q0249:             MOV   R3,#FAH
                   CLR   P3.7
                   SETB  P1.0
                   SETB  P1.1
                   SETB  P1.2
                   SETB  P1.3
                   MOV   C,P1.1
                   ANL   C,P1.0
                   ANL   C,P1.2
                   ANL   C,P1.3
                   JNC   Q0263
                   CLR   A
                   MOV   0CH,A
                   RET
;===========================================
Q0263:             CLR   A
                   MOV   0AH,A
                   MOV   R7,#0AH
                   MOV   R6,A
                   LCALL Q0582
                   JB    P1.0,Q0276
                   JNB   P1.0,$
                   MOV   0CH,#01H
                   RET
;===========================================
Q0276:             JB    P1.1,Q0280
                   JNB   P1.1,$
                   MOV   0CH,#02H
                   RET
;===========================================
Q0280:             JB    P1.2,Q029F
                   MOV   A,0CH
                   JNZ   Q02BD
Q0287:             MOV   A,R3
                   JZ    Q029B
                   JNB   P1.2,Q0291
                   MOV   0CH,#03H
                   RET
;===========================================
Q0291:             MOV   R7,#03H
                   MOV   R6,#00H
                   LCALL Q0582
                   DEC   R3
                   SJMP  Q0287
Q029B:             MOV   0CH,#1FH
                   RET
;===========================================
Q029F:             JB    P1.3,Q02BD
                   MOV   A,0CH
                   JNZ   Q02BD
Q02A6:             MOV   A,R3
                   JZ    Q02BA
                   JNB   P1.3,Q02B0
                   MOV   0CH,#04H
                   RET
;===========================================
Q02B0:             MOV   R7,#03H
                   MOV   R6,#00H
                   LCALL Q0582
                   DEC   R3
                   SJMP  Q02A6
Q02BA:             MOV   0CH,#29H
Q02BD:             RET
;===========================================
Q02BE:             CJNE  R3,#01H,Q02C7
                   MOV   DPL,R1
                   MOV   DPH,R2
                   MOVX  A,@DPTR
                   RET
;===========================================
Q02C7:             JNC   Q02CB
                   MOV   A,@R1
                   RET
;===========================================
Q02CB:             CJNE  R3,#FEH,Q02D0
                   MOVX  A,@R1
                   RET
;===========================================
Q02D0:             MOV   DPL,R1
                   MOV   DPH,R2
                   CLR   A
                   MOVC  A,@A+DPTR
                   RET
;===========================================
Q02D7:             CJNE  R4,#00H,Q02E5
                   CJNE  R6,#00H,Q0306
                   MOV   A,R7
                   MOV   B,R5
                   DIV   AB
                   MOV   R7,A
                   MOV   R5,B
                   RET
;===========================================
Q02E5:             CLR   A
                   XCH   A,R4
                   MOV   R0,A
                   MOV   B,#08H
Q02EB:             MOV   A,R7
                   ADD   A,R7
                   MOV   R7,A
                   MOV   A,R6
                   RLC   A
                   MOV   R6,A
                   MOV   A,R4
                   RLC   A
                   MOV   R4,A
                   MOV   A,R6
                   SUBB  A,R5
                   MOV   A,R4
                   SUBB  A,R0
                   JC    Q02FF
                   MOV   R4,A
                   MOV   A,R6
                   SUBB  A,R5
                   MOV   R6,A
                   INC   R7
Q02FF:             DJNZ  B,Q02EB
                   CLR   A
                   XCH   A,R6
                   MOV   R5,A
                   RET
;===========================================
Q0306:             MOV   A,R5
                   MOV   R0,A
                   MOV   B,A
                   MOV   A,R6
                   DIV   AB
                   JB    OV,Q032B
                   MOV   R6,A
                   MOV   R5,B
                   MOV   B,#08H
Q0315:             MOV   A,R7
                   ADD   A,R7
                   MOV   R7,A
                   MOV   A,R5
                   RLC   A
                   MOV   R5,A
                   JC    Q0324
                   SUBB  A,R0
                   JNC   Q0326
                   DJNZ  B,Q0315
                   RET
;===========================================
Q0324:             CLR   C
                   SUBB  A,R0

⌨️ 快捷键说明

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