• Jueves 28 de Marzo de 2024, 19:03

Autor Tema:  Motor Bipolar  (Leído 2551 veces)

mytek

  • Nuevo Miembro
  • *
  • Mensajes: 1
    • Ver Perfil
Motor Bipolar
« en: Miércoles 14 de Diciembre de 2005, 06:24 »
0
aqui tengo el programa para que puedan hacer correr un motor paso a paso,.,, bipolar

************************************

LIST   P=16F84
include   "P16F84.INC"
RADIX   HEX

PUERTAA      EQU   0x05
PUERTAB      EQU   0x06
ESTADO      EQU   0x03
PRIMERO      EQU   0x0C
SEGUNDO      EQU   0x0D

   ORG   0x00
   bsf   ESTADO,5
   movlw   b'00000001'
   movwf   PUERTAB
   movlw   b'00000111'
   movwf   PUERTAA
   bcf   ESTADO,5
   clrf   PUERTAA   
   clrf   PUERTAB


parpa      bsf   PUERTAB,4   ;ENCIENDO 4 Y 5
      bsf   PUERTAB,5
      bsf   PUERTAB,3   ;ENCIENDO 3 Y 2
      bsf   PUERTAB,2

   call   retardo
      bcf   PUERTAB,4   ;motor derecho
      bcf   PUERTAB,5   
      bsf   PUERTAB,5      
      bsf   PUERTAB,6
      bcf   PUERTAB,3   ;motor izquierdo   
      bcf   PUERTAB,2   
      bsf   PUERTAB,2      
      bsf   PUERTAB,1   
   call   retardo
      bcf   PUERTAB,5   
      bcf   PUERTAB,6   
      bsf   PUERTAB,6   ;   
      bsf   PUERTAB,7
      bcf   PUERTAB,2   
      bcf   PUERTAB,1   
      bsf   PUERTAB,1   ;      
      bsf   PUERTAA,3   
   call   retardo
      bcf   PUERTAB,6   
      bcf   PUERTAB,7
      bsf   PUERTAB,7   ;   
      bsf   PUERTAB,4   
      bcf   PUERTAB,1   
      bcf   PUERTAA,3   
      bsf   PUERTAA,3   
      bsf   PUERTAB,3
   call   retardo
      bcf   PUERTAB,4   
      bcf   PUERTAB,7
      bcf   PUERTAA,3   
      bcf   PUERTAB,3
   goto    parpa

retardo   movlw   0xff           ; ESTE ES EL RETARDO APROX 0.26 SEGUNDOS
   movwf   PRIMERO
   movlw   0xff
   movwf   SEGUNDO
   
ir   decf   PRIMERO
   btfss   ESTADO,2
   goto   ir
   goto   ir2

ir2   decf   SEGUNDO
   btfss   ESTADO,2
   goto   ir
   return



end

***************************************************
El mensaje contiene 1 archivo adjunto. Debes ingresar o registrarte para poder verlo y descargarlo.

© Jonathan ©

  • Moderador
  • ******
  • Mensajes: 1671
  • Nacionalidad: ar
    • Ver Perfil
    • http://www.einstec.com.ar
Re: Motor Bipolar
« Respuesta #1 en: Miércoles 14 de Diciembre de 2005, 13:01 »
0
Gracias mytek :smartass:  y bienvenido a nuestra comunidad :)  :comp:
EINSTEC Tecnología «La única fuente del conocimiento es la experiencia.»

«Lo importante es no dejar de hacerse preguntas.»