基于51單片機匯編語言
查表法流水燈
適合變化類型較多的流水燈
;查表法廣告流水燈
ORG 00H
MOV P2,#80H
START: MOV DPTR,#TABLE ; 將表的地址存入數據指針
LOOP: CLR A
MOVC A,@A+DPTR ;到數據指針所指的地址取碼
CJNE A,#01,LOOP1 ; 取出的碼是否01H？否則跳到LOOP1
JMP START
LOOP1: MOV P1,A
MOV R3,#20
CALL DELAY
INC DPTR
JMP LOOP
DELAY: MOV R4,#20
D1: MOV R5,#248
DJNZ R5,$
DJNZ R4,D1
DJNZ R3,DELAY
RET
TABLE: DB 0FEH,0FDH,0FBH,0F7H ;左移
DB 0EFH,0DFH,0BFH,7FH
DB 0FEH,0FDH,0FBH,0F7H ;左移
DB 0EFH,0DFH,0BFH,7FH
DB 7FH,0BFH,0DFH,0EFH ;右移
DB 0F7H,0FBH,0FDH,0FEH
DB 7FH,0BFH,0DFH,0EFH ;右移
DB 0F7H,0FBH,0FDH,0FEH
DB 00H,0FFH,00H,0FFH ;閃爍
DB 01H ;結束碼
END
|
