PIC单片机花式点亮LED

2019-04-15 11:41发布

站内文章 / PIC单片机
17025 0 1159
编写LED点亮程序，要求循环实现以下功能：
  • 打开所有的LED灯
  • 从左到右依次熄灭其中一个LED灯
  • 从左到右依次点亮其中一个LED灯
  • 从右到左依次熄灭其中一个LED灯
  • 从左到右逐个点亮LED灯
  • 关闭所有的LED灯
  • 从右到左逐个点亮LED灯
  • 关闭所有的LED灯
  • 从外向内对称点亮LED灯
  • 从外向内对称关闭LED灯
;******************************************************************************** ; 跳线接法：用短接帽短接P14 ; 功能描述: 8位LED接PORTD，L1~L8分别对应RD0~RD7 ;******************************************************************************/ list p=16f877A ; 标明所用的处理器类型 #include <p16f877A.inc> ; 调用头文件 __CONFIG _CP_OFF & _WDT_OFF & _BODEN_OFF & _PWRTE_OFF & _HS_OSC & _WRT_OFF & _LVP_OFF & _CPD_OFF;熔丝位配置字 ; _CP_OFF: 代码保护关闭 ; _WDT_OFF: 看门狗关闭 ; _BODEN_OFF: 低压复位关闭 ; _PWRTE_OFF: 上电延时计数关闭 ; _HS_OSC : 外部高速振荡器使能 ; _WRT_OFF : 写程序存储器保护关闭 ; _LVP_OFF : 低电压编程关闭 ; _CPD_OFF : EEPROM存储器代码保护 ;***** 变量声明******************************************************* D1 EQU 0x20 ; 变量1，在HC595的初始化中使用 PORTD_SHADOW EQU 0x21 ; PORTD的影子寄存器 L1 EQU 0x77 ; 延时函数循环变量 L2 EQU 0x78 ; 延时函数循环变量 L3 EQU 0x79 ; 延时函数循环变量 i EQU 0x7A ; 循环变量i TEMP EQU 0x7B ; 临时变量TEMP w_temp EQU 0x7D ; 中断现场保护 status_temp EQU 0x7E ; 中断现场保护 pclath_temp EQU 0x7F ; 中断现场保护 ;********************************************************************** ORG 0x0000 ; 复位入口地址 nop ; 与ICD调试配合的nop goto main ; 跳转到Main ;********************************************************************** ORG 0x0004 ; 中断向量入口地址 movwf w_temp ; 入栈保护 movf STATUS,w movwf status_temp movf PCLATH,w movwf pclath_temp ;********************************************************************** ;********************************************************************** EndOfInt movf pclath_temp,w ; 出栈 movwf PCLATH movf status_temp,w movwf STATUS swapf w_temp,f swapf w_temp,w ;********************************************************************** retfie ; 中断返回 ;--------------------Main的代码----------------------------------------------------------------- main ;************************开发板显示界面的通用初始化********************************* banksel TRISD ; 选择bank1 clrf TRISD ; 设置RD0-RD7为输出模式 bcf TRISE, PSPMODE ; 设置D端口为I/O端口模式 call HC595_Init ; 调用子程序，初始化HC595 movlw 0x00; ; 设置选中的HC595行 call HC595_Write_Byte ; 调用子程序，选中所需的HC595行 call TurnOff_7LEDs ; 调用子程序，关闭七段码LED ;********************************************************************************** banksel PORTD ; 选择bank0 Loop1 movlw b'00000000' ; 打开所有的LED灯 movwf PORTD movlw .100 call DelayMS movlw b'00000001' movwf PORTD_SHADOW movlw .8 movwf i Loop2 ; 从左到右依次熄灭其中一个LED灯 movf PORTD_SHADOW,W movwf PORTD movlw .100 call DelayMS bcf STATUS,C RLF PORTD_SHADOW decfsz i,F goto Loop2 movlw .8 movwf i movlw b'11111110' movwf PORTD_SHADOW Loop3 ; 从左到右依次点亮其中一个LED灯 movf PORTD_SHADOW,W movwf PORTD movlw .100 call DelayMS bsf STATUS,C RLF PORTD_SHADOW decfsz i,F goto Loop3 movlw .8 movwf i movlw b'10000000' movwf PORTD_SHADOW Loop4 ; 从右到左依次熄灭其中一个LED灯 movf PORTD_SHADOW,W movwf PORTD movlw .100 call DelayMS bcf STATUS,C RRF PORTD_SHADOW decfsz i,F goto Loop4 movlw .8 movwf i movlw b'11111110' movwf PORTD_SHADOW Loop5 ; 从左到右逐个点亮LED灯 movf PORTD_SHADOW,W movwf PORTD movlw .100 call DelayMS bcf STATUS,C RLF PORTD_SHADOW decfsz i,F goto Loop5 movlw b'11111111' ; 关闭所有LED灯 movwf PORTD movlw .100 call DelayMS movlw .8 movwf i movlw b'01111111' movwf PORTD_SHADOW Loop6 ; 从右到左逐个点亮LED灯 movf PORTD_SHADOW,W movwf PORTD movlw .100 call DelayMS bcf STATUS,C RRF PORTD_SHADOW decfsz i,F goto Loop6 movlw b'11111111' ; 关闭所有LED灯 movwf PORTD movlw .100 call DelayMS movlw .4 movwf i movlw b'01111110' movwf PORTD_SHADOW movwf TEMP Loop7 ; 从外向内对称点亮LED灯 movf PORTD_SHADOW,W movwf PORTD movlw .100 call DelayMS bcf STATUS,C RRF PORTD_SHADOW bcf STATUS,C RLF TEMP movf TEMP,W andwf PORTD_SHADOW,F decfsz i,F goto Loop7 movlw .4 movwf i movlw b'10000001' movwf PORTD_SHADOW movwf TEMP Loop8 ; 从外向内对称关闭LED灯 movwf PORTD movlw .100 call DelayMS bsf STATUS,C RRF PORTD_SHADOW bsf STATUS,C RLF TEMP movf TEMP,W addwf PORTD_SHADOW,W decfsz i,F goto Loop8 goto Loop1 ; 重复主循环 ;------------------------------子函数----------------------------------------------- ;********HC595_Init****************** HC595_Init ; 初始化 74HC595 banksel ADCON1 movlw 0x8E movwf ADCON1 bcf TRISA, 5 ; SCK_595 bcf TRISE, 0 ; RCK_595 bcf TRISC, 0 ; SER_595 return ; ;********HC595_Write_Byte*********** HC595_Write_Byte ; 设置 74HC595选中的行，具体的行数由W寄存器的值决定 banksel D1 movwf D1 movlw .8 movwf i Loop_595 btfsc D1, 7 goto SET1_595 goto SET0_595 SET1_595 bsf PORTC, 0 goto Clock_595 SET0_595 bcf PORTC, 0 goto Clock_595 Clock_595 nop bcf PORTA, 5 RLF D1, f bsf PORTA, 5 decfsz i, f goto Loop_595 bcf PORTE, 0 nop bsf PORTE, 0 nop return ;********TurnOff_7LEDs ************* TurnOff_7LEDs ; 关闭七段码显示器 banksel TRISA bcf TRISA, 2 bcf TRISA, 3 bcf TRISA, 4 banksel PORTA bsf PORTA, 2 bsf PORTA, 3 bsf PORTA, 4 return ;**************DelayMS************** DelayMS ; 延时x毫秒，x由变量W设定 movwf L1 LL1 movlw .17 movwf L2 LL2 movlw .97 movwf L3 LL3 decfsz L3, f goto LL3 decfsz L2, f goto LL2 decfsz L1, f goto LL1 return ;---------------------------------------------------------------------------------- END ; 程序结束