PIC单片机各种流水灯C程序,编译通过可运行.doc_第1页
PIC单片机各种流水灯C程序,编译通过可运行.doc_第2页
PIC单片机各种流水灯C程序,编译通过可运行.doc_第3页
PIC单片机各种流水灯C程序,编译通过可运行.doc_第4页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

#include#include#include#use delay(clock = 4000000)#fuses XT,NOWDT#use rs232(baud = 9600, xmit = PIN_C6, rcv = PIN_C7)/ PC#bit run=0x7.2#bit Tris_C2=0x87.2#bit test=0x7.3#bit tris_c3=0x87.3#define TIMER1_4MS (0xFFFF - 500 + 1)char RevHead;/ 接收指针char RevChar;/ 接收字符char Received;char CommSelect;char zhugedl;char zhugedm;#define RECEIVE_BUF_LEN 40/ 接收缓冲区长度char RevBufRECEIVE_BUF_LEN;/ 接收缓冲区char nihongd();char zhugedianl();char zhugedianm();char zidingy(char c);/*=*/void main(void) set_tris_a(0x00); set_tris_b(0x00); tris_c2=0; tris_c3=0; Received=0; RevHead=0; Revchar=0; output_a(0x3f); output_b(0xff); run=0; test=0; while(1) nihongd(); delay_ms(1000); zhugedianl(); delay_ms(1000); zhugedianm(); delay_ms(1000); setup_timer_1(T1_INTERNAL | T1_DIV_BY_8); disable_interrupts(INT_TIMER1); enable_interrupts(INT_RDA); enable_interrupts(GLOBAL); delay_ms(1000); while(1) switch(Revchar) case 0xa0: set_timer1(TIMER1_4MS);/启动定时器 enable_interrupts(INT_TIMER1); break; case 0xa1: nihongd(); break; case 0xa2:zhugedianl(); break; case 0xa3:zhugedianm(); break; case 0xa4:zidingy(Revchar); break; default: break; /end while(1) /*/*/*/*/*/ 接收中断函数/*/*/*/*/*/#INT_RDAvoid Rda_Isr(void)Revchar =getc(); / end/ 定时器1中断函数/*/*/*/*/*/#int_TIMER1void timer1_isr(void)static unsigned int i=0;i+;if(i250) i=0; run=run; / end/-char nihongd() output_b(0xaa);delay_ms(200);output_b(0x55);delay_ms(200);output_b(0xaa);delay_ms(200);output_b(0x55);delay_ms(500);output_b(0xff);delay_ms(500);output_b(0x00);delay_ms(500);return 1; char zhugedianl()zhugedl=0xff;output_a(zhugedl);delay_ms(500);dozhugedl=1;output_b(zhugedl);delay_ms(200); while(zhugedl0); return 1;char zhugedianm()zhugedm=0x00;output_b(zhugedm);delay_ms(500);zhugedm=zhugedm+0x01;output_b(zhugedm);delay_ms(500);dozhugedm=1;zhugedm=zhugedm+0x01;output_b(zhugedm);del

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论