Sunday, September 21, 2014

Novel The Lost Story ( NOVEL BARU 2014 )

NOVEL BARU KELUARAN TAHUN 2014
JUAL NOVEL THE LOST STORY

Harga = Rp. 35.000  , Mau beli ?
Call me : 085726496643 (Yanuar M.)
Atau COD Surabaya : Jalan klampis Aji 1 No 34 Surabaya



Judul: The Lost Story
Ukuran : 13 x 20 cm
Hal: 298
ISBN : 978-602-14178-7-4
Terbit : Mei 2014...

Sinopsis:

Petualangan Eren dan Lucas untuk menyelamatkan Ayumi dan orangtua Lucas, serta manusia-manusia lain yang disandera para makhluk negatif di Negeri Candania, berlangsung seru. Keduanya harus masuk ke dunia magic terlebih dahulu—dunia yang sungguh berbeda dengan dunia nyata, sehingga keduanya harus beradaptasi dengan kondisi di sana.

Di negeri bernama Heaven Kingdom itu, mereka berlatih keras menguasai ilmu dan energi magic. Bersama teman-teman sejati yang mereka temui di dunia magic (Alvaro, Winny, dan Frendy, serta Grand Master, para master magician, dan wakil-wakil mereka), Eren dan Lucas harus bertarung antara hidup dan mati melawan para Black Magician yang sadis dan ganas.

Mampukah keduanya menyelamatkan para tawanan itu? Bagaimana caranya mereka kembali ke dunia nyata? Dan, siapakah gadis yang menjadi cinta sejati Eren? Temukan jawabannya dalam novel fantasi yang menarik ini!


Penerbit : Pedas Publishing, Tangerang



JASA PEMBUATAN ALAT ELEKTRONIKA UNTUK TUGAS AKHIR

JASA PEMBUATAN ALAT ELEKTRONIKA UNTUK TUGAS AKHIR

         Kami menawarkan jasa pembuatan alat untuk tugas akhir, kami hanya membuat ALAT dan PROGRAM-nya saja TIDAK DENGAN LAPORAN, waktu pembuatan alat maksimal 2 minggu, minimal 5 hari, spesifikasi alat yang bisa kami buat yaitu : 

1. Menggunakan Mikrokontroller AVR / ARDUINO
2. Menggunakan Bahasa Bascom AVR (BASIC)
3. Menggunakan Software Visual Basic 6.0

Biaya untuk pembuatan alat berdasarkan kesulitan :
0. Hanya Program = Rp. 300.000 - 500.000
1. Tingkat Mudah = Rp. 600.000
2. Tingkat Kesulitan Kecil = Rp. 1.000.000
3. Tingkat Kesulitan Menengah = Rp. 1.500.000
4. Tingkat Kesulitan Tinggi = Rp. 2000.000 - 3000.000

Berminat ? Hubungi kami : Yanuar M. (085726496643)


Adapun contoh alat2 yang pernah kami buat seperti berikut :

 1. Kontrol ruangan dengan WIFI
http://www.youtube.com/watch?v=PkCfRXjSV8A

2. Tutorial DAC0808
http://www.youtube.com/watch?v=ty9SssE0TKg

3. Robot Wireless dengan APC220
http://www.youtube.com/watch?v=zfvcYjgVRCg

4. Tutorial RFID
http://www.youtube.com/watch?v=MpFYeMrnjP8

5. Akses Sensor IMU
http://www.youtube.com/watch?v=jCCQXxHcrGk

dll.




JUAL MINIMUM SISTEM ATMEGA16 DAN DOWNLOADER

JUAL MINIMUM SISTEM ATMEGA16 DAN DOWNLOADER

1. MINIMUM SYSTEM ATMEGA16 = Rp. 150.000
2. DOWNLOADER = Rp. 150.000

Berminat Hubungi kami : Yanuar M. (085726496643)





Saturday, September 13, 2014

KURSUS MIKROKONTROLLER DAN ROBOTIKA SURABAYA

KURSUS MIKROKONTROLLER DAN ROBOTIKA
MENGGUNAKAN AVR DAN BAHASA BASCOM AVR


Anda ingin memiliki keahlian dalam membuat robot dan membuat alat elektronika ? jangan khawatir karena kami akan mengajari bagaimana membuat robot dan alat elektronik yang bisa berguna untuk banyak orang dan juga bisa dijadikan untuk persiapan tugas akhir, harga yang kami tawarkan pun relatif terjangkau yaitu Rp. 500.000 untuk 3 kali pertemuan, tiap pertemuan bisa 2 jam atau lebih, bagaimana ? tertarik ? jika berminat hubungi kami

Yanuat Mukhammad
Hp. 085726496643

Note : Diutamakan untuk Tingkat Pemula dan Menengah

Biaya : Rp.500.000 untuk 3 kali pertemuan, @pertemuan 2 jam bisa lebih.......







Sunday, October 7, 2012

Membuat Termometer Digital Dengan DHT11



                Pada bagian ini akan dibahas mengenai pembuatan termometer digital menggunakan sensor DHT11 sebagai pendeteksi kondisi suhu. Alat ini tidaklah jauh berbeda dengan pembahasan alat yang dibuat sebelumnya, perbedaannya hanya pada sensor, jika sebelumnya membahas tentang sensor LM35 namun kali ini membahas tentang sensor DHT11 sebagai detektor suhu. Kelebihan dari sensor DHT11 ini dibanding dengan LM35 yaitu jika DHT11 ini bisa mengukur dua data sekaligus yaitu suhu dan kelembaban, jika LM35 hanya fokus pada suhu saja. Berikut adalah gambar dari alat pendeteksi suhu dengan DHT11.


 


'==========================================================================
'Programmer: Yanuar Mukhammad
'E-mail    : Yanuarm@hotmail.com
'==========================================================================
$regfile = "m16def.dat"
$crystal = 12000000
'--------------------------
Config Lcdpin = Pin , Rs = Portc.0 , E = Portc.1 , Db4 = Portc.2
Config Lcdpin = Pin , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5
Config Lcd = 16 * 2
Cursor Off
Cls
Declare Sub Get_th(t As Byte , H As Byte)
Config Serialin = Buffered , Size = 128
Config Serialout = Buffered , Size = 128
Dht_put Alias Portb.2
Dht_get Alias Pinb.2
Dht_io_set Alias Ddrb.2
Dim T As Byte                                             
Dim H As Byte                                          
Dim Crc As Byte                                           
Dim Mybyte As Byte
Dim Sensor_data As String * 40                             
Dim Tmp_str8 As String * 8
Dim Count As Byte                                        

Enable Interrupts

Set Dht_io_set
Set Dht_put

Lcd "Yanuar M."
Lowerline
Lcd "DHT11 sensor"

Do
   Waitms 1500
   Call Get_th(t , H)
   Cls
   Lcd "TMP: " ; T ; "C"
   Lowerline
   Lcd "PHP: " ; H ; "%"

Loop

Sub Get_th(t As Byte , H As Byte)

 Count = 0
 Sensor_data = ""
 Set Dht_io_set                                        
 Reset Dht_put                                           
 Waitms 25                                               

 Set Dht_put                                              
 Waitus 40
 Reset Dht_io_set                                       
 Waitus 40                                              
 If Dht_get = 1 Then                                    
    H = 1                                                
    Exit Sub                                           
 End If

  Waitus 80                                               
  If Dht_get = 0 Then                                   
    H = 2                                                 
    Exit Sub                                              
  End If

  While Dht_get = 1 : Wend                                  

   Do                                                      
    While Dht_get = 0 : Wend                              
    Waitus 30                                              
     If Dht_get = 1 Then                                   
       Sensor_data = Sensor_data + "1"                     
       While Dht_get = 1 : Wend                            
       Else                                                
       Sensor_data = Sensor_data + "0"                     
    End If
    Incr Count                                             
   Loop Until Count = 40                                   

   Set Dht_io_set
   Set Dht_put

   Tmp_str8 = Left(sensor_data , 8)                      
   H = Binval(tmp_str8)                                   

   Tmp_str8 = Mid(sensor_data , 17 , 8)                   
   T = Binval(tmp_str8)                                   

   Tmp_str8 = Right(sensor_data , 8)                        
   Crc = Binval(tmp_str8)                                  

   Mybyte = T + H                                          
   If Mybyte <> Crc Then                                   
      H = 3                                                
   End If
End Sub



Membuat Detektor Maling / Pencuri



               Prinsip kerja alat ini yaitu sensor mendeteksi adanya orang di suatu titik, sensor PIR ini mendeteksi orang melalui sumber panas yang dihasilkan oleh makhluk hidup, jadi selain manusia, hewan pun bisa terdeteksi, setelah sensor aktif maka akan mengirimkan tegangan output yang akan ditangkap oleh mikrontroler, oleh mikrokontroler memberikan perintah kepada buzzer untuk berbunyi. Untuk lebih jelasnya dapat melihat bagan berikut ini


  Alat ini menggunakan ATMega16 sebagai pengendali dan pengatur perintah, data dari PIR sensor dibaca oleh port ADC mikrokontroler, jika terdeteksi ada orang yang lewat suatu titik maka pir akan bernilai >1 maka akan menghidupkan buzzer, jika tidak PIR akan bernilai 0 yang artinya kondisi aman. 


                   PIR (Passive Infra Red) Motion Detektor adalah sensor yang digunakan untuk mendeteksi suatu makhluk hidup yang memiliki panas tubuh, sensor ini optimal pada jarak kurang dari 1 meter, namun tergantung jenis dari sensor PIR itu sendiri, ada yang bisa optimal kurang dari satu meter, ada yang lebih dari satu meter dan bahkan sampat 3 meter pun ada, tergantung merk dan kualitas sensor PIR itu. berikut gambarnya


               Sensor PIR ini hanya memiliki tiga buah kaki yaitu kaki VCC, Data Dan GND, sehingga mudah untuk digunakan untuk komunikasi dengan mikrokontroler melalui port ADC, untuk tegangan keluaran dari PIR ini dideteksi oleh portA.0, sehingga jika nilai dari portA.0 lebih dari 1 maka akan menghidupkan rangkaian buzzer.


'==========================================================================
'Programmer: Yanuar Mukhammad
'E-mail    : Yanuarm@hotmail.com
'==========================================================================
$regfile = "m16def.dat"
$crystal = 12000000
Config Lcdpin = Pin , Rs = Portc.0 , E = Portc.1 , Db4 = Portc.2
Config Lcdpin = Pin , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5
  $baud = 9600
  $hwstack = 32
  $swstack = 10
  $framesize = 50

  Dim Dummy As Integer
  Dim Potvalue As Integer


  Deflcdchar 0 , 31 , 31 , 31 , 31 , 31 , 31 , 31 , 31
  Deflcdchar 1 , 31 , 17 , 17 , 17 , 17 , 17 , 17 , 31
  Cls
  Cursor Off

  Config Pinb.0 = Output
  Config Timer1 = Pwm , Prescale = 64 , Pwm = 8 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down

  Ddrb.0 = 1
  Enable Interrupts
  Enable Timer1
  Config Adc = Single , Prescaler = 64
  Start Adc
  Ocr1ah = 0
  Ocr1ah = 0

  Do
  Potvalue = Getadc(0)    'ADC portA.0
  Dummy = Potvalue / 2
  Dummy = Dummy / 2
  Ocr1bl = Dummy

  Locate 2 , 2
   Lcd "PIR="
  Locate 2 , 8
   Lcd "         "
  Locate 2 , 8
   Lcd Dummy

'---- Buzzer
   If Dummy >= 0 Then
      Portb.0 = 1
   End If

  
   If Dummy = 0 Then
      Portb.0 = 0
   End If
  Loop
  End