下载本文档
版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领
文档简介
1、./*PIC12F629 基于开关控制的三段调光功能*Author:Zhu WeiDate:2015-10-10Version:V1.0_实现目地：开关一次，LED1亮，再开关一次，LED2亮，再开关一次，LED1与LED2同时亮，再开关一次，重复循环，开关时间超过3S，则开关一次，重新从LED1开始亮*/#include_CONFIG(0x154);#define uchar unsigned char #define uint unsigned int #define LED GP0uchar Q=0,P=0,b=0,time=0,m=0,n=0; /EEPROM存储数据uint coun
2、t=0;void delay(uint i);void INIT(void);uchar read_in_eeprom(uchar);void write_in_eeprom(uchar,uchar);void delay(uint i)uint e,r;for(e=0;e1000;e+)for(r=0;r5)P=0;write_in_eeprom(0x10,P);while(1)if(P!=0x05)if(m=1)write_in_eeprom(0x10,0x00);m=0;T1CON = 0x00; if(b=1)LED=1;delay(500);b=0;LED=0;elseLED=0;e
3、lse if(P=0x05)if(m=1)write_in_eeprom(0x10,0x00);m=0;T1CON = 0x00; GPIO=0x01;delay(10);GPIO=0x00;delay(10);void interrupt ISR(void)if(TMR1IE&TMR1IF=1)TMR1H =(65536-50000)/256; TMR1L =(65536-50000)%256;TMR1IF=0; time+;if(time=40)time=0;m=1;if(INTE&INTF=1)INTF=0;b=1;/读EE子函数,有返回值uchar read_in_eeprom(uch
4、ar x1)RP0=1;dowhile(RD = 1);/等待读完成EEADR=x1;GIE=0;RD=1;dowhile(RD = 1);/等待读完成Q=EEDATA;return EEDATA;/写EE子函数，无返回值void write_in_eeprom(uchar write_add,uchar write_data)RP0=1;dowhile(WR = 1);/等待写完成EEADR=write_add;EEDATA=write_data;GIE=0; WREN=1;EECON2=0x55;EECON2=0xAA;WR=1;do while(WR = 1);/等待写完成WREN=0;GIE=1;/初始化void INIT(void) OPTION_REG=0b00000010; /全局使能上拉INTCON = 0xd0;/全局中断、外设中断使能 TRISIO=0b11111100;/设置GP1,GP2为输入，其它口为输出 CMCON=0x07;/关比较器PIR1 = 0x00;/中断标志位寄存器PCON = 0x00;/电源控制寄存器LED=0;TMR1H =(65536-50000)/256; TMR1L =(65536-50000
温馨提示
- 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
评论
0/150
提交评论