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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › 51单片机程序:出入库管理系统的编辑
返回列表 发新帖
查看: 1302|回复: 1
打印 上一主题 下一主题
收起左侧

51单片机程序:出入库管理系统的编辑

[复制链接]
跳转到指定楼层
楼主
ID:488971 发表于 2019-3-12 08:19 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
单片机源程序如下:
  1. #include <reg51.h>
  2. #include <intrins.h>

  4. #define uchar unsigned char
  5. #define uint  unsigned int
  6. #define DS1302_SECOND        0x80                //秒寄存器
  7. #define DS1302_MINUTE        0x82                //分寄存器
  8. #define DS1302_HOUR                0x84                //小时寄存器
  9. #define DS1302_WEEK                0x8A                //星期寄存器
  10. #define DS1302_DAY                0x86                //日寄存器
  11. #define DS1302_MONTH        0x88                //月寄存器
  12. #define DS1302_YEAR                0x8C                //年寄存器
  13. #define right           1                        //正确
  14. #define error           0                        //错误

  16. typedef struct SYSTEMTIME
  17. {
  18.     uchar Second;
  19.     uchar Minute;
  20.     uchar Hour;
  21.     uchar Week;
  22.     uchar Day;
  23.     uchar Month;
  24.     uchar Year;
  25.     uchar DateString[9];
  26.     uchar TimeString[9];
  27. }SYSTEMTIME;                                                //定义的时间类型

  29. sbit ACC0=ACC^0;
  30. sbit ACC7=ACC^7;
  31. sbit DQ=P1^0;                                                //DS1990A数据线引脚                                               
  32. sbit SDA=P1^1;                                                //2402数据线引脚
  33. sbit SCL=P1^2;                                                //2402时钟线引脚
  34. sbit DS1302_RST=P1^3;                                //DS1302复位线引脚
  35. sbit DS1302_CLK=P1^4;                                //DS1302时钟线引脚
  36. sbit DS1302_IO=P1^5;                                //DS1302数据线引脚
  37. sbit din=P2^0;                                                //MAX7221数据线引脚
  38. sbit load=P2^1;                                                //MAX7221控制线引脚
  39. sbit clk=P2^2;                                                //MAX7221时钟线引脚
  40. sbit Lock=P2^3;                                                //电子锁控制线引脚

  42. uchar code CrcTable[256]={
  43.     0,94,188,226,97,63,221,131,194,156,126,32,163,253,31,65,
  44.     157,195,33,127,252,162,64,30,95,1,227,189,62,96,130,220,
  45.     35,125,159,193,66,28,254,160,225,191,93,3,128,222,60,98,
  46.     190,224,2,92,223,129,99,61,124,34,192,158,29,67,161,255,
  47.     70,24,250,164,39,121,155,197,132,218,56,102,229,187,89,7,
  48.     219,133,103,57,186,228,6,88,25,71,165,251,120,38,196,154,
  49.     101,59,217,135,4,90,184,230,167,249,27,69,198,152,122,36,
  50.     248,166,68,26,153,199,37,123,58,100,134,216,91,5,231,185,
  51.     140,210,48,110,237,179,81,15,78,16,242,172,47,113,147,205,
  52.     17,79,173,243,112,46,204,146,211,141,111,49,178,236,14,80,
  53.     175,241,19,77,206,144,114,44,109,51,209,143,12,82,176,238,
  54.     50,108,142,208,83,13,239,177,240,174,76,18,145,207,45,115,
  55.     202,148,118,40,171,245,23,73,8,86,180,234,105,55,213,139,
  56.     87,9,235,181,54,104,138,212,149,203,41,119,244,170,72,22,
  57.     233,183,85,11,136,214,52,106,43,117,151,201,74,20,246,168,
  58.     116,42,200,150,21,75,169,247,182,232,10,84,215,137,107,53
  59. };                                                                        //校验码查询表

  61. uchar code ID[]={
  62.     0x01,0x2c,0xc5,0xb8,
  63.     0x00,0x00,0x00,0x8b};                        //默认访问者身份ID

  65. uchar code dispcode[]={       
  66.         0x7e,0x30,0x6d,0x79,
  67.         0x33,0x5b,0x5f,0x70,
  68.         0x7f,0x7b,0x77,0x1f,
  69.         0x4e,0x3d,0x4f,0x47};                        //共阴极显示代码
  70.        
  71. bit flag=0;
  72. uchar CRCbyte,num=200,da_ad=0x00;        //CRC校验码,2402存储地址
  73. uchar SN[8],time[6];
  74. uchar buf[]={0,0,0,0,0,0,0,0};
  75. SYSTEMTIME time1;

  77. /******************函数声明*******************/
  78. void Init_DS1302(void);                                //DS1302初始化
  79. void Init_DS1990(void);                                //DS1990初始化
  80. void Init_T0(void);                                        //定时器T0初始化
  81. void DS1302InputByte(uchar d);                //DS1302
  82. void Write_1302(uchar ucAddr, uchar ucDa);//DS1302写数据
  83. void DS1302_SetProtect(bit flag);        //DS1302写保护设定
  84. void DS1302_SetTime(uchar Address, uchar Value);//DS1302设置时间函数
  85. void DS1302_GetTime(SYSTEMTIME *Time);//DS1302时间转换函数
  86. void DS1302_time(void);                                //DS1302时间显示函数
  87. void Init_MAX7221(void);                        //MAX7221初始化
  88. void Write_7221(uchar com,uchar da);//MAX7221写字节程序
  89. void Delay(uint i);                                        //延时函数
  90. void Writebyte(uchar dat);                        //向DS1990A写一个字节函数
  91. void Record(void);                                        //记录访问时间
  92. void Start_bit(void);                                //I2C起始函数
  93. void Stop_bit(void);                                //I2C停止函数
  94. bit Compare(void);                                        //验证身份函数
  95. bit Read1990(void);                                        //读身份信息函数
  96. bit Write_8bit(uchar ch);                        //I2C总线写8位数据函数
  97. uchar DS1302OutputByte(void);                //DS1302读一个字节
  98. uchar Read1302(uchar ucAddr);                //DS1302读数据
  99. uchar CRC(uchar j);                                        //DS1990A校验位计算函数
  100. uchar Readbyte(void);                                //从DS1990A读一个字节函数
  101. uchar Page_wr(uchar firstw_ad,uchar counter,uchar *firstr_ad);//I2C总线页面写函数
  102. /******************主函数*******************/
  103. void main()
  104. {
  105.         uchar i;
  106.         Init_MAX7221();
  107.         Init_DS1302();
  108.         Init_T0();
  109.         P2=0;
  110.         while (1)
  111.     {
  112.                 if(Compare()==1)                        //身份验证一致
  113.                 {
  114.                         Lock=1;                                        //闭合继电器       
  115.                         TR0=1;                                        //定时器T0启动
  116.                         Record();                                //记录访问时间
  117.                         for(i=1;i<9;i++)
  118.                         {
  119.                                 Write_7221(i,0x01);
  120.                         }
  121.                         if(da_ad==248)
  122.                                 da_ad=0;                        //判断存储内容是否已经满
  123.                         else
  124.                                 da_ad+=8;                        //修改2402存储地址
  125.                         while(Compare());
  126.                 }
  127.                 else
  128.                 {
  129.                         DS1302_time();                        //显示当前时间                       
  130.                 }
  131.     }
  132. }
  133. /**************T0定时器初始化******************/
  134. void Init_T0(void)
  135. {
  136.         TMOD=0x01;                                                //工作方式1
  137.         TH0=(65536-50000)/256;                        //定时时间为0.5ms
  138.         TL0=(65536-50000)%256;
  139.         EA=1;                                                        //开总中断
  140.         ET0=1;                                                        //允许定时器T0中断
  141. }
  142. /**************T0定时器服务程序******************/
  143. void timer0(void) interrupt 1
  144. {
  145.         TH0=(65536-50000)/256;                        //重载初值
  146.         TL0=(65536-50000)%256;
  147.         num--;
  148.         if(num==0)                                                //5秒定时到
  149.         {
  150.                 TR0=0;                                                //关定时器T0               
  151.                 num=200;                                        //重载时间计数器
  152.                 Lock=0;                                                //断开继电器
  153.         }
  154. }
  155. /**************DS1302一个写字节******************/
  156. void DS1302InputByte(uchar d)                //实时时钟写入一字节(内部函数)
  157. {
  158.     uchar i;
  159.     ACC=d;
  160.     for (i=8;i>0;i--)
  161.     {
  162.         DS1302_IO=ACC0;                                //相当于汇编中的 RRC
  163.         DS1302_CLK=1;
  164.         DS1302_CLK=0;                                //发一个高跳变到低的脉冲
  165.         ACC=ACC>>1;
  166.     }
  167. }
  168. /**************DS1302读一个字节******************/
  169. uchar DS1302OutputByte(void)                //实时时钟读取一字节(内部函数)
  170. {
  171.     uchar i;
  172.     for (i=8;i>0;i--)
  173.     {
  174.         ACC=ACC>>1;                                        //相当于汇编中的 RRC
  175.         ACC7=DS1302_IO;
  176.         DS1302_CLK=1;
  177.         DS1302_CLK=0;                                //发一个高跳变到低的脉冲
  178.     }
  179.     return(ACC);
  180. }
  181. /****************DS1302写数据********************/
  182. void Write_1302(uchar ucAddr, uchar ucDa)
  183. {
  184.     DS1302_RST=0;
  185.     DS1302_CLK=0;
  186.     DS1302_RST=1;
  187.     DS1302InputByte(ucAddr);                //地址，命令
  188.     DS1302InputByte(ucDa);                        //写1Byte数据
  189.     DS1302_CLK=1;
  190.     DS1302_RST=0;
  191. }
  192. /****************DS1302读数据********************/
  193. uchar Read1302(uchar ucAddr)                //读取DS1302某地址的数据
  194. {
  195.     uchar ucData;
  196.     DS1302_RST=0;
  197.     DS1302_CLK=0;
  198.     DS1302_RST=1;                                        //enable
  199.     DS1302InputByte(ucAddr|0x01);        //地址，命令
  200.     ucData=DS1302OutputByte();                //读1Byte数据
  201.     DS1302_CLK=1;
  202.     DS1302_RST=0;
  203.     return(ucData);
  204. }
  205. /**************DS1302写保护设定******************/
  206. void DS1302_SetProtect(bit flag)        //是否写保护
  207. {
  208.     if (flag)
  209.         Write_1302(0x8E,0x10);                 //WP=1,不能写入
  210.     else
  211.         Write_1302(0x8E,0x00);                //WP=0,可以写入
  212. }
  213. /**************DS1302设置时间函数****************/
  214. void DS1302_SetTime(uchar Address, uchar Value)       
  215. {
  216.     DS1302_SetProtect(0);
  217.     Write_1302(Address, ((Value/10)<<4|(Value%10)));//高4位为十位，低4位为个位
  218. }
  219. /*****************DS1302初始化******************/
  220. void Init_DS1302(void)
  221. {
  222.     uchar Second=Read1302(DS1302_SECOND);
  223.     if (Second&0x80)                                //如果第七为1（表明没有启动), 则启动时钟
  224.         DS1302_SetTime(DS1302_SECOND,0);
  225. }
  226. /**************DS1302时间转换函数***************/
  227. void DS1302_GetTime(SYSTEMTIME *Time)
  228. {
  229.     uchar ReadValue;
  230.     ReadValue=Read1302(DS1302_SECOND);
  231.     Time->Second=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);        //转换秒
  232.     ReadValue=Read1302(DS1302_MINUTE);
  233.     Time->Minute=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);        //转换分
  234.     ReadValue=Read1302(DS1302_HOUR);
  235.     Time->Hour=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);        //转换时
  236.     ReadValue=Read1302(DS1302_DAY);
  237.     Time->Day=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);        //转换日
  238.     ReadValue=Read1302(DS1302_WEEK);
  239.     Time->Week=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);        //转换星期
  240.     ReadValue=Read1302(DS1302_MONTH);
  241.     Time->Month=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);        //转换月
  242.     ReadValue=Read1302(DS1302_YEAR);
  243.     Time->Year=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);        //转换年
  244. }
  245. /*****************MAX7221初始化***************/
  246. void Init_MAX7221(void)
  247. {
  248.     Write_7221(0x0c,0x01);                        //正常工作状态,关断模式
  249.         Write_7221(0x09,0x00);                        //译码选择，非BCD码
  250.         Write_7221(0x0a,0x0f);                        //亮度调节
  251.         Write_7221(0x0b,0x07);                        //显示位数
  252. }
  253. /**************MAX7221写字节程序*************/
  254. void Write_7221(uchar com,uchar da)
  255. {
  256.     uchar temp,i,j;
  257.     load=0;
  258.     clk=0;
  259.     for (i=0;i<8;i++)                                //发送命令
  260.     {
  261.         temp=com;
  262.         if ((temp&(0x80>>i))!=0)
  263.             din=1;
  264.         else din=0;
  265.         clk=1;
  266.         for (j=0;j<5;j++);
  267.         clk=0;
  268.     }
  269.     for (i=0;i<8;i++)                                //发送数据
  270.     {
  271.         temp=da;
  272.         if ((temp&(0x80>>i))!=0)
  273.             din=1;
  274.         else din=0;
  275.         clk=1;
  276.         for (j=0;j<5;j++);
  277.         clk=0;
  278.     }
  279.     load=1;
  280. }
  281. /**************时间显示函数*******************/
  282. void DS1302_time(void)
  283. {
  284.         DS1302_GetTime(&time1);                        //获取当前时间
  285.         buf[7]=(time1.Second)%10;
  286.         buf[6]=(time1.Second)/10;
  287.         buf[4]=(time1.Minute)%10;
  288.         buf[3]=(time1.Minute)/10;
  289.         buf[1]=(time1.Hour)%10;
  290.         buf[0]=(time1.Hour)/10;
  291.         Write_7221(0x08,dispcode[buf[7]]);
  292.         Write_7221(0x07,dispcode[buf[6]]);
  293.         Write_7221(0x06,0x01);
  294.         Write_7221(0x05,dispcode[buf[4]]);
  295.         Write_7221(0x04,dispcode[buf[3]]);
  296.         Write_7221(0x03,0x01);
  297.         Write_7221(0x02,dispcode[buf[1]]);
  298.         Write_7221(0x01,dispcode[buf[0]]);
  299. }
  300. /**************I2C起始函数*******************/
  301. void Start_bit(void)
  302. {
  303.     SCL=1;_nop_();
  304.     SDA=1;_nop_();
  305.     SDA=0;_nop_();
  306.     SCL=0;_nop_();
  307. }
  308. /***************I2C停止函数******************/
  309. void Stop_bit(void)
  310. {
  311.     SDA=0;_nop_();
  312.     SCL=1;_nop_();
  313.     SDA=1;_nop_();
  314. }
  315. /***********I2C总线写8位数据函数*************/
  316. bit Write_8bit(uchar ch)
  317. {
  318.     uchar i=8;
  319.     bit fan_w;
  320.     SCL=0;_nop_();
  321.     while (i--)
  322.     {
  323.         SDA=(bit)(ch&0x80);_nop_();
  324.         ch<<=1;
  325.         SCL=1;_nop_();
  326.         SCL=0;_nop_();
  327.     }
  328.     SDA=1;_nop_();
  329.     SCL=1;_nop_();
  330.     fan_w=SDA;
  331.     SCL=0;_nop_();
  332.     return(fan_w);
  333. }
  334. /************I2C总线页面写函数**************/
  335. uchar Page_wr(uchar firstw_ad,uchar counter,uchar *firstr_ad)
  336. {
  337.     uchar *ufirstr_ad;
  338.     ufirstr_ad=firstr_ad;
  339.     Start_bit();                                                //启动I2C
  340.     if (Write_8bit(0xA0)!=0)                        //发送2402器件地址
  341.     {
  342.         Stop_bit();                                                //无应答，返回
  343.         return(0);
  344.     }
  345.     if (Write_8bit(firstw_ad)!=0)                //写入数据的存储地址
  346.     {
  347.         Stop_bit();                                                //无应答，返回
  348.         return(0);
  349.     }
  350.     while (counter--)                                        //写入数据
  351.     {
  352.         if (Write_8bit(*ufirstr_ad)!=0)        //无应答，返回
  353.         {
  354.             Stop_bit();
  355.             return(0);
  356.         }
  357.         ufirstr_ad++;                                        //准备下一数据
  358.     }
  359.     Stop_bit();
  360.     return(1);                                                        //写数据成功
  361. }
  362. /*****************延时函数******************/
  363. void Delay(uint i)
  364. {
  365.     while (i--);
  366. }
  367. /***********DS1990A校验位计算函数***********/
  368. uchar CRC(uchar j)
  369. {
  370.     uchar i,crc_data=0;
  371.     for (i=0;i<j;i++)                                        //查表校验
  372.         crc_data=CrcTable[crc_data^SN[i]];
  373.     return(crc_data);
  374. }
  375. /*************DS1990A初始化函数*************/
  376. void Init_DS1990(void)
  377. {
  378.     uchar i,x=0;
  379.     DQ=0;                                                                //置低
  380.     Delay(60);                                                        //延时480us
  381.     DQ=1;                                                                //释放
  382.     Delay(10);                                                        //延时85us
  383.     for (i=0;i<10;i++)
  384.     {
  385.         if (DQ==0)                                                //如果拉低
  386.         {
  387.             flag=1;
  388.             break;
  389.         }
  390.     }
  391.     Delay(20);
  392. }
  393. /***********从DS1990A读一个字节函数*********/
  394. uchar Readbyte(void)
  395. {
  396.     uchar i=0;
  397.     uchar temp=0;
  398.     for (i=0;i<8;i++)
  399.     {
  400.         DQ=0;
  401.         temp>>=1;
  402.         DQ=1;
  403.         _nop_();
  404.         if (DQ)temp|=0x80;
  405.         Delay(8);
  406.     }
  407.     return(temp);
  408. }
  409. /**********向DS1990A写一个字节函数**********/
  410. void Writebyte(uchar dat)
  411. {
  412.     uchar i=0,send;
  413.     for (i=0;i<8;i++)
  414.     {
  415.         DQ=0;
  416.         send=dat&0x01;
  417.         if (send==0x01)
  418.         {
  419.             DQ=1;
  420.             Delay(15);
  421.         }
  422.         else
  423.         {
  424.             Delay(15);
  425.             DQ=1;
  426.         }
  427.         dat>>=1;
  428.     }
  429.     Delay(8);
  430. }
  431. /*************读身份信息函数****************/
  432. bit Read1990(void)
  433. {
  434.     uchar i;
  435.         Init_DS1990();
  436.     if (flag==1)
  437.     {
  438.         while (DQ==0);
  439.         flag=0;
  440.         Writebyte(0x33);
  441.         for (i=0;i<8;i++)
  442.                         SN[i]=Readbyte();
  443.         CRCbyte=CRC(7);
  444.         if (CRCbyte==SN[7])
  445.                 {
  446.                         return(right);       
  447.                 }
  448.         else
  449.                         return(error);
  450.     }
  451.         else
  452.                 return(error);
  453. }
  454. /****************验证身份函数***************/
  455. bit Compare(void)
  456. {
  457.     uchar i;
  458.         if (Read1990()==1)                                                //若身份验证正确返回1，错误返回0
  459.     {
  460.                 for (i=0;i<8;i++)
  461.         {
  462.                         if (SN[i]!=ID[i])return(error);
  463.                 }
  464.                 return(right);
  465.         }
  466.         else
  467.                 return(error);
  468. }
  469. /****************记录访问时间***************/
  470. void Record(void)
  471. {
  472.         DS1302_GetTime(&time1);                                        //获取访问时间
  473.         time[0]=time1.Second;                                        //将访问时间信息存入缓冲区
  474.         time[1]=time1.Minute;
  475.         time[2]=time1.Hour;
  476.         time[3]=time1.Day;
  477.         time[4]=time1.Month;
  478.         time[5]=time1.Year;
  479.         while(Page_wr(da_ad,6,time)==0);                //等待写入成功
  480. }
复制代码

所有资料51hei提供下载:
出入管理系统.zip (62.01 KB, 下载次数: 8)



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

使用道具 举报

沙发
ID:1 发表于 2019-3-12 14:49 | 只看该作者
本帖需要重新编辑补全电路原理图,源码,详细说明与图片即可获得100+黑币(帖子下方有编辑按钮)
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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