📄 dbled1.lst
字号:
页 1
03-07-02
16:30:39
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
;;;;;;;;;用DBLED1.PCB板测试程序
;
;P1.0-->RD
;P1.1-->CLK
;P1.2-->STR
;P1.3-->OE
;40H,41H-->大屏地址
;R0-->50H开始存数据
ORG 0000H
0000 2100 AJMP MAIN
ORG 0013H
0013 C2AA CLR EX1
0015 02016B LJMP INTER1
ORG 0023H
0023 C2AC CLR ES
0025 02018B LJMP COMM
ORG 0100H
0100 75A890 MAIN: MOV IE,#90H
0103 75B810 MOV IP,#10H
0106 C2D3 CLR RS0
0108 C2D4 CLR RS1
010A 758160 MOV SP,#60H
010D 759860 MOV SCON,#60H
0110 758921 MOV TMOD,#21H
0113 758804 MOV TCON,#04H
0116 20A00B JB P2.0,BPS96
0119 758BFA MOV TL1,#0FAH ;12M,0e6,#00,1200bps
011C 758DFA MOV TH1,#0FAH ;11.0592,0FD,#00,9600BPS 0FA,#80,9600BPS
011F 758780 MOV PCON,#80H ;11.0592,0E8,#00,1200BPS 0D0,#80,1200BPS
0122 8009 SJMP MAIN1
0124 758BD0 BPS96: MOV TL1,#0D0H ;4.433619M,0fe,#00,9600bps
0127 758DD0 MOV TH1,#0D0H ;4.433619M,0ed,#80,1200bps
012A 758780 MOV PCON,#80H
012D D28E MAIN1: SETB TR1
012F C2A9 CLR ET0
0131 D29C SETB REN
0133 D2AA SETB EX1
0135 D2AC SETB ES
0137 B292 CPL P1.2
0139 7850 MOV R0,#50H
013B 7909 MOV R1,#9
013D 760A QINGP0: MOV @R0,#10
013F 08 INC R0
0140 D9FB DJNZ R1,QINGP0
0142 513D ACALL ADDRESS
; CLR P1.3
; MOV 40H,#30H
D:\龚焕振\其它\地磅\DBLED1.ASM
页 2
03-07-02
16:30:39
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
; MOV 41H,#31H
;tt: jb p2.0,tt
; CLR EA
; mov dptr,#DATA1
; mov r3,#11
;tt1: clr a
; movc a,@a+dptr
; ACALL TRANPC
; inc dptr
; DJNZ r3,tt1
; setb EA
; sjmp tt
; LJMP B7
0144 755900 B1: mov 59H,#0
0147 756000 mov 60H,#0
014A 90028E MOV DPTR,#DATA1
014D 790A MOV R1,#10 ;10个字节
014F 7850 MOV R0,#50H
B3:
0151 E6 MOV A,@R0
0152 08 INC R0
0153 93 MOVC A,@A+DPTR
0154 7B08 MOV R3,#8 ;移位8
0156 13 B4: RRC A
0157 9290 MOV P1.0,C ;数据信号
0159 D291 SETB P1.1 ;时钟信号
015B B291 CPL P1.1
015D DBF7 DJNZ R3,B4
; INC DPTR
015F D9F0 DJNZ R1,B3
0161 D293 SETB P1.3 ;打开OE信号
0163 B292 CPL P1.2 ;STR信号
0165 B292 CPL P1.2
0167 C293 CLR P1.3 ;关闭OE信号
0169 80FE B7: SJMP B7 ;SJMP B7
INTER1:
016B C2AF CLR EA
016D B2B6 cpl p3.6
; MOV A,#0AAH
; ACALL TRANPC
016F D28E SETB TR1 ;make the time1 work
0171 D29C SETB REN ;enable receive
0173 D2AA SETB EX1
D:\龚焕振\其它\地磅\DBLED1.ASM
页 3
03-07-02
16:30:39
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
0175 D2AF SETB EA
0177 D083 POP DPH
0179 D082 POP DPL
017B 900144 MOV DPTR,#B1
017E C082 PUSH DPL
0180 C083 PUSH DPH
0182 32 RETI
TRANPC:
0183 F599 MOV SBUF,A ;transmitter the data in the rigister ACC
0185 3099FD JNB TI,$
0188 C299 CLR TI
018A 22 RET
018B C0E0 COMM: PUSH ACC
018D C2AF CLR EA
018F C293 CLR P1.3 ;OE信号
0191 7850 MOV R0,#50H
; ACALL RECEPTION ;receive the length of data
; JC RE
; CJNE A,40H,RE
0193 5121 ACALL RECEPTION ;receive the length of data
0195 4066 JC RE
0197 B46563 CJNE A,#65H,RE
019A 5121 ACALL RECEPTION ;receive the length of data
019C 405F JC RE
019E B5405C CJNE A,40H,RE
01A1 5121 ACALL RECEPTION ;receive the length of data
01A3 4058 JC RE
01A5 B54155 CJNE A,41H,RE
01A8 7902 MOV R1,#2
01AA 5121 RAM: ACALL RECEPTION ;receive the length of data
01AC 404F JC RE
01AE 9430 SUBB A,#30H
01B0 F6 MOV @R0,A
01B1 08 INC R0
01B2 D9F6 DJNZ R1,RAM
; sjmp RAMEND
01B4 7905 MOV R1,#5
01B6 5121 RAM1: ACALL RECEPTION ;receive the length of data
01B8 4043 JC RE
01BA B43007 CJNE A,#30H,RAM2
01BD 760A MOV @R0,#10
01BF 08 INC R0
01C0 D9F4 DJNZ R1,RAM1
01C2 8005 SJMP RAM3
D:\龚焕振\其它\地磅\DBLED1.ASM
页 4
03-07-02
16:30:39
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
01C4 9430 RAM2: SUBB A,#30H
01C6 F6 MOV @R0,A
01C7 08 INC R0
01C8 19 DEC R1
01C9 7401 RAM3: MOV A,#1
01CB 29 ADD A,R1
01CC F9 MOV R1,A
01CD 5121 RAM4: ACALL RECEPTION ;receive the length of data
01CF 402C JC RE
01D1 9430 SUBB A,#30H
01D3 F6 MOV @R0,A
01D4 08 INC R0
01D5 D9F6 DJNZ R1,RAM4
01D7 5121 RAM5: ACALL RECEPTION ;receive the length of data
01D9 4022 JC RE
01DB B43002 CJNE A,#30H,BLACK
01DE 760A MOV @R0,#10
01E0 B43102 BLACK: CJNE A,#31H,RED
01E3 760B MOV @R0,#11
01E5 B43202 RED: CJNE A,#32H,GREED
01E8 760C MOV @R0,#12
GREED:
01EA 08 INC R0
01EB 5121 ACALL RECEPTION ;receive the length of data
01ED 400E JC RE
01EF B4301D CJNE A,#30H,RAMEND
01F2 7850 MOV R0,#50H
01F4 7909 MOV R1,#9
01F6 760A QINGP1: MOV @R0,#10
01F8 08 INC R0
01F9 D9FB DJNZ R1,QINGP1
01FB 8012 SJMP RAMEND
RE:
01FD D0E0 POP ACC
01FF D083 POP DPH
0201 D082 POP DPL
0203 900169 MOV DPTR,#B7
0206 C082 PUSH DPL
0208 C083 PUSH DPH
020A D2AC SETB ES
020C D2AF SETB EA
020E 32 RETI
020F D0E0 RAMEND: POP ACC
0211 D083 POP DPH
0213 D082 POP DPL
0215 900144 MOV DPTR,#B1
D:\龚焕振\其它\地磅\DBLED1.ASM
页 5
03-07-02
16:30:39
伟福汇编器 V5.00 Copyright (c) 1989, 99 by CHY
地址 机器码 源程序
0218 C082 PUSH DPL
021A C083 PUSH DPH
021C D2AC SETB ES
021E D2AF SETB EA
0220 32 RETI
RECEPTION:
0221 C3 CLR C
0222 758C0A MOV TH0,#0AH
0225 758A0F MOV TL0,#0FH
0228 D28C SETB TR0
RECEWAIT:
022A 109809 JBC RI,RECEYES
022D 308DFA JNB TF0,RECEWAIT
0230 C28D CLR TF0
0232 C28C CLR TR0
0234 D3 SETB C
0235 22 RET
RECEYES:
0236 C28C CLR TR0
0238 E599 MOV A,SBUF
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -