标题: 51单片机 汇编编写1602 显示名字 学号 并能移动闪烁灯功能 [打印本页]

---

作者: l1016332149    时间: 2016-10-27 16:02
标题: 51单片机 汇编编写1602 显示名字 学号 并能移动闪烁灯功能
   本人也是新手  你们把东西下载就能用 简单易懂

QQ图片20161027160005.png (35.66 KB, 下载次数: 54)

下载附件

2016-10-27 16:00 上传

专周.zip

2016-10-27 16:01 上传

点击文件名下载附件

下载积分: 黑币 -5

40.07 KB, 下载次数: 19, 下载积分: 黑币 -5

---

作者: admin    时间: 2016-11-13 20:56

1. RS  BIT P3.5             ;定义RS为P2.0
   
2. RW  BIT P3.6             ;定义RW为P2.1
   
3. E   BIT P3.7              ;定义E为P2.2
   
4. ORG 0000H
   
5. SJMP START
   
6. ORG  0030H
   
7. START:
   
8. MOV 70H,#06H
   
9. MOV 71H,#0C0H
   
10. MOV 72H,#80H
    
11. MOV 75H,#06H
    
12. LCALL LCDINIT
    
13.    MAIN:        MOV 68H,#03H
    
14.                 MOV 55H,#01H
    
15.                 MOV 61H,#00H
    
16.                 MOV A,#01H      ;清屏
    
17.                 MOV R1,#00H
    
18.         LCALL BUSY
    
19.         LCALL WRTC
    
20. 
    
21.         LCALL MINGXIAN
    
22. 
    
23. 
    
24. 
    
25.         MOV R3, #0C0H
    
26.         MOV SP,#40H
    
27.         MOV 57H,#00H
    
28. MAIN1:
    
29. 
    
30.     CHU:MOV A,  P1
    
31.         CJNE A,#0FFH,SB
    
32.         LJMP CHU
    
33.         SB: MOV 34H, A
    
34.           MOV DPTR ,#KEYTAB
    
35.           MOV R4,#0FFH
    
36. 
    
37.       LP:INC R4
    
38.          CLR A
    
39.          MOVC A,@A+DPTR
    
40.          INC DPTR
    
41.          CJNE A ,34H,LP
    
42.          KDL:MOV A,P1
    
43.              CJNE A,#0FFH,KDL
    
44.             INC R4
    
45.            MOV 35H,R4
    
46.            MOV A,35H
    
47.            MOV DPTR,#KEYTAB1
    
48.      ADCA:MOV R1,#00H
    
49.           MOV A,R1
    
50.         MOVC A,@A+DPTR
    
51.          INC DPTR
    
52.          DJNZ R4,ADCA
    
53. 
    
54.            MOV 35H,A
    
55. 
    
56. 
    
57. 
    
58. 
    
59.                 MOV A,R3    ;显示开及光标设置
    
60.         LCALL BUSY
    
61.         LCALL WRTC
    
62. 
    
63.         MOV A,35H
    
64.         CJNE A,#41H,XHSR
    
65.         LJMP STOP
    
66.    XHSR:SETB RS
    
67.          CLR  RW
    
68.          CLR  E
    
69.          MOV  P2,A
    
70. 
    
71.          SETB E
    
72. 
    
73.          CLR E
    
74. 
    
75. 
    
76.          CLR E
    
77.          INC R3
    
78.           PUSH ACC
    
79.           INC 57H
    
80.         LJMP MAIN1
    
81.     STOP:SJMP ZZA
    
82. ZZA:
    
83.     MOV A,70H
    
84.     CJNE A,75H,JKL
    
85.     LCALL LCDINIT
    
86.     JKL:
    
87.     MOV R3,#80H
    
88.       MOV 66H,68H
    
89.     MOV 61H,#0FH
    
90. 
    
91. MAIN2:
    
92. 
    
93.         MOV A,P1
    
94.         CJNE A,#0E7H,QWER
    
95.          ASD:MOV A,P1
    
96.          CJNE A,#0FFH,ASD
    
97.         LCALL ASDF
    
98.          
    
99. QWER:        MOV A,72H      ;显示开及光标设置
    
100.         LCALL BUSY
     
101.         LCALL WRTC
     
102. 
     
103.       MOV  R2,#0FH
     
104.        LCALL XUANZHE
     
105. 
     
106.         LCALL DELAY
     
107.         LCALL WRTD
     
108.           MOV A,66H
     
109.           CJNE A,#01H,OP9
     
110.           SJMP OP8
     
111.          OP9:
     
112.          LCALL XUEHAO
     
113.          MOV 67H,68H  
     
114.          ;********设置程序*******;
     
115.         OP8:
     
116.         MOV A,P1
     
117.         CJNE A,#0EBH,TYU1
     
118.         RTY:
     
119.         MOV A,P1
     
120.         CJNE A,#0FFH,RTY
     
121.          LCALL BNM
     
122. 
     
123.          MOV 55H,R4
     
124. 
     
125. 
     
126.        TYU1:
     
127.        MOV A,P1
     
128.        CJNE A,#77H,TYU3
     
129.         RTY5:MOV A,P1
     
130.         CJNE A,#0FFH,RTY5
     
131.         LCALL BNM
     
132.         MOV 68H,R4
     
133.       
     
134.        TYU3:MOV R6,55H
     
135.         TYU:        LCALL DELAY
     
136. 
     
137.                  DJNZ R6,TYU
     
138. 
     
139. 
     
140. 
     
141.          INC R3
     
142. 
     
143.           DEC 61H
     
144.             
     
145.          ;********数字**********
     
146.           DJNZ 66H,RFV
     
147.          LCALL SHANSUO
     
148.          MOV 66H,#01H
     
149.          DJNZ 67H,RFV
     
150.           MOV 66H,68H
     
151.         
     
152.           RFV:CJNE R3,#0A1H,MAIN2
     
153. 
     
154. 
     
155.        LJMP ZZA
     
156. 
     
157. 
     
158. 
     
159. 
     
160. 
     
161. ;***************初始化*****************
     
162. LCDINIT:
     
163.         LCALL  DELAY     ;延时15ms
     
164.         LCALL  DELAY
     
165.         LCALL  DELAY
     
166.         MOV  A,#38H      ;显示模式设置(8位数据线，16*2 5*7点阵)
     
167.         LCALL WRTC
     
168.         LCALL DELAY      ;延时5ms
     
169. 
     
170.         MOV  A,#38H
     
171.         LCALL WRTC
     
172.         LCALL DELAY      ;延时5ms
     
173. 
     
174.         MOV  A,#38H
     
175.         LCALL WRTC
     
176.         LCALL DELAY      ;延时5ms
     
177. 
     
178.         MOV  A,#38H
     
179.         LCALL BUSY
     
180.         LCALL WRTC
     
181.         MOV  A,#08H
     
182.         LCALL BUSY
     
183.         LCALL WRTC
     
184. 
     
185.         MOV A,#01H      ;清屏
     
186.         LCALL BUSY
     
187.         LCALL WRTC
     
188. 
     
189. 
     
190.         MOV  A,70H     ;显示光标移动设置
     
191.         LCALL BUSY
     
192.         LCALL WRTC
     
193. 
     
194.         MOV A,#0CH      ;示开关控制,显示开，无光标，不闪烁。
     
195.         LCALL BUSY
     
196.         LCALL WRTC
     
197. 
     
198.                 MOV    A,#40H ;写CGRAM地址.
     
199.                 LCALL BUSY
     
200.         LCALL   WRTC
     
201. 
     
202.         MOV A ,75H
     
203.         CJNE A,#06H,IOO
     
204.         MOV 75H,#04H
     
205.         SJMP IOOP
     
206.         IOO:MOV 75H,#06H
     
207.         IOOP:RET
     
208. 
     
209. ;***************写命令子程序*****************
     
210. WRTC:
     
211.       CLR RS
     
212.       CLR RW
     
213.       CLR E
     
214.       MOV P2,A
     
215. 
     
216.           SETB E
     
217. 
     
218.       CLR E
     
219.       RET
     
220. ;*****************写数据子程序***************
     
221. WRTD:    MOV R1,61H
     
222. AGAIN:   MOV A,R1
     
223.          MOVC A,@A+DPTR
     
224.          SETB RS
     
225.          CLR  RW
     
226.          CLR  E
     
227.          MOV  P2,A
     
228. 
     
229.          SETB E
     
230. 
     
231.          CLR E
     
232. 
     
233.          INC  R1
     
234.          MOV  A,R1
     
235.          MOV  B,R2 ; 数据写完没有.
     
236.          CJNE A,B,AGAIN
     
237.          RET
     
238.      
     
239. 
     
240. 
     
241. ;*****************判忙子程序******************
     
242. BUSY:
     
243.         MOV 50H,A
     
244.         CLR  RS
     
245.         SETB RW
     
246. TT0:    SETB E
     
247.         MOV A,P2
     
248.         CLR E
     
249.         ANL A,#80H
     
250.         JNZ TT0
     
251.        MOV A,50H
     
252.         RET
     
253. 
     
254.   ;***************************************************
     
255. SHANSUO:
     
256.         
     
257.                 MOV A,71H      ;显示开及光标设置
     
258.         LCALL BUSY
     
259.         LCALL WRTC
     
260.       MOV  R2,#0FH
     
261.         MOV  DPTR,#TAB
     
262.            
     
263.         LCALL DELAY
     
264.         MOV R1,#00H
     
265.         MOV A,R1
     
266.         MOVC A,@A+DPTR
     
267.          SETB RS
     
268.          CLR  RW
     
269.          CLR  E
     
270.          MOV  P2,A
     
271. 
     
272.          SETB E
     
273. 
     
274.          CLR E
     
275. 
     
276.          INC  R1
     
277.          MOV  A,R1
     
278.          MOV  B,R2 ; 数据写完没有.
     
279.          CJNE A,B,AGAIN
     
280.          RET
     
281.          ;*************************************************
     
282. ASDF:
     
283.         MOV A,P1
     
284.          CJNE A,#0FFH,ASDF1
     
285.           SJMP ASDF
     
286.           ASDF1:
     
287.               CJNE A,#0D7H,ZX
     
288.                
     
289.                 MOV 70H,#04H
     
290.                 MOV 71H,#0CFH
     
291.                 MOV 72H,#8FH
     
292.                 SJMP ZX1
     
293.                 ZX:
     
294.                 MOV 70H,#06H
     
295.                 MOV 71H,#0C0H
     
296.                 MOV 72H,#80H
     
297.                  
     
298.                 ZX1:LJMP ZZA
     
299.               
     
300. ;********************************************               
     
301. BNM:     MOV A ,P1
     
302.          CJNE A,#0FFH,BNM1
     
303.          SJMP BNM
     
304.           BNM1:
     
305.           MOV 34H, A
     
306.           MOV DPTR ,#KEYTAB
     
307.           MOV R4,#0FFH
     
308. 
     
309.       LP5:INC R4
     
310.          CLR A
     
311.          MOVC A,@A+DPTR
     
312.          INC DPTR
     
313.          CJNE A ,34H,LP5
     
314.          KDL1:MOV A,P1
     
315.              CJNE A,#0FFH,KDL1
     
316.              INC R4
     
317.              RET
     
318.     ;*************************************************
     
319.   MINGXIAN:
     
320.           MOV A,#80H      ;显示开及光标设置
     
321.         LCALL BUSY
     
322.         LCALL WRTC
     
323. 
     
324.         MOV  R2,#0DH
     
325.         MOV  DPTR,#TAB4
     
326.         LCALL DELAY
     
327.        FGHJ: MOV A,R1
     
328.          MOVC A,@A+DPTR
     
329.          SETB RS
     
330.          CLR  RW
     
331.          CLR  E
     
332.          MOV  P2,A
     
333. 
     
334.          SETB E
     
335. 
     
336.          CLR E
     
337. 
     
338. 
     
339.          INC  R1
     
340.          MOV  A,R1
     
341.          MOV  B,R2 ; 数据写完没有.
     
342.          CJNE A,B,FGHJ
     
343. 
     
344. 
     
345.         RET
     
346.   ;*********延时******* *************************
     
347. DELAY:  MOV R5,#10
     
348. D1:     MOV R7,#250
     
349.         DJNZ R7,$
     
350.         DJNZ R5,D1
     
351.        RET
     
352.   ;*********************************
     
353.   XUEHAO:
     
354.         MOV A,71H      ;显示开及光标设置
     
355.         LCALL BUSY
     
356.         LCALL WRTC
     
357.         MOV 59H,57H
     
358.         MOV R1,#41H
     
359.         LCALL QAZ
     
360.           OP5:
     
361.           MOV A,@R1
     
362. 
     
363.          SETB RS
     
364.          CLR  RW
     
365.          CLR  E
     
366.          MOV  P2,A
     
367. 
     
368.          SETB E
     
369. 
     
370.          CLR E
     
371.          MOV A,70H
     
372.          CJNE A,#04H,WSX
     
373.          DEC R1
     
374.          SJMP WSX1
     
375.          WSX:INC R1
     
376.          
     
377.          WSX1:DJNZ 59H,OP5
     
378.          RET
     
379. ;*********************************************************
     
380.    XUANZHE:
     
381.        MOV A,70H
     
382.        CJNE A,#04H,CVB
     
383.        MOV DPTR,#TAB6
     
384.        SJMP VB
     
385.        CVB:MOV DPTR,#TAB5
     
386.        VB:RET
     
387. ;***********************************************************
     
388.      KEYTAB:
     
389.             DB 7EH,0BEH,0DEH,0EEH
     
390.             DB 7DH,0BDH,0DDH,0EDH
     
391.             DB 7BH,0BBH,0DBH,0EBH
     
392.             DB 77H,0B7H,0D7H,0E7H
     
393.       KEYTAB1:
     
394.       DB 30H,31H,32H,33H
     
395.       DB 34H,35H,36H,37H
     
396.       DB 38H,39H,41H,42H
     
397.       DB 43H,44,45H ,46H
     
398.   TAB6:
     
399.       DB "  GNIP GNEHC IL                    "
     
400. TAB5:    DB "  LI CHENG PING "
     
401. TAB:     DB "                "
     
402. 
     
403. TAB4:    DB "LI CHENG PING"
     
404. ;*********************************** *****************
     
405. 
     
406. QAZ:
     
407.      MOV A,70H
     
408.     CJNE A,#04H,QAZ1
     
409.       MOV A,57H
     
410.       ADD A,#40H
     
411.       MOV R1,A
     
412.     QAZ1:RET
     
413.     ;*********************************
     
414.    END
     
415. *
     

复制代码

---

欢迎光临 (http://www.51hei.com/bbs/)

Powered by Discuz! X3.1