單片機的跑馬燈簡單匯編程序

　　使用取反（CPL）實現跑馬燈的閃爍，隨后給P0口賦值實現移動。

　　注；使用的是12MHZ頻率，

    ORG 0000H LJMP LOOP1 ORG 0030H LOOP1: MOV A,#11111111B clr p1.4  ;打開使能MOV R1,#5 ;閃爍5次 LOOP: CPL A ;取反 MOV P0 , A ;輸出 ACALL DEL CPL A MOV P0 , A ACALL DEL DJNZ R1 , LOOP ;減一非零判斷 MOV P0,#11100111B ACALL DEL MOV P0,#11011011B ACALL DEL MOV P0,#10111101B ACALL DEL MOV P0,#01111110B ACALL DEL LJMP LOOP1 LOOP3: ACALL DEL SJMP LOOP1 DEL: MOV R5,#6H ;延時子程序部分 F3: MOV R6,#0FFH ;BCD碼為255 F2: MOV R7,#0FFH ;總延時為0.7803s F1: DJNZ R7,F1 DJNZ R6,F2 DJNZ R5,F3 RET END 

　　帶C循環做移動，使用一條跳轉轉移指令就可實現一直循環下去，延時為1.3s！

    ORG 0000H SJMP BEGAIN ORG 0030H BEGAIN: MOV P0, #0FFH ;初始狀態 clr  p1.4 ;打開led使能mov  P2,  #00110101B ; 鎖存2個74hc573,防止數碼管點陣干擾.MAIN : CLR A MOV A ,#11111110B ; 0FEH LOOP: RLC A MOV P0 , A ACALL DEL LJMP LOOP DEL: MOV R5,#10H F3: MOV R6,#0FFH F2: MOV R7,#0FFH F1: DJNZ R7,F1 DJNZ R6,F2 DJNZ R5,F3 RET END