找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2471|回复: 2
收起左侧

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

[复制链接]
ID:215411 发表于 2017-6-28 12:01 | 显示全部楼层 |阅读模式
Proteus仿真实例(8051)-步进电机控制,带数码管显示

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

0.png 0.png

单片机汇编语言源程序如下:
  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)
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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