jzkny 

 各位高手帮我一把，看看程序为吗不会中断呀？[原创]
org 0000h
   clr p1.5
   sjmp zd0
   setb ea
   setb ex1
   org 0013h
   org 30h
   sjmp l13
 l13:  push psw
   jnb p1.0,zd1
   jnb p1.1,zd2
   jnb p1.2,zd3
   jnb p1.3,zd4
 l12:pop psw
   clr ea
   reti
 zd0:mov a,#0feh
l1: rr a
lcall l2
sjmp l1
l2:mov r2,#01h
l3:mov p0,a
lcall delay
mov p0,#0ffh
lcall delay
djnz r2,l3
ret
zd1:mov a,#0feh
l9: rl a
lcall l10
sjmp l9
l10:mov r2,#02h
l11:mov p0,a
lcall delay
mov p0,#0ffh
lcall delay
djnz r2,l11
ret
zd2:mov a,#0feh
l14: rr a
lcall l5
sjmp l14
l15:mov r2,#03h
l16:mov p0,a
lcall delay
mov p0,#0ffh
lcall delay
djnz r2,l16
ret
zd3:mov a,#0feh
l17: rr a
lcall l18
sjmp l17
l18:mov r2,#04h
l19:mov p0,a
lcall delay
mov p0,#0ffh
lcall delay
djnz r2,l19
ret
zd4:mov a,#0feh
l20: rr a
lcall  l21
sjmp l20
l21:mov r2,#05h
l22:mov p0,a
lcall delay
mov p0,#0ffh
lcall delay
djnz r2,l22
ret
delay:mov r3,#03h
l4:mov r4,#0c8h
l5:mov r5,#0c8h
l6:djnz r5,l6
l7:djnz r4,l5
l8:djnz r3,l4
ret
end


发表时间:2003年4月27日22:50:48