Autor Tema: Programa en PIC12F683 no funciona  (Leído 1658 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado sylar7112

  • PIC10
  • *
  • Mensajes: 2
Programa en PIC12F683 no funciona
« en: 14 de Mayo de 2012, 19:12:17 »
Hola! tengo un problema, hize un programa para controlar el avance de una banda transportadora utilizando un PIC16F628a, en el cual funcionaba perfectamente,  pero por problemas de espacio decidí pasarme a un PIC12F683, pero en este PIC el programa no funciona.

Este es el programa en PicBasic :

Citar
@ DEVICE MCLR_OFF, INTRC_OSC, WDT_OFF, BOD_OFF, PWRT_ON, PROTECT_OFF

    CMCON0 = 7
    VRCON = 0
    TRISIO = %000001
    
    SYMBOL SENAR = GPIO.0
    SYMBOL MBAND = GPIO.5
    X VAR BYTE

INI: IF SENAR=1 THEN GO1
    GOTO    INI
    
GO1: FOR X=1 TO 1000    
        GOSUB   CHK1    
        HIGH    MBAND    
        GOSUB   CHK1    
        PAUSE   45      
        GOSUB   CHK1    
    NEXT                
    LOW     MBAND
    GOTO    INI
    
GO2: FOR X=1 TO 1000
         GOSUB  CHK2
         HIGH   MBAND
         GOSUB  CHK2
         PAUSE  45
         GOSUB  CHK2
     NEXT
     LOW    MBAND
     GOTO   INI
    
CHK1:IF SENAR=1 THEN GO2
     RETURN
    
CHK2:IF SENAR=1 THEN GO1
     RETURN        
            

No logro encontrar el error, incluso cambié la configuración de los puertos para hacerlos todos I/O pero aún así no funciona, Espero puedan ayudarme.

Gracias
« Última modificación: 20 de Mayo de 2012, 21:02:51 por sylar7112 »