TODOPIC

Microcontroladores PIC => Lenguaje Basic para microcontroladores PIC => Mensaje iniciado por: fco1306 en 02 de Julio de 2010, 17:26:21

Título: No consigo encontrar el fallo
Publicado por: fco1306 en 02 de Julio de 2010, 17:26:21
Alguien me puede decir en donde está el fallo con el siguiente programa
Código: [Seleccionar]
symbol RELE =GPIO.0
SYMBOL ROJO=GPIO.1
SYMBOL VERDE =GPIO.2
SYMBOL PROGR =GPIO.3
SYMBOL BOTON= GPIO.4
SYMBOL SERVO= GPIO.5

TRISIO =%011000


POS var byte
N VAR BYTE


INICIO:
CALL LEER
IF PROGR=1 THEN GOSUB SUMA
IF BOTON=1 THEN GOSUB PULSO


GOTO INICIO
END


LEER:

POS=155

RETURN


SUMA:
POS=155+5
IF POS>255 THEN POS=155
RETURN

PULSO:

POS=155
RETURN



es para un 12f629 el microcode me da error "cancelled" .
No sé a que se debe.
Título: Re: No consigo encontrar el fallo
Publicado por: gally en 03 de Julio de 2010, 00:04:43
no se nada de microcode, pero no sera que leer, suma y pulso estan fuera de el end ????

te doy una idea pero no se si es eso.
Título: Re: No consigo encontrar el fallo
Publicado por: fco1306 en 03 de Julio de 2010, 08:38:24
Lo he cambiado y no es eso.Pienso que a lo mejor la versión que tengo de pbp con mecanique no soporta el 12f629.Con otros micros y otro programa me funciona sin problema.
Título: Re: No consigo encontrar el fallo
Publicado por: Chrisbaf en 04 de Julio de 2010, 23:43:50
coloca cmocon = 7 esto para apagar los comparadores
Título: Re: No consigo encontrar el fallo
Publicado por: Palomino86 en 16 de Agosto de 2010, 15:12:19
Yo uso PBP y me compila bien

Fijate en el menu "View", despues a "Compile and Program Options" y fijate en la pestaña Assembler que este seleccionado "Use MPASM" y que la carpeta corresponda a tal.
La ruta debería de ser la siguiente: C:\Archivos de programa\Microchip\MPASM Suite.

También fijate en la pestaña "Compiler" que este desactivada la opción Use PBPL.

Como comentario te diria que declararas la velocidad del cristal e incluyeras las librerias de comunicacion de PBP

INCLUDE            "MODEDEFS.BAS"  (Libreria)
DEFINE             OSC 20                  (Cristal a 20 MHz)

Saludos