motor-key.asm

步进电机正反转控制 51单片机进行控制 可以正反转

;/******************************************************************/
;/*                                                                */
;/* ME500单片机开发系统演示程序 - 键控步进电机正反转实验           */
;/*                                                                */
;/*                                                                */
;/* 版本： V1.0 (2006/11/20)                                       */
;/* 作者： gguoqing (Email: [e-mail])                   */
;/* 网站： www.willar.com(伟纳电子)  www.mcusj.com(伟纳单片机世界) */
;/* 邮箱： [e-mail]                                      */
;/*                                                                */
;/*【版权】Copyright(C)伟纳电子 www.willar.com All Rights Reserved */
;/*【声明】此程序仅用于学习与参考，引用请注明版权和作者信息！      */
;/*                                                                */
;/******************************************************************/

; 步进电机步进角为 7.5度，一圈 360 度。
; 单四拍工作方式：
; A-B-C-D (即一个脉冲,转 7.5 度)
; 单双八拍工作方式：
; A-AB-B-BC-C-CD-D-DA (即一个脉冲,转 3.75 度)
; 一个取数工作周期，步进电机转30度
; 步进电机转一圈需要48个工作脉冲
;-------------------------------------------------------
; A组线圈对应 P1.0    （桔色）
; B组线圈对应 P1.1    （棕色）
; C组线圈对应 P1.2    （黄色）
; D组线圈对应 P1.3    （黑色）
;-------------------------------------------------------
         K1  BIT  P1.4     ;步进电机正转
         K2  BIT  P1.5     ;步进电机反转
         K3  BIT  P1.6
         K4  BIT  P1.7     ;步进电机停止转动
       BEEP  BIT  P3.7
;-------------------------------------------------------
           ORG 0000H
           LJMP MAIN
           ORG 0030H
;-------------------------------------------------------
MAIN:
           MOV  SP,#60H
           MOV  P1,#0F0H   ;关闭步进电机，键输入线置高
MAIN1:           
           JB  K1,MAIN2
           ACALL  BEEP_BL   ;步进电机正转
	   JNB K1,$
           ACALL  FFW          
MAIN2:           
           JB  K2,MAIN1
          ACALL  BEEP_BL   ;步进电机反转
	   JNB  K2,$
           ACALL  REV                     
           JMP  MAIN1
;------------------------正转-------------------------           
FFW:
          ;MOV R3,#  64;7.5度电机正转1圈共48个脉冲
           MOV  R3,#320       ;转5圈需48*5=240个脉冲
FFW1:
           MOV R0,#00H
FFW2:
           JB  K4,FFW3         ;终止步进电机运行
           ACALL  BEEP_BL
           JMP  FFW4
FFW3:           
           MOV A,R0
           MOV DPTR,#TABLE1
           MOVC A,@A+DPTR
           JZ FFW1
           MOV P1,A
           LCALL DELAY
           INC R0
           DJNZ R3,FFW2
FFW4:
           MOV P1,#0F0H
           RET
;---------------------------反转--------------------------
REV:
          ;MOV R3,#48           ;7.5度电机正转1圈共48个脉冲
           MOV  R3,#320  ;转5圈需48*5=240个脉冲
REV1:
           MOV R0,#00H
REV2:
           JB  K4,REV3          ;终止步进电机运行
           ACALL  BEEP_BL
           JMP  REV4
REV3:          
           MOV A,R0
           MOV DPTR,#TABLE2
           MOVC A,@A+DPTR          
           JZ  REV1
           MOV P1,A
           CALL DELAY
           INC R0
           DJNZ R3,REV2
REV4:
           MOV P1,#0F0H
           RET
           
;-------------------------------------------------------
DELAY:
           MOV R7,#40    ;步进电机的转速
DEL1:      MOV R6,#248
           DJNZ R6,$
           DJNZ R7,DEL1
           RET
;-------------------------------------------------------
DELAY1:
           MOV   R5,#20    ;2S 延时子程序
DEL2:
           MOV   R7,#200
DEL3:
           MOV   R6,#250
           DJNZ  R6,$
           DJNZ  R7,DEL3
           DJNZ  R5,DEL2
           RET
;-------------------------------------------------------
; 单四拍工作方式：
TABLE1:
        DB   0F1H,0F2H,0F4H,0F8H  ;正转表
        DB   00H  ;正转结束
TABLE2:
        DB   0F8H,0F4H,0F2H,0F1H  ;反转表
        DB   00H  ;反转结束
;--------------------------------------------------------
;蜂鸣器响一声子程序
;--------------------------------------------------------
BEEP_BL:
         MOV  R6,#100
  BL1:
         CALL  DEX1
         CPL  BEEP
         DJNZ  R6,BL1
         RET
 DEX1:
         MOV  R7,#180
 DEX2:
         NOP
         DJNZ  R7,DEX2
         RET
;--------------------------------------------------------- 
         END