PIC单片机闪烁程序

   #INCLUDE "P16F877.inc" ;芯片型号
 
   org   000h
   GOTO  a1
   org   1ch
 
;************************************************
;    主程序
;************************************************  
a1   
   BSF STATUS,RP0 ;选择体1
   BCF STATUS,RP1  
   MOVLW 00H ;设置RD口为输出口
   MOVWF TRISD        
   BCF  STATUS,RP0 ;选择体0
   MOVLW 00H ;
   MOVWF PORTD ;RD口输出低电平
   CALL M001 ;延时
   MOVLW 0FFH ;
   MOVWF PORTD ;RD口输出高电平
   CALL M001 ;延时
   goto a1 ;反复执行
;****************************************************
;    延时子程序
;****************************************************
M001
   MOVLW  4
   MOVWF  30H
M002  MOVLW  250
   MOVWF  31H
M003  MOVLW  248
   MOVWF  32H
   DECFSZ  32H,1  
   GOTO  $-1
   DECFSZ  31H,1  
   GOTO  M003
   DECFSZ  30H,1  
   GOTO  M002
   RETURN
;*******************************************************
;   程序结束
;*******************************************************   
   end

相关文章