|
Comunidad de discusión sobre Automatización, Electrónica industrial, Microcontroladores y electrónica digital, Robótica, Domótica, Telemática, Tecnologías móviles, y muchos temas más.
Algoritmo para nombre and POV led
 | #1 Algoritmo para nombre and POV led |  |
|
anthony123
| Ubicación: En algun lugar de Venezuela |
| Registrado: 22 Ago 2007 |
| Mensajes: 2317 |
|
 |
| Publicado: 30 Nov 2007, 3:15 pm |
|
|
 |
 |
Hola compañeros este es uno de los muchos temas que escribiré para preguntar y debatir sobre los PIC's. Bueno, la cuestion es la siguiente: en josepino se encuentra un proyecto sobre un airdisplay (parecido al propeller clock que tanto me gusta y me gustara) y se muestra un algoritmo para personalizar el mensaje. Me gustaria que me explicaran cuales son los pasos que debo tomar para modificar el algoritmo con mi nombre (anthony) y en diversas ocaciones cambiarlos a otros.
Aqui se encuentra el link del algoritmo: http://www.josepino.com/pic_projects/air_display/airdisplay_code.html. Gracias por su atencion y tiempo y espero sugerencias, modificaciones, etc. Gracias
|
|
Ultima edición por anthony123 el 15 Ene 2008, 3:16 pm, editado 3 veces
|
|
El nombre
| Ubicación: Alicante |
| Registrado: 28 Jun 2006 |
| Mensajes: 1445 |
|
 |
| Publicado: 30 Nov 2007, 6:32 pm |
|
|
 |
 |
Con lo sencillo que es decir "usar tablas"
¿Cual es el problema? es tan facil como... pos no, lo es más aun. dolo tienes que ir llamando ´a la letra que quieres invocar. en orden claro está.
con fijarte un poco, igual te das cuenta y todo.
PD joer como se notan los tripis
|
|
|
|
anthony123
| Ubicación: En algun lugar de Venezuela |
| Registrado: 22 Ago 2007 |
| Mensajes: 2317 |
|
 |
| Publicado: 30 Nov 2007, 7:01 pm |
|
|
 |
 |
Pues lo que pasa es que estoy superrrrr novato en esto de los PIC's y no se que tomar. Saludos.
PD: Me podrias mostrar como se haria con las 2 primeras letras?
|
|
|
|
anthony123
| Ubicación: En algun lugar de Venezuela |
| Registrado: 22 Ago 2007 |
| Mensajes: 2317 |
|
 |
| Publicado: 30 Nov 2007, 8:57 pm |
|
|
 |
 |
Algo asi?
- Código: Seleccionar todo
;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
|
|
|
|
El nombre
| Ubicación: Alicante |
| Registrado: 28 Jun 2006 |
| Mensajes: 1445 |
|
 |
| Publicado: 01 Dic 2007, 11:22 am |
|
|
 |
 |
Hay una opción, no te lo tomes a mal, que te permite simular los programas. Prueba a usarla a ver que ocurre.
Saludos
PD me encanta tu postura. eres un autodidacta que merece la pena apoyar.
|
|
|
|
anthony123
| Ubicación: En algun lugar de Venezuela |
| Registrado: 22 Ago 2007 |
| Mensajes: 2317 |
|
 |
| Publicado: 01 Dic 2007, 11:29 am |
|
|
 |
 |
Muchas gracias, pues lo que se lo saque de leer ,comprender y preguntar demasssss. Bueno me podrias decir que programa? Estube conversando con algunos compañeros y me dijeron que necesito copilarlo o algo por el estilo y trabajar en conjunto con el MPlab
|
|
|
|
John Sebastian
|
| Registrado: 10 Nov 2007 |
| Mensajes: 7 |
|
 |
| Publicado: 03 Dic 2007, 11:29 pm |
|
|
 |
 |
mira anthony
en el mplab puedes crear tus programas y compilarlos y luego consiguete el proteus , una herramienta poderosisima para simulacion de microcontroladores y en ella lo simulas
|
|
|
|
anthony123
| Ubicación: En algun lugar de Venezuela |
| Registrado: 22 Ago 2007 |
| Mensajes: 2317 |
|
 |
| Publicado: 04 Dic 2007, 6:05 am |
|
|
 |
 |
La pregunta del millon de dolares es: ¿Como lo hago? segun lo entendido ese lenguaje no es empleado en MPLAB
|
|
|
|
El nombre
| Ubicación: Alicante |
| Registrado: 28 Jun 2006 |
| Mensajes: 1445 |
|
 |
| Publicado: 04 Dic 2007, 4:15 pm |
|
|
 |
 |
LA pregunta más lógica no sería ¿El programa original funciona?
Contesta eso primero. y luego continuamos.
Saludos
PD. Esa pregunta te va a costar unas birras.
|
|
|
|
anthony123
| Ubicación: En algun lugar de Venezuela |
| Registrado: 22 Ago 2007 |
| Mensajes: 2317 |
|
 |
| Publicado: 04 Dic 2007, 4:32 pm |
|
|
 |
 |
El nombre escribió:
PD. Esa pregunta te va a costar unas birras.
Ya las estoy enviando por fedex!
Pues la verdad que modifique el codigo en microbasic y lo copile. Falta que me llegue el PIC y lo armo de una.
PD: Todavia dejo una pregunta al aire ¿Como lo hago con mas resolusion empleando el archiconocido 16F84A?
|
|
|
 | Foros de Electronica |  |
|
 |