Automatic control and display of Room temperature

[sougata]

Hi,

Although I do not use PROTON it seems that this is a "PROTON" code and will not compile in PBP.
May be something of this sort may work.

        DEFINE OSC 4
        
        DEFINE ADC_BITS 8 'Number of bits in ADCIN result
        DEFINE ADC_CLOCK 3 'ADC clock source (rc = 3)
        DEFINE ADC_SAMPLEUS 50 'ADC sampling time in microseconds 
       
        DEFINE LCD_DREG PORTB       ' Set LCD Data port
        DEFINE LCD_DBIT 4           ' Set starting Data bit (0 or 4) if 4-bit bus i.e, Portb.4-PORTb.7
        DEFINE LCD_RSREG PORTB      ' Set LCD Register Select port
        DEFINE LCD_RSBIT 2          ' Set LCD Register Select bit i.e, PORTC.5
        DEFINE LCD_EREG PORTB       ' Set LCD Enable port
        DEFINE LCD_EBIT 3           ' Set LCD Enable bit i.e, PORTB.3
        DEFINE LCD_BITS 4           ' Set LCD bus size ot 4 bit Upper Nibble (4 or 8 bits)
        DEFINE LCD_LINES 2          ' Set number of lines on LCD to 4 Lines
        DEFINE LCD_COMMANDUS 2000   ' Set command delay time in us
        DEFINE LCD_DATAUS 50        ' Set data delay time in us
        
        VOLT   VAR BYTE             ' VOLT AS A VARIABLE  

TRISA.0 = 1 ' SETUP PORTA.1 AS AN INPUT
TRISB   = 0 '


Input PORTA.0 
ADCON1 = %10000000 

LCDOUT $FE,1 : PAUSE 100
main: 
ADCIN 0, VOLT
LCDOUT $FE,$80, DEC VOLT , "   "
goto main

It compiles okay and "hex attached"

[afterdate]

hello,Dear Sir;
sougata
thank you very much.

could u explan to me more what are u worte.

i want PIC to take signal from the Sensor and do compare and turn ON if the temperatue LOW and turn OFF when the temperature HIGH.and show the temperature in LCD.

and your answer for only anlogue to digital . could u tell me all. and u said i do't no PROTON no problem. do u know how to write the all code without PROTON. i mean same what to write to me.

iam so sorry bec my language is not perfect.

i hope to understand what i mean.

many thanks

all the best

[afterdate]

[QUOTE=afterdate]hello,Dear Sir;
sougata
thank you very much.

could u explan to me more what are u worte.

i want PIC to take signal from the Sensor and do compare and turn ON the Fan if the temperatue LOW and turn OFF when the temperature HIGH.and show the operation in LCD.

and your answer for only anlogue to digital or not, bec iam no't good in program also iam not good in PROTON and this code from my friend and if u have same code i mean same to write to me . could u tell me all. and u said i do't know PROTON .
do u know how to write the all code without PROTON. i mean same what did u write to me.

my language is not perfect iam so sorry about that.


many thanks

all the best

[sougata]

Hi there,

Are you new to programming or just trying to use a micro for the first time ? Let me know the compiler version you are using and I shall try to explain.However it is important if the code at all worked for you. That is if you at all got any display.

[afterdate]

hello Dear Sir;
sougata

yes this time first time to use PIC program. and i have project call Automatic control and display of Room temperature. and i thing to use PIC and i have my friend tell me use PIC Basic language it's easy. and he give me the code same i put in the first topic.and u give me a code similler my code. and what do u mean which compiler version u mean the program. i have PROTON IDE Lite.
if also in the university MPLAB program.

Excuse me Sir could i speck to u by Email. and my Email ; [email protected]

thank you very much
all the best

[sougata]

Hi,

This forum is for PIC Basic Pro. This forum is located at www.picbasic.org/forum/ .Since I am not a Proton user it is not possible (practical) to comment on code examples. Regarding email, it is not necessary because this forum is full of pros. This forum has helped me a lot to understand the complexities of programming. I hope you would find somebody on the Proton forum to help you out.


Best of Luck

[afterdate]

hello
sougata

which program this one , and do u know how i do my project by your code.

DEFINE OSC 4

DEFINE ADC_BITS 8 'Number of bits in ADCIN result
DEFINE ADC_CLOCK 3 'ADC clock source (rc = 3)
DEFINE ADC_SAMPLEUS 50 'ADC sampling time in microseconds

DEFINE LCD_DREG PORTB ' Set LCD Data port
DEFINE LCD_DBIT 4 ' Set starting Data bit (0 or 4) if 4-bit bus i.e, Portb.4-PORTb.7
DEFINE LCD_RSREG PORTB ' Set LCD Register Select port
DEFINE LCD_RSBIT 2 ' Set LCD Register Select bit i.e, PORTC.5
DEFINE LCD_EREG PORTB ' Set LCD Enable port
DEFINE LCD_EBIT 3 ' Set LCD Enable bit i.e, PORTB.3
DEFINE LCD_BITS 4 ' Set LCD bus size ot 4 bit Upper Nibble (4 or 8 bits)
DEFINE LCD_LINES 2 ' Set number of lines on LCD to 4 Lines
DEFINE LCD_COMMANDUS 2000 ' Set command delay time in us
DEFINE LCD_DATAUS 50 ' Set data delay time in us

VOLT VAR BYTE ' VOLT AS A VARIABLE

TRISA.0 = 1 ' SETUP PORTA.1 AS AN INPUT
TRISB = 0 '


Input PORTA.0
ADCON1 = %10000000

LCDOUT $FE,1 : PAUSE 100
main:
ADCIN 0, VOLT
LCDOUT $FE,$80, DEC VOLT , " "
goto main


thank you very much

all the best