找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 3290|回复: 2
打印 上一主题 下一主题
收起左侧

Proteus仿真实例8051单片机步进电机控制-汇编语言

[复制链接]
跳转到指定楼层
楼主
Proteus仿真实例(8051)-步进电机控制,带数码管显示

使用说明:按Key1,步进电机顺时针旋转,Key2步进电机逆时针旋转。



单片机汇编语言源程序如下:
  1. K1 EQU P2.0
  2. K2 EQU P2.1        
  3.         ORG 0000H
  4.         AJMP MAIN

  5.         ORG 0030H
  6. MAIN:   MOV A,#33H
  7.         SETB P2.6
  8.         SETB P2.7
  9. KEY1:   SETB    K1                    ;将P2.2置1
  10.         JB      K1,  KEY2             ;有键按下P2.2=0
  11. KEY11:  ACALL   DELAY_A                ;延时,防止抖动
  12.         SETB    K1
  13.         JB      K1,  KEY11            ;确认键按下
  14.         ACALL   CLOCKWISE

  15. KEY2:   SETB    K2                    ;将P2.2置1
  16.         JB      K2,  KEY1             ;有键按下P2.2=0
  17. KEY21:  ACALL   DELAY_A                ;延时,防止抖动
  18.         SETB    K2
  19.         JB      K2,  KEY21            ;确认键按下
  20.         ACALL   ANTI_CLOCKWISE
  21.         AJMP    KEY1   

  22. CLOCKWISE:
  23.         RL A
  24.         MOV P3,A
  25.         MOV P0,#0C6H
  26.         ACALL DELAY
  27.         RET
  28.       
  29. ANTI_CLOCKWISE:
  30.         RR A
  31.         MOV P3,A
  32.         MOV P0,#88H
  33.         ACALL DELAY
  34.         RET
  35.       
  36. DELAY:   MOV R6,#20H
  37. DELAY22: MOV R7,#80H
  38. DELAY11: DJNZ R7,DELAY11
  39.          DJNZ R6,DELAY22         
  40.          RET

  41. DELAY_A:MOV  R7,#88H
  42. DELAY1: DJNZ R7,DELAY1
  43.         RET        
  44.         end   
复制代码

所有资料51hei提供下载:
Proteus仿真实例(8051)-步进电机控制.zip (13.54 KB, 下载次数: 28)


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

使用道具 举报

沙发
ID:7485 发表于 2017-6-28 16:54 | 只看该作者
这个可以转动吗?按住不放?
回复

使用道具 举报

板凳
ID:74784 发表于 2017-6-28 22:52 | 只看该作者
看见汇编就格外亲~~~~~~~~~~~~
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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