走馬燈代碼

『壹』 跑馬燈輪播代碼

#define uchar unsigned char #define uint unsigned int #define ulong unsigned long #include "reg52.h" sbit p10=p1^0; sbit p11=p1^1; sbit p12=p1^2; sbit p13=p1^3; char code dx516[3] _at_ 0x003b; void main(void) { uint n; while(1) { p13=1;p10=0; for(n=0;n<40000;n++) p10=1;p11=0; for(n=0;n<40000;n++) p11=1;p12=0; for(n=0;n<40000;n++) p12=1;p13=0; for(n=0;n<40000;n++) }這個是四個燈的~~

『貳』 單片機 跑馬燈 代碼詳解

//P1外接8個LED，低電平發光.
//下列程序在PROTEUS中模擬成功
#include<reg52.h>
//-----------------------------
void
delay_ms(unsigned
int
s)
{
unsigned
int
x;
for(s;
s
>
0;
s--)
{
x
=
98;
while(x--);
}
}
//-----------------------------
void
main()
{
char
i,
j;
while(1)
{
for(j
=
0;
j
<
8;
j++)
{
P1
=
255;
//全滅,
P1外接LED,
是低電平發光.
delay_ms(500);
//稍等片刻.
for(i
=
0;
i
<
8;
i++)
{
P1
<<=
1;
delay_ms(900
-
100
*
j);
//延時漸短
}
}
}
}
//-----------------------------

『叄』 有誰有鍵盤跑馬燈代碼

鍵盤跑馬燈代碼你如果有需要，可以去看看，找一找，找到了也不要太興奮，如果沒有找到，更不要沮喪，萬一找到了不能用，那麼就要繼續去找，如果真的找到了，還挺好用的，就麻煩您也告訴我一聲。

『肆』 單片機跑馬燈代碼

//假設晶振12MHZ，P1控制8個LED低電平亮
#include "reg51.h"
unsigned int YSJS=0;
signed char LED=0XFF;
void main(void)
{
TMOD |= 0X10; //定時器1工作於方式1,16位定時器
TH1 = 0XFE; //定時器1定時時間=500uS
TL1 = 0X0C;
ET1 = 1; //使能定時器1中斷
TR1 =1;
EA =1; //開總中斷

while(1)
{
}
}

void TIMER1(void) interrupt 3 //定時器1中斷函數使用默認寄存器組
{
TH1 = 0XFE; //定時器1定時時間=500us
TL1 = 0X0C;

YSJS++;
if(YSJS==1000) //500uS*1000=500000us=0.5s,可調整
{
P1 = LED;
LED=LED<<1
if(LED==0X00)LED=0XFF;
YSJS = 0
}
}

『伍』 要達到這種走馬燈效果，得用什麼代碼

DELPHI的源碼，用了字元復制函數，與冊除字元函數。。。原理簡單。
procere TForm1.FormCreate(Sender: TObject);
begin
s:= 'TEST ';
end;

procere TForm1.Timer1Timer(Sender: TObject);
begin
s:=s+(s,1,1);
delete(s,1,1);
label1.Caption:=s;
Label1.Refresh;
end;

『陸』 幫忙解釋一下"跑馬燈"代碼

<script>
demo2.innerText=demo1.innerText
//demo2對象內部的文本和demo1對象內部文本一樣
function qswhMarquee(){ //自定義qswhMarquee()函數
if(demo2.offsetHeight-demo.scrollTop<=0)
//如果demo1和demo2外面的demo對象的滾動條滾動高度超過demo2的內容總高度，即滾動到了末尾。
demo.scrollTop-=demo1.offsetHeight
//demo的滾動條回退（demo1的內容高度為長度）的位置。
else //如果沒有到末尾
demo.scrollTop++
//demo對象向下滾動1px
}
var MyMar=setInterval(qswhMarquee,60)
//設定計時器MyMar,並以0.06秒的時間間隔不斷執行qswhMarquee函數
demo.onmouseover=function() {clearInterval(MyMar)}
//當滑鼠移到demo對象感應區域內，取消計時器,即不進行滾動
demo.onmouseout=function() {MyMar=setInterval(qswhMarquee,60)}
//當滑鼠移動demo對象感應區域以外重新設定計時器，並以0.06秒時間間隔不斷執行滾動。
</script>

『柒』 跑馬燈 匯編代碼 求注釋

ORG 0000H
LJMP MAIN ;轉主程序
ORG 001BH
LJMP IT0P ;轉T1中斷服務程序
ORG 1000H ;主程序入口
MAIN:
LTB2: MOV DPTR,#TAB2 ;把數據指針移到TAB2位址
CLR P1.3 ;猜測是led總開關
MOV R1,#00H ;清空R1
MOV A,#00H ;清空A

DEL1: MOV SP,#60H ；設置堆棧指針
MOV B,#0AH ；設置中斷執行次數
MOV TMOD,#10H ；選擇T1，定時模式，工作方式1
MOV TL1,#0B0H ；設置低位元組計數初值
MOV TH1,#3CH ；設置高位元組計數初值
SETB TR1 ；啟動T1開始計時
SETB ET1 ；T1中斷允許
SETB EA ；開全局中斷
HERE1: SJMP HERE1 ；等待
IT0P: MOV TL0,#0B0H
MOV TH0,#3CH
DJNZ B,LOOP ；非零跳轉，在本程序中就是結束
MOV B,#0AH ；上一句等於零，執行這一句，設置執行次數
MOVC A,@A+DPTR ；取出偏移後的數據到寄存器A中
MOV P0,A ；輸出
INC R1 ；偏移量自加1
CJNE R1,#10H,LOOP2 ；判斷是否全部取出，不相等跳轉
MOV R1,#00H ；上一句相等就清空R1
LOOP2: MOV A,R1 ；把偏移量賦值給A
LOOP: RETI ；中斷結束，返回
TAB2: DB 7FH,3FH,1FH,0FH,07H,03H,01H,00H
DB 80H,0C0H,0E0H,0F0H,0F8H,0FCH,0FEH,0FFH
END ；謝謝觀賞

12MHz晶振 定時器50ms一次中斷 led500ms亮或滅1個

多看書，多看數據手冊對你有好處！

『捌』 走馬燈代碼MARQUEE，我想製作一個文字走馬燈，想讓他從左到右一直循環。

你說的效果要用JS才能實現,你可以網路"JS無縫滾動".
MARQUEE標簽本身就是這樣的,剛開始和結束時都會空著.

『玖』 誰能給一個HTML無縫的跑馬燈代碼，非常感謝！

<div id="demo" style="overflow:hidden;width:600px;color:#ffffff;">
<table cellpadding="0" cellspacing="0" border="0">
<tr><td id="demo1" valign="top" align="center">
<table cellpadding="2" cellspacing="0" border="0">
<tr align="center">
<td><img src="圖片路徑" width="100"></td>
<td><img src="圖片路徑" width="100"></td>
<td><img src="圖片路徑" width="100"></td>
<td><img src="圖片路徑" width="100"></td>
<td><img src="圖片路徑" width="100"></td>
</tr>
</table>
</td>
<td id="demo2" valign="top"></td>
</tr>
</table>
</div>
<script>
var speed=1//速度數值越大速度越慢
demo2.innerHTML=demo1.innerHTML
function Marquee(){
if(demo2.offsetWidth-demo.scrollLeft<=0)
demo.scrollLeft-=demo1.offsetWidth
else{
demo.scrollLeft++
}
}
var MyMar=setInterval(Marquee,speed)
demo.onmouseover=function() {clearInterval(MyMar)}
demo.onmouseout=function() {MyMar=setInterval(Marquee,speed)}
</script>

『拾』 誰能給點HTML跑馬燈效果的代碼

<marquee>...</marquee>普通卷動
<marquee behavior=slide>...</marquee>滑動
<marquee behavior=scroll>...</marquee>預設卷動
<marquee behavior=alternate>...</marquee>來回卷動
<marquee direction=down>...</marquee>向下卷動
<marquee direction=up>...</marquee>向上卷動
<marquee direction=right></marquee>向右卷動
<marquee direction=』left』></marquee>向左卷動
<marquee loop=2>...</marquee>卷動次數
<marquee width=180>...</marquee>設定寬度
<marquee height=30>...</marquee>設定高度
<marquee bgcolor=FF0000>...</marquee>設定背景顏色
<marquee scrollamount=30>...</marquee>設定滾動速度
<marquee scrolldelay=300>...</marquee>設定卷動時間
<marquee onmouseover="this.stop()">...</marquee>滑鼠經過上面時停止滾動
<marquee onmouseover="this.start()">...</marquee>滑鼠離開時開始滾動