Autor Tema: ayuda con el PIC 16F628A controlando un display 7 x 5 de 35 segmentos  (Leído 2434 veces)

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

Desconectado TTAuronTT

  • PIC10
  • *
  • Mensajes: 6
ayuda con el PIC 16F628A controlando un display 7 x 5 de 35 segmentos
« en: 16 de Septiembre de 2010, 00:04:32 »
hola muchachos estoy de vuelta por el foro con otra consulta en este caso necesito controlar un display 7x5 de 35 segmentos en el cual se debe visualisar las iniciales U - D - C - H  una despues de la otra io he hecho un codigo pero no se k es lo que pasa no tengo buenos resultados he aki el codigo y adjunto la imagen del trabajo espero su ayuda gracias:

codigo :



CMCON = 7                           ;convierte el puerto A en digital
TRISA = 0                           ;hace salida a todo el puerto A
TRISB = 0                           ;convierte en salidas el puerto B
x var byte                          ;crea variable x de 255

iniciales:
for x = 1 to 10                     ;repetir esta secuencia 10 veces
  porta=%0000001 :portb=%1111111 :pause 4   ;espera 4 mls, total 20 mls
  porta=%0000010 :portb=%0000001 :pause 4   ;cada esena
  porta=%0000100 :portb=%0000001 :pause 4
  porta=%0001000 :portb=%0000001 :pause 4
  porta=%1000000 :portb=%1111111 :pause 4
  next
for x = 1 to 10                     ;repetir esta secuencia 10 veces
  porta=%0000001 :portb=%1111111 :pause 4   
  porta=%0000010 :portb=%1000001 :pause 4   
  porta=%0000100 :portb=%1000001 :pause 4
  porta=%0001000 :portb=%1000001 :pause 4
  porta=%1000000 :portb=%0111110 :pause 4
  next
for x = 1 to 10                     ;repetir esta secuencia 10 veces
  porta=%0000001 :portb=%1111111 :pause 4   
  porta=%0000010 :portb=%1000001 :pause 4   
  porta=%0000100 :portb=%1000001 :pause 4
  porta=%0001000 :portb=%1000001 :pause 4
  porta=%1000000 :portb=%1000001 :pause 4
  next
for x = 1 to 10                     ;repetir esta secuencia 10 veces
  porta=%0000001 :portb=%1111111 :pause 4   
  porta=%0000010 :portb=%0001000 :pause 4   
  porta=%0000100 :portb=%0001000 :pause 4
  porta=%0001000 :portb=%0001000 :pause 4
  porta=%1000000 :portb=%1111111 :pause 4
  next
goto iniciales
end