HSERIN & HSEROUT - Todo un dilema...

[Abago]

Voy a tener que cambiarme el NICK a
DrQUESTIONS!!!

Cuantas llamadas a funciones mediante call/gosub, pueden ser anidadas???

[MGLSOFT]

El 16F876 tiene 8KWords de programa, solo debes paginarlas correctamente o dejar que lo haga el PBP....

[MGLSOFT]

Call/Gosub en ASM puedes anidar hasta ocho ese es el maximo nivel de pila del ensamblador, pero ojo, si estas mezclando asm y basic usa solo 4 niveles, que es el maximo del PBP...

[Abago]

Gracias MGL
Con saber que puedo anidar 4 llamadas a funciones desde PBP, me sirve.
De momento, no necesito anidar mas de 3

Sobre el tema del tamaño del pic...
El problema, me lo da el microcode studio.
Cuando le doy a compilar... ahora me dice que estoy utilizando 1560 Words...
y en cuanto me paso de las 2000, me dice, que no se puede compilar... O algo asi, creo recordar. sabes donde puede estar el problema???
Porque con 2000 me quedo corto, pero con 8000 me sobraría espacio considerablemente.

Ahora surge la duda, de si es problema del microcode studio, o un problema mio de entendimiento...

[Abago]

gosub getbuf ":
while (bufchar <> 34) "leemos buffer hasta encontrar las primeras "
 gosub getbuf ""
wend
cont = 0
gosub getbuf "capturamos el primer caracter del ID
   while ((bufchar <> 34) or (cont < 12)) "leemos el buffer hasta encontrar las siguientes " o que el contador sea 11
      write cont , bufchar
        gosub getbuf
      cont = cont + 1
   wend

Asi no me funciona!!!
while ((bufchar <> 34) or (cont < 12))
Si embargo si solo le pongo la comparación por codigo 34, si funciona
while (bufchar <> 34)

será que en PBP, no está permitida la doble comparación en el while???

[Sispic]

Anda Abago , buscate algun 18f252 / 452 . que ya hemos superado el año 2.000.
Tendras mas memoria , mas words , mas velocidad , se ababaron las pajinaciones y ...mas...mass. +++++++++++++

[Abago]

Gracias sispic
Ya me he informado un poquito...

Ahora!!!
PREGUNTA!!!
--------------------------------
tmp = 0
inicio:
        high PORTB.7              
        pause 10                  
        low PORTB.7
        pause 25                  
        gosub capturaterminal
goto inicio      


capturaterminal:

while (INDEX_IN <> INDEX_OUT)
high portb.1
 gosub getbuf
 write tmp, bufchar
 tmp = tmp + 1
low portb.1
wend
return
-----------------------------------------------
Ahora, teniendo en cuenta la base del programa que colgó Marques, para gestionar la usart en ASM...
tengo un problema...
trabajando con el hiperterminal...
empiezo a escribir el ABCDARIO....
saco el pic del circuito, Lo leo y en la eeprom tengo un bonito listado del abecedario... FUNCIONA!!!!!

ahora mi sorpresa.... conecto un modem
llamo desde mi movil, a la linea en la que está conectado el modem
detecto que lee algún dato, al ver parpadear el led de portb.1
sabo el pic del circuito, lo leo, y sorpresa... me ha leido el comando ring...
este comando, va acompañado del parrafón del identificador de llamada...
para amargar la existencia a mi circuito... he dejado el buffer a 10 caracteres... Entonces al entrar una llamada al modem, consigo leer parte de los datos, en grupos de 10 elementos, pero parece que el pic, no tiene fuerza, para pillar al buffer y limpiarlo, según vamos procesando el módulo principal... Y mira que es sencillo...


Alguna idea???

[MarquesSalsero]

Escrito originalmente por Abago
El problema, me lo da el microcode studio.
Cuando le doy a compilar... ahora me dice que estoy utilizando 1560 Words...
y en cuanto me paso de las 2000, me dice, que no se puede compilar... O algo asi, creo recordar. sabes donde puede estar el problema???
Porque con 2000 me quedo corto, pero con 8000 me sobraría espacio considerablemente.

Ahora surge la duda, de si es problema del microcode studio, o un problema mio de entendimiento...

Creo que te refieres a un mensaje que te indica que has sobrpasado las 2048 palabra, pero no es un error sino simplemente una indicacion. El programa te compilara correctamente.

[Abago]

Gracias por tu aclaración marques....
Bueno, realmente, debería darte las gracias por al menos un 60% del proyecto... Que fue el código de gestión de USART en asm...
Gracias a vuestras aclaraciones, y comentarios, parece que la cosa empieza a funcionar....

[MarquesSalsero]

Escrito originalmente por AbagoGracias por tu aclaración marques....
Bueno, realmente, debería darte las gracias por al menos un 60% del proyecto... Que fue el código de gestión de USART en asm...
Gracias a vuestras aclaraciones, y comentarios, parece que la cosa empieza a funcionar....

Las gracias no me las des a mi sino a MPLABS que no solo han creado en compilador de Basic sino que ademas en su web tienen una cantidad de informacion muy interesante.

[todopic]

MPLAB  and MELABS --->MPLABS


Norberto

[manu2097]

Hola, siento las molestias, pero acabo de retomar el tema de intentar utilizar la usart con interrupciones mediante picbasic y cuando pruebo este programa en el pic se queda bloqueado cuando le entra un carácter por el serie, creo que es por culpa de la interrupción. No llega a encender el led que está en el portb.6 que es la primera instrucción que hay en la rutina cuando salta la interrupción del buffer de recepción lleno.  Después de encender el led quiero que vuelva a enviar por el serie el carácter que le ha llegado pero lo dicho, el pic se queda bloqueado.

"programa simple para saber si consigo que funcione la USART con interrupción.

define OSC 20
include "bs2defs.bas"
DEFINE LOADER_USED 1
ADCON1=6

"inicializamos la USART
        TRISC = %10111111       " Set TX (PortC.6) to out, rest in
        SPBRG = 64              " establece el baud rate a 4800 asíncrono con velocidad baja
        RCSTA = %10010000       " activamos el puerto serie y la recepción continua
        TXSTA = %00100000       " transmisión habilitada


INTCON = %11000000      " activamos las interrupciones y las de periféricos
ON INTERRUPT GoTo serie      " Declare interrupt handler routine
PIE1.5 = 1            " activamos la interrupción de recepción de la USART  

char var byte

loop:
    high portb.7
    pause 100
    low portb.7
    pause 100
goto loop

enable

serie:
    high portb.6
    hserin [char]
    hserout [char]
    if PIR1.5=1 then serie
resume

disable

end
     

[manu2097]

perdonad, ya he encontrado el error, se me ha ido la chapa y he puesto  enable  y luego disable, y no es así primero disable y luego enable, por eso cuando se activa la interrupcion se queda bloqueado por que no puede entrar a la rutina de interrupción.

Ahora el problema que tengo es que cuando mando muchos caracteres se me bloquea supongo que será por el tema de saturación del buffer

[MarquesSalsero]

Jo, otra vez que se demuestra que los teclados y yo estamos peleados.

No queria decir MPLABS sino MELABS.

Algun dia aprendere a escribir con lago mas de dos dedos y a no confundir las letras ( lo que es un gran problema al programar).

[Abago]

manu, hechale un vistazo al código que dejé colgado hace varios post.
Creo que te puede ser de utilidad, para mejorar el funcionamiento de la usart.
Y sobre todo, te recomiendo que te leas los link que dejó nuestro amigo marques en la primera página del post.
Tienes un ejemplo en asm, que es como lo estoy tratando yo...
Y otro en PBP.
Estos ejemplos hacen lo que aparentemente necesitas, con la salvedad de que no encienden el led.

Un saludo, y espero que aprendas tantas cosas como yo he aprendido, gracias a nuestros amigos Marques, sispic y MGL...
Si me dejo alguno, que se de por aludido...

Para cualquier duda, ya sabes donde estamos.