版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、单片机 C 语言程序设计实训 100例基于 8051+Proteus 仿真案例第 01 篇 基础程序设计01 闪烁的 LED/* 名称:闪烁的 LED说明:LED按设定的时间间隔闪烁*/#include<>#define uchar unsigned char#define uint unsigned intsbit LED=P1A0;.rn");Puts_to_SerialPort("rn");DelayMS(50);while(1)Putc_to_SerialPort(c+'A');DelayMS(100);Putc_to_Seri
2、alPort(' ');DelayMS(100);if(c=25) With PCB layout now offering automation of both component ", "can often be the most time consuming element of the exercise.", "And if you use circuit simulation to develop your ideas, ", "you are going to spend even more time wo
3、rking on the schematic."/ 显示缓冲( 2 行)uchar Disp_Buffer32;/ 垂直滚动显示void V_Scroll_Display()uchar i,j,k=0;uchar *p=Msg0;uchar *q=MsgLine_Count+strlen(MsgLine_Count);/ 以下仅使用显示缓冲的前16 字节空间while(p<q)for(i=0;i<16&&p<q;i+)/ 消除显示缓冲中待显示行首尾可能出现的空格if(i=0|i=15)&&*p=' ') p+;if(*
4、p!='0')Disp_Bufferi=*p+;elseif(+k>Line_Count) break;p=Msgk;/p 指向下一串的首地址Disp_Bufferi=*p+;/ 不足 16 个字符时空格补充for(j=i;j<16;j+) Disp_Bufferj=' '/ 垂直滚动显示while(F0) DelayMS(5);ShowString(0,0,"");DelayMS(150);while(F0) DelayMS(5);ShowString(0,1,Disp_Buffer);DelayMS(150);while(F0
5、) DelayMS(5);ShowString(0,0,Disp_Buffer);ShowString(0,1,"");DelayMS(150);/ 最后清屏ShowString(0,0,"");ShowString(0,1,"");/ 水平滚动显示void H_Scroll_Display()uchar i,j,k=0,L=0;uchar *p=Msg0;uchar *q=MsgLine_Count+strlen(MsgLine_Count);/ 将 32 个字符的显示缓冲前 16 个字符设为空格for(i=0;i<16;i+
6、) Disp_Bufferi=' 'while(p<q)/ 忽略缓冲中首尾可能出现的空格if(i=16|i=31)&&*p=' ') p+;for(i=16;i<32&&p<q;i+)if(*p!='0')Disp_Bufferi=*p+;elseif(+k>Line_Count) break;p=Msgk;/p 指向下一串的首地址Disp_Bufferi=*p+;/ 不足 32 个字符时空格补充for(j=i;j<32;j+) Disp_Bufferj=' '/ 水平
7、滚动显示for(i=0;i<=16;i+)while(F0) DelayMS(5);ShowString(0,L,Disp_Buffer+i);while(F0) DelayMS(5);DelayMS(20);L=(L=0)?1:0;/ 行号在 0, 1 间交替DelayMS(300);/ 如果显示结束时停留在第0 行,则清除第 1 行的内容if(L=1) ShowString(0,1,"");/ 外部中断 0 ,由 K3 控制暂停与继续显示void EX_INT0() interrupt 0F0=!F0;/ 暂停与继续显示控制标志位/ 主程序void main()u
8、int Count=0;IE=0x81;/允许外部中断0IT0=1;/下降沿触发F0=0;/暂停与继续显示控制标志位Initialize_LCD();ShowString(0,0,Prompt);ShowString(0,1,Prompt+16);while(1)if(K1=0)V_Scroll_Display();DelayMS(300);elseif(K2=0)H_Scroll_Display();DelayMS(300);/* 名称:液晶控制与显示程序说明:本程序是通用的 1602 液晶控制程序。*/#include<>#include<>#define ucha
9、r unsigned char#define uint unsigned intsbit RS=P2A0;sbit RW=P2A1;sbit EN=P2A2;/ 延时void DelayMS(uint ms)uchar i;while(ms-) for(i=0;i<120;i+);/ 忙检查uchar Busy_Check()uchar LCD_Status;RS=0;/寄存器选择RW=1;/读状态寄存器EN=1;/开始读DelayMS(1);LCD_Status=P0;EN=0;return LCD_Status;/写LC%令void Write_LCD_Command(uchar c
10、md)while(Busy_Check()&0x80)=0x80);/ 忙等待RS=0;/ 选择命令寄存器RW=0;/ 写EN=0;P0=cmd;EN=1;DelayMS(1);EN=0;/ 发送数据void Write_LCD_Data(uchar dat)while(Busy_Check()&0x80)=0x80);/ 忙等待RS=1;RW=0;EN=0;P0=dat;EN=1;DelayMS(1);EN=0;/LCD 初始化void Initialize_LCD()清屏 字符进入模式:屏幕不动,字符后移 显示开,光标关Write_LCD_Command(0x38);Del
11、ayMS(1);Write_LCD_Command(0x01);DelayMS(1); /Write_LCD_Command(0x06);DelayMS(1); /Write_LCD_Command(0x0c);DelayMS(1); / / 显示字符串void ShowString(uchar x,uchar y,uchar *str)uchar i=0;if(y=0) Write_LCD_Command(0x80|x); / 设置显示起始位置if(y=1) Write_LCD_Command(0xc0|x);for(i=0;i<16;i+)/ 输出字符串Write_LCD_Data(
12、stri); 1319 用 ADC0808控制 PWMt出 /* 名称:用ADC0808控制PW喻出说明:使用数卞莫转换芯片ADC0808通过调节可变电阻 RV1来调节脉冲宽度,运行程序时,通过虚拟示波器观察占空比的变化。*/#include<> #define uchar unsigned char#define uint unsigned int/ 时钟信号/ 启动信号/ 转换结束信号/ 输出使能/PWM 输出sbit CLK=P2A4;sbit ST=P2A5;sbit EOC=P2A6;sbit OE=P2A7;sbit PWM=P3A0;/ 延时void DelayMS(
13、uint ms) uchar i;while(ms-) for(i=0;i<40;i+);/ 主程序void main()uchar Val;TMOD=0x02; /T1 工作模式 2TH0=0x14;TL0=0x00;IE=0x82;TR0=1;while(1)ST=0;ST=1;ST=0;/启动 A/D 转换while(!EOC);/等待转换完成OE=1;Val=P1;OE=0;/读转换值if(Val=0) /PWM输出(占空比为 0%)PWM=0;DelayMS(0xff); continue;if(Val=0xff)/PWM 输出(占空比为100%)PWM=1;DelayMS(0
14、xff);continue;PWM=1;/PWM 输出(占空比为0%100%)DelayMS(Val);PWM=0;DelayMS(0xff-Val);/T0定时器中断给 ADC080巡供时钟信号void Timer0_INT() interrupt 1CLK=CLK;20 ADC0809 数模转换与显示/* 名称:ADC080激模转换与显示说明:ADC080睬样通道3输入的模拟量,转换后的结果显示在数码管上。*/#include<>#define uchar unsigned char#define uint unsigned int/ 各数字的数码管段码(共阴)/ 时钟信号 /
15、 启动信号 / 转换结束信号 / 输出使能uchar code DSY_CODE=0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f;sbit CLK=P1A3;sbit ST=P1A2;sbit EOC=P1A1;sbit OE=P1A0;/ 延时void DelayMS(uint ms)uchar i;while(ms-) for(i=0;i<120;i+);/ 显示转换结果void Display_Result(uchar d)P2=0xf7;/ 第 4 个数码管显示个位数P0=DSY_CODEd%10;DelayMS(5);P2=0xfb;/ 第 3 个数码管显示十位数P0=DSY_CODEd%100/10;DelayMS(5);P2=0xfd;/ 第 2 个数码管显示百位数P0=DSY_CODEd/100;DelayMS(5);/ 主程
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 二零二五年度高息借贷业务合同范本6篇
- 2025年度钢筋加工厂建设及运营合同2篇
- 2025年湘教版八年级地理下册阶段测试试卷含答案
- 2025年度智能工厂生产线建设与安装合同2篇
- 2025年教科新版高一数学上册阶段测试试卷
- 二零二五年度职业健康安全责任合同书范本2篇
- 二零二五年度主播内容创作与版权转让协议3篇
- 2025年沪教版九年级地理上册月考试卷含答案
- 二零二五年样板间销售合同样本:现代简约家居体验中心合作协议3篇
- 2025年苏教版八年级化学下册阶段测试试卷含答案
- 办公室换岗后的心得体会办公室轮岗心得体会总结(二篇)
- 提高混凝土外观质量-QC小组活动成果交流材料(建设)
- 影像叙事语言智慧树知到答案章节测试2023年中国传媒大学
- 流体力学(清华大学张兆顺54讲) PPT课件 1
- 销售人员末位淘汰制度
- 南阳石油分公司非油品业务经营管理制度概要
- YS/T 431-2009铝及铝合金彩色涂层板、带材
- GB/T 2843-1981钢化玻璃抗冲击性试验方法(227克钢球试验)
- FZ/T 73042-2011针织围巾、披肩
- 统编部编版三年级道德与法治下册优秀课件【全册】
- 生物质能完整资料课件
评论
0/150
提交评论