org 00h
ljmp start
start:
mov a,#0ffh ;设置移动初值
clr c ;清0
mov r4,#08h ;移动8次
loop:
rlc a ;左移一位
mov p1,a ;输出至p1
lcall delay ;延迟200ms
djnz r4,loop ;左移7次?
mov r4,#07h ;
loop1:
rrc a
mov p1,a
lcall delay
djnz r4,loop1
mov r4,#07h
ret
;//==========延迟200ms============
delay: ;延迟200ms
mov r1,#20
d1: ;延迟10ms
mov r2,#20
d2:
mov r3,#250
djnz r3,$
djnz r2,d2
djnz r1,d1
ret
end
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请
点击举报。