Code đèn giao thông

[huy_gmc]

mình có viết đoạn code của đèn giao thông(mình nghĩ vậy).
Mình đã mô phỏng trên protues nhưng không có xung chạy trong vi điều khiển,nạp code và play thì 6 led đơn đều sáng và 2 led 7 đoạn thì chạy lung tung.Có vấn đề nào ở đây,các bạn giải đáp giúp nhen.
CODE:



;PORT_LIGHT
do1 BIT P1.0 ;thu tu cac LED don
vang1 BIT P1.1
xanh1 BIT P1.2
do2 BIT P1.3
vang2 BIT P1.4
xanh2 BIT P1.5

org 0
main:
mov tmod,#01h
mov dptr,#led7
lap:
;khoi den thu 1
setb do1
setb xanh2
mov r2,#9
mov r3,#6
call lap1
;khoi den thu 2
setb do2
setb xanh1
mov r3,#9
mov r2,#6
call lap2
jmp lap
lap1:
tiep1:
mov a,r2
movc a,@a+dptr
mov p0,a ;hien thi thoi gian khoi den 1

mov a,r3 ;hien thi thoi gian khoi den 2
movc a,@a+dptr
mov p2,a

call delay
dec r2
dec r3
djnz r3,tiep1
clr xanh2
setb vang2
djnz r2,tiep1
clr do1
clr vang2
ret
lap2:
tiep2:
mov a,r2
movc a,@a+dptr
mov p0,a ;hien thi thoi gian khoi den 1

mov a,r3 ;hien thi thoi gian khoi den 2
movc a,@a+dptr
mov p2,a

call delay
dec r2
dec r3
djnz r3,tiep2
clr xanh1
setb vang1
djnz r2,tiep2
clr do2
clr vang1
ret

delay:

mov r5,#20
call delay1
ret
delay1:
mov th0,#high(-50000)
mov tl0,#low(-50000)
setb tr0
jnb tf0,$
clr tr0
clr tf0
djnz r5,delay1
ret
led7:
db 03FH,006H,05BH,04FH,066H,06DH,07DH,007H,07FH,06FH
ret
end

http://img69.imageshack.us/i/loif.png
có up hình lên mà sao nó hok hiện,thôi các bạn chịu khó kích vào đây xem phần cứng hen