//双字节加法指令，将内部RAM 50H开始的2个单元中存放的2字节十六进制 //和内部RAM 60H单元开始的2个单元中存放的2字节十六进制相加 //结果存放在60H开始的单元中 DouByteAdd：： LDA $0051H //先取出低字节的数据进行相加 ADD $0061H //两个字节的低字节相加结果放在A中 STA $0061H //低字节相加的结果存放在$0041H中 LDA $0050H //取出高字节的数据 ADC $0060H //高字节数据相加 STA $0060H //高字节数据相加结果存放在$0040H RTS //功能：双字节减法指令。将内部RAM 50H开始的2个单元中存放的2字节十六进制 //和内部RAM 60H单元开始的2个单元中存放的2个字节十六进制数相减 //结果存放在60H开始的单元中 DouByteSub: LDA $0051H //取出被减数的低字节 SUB $0061H //和减数的低字节相减 STA $0061H //结果存放在减数的低字节位置 LDA $0050H //去被减数的高字节 SBC $0060H //和减数的高字节相减 STA $0060h //结果存放在减数高字节位置 RTS /标号:BCDA //功能：双字节BCD码加法 //入口条件：被加数在add1中，加数在add2中。 //出口信息：和在add1中。 BCDA:： count: blkb 1 //字节的个数，如果改变这个参数可以实现多字节BCD码加法 LDA #2 STA count //设置循环次数 LDA #add1 //初始化被加数指针，从低位开始运算 ADD count //将add1的指针指到最低字节处 STA add1 LDA #add2 //初始化加数指针，从低位开始运算 ADD count //将add2的指针指到最低字节处 CLC //清进位标志位 BCLR 4,CCR //清半进位标志 lable1:DBNZ count ，loop //确定循环次数 JMP BCDA_EXIT loop: DEC add1 //将被加数移到相应字节 DEC add2 //将加数移到相应字节 LDA add1 ADDC add2 DDA //十进制调整 STA add1 //存放相应字节运算结果 BCLR 4,CCR //清半进位标志 JMP label1 BCDA_EXIT: RTS //① 求BCD减数的双字节补数公式：999AH-减数。这里的999AH代表四位BCD码的模1000。 //② 被减数加上减数的补数。 //③ 对第②步的加法之和进行十进制加法调整，调整结果即为所求的减法结果。 //标号:BCDSUB //功能：双字节字节BCD码减法 //入口条件：被减数在add1中，减数放在add2中 BCDSUB:: LDHX add2 //取得减数 JMP BCD_NEG //求减数的补数 JMP BCD //调用BCD码双字节加法子程序

RTS //标号:BCD_NEG //功能:对BCD码求补 //入口条件：将add2中所存放的BCD码转换成补码 //原理：3字节BCD码的模位99999A，4字节BCD码的模位：9999999A，因此求多字节BCD // 码的补数时，只要将最后一位单独处理即可，高位用循环求 //出口参数：add2中存放求补之后的BCD码 BCD_NEG：： count : blkb 1 //字节的个数 MOV #2 , count //设置循环次数 LDA #add2 //初始化add2的指针，将其指向最低地址处 ADD count DEC count //字节数减1 CLC //清进位标志位 //求最低一字节BCD码的补码 DEC add2 //将add2指针指到最低一字节 LDA #0x9AH SBC add2 STA add2 //求得最低一字节BCD补码 //求高字节BCD码的补码 lable1:DBNZ count ，loop //确定循环次数 JMP BCD_NEG_EXIT loop： LDA #0X99H SBC add2 LDA add2 INC add2 JMP label1 BCD_NEG_EXIT: RTS //一个延时子程序，用来延时1000个指令周期 Delay: LDA #200 //延时约200 5 = 1000(T)---- Delay_1: NOP //(1T) NOP //(1T) DBNZA Delay_1 //(3T) AIX #-1 CPHX #0 BNE Delay //=========================== DelayHX_Exit: PULA //A出栈(恢复寄存器A) RTS

1、首先分析您的程序，

void

delay()

{

int

i;

if(1

==

tf0)//if(tf0==1),查询定时器溢出标志位

{

tf0=0;

i=10000;//定时溢出时给i赋值1000

th0=0xdc;tl0=0x00;

i--;//i=999,如果还没有减到0时定时器又溢出，则i永远不会减到0！！！！所以您的这段程序不应该行不通！！

}

while(1)

{

if(i==0)

break

;

}

}

2、建议做法

（1）定义一个全局变量用于作定时计数如unsigned

char

n;

（2）定时器采用以某一时间基准（10ms）中断方式，每中断一次中断处理程序里n++；

(3)在延时函数中对n进行 *** 作，如延时1s即1000ms则：

void

delay_1s()

{

while(n<100);//如果n<100,即还没有到1s就等待

n=0；如果1s时间到则清零n,退出子程序

}

当然这样定时精度可能需要调整，但思路可以试试。

单片机程序 一般结构应该是 一个主循环、及多中断处理程序，在主循环中 包含需要处理的 各种功能的子程序，子程序不应该以循环形式存在，中断 及 子程序 能简短要短小精悍，按键可以随时切换 某种功能 只要 按键时改变 标志位就可以了（标志位可以自己定义)，如标志位为 1 调用一个功能的子程序、为 0 调用另一个功能的子程序，方法很多很多。尽量不要用 循环延时程序，中断程序中更不能调用延时程序，不然可能会出现意想不到的麻烦。

;程序实现功能

;西南北路口直行与转弯交替通行，数码管显示直行通行倒计时，红绿黄灯显示包括人行道在内的道路交通状态。

;某一方向道路拥挤时，可以人工控制调节东西南北方向通行时间。

;紧急情况时，各路口交通灯显示红灯，数码管保持数据不变。

;工作寄存器及存储单元分配

;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  P30

SETB  P31

JNB   P30,DIS_S     ; 查询是否第一个按键按下

JNB   P31,DIS_E     ; 查询是否第二个按键按下

AJMP  DIS_R          ; 没有键按下则返回

DIS_S:LCALL D5MS           ; 按键去抖

JNB   P30,DIS_SN

AJMP  DIS_R

DIS_SN:MOV   40H,#50       ; 对通行时间从新分配，南北通行时间加长

MOV   41H,#30

AJMP  DIS_R

DIS_E:LCALL D5MS              ; 按键去抖

JNB   P31,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