跑马灯2.asm

来自「单片机写的程序都含有Protues仿真结果」· 汇编 代码 · 共 48 行

;一个一个亮
    org 0000h           
  r:clr p3.2   
    lcall l1
    setb p3.2
    clr p3.1
    lcall l1
    setb p3.1    
    clr p3.0
    lcall l1
    setb p3.0
    ljmp r

 l1:mov r0,#08h
    mov a,#01h
    
 l2:mov p0,a
    rl a
    lcall delay
    djnz r0,l2
    anl a,#00h
    mov p0,a
    ret
 
delay:mov r1,#10
  kk3:mov r2,#100
  kk2:mov r3,#100
  kk1:djnz r3,kk1
      djnz r2,kk2
      djnz r1,kk3
      ret
      end