找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 5295|回复: 0
收起左侧

[求助]红绿灯数码管显示部分

[复制链接]
ID:10802 发表于 2009-4-11 00:20 | 显示全部楼层 |阅读模式
大家好,我这个单片机新手又来麻烦大家了,我正在编写一个红绿灯在模拟板子上得程序,但数码管显示的部分始终实现不了,希望各位高手能指点一下,在下不胜感激。这是一个实现南北和东西方向的红绿灯程序的一部分。其中东西方向红灯延时30s,南北方向绿灯延时25s黄灯延时5s。我的问题主要是在东西方向在实现25s延时后剩下得5s,不知怎么和黄灯的5s取得统一。下面绿色部分即是在下困惑的地方,希望各位高手能个指点一二。谢谢
LED0 BIT P2.0
LED1 BIT P2.1
LED4 BIT P2.4
LED5 BIT P2.5
GRE0 EQU 30H
RED0 EQU 31H
YEL0 EQU 32H
GRE1 EQU 33H
RED1 EQU 34H
YEL1 EQU 35H
BUF_LED0 EQU 36H         ;数码存储区
BUF_LED1 EQU 37H
BUF_LED4 EQU 38H
BUF_LED5 EQU 39H
BUF_LED3 EQU 40H
LYEL0 EQU 51H
   ORG 00H
   AJMP MAIN
   ORG 0BH
   AJMP IT0P
MAIN: MOV DPTR,#TABLE
      MOV TMOD,#01H
      MOV 21H,#100
      MOV LYEL0,#0      
      MOV P1,#0FFH
      MOV P0,#0FFH
      MOV P2,#0FFH
      MOV BUF_LED0,#092H       ;赋初值   5
      MOV BUF_LED1,#0A4H          ;         2
      MOV BUF_LED4,#0C0H          ;         0
      MOV BUF_LED5,#0B0H          ;         3
      MOV SP,#60H
      MOV GRE0,#25      ;GRE0,RED0,YEL0南北方向灯的存储区
      MOV RED0,#25
      MOV YEL0,#5
      MOV GRE1,#20       ;GRE1,RED1,YEL1东西方向灯的存储区
      MOV RED1,#30
      MOV YEL1,#5
      MOV TH0,#0D8H  ;赋初值1mS
      MOV TL0,#0F0H
      MOV IE,#82H
      SETB TR0
HERE:   CALL XIANSHI
       SJMP HERE
IT0P:
      PUSH Acc
      PUSH PSW
      MOV TH0,#0D8H
      MOV TL0,#0F0H
      DJNZ 21H,RETURN    ;实现延时一秒
      MOV 21H,#100
     MOV A,RED1  ;东西灯30S 
      DEC A
      MOV RED1,A
      ACALL FENLI
      MOVC A,@A+DPTR
     MOV BUF_LED5,A
      MOV A,B
      MOVC A,@A+DPTR
     MOV BUF_LED4,A
     MOV C,LYEL0         ;LYEL0作用是实现跳转到黄灯,当C=1时跳到B1
     JC B1
     MOV A,GRE0      ;南北绿灯25S
      DEC A
      MOV GRE0,A
      ACALL FENLI
     MOVC A,@A+DPTR       
      MOV BUF_LED1,A
      MOV A,B
     MOVC A,@A+DPTR
      MOV BUF_LED0,A
      MOV A,GRE0 
      CJNE A,#0FFH,B0
      MOV LYEL0,#1
 B1:   MOV A,YEL0    ;南北黄灯5S
       DEC A
      MOV YEL0,A
      AJMP FENLI
      MOVC A,@A+DPTR
      MOV BUF_LED1,A
      MOV A,B
      MOVC A,@A+DPTR
      MOV BUF_LED0,A
 B0:  MOV A,RED1
      CJNE A,#0FFH,RETURN

FENLI: MOV B,#10  ;实现个十位的分离
           DIV AB
           RET
RETURN: POP PSW
             POP Acc
             RETI
XIANSHI:MOV P2,#11111110B ;数码管1亮
        MOV P0,BUF_LED0
        ACALL DELAY
        MOV P2,#11111101B  ;数码管2亮
        MOV P0,BUF_LED1
        ACALL DELAY
        MOV P2,#11101111B  ;数码管4亮
        MOV P0,BUF_LED4
        ACALL DELAY
 MOV P2,#11011111B  ;数码管5亮
        MOV P0,BUF_LED5
        ACALL DELAY
        RET
DELAY:
        MOV R6,#10
   D2:  MOV R7,#248
   D3:  DJNZ R7,D3
           DJNZ R6,D2
           RET
TABLE: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
      END
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表