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

標題: 51單片機病房呼叫系統代碼與Proteus仿真圖 [打印本頁]
作者: 1659422457    時間: 2022-6-26 20:18
標題: 51單片機病房呼叫系統代碼與Proteus仿真圖
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)




歡迎光臨 (http://www.raoushi.com/bbs/) Powered by Discuz! X3.1