Haz una pregunta
  Foros de Electrónica » Diseño digital » Microcontroladores y sistemas embebidos
Foros Registrarse ¿Olvidaste tu contraseña?

Temas similares

04/06/2010 #1


Ayuda con pic16f877 y PicBasic
Hola a todos,soy nuevo en esto de la electronica y estoy intentando hacer un programa de un estacionamiento de autos,que al llenarse, muestre en un LCD "ocupado", sin embargo,no logro hacer que muestre nada en el LCD y aunque he revisado muchas veces la sintaxis,ya no se que hacer,aqui esta el programa, espero me puedan ayudar .

'El programa es un estacionamiento con 2 sensores opticos, el primer sensor registra
'cuando entra un auto y el otro cuando sale.La capacidad maxima del
'estacionamiento es de 10 autos.

Define LCD pins
Define LCD_DREG PORTB
Define LCD_DBIT 4
Define LCD_RSREG PORTB
Define LCD_RSBIT 0
Define LCD_EREG PORTB
Define LCD_EBIT 1


adcon0=$00
adcon1=7
Low PORTA.2
incrementa var portb.7
decrementa var portb.6
trisb=$0f
auto var byte 'esta es la variable que registra el numero de autos
auto = 0 'inicia el conteo de autos en el estacionamiento en cero

'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''''''
pause 200
Lcdout $fe, 1, "Estacionamiento"


pause 1000
'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''
mainloop: ' Rutina principal

PORTB=0
TRISB= $f0

Lcdout $fe, 1
if auto = 10 then
Lcdout , "Lleno"',"=",dec auto
pause 200
Else
Lcdout , "carros","=",dec2 auto
pause 200
endif
if decrementa = 1 then decauto 'Decrementa controla la salida de autos
if incrementa = 1 then incauto 'Incremente controla la entrada de autos
goto mainloop

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''''
decauto:
if auto>0 then
pause 200
auto = auto-1
goto mainloop
endif
goto mainloop

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''''
incauto:
if auto<10 then
pause 200
auto = auto+1
goto mainloop
endif
goto mainloop

End
Respuesta
¿Tienes una mejor respuesta a este tema? ¿Quieres hacerle una pregunta a nuestra comunidad y sus expertos? Registrate

Foros de Electrónica » Diseño digital » Microcontroladores y sistemas embebidos

Powered by vBulletin® Version 3.8.4
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Search Engine Optimization by vBSEO ©2011, Crawlability, Inc.