小灯 远近光灯 刹车灯 超车灯 左右转向灯 危险灯 雨刮高低速 车窗升降 鸣笛 组合程序
org 0000h OFF: mov p0,#0ffh
mov p2,#0ffh
mov p3,#0ffh
clr p1.7
mov r3,#3
mov r4,#6 decide:
jnb p1.0,xiao
jnb p2.0,yuan
jnb p2.1,jin
jnb p2.2,wei
jnb p2.3,yugao
jnb p2.4,yudi
jnb p1.1,sheng
jnb p1.2,jiang
jnb p1.4 , L
jnb p1.5 , R
jnb p2.5 , sha
jnb p2.6 , ming
jnb p2.7 , chao
ajmp OFF
xiao: mov p0,#7eh
mov p3,#7eh
ajmp decide yuan: mov p0,#7eh
mov p3,#66h
ajmp decide jin: mov p0,#7eh
mov p3,#5ah
ajmp decide wei: mov p0,#0bdh
mov p3,#0bdh
acall delay1
mov p0,#0ffh
mov p3,#0ffh
acall delay1
ajmp decide
yugao: setb p1.7
ajmp decide yudi: setb p1.7
acall delay2
clr p1.7
acall delay3
jb p2.5,OFF
ajmp yudi sheng: mov p0,#7fh
ajmp decide
jiang: mov p3,#7fh
ajmp decide
L: mov p0,#0fdh
mov p3,#0fdh
acall delay1
mov p0,#0ffh
mov p3,#0ffh
acall delay1
djnz r3,L
ajmp off
R: mov p0,#0bfh
mov p3,#0bfh
acall delay1
mov p0,#0ffh
mov p3,#0ffh
acall delay1
djnz r3,R
ajmp off
sha: mov p0,#0dbh
ajmp decide ming: setb p1.6
acall delay2
clr p1.6
acall delay2
ajmp decide chao: mov p3,#0e7h
acall delay1
mov p3,#0dbh
acall delay1
djnz r4,chao
ajmp off
delay1: mov r5,#10
dl0: mov r6,#100
dl1: mov r7,#250
dl2: djnz r7,dl2
djnz r6,dl1
djnz r5,dl0
ret
delay2: mov r0,#10 l1: mov r2,#5 l2: mov r3,#5
djnz r3,$
djnz r2,l2
djnz r0,l1
ret
delay3: mov r4,#20 l6: mov r5,#10 l4: mov r6,#10
djnz r6,$
djnz r5,l4
djnz r4,l6
ret
table1: db 01h,02h,04h,08h,00h
table2: db 08h,04h,02h,01h,00h
delay4: mov r1,#150 d1: mov r2,#248
djnz r2,$
djnz r1,d1
ret
end