设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 51单片机病房呼叫系统代码与Proteus仿真图
返回列表 发新帖
查看: 2963|回复: 0
打印 上一主题 下一主题
收起左侧

51单片机病房呼叫系统代码与Proteus仿真图

[复制链接]
跳转到指定楼层
楼主
ID:1036972 发表于 2022-6-26 20:18 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
1，上电lcd1602显示Qingqiushu:0
2,1~8按键代表病人编号，9号按键代表应答（每次只能应答一个请求）
3，第二行显示当前请求病人编号，最先请求的编号在左中间空格，有按键按下后刷新显示，先按下的请求键优先级高优先被应答。

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:
  1. #include<reg52.h>
  2. #define uchar unsigned char
  3. #define uint unsigned int
  4. uchar code table[]="Qing qiu shu:";
  5. uchar code table1[]="012345678";//键盘
  6. uchar  table2[8];
  7. uint code table3[]={0,1,2,3,4,5,6,7,8};//键盘
  8. uint table4[]={0,0,0,0,0,0,0,0};
  9. uint table5[8];
  10. sbit lcden=P3^4;
  11. sbit lcdrs=P3^5;
  12. sbit dula=P2^6;
  13. sbit wela=P2^7;
  14. uchar num,key,N,s;
  15. uint i,w;
  16. void delay(uint z)
  17. {
  18.         uint x,y;
  19.         for(x=z;x>0;x--)
  20.         for(y=110;y>0;y--);
  21. }
  22. void write_com(uchar com)
  23. {
  24.         lcdrs=0;
  25.         P0=com;
  26.         delay(5);
  27.         lcden=1;
  28.         delay(5);
  29.         lcden=0;
  30. }
  31. void write_data(uchar date)
  32. {
  33.         lcdrs=1;
  34.         P0=date;
  35.         delay(5);
  36.         lcden=1;
  37.         delay(5);
  38.         lcden=0;
  39. }
  40. void init()
  41. {
  42.         dula=0;
  43.         wela=0;
  44.         lcden=0;
  45.         write_com(0x38);
  46.         write_com(0x0c);
  47.         write_com(0x06);
  48.         write_com(0x01);
  49. }
  50. void matrixkeyscan()
  51. {
  52.   
  53.   uchar temp,key;
  54.   if(N>=0||N<=8)
  55.   {
  56.   P1=0xfe;
  57.   temp=P1;
  58.   temp=temp&0xf0;
  59.   if(temp != 0xf0)
  60.   {
  61.     delay(10);
  62.         temp=P1;
  63.         temp=temp & 0xf0;
  64.         if(temp != 0xf0)
  65.         {
  66.           temp=P1;
  67.           switch(temp)
  68.           {  
  69.             case 0xee:key=1;table4[0]+=1;break;
  70.                 case 0xde:key=2;table4[1]+=1;break;
  71.                 case 0xbe:key=3;table4[2]+=1;break;
  72.                 case 0x7e:key=4;table4[3]+=1;break;
  73.            }
  74.            while(temp != 0xf0)
  75.            {
  76.              temp=P1;
  77.                  temp=temp & 0xf0;
  78.                 }
  79.            if(table4[key-1]==1)
  80.            {table5[N]=table3[key];
  81.           table2[N]=table1[key];N++;
  82.           }
  83.         }
  84.    }




  89.    P1=0xfd;
  90.   temp=P1;
  91.   temp=temp&0xf0;
  92.   if(temp != 0xf0)
  93.   {
  94.     delay(10);
  95.         temp=P1;
  96.         temp=temp & 0xf0;
  97.         if(temp != 0xf0)
  98.         {
  99.           temp=P1;
  100.           switch(temp)
  101.           {  
  102.             case 0xed:key=5;table4[4]+=1;break;
  103.                 case 0xdd:key=6;table4[5]+=1;break;
  104.                 case 0xbd:key=7;table4[6]+=1;break;
  105.                 case 0x7d:key=8;table4[7]+=1;break;
  106.            }
  107.            while(temp != 0xf0)
  108.            {
  109.              temp=P1;
  110.                  temp=temp & 0xf0;
  111.                 }
  112.                 if(table4[key-1]==1)
  113.            { table5[N]=table3[key];
  114.           table2[N]=table1[key];N++;
  115.           }
  116.         }
  117.    }




  122.    P1=0xfb;
  123.   temp=P1;
  124.   temp=temp&0xf0;
  125.   if(temp != 0xf0)
  126.   {
  127.     delay(10);
  128.         temp=P1;
  129.         temp=temp & 0xf0;
  130.         if(temp != 0xf0)
  131.         {
  132.           temp=P1;
  133.           switch(temp)
  134.           {  
  135.             case 0xeb:key=9;break;
  136.            }
  137.            while(temp != 0xf0)
  138.            {
  139.              temp=P1;
  140.                  temp=temp & 0xf0;
  141.                 }
  142.                 if(N>0)
  143.                 {
  144.            if(key=9)
  145.            {        
  146.                 w=table5[0];
  147.                         table4[w-1]=table3[0];
  148.                         delay(10);                           
  149.                    for(i=0;i<N;i++)
  150.                         {        table5[ i]=table5[i+1];[ i]
  151.                                 table2[ i]=table2[i+1];[ i]
  152.                         }table2[N]='\0';table5[N]='\0';
  153.                            N--;
  154.            
  155.            }
  156.            }
  157.         }
  158.    }
  159. }
  160. }


  163. void main()
  164. {
  165.         init();
  166.         write_com(0x80);
  167.     ……………………
  168. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

Keil代码与Proteus8.8仿真下载: 仿真程序.7z (56.44 KB, 下载次数: 53)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏2 分享淘帖 顶顶2 踩踩
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表