52单片机红绿灯汇编程序

① 单片机交通灯程序

采用51单片机作为系统的MCU，基本完成控制两组交通指示灯交替亮
每个街口有左拐、直行及行人三种指示灯。直行灯每个灯有红、黄、绿三种颜色。自行车与汽车共用左拐和直行灯。
首先东西向直行绿灯和行人灯亮1分钟，左转灯亮30秒，黄灯亮5秒（同时南北向红灯亮95秒），然后东西向红灯亮95秒钟（同时首先南北向直行绿灯和行人灯亮1分钟，左转灯亮30秒，黄灯亮5秒），然后东西向的绿灯亮，依次类推。
每次绿灯亮的时候，对应的行人灯亮。
60S/30S/5S/60S/30S/5S
东西道
绿和行人/左转/黄/红/红/红
南北道
红/红/红/绿和行人/左转/黄
行人灯亮的时候有声音提示盲人能通过。
突发交通事故的时候能够紧急全红灯。
在有重要人物通过的时候能手动改为绿灯。
ORG 0000H ;主程序的入口地址
LJMP MAIN ;跳转到主程序的开始处
ORG 0003H ;外部中断0的中断程序入口地址
ORG 000BH ;定时器0的中断程序入口地址
LJMP T0_INT ;跳转到中断服务程序处
ORG 0013H ;外部中断1的中断程序入口地址
MAIN : MOV SP,#50H
MOV IE,#8EH ;CPU开中断，允许T0中断，T1中断和外部中断1中断
MOV TMOD,#51H ;设置T1为计数方式,T0为定时方式，且都工作于模式1
MOV TH1,#00H ;T1计数器清零
MOV TL1,#00H
SETB TR1 ;启动T1计时器
SETB EX1 ;允许INT1中断
SETB IT1 ;选择边沿触发方式
MOV DPTR ,#0003H
MOV A, #80H ;给8255赋初值，8255工作于方式0
MOVX @DPTR, A
AGAIN: JB P3.1,N0 ;判断是否要设定东西方向红绿灯时间的初值，若P3.1为1 则跳转
MOV A,P1
JB P1.7,RED ;判断P1.7是否为1，若为1则设定红灯时间，否则设定绿灯时间
MOV R0,#00H ;R0清零
MOV R0,A ;存入东西方向绿灯初始时间
MOV R3,A
LCALL DISP1
LCALL DELAY
AJMP AGAIN
RED: MOV A,P1
ANL A,#7FH ;P1.7置0
MOV R7,#00H ;R7清零
MOV R7,A ;存入东西方向红灯初始时间
MOV R3,A
LCALL DISP1
LCALL DELAY
AJMP AGAIN
;----------------------------------
N0: SETB TR0 ;启动T0计时器
MOV 76H,R7 ;红灯时间存入76H
N00: MOV A,76H ;东西方向禁止，南北方向通行
MOV R3,A
MOV DPTR,#0000H ;置8255A口，东西方向红灯亮，南北方向绿灯亮
MOV A,#0DDH
MOVX @DPTR, A
N01: JB P2.0,B0
N02: SETB P3.0
CJNE R3,#00H,N01 ;比较R3中的值是否为0，不为0转到当前指令处执行
;------黄灯闪烁5秒程序------
N1: SETB P3.0
MOV R3,#05H
MOV DPTR,#0000H ;置8255A口，东西，南北方向黄灯亮
MOV A,#0D4H
MOVX @DPTR,A
N11: MOV R4,#00H
N12: CJNE R4,#7DH,$ ;黄灯持续亮0.5秒
N13: MOV DPTR,#0000H ; 置8255A口，南北方向黄灯灭
MOV A,#0DDH
MOVX @DPTR,A
N14: MOV R4,#00H
CJNE R4,#7DH,$ ;黄灯持续灭0.5秒
CJNE R3,#00H,N1 ;闪烁时间达5秒则退出
;-----------------------------------
N2: MOV R7,#00H
MOV A,R0 ;东西通行，南北禁止
MOV R3,A
MOV DPTR,#0000H ; 置8255A口，东西方向绿灯亮，南北方向红灯亮
MOV A,#0EBH
MOVX @DPTR,A
N21: JB P2.0,T03

N22: CJNE R3,#00H,N21
;------黄灯闪烁5秒程序------
N3: MOV R3,#05H
MOV DPTR,#0000H ;置8255A口，东西，南北方向黄灯亮
MOV A,#0E2H
MOVX @DPTR,A
N31: MOV R4,#00H
CJNE R4,#7DH,$ ;黄灯持续亮0.5秒
N32: MOV DPTR,#0000H ; 置8255A口，南北方向黄灯灭
MOV A,#0EBH
MOVX @DPTR,A
N33: MOV R4,#00H
CJNE R4,#7DH,$ ;黄灯持续灭0.5秒
CJNE R3,#00H,N3 ;闪烁时间达5秒则退出
SJMP N00
;------闯红灯报警程序------
B0: MOV R2,#03H ;报警持续时间3秒
B01: MOV A,R3
JZ N1 ;若倒计时完毕，不再报警
CLR P3.0 ;报警
CJNE R2,#00H,B01 ;判断3秒是否结束
SJMP N02
;------1秒延时子程序-------
N7: RETI
T0_INT:MOV TL0,#9AH ;给定时器T0送定时10ms的初值
MOV TH0,#0F1H
INC R4
INC R5
CJNE R5,#0FAH,T01 ;判断延时是否够一秒，不够则调用显示子程序
MOV R5,#00H ;R5清零
DEC R3 ;倒计时初值减一
DEC R2 ;报警初值减一
T01: ACALL DISP ;调用显示子程序
RETI ;中断返回
;------显示子程序------
DISP: JNB P2.4,T02
DISP1: MOV B,#0AH
MOV A,R3 ;R3中值二转十显示转换
DIV AB
MOV 79H,A
MOV 7AH,B
DIS: MOV A,79H ;显示十位
MOV DPTR,#TAB
MOVC A,@A+DPTR
MOV DPTR,#0002H
MOVX @DPTR,A
MOV DPTR,#0001H
MOV A,#0F7H
MOVX @DPTR,A
LCALL DELAY
DS2: MOV A,7AH ;显示个位
MOV DPTR,#TAB
MOVC A,@A+DPTR
MOV DPTR,#0002H
MOVX @DPTR,A
MOV DPTR,#0001H
MOV A,#0FBH
MOVX @DPTR,A
RET
;------东西方向车流量检测程序------
T03: MOV A,R3
SUBB A,#00H ;若绿灯倒计时完毕，不再检测车流量
JZ N3
JB P2.0,T03
INC R7
CJNE R7,#64H,E1
MOV R7,#00H ;中断到100次则清零
E1: SJMP N22
;------东西方向车流量显示程序------
T02: MOV B,#0AH
MOV A,R7 ;R7中值二转十显示转换
DIV AB
MOV 79H,A
MOV 7AH,B
DIS3: MOV A,79H ;显示十位
MOV DPTR,#TAB
MOVC A,@A+DPTR
MOV DPTR,#0002H
MOVX @DPTR,A
MOV DPTR,#0001H
MOV A,#0F7H
MOVX @DPTR,A
LCALL DELAY
DS4: MOV A,7AH ;显示个位
MOV DPTR,#TAB
MOVC A,@A+DPTR
MOV DPTR,#0002H
MOVX @DPTR,A
MOV DPTR,#0001H
MOV A,#0FBH
MOVX @DPTR,A
LJMP N7
;------延时4MS子程序----------
DELAY: MOV R1,#0AH
LOOP: MOV R6,#64H
NOP
LOOP1: DJNZ R6,LOOP1
DJNZ R1,LOOP
RET
;------字符表------
TAB: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH
END

② c语言单片机模拟红绿灯程序 请各位高手帮忙

uchar i,a,b,c,d,e,f;
sbit a=P1^0,b=P1^1,c=P1^2,d=P1^3,e=P1^4,f=P1^5;
你的错误是：a,b,c,d,e,f重复定义；sbit 要单独一行。可以修改如下：
sbit aa=P1^0;
sbit bb=P1^1;
sbit cc=P1^2;
sbit dd=P1^3;
sbit ee=P1^4;
sbit ff=P1^5;
你的延时函数这样取可以，没有问题。

③ 单片机的红绿灯控制程序如何写啊

//--------------------------------------------------
//名称：LED模拟交通灯
//作者：彭伟《单片机C语言程序设计实训100例-基于8051+PROTEUS仿真》
//--------------------------------------------------
//说明：东西向绿灯亮若干秒后，黄灯闪烁，闪烁5次后亮红灯
// 红灯亮后，南北向由红灯变为绿灯，若干秒后南北向黄灯闪烁
// 闪烁5次后亮红灯，东西向绿灯亮，如此重复
//---------------------------------------------------
#include<reg51.h>
#define uchar unsigned char
#define uint unsigned int
sbit RED_A=P0^0;//东西向指示灯
sbit YELLOW_A=P0^1;
sbit GREEN_A=P0^2;
sbit RED_B=P0^3;//南北向指示灯
sbit YELLOW_B=P0^4;
sbit GREEN_B=P0^5;
uchar Flash_count=0;Operation_type=1;//闪烁次数及操作类型变量
//-----------------------------------------------------
//延时
//----------------------------------------------------
void DelayMS(uint x)
{
uchar i;
while(x--)for(i=0;i<120;i++)
}
//---------------------------------------------------
//交通灯切换子程序
//---------------------------------------------------
void Traffic_light()
{
switch(Operation_type)
{
case 1://东西向绿灯南北向红灯亮
RED_A=1;YELLOW_A=1;GREEN_A=0;
RED_B=0;YELLOW_B=1;GREEN_B=1;
DelayMS(2000);
Operation_type=2;
break;
case 2://东西向黄灯闪烁，绿灯关闭
DelayMS(300);
GREEN_A=1;
YELLOW_A=~YELLOW_A;
//闪烁5次
if (++Flash_count!=10) return;
Flash_count=0;
Operation_type=3;
break;
case 3://南北向绿灯东西向红灯亮
RED_A=0;YELLOW_A=1;GREEN_A=1;
RED_B=1;YELLOW_B=1;GREEN_B=0;
DelayMS(2000);
Operation_type=4;
break;
case 4://南北向黄灯闪烁，绿灯关闭
DelayMS(300);
GREEN_B=1;
YELLOW_B=~YELLOW_B;
//闪烁5次
if (++Flash_count!=10) return;
Flash_count=0;
Operation_type=1;
}
}
void main()
{
while(1) Traffic_light();

}

④ 求一个用汇编语言编写单片机简易交通灯程序。求高手帮下忙谢谢了。

;------------------------------------
;程序实现功能
;西南北路口直行与转弯交替通行，数码管显示直行通行倒计时，红绿黄灯显示包括人行道在内的道路交通状态。
;某一方向道路拥挤时，可以人工控制调节东西南北方向通行时间。
;紧急情况时，各路口交通灯显示红灯，数码管保持数据不变。

;工作寄存器及存储单元分配
;1.工作寄存器
;R2设置为定时器定时中断次数,R6、R7用于延时程序中的寄存器

;2.片内存储单元
;30H、31H作为两组数码管显示数据存储单元;32H、33H作为交通灯初始状态存储单元;40H、41H作为交通灯显示数据存储单元

;3.标志位
;00H：南北通行标志位 ; 01H：东西通行标志位;02H：紧急事件标志位
;-----------------------------------
SNF EQU 00H ;;;南北通行标志位
EWF EQU 01H ;;;东西通行标志位
URF EQU 02H ;;;紧急事件标志位
ORG 0000H
LJMP MAIN ;;;上电转主程序
ORG 000BH ;;;定时中断入口
LJMP DSZD
ORG 0003H ;;;紧急中断入口
LJMP URZD
ORG 0030H
MAIN: LCALL INIT ;;;调用初始化子程序
LOOP: LCALL DIS ;;;循环执行显示子程序
AJMP LOOP
;///////////初始化程序
INIT: SETB SNF
SETB EWF
SETB URF
MOV R2,#20 ;;;定时器中断20次为1s
MOV TMOD,#01H ;;;初始化定时器
MOV TL0,#0B0H
MOV TH0,#3CH
SETB EA ;;;开定时中断与紧急中断
SETB ET0
SETB TR0
SETB EX0
SETB IT0 ;;;设置中断程控方式
MOV DPTR,#TAB ;;;数值首地址放入DPTR中
MOV 40H,#40 ;;;东南西北通行时间设置
MOV 41H,#40
MOV 30H,#40 ;;;通行时间初始化
MOV 31H,#60
MOV P0,#4CH ;;;初始化时南北通行并把交通灯状态分别放在32H和33H中
MOV 32H,#4CH
MOV P2,#15H
MOV 33H,#15H
RET
;////////////显示子程序
DIS: MOV P3,#0DFH ;;;选中南北方向的十位数码管
MOV A,30H ;;;把显示数据送人数码管显示
MOV B,#10
DIV AB
MOVC A,@A+DPTR
MOV P1,A ;;;
LCALL D1MS
MOV P3,#0EFH ;;;选中南北方向的个位数码管
MOV A,B ;;;送入数码管显示
MOVC A,@A+DPTR
MOV P1,A
LCALL D1MS

MOV P3,#7FH ;;;选中第东西方向的十位数码管
MOV A,31H ;;;送入数码管显示
MOV B,#10
DIV AB
MOVC A,@A+DPTR
MOV P1,A
LCALL D1MS
MOV P3,#0BFH ;;;选中第东西方向的个位数码管
MOV A,B
MOVC A,@A+DPTR
MOV P1,A
LCALL D1MS
SETB P3.0
SETB P3.1
JNB P3.0,DIS_S ;;;查询是否第一个按键按下
JNB P3.1,DIS_E ;;;查询是否第二个按键按下
AJMP DIS_R ;;;没有键按下则返回
DIS_S:LCALL D5MS ;;;按键去抖
JNB P3.0,DIS_SN
AJMP DIS_R
DIS_SN:MOV 40H,#50 ;;;对通行时间从新分配，南北通行时间加长
MOV 41H,#30
AJMP DIS_R
DIS_E:LCALL D5MS ;;;按键去抖
JNB P3.1,DIS_EW
AJMP DIS_R
DIS_EW:MOV 40H,#30 ;;;东西通行时间加长
MOV 41H,#50
DIS_R:RET
;///////定时中断处理程序
DS_C: LJMP DS_R ;;;接力跳转
DSZD: PUSH ACC ;;;保护现场
PUSH PSW
CLR TR0 ;;;关定时器及中断标志位并重新赋值
CLR TF0
MOV TL0,#0B0H
MOV TH0,#3CH
DJNZ R2,DS_C ;;;判断1m时间是否到达
MOV R2,#20 ;;;到达重新赋值
DEC 30H ;;;南北方向通行时间减一
MOV A,30H ;;;把减一后的时间送入显示存储单元
;;;;;;;南北通行到达最后4秒时黄灯闪烁
DS_10:CJNE A,#4,DS_11 ;;;如果通行时间剩余4秒
JNB SNF,DS_11 ;;;判断是否是南北通行
MOV P0,#8AH
MOV 32H, #8AH ;;;把交通灯状态存入存储单元（后面类似）
DS_11:CJNE A,#3,DS_12 ;;;不是剩余3秒，返回
JNB SNF,DS_12 ;;;不是南北通行时间，返回
MOV P0,#88H
MOV 32H, #88H
DS_12:CJNE A,#2,DS_13
JNB SNF,DS_13
MOV P0,#8AH
MOV 32H, #8AH
DS_13:CJNE A,#1,DS_14
JNB SNF,DS_14
MOV P0,#88H
MOV 32H, #88H
;------------------------
DS_14:JNZ DS_NE ;;;通行时间没有结束转向改变东西方向的数码管
CPL SNF ;;;如果通行时间结束则对标志位取反
JNB SNF,DS_1 ;;;判断是否南北通行
MOV 30H,40H ;;;是，点亮相应的交通灯
MOV P0,#4CH
MOV 32H,#4CH ;;;存储交通灯状态
MOV P2,#15H
MOV 33H, #15H ;;;存储交通灯状态
DS_NE:DEC 31H ;;;东西方向通行时间减一
MOV A,31H ;;;把通行剩余时间送入显示存储单元
;;;;;;;;东西方向通行时间剩余4秒钟黄灯闪烁（程序注释与南北方向类似 略）
DS_20:CJNE A,#4,DS_21
JB EWF,DS_21
MOV P0,#51H
MOV 32H, #51H
DS_21:CJNE A,#3,DS_22
JB EWF,DS_22
MOV P0,#41H
MOV 32H, #41H
DS_22:CJNE A,#2,DS_23
JB EWF,DS_23
MOV P0,#51H
MOV 32H, #51H
DS_23:CJNE A,#1,DS_24
JB EWF,DS_24
MOV P0,#41H
MOV 32H, #41H
;-----------------------------
DS_24:JNZ DS_R ;;;东西方向时间没有结束，返回
CPL EWF ;;;对通行状态取反
JNB EWF,DS_2 ;;;东西方向通行时间到来，跳转
MOV 31H,#80 ;;;东西方向通行结束，重新显示时间
MOV P0,#89H ;;;点亮相应的交通灯
MOV 32H, #89H
MOV P2,#29H
MOV 33H, #29H
AJMP DS_R
DS_1: MOV 30H,#80 ;;;南北通行时间结束，重新对显示存储单元赋值
MOV P0,#89H ;;;执行转弯状态1
MOV 32H, #89H
MOV P2,#26H
MOV 33H, #26H
AJMP DS_NE
DS_2: MOV 31H,41H ;;;东西方向开始通行，赋值予显示存储单元
MOV P0,#61H ;;;点亮相应的交通灯
MOV 32H, #61H
MOV P2,#15H
MOV 33H, #15H
DS_R: SETB TR0
POP PSW ;;;恢复现场
POP ACC
RETI
;/////////////紧急中断处理程序
URZD: PUSH ACC ;;;保护现场
PUSH PSW
CLR IE0 ;;;清除中断标志位
CLR TR0 ;;;关定时器
CPL URF ;;;紧急事件标志位
JB URF,UR_CON ;;;紧急结束；跳转
MOV P0,#49H ;;;各路口灯全显示红灯亮
MOV P2,#15H
AJMP UR_R
UR_CON:SETB TR0 ;;;恢复正常交通
MOV A,32H
MOV P0,A
MOV A,33H
MOV P2,A
UR_R: POP PSW ;;;恢复现场
POP ACC
RETI
;////////////查表指令0,1,2,3,4,5,6,7,8,9
TAB: DB 3FH, 06H, 5BH, 4FH, 66H, 6DH
DB 7DH, 07H, 7FH, 6FH

;//////////延时5ms与1ms
D5MS: MOV R7,#5
D1MS: MOV R7,#10
MOV R6,#50
L1: DJNZ R6,$
DJNZ R7,L1
RET
END

⑤ 单片机交通灯的汇编程序

NAME T3 ;I/O口扩展实验一
PORT EQU 0CFA0H ;片选地址CS0
CSEG AT 0000H
LJMP START
CSEG AT 4100H
START: MOV A,#11H ;两个红灯亮，黄灯、绿灯灭
ACALL DISP ;调用273显示单元（以下雷同）
ACALL DE3S ;延时3秒
LLL: MOV A,#12H ;东西路口绿灯亮;南北路口红灯亮
ACALL DISP
ACALL DE10S ;延时10秒
MOV A,#10H ;东西路口绿灯灭;南北路口红灯亮
ACALL DISP
MOV R2,#05H ;R2中的值为黄灯闪烁次数
TTT: MOV A,#14H ;东西路口黄灯亮;南北路口红灯亮
ACALL DISP
ACALL DE02S ;延时0.2秒
MOV A,#10H ;东西路口黄灯灭;南北路口红灯亮
ACALL DISP
ACALL DE02S ;延时0.2秒
DJNZ R2,TTT ;返回TTT，使东西路口;黄灯闪烁五次
MOV A,#11H ;两个红灯亮，黄灯、绿灯灭
ACALL DISP
ACALL DE02S ;延时0.2秒
MOV A,#21H ;东西路口红灯亮;南北路口绿灯亮
ACALL DISP
ACALL DE10S ;延时10秒
MOV A,#01H ;东西路口红灯亮;南北路口绿灯灭
ACALL DISP
MOV R2,#05H ;黄灯闪烁五次
GGG: MOV A,#41H ;东西路口红灯亮;南北路口黄灯亮
ACALL DISP
ACALL DE02S ;延时0.2秒
MOV A,#01H ;东西路口红灯亮;南北路口黄灯灭
ACALL DISP
ACALL DE02S ;延时0.2秒
DJNZ R2,GGG ;返回GGG，使南北路口;黄灯闪烁五次
MOV A,#03H ;两个红灯亮，黄灯、绿灯灭
ACALL DISP
ACALL DE02S ;延时0.2秒
JMP LLL ;转LLL循环
DE10S: MOV R5,#100 ;延时10秒
JMP DE1
DE3S: MOV R5,#30 ;延时3秒
JMP DE1
DE02S: MOV R5,#02 ;延时0.2秒
DE1: MOV R6,#200
DE2: MOV R7,#126
DE3: DJNZ R7,DE3
DJNZ R6,DE2
DJNZ R5,DE1
RET
DISP: MOV DPTR,#PORT ;273显示单元
CPL A
MOVX @DPTR,A
RET
END
你看看行不行 如果不行你自己再稍微改一下吧 反正大概就这些了
希望对你能有所帮助。

⑥ 单片机 用汇编语言编写交通红绿灯 只要求红灯30秒，黄灯5秒，绿灯30秒，黄灯5秒，其他不限

看你的程序上没有很大的问题，但是你的延时都使用相同子程序，延时时间相同。你可以把延时30秒的子程序和延时5秒的程序分开来写，分别调用。另单片机的引脚一般为吸入电流，建议你将单片机的引脚输出改为0有效就可以直接接负载，电源控制按键判断也作出相应的修改。

⑦ 单片机交通灯汇编语言程序，只需红黄绿灯顺序亮就行了

#include<reg51.h>

#define uchar unsigned char

#define uint unsigned int

sbit RED_A=P0^0; //东西向灯

sbit YELLOW_A=P0^1;

sbit GREEN_A=P0^2;

sbit RED_B=P0^3; //南北向灯

sbit YELLOW_B=P0^4;

sbit GREEN_B=P0^5;

uchar Flash_Count=0,Operation_Type=1; //闪烁次数，操作类型变量

//延时

void DelayMS(uint x)

{

uchari;

while(x--)for(i=0;i<120;i++);

}

//交通灯切换

void Traffic_Light()

{

switch(Operation_Type)

{

case1: //东西向绿灯与南北向红灯亮

RED_A=1;YELLOW_A=1;GREEN_A=0;

RED_B=0;YELLOW_B=1;GREEN_B=1;

DelayMS(2000);

Operation_Type=2;

break;

case2: //东西向黄灯闪烁，绿灯关闭

DelayMS(300);

YELLOW_A=~YELLOW_A;GREEN_A=1;

if(++Flash_Count!=10)return; //闪烁5次

Flash_Count=0;

Operation_Type=3;

break;

case3: //东西向红灯，南北向绿灯亮

RED_A=0;YELLOW_A=1;GREEN_A=1;

RED_B=1;YELLOW_B=1;GREEN_B=0;

DelayMS(2000);

Operation_Type=4;

break;

case4: //南北向黄灯闪烁5次

DelayMS(300);

YELLOW_B=~YELLOW_B;GREEN_B=1;

if(++Flash_Count!=10)return;

Flash_Count=0;

Operation_Type=1;

}

}

//主程序

void main()

{

while(1)Traffic_Light();

}

⑧ 急求单片机红绿灯的汇编语言程序设计

去买一本书吧！单片机原理与应用，你可能还不杂个会吧，这个你得慢慢来，只要你把那本书学会了差不多你能看会了，你可能还很年轻吧，要慢慢来，别人给你说没的意思的，年轻嘛慢慢来，我也是这样来的，我看过你这个还是简单的，我是搞仪表的，你看看我的程序吧！！！ 十分之一
文件名:*******.ASM
;* 型号 : M603-VA
;* 产品名称:4位三相电流/电压表
;* PCB硬件:M603-3P-VA-01(01)/M603-3P-VA-03(01)
;* 实现功能:(1)可测三相三线电压/电流
;(2)对输入电流/电压值做任意刻度显示
;* 版本号: 第1.0版
;* 起草日期:2006.3.30 最后修改日期: 2006.8.16
;* 修改日志:
;* V1.1 解决测量漂移问题
;* 完善1：LiuQK-2007.1.1
;* 1、增加RS485通讯功能
;* 2、增加变送功能
;* 3、增加上下限报警
;//////////////////////////////////////////////////////////////
ORG 0000
AJMP MAIN

ORG 0003H;INT0中断入口地址停电保存
;ljmp irq_int0
NOP
NOP
LJMP Err;程序飞跑,转到处理程序,重新启动.
ORG 000BH;T0中断入口, 用于显示定时
LJMP IRQ_t0
NOP
NOP
LJMP Err;程序飞跑,转到处理程序,重新启动.
ORG 0013H;INT1中断口地址
LJMP IRQ_int1
NOP
NOP
LJMP Err;程序飞跑,转到处理程序,重新启动.
ORG 001BH;T1中断入口 用于A/D转换
ljmp irq_t1
NOP
NOP
LJMP Err;程序飞跑,转到处理程序,重新启动.
ORG 23H
LJMP IRQ_UART;用于RS-485通讯
NOP
NOP
LJMP Err
org 002bh ;D/A
ljmp irq_t2
nop
nop
LJMP Err

;////////////////////////////////////////////////
;主程序从MAIN开始 执行
;////////////////////////////////////////////////
;////////////////////////////////////////////////
;STC单片机附加功能宏定义
P4 DATA 0e8h;P4口地址
WDT_CONTR DATA 0E1H;看门狗控制地址
AUXR DATA 8EH ;只写寄存器,只能用MOV AUXR,#DATA 命令. 用于控制扩展RAM和使能ALE.
AUXR1 DATA 0A2H;本寄存器用于数据指针选择://=0 选择DPTR0 , =1 选择DPTR1 //
XICON DATA 0C0H;特殊功能寄存器申明
;89C52定时器T2
;T2CON DATA 0C8H
;TH2 DATA 0CDH
;TL2 DATA 0CCH
;RCAP2H DATA 0CBH
;RCAP2L DATA 0CAH
;RL2 BIT 0C8H.0
;CT2 BIT 0C8H.1
;TR2 BIT 0C8H.2
;EXEN2 BIT 0C8H.3
;TCLK BIT 0C8H.4
;RCLK BIT 0C8H.5
;EXF2 BIT 0C8H.6
;TF2 BIT 0C8H.7
;ET2 BIT 0A8H.5
;PT2 BIT 0B8H.5
ORG 35h

MAIN: mov r0,#0Ffh
FILL: clr a
MOV @R0,A
DJNZ R0,FILL;（填充）初始化RAM内的数据全部为00H。
mov psw,#0
MOV SP,#80H;堆栈指针
MOV AUXR,#00
MOV CHECK_CODE,#0AAH
ACALL DATA_CHECK;数据校验
; setb 21h.0;置仪表起动标志
;EA中断允许,ET1中断允许,ET0中断允许
SETb ea ;EA中断允许

setb IT1;INT1中断方式是负边沿触发方式
setb it0;INT0中断方式是负边沿触发方式

mov pcon,#00h;
SETB PT0

CLR PX0
CLR PT1
CLR PX1
;SETB PX1
setb et0;T0中断允许
setb ET2
JNB 25H.2,IE_1
LCALL R_LOAD;载入波特率
mov t2con,#34h
setb p1.0;将485置为接收状态
mov scon,#0D0h;初始化并启动串口
SETB ES;开中断
SETB PS;串口中断优先
CLR PS
sjmp ie_OK

ie_1: JNB 25H.1,IE_OK
mov RCAP2H,#0ffh
mov RCAP2L,#0ffh
mov t2con,#04h
SETB PT2

IE_OK: SETB 20H.0 ;仪表启动标志
mov 2fh,#0;
lcall ie_ch;启动通道
;clr p1.2
;clr p1.3

;/////////////////////////////////////////////////
;/显示程序/
main2: ;启动看门狗以及定时时间为4S
MOV WDT_CONTR,#34H
setb et0
setb tr0
main20: JB 20H.7,MAIN3;查看A/D是否运行
lCALL IE_SET ;启动测量初始化
SETB 20H.7 ;测量启动标记
main3: ;A.数据校验
ACALL DATA_CHECK;数据校验
;B.测量频率计算
ACALL CY_HZ;计算
;C.显示比例值计算
acall dis_scale
;D:计算平均值
acall Hz_av
;E:上下限报警
ACALL ALARM_OUTPUT
;F:RS485通讯/变送输出
LCALL COMMUNICATION

;g:按键处理
LCALL SETKEY
LCALL SHIFTKEY
LCALL DOWKEY
LCALL ATKEY

;h:BCD码转换
ACALL bcdCode;bcd码转换

AJMP MAIN2;重新回到MAIN2

;//////////////////////////////////////
;A/D转换采样启动程序
IE_SET: MOV 1eH,#4;INT1不中断等待次数
MOV 1fH,#0;T0定时循环次数
MOV 1cH,#0;采样脉冲个数缓冲器
MOV 1dH,#0
MOV TMOD,#00010001B;T1,T0为16位定时器.
;再次初始化T1;int1
setb ea;再次启动中断
setb et1
clr tr1
mov tl1,#0
mov th1,#0
setb tr1
CLR IE1; 清除int1中断标志
SETB EX1;开启INT1中断
RET

;********************
;测量通道设置
ie_ch: push dpl
push dph

ie_ch1: mov a,2fh
ie_ch2: rl a;左移
cjne a,#7,ie_ch20;A/D转换共5次循环
ie_ch20: jc ie_ch21
clr a
ie_ch21: mov dptr,#ie_ch3
jmp @a+dptr
nop
nop
;通道循环表
ie_ch3: sjmp ie_offset ;零点偏移测量;0
sjmp ie_pa;A相过程值1
sjmp ie_pb;B相过程值2
sjmp ie_pc;C相过程值3
nop
nop

;4051 地址引脚排列 (9) (10 ) (11) 为地址 A2(c) A1(b) A0(a).
;CPU控制引脚: (Gnd) (p1.6) (p1.7)
;地址对应关系:000-- 0 0 0------PC通道(13PIN)
;001---0 0 1-----PB通道(14PIN)
;002---0 1 0-----PA通道(15PIN)
;003---0 1 1-----offset通道(12PIN)
;004---0-----GND
;005---0-----GND
;006---0-----GND
;007---0-----GND

;PA测量
ie_pa: nop
;功能检查
setb p1.6
clr p1.7
ie_ch_com: pop dph
pop dpl
ret
nop

;PB测量
ie_pb: setb p1.7
clr p1.6
sjmp ie_ch_com
;PC测量
ie_pc: CLR p1.7
clr p1.6
sjmp ie_ch_com

;零点偏移OFFSET测量0通道,硬件连接4051 的13引脚
ie_offset: SETB p1.7
SETB p1.6
sjmp ie_ch_com
nop
nop

;**************************
;频率计算
NOSWAP:
RET
nop
CY_HZ: JNB 3EH,NOSWAP;无采样结束标志
CLR 20H.7;清除测量挂起标记
CLR 3EH;清除测量结束标记

;T0中断次数浮点数转换

cy_hz_1: CLR 3CH
MOV R2,#0
MOV R3,1fh
MOV R1,#08H
LCALL INTF;浮点数存储08H 09H 0AH

;T0中断次数计算成时间周期;每中断1次时间为65536uS
MOV 0BH,#17;65536
MOV 0CH,#80H
MOV 0DH,#00H
MOV R0,#0BH
LCALL FMUL;
mov r1,#08h
LCALL FSTR;存储08H 09H 0AH
;T0剩余时间浮点数转换
MOV R3,1Bh
MOV R2,1Ah
MOV R1,#0BH
LCALL INTF;T0内检测到的时间转换浮点数存入0BH
;计算超出定时60mS以外的时间周期
MOV R0,#08H
CLR 3AH
LCALL FABP;T0+08H内时间和
LCALL FSTR;存储0BH,0CH 0DH
;计数总时间周期
MOV 08H,#18;65.535*2mS
MOV 09H,#80H
MOV 0AH,#0h
CLR 3AH
LCALL FABP;定时时间+T0+30H得到检测总时间
LCALL FSTR;存储0BH 0CH 0DH

;---------------------------------------
;在定时周期内采样到的脉冲个数转换成浮点数
MOV R2,1ch;测量周期个数转换浮点数
MOV R3,1dH
mov r1,#08h
Lcall intf;数据存放在08H 09H AH
;计算频率值
MOV R0,#08H
MOV R1,#0bH
LCALL Fdiv;频率
LCALL FSTR;存储0b 0c 0d
mov 08h,#20
mov 09h,#0f4h
mov 0ah,#24h
Lcall fmul
; Lcall fstr

mov a,2fh
jnz time_1
;(零点测量)
; mov 10h,0bh
; mov 11h,0ch
; mov 12h,0dh
MOV R1,#10H
; lcall fstr
sjmp TIME_4
nop
nop
time_1: ; mov r0,#0bh
; mov r1,#10h
; setb 3ah
; Lcall fabp
mov a,2fh
cjne a,#1,time_2
;第二次采样值存放到30H 31H 32H 地址(PA过程值测量)
; mov 36h,0bh
; mov 37h,0ch
; mov 38h,0dh

mov r1,#30h
; Lcall fstr
sjmp time_4
; nop
; nop

time_2: cjne a,#2,time_3
;第3次采样值存放33H 34H 35H (PB过程值测量)
; mov 33h,0bh
; mov 34h,0ch
; mov 35h,0dh
mov r1,#33H
; Lcall fstr
Sjmp time_4
;第4次采样值存放36H 37H 38H (PC过程值测量)
time_3: MOV R1,#36H
setb 20h.6;置A/D转换结束标志,用于过程值计算
INC 0EH;A/D转换计数器,用于延迟报警/数据刷新
; mov 30h,0bh
; mov 31h,0ch
; mov 32h,0dh
TIME_4: LCALL FSTR

;通道切换
TIME_COM: INC 2FH
mov a,2fh
cjne a,#4,time_COM0
time_COM0: jc time_COM1
mov 2fh,#0
time_COM1: acall ie_ch
ret

⑨ AT89S51 单片机控制交通灯程序（汇编语言）

ORG0000H

LJMPSTART

ORG0003H;INT0中断入口地址

LJMPINT0

ORG0040H

START:

MOVSP,#60H

SETBEX0;INT0中断有效

SETBIT0

SETBEA

LCALLSTATUS0;初始状态(都是红灯)

CIRCLE:

LCALLSTATUS1;南北绿灯,东西红灯

LCALLSTATUS2;南北绿灯闪转黄灯,东西红灯

LCALLSTATUS3;南北红灯,东西绿灯

LCALLSTATUS4;南北红灯,东西绿灯闪转黄灯

LJMPCIRCLE

INT0:

PUSHPSW;保护现场

PUSH2

PUSHACC

MOVDPTR,#8300H

MOVA,#0FH;南北,东西都亮红灯

MOVX@DPTR,A

MOVR2,#100;延时10秒

LCALLDELAY

POPACC;恢复现场

MOVX@DPTR,A

POP2

POPPSW

RETI

STATUS0:;南北红灯,东西红灯

MOVDPTR,#8300H

MOVA,#0FH

MOVX@DPTR,A

MOVR2,#10;延时1秒

LCALLDELAY

RET

STATUS1:;南北绿灯,东西红灯

MOVDPTR,#8300H

MOVA,#96H;南北绿灯,东西红灯

MOVX@DPTR,A

MOVR2,#200;延时20秒

LCALLDELAY

RET

STATUS2:;南北绿灯闪转黄灯,东西红灯

MOVDPTR,#8300H

MOVR3,#03H;绿灯闪3次

FLASH:

MOVA,#9FH

MOVX@DPTR,A

MOVR2,#03H

LCALLDELAY

MOVA,#96H

MOVX@DPTR,A

MOVR2,#03H

LCALLDELAY

DJNZR3,FLASH

MOVA,#06H;南北黄灯,东西红灯

MOVX@DPTR,A

MOVR2,#10;延时1秒

LCALLDELAY

RET

STATUS3:;南北红灯,东西绿灯

MOVDPTR,#8300H

MOVA,#69H

MOVX@DPTR,A

MOVR2,#200;延时20秒

LCALLDELAY

RET

STATUS4:;南北红灯,东西绿灯闪转黄灯

MOVDPTR,#8300H

MOVR3,#03H;绿灯闪3次

FLASH1:

MOVA,#6FH

MOVX@DPTR,A

MOVR2,#03H

LCALLDELAY

MOVA,#69H

MOVX@DPTR,A

MOVR2,#03H

LCALLDELAY

DJNZR3,FLASH1

MOVA,#09H;南北红灯,东西黄灯

MOVX@DPTR,A

MOVR2,#10;延时1秒

LCALLDELAY

NOP

RET

DELAY:;延时子程序

PUSH2

PUSH1

PUSH0

DELAY1:

MOV1,#00H

DELAY2:

MOV0,#0B2H

DJNZ0,$

DJNZ1,DELAY2;延时100mS

DJNZ2,DELAY1

POP0

POP1

POP2

RET

这是我们的实验，程序肯定没问题。至于ULN2803，只是一个增大电流，电压的芯片，因为51单片机本身的电流太小。你改一下就好。至于其他不明白的地方，可以交流。QQ375778861

⑩ 求单片机STC89C52控制的红绿灯C程序 谢谢大虾！

这么简单都不会！