51單片機匯編語言（二）

程序:JS06.ASM

01： START: MOV R0, #7 ；設左移7次

02： MOV A,#0FCH ；存入開始亮燈位置

03： LOOP: MOV P1, A ；傳送到P1并輸出

04： ACALL DELAY ；調延時子程序

05: RL A ；左移一位

06: DJNZ R0, LOOP ；判斷移動次數

07: MOV R1, #7 ；設右移7次

08: LOOP1: RR A ；右移一位

09: MOV P1, A ；傳送到P1并輸出

10: ACALL DELAY ；調延時子程序

11: DJNZ R1, LOOP1 ；判斷移動次數

12: MOV R2, #3 ；設置閃爍次數

13: MOV A, #00H ；設初始值

14: LOOP2: MOV P1, A ；P1端口燈亮

15: ACALL DELAY ；調用延時子程序

16: CPL A ；A取反值

17: DJNZ R2, LOOP2 ；判斷閃爍次數

18: JMP START ；重新設定顯示值

19: DELAY: MOV R5, #25

20: DLY1: MOV R6, #100

21: DLY2: MOV R7, #100

22: DJNZ R7, $

23: DJNZ R6, DLY2

24: DJNZ R5, DLY1

25: RET ；子程序返回

26: END ；程序結束

6.7功能說明

單片機端口接八只LED，編程時利用取表的方法，使端口P1做單一燈的變化：先向左移2次，然后向右移2次，再閃爍4次,不斷循環。

程序:JS07.ASM

01: START: MOV DPTR, #TABLE ；存表

02: LOOP: CLR A ；A清零

03: MOVC A, @A+DPTR ；取表代碼

04: CJNE A, #01H, LOOP1；不是01H，循環

05: JMP START ；重新設定

06: LOOP1: MOV P1, A ；送P1輸出

07: ACALL DELAY ；調延時程序

08: INC DPTR ；數據指針加1

09: JMP LOOP ；轉移到LOOP處

10: DELAY: MOV R5,#25 ；延時0.5秒

11: DLY1: MOV R6,#100 ；

12: DLY2: MOV R7,#100 ；

13: DJNZ R7,$ ；

14: DJNZ R6,DLY2 ；

15: DJNZ R5,DLY1 ；

16: RET ；

17: TABLE: DB 0FEH,0FDH,0FBH,0F7H ；

18: DB 0EFH,0DFH,0BFH,7FH ； 左移

19: DB 0FEH,0FDH,0FBH,0F7H ；

20: DB 0EFH,0DFH,0BFH,7FH ； 左移

21: DB 7FH,0BFH,0DFH,0EFH ；

22: DB 0F7H,0FBH,0FDH,0FEH ； 右移

23: DB 7FH,0BFH,0DFH,0EFH ；

24: DB 0F7H,0FBH,0FDH,0FEH ； 右移

25: DB 00H,0FFH,00H,0FFH ；

26: DB 00H,0FFH,00H,0FFH ； 閃爍

27: DB 01H ； 結束碼

28: END ；

LED顯示

7.1功能說明

讓一位數碼管靜態顯示數字“6”。

程序：SMG1.ASM

01： START： MOV DPTR, #TABLE ; 存入表的起始地址

02： MOV A, #6 ; 將欲顯示的數字6存入A

03： MOVC A, @A+DPTR ; 按地址取代碼并存入A

04： MOV P0, A ; 將代碼送P0轉變數字顯示

05： JMP $ ; 程序運行在當前狀態

06： TABLE： DB 0C0H, 0F9H, 0A4H, 0B0H；

07： DB 99H, 92H, 82H, 0F8H；

08： DB 80H, 90H, 88H, 83H；

09： DB 0C6H, 0A1H, 86H, 8EH； 代碼表

10： END ； 程序結束