跑马灯4.asm

单片机写的程序都含有Protues仿真结果

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


l1: mov a,#0a0h     ;7-0两个两个闪
    mov p0,a
    rr a
    lcall delay
    mov p0,a
    lcall delay
    mov a,#0ah  
    mov p0,a
    rr a
    lcall delay
    mov p0,a
    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