📄 七段显示0.lst
字号:
8051 Assembler Version 1.00 03/29/107 20:25:57 Page 1
E:\学习资料\单片机\拷贝给学生的资料\七段显示0\七段显示0.a51
1 0000 ORG 0000H
2 0000 020030 BEGIN: LJMP INIT
3 0003 ORG 0003H ;INT0
4 0003 32 RETI
5 000B ORG 000BH ;T0 INT
6 000B 32 RETI
7 0013 ORG 0013H ;1NT1
8 0013 32 RETI
9 001B ORG 001BH ;T1 INT
10 001B 32 RETI
11 0023 ORG 0023H ;S PORT INT
12 0023 32 RETI
13 002B ORG 002BH ;T2 INT
14 002B 32 RETI
15 0030 ORG 0030H
16 0030 ;=====================================================
17 0030 ;8032 RAM 00H--FFH CLEAR 0
18 0030 INIT:
19 0030 78FF MOV R0,#0FFH
20 0032 7400 MOV A, #00H
21 0034 CLE0FFH:
22 0034 F6 MOV @R0,A
23 0035 D8FD DJNZ R0,CLE0FFH
24 0037
25 0037 ;SET STACK AREA 70H--7FH
26 0037 758170 MOV SP,#70H
27 003A 75D000 MOV PSW,#00H
28 003D 759000 MOV P1,#00H
29 0040
30 0040 753003 MOV 30H,#3H
31 0043 753102 MOV 31H,#2H
32 0046 753201 MOV 32H,#1H
33 0049 753300 MOV 33H,#0H
34 004C 1200A7 LCALL TICHANG;DISPLAY CHARACTER CHANGE
35 004F
36 004F ;====================================================================
37 004F 00 ENTRK1: NOP
38 0050 120058 LCALL KEYSCAN;KEY SACN SUBRUTIN
39 0053 1200BA LCALL DISPLAY;DISPLAY SUBRUTIN
40 0056 80F7 SJMP ENTRK1
41 0058 ;====================================================================
42 0058 ;1. -----------------------------------------------------------------
43 0058 ;KEYSCAN:
44 0058 ; KEY SCAN SUBRUTIN
45 0058 ;
46 0058 ; 1. 8032 P1 PORT PIN DEFINITION
47 0058 ;
48 0058 ; P3.2== +1 KEY BIT
49 0058 ; P3.5== +1 KEY BIT
50 0058 ; P3.6== +1 KEY BIT
51 0058 ; P3.7== +1 KEY BIT
52 0058 ;
53 0058 ; 2. RAM BIT 00H --P3.2 PRESSED
54 0058 ; 01H --P3.5 PRESSED
55 0058 ; 02H --P3.6 PRESSED
56 0058 ; 03H --P3.7 PRESSED
57 0058 ;
8051 Assembler Version 1.00 03/29/107 20:25:57 Page 2
E:\学习资料\单片机\拷贝给学生的资料\七段显示0\七段显示0.a51
58 0058 ;--------------------------------------------------------------------
59 0058 00 KEYSCAN:NOP
60 0059
61 0059 20B211 JB P3.2,KEY1
62 005C 12010C LCALL DELAY60 ;DELAY 60mS
63 005F 20B20B JB P3.2,KEY1
64 0062 D200 SETB 00H
65 0064 C201 CLR 01H
66 0066 C202 CLR 02H
67 0068 C203 CLR 03H
68 006A 0200A6 LJMP KEYSOUT
69 006D
70 006D KEY1:
71 006D 20B711 JB P3.7,KEY2
72 0070 12010C LCALL DELAY60 ;DELAY 60mS
73 0073 20B70B JB P3.7,KEY2
74 0076 D201 SETB 01H
75 0078 C200 CLR 00H
76 007A C202 CLR 02H
77 007C C203 CLR 03H
78 007E 0200A6 LJMP KEYSOUT
79 0081
80 0081 KEY2:
81 0081 20B611 JB P3.6,KEY3
82 0084 12010C LCALL DELAY60 ;DELAY 60mS
83 0087 20B60B JB P3.6,KEY3
84 008A D202 SETB 02H
85 008C C200 CLR 00H
86 008E C201 CLR 01H
87 0090 C203 CLR 03H
88 0092 0200A6 LJMP KEYSOUT
89 0095
90 0095 KEY3:
91 0095 20B50E JB P3.5,KEYSOUT
92 0098 12010C LCALL DELAY60 ;DELAY 60mS
93 009B 20B508 JB P3.5,KEYSOUT
94 009E D203 SETB 03H
95 00A0 C200 CLR 00H
96 00A2 C201 CLR 01H
97 00A4 C202 CLR 02H
98 00A6
99 00A6 KEYSOUT:
100 00A6 22 RET
101 00A7 ;--------------------------------------------------------------------
102 00A7 ;2.------------------------------------------------------------------
103 00A7 ;TICHANG
104 00A7 ;--------------------------------------------------------------------
105 00A7 00 TICHANG:NOP
106 00A8 7F04 MOV R7,#4
107 00AA 786F MOV R0,#6FH
108 00AC 7933 MOV R1,#33H
109 00AE E7 TCHANG0:MOV A,@R1
110 00AF 12011C LCALL DCCHANG ;DISPLAY CHARACTER CHANGE
111 00B2 F4 CPL A
112 00B3 F6 MOV @R0,A
113 00B4 18 DEC R0
114 00B5 19 DEC R1
8051 Assembler Version 1.00 03/29/107 20:25:57 Page 3
E:\学习资料\单片机\拷贝给学生的资料\七段显示0\七段显示0.a51
115 00B6 DFF6 DJNZ R7,TCHANG0
116 00B8 00 TICHOUT:NOP
117 00B9 22 RET
118 00BA ;--------------------------------------------------------------------
119 00BA
120 00BA ;4.------------------------------------------------------------------
121 00BA ;DISPLAY:
122 00BA ; DISPLAY SUBRUTIN
123 00BA ;
124 00BA ; RAM:6FH CLOCK HORE 10 BIT
125 00BA ; 6EH CLOCK HORE 1 BIT
126 00BA ; 6DH CLOCK MIN 10 BIT
127 00BA ; 6CH CLOCK MIN 1 BIT
128 00BA ;
129 00BA ;--------------------------------------------------------------------
130 00BA 00 DISPLAY:NOP
131 00BB 300011 JNB 00H,DIS2
132 00BE 856F80 MOV P0,6FH
133 00C1 C290 CLR P1.0
134 00C3 12010C LCALL DELAY60 ;DELAY 60MS
135 00C6 12010C LCALL DELAY60 ;DELAY 60MS
136 00C9 C291 CLR P1.1
137 00CB C292 CLR P1.2
138 00CD C293 CLR P1.3
139 00CF DIS2:
140 00CF 300111 JNB 01H,DIS3
141 00D2 856E80 MOV P0,6EH
142 00D5 C291 CLR P1.1
143 00D7 12010C LCALL DELAY60 ;DELAY 60MS
144 00DA 12010C LCALL DELAY60 ;DELAY 60mS
145 00DD D290 SETB P1.0
146 00DF D292 SETB P1.2
147 00E1 D293 SETB P1.3
148 00E3 DIS3:
149 00E3 300211 JNB 02H,DIS4
150 00E6 856D80 MOV P0,6DH
151 00E9 C292 CLR P1.2
152 00EB 12010C LCALL DELAY60 ;DELAY 60MS
153 00EE 12010C LCALL DELAY60 ;DELAY 60MS
154 00F1 D290 SETB P1.0
155 00F3 D291 SETB P1.1
156 00F5 D293 SETB P1.3
157 00F7 DIS4:
158 00F7 300311 JNB 03H,DISOUT
159 00FA 856C80 MOV P0,6CH
160 00FD C293 CLR P1.3
161 00FF 12010C LCALL DELAY60 ;DELAY 60MS
162 0102 12010C LCALL DELAY60 ;DELAY 60MS
163 0105 D290 SETB P1.0
164 0107 D291 SETB P1.1
165 0109 D292 SETB P1.2
166 010B DISOUT:
167 010B 22 RET
168 010C ;--------------------------------------------------------------------
169 010C ;6.------------------------------------------------------------------
170 010C ;DELAY60:
171 010C ; DELAY 100mS FOR NEXT RANGING
8051 Assembler Version 1.00 03/29/107 20:25:57 Page 4
E:\学习资料\单片机\拷贝给学生的资料\七段显示0\七段显示0.a51
172 010C
173 010C ;--------------------------------------------------------------------
174 010C C0D0 DELAY60:PUSH PSW
175 010E 75D000 MOV PSW,#00H
176 0111 7B06 MOV R3,#6 ;#10 0.5ms * 10 = 5ms 1997-9-3
177 0113 7CFA W60MS: MOV R4,#0FAH ;0FAH =250
178 0115 DCFE W500US1:DJNZ R4,W500US1 ;TIME = 2US 2 US * 250 = 0.5 MS
179 0117 DBFA DJNZ R3,W60MS
180 0119 D0D0 POP PSW
181 011B 22 RET
182 011C ;-------------------------------------------------------------------
183 011C ;7.------------------------------------------------------------------
184 011C ;DCCHANG:
185 011C ; DISPLAY CHARACTERS CHANGE ROUTINE
186 011C ; NOTE:
187 011C ; 1. ENTRY A-----LOAD SETOFF
188 011C ; 2. RET A-------DISPLAY CHARACTER
189 011C ;--------------------------------------------------------------------
190 011C 900121 DCCHANG:MOV DPTR,#CHARAL
191 011F 93 MOVC A,@A+DPTR
192 0120 22 RET
193 0121 ;CHARACTERS LIST
194 0121 3F 06 5B CHARAL: DB 3FH,06H,5BH,4FH,66H,6DH
0124 4F 66 6D
195 0127 ;SETOFF : 00H,01H,02H,03H,04H,05H,
196 0127 ;CHARACTERS: 0, 1, 2, 3, 4 , 5
197 0127 7D 07 7F DB 7DH,07H,7FH,6FH,77H,7CH
012A 6F 77 7C
198 012D ; 06H,07H,08H,09H,0AH,0BH,
199 012D ; 6, 7, 8, 9, A, B,
200 012D 39 5E 79 DB 39H,5EH,79H,71H,73H,3EH
0130 71 73 3E
201 0133 ; 0CH,0DH,0EH,0FH,10H,11H,
202 0133 ; C, D, E, F, P, U,
203 0133 ;--------------------------------------------------------------------
204 0133
205 0133 ;====================================================================
206 0133 END
Defined Symbols:
Defined Labels:
BEGIN 000000 0
CHARAL 000121 289
CLE0FFH 000034 52
DCCHANG 00011C 284
DELAY60 00010C 268
DIS2 0000CF 207
DIS3 0000E3 227
DIS4 0000F7 247
DISOUT 00010B 267
DISPLAY 0000BA 186
ENTRK1 00004F 79
INIT 000030 48
KEY1 00006D 109
KEY2 000081 129
KEY3 000095 149
KEYSCAN 000058 88
KEYSOUT 0000A6 166
TCHANG0 0000AE 174
TICHANG 0000A7 167
TICHOUT 0000B8 184
W500US1 000115 277
W60MS 000113 275
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -