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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 单片机仿真论坛 › 单片机电梯楼层8*8LED Proteus仿真设计
返回列表 发新帖
查看: 836|回复: 0
打印 上一主题 下一主题
收起左侧

单片机电梯楼层8*8LED Proteus仿真设计

[复制链接]
跳转到指定楼层
楼主
ID:1073071 发表于 2023-5-21 20:31 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式


代码
  1. #include <reg51.h>
  2. #include <intrins.h>
  3. #define uchar unsigned char
  4. #define uint unsigned int
  5. sbit K1=P2^5;
  6. sbit K2=P2^4;
  7. sbit K3=P2^3;
  8. sbit K4=P2^2;
  9. sbit K5=P2^1;
  10. sbit K6=P2^0;
  11. sbit BE=P2^7;
  12. uchar code NUM[]={
  13. 0x00,0x10,0x30,0x10,0x10,0x10,0x38,0x00, //?????? 1
  14. 0x00,0x18,0x24,0x04,0x18,0x20,0x3c,0x00, //?????? 2
  15. 0x00,0x18,0x24,0x04,0x18,0x04,0x24,0x18, //?????? 3
  16. 0x00,0x08,0x18,0x28,0x48,0x7c,0x08,0x08, //?????? 4
  17. 0x00,0x3c,0x20,0x38,0x04,0x04,0x38,0x00,//?????? 5
  18. 0x00,0x18,0x24,0x20,0x38,0x24,0x24,0x18,//?????? 6
  19. };
  20. uint r;
  21. char offset=0;
  22. uchar Current_Level=1,Dest_Level=1,x=0,t=0;
  23. void delay(uint x) //????,??????????
  24. {
  25. uchar i;
  26. while(x--)
  27. for(i=0;i<120;i++);
  28. }
  29. void main() //???
  30. {
  31. P3=0x80; //? P3 ????
  32. Current_Level=1;
  33. Dest_Level=1;
  34. TMOD=0x01; //??? T0 ?????? 1
  35. TH0=-4000/256; // TL0=-4000%256;
  36. TR0=1; //?? T0 ????
  37. IE=0x82;
  38. while(1); //????
  39. }
  40. void LED_Screen_Display() interrupt 1 //????
  41. {
  42. uchar i;
  43. if(P1!=0xff&&Current_Level==Dest_Level)
  44. {
  45. if(P1==0xfe) {Dest_Level=5;K6=0;}
  46. if(P1==0xfd) {Dest_Level=4;K5=0;}
  47. if(P1==0xfb) {Dest_Level=3;K4=0;}
  48. if(P1==0xf7) {Dest_Level=2;K3=0;}
  49. if(P1==0xef) {Dest_Level=1;K2=0;}
  50. if(P1==0xdf) {Dest_Level=0;K1=0;}
  51. }
  52. TH0=-4000/256; //??
  53. TL0=-4000%256;
  54. P3=_crol_(P3,1); //??????
  55. i=Current_Level*8+r+offset;
  56. P0=~NUM[i];
  57. if(Current_Level<Dest_Level){
  58. if(++r==8){
  59. r=0;
  60. if(++x==4){
  61. x=0;
  62. if(++offset==8){
  63. offset=0;
  64. Current_Level++;
  65. }
  66. }
  67. }
  68. }
  69. else
  70. if(Current_Level>Dest_Level)
  71. {
  72. if(++r==8)
  73. {
  74. r=0;
  75. if(++x==4)
  76. {
  77. x=0;
  78. if(--offset==-8)
  79. {
  80. offset=0;
  81. Current_Level--;
  82. }
  83. }
  84. }
  85. }
  86. else
  87. {
  88. if(++r==8) {r=0;}
  89. }
  90. }
复制代码
本人初学,仅供参考,存在错误和不足之处,请大家回帖多多指教,不胜感激.切勿照搬,文件下载:
Keil代码与Proteus仿真下载: 电梯楼层.7z (29.84 KB, 下载次数: 21)
本主题由 admin 执行 审核通过

评分

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

查看全部评分

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

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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