TODOPIC
Microcontroladores PIC => Lenguaje C para microcontroladores PIC => Mensaje iniciado por: picprogramador en 14 de Septiembre de 2020, 18:11:56
-
Buenas saludos cordiales, a continuacion el codigo que llevo realizado:
pic debe leer entrada analoga de un sensor temperatura
mostrarlo en lcd16x2
pero no me funciona al quemarlo
Device=16F877A
XTAL=4
Declare LCD_TYPE0
Declare LCD_DTPIN PORTD.4
Declare LCD_RSPIN PORTB.3
Declare LCD_ENPIN PORTB.2
LCD_LINES 2
TRISD=0 ;PUERTO D COMO SALIDA
TRISB=0 ;PUERTO B COMO SALIDA
TRISE=1 ; PUERTO E COMO ENTRADA
ADCON1=%100000
Dim adc As Float
Dim resultado As Float
Print At 1,1, "SENSOR DE" ;IMPRIMO EN PANTALLA "SENSOR DE"
Print At 2,1, "TEMPERATURA 1820"
DelayMS 3000 ;RETARDO 3mili segundos
Print At 1,1, " "
Print At 2,1, " "
DelayMS 5000
Inicio:
Print At 1,1, "Temperatura "
Print 2,1, "Actual"
adc = ADIn 0
resultado = adc * 500 / 65472 ;Aplico la fórmula
Print At 2,8, DEC1, resultado,0
Print At 2,12, "C"
GoTo Inicio
End
-
Que tal picprogramador,
POr lo que puedeo apreciar no tienes experiencia programando, ya que el código que posteaste no es lenguaje C y mucho menos no pertenece al compilador CCS. Eso es más bien un compilador basic que pudiera ser Proton o algún otro que no reconozco.
Lo que no mencionas es que fusibles estás usando para programar el microcontrolador y eso tal vez sea el problema. Ojala pudiera darnos más datos (esquemático, programamdor que estas usando, etc) de otra forma estaríamos solo adivinando.
elreypic.