走马灯代码

『壹』 跑马灯轮播代码

#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>鼠标离开时开始滚动