Ciao Ulisse
ti mostro di seguito un breve e semplice esempio di codice bascom per leggere la temperatura usando un sensore LM35.
visto che il sensore dà in uscita 10mV/grado dobbiamo fare una piccola normalizzazione per apprezzare il 1/2 grado.
L'uscita del sensore è collegato all'ingresso ADC0 del micro.
- Code: Select all
'*******************************************************************************
' Lettura temperatura con sensore LM35
' Range misura 0 .. 80°C
' Accuratezza: ±0.5°C
' MPU: Atmega16
' Autore: G. De Luca
'*******************************************************************************
$regfile = "m16def.dat"
$Crystal=16000000
$hwstack=40
$swstack=16
$framesize=32
$baud = 19200
Config Adc = Single , Prescaler = Auto , Reference = Avcc 'configura ADC
Start Adc 'start ADC
'-------------------------------------------------------------------------------
Dim V As Word
Dim Volt As Word
Dim Volt_d As Byte
'-------------------------------[ Main ]---------------------------------------
Do
V = Getadc(0) 'leggi dal canale (0)
Volt = V * 5 ' moltiplica x 5
Volt_d = Volt Mod 10 ' calcola il modulo
Volt = Volt / 10 ' dividi x 10
Print Volt ; "," ; Volt_d
Waitms 500
Loop
'-------------------------------------------------------------------------------
End
ciao