历史上的今天
今天是:2024年10月28日(星期一)
2020年10月28日 | 单片机DIY模拟冰球
2020-10-28 来源:51hei


单片机程序源码如下:
// C语言程序如下
/**************************************************************
* 文件 : -----.C
* 功能 : 对键盘进行读出,控制内部数值的加减,在数码管显示0到10
***************************************************************/
#include #include #define uint unsigned int #define uchar unsigned char sbit KK1 = P3^1;//按键输入; sbit KK2 = P3^3;//按键输入; sbit KK3 = P3^4; //接近开关输入; uchar code table[11] = {0xc0, 0xf9, 0xa4, 0xb0, 0x99, 0x92, 0x82, 0xf8, 0x80, 0x90, 0xff}; /************************************************************** * 名称 : Delay_1ms() * 功能 : 延时子程序,延时时间为 1ms * x * 输入 : x (延时一毫秒的个数) * 输出 : 无 ***************************************************************/ void Delay_1ms(uint x) { uchar i, j; for(i = 0; i < x; i++) for(j = 0; j <= 148; j++); } /************************************************************** * 名称 : Display(uchar k) * 功能 : 将参数分成十位、个位分别显示 * 输入 : k * 输出 : 无 ***************************************************************/ void Display(uchar k) { P2 = 0; //先消隐 if (k / 10 == 0) P0 = table[10]; //显示空白 else P0 = table[k / 10]; //显示十位 P2 = 0x02; Delay_1ms(5); //显示5ms P2 = 0; P0 = table[k % 10]; //显示个位 P2 = 0x01; Delay_1ms(5); } /************************************************************** * 名称 : Main() * 功能 : 主函数 ***************************************************************/ void Main(void) { uchar Value = 0; //数值 while(1) { //sbit KK1 = P3^2; //按键输入; //sbit KK2 = P3^3; //按键输入; //sbit KK3 = P3^4; //接近开关输入; P3 = 0xff; if(!KK1) {//KK1按下 Display(Value);//延时消抖 // Delay_1ms(20); if(!KK1) {//KK1依然按下 while(!KK1);//等KK1释放 Value++; if (Value > 10) Value = 10;//显示最大值0-10 } } if(!KK2) { //KK2按下 Display(Value); //延时消抖 // Delay_1ms(20); if(!KK2) { //KK2依然按下 while(!KK2); //等KK2释放 if (Value == 0) Value = 1; Value--; } }
下一篇:51单片机智能窗帘
史海拾趣
|
反正最近的工作就是在CORTEX-M3平台上做产品 最近在研究其堆栈布局和使用的时候 写出了一个本人有屎以来最短的程序 编译生成的目标代码只有12个字节 其中,中断向量表8个字节,程序,2个字节,另外两个是ARMASM要求的字对其, 实际上没啥技术 ...… 查看全部问答> |
|
论坛以前有这个帖子可是没有明确的答复。 如果谁知道这个问题可以麻烦帮忙解答一下么?? 如果不能调用可以说出根据 或者 文章出处么/? 如果可以调用的话,可以介绍一下方法么?? 谢谢!!… 查看全部问答> |
|
20100818H2PToday1004_design_TexasInstruments为何要努力实现环路补偿 20100818H2PToday1004_design_TexasInstruments为何要努力实现环路补偿… 查看全部问答> |




