欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

 找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開始

搜索
查看: 3429|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

51單片機(jī)病房呼叫系統(tǒng)代碼與Proteus仿真圖

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
1，上電lcd1602顯示Qingqiushu:0
2,1~8按鍵代表病人編號(hào)，9號(hào)按鍵代表應(yīng)答（每次只能應(yīng)答一個(gè)請(qǐng)求）
3，第二行顯示當(dāng)前請(qǐng)求病人編號(hào)，最先請(qǐng)求的編號(hào)在左中間空格，有按鍵按下后刷新顯示，先按下的請(qǐng)求鍵優(yōu)先級(jí)高優(yōu)先被應(yīng)答。

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


單片機(jī)源程序如下:
  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. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼

Keil代碼與Proteus8.8仿真下載: 仿真程序.7z (56.44 KB, 下載次數(shù): 53)

評(píng)分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)！

查看全部評(píng)分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏2 分享淘帖 頂頂2 踩踩
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表