基于单片机数字密码锁的课程设计
电路原理图
EDA 电子密码锁设计
“很不好意思，今天刚刚得到了毕设答辩通知，时间很仓促了。
而且这个vhdl语言现在也生疏了，弄了半天也没好。
真的是给你整不了这个了。
你找个高手帮忙修改一下吧” 这下面这个是在网上找到的一个，你也试着改改，偶们现在在做毕设，时间很紧。
library ieee; use ieee.std_logic_1164.all; use ieee.std_logic_arith.all; use ieee.std_logic_unsigned.all; -------------------------------------------------------------------- entity exp19 is port( Clk : in std_logic; --时钟信号 Rst : in std_logic; --复位信号 Kr : in std_logic_vector(3 downto 0); --键盘行 Kc : buffer std_logic_vector(3 downto 0); --键盘列 SPK : out std_logic; --扬声器输出 KEY_State : out std_logic; --按键指示 Door : buffer std_logic; --门状态 Display : out std_logic_vector(7 downto 0); --七段码管显示 SEG_SEL : buffer std_logic_vector(2 downto 0)); --七段码管片选 end exp19; -------------------------------------------------------------------- architecture behave of exp19 is signal keyr,keyc : std_logic_vector(3 downto 0); signal kcount : std_logic_vector(2 downto 0); signal kflag1,kflag2 : std_logic; signal buff1,buff2,buff3,buff4,buff5,buff6 : integer range 0 to 15; signal push_num : integer range 0 to 15; --按键次数 signal Disp_Temp : integer range 0 to 15; signal Disp_Decode : std_logic_vector(7 downto 0); signal SEC1,SEC10 : integer range 0 to 9; signal Clk_Count1 : std_logic_vector(3 downto 0); --1KHz时钟分频计数器 signal Clk_Count2 : std_logic_vector(9 downto 0); --2Hz时钟分频计数器 signal Clk1KHz : std_logic; signal Clk2Hz : std_logic; signal Clk1Hz : std_logic; signal Error_Num : integer range 0 to 3; signal Error_Flag : std_logic; signal Error_Count : std_logic_vector(2 downto 0); signal Music_Count : std_logic_vector(2 downto 0); begin process(Clk) begin if(Clk'event and Clk='1') then if(Clk_Count1<10) then Clk_Count1<=Clk_Count1+1; else Clk_Count1<=0001; end if; end if; end process; Clk1KHz<=Clk_Count1(2); process(Clk1KHz) begin if(Clk1KHz'event and Clk1KHz='1') then if(Clk_Count2<1000) then Clk_Count2<=Clk_Count2+1; else Clk_Count2<=0000000001; end if; end if; end process; Clk2Hz<=Clk_Count2(9); process(Clk2Hz) begin if(Clk2Hz'event and Clk2Hz='1') then Clk1Hz<=not Clk1Hz; end if; end process; process(Clk1KHz) --扫描键盘 begin if(Clk1KHz'event and Clk1KHz='1') then if(Kr=1111) then kflag1<='0'; kcount<=kcount+1; if(kcount=0) then kc<=1110; elsif(kcount=1) then kc<=1101; elsif(kcount=2) then kc<=1011; else kc<=0111; end if; else kflag1<='1'; keyr<=Kr; keyc<=Kc; end if; kflag2<=kflag1; end if; end process; KEY_State<=kflag1; process(Clk1KHz,Rst) --扫描键盘 begin if(Rst='0') then push_num<=0; elsif(Clk1KHz'event and Clk1KHz='1') then if(push_num=6) then push_num<=0; elsif(kflag1='0' and kflag2='1') then push_num<=push_num+1; end if; end if; end process; process(Clk1KHz,Rst) --密码校验 begin if(Rst='0') then Door<='0'; Error_Num<=0; Error_Flag<='0'; elsif(Clk1KHz'event and Clk1KHz='1') then if(push_num=5 and Error_Num<3) then --修改此处的值可修改门的密码，此处密码为123456 if(buff1=1 and buff2=2 and buff3=3 and buff4=4 and buff5=5 and buff6=6) then Door<='1'; else Door<='0'; end if; elsif(push_num=6 and Error_Num<3) then if(Door='0') then Error_Flag<='1'; Error_Num<=Error_Num+1; else Error_Flag<='0'; Error_Num<=0; end if; elsif(Error_Count=4) then Error_Flag<='0'; elsif(Error_Flag='1') then Door<=not Error_Count(0); end if; end if; end process; process(Clk2Hz,Rst) begin if(Rst='0' or Error_Flag<='0') then Error_Count<=000; elsif(Clk2Hz'event and Clk2Hz='1' and Error_Flag<='1') then Error_Count<=Error_Count+1; end if; end process; process(Clk) --报警声音分频 begin if(Clk'event and Clk='1') then Music_Count<=Music_Count+1; end if; end process; process(Clk) --超出错误次数，开始报警 begin if(Error_Num>=3) then if(Clk1Hz='1') then SPK<=Music_Count(2); else SPK<=Music_Count(1); end if; end if; end process; process(Clk1KHz,Rst) --显示右移 begin if(Rst='0' or push_num=0) then --复位时，全灭 buff1<=15; buff2<=15; buff3<=15; buff4<=15; buff5<=15; elsif(Clk1KHz'event and Clk1KHz='1') then if(kflag1='1' and kflag2='0' and (((keyr=1110 or keyr=1011)and keyc\\\/=0111)or keyr=1101)) then buff1<=buff2; buff2<=buff3; buff3<=buff4; buff4<=buff5; buff5<=buff6; end if; end if; end process; process(Clk1KHz,Rst) -- 获取键值 begin if(Rst='0' or push_num=6) then --全灭 buff6<=15; elsif(Clk1KHz'event and Clk1KHz='1') then if(kflag1='1' and kflag2='0') then if(keyr=1110) then case keyc is when 1110=>buff6<=1; when 1101=>buff6<=4; when 1011=>buff6<=7; when others=>buff6<=buff6; --no change end case; elsif(keyr=1101) then case keyc is when 1110=>buff6<=2; when 1101=>buff6<=5; when 1011=>buff6<=8; when 0111=>buff6<=0; when others=>buff6<=buff6; --no change end case; elsif(keyr=1011) then case keyc is when 1110=>buff6<=3; when 1101=>buff6<=6; when 1011=>buff6<=9; when others=>buff6<=buff6; --no change end case; end if; end if; end if; end process; process(SEG_SEL) begin case (SEG_SEL+1) is when 000=>Disp_Temp<=10; --'-' when 001=>Disp_Temp<=buff1; when 010=>Disp_Temp<=buff2; when 011=>Disp_Temp<=buff3; when 100=>Disp_Temp<=buff4; when 101=>Disp_Temp<=buff5; when 110=>Disp_Temp<=buff6; when 111=>Disp_Temp<=10; --'1' end case; end process; process(Clk) begin if(Clk'event and Clk='1') then --扫描累加 SEG_SEL<=SEG_SEL+1; Display<=Disp_Decode; end if; end process; process(Disp_Temp) --显示转换 begin case Disp_Temp is when 0=>Disp_Decode<=00111111; --'0' when 1=>Disp_Decode<=00000110; --'1' when 2=>Disp_Decode<=01011011; --'2' when 3=>Disp_Decode<=01001111; --'3' when 4=>Disp_Decode<=01100110; --'4' when 5=>Disp_Decode<=01101101; --'5' when 6=>Disp_Decode<=01111101; --'6' when 7=>Disp_Decode<=00000111; --'7' when 8=>Disp_Decode<=01111111; --'8' when 9=>Disp_Decode<=01101111; --'9' when 10=>Disp_Decode<=01000000; --'-' when others=>Disp_Decode<=00000000; --全灭 end case; end process; end behave;
密码锁PLC控制
课程设计说明书课程名称可编程控制器课程设计系别专业班级学号学生姓名指导教师2014年12月摘要随社会的飞速发展，科技也在日益进步，我们的生活慢慢科技化、现代化，个人的隐私显得比以前更加重要。
市面的密码锁大多数为机械锁，单片机控制密码锁，计算机控制密码锁等。
本设计主要以PLC强大的逻辑、计数、计时功能来设计一个四位密码锁，并通过组态软件进行监控。
目录1绪论12系统的硬件配置12.1PLC简介12.2PLC的分类12.3PLC的特点22.4编程元件地址分配32.5控制要求32.6流程图42.7输入输出接线图43系统软件设计53.1梯形图54组态图85课设总结10参考文献11附录121绪论科技的不断发展，社会的不断进步，人们的生活水平也在不断的提高。
在这个大前提下，如何更好的强化家庭防盗这一问题也变得尤其的突出，传统的机械锁由于其构造的简单，“失职”的时间屡见不鲜。
不仅如此，机械锁一般陪有钥匙，易丢失，锁便无用了，因此机械锁注定会被淘汰。
而电子锁保密性高，一般采用多位密码多重加密，即使密码泄漏也可修改密码继续使用；而且安全系数高，对于错误尝试会有报警提示，能更好的防止不法分子的行为。
因此，密码锁受到了广大用户的青睐。
出于安全、方便等方面的需要，许多智能锁已相继问世，但这些产品的特点是针对特定指纹或有效卡，只能适用于保密要求高且仅
用plc设计一个密码锁程序，密码是学号后六位
抽空写写。
。
。
。
。
大学PLC课程设计一般有哪些题目
我想提前吧它做了
我家刚装电脑时，我总是不知道该玩些什么。
自从老师把我们带进“凤凰网”，我的业余生活才变的多姿多彩，这时我从电脑里知道了，还有许多的东西需要我们去探索。
它给我提供了资料，让我好好学习。
它给我提供了游戏，让我好好轻松。
它给我提供图片让我见多识广，它给了我良好的学习环境，让我茁壮成长……渐渐地，我和电脑成了好朋友，要我说最好的，那是“凤凰语文学习网”，在那里，它有茶吧、展厅、书谜密室….我在课内课外交了很多朋友，在电脑QQ通讯已经普及全球，不官自己身在何处，都可以和天涯海角的亲人团聚在一起对话，我喜欢在电脑中保存我的图片文章，照片，等我长大了再看看自己的变化我玩游戏时，一听到滋的一声，就马上打开瑞星杀毒软件，把那群不速之客赶走，为了防止可恶的黑客，我还用零花钱买了一本《防黑客三十六计》
在电脑有木马的情况下，爸爸象医生一样急救它，我的心时刻不能宁静、心急如焚。
电脑令我快乐，也令我伤心……..在我无聊时，电脑象朋友一样陪伴着我，在我快乐时，它就和我一起微笑，在我伤心时它在旁边安慰我，令我忘记一切的不开心，在许许多多的网站中我会有一种前所未有的感想。
自从我了解了电脑，我便爱上了它，父母也有和我同样的意识，爱上电脑并不是件坏事，这是我的观点，我们一家很和睦，这可能也有电脑的功劳吧
我们一家三口都走进了网络世界。
你呢
也快快加入丰富多彩的网络吧
防诈骗心得体会
【案例导读】 街头的几种诈骗类型举例说明，并提供一些防范方法，希望能给大家一点启示 【案例正文】 随着春节临近，抱着“骗一笔”就回去过年想法的犯罪分子越来越多，街头诈骗活动近日在我市屡屡“上演”，给市民的生活带来了很大的危害，也严重危及到社会的正常治安秩序。
在此，金陵晚报记者将最近发生在南京街头的几种诈骗类型举例说明，并提供一些防范方法，希望能给广大市民一点启示。
一、紧俏化工原料急于出手，其实就是几块口香糖 2002年4月9日上午，扬州的薛老汉带着给儿子买家具的1万元钱在南京汽车东站下了车，一妙龄女子迅速迎了上来，聊了一会儿后，又过来一男子假装问某化工厂怎么走，称自己有紧缺化工原料想出手。
女子建议和薛老汉一起把这些原料买下来再倒手，薛老汉见有利可图，乖乖捧上了自己的1万元钱，结果只能是哭哭啼啼到锁金村派出所报案了。
类似骗术：“假金佛”、“假金龟”诈骗 防范方法：做人莫贪，贪字当头必吃亏。
二、“老中医”替人消灾，本来没灾招来灾 2002年7月12日上午8点多钟，家住北安门桥附近的李老太在去菜场的途中被一妇女拦住了，该妇女向老太打听一个神奇老中医的住处。
两人搭识后，该女子称老太家中近日必有灾难，后来又过来两名妇女，也是连声附和，并称只有把家中的钱财拿到老中医家里放一天并带回一符才能消灾。
可怜的李老太被骗走了4万多元钱。
类似骗术：“老神仙”治病 防范方法：陌生人说话千万别轻易相信，老年人尤其要当心。
三、眼前突现钱包，分红才知上当 2003年元月2日下午4点多钟，市民朱小姐路过水佐岗附近时，突然看到前面一个骑车男子掉下一个钱包，她刚把钱包捡起，旁边窜出3名男子，声称见者有份。
朱小姐打开钱包表示是空的，几人不相信，强行把朱小姐身上的1800多元钱抢走。
防范方法：天上不会掉馅饼，“炸药包”碰不得，碰了就惹祸。
四、假装试车，骑上就回不来 2002年4月17日，一男子窜至一个体摩托车销售点，提出要购买摩托车，但想先试试车的性能，老板以为能做一笔大生意，自然一口答应，哪知道他跨上摩托车扬长而去，老板等了半个小时，这才发现摩托车被骗走了，追悔莫及。
类似骗术：“借手机”打电话 防范方法：试车时可以留下押金及有效证件。
五、兑换邮票等赚差价，到头来只能是竹篮打水一场空 2002年6月23日上午，市民刘某在新街口被4名男子以买卖邮票、从中可得差价赚大钱为名，骗走人民币7000余元。
类似骗术：兑换国库券、粮票、外币等 防范方法：生财要有道，不义之财不能碰。
六、“送牙膏、中大奖”，奖品全是劣等货 2002年12月22日上午9点多钟，59岁的安徽人张某刚出南京火车站就被一妇女莫名其妙地塞到手里一支牙膏，并连称中奖了。
随后她拿出一大堆奖品，请老张交上手续费500元。
喜滋滋的老张不知是计，拿出了500元钱。
类似骗术：“送奖券”等 防范方法：不要接受，敬而远之，到公安机关报案 除了以上列出的种种骗术外，还有“三张牌”、“招聘公关先生、公关小姐”等骗术，遇到这些情况应该时刻提高警惕，及时报警，以免受骗上当，弄得春节也过得不开心
