欢迎来到天天文库
浏览记录
ID:58863509
大小:388.00 KB
页数:7页
时间:2020-09-22
《基于pic单片机数字电压表仿真设计.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、广州白云技师学院电子系技师班单片机课程项目化教学系列基于PIC16F877A单片机(5v-220v)数字电压表仿真设计该仿真设计是笔者在教学09技师《智能电子产品开发与应用》指导学生完成的,主要目的是让学员在熟练掌握PIC单片机AD转换功能。可提供给初学PIC单片机的爱好者参考。功能:1、开机显示选择菜单(table[]="youcanchoice";table1[]="check:5vor220v";)2、按k1键盘进入子菜单(table2[]="K2:5vK3:220v";table2[]="K2:
2、5vK3:220v";)3、可以通过k2或k3进行5V和220V电压的测试4、k4键盘返回主菜单一、仿真效果图:二、参考代码/***************************main()****************************/#include#include"delay.c"#include"1602dis.c"#include"ad_change.c"#include"keyscan.c"__CONFIG(0X3B31);#defineucharunsignedc
3、har#defineuintunsignedintvoidmain(){AD_init();init_1602();lcddis_basic();while(1){keyscan();}}/******************************AD转换******************************/#defineucharunsignedchar#defineuintunsignedintuchara,b,c,d;voidAD_init(){TRISA=0x01;ADCON0=0x8
4、0;ADCON1=0x80;}voidAD_start(){ADON=1;delay(1);ADGO=1;}floatAD_zh(){uintadval;floatadvalf;AD_start();while(ADGO);adval=ADRESH;adval=adval<<8
5、ADRESL;adval=adval+1;if(adval==1)adval=0;advalf=adval/1024.0;//adval=advalf*1000;return(advalf);}/****************
6、*************1602dis******************************/#defineRSRC0#defineRWRC1#defineERC2#definelcd_datPORTDconstuchartable[]="youcanchoice";constuchartable1[]="check:5vor220v";constuchartable2[]="K2:5vK3:220v";constuchartable2[]="K2:5vK3:220v";voidw1602_co
7、m(ucharcom){//TRISD=0;RS=0;RW=0;E=0;delay(1);lcd_dat=com;E=1;delay(1);E=0;delay(1);RS=1;}voidw1602_date(uchardate){RS=1;RW=0;E=0;delay(1);E=1;delay(1);lcd_dat=date;E=0;delay(1);RW=0;RS=0;}voidinit_1602(){TRISC=0;TRISD=0;w1602_com(0x38);w1602_com(0x01);w1
8、602_com(0x06);w1602_com(0x0C);w1602_com(0x80);}voidlcddis_basic(){uchari;w1602_com(0x80);for(i=0;i<16;i++){w1602_date(table[i]);delay(1);}w1602_com(0x80+0x40);for(i=0;i<16;i++){w1602_date(table1[i]);delay(1);}}voidlcddis_hope(){uchari;w1602_com(0x80);for
9、(i=0;i<16;i++){w1602_date(table2[i]);delay(1);}w1602_com(0x80+0x40);for(i=0;i<16;i++){w1602_date(table3[i]);delay(1);}}/*********************************keyscan()********************************/#defineucharunsignedchar#de
此文档下载收益归作者所有