Autor Tema: Ejemplos Protón  (Leído 22440 veces)

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

Desconectado TREMENS

  • PIC16
  • ***
  • Mensajes: 125
Ejemplos Protón
« en: 20 de Noviembre de 2006, 16:33:02 »
Este hilo lo inicié para documentar ejemplos en protón, dado que hay temas como ejemplos de mikrobasic, o ejemplos de mickrobasic y proton, o de picbasic y usb. Sin embargo no hay un lugar donde especificamente esten ejemplos de protón, por lo me parece interesante ir juntandolos en un solo lugar.

Desconectado LordLafebre

  • Moderador Global
  • DsPIC30
  • *****
  • Mensajes: 3529
    • Micros & micros
Re: Ejemplos Protón
« Respuesta #1 en: 20 de Noviembre de 2006, 17:41:12 »
Hola:

Creo que no se a publicado mucho sobre proton ya que no mucha gente lo usa, pese a que es un muy buen compilador, estoy migrando a el desde PBP y me gusta mas, pero si te animas a publicar ejemplos o esas cosas, con gusto pasare por aqui a aportar en lo que se pueda.

Desconectado doppel

  • Moderador Local
  • PIC24H
  • *****
  • Mensajes: 1515
    • DOPPELBLOG
Re: Ejemplos Protón
« Respuesta #2 en: 20 de Noviembre de 2006, 19:44:08 »
Hola

En el link que dejo, hace mucho tiempo se pusieron algunos ejemplos de protón.-

http://www.todopic.com.ar/foros/index.php?topic=2810.0

saludos :-)
**DOPPELBLOG**

 " Para ser exitoso no tienes que hacer cosas extraordinarias. Haz cosas ordinarias, extraordinariamente bien "

Desconectado TREMENS

  • PIC16
  • ***
  • Mensajes: 125
Re: HOLA por LCD
« Respuesta #3 en: 29 de Noviembre de 2006, 18:51:37 »
tras algunos problemas , posteo mi primer programilla en esta sección de ejemplos, exclusiva de PROTON.

Saca por lcd la palabra hola.
RS a RB2, RW A MASA, E a RB1
D4 a D7 conectado a RB4 a RB7

cóDIGO:

Device = 16F877         
     XTAL = 4   
     
    LCD_TYPE = 0                 ' Our LCD is the alphanumeric type
       
     LCD_DTPIN = PORTB.4         ' For Proteus Virtual Hardware Board LCD Data is PORTB.4,5,6,7
   
     LCD_RSPIN = PORTB.2        ' LCD RS pin
     LCD_ENPIN = PORTB.1        ' LCD EN pin
     LCD_INTERFACE = 4           ' We're using a 4-bit LCD interface
     LCD_LINES = 2               ' We're using a 2-Line LCD
   
       
   TRISB = 0
DELAYMS 500             
inicio:
cls
print at 2,2,"Hola"
DELAYMS 500
goto inicio


PD: ojalá se unan los demás


Desconectado navaismo

  • Jubilado Todopic
  • PIC24H
  • ****
  • Mensajes: 1973
Re: Ejemplos Protón
« Respuesta #4 en: 30 de Noviembre de 2006, 16:04:48 »
[goear]f19d715[/goear]

probando esto

Barometro

Bueno aqui un ejemplo en Proton de como leer la Presion Atmosferica de un sensor de Freescale MPX4115. este ejemplo le hubiera errado de no ser por Pao ya que me explico como hacer el corrimiento para leer los 1024 valores del ADC ya que Proton parece que no lo hace como PBP.

A este sensor no le veo otro uso que el de estacion meterologica o como Altimetro.

Segun el Datasheet la funcion de transferencia del sensor es la siguiente:
Vout=Vs(.009*P-.095)

donde:

                  Vout  es el valor que entrega el sensor
                  P es la Presion (que no conocemos)
                  Vs   es la fuente quew alimenta al Sensor generalmente 5 o 5.1 Volts

Aqui el codigo:

Código: FreeBasic
  1. '****************************************************************
  2. '*  Name    : Barometro.bas                                     *
  3. '*  Author  : Max Eduardo Reyes Vera Juárez                     *
  4. '*  Notice  : Copyright (c) 2006 Protegido por leyes de autor   *
  5. '*          : All Rights Reserved                               *
  6. '*  Date    : 30/11/2006                                        *
  7. '*  Version : 1.0                                               *
  8. '*  Notes   : Funcion de transferecncia del MPX4115A es         *
  9. '*          : Vout=VS(0.009*P-0.095)+- ERROR                    *
  10. '*          : Donde Vout es el voltaje que entrega el MXP4115A  *
  11. '*          : VS es el Valor de la fuente gralmente 5 o 5.1V    *
  12. '*          : P es la presion a encontrar                       *
  13. '*          : ERROR es el error que entrega el MPX a ciertas    *
  14. '*          : Temperaturas;       +-3 de -40° a 0°              *
  15. '*          :                     +-1 de   0° a 85°             *
  16. '*          :                 +-3 de  80° a 125°                *    
  17. '****************************************************************
  18.  
  19.  
  20.  DEVICE = 16F88
  21.  XTAL = 4
  22.  
  23.  DECLARE adin_res 10             ' resolucin de 10 bits
  24.  DECLARE ADIN_STIME 50           ' tiempo de muestreo 50ms
  25.  
  26.                                  
  27. ANSEL  = 1                       ' ADC en RA0
  28. ADCON1 = 11                      ' Justificado a la derecha y con VREFs
  29. TRISA.0= 1                       ' RA0 de entrada
  30.  
  31. symbol Vs = 5                    ' Valor de La Fuente del Sensor  
  32.  
  33. DIM Vadc AS word
  34. DIM Vout AS float
  35. DIM P    AS float
  36. DIM c    AS Float
  37. DIM b    AS float
  38. DIM i    AS byte
  39.  
  40. DIM TX AS Portb.0                ' Pin de Transmision
  41.  
  42. Inicio:
  43.  GOSUB get_vout
  44.  GOSUB pausa
  45.  GOSUB get_presion              ' Enviar Presion cada 2 minutos
  46.  GOSUB pausa
  47.  GOSUB Muestra_presion
  48.  FOR i=0 TO 120
  49.   delayms 1000
  50.  NEXT i
  51. GOTO inicio
  52.  
  53. get_VouT:
  54.  vadc = adin 0                              ' Obtencion del ADC
  55.  VADC = Vadc >> 6                           ' Rotar a la derecha para conseguir los 1024
  56.  vout = (vadc * 5) / 1024                   ' Voltaje que entra al ADC
  57. RETURN
  58.  
  59. get_Presion:                               ' Obtener la Presion Atmosferica en KPa
  60.  c = .095 * vs
  61.  b = .009 * vs                             ' Vout=Vs(.009*P-.095)
  62.  P = (vout + c)/(b)                        ' P = (Vout + (.095*Vs)) / (.009*Vs)
  63. RETURN
  64.  
  65. Muestra_Presion:                           ' Envio de la Presion en Kpa y el Voltaje medido
  66.   serout tx, 16468, ["Presion(KPa): ", DEC p, " Vin: ",dec vout, 13]
  67. RETURN  
  68.  
  69. pausa:
  70. delayms 250
  71. RETURN
  72.  

y el PINOUT:

« Última modificación: 02 de Diciembre de 2006, 16:28:59 por navaismo »
"Mi tercer deseo, que otra cosa podría ser, poner un final a todo el sufrimiento, que sólo con mi propia extinción el planeta podrá ser aliviado. Pobre de mí, Si tuviera tres deseos hoy, la elección no sería dificil para mí, Sólo tres deseos serían suficientes, No tendría uso para más."

"He sido un hombre que busca y aun lo sigo siendo, pero ya no busco en las estrellas y en los libros, sino en las enseñanzas de mi sangre."

Desconectado Mario

  • Colaborador
  • PIC24F
  • *****
  • Mensajes: 873
Re: Ejemplos Protón
« Respuesta #5 en: 01 de Diciembre de 2006, 02:32:13 »
Si puedes escribir directo en el registro escribe esto:
ADCON1.7=1

Con eso justificas a la derecha y no tienes que hacer corrimientos, sino fíjate en los ejemplos del PBP para 10 bits del convertidor, aunque es Proton (ya lo habiamos discutido ¿recuerdas?) puedes escribir directamente en el registro.


Si no me crees, revisa cualquier hoja de datos donde se tenga convertidor y verás que el bit 7 del ADCON1 es para justificar a la izquierda (0) o derecha (1).

Usa izquierda si vas a utilizar 8 bits, usa derecha si vas a utilizar 10 bits.
La buena administración es utilizar el sentido común y la regla de oro; aunque el sentido común no es tan común como quisiéramos que fuera y, quien tiene el oro, hace las reglas.
George Terry

"A loser will defeat a genius with hard work"
Rock Lee

Desconectado navaismo

  • Jubilado Todopic
  • PIC24H
  • ****
  • Mensajes: 1973
Re: Ejemplos Protón
« Respuesta #6 en: 01 de Diciembre de 2006, 02:38:06 »
Pues si Mario si miras el codigo esta escrito r¿directamente el registro ADCON1 justificado a la derecha y con VREFs pero aun asi es necesario hacer el corrimiento si no en lugar de 1024 te toma 65472
"Mi tercer deseo, que otra cosa podría ser, poner un final a todo el sufrimiento, que sólo con mi propia extinción el planeta podrá ser aliviado. Pobre de mí, Si tuviera tres deseos hoy, la elección no sería dificil para mí, Sólo tres deseos serían suficientes, No tendría uso para más."

"He sido un hombre que busca y aun lo sigo siendo, pero ya no busco en las estrellas y en los libros, sino en las enseñanzas de mi sangre."

Desconectado navaismo

  • Jubilado Todopic
  • PIC24H
  • ****
  • Mensajes: 1973
Re: Ejemplos Protón
« Respuesta #7 en: 02 de Diciembre de 2006, 05:22:15 »
Altimetro

Bueno haciendo unas modififcaciones al programa anterior y cambiando de Micro del 16F88 al 18F452 por aquello del logaritmo. tenemos ahora un Altimetro (¿si se llama asi?).

Me encantaria decirles que tiene un margen de error de unos cunatos metros pero aun no se de caunto es su margen de error aunque por las fallas de mis calculos al Voltaje de entrada ha de ser de unos 20m  :shock: jiji en teoria a una presion de 760mmHg o sea unos 101.3Kpa a nivel del mar debe dar 0m pero como no vivo a nivel del mar y en la simulacion no he conseguido una lectura limpia de 101.3 no puedo decirles  :lol:

Pero de algo servira no? al menos una idea.

Aqui el codigo:

Código: FreeBasic
  1. '****************************************************************
  2. '*  Name    : altimetro.bas                                     *
  3. '*  Author  : Max Eduardo Reyes Vera Juárez                     *
  4. '*  Notice  : Copyright (c) 2006 Protegido por leyes de autor   *
  5. '*          : All Rights Reserved                               *
  6. '*  Date    : 02/12/2006                                        *
  7. '*  Version : 1.0                                               *
  8. '*  Notes   :                                                   *
  9. '*          :                                                   *
  10. '****************************************************************
  11. DEVICE = 18f452
  12.  XTAL = 4
  13.  
  14.  DECLARE adin_res 10             ' resolucin de 10 bits
  15.  DECLARE ADIN_STIME 50           ' tiempo de muestreo 50ms
  16.  
  17.                              
  18. ADCON1 = 143                     ' Justificado a la derecha y con VREFs
  19. TRISA.0= 1                       ' RA0 de entrada
  20.  
  21. symbol Vs  = 5                    ' Valor de La Fuente del Sensor
  22. symbol P_0 = 1013.3               ' Valor de la Presion a nivel del mar en HPa
  23.                    
  24. DIM Vadc  AS word
  25. DIM i     AS byte
  26. DIM Vout  AS float
  27. DIM loga  AS float                  ' Variables de manejo
  28. DIM defp  AS float
  29. DIM M1    AS float
  30. DIM M2    AS float
  31. DIM H     AS float
  32. DIM P     AS float
  33. DIM HP    AS float
  34. DIM C     AS float
  35. DIM B     AS float
  36.  
  37. DIM TX AS Portb.0                ' Pin de Transmision
  38.  
  39. Inicio:
  40.  
  41.  GOSUB get_vout
  42.  GOSUB pausa
  43.  GOSUB get_presion              ' Enviar Presion cada 2 minutos
  44.  GOSUB pausa
  45.  GOSUB get_altura
  46.  GOSUB pausa
  47.  GOSUB Muestra_presion
  48.  
  49. FOR i=0 TO 120
  50.   delayms 1000
  51.  NEXT i
  52.  
  53. GOTO inicio
  54.  
  55. get_VouT:
  56.  vadc = adin 0                              ' Obtencion del ADC
  57.  'VADC = Vadc >> 6                           ' Rotar a la derecha para conseguir los 1024
  58.  vout = (vadc * 5) / 1024                   ' Voltaje que entra al ADC
  59. RETURN
  60.  
  61. get_Presion:                               ' Obtener la Presion Atmosferica en KPa
  62.  c = .095 * vs
  63.  b = .009 * vs                             ' Vout=Vs(.009*P-.095)
  64.  P = (vout + c)/(b)                        ' P = (Vout + (.095*Vs)) / (.009*Vs)
  65. RETURN
  66.  
  67.  
  68. '*************************************************************************************************
  69. '*                   para sacar la altitud se usa la formula                                     *
  70.  *                                                                                               *
  71. '*                                                                                               *                    
  72. '*        8430.153*ln(P_0/P)           donde P es la presion actual y                            *
  73. '*  H = ------------------------       P_0 es la presion del mar 760mmHg o 1013.3 HPa            *
  74. '*         1+(.095*ln(P_0/P)                                                                     *
  75. '*                                                                                               *
  76. '*************************************************************************************************                                                                                        
  77. get_Altura:
  78.  hp = p * 10
  79.  defp = P_0 / hp
  80.  loga = LOG defp
  81.  M1 = 8430.153 * loga
  82.  m2 = (loga * .095)+1
  83.  H  = M1 / m2  
  84. RETURN
  85.  
  86. Muestra_Presion:                           ' Envio de la Presion en Kpa y el Voltaje medido
  87.   serout tx, 16468, ["Presion(KPa): ", DEC p," HPa: ",dec hp, " Vin: ", dec vout,"V ", " Altitud: ", dec h,"m ", " vadc: ",dec vadc, 13]
  88. RETURN  
  89.  
  90. pausa:
  91. delayms 250
  92. RETURN
  93.  

la formula la saque de esta pagina: http://www.tutiempo.net/silvia_larocca/Temas/ecuaciones.htm#presion

PD: creo que perdimos le Geshi....Temporalmente




"Mi tercer deseo, que otra cosa podría ser, poner un final a todo el sufrimiento, que sólo con mi propia extinción el planeta podrá ser aliviado. Pobre de mí, Si tuviera tres deseos hoy, la elección no sería dificil para mí, Sólo tres deseos serían suficientes, No tendría uso para más."

"He sido un hombre que busca y aun lo sigo siendo, pero ya no busco en las estrellas y en los libros, sino en las enseñanzas de mi sangre."

Desconectado Mario

  • Colaborador
  • PIC24F
  • *****
  • Mensajes: 873
Re: Ejemplos Protón
« Respuesta #8 en: 02 de Diciembre de 2006, 16:18:43 »
Una duda:

Esto:
ADCON1 = 11                      ' Justificado a la derecha y con VREFs

Es lo mismo que esto:
ADCON1 = %10000010   

¿Qué valores coloca ADCON1=11?
¿1011 0000?
¿0000 1011?

Está raro que tengas que rotar.
La buena administración es utilizar el sentido común y la regla de oro; aunque el sentido común no es tan común como quisiéramos que fuera y, quien tiene el oro, hace las reglas.
George Terry

"A loser will defeat a genius with hard work"
Rock Lee

Desconectado navaismo

  • Jubilado Todopic
  • PIC24H
  • ****
  • Mensajes: 1973
Re: Ejemplos Protón
« Respuesta #9 en: 02 de Diciembre de 2006, 16:24:49 »
Error de dedo, debe ser 10110000 con eso:

Justificado a la derecha, desabilitado el el ADCS2, y con VREFs

y en ANSEL=1 solo pongo el AN0 como entrada.

NOta como en el codigo del  altimetro ya no tuve que rotar, esta comentada esa linea
"Mi tercer deseo, que otra cosa podría ser, poner un final a todo el sufrimiento, que sólo con mi propia extinción el planeta podrá ser aliviado. Pobre de mí, Si tuviera tres deseos hoy, la elección no sería dificil para mí, Sólo tres deseos serían suficientes, No tendría uso para más."

"He sido un hombre que busca y aun lo sigo siendo, pero ya no busco en las estrellas y en los libros, sino en las enseñanzas de mi sangre."

Desconectado navaismo

  • Jubilado Todopic
  • PIC24H
  • ****
  • Mensajes: 1973
Re: Ejemplos Protón
« Respuesta #10 en: 03 de Diciembre de 2006, 01:25:01 »
Hola solo para confirmar que el Barometro y el Altimetro funcionan :-/ .

Pues sucede que vivo en una ciudad donde segun sus datos geograficos estamos a una Altura de 2500m sobre el nivel del mar, la presion no la pude encontrar y al probar el codigo estos fueron los valores que arrojo.

Una  Vs de 5.35V (eso es lo que daba mi fuente)
Una  Presion en Kpa =74.848
Un    Vin = 3.090V
Una  H(altura)=2482.205m

Pues por ahi anda no
"Mi tercer deseo, que otra cosa podría ser, poner un final a todo el sufrimiento, que sólo con mi propia extinción el planeta podrá ser aliviado. Pobre de mí, Si tuviera tres deseos hoy, la elección no sería dificil para mí, Sólo tres deseos serían suficientes, No tendría uso para más."

"He sido un hombre que busca y aun lo sigo siendo, pero ya no busco en las estrellas y en los libros, sino en las enseñanzas de mi sangre."

Desconectado Nocturno

  • Administrador
  • DsPIC33
  • *******
  • Mensajes: 17417
    • MicroPIC
Re: Ejemplos Protón
« Respuesta #11 en: 03 de Diciembre de 2006, 02:43:39 »
Pues enhorabuena Navaismo, da gusto ver cómo las cosas funcionan.

Por cierto, ¿qué ciudad es esa a tanta altitud?
Un saludo desde Sevilla, España.
Visita MicroPIC                                                                                        ɔ!doɹɔ!ɯ ɐʇ!s!ʌ

Desconectado navaismo

  • Jubilado Todopic
  • PIC24H
  • ****
  • Mensajes: 1973
Re: Ejemplos Protón
« Respuesta #12 en: 03 de Diciembre de 2006, 03:27:28 »
Hola Gracias Master, pues vivo en el Estado de Mexico y mi municipio es Ecatepec de Morelos. Ectaepec significa Cerro del Viento, y de Morelos es porque aqui ejecutaron a Jose Ma Morelos y Pavon.

Saludos sorry por el OFFTOPIC
"Mi tercer deseo, que otra cosa podría ser, poner un final a todo el sufrimiento, que sólo con mi propia extinción el planeta podrá ser aliviado. Pobre de mí, Si tuviera tres deseos hoy, la elección no sería dificil para mí, Sólo tres deseos serían suficientes, No tendría uso para más."

"He sido un hombre que busca y aun lo sigo siendo, pero ya no busco en las estrellas y en los libros, sino en las enseñanzas de mi sangre."

Desconectado navaismo

  • Jubilado Todopic
  • PIC24H
  • ****
  • Mensajes: 1973
Re: Ejemplos Protón
« Respuesta #13 en: 08 de Diciembre de 2006, 21:50:00 »
Porfin la µEstacion-Meteorologica

es solo la adaptacion de los codigos anteriores y el sensado del TCN75 y aqui las gracias a mi gran amigo Marioguillote porque sin el nunca le hubiera atinado a leer en Proton un sensor I2C... Gracias Mario!!! :-/

el codigo:

Código: FreeBasic
  1. '****************************************************************
  2. '*  Name    : µeMeteorologica.bas                               *
  3. '*  Author  : Max Eduardo Reyes Vera Juárez                     *
  4. '*  Notice  : Copyright (c) 2006 Protegido por leyes de autor   *
  5. '*          : All Rights Reserved                               *
  6. '*  Date    : 02/12/2006                                        *
  7. '*  Version : 1.0                                               *
  8. '*  Notes   :                                                   *
  9. '*          :                                                   *
  10. '****************************************************************
  11. DEVICE = 18f452
  12.  XTAL = 4
  13.  
  14.  DECLARE adin_res 10             ' resolucin de 10 bits
  15.  DECLARE ADIN_STIME 50           ' tiempo de muestreo 50ms
  16.  
  17.  DECLARE SDA_PIN PORTB.1                 'Declarar pines de I2C
  18.  DECLARE SCL_PIN PORTB.2                 
  19.  DECLARE SLOW_BUS=ON                     'Con un BUS demenos de 8 MHZ
  20.                                          
  21. ADCON1 = 143                     ' Justificado a la derecha y con VREFs
  22. TRISA.0= 1                       ' RA0 de entrada
  23.  
  24. symbol Vs  = 5.35                 ' Valor de La Fuente del Sensor
  25. symbol P_0 = 1013.3               ' Valor de la Presion a nivel del mar en HPa
  26. SYMBOL CONTW %10010000                    ' Direccion de Escritura TCN75
  27. SYMBOL CONTR %10010001                    ' Direccion de lectura TCN75
  28.                                                                   ' Pines A2,A1 Y A0 a Tierra                  
  29. DIM Vadc  AS word
  30. DIM Temp  AS word
  31. DIM dato  AS byte
  32. DIM Vout  AS float
  33. DIM loga  AS float                  ' Variables de manejo
  34. DIM defp  AS float
  35. DIM M1    AS float
  36. DIM M2    AS float
  37. DIM H     AS float
  38. DIM P     AS float
  39. DIM HP    AS float
  40. DIM C     AS float
  41. DIM B     AS float
  42.  
  43. DIM MSB AS temp.byte1
  44. DIM LSB AS temp.byte0
  45. DIM TX  AS Portb.0                ' Pin de Transmision
  46. DIM RX  AS portb.7
  47.  
  48.  
  49. configTCN75:
  50.  busout contw,1,[$00]              ' Apuntar al registro Temp
  51.  delayms 20
  52.  
  53. lee:
  54.  serin rx, 84, [dato]
  55.   IF dato="L" THEN
  56.    GOSUB INICIO
  57.   ENDIF    
  58. GOTO LEE
  59.  
  60.  
  61. Inicio:
  62.  GOSUB get_vout
  63.  GOSUB pausa
  64.  GOSUB get_presion              ' Enviar Presion cada 2 minutos
  65.  GOSUB pausa
  66.  GOSUB get_altura
  67.  GOSUB pausa
  68.  GOSUB get_Temp
  69.  GOSUB Muestra_todo
  70.  GOSUB pausa
  71. RETURN
  72.  
  73. get_VouT:
  74.  vadc = adin 0                              ' Obtencion del ADC
  75.  'VADC = Vadc >> 6                           ' Rotar a la derecha para conseguir los 1024
  76.  vout = (vadc * 5) / 1024                   ' Voltaje que entra al ADC
  77. RETURN
  78.  
  79. get_Presion:                               ' Obtener la Presion Atmosferica en KPa
  80.  c = .095 * vs
  81.  b = .009 * vs                             ' Vout=Vs(.009*P-.095)
  82.  P = (vout + c)/(b)                        ' P = (Vout + (.095*Vs)) / (.009*Vs)
  83. RETURN
  84.  
  85.  
  86. '*************************************************************************************************
  87. '*                   para sacar la altitud se usa la formula                                     *
  88.  *                                                                                               *
  89. '*                                                                                               *                    
  90. '*        8430.153*ln(P_0/P)           donde P es la presion actual y                            *
  91. '*  H = ------------------------       P_0 es la presion del mar 760mmHg o 1013.3 HPa            *
  92. '*         1+(.095*ln(P_0/P)                                                                     *
  93. '*                                                                                               *
  94. '*************************************************************************************************                                                                                        
  95. get_Altura:
  96.  hp = p * 10
  97.  defp = P_0 / hp
  98.  loga = LOG defp
  99.  M1 = 8430.153 * loga
  100.  m2 = (loga * .095)+1
  101.  H  = M1 / m2  
  102. RETURN
  103.  
  104. get_Temp:                                  ' obtener la temperatura y si existe mostrar medio grado
  105.   busin contr,0,[temp]
  106.   delayms 20
  107.   IF (LSB & $80) = $80 THEN
  108.      LSB = 5
  109.   ELSE
  110.      LSB = 0
  111.  ENDIF
  112.  
  113. Muestra_Todo:                             ' Envio de la Presion en Kpa-Hpa, la Altitud y la Temperatura via serie a T9600
  114.   serout tx, 84, ["Presion(KPa): ", DEC p," HPa: ",dec hp,13, "Altitud: ", dec h,"m",13,"Temperatura: ", dec msb,".",dec lsb,"°C",10,13]  
  115. RETURN  
  116.  
  117. pausa:
  118. delayms 250
  119. RETURN
  120.  

y un pantallazo de lo recibido en el terminal de Proton


"Mi tercer deseo, que otra cosa podría ser, poner un final a todo el sufrimiento, que sólo con mi propia extinción el planeta podrá ser aliviado. Pobre de mí, Si tuviera tres deseos hoy, la elección no sería dificil para mí, Sólo tres deseos serían suficientes, No tendría uso para más."

"He sido un hombre que busca y aun lo sigo siendo, pero ya no busco en las estrellas y en los libros, sino en las enseñanzas de mi sangre."

Desconectado pelusac

  • PIC16
  • ***
  • Mensajes: 118
Re: Ejemplos Protón
« Respuesta #14 en: 23 de Agosto de 2007, 03:45:57 »
Sería posible que colgases el archivo .HEX de la estación meteorológica, que lo mío no es el basic.
Gracias de antemano


 

anything