« anterior próximo »
Páginas: [1] 2   Ir Abajo

Autor Tema: Air display  (Leído 7516 veces)

0 Usuarios y 2 Visitantes están viendo este tema.

Desconectado anthony123

  • PIC10
  • *
  • Mensajes: 18
Air display
« en: 01 de Diciembre de 2007, 00:34:42 »
Hola compañeros, primera vez que escribo en este excelente foroy no se si lo he puesto en la seccion correcta. Pues me he puesto en la construccion de un air display con el pic 12F629 que aparece en josepino.com. (air display)En dicha pagina aparece un algoritmo para modificar el mensaje que se quiere mostrar. Tengo varias preguntas:
1.- ¿que tipo de lenguaje es el que emplean?
2.-¿que pasos tendria que emplear despues para sacar el archivo .hex?
2.- Esta buena esta modificación?
Código: [Seleccionar]
;Microcontroller:  12f629 Speed: 4 Mhz Internal RC

delay 200 miliseconds
Set Comparator Mode 7

variable byte f = 00000000b   ; Output data
variable byte s                  ; Temporal variable
variable byte o                  ; message number.

procedure salida( s as byte ) is
gpio = s
delay 500 us
gpio = 00000000b
delay 200 us         
end procedure

procedure disp ( f as byte ) is
if f = "0" then f = "O"
if f = "A" then
   salida(0011_0110)
   salida(0000_0101)
   salida(0000_0101)
   salida(0011_0110)
end if
if f = "B" then
   salida(0011_0111)
   salida(0010_0101)
   salida(0010_0101)
   salida(0001_0010)
end if
if f = "C" then
   salida(0001_0110)
   salida(0010_0001)
   salida(0010_0001)
   salida(0010_0001)
end if
if f = "D" then
   salida(0011_0111)
   salida(0010_0001)
   salida(0010_0001)
   salida(0001_0110)
end if
if f = "E" then
   salida(0011_0111)
   salida(0010_0101)
   salida(0010_0101)
   salida(0010_0001)
end if
if f = "F" then
   salida(0011_0111)
   salida(0000_0101)
   salida(0000_0101)
   salida(0000_0001)
end if
if f = "G" then
   salida(0001_0110)
   salida(0010_0001)
   salida(0010_0101)
   salida(0011_0101)
end if
if f = "H" then
   salida(0011_0111)
   salida(0000_0100)
   salida(0000_0100)
   salida(0011_0111)
end if
if f = "I" then
   salida(0010_0001)
   salida(0011_0111)
   salida(0010_0001)
end if
if f = "J" then
   salida(0001_0000)
   salida(0010_0000)
   salida(0010_0000)
   salida(0001_0111)
end if
if f = "K" then
   salida(0011_0111)
   salida(0000_0100)
   salida(0001_0010)
   salida(0010_0001)
end if
if f = "L" then
   salida(0011_0111)
   salida(0010_0000)
   salida(0010_0000)
   salida(0010_0000)
end if
if f = "M" then
   salida(0011_0111)
   salida(0000_0010)
   salida(0000_0100)
   salida(0000_0010)
   salida(0011_1111)
end if
if f = "N" then
   salida(0011_0111)
   salida(0000_0010)
   salida(0000_0100)
   salida(0001_0000)
   salida(0011_0111)
end if
if f = "O" then
   salida(0001_0110)
   salida(0010_0001)
   salida(0010_0001)
   salida(0001_0110)
end if
if f = "P" then
   salida(0011_0111)
   salida(0000_0101)
   salida(0000_0101)
   salida(0000_0010)
end if
if f = "Q" then
   salida(0001_0110)
   salida(0010_0001)
   salida(0011_0001)
   salida(0011_0110)
end if
if f = "R" then
   salida(0011_0111)
   salida(0000_0101)
   salida(0000_0101)
   salida(0011_0010)
end if
if f = "S" then
   salida(0010_0010)
   salida(0010_0101)
   salida(0010_0101)
   salida(0001_0001)
end if
if f = "T" then
   salida(0000_0001)
   salida(0011_0111)
   salida(0000_0001)
end if
if f = "U" then
   salida(0001_0111)
   salida(0010_0000)
   salida(0010_0000)
   salida(0001_0111)
end if
if f = "V" then
   salida(0000_0111)
   salida(0001_0000)
   salida(0010_0000)
   salida(0001_0000)
   salida(0000_0111)
end if
if f = "W" then
   salida(0011_0111)
   salida(0001_0000)
   salida(0000_0100)
   salida(0001_0000)
   salida(0011_0111)
end if
if f = "X" then
   salida(0010_0001)
   salida(0001_0010)
   salida(0000_0100)
   salida(0001_0010)
   salida(0010_0001)
end if
if f = "Y" then
   salida(0000_0001)
   salida(0000_0010)
   salida(0011_0100)
   salida(0000_0010)
   salida(0000_0001)
end if
if f = "Z" then
   salida(0011_0001)
   salida(0010_0101)
   salida(0010_0101)
   salida(0010_0011)
end if
if f = "1" then
   salida(0010_0001)
   salida(0011_0111)
   salida(0010_0000)
end if
if f = "h" then         ; 'h' lowercase = Hearth character
   salida(0000_0010)
   salida(0000_0111)
   salida(0001_0111)
   salida(0011_0110)
   salida(0001_0111)
   salida(0000_0111)
   salida(0000_0010)
end if
if f = "!" then
   salida(0000_0000)
   salida(0010_0111)
   salida(0000_0000)
end if
if f = "'" then
   salida(0000_0011)
end if
if f = "." then
   salida(0010_0000)
end if
if f = "o" then        ; 'o' Lowecase
   salida(0001_0000)
   salida(0010_0100)
   salida(0010_0100)
   salida(0001_0000)
end if
if f = " " then        ; space character.
   delay 4 miliseconds
end if
delay 1 milisecond
end procedure

; main program
gpio = all output

if o = 0 then
; Display  "ANTHONY"
o = o + 1
anthony loop
disp("A")
disp("N")
disp("T")
disp("H")
disp("O")
disp("N")
disp("Y")
disp(" ")
disp("h")
end loop
end if
o = 0
salida(0000_0000)
sleep microcontroller   ; sleep command
nop   ; No operation
« Última modificación: 01 de Diciembre de 2007, 00:41:50 por anthony123 »
En línea

Desconectado Nocturno

  • Administrador
  • DsPIC33
  • *******
  • Mensajes: 18286
    • MicroPIC
Re: Air display
« Respuesta #1 en: 01 de Diciembre de 2007, 02:54:08 »
Hola Anthony,
he movido tu mensaje aquí porque ese programa está escrito en Basic, aunque no sé decirte qué versión o para qué compilador.
Seguro que en este subforo te podrán orientar mejor.

Por cierto, echa un vistazo a este hilo, que seguramente te interesará:
http://www.todopic.com.ar/foros/index.php?topic=18345.0
En línea

Desconectado anthony123

  • PIC10
  • *
  • Mensajes: 18
Re: Air display
« Respuesta #2 en: 01 de Diciembre de 2007, 13:01:04 »
Pues si lo he leido, pero ellos tratan el tema de manera dificil y con led's RGB. Yo solamente busco hacer un air display sencillo y un PIC 12F629. Ademas necesito saber que lenguaje es para poder concretar el proyecto.  :shock:
En línea

Desconectado navaismo

  • Jubilado Todopic
  • PIC24H
  • ****
  • Mensajes: 1973
Re: Air display
« Respuesta #3 en: 01 de Diciembre de 2007, 14:35:28 »
Hola puedes ver esta version del mismo JOSEPINO, solo que modificado a PICBASIC por Alexandre COSTA, muy bueno y practico.

Pagina de Alexandre Costa ahi en contraras el AIR DISPLAY con PBP. ¿Que necesitas para echarlo andar? Bueno ademas del material que te dice el compilador Picbasic Pro un grabador de PIC's y muuchas ganas
En línea
"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 anthony123

  • PIC10
  • *
  • Mensajes: 18
Re: Air display
« Respuesta #4 en: 01 de Diciembre de 2007, 17:26:07 »
Las ultimas dos las tengo, pero soy super novato con esto de los codigos. Podrias explicar mas de como hacer con el?  :-)
En línea

Desconectado navaismo

  • Jubilado Todopic
  • PIC24H
  • ****
  • Mensajes: 1973
Re: Air display
« Respuesta #5 en: 02 de Diciembre de 2007, 00:21:11 »
Ya entraste a la pgina donde esta el codigo de PIC BASIC al link que te puse; ademas no hace decir que si estas empezando seria bueno que "empezaras" por lo basico, es decir, que entinedas primero el lenguaje y despues empieces con aplicaciones mas complejas te dejo este link para que no pierdas animos ni tiempo en lograr crear tu Air Display
En línea
"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 anthony123

  • PIC10
  • *
  • Mensajes: 18
Re: Air display
« Respuesta #6 en: 02 de Diciembre de 2007, 09:32:24 »
Pues me dijeron que tenia que seguir estos datos:
1* Lo copie
2*Lo pegue en un wordpad
3*Lo abra en MPLAB
4*Lo copile
5*Lo mande al PIC
¿Es correcto?
En línea

Desconectado Leon Pic

  • Colaborador
  • DsPIC30
  • *****
  • Mensajes: 3610
    • Impresiones en 3D
Re: Air display
« Respuesta #7 en: 02 de Diciembre de 2007, 18:41:19 »
Anthony, el mplab no lo va a compilar ya que solo compila asm, para que compile otros lenguajes, hay que indicarles que trabaje con otros programas que soporten esos lenguajes a compilar, por ejemplo, para compilar CCS hay que indicarle al mplab donde está el programa ccs.exe (para windows) y listo.

Hay que esperar que alguien que trabaje con basic para que te indique que versión es. Una vez conseguido esto, hay que descargar el programa necesario para poder copiar y pegar el programa del display y compilarlo.
En línea
Jesús dijo, yo soy el CAMINO, la VERDAD y la VIDA, nadie llega al PADRE si no es por mi.

Desconectado anthony123

  • PIC10
  • *
  • Mensajes: 18
Re: Air display
« Respuesta #8 en: 02 de Diciembre de 2007, 18:47:47 »
Yo tengo el CCs pero no se como empalmarlo al MPLAB
En línea

Desconectado Leon Pic

  • Colaborador
  • DsPIC30
  • *****
  • Mensajes: 3610
    • Impresiones en 3D
Re: Air display
« Respuesta #9 en: 02 de Diciembre de 2007, 19:13:30 »
En el video #1 explico como hacerlo

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

De todas maneras el CCS no te sirve para compilar basic.
« Última modificación: 02 de Diciembre de 2007, 21:27:15 por Leon Pic »
En línea
Jesús dijo, yo soy el CAMINO, la VERDAD y la VIDA, nadie llega al PADRE si no es por mi.

Desconectado jfh900

  • Moderadores
  • DsPIC30
  • *****
  • Mensajes: 3595
Re: Air display
« Respuesta #10 en: 02 de Diciembre de 2007, 19:18:15 »
Cita de: Leon Pic en 02 de Diciembre de 2007, 19:13:30
En el video #1 explico como hacerlo

http://www.todopic.com.ar/foros/index.php?topic=19177.0
4- Una vez compilado, quemar el pic con el archivo .h generado por dicho compilador.

Leon Pic parece que has tenido un pequeño despiste. Lo que se graba en el pic es el fichero .hex generado.

Un saludo
En línea
* Cuando hables, procura que tus palabras sean mejores que el silencio.
* 'Todos somos ignorantes, lo que ocurre es que no todos ignoramos las mismas cosas.' Albert Einstein.
* No hay nada peor que un experto para evitar el progreso en un campo
* "La vida es como una novela. No importa que sea larga, sino que esté bien narrada" Seneca
* La vida no se vive por las veces que respiras, sino por los momentos que dejan sin aliento.
* Dios dijo: ∇·E=ρ/ε0 ; ∇·B=0 ; ∇xE=-dB/dt ; ∇xB= μ0ε0dE/dt..y la luz se hizo..!!..

Desde España Jesús

Desconectado anthony123

  • PIC10
  • *
  • Mensajes: 18
Re: Air display
« Respuesta #11 en: 02 de Diciembre de 2007, 19:41:59 »
Bueh si eso es lo que dicen, tendre que esperar. Saludos  :mrgreen:
En línea

Desconectado Leon Pic

  • Colaborador
  • DsPIC30
  • *****
  • Mensajes: 3610
    • Impresiones en 3D
Re: Air display
« Respuesta #12 en: 02 de Diciembre de 2007, 21:28:42 »
Cita de: jfh900 en 02 de Diciembre de 2007, 19:18:15
Cita de: Leon Pic en 02 de Diciembre de 2007, 19:13:30
Una vez compilado, quemar el pic con el archivo .h generado por dicho compilador.

Leon Pic parece que has tenido un pequeño despiste. Lo que se graba en el pic es el fichero .hex generado.

Un saludo
Si, tienes razón. Me "comí las letras ex  :mrgreen:
En línea
Jesús dijo, yo soy el CAMINO, la VERDAD y la VIDA, nadie llega al PADRE si no es por mi.

Desconectado navaismo

  • Jubilado Todopic
  • PIC24H
  • ****
  • Mensajes: 1973
Re: Air display
« Respuesta #13 en: 02 de Diciembre de 2007, 22:11:09 »
Y a veces me siento mudo:

Citar
Pagina de Alexandre Costa ahi en contraras el AIR DISPLAY con PBP. ¿Que necesitas para echarlo andar? Bueno ademas del material que te dice el compilador Picbasic Pro un grabador de PIC's

Citar
Ya entraste a la pgina donde esta el codigo de PIC BASIC al link que te puse; ademas no hace decir que si estas empezando seria bueno que "empezaras" por lo basico, es decir, que entiendas primero el lenguaje y despues empieces con aplicaciones mas complejas te dejo este link


Osea tampoco esperen que se les haga el trabajo. Creo Yo que con esos links para empezar es suficiente ademas que el programa delAir display que quieres hacer esta mas que transparente
En línea
"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 Leon Pic

  • Colaborador
  • DsPIC30
  • *****
  • Mensajes: 3610
    • Impresiones en 3D
Re: Air display
« Respuesta #14 en: 02 de Diciembre de 2007, 22:26:37 »
Hey, que tonto soy, no vi el link. (bueno es obvio porque tenía mucha luz sobre la pantalla y no veía bien  :mrgreen: que tonto ¿no?

Bueno ya está Anthony, descarga el pic basic y lo puedes modificar a tu gusto con este programa.
En línea
Jesús dijo, yo soy el CAMINO, la VERDAD y la VIDA, nadie llega al PADRE si no es por mi.
Páginas: [1] 2   Ir Arriba
« anterior próximo »
 

anything