Bilgisayarın 9 pin seri portunu kullanarak Hyper Terminal' de 4 ADC girişli voltaj değerlerini görebilirsiniz.
Devre 5 Volt DC akımla çalışır.
Devreyi beslemek için 3 Volt ile
5 Volt arası olan bataryayı
besleme kaynağı olarak kullanılabilir.
4 adet trimpotu sağa sola çevirerek ayarlarını PC ekranında volt değişimlerini göreceksiniz.
YA DA
VCC uçlarını çıkarıp ölçmek istediğiniz pilin artısına, pilin eksi kutubunu da GND ye bağlayabilirsiniz.
INCLUDE "MODEDEFS.BAS" ' Seral Bağlantı için gerekli inc dosyasıdır.
'---------------------------------------------------------
' PIC12F675 SAMPLE ROUTINE FOR 4-CHANNEL, SERIAL, A/D
'---------------------------------------------------------
' PIN NAME USE/CONNECTION
' 1 Vdd +5VDC
' 2 GPIO.5 SERIAL OUT TO PC
' 3 GPIO.4 (CHANNEL 3)
' 4 GPIO.3 N/C
' 5 GPIO.2 (CHANNEL 2)
' 6 GPIO.1 (CHANNEL 1)
' 7 GPIO.0 (CHANNEL 0)
' 8 Vss (GROUND)
'---------------------------------------------------------
DEFINE OSCCAL_1k 1 ' DEFINE OSCCAL FOR PIC12F675
ADCON1 = 0 ' PINS TO ANALOG INPUT, Vref = Vdd
RESULT VAR BYTE[4] ' 4-BYTE ARRAY
J VAR BYTE ' A/D CHANNEL NUMBER BYTE VARIABLE
MAIN:
FOR J = 0 TO 3 ' 4-CHANNEL COUNTER LOOP
ADCON0 = 65 + (J*8) ' SET A/D Fosc/8 + A/D = ON
PAUSE 10 ' PAUSE 10mS FOR CHANNEL SETUP
ADCON0.2 = 1 ' SET GO/DONE-BIT + START CONVERSION
PAUSE 10 ' PAUSE 10mS FOR CONVERSION
RESULT[J] = ADRES
NEXT
PAUSE 250 ' PAUSE 250mS
SEROUT GPIO.5,N2400,[1,RESULT[0],2,RESULT[1],3,RESULT[2],4,RESULT[3]]
PAUSE 250 ' PAUSE 250mS
GOTO MAIN ' DO IT AGAIN
END ' END PROGRAM
Devre 5 Volt DC akımla çalışır.
Devreyi beslemek için 3 Volt ile
5 Volt arası olan bataryayı
besleme kaynağı olarak kullanılabilir.
4 adet trimpotu sağa sola çevirerek ayarlarını PC ekranında volt değişimlerini göreceksiniz.
YA DA
VCC uçlarını çıkarıp ölçmek istediğiniz pilin artısına, pilin eksi kutubunu da GND ye bağlayabilirsiniz.
INCLUDE "MODEDEFS.BAS" ' Seral Bağlantı için gerekli inc dosyasıdır.
'---------------------------------------------------------
' PIC12F675 SAMPLE ROUTINE FOR 4-CHANNEL, SERIAL, A/D
'---------------------------------------------------------
' PIN NAME USE/CONNECTION
' 1 Vdd +5VDC
' 2 GPIO.5 SERIAL OUT TO PC
' 3 GPIO.4 (CHANNEL 3)
' 4 GPIO.3 N/C
' 5 GPIO.2 (CHANNEL 2)
' 6 GPIO.1 (CHANNEL 1)
' 7 GPIO.0 (CHANNEL 0)
' 8 Vss (GROUND)
'---------------------------------------------------------
DEFINE OSCCAL_1k 1 ' DEFINE OSCCAL FOR PIC12F675
ADCON1 = 0 ' PINS TO ANALOG INPUT, Vref = Vdd
RESULT VAR BYTE[4] ' 4-BYTE ARRAY
J VAR BYTE ' A/D CHANNEL NUMBER BYTE VARIABLE
MAIN:
FOR J = 0 TO 3 ' 4-CHANNEL COUNTER LOOP
ADCON0 = 65 + (J*8) ' SET A/D Fosc/8 + A/D = ON
PAUSE 10 ' PAUSE 10mS FOR CHANNEL SETUP
ADCON0.2 = 1 ' SET GO/DONE-BIT + START CONVERSION
PAUSE 10 ' PAUSE 10mS FOR CONVERSION
RESULT[J] = ADRES
NEXT
PAUSE 250 ' PAUSE 250mS
SEROUT GPIO.5,N2400,[1,RESULT[0],2,RESULT[1],3,RESULT[2],4,RESULT[3]]
PAUSE 250 ' PAUSE 250mS
GOTO MAIN ' DO IT AGAIN
END ' END PROGRAM
0 yorum:
Yorum Gönder