2018年01月27日 | LED跳机控制程序

mcu:EM78P153 
      port5 ==0x05 
      dly1  ==10h 
      dly2  ==11h 
      dly3  ==12h 

      time  ==13h 
      mode1==15h 
      mode2==16h 

 ;**************主程序***************** 

            org   0X00 
  main:        
             MOV      a,@00h 
            iow     port5    
             MOV        a,@64         ;2s 
             MOV        time,a 
             MOV        a,@3 
             MOV        mode1,a 
   loop1    bs        port5,2 
            call      delay1 
            bc        port5,2 
            call      delay2  
            djz       mode1 
            jmp       loop1 
 ;      
             MOV        a,@32      ;1s 
             MOV        time,a 
             MOV        a,@3 
             MOV        mode1,a 
   loop2    bs        port5,2 
            call      delay1 
            bc        port5,2 
            call      delay2  
            djz       mode1 
            jmp       loop2  
;             
            
             MOV        a,@3 
             MOV        mode1,a 
   loop3     MOV        a,@40      ;1.25S 
             MOV        time,a 
            bs        port5,2 
            call      delay1 
            bc        port5,2 
            call      delay2 
           
             MOV        a,@3 
             MOV         mode2,a 
        l1  bs        port5,2 
            call      delay1 
            bc        port5,2 
             MOV        a,@16     ;0.5S 
             MOV        time,a 
            call      delay2 
            djz       mode2 
            jmp       l1  
            djz       mode1 
            jmp       loop3 
  ;                      
             MOV        a,@8      ;0.3S 
             MOV        time,a 
             MOV        a,@10 
             MOV        mode1,a 
   loop4    bs        port5,2 
            call      delay1 
            bc        port5,2 
            call      delay2  
            djz       mode1 
            jmp       loop4 
            jmp       main                  
 ;*****************延时子程序*********** 
 ;***************** 灯亮时间15ms******** 
   delay1: 
            MOV     a,@140 
            MOV     dly1,a 
    lf0     MOV     a,@33 
            MOV     dly2,a 
    lf1    djz    dly2 
           jmp    lf1 
           djz    dly1 
           jmp    lf0 
           ret 

 ;***************** 灯灭时间 *********** 

 delay2:  
           MOV      a,time 
           MOV      dly3,a 
    lp3    MOV      a,@200 
           MOV      dly1,a 
    lp2    MOV      a,@50 
           MOV      dly2,a 

    lp1    djz    dly2 
           jmp    lp1 
           djz    dly1 
           jmp    lp2 
           djz    dly3 
           jmp    lp3 
           ret            
           end