TS
adegenthostar
Mikrokontroller dan Robotika
AKHIRNYA KASKUS LAUNCHING TEKNIK..
Bagi agan-agan yang mau share dimari.. monggo!!
tidak harus expert, newbie pun masuk.. (karna ane sendiri pun nubitol,hhe)
blog ane doktertech dot blogspot.com
silahkan saja yang ingin tanya tentang tugas maupun skripsi.
Ane senang kalau agan2 mau berbagi infonya juga, ane ucapin terima kasih.
Berikut contohnya, robot memakai sensor api mesinnya 8535
penambah semangat,ane sertain tutorial untuk mikrokontroler ATMEGA8535:
NB:
1. Tidak diperbolehkan adanya iklan atau media sponsor (direkomendasikan ke FJB).
2. Tidak mengandung pornografi, SARA, atau unsur negatif.
sumber info lowongan kerja semarang update setiap hari hanya di SEMAKER semarangkerja.blogspot dot com
Bagi agan-agan yang mau share dimari.. monggo!!
tidak harus expert, newbie pun masuk.. (karna ane sendiri pun nubitol,hhe)
blog ane doktertech dot blogspot.com
silahkan saja yang ingin tanya tentang tugas maupun skripsi.
Ane senang kalau agan2 mau berbagi infonya juga, ane ucapin terima kasih.
Berikut contohnya, robot memakai sensor api mesinnya 8535
penambah semangat,ane sertain tutorial untuk mikrokontroler ATMEGA8535:
Quote:
Quote:
Quote:
NB:
1. Tidak diperbolehkan adanya iklan atau media sponsor (direkomendasikan ke FJB).
2. Tidak mengandung pornografi, SARA, atau unsur negatif.
sumber info lowongan kerja semarang update setiap hari hanya di SEMAKER semarangkerja.blogspot dot com
Diubah oleh adegenthostar 21-03-2016 13:04
tata604 memberi reputasi
1
244.8K
3.4K
Guest
Tulis komentar menarik atau mention replykgpt untuk ngobrol seru
Mari bergabung, dapatkan informasi dan teman baru!
Teknik
3KThread•1.1KAnggota
Tampilkan semua post
aliexdsg
#798
Quote:
ini ane coba telaah dr program yg agan kirim ya
buzzer nyala bila suhu > 27 dan suhu < 40 dari portc.0
Code:
$regfile = "m8535.dat"
$crystal = 11059200
$baud = 9600
Config Adc = Single, Prescaler = Auto, Reference = Avcc
Config Portc = Output ' = mengeset port c sebagai output untuk membunyikan buzzer
' misal kan vref (tegangan referensi ADC adalah 5 Volt)
' di mana karakteristik LM35 = 10mV/Celcius
' nilai suhu 5000 mV / 10mV = 500 Celcius, yaitu nilai maksimum bit ADC = 1024 = suhu pada 500 derajat celcius
' maka Suhu ADC = (nilai bit pembacaan ADC) * 500 / (1024 - 1)
Dim A As Word
Dim X As Word
Start Adc
Do
X = Getadc(0) * 500 ' = pembacaan adc
A = X / 1023
' = mengirim nilai A (pembacaan ADC ke serial)
Print "Temperature = " ; A ; " Celcius"
Waitms 200
If A < 28 Then
Portc.0 = 1
Waitms 200
End If
If A => 28 And A <= 40 Then
Portc.0 = 0
Waitms 200
End If
If A > 40 Then
Portc.0 = 1
Waitms 200
End If
Loop
End
setting mikro di proteus
Spoiler for setting:
Spoiler for simulasi proteus:
0