1、单片机计时秒表程序设计pic单片机计时秒表程序设计(时钟显示X围00.0099.99秒,分辨度为0.01秒) 来源:本站原创点击数: 1676更新时间:2008年07月12日/此程序实现计时秒表功能,时钟显示X围00.0099.99秒,分辨度:0.01秒#include p18f458.hunsigned char s4; /定义0.01 秒、0.1 秒、1秒、10秒计时器unsigned char k,data,sreg;unsigned int i;const table11=0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0XD8,0x80,0x90;/不带小数点的
2、显示段码表const table010=0X40,0X79,0X24,0X30,0X19,0X12,0X02,0X78,0X00,0X10; /带小数点的显示段码表void clkint(void);/TMR0初始化子程序void tmint()T0CON=0XCF; /设定TMR0L工作于8位定时器方式/内部时钟,TMR0不用分频INTCON=0X20; /总中断制止,TMR0中断允许,去除TMR0的中断标志INTCON2bits.TMR0IP=1; /TMR0中断高优先级RCONbits.IPEN=1; /使能中断优先级/系统其它局部初始化子程序void initial()TRISA=0x
3、00; /A口设置为输出TRISB=0XF0; /RB1输出,RB4输入TRISC=0x00; /SDO引脚为输出,SCK引脚为输出TRISE=0x00; /E口设置为输出SSPCON1=0x30; /SSPEN=1;CKP=1,FOSC/4SSPSTAT=0xC0; /时钟下降沿发送数据PIR1=0; /去除SSPIF标志data=0X00; /待显示的存放器赋初值PORTBbits.RB1=0;PORTAbits.RA3=0;PORTE=0; /将K1,K2,K3,K4四条列线置0 /SPI传输数据子程序void SPILED(char data)SSPBUF=data; /启动发送do;
4、while(PIR1bits.SSPIF=0);PIR1bits.SSPIF=0;/显示子程序,显示4位数void dispaly()PORTAbits.RA5=0; /准备锁存for(k=0;k4;k+)data=sk;if(k=2) data=table0data; /个位需要显示小数点else data=tabledata;SPILED(data); /发送显示段码for(k=0;k4;k+)data=0xFF;SPILED(data); /连续发送4个DARK,使显示好看一些PORTAbits.RA5=1; /最后给锁存信号,代表显示任务完成/软件延时子程序void DELAY()fo
5、r(i = 3553; -i ;)continue;/键扫描子程序void KEYSCAN()while(1)dispaly(); /调用一次显示子程序while(PORTBbits.RB4=0) DELAY(); /假设有键按下,那么软件延时 break;if (PORTBbits.RB4=0) break; /假设还有键按下,那么终止循环扫描,返回 /等键松开子程序void keyrelax()while(1)dispaly(); /调用一次显示子程序if (PORTBbits.RB4=1) break; /为防止按键过于灵敏,每次等键松开才返回 /*高优先级中断向量*/#pragma c
6、ode InterruptVectorHigh=0x08void InterruptVectorHigh (void)_asmgoto clkint /跳到中断程序_endasm/中断效劳程序#pragma code#pragma interrupt clkintvoid clkint()TMR0=0X13; /对TMR0写入一个调整值。因为写入TMR0后接着的/两个周期不能增量,中断需要3个周期的响应时间,/以及C语言自动进展现场保护要消耗周期INTCONbits.T0IF=0; /去除中断标志sreg=sreg+1; /中断计数器加1if(sreg=40) /中断次数为40后,才对S0,S
7、1,S2,S3 操作sreg=0;s0=s0+1;if(s0=10)s0=0 ;s1=s1+1;if(s1=10)s1=0 ;s2=s2+1;if(s2=10)s2=0;s3=s3+1;if(s3=10) s3=0;/主程序/.51hei. 提供此单片机程序有问题请联系main()tmint(); /TMR0初始化initial(); /spi显示初始化及系统其它局部初始化INTCONbits.GIE=0; /总中断制止while(1) for(k=0;k4;k+)sk=0; sreg=0; /赋显示初值dispaly(); /调用一次显示子程序KEYSCAN(); /键扫描,直到开场键按下k
8、eyrelax(); /等键松开INTCONbits.GIE=1; /总中断允许KEYSCAN(); /键扫描直到停顿键按下,在键扫描时有显示keyrelax(); /等键松开INTCONbits.GIE=0; /总中断制止KEYSCAN(); /键扫描到清0键按下,在键扫描时有显示 keyrelax(); /等键松开-汇编语言版本的pic单片机计时秒表程序设计-;此程序实现计时秒表功能;时钟显示X围:00.00秒-99.99秒,分辨度:0.01秒;通过按键来启动计时、停顿计时及清0;即第一次按下任意键开场计时,第二次按下任意键停顿计时 ;第三次按下任意键使LED清0,等待下一次计时开场LIS
9、T P=18F458INCLUDE P18F458.INCS0 EQU 0X20 ;0.01 秒计时器S1 EQU S0+1 ;0.1 秒计时器S2 EQU S0+2 ;1 秒计时器S3 EQU S0+3 ;10 秒计时器SREG EQU S0+4 ;软计数器LEDF EQU S0+5 ;显示的LED的位置指示存放器XW_TEMP EQU S0+6 ;用于中断中保护W的值XHOSTS EQU S0+7 ;用于中断中保护STATUS的值DEYH EQU S0+8DEYL EQU S0+9 ;以上两个存放器用于软件延时HOSTF EQU S0+0A ;用于中断中保护FSR0L的值TEMP EQU
10、S0+0B ;用于存放临时值ORG 0X00GOTO MAINORG 0X08GOTO CLKINT ;转向中断效劳程序ORG 0X30;数字到段码的转换子程序(最好放在程序开头,防止超过2K的空间发生跨页读表) ;*不带小数点的共阳极码表*CONVERT ADDWF PCL,1RETLW 0XC0 ;0,显示段码与具体的硬件连接有关RETLW 0XF9 ;1RETLW 0XA4 ;2RETLW 0XB0 ;3RETLW 0X99 ;4RETLW 0X92 ;5RETLW 0X82 ;6RETLW 0XD8 ;7RETLW 0X80 ;8RETLW 0X90 ;9RETLW 0X88 ;ARE
11、TLW 0X83 ;BRETLW 0XC6 ;CRETLW 0XA1 ;DRETLW 0X86 ;ERETLW 0X8E ;FRETLW 0X7F ;.RETLW 0XBF ;-RETLW 0X89 ;HRETLW 0XFF ;DARKRETURN;*带小数点的共阳极码表*CONVERT2 ADDWF PCL,1 RETLW 0X40 ;0RETLW 0X79 ;1RETLW 0X24 ;2RETLW 0X30 ;3RETLW 0X19 ;4RETLW 0X12 ;5RETLW 0X02 ;6RETLW 0X78 ;7RETLW 0X00 ;8RETLW 0X10 ;9RETURN;*SPI发
12、送显示子模块*TRANSMIT CLRF PORTA ;LACK送低电平,为锁存做准备MOVWF SSPBUF ;启动发送 WAIT NOPBTFSS PIR1,SSPIFGOTO WAIT ;等待发送完毕BCF PIR1,SSPIF ;去除中断标志RETURN;*显示子程序模块*DISPLAYMOVLW 0X01MOVWF LEDFMOVLW 0XA0MOVWF FSR0LAGAINXIANMOVF LEDF,WSUBLW 0X03BTFSS STATUS,ZGOTO XIANBMOVF INDF0,WCALL CONVERT2 ;假设是个位,那么查带小数点的码表GOTO TRANXIANB
13、 MOVF INDF0,WCALL CONVERTTRAN CALL TRANSMIT ;发送一个显示数据INCF FSR0LINCF LEDFMOVF LEDF,WSUBLW 0X05BTFSS STATUS,ZGOTO AGAINXIANMOVLW 0X01MOVWF LEDFXIANDARKMOVLW 0X27CALL CONVERTCALL TRANSMITINCF LEDFMOVF LEDF,WSUBLW 0X05BTFSS STATUS,ZGOTO XIANDARK ;显示4个DARKBSF PORTA,5 ;最后给一个锁存信号,代表一次显示任务完成RETURN;* S0计数溢出处
14、理子程序*CS0CLRF S0INCF S1RETURN;* S1计数溢出处理子程序*CS1CLRF S1INCF S2RETURN;* S2计数溢出处理子程序*CS2CLRF S2INCF S3RETURN;* S3计数溢出处理子程序*CS3CLRF S3RETURN;*时钟中断效劳程序*CLKINTMOVWF XW_TEMP ;保存W的值SWAPF STATUS,WMOVWF XHOSTS ;暂存STATUS的值MOVF FSR0L,WMOVWF HOSTF ;保存FSR0L的值。以上程序为中断现场保护MOVLW 0X13MOVWF TMR0L ;对TMR0L写入一个调整值,因为写入;TM
15、R0L后接着的两个周期不能增量BCF INTCON,T0IF ;去除中断标志INCF SREGMOVF SREG,WSUBLW 0X28 ;TMR0L 每250us中断一次BTFSS STATUS,Z ;其中断40次后才执行对S0 S1 S2 S3 的操作GOTO TIFANCLRF SREGINCF S0MOVF S0,WSUBLW 0X0ABTFSC STATUS,ZCALL CS0 MOVF S1,WSUBLW 0X0ABTFSC STATUS,ZCALL CS1MOVF S2,WSUBLW 0X0ABTFSC STATUS,ZCALL CS2MOVF S3,WSUBLW 0X0ABTF
16、SC STATUS,ZCALL CS3TIFANMOVF HOSTF,W ;以下为中断现场恢复MOVWF FSR0L ;恢复间接寻址指针FSR0L的值SWAPF XHOSTS,WMOVWF STATUS ;恢复STATUS的值SWAPF XW_TEMP,1SWAPF XW_TEMP,W ;恢复W的值RETFIE ;* TMR0初始化子程序*CLKINSUBMOVLW 0XCFMOVWF T0CON ;设定TMR0L工作于8位定时器方式 ;内部时钟,TMR0不用分频BCF INTCON,TMR0IF ;去除TMR0的中断标志BCF INTCON,GIE ;总中断制止BSF INTCON,TMR0
17、IE ;TMR0中断允许BSF INTCON2,2 ;TMR0中断高优先级BSF RCON,7 ;使能中断优先级RETURN;*系统初始化子程序*MAINSUBBCF TRISA,5 ;置RA5为输出方式,以输出锁存信号BCF TRISB,1BCF TRISA,3BCF TRISE,0BCF TRISE,1BSF TRISB,4 ;设置与键盘有关的各口的输入输出方式BCF TRISC,5BCF TRISC,3 ;设置SCK与SDO为输出方式BCF INTCON,GIE ;关闭所有中断MOVLW 0XC0MOVWF SSPSTAT ;设置SSPSTAT存放器MOVLW 0X30MOVWF SSP
18、CON1 ;设置SPI的控制方式,允许SSP方式,;并且时钟下降沿发送,与74HC595当;其SCLK从低到高平跳变时,串行输入数据;(DI)移入存放器的特点相对应RETURN ;返回 ;*键扫描子程序*KEYSCANBCF PORTB,1BCF PORTA,3BCF PORTE,0BCF PORTE,1 ;送低电平至K1,K2,K3,K4 RETURN ;*键盘去抖子程序(8ms的延时)*KEYDELAYMOVLW 0X0AMOVWF DEYHAGAIN2 MOVLW 0XFFMOVWF DEYLAGAIN1 DECFSZ DEYL,1GOTO AGAIN1DECFSZ DEYH,1GOTO
19、 AGAIN2 ;具体程序语句参考3. 2节RETURN ;*显示缓冲区处理子程序*XIANHUANMOVLW 0XA0MOVWF FSR0LRLNCF S0,0MOVWF TEMPINCF TEMP,0 MOVWF INDF0INCF FSR0LRLNCF S1,0MOVWF TEMPINCF TEMP,0 MOVWF INDF0INCF FSR0LRLNCF S2,0MOVWF TEMPINCF TEMP,0 MOVWF INDF0INCF FSR0LRLNCF S3,0MOVWF TEMPINCF TEMP,0 MOVWF INDF0RETURN;*主程序*MAIN NOPCALL MA
20、INSUB ;系统初始化CALL CLKINSUB ;调用时钟初始化子程序DENJIAN BCF INTCON,GIECLRF S0CLRF S1CLRF S2CLRF S3CLRF SREGCLRF LEDF ;S0=S1=S2=S3=0CALL XIANHUAN ;把S3、S2、S1、S0的值装入显示缓冲区CALL DISPLAY ;显示DENAN BCF INTCON,GIE ;关中断CALL KEYSCAN ;进展键扫描BTFSS PORTB,4GOTO XIAODOU1 ;如起始键按下,那么消抖动GOTO DENAN ;如起始键没按下,那么继续等待XIAODOU1CALL KEYDE
21、LAY ;延时消抖动CALL KEYSCAN ;再次进展键扫描BTFSC PORTB,4GOTO DENAN ;假设为干扰,那么再次等待键按下CLRF S0CLRF S1CLRF S2CLRF S3CLRF SREG ;设置新一次计时的初始条件 WAITS CALL KEYSCAN BTFSS PORTB,4GOTO WAITS ;为了防止按键过于灵敏,等键松开后再进展;下面的操作 BSF INTCON,GIE ;开总中断HERE CALL XIANHUAN ;显示缓冲区处理 CALL DISPLAY ;即时更新显示内容CALL KEYSCAN BTFSS PORTB,4GOTO XIAODO
22、U ;假设停顿计时键按下,那么消抖GOTO HERE ;假设停顿计时键没按下,那么继续等待中断计时XIAODOUCALL DISPLAY ;利用消抖动时间调用显示程序CALL DISPLAY CALL DISPLAY CALL DISPLAYCALL DISPLAYCALL DISPLAY CALL DISPLAY CALL DISPLAY CALL DISPLAYCALL KEYSCANBTFSC PORTB,4GOTO HERE ;假设为干扰,那么继续等待停顿键按下 BCF INTCON,GIE ;假设停顿键按下,那么制止中断CALL DISPLAY ;假设不为干扰,那么制止中断,更新显示内容 WAITR CALL KEYSCAN BTFSS PORTB,4GOTO WAITR ;为了防止按键过于灵敏,等键松开后再进展;下面的操作 DENDAI CALL KEYSCANBTFSC PORTB,4GOTO DENDAI ;循环进展键扫描,等待清0键按下CALL KEYDELAY ;延时消抖CALL KEYSCANBTFSC PORTB,4GOTO DENDAI WAIT19 CALL KEYSCANBTFSS PORTB,4GOTO WAIT19 ;等键松开 GOTO DENJIAN ;新一次计时开场END
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1