org 00h ;程序上電從00h開始
ajmp main ;跳轉到主程序
org 0030h ;主程序起始地址
main:
mov a,#0feh ;給A賦值成11111110
mov r0,#8
loop:
mov p0,a ;將A送到P1口,發(fā)光二極管低電平點亮
; mov p2,a
lcall delay ;調用延時子程序

rl a ;累加器A循環(huán)左移一位
djnz r0,loop
mov p0,#0ffh

mov a,#7fh
mov r0,#8
loop1:
mov p2,a ;將A送到P1口,發(fā)光二極管低電平點亮
; mov p2,a
lcall delay ;調用延時子程序
rr a ;累加器A循環(huán)左移一位
djnz r0,loop1
mov p2,#0ffh

ajmp main ;重新送P1顯示
delay:
mov r3,#10 ;最外層循環(huán)二十次
d1:
mov r4,#80 ;次外層循環(huán)八十次
d2:
mov r5,#250 ;最內層循環(huán)250次
djnz r5,$ ;總共延時2us*250*80*20=0.8S
djnz r4,d2
djnz r3,d1
ret
end