單片機跑馬燈編程

A. 有誰知道用for語句編寫簡單單片機的跑馬燈程序

#define uchar unsigned char
#define uint unsigned int

void delaynus(uchar n) 延時函數 延時 n 微秒
{
uchar k;
for(k=0;k<n;k++)
_nop_();
}

void delaynms(uchar n) 延時 n 毫秒
{
uchar k;
for(k=0;k<n;k++)
delaynus(1000);
}
void main(void)
{
unsigned char led=0x45; 初始跑馬燈 顯示
unsigned char a,b;
char i;
while(1)
{
for(i=0;i<8;i++) //跑馬燈 一共 8 個
{
a=led<i; //實現跑馬燈左移
b=led>(8-i);
led=a|b;
P1=led;
delay_nms(1000); 延時 1000毫秒
}
}
}

B. 51單片機跑馬燈程序

不好意思，延時用了樓上的。keil下編譯OK。假設P1接燈。

ORG00H

SJMPSTART

ORG30H

START:

MOVA,#00

SETBC

MOVR0,#9

;從左到右

LOOP1:

RLCA

MOVP1,A

ACALLDELAY

DJNZR0,LOOP1

;從右到左

MOVR0,#9

LOOP2:

RRCA

MOVP1,A

ACALLDELAY

DJNZR0,LOOP2

SJMPSTART

DELAY:

MOVR6,#20

DELAY_0:MOVR5,#255

DJNZR5,$

DJNZR6,DELAY_0

RET

這個程序比較簡單了。再精簡，只能精簡一句，將MOVP1，A放在DELAY函數里。這樣減少一行。

簡單介紹一下：

首先就是你要輪流點亮，就是將1循環一圈，因為你要全滅一次，所以用到CY。

RG00H

SJMPSTART

ORG30H

START:

MOVA,#00;//清空A寄存器

SETBC;//將CY置1，然後帶進位左移就會進入將A的b0

MAINLOOP:;//大循環起始

MOVR0,#9;設置移位次數,要滅一次，所以設置為9

;從左到右

LOOP1:

RLCA;帶進位左移一次;第一次移位結果為01

MOVP1,A;將A中值放入P1點亮對應LED;該句可放在DELAY里，然後從右到左也去掉該句

ACALLDELAY;延時，保持燈亮一段時間，自己根據實際情況調整一下。

DJNZR0,LOOP1;循環，點亮下一個燈，最後一次，A為0，將全滅一次，CY為1

;從右到左

MOVR0,#9;設置循環次數

LOOP2:;循環起始表示

RRCA;帶進位右移，第一次結果為80H

MOVP1,A;更新P1點亮對應LED

ACALLDELAY;延時，保持燈亮一段時間

DJNZR0,LOOP2;循環，點亮下一個燈

SJMPMAINLOOP;循環，重新開始下一輪

如果你是管腳輸出低LED才亮，只需將MOVA,#00和SETBC改為MOVA,#0FFH和CLRC即可。

方案2：位定址區00做標志，為0從左到右，該標志為1從右到左

ORG00H

SJMPSTART

ORG30H

START:

MOVA,#00

SETBC

MOVR0,#9

CLR00H

LOOP1:

RLLED:

JB00H,RRLED

RLCA

AJMPDISP

RRLED:

RRCA

DISP:

MOVP1,A

ACALLDELAY

DJNZR0,LOOP1

CPL00H

AJMPSTART

DELAY:

MOVR6,#20

DELAY_0:MOVR5,#255

DJNZR5,$

DJNZR6,DELAY_0

RET

下面是方案1的流程圖，這種流程圖不知怎麼寫好，而且寫出來基本是對每行的代碼的解釋。

C. 跑馬燈單片機程序！！！急求！！！

用 C還是 匯編？ 用匯編，稍等片刻！

C（1）
ORG 0000H
MAIN:MOV A,#0FEH
MOV R3,#8

LP: MOV P1,A
RL A
LCALL DELAY
DJNZ R3,LP
MOV R3,#8
SJMP MAIN

DELAY: ;軟體延時
MOV R7,#0DH
DL1:
MOV R6,#0F7H
DL0:
MOV R5,#8EH
DJNZ R5,$
DJNZ R6,DL0
DJNZ R7,DL1
NOP
RET

END

(2)ORG 0000H
MAIN:MOV A,#0FEH
MOV R3,#8

LP: MOV P1,A
RL A
LCALL DELAY
DJNZ R3,LP
MOV P1,#0FFH
LCALL DELAY
MOV R3,#8
MOV A,#07FH
LP2: MOV P1,A
RR A
LCALL DELAY
DJNZ R3,LP2
MOV P1,#0FFH
LCALL T1DELAY
SJMP MAIN

T1DELAY:MOV R5,#20 ; 延時1ms ;硬體延時
MOV TMOD,#10H
MOV TH1,#3CH
MOV TL1,#0B0H
SETB TR1
LP3: JBC TF1,LP4
SJMP LP3
LP4: MOV TH1,#3CH
MOV TL1,#0B0H
DJNZ R5,LP3
RET

D. 單片機 跑馬燈 代碼詳解

ORG
0000H
;開機上電主程序入口
AJMP
START
;系統一進來就轉到主程序
ORG
0030H
;主程序地址
START:
MOV
A,
#0FFH
;主程序開始，A中初始化成全1
CLR
C
;c清零
MOV
R2,
#08H
;R2左轉循環計數器
LOOP:
RLC
A
<<C+A+C<<帶進位循環左移，A中的內容在8此循環中從0位到7位依次變0
MOV
P2,
A
;送到P2，使P2從0位到7位依次點亮LED
CALL
DELAY
;單片機運行很快，為了能看到燈的變化，必須延遲，把速度降下來
DJNZ
R2,
LOOP
;R2每次減1後判斷是否=0,8次後=0程序才會下行，否則會跳回LOOP
MOV
R2,#07H
;R2右轉循環計數器
LOOP1:
RRC
A
>>C+A+C>>帶進位循環右移，A中的內容在8此循環中從7位到0位依次變0
MOV
P2,
A
;送到P2，使P2從7位到0位依次點亮LED
CALL
DELAY
;和上個循環一樣，延時
DJNZ
R2,
LOOP1
;R2每次減1後判斷是否=0,7次後=0程序才會下行，否則會跳回LOOP1
JMP
START
;跳回程序起始位置重復下一個循環
DELAY:
MOV
R3,
#20;延時子程序，這個應該不用解釋了吧
D1:
MOV
R4,
#200
D2:
MOV
R5,
#248
DJNZ
R5,
$
DJNZ
R4,
D2
RET
END

E. 單片機跑馬燈如何編程！

如果是一個位元組型的數據控制LED燈的話，且是1控制LED燈滅，0控制燈亮。
從滅到亮，先是0xFF，然後開始左移，最終移到0x00，就是全亮了。
從亮到滅，先是0x00，然後左移並且加1，重復此工作就是0xFF了
按照上面的思想，你自己應該可以搞定的。

F. 單片機跑馬燈反向跑

點了S2按鍵。按下按鍵S1，跑馬燈正向運行；按下按鍵S2，跑馬燈反向運行，所以跑馬燈反方向跑，可能是按了S2按鍵。常規的跑馬燈，是指將多個發光二極體分別連接到單片機的某一並行埠處，通過編程式控制制這幾個發光二極體依次點亮。

G. 51單片機設計跑馬燈的程序用（c語言）編寫

|P1口接8個發光二極體共陽

#include <AT89X51.H>

unsigned char i;

unsigned char temp;

unsigned char a,b;

void delay(void)

{

unsigned char m,n,s;

for(m=20;m>0;m--)

for(n=20;n>0;n--)

for(s=248;s>0;s--);

}

void main(void)

{

while(1)

{

temp=0xfe;

P1=temp;

delay();

for(i=1;i<8;i++)

{

a=temp<<i;

b=temp>>(8-i);

P1=a|b;

delay();

}

for(i=1;i<8;i++)

{

a=temp>>i;

b=temp<<(8-i);

P1=a|b;

delay();

}

}

}

(7)單片機跑馬燈編程擴展閱讀：

Proteus 自從有了單片機也就有了開發系統，隨著單片機的發展開發系統也在不斷發展。 keil是一種先進的單片機集成開發系統。它代表著匯編語言單片機開發系統的最新發展，首創多項便利技術，將開發的編程/模擬/調試/寫入/加密等所有過程一氣呵成，中間不須任何編譯或匯編。

H. 單片機跑馬燈匯編程序詳細解釋

ORG
0000H
SJMP
START
ORG
0030H
START:
MOV
A,
#0FEH
;
先讓第一個發光二極體點亮
LOOP:
MOV
P1,
A
;
從P1口輸出到發光二極體
MOV
R1,
#100
;
延時0.5秒
DEL1:
MOV
R2,
#200
DEL2:
MOV
R3,
#7
DEL3:
DJNZ
R3,
DEL3
DJNZ
R2,
DEL2
DJNZ
R1,
DEL1
RL
A
;
左移一位，點亮下一個發光二極體
LJMP
LOOP
END
這個是我寫的跑馬燈程序，沒有左右振盪，自己參考參考加上去吧

I. 用51單片機（匯編語言寫）寫一個跑馬燈程序知道的幫個忙寫寫。

急用！請教！！！
用匯編語言程序，程序功能：實現方向可控的跑馬燈
編程要求：用八個LED發光二極體實現跑馬燈（即：8個燈依次輪流發光，每次只亮一個燈），系統啟動後，跑馬燈右向流轉，按下K1鍵，則反向流轉，再按則再反向……。接線方法：流水燈接P0口，按鍵K1可自選P1~P3任一引腳。

J. 51單片機匯編語言編寫一個跑馬燈的程序，初學者做實驗用，具體要求如下，好了可以加分

程序1:
ORG 0000H
LJMP MAIN
ORG 0030H
MAIN:
MOV SP,#5FH
LOOP:
MOV A,P2
MOV B,A
MOV P0,A
MOV P1,#0FFH
LOOP1:
LCALL DELAY
MOV C,P1.7
MOV A,P0
RLC A
MOV P0,A
MOV A,P1
RLC A
MOV P1,A
MOV A,P2
CJNE A,B,LOOP
SJMP LOOP1
DELAY:
MOV R2,#60
DELAY1:
MOV R3,#250
DJNZ R3,$
DJNZ R2,DELAY1
RET
END
程序2：
ORG 0000H
LJMP MAIN
ORG 0030H
MAIN:
MOV SP,#5FH
JNB P2.0,LOOP1 ;
JNB P2.1,LOOP2 ;
SJMP MAIN
LOOP1:
MOV P0,#0FEH
MOV P1,#0FFH
LOOP11:
MOV C,P1.7
MOV A,P0
RLC A
MOV P0,A
MOV A,P1
RLC A
MOV P1,A
JNB P2.1,LOOP2
SJMP LOOP11
LOOP2:
MOV P0,#0FCH
MOV P1,#0FFH
LOOP21:
MOV C,P1.7
MOV A,P0
RLC A
MOV P0,A
MOV A,P1
RLC A
MOV P1,A
JNB P2.0,LOOP1
SJMP LOOP21
DELAY:
MOV R2,#60
DELAY1:
MOV R3,#250
DJNZ R3,$
DJNZ R2,DELAY1
RET
END