Membuat Alat Kendali Motor Stepper Idle Air Control Valve

Membuat Alat Kendali Motor Stepper Idle Air Control Valve

      Pada kesempatan yang berbahagia kali ini saya akan menjelaskan mengenai bagaimana cara membuat alat yang digunakan untuk mengecek suatu motor stepper idle air control valve, jadi alat ini semacam alat buat nge-check apakah idle air control valve nya bisa jalan atau rusak. alat ini memiliki dua buah tombol yang akan menggerakkan motor stepper maju atau mundur, jika maju maka tekan tombol kuning, jika mundur maka tekan tombol merah, jika stepper rusak maka akan ketahuan karena akan macet ditengah jalan saat ada perintah maju atau mundur. jika ujung motor stepper telah menyentuh limit switch artinya stepper normal dan akan menghidupkan led hijau, jika motor steppernya rusak maka led hijau tidak akan menyata. untuk lebih jelasnya berikut adalah skema dan programnya.

a. Minimums System ATMega8

b. Driver Motor L298

c. Motor Stepper Idle Air Control Valve

d. Push Button

e. Program Bascom AVR

$regfile = "m8def.dat"
$crystal = 11059200

Ddrb.0 = 1
Ddrb.1 = 1
Ddrc.5 = 0
Ddrc.4 = 0
Ddrc.3 = 0

Ddrd = &B11111111

Tbmerah Alias Pinc.5
Tbkuning Alias Pinc.4

Switch Alias Pinc.3

Set Portc.3
Set Portc.5
Set Portc.4

Ledbiru Alias Portb.1
Ledhijau Alias Portb.0


Dim Count As Integer

Mulai:

Ledbiru = 0
Ledhijau = 0

Count = 0

Do

If Tbmerah = 0 Then
Waitms 200

Goto Maju

End If

If Tbkuning = 0 Then
Waitms 200

Goto Mundur

End If


If Switch = 0 Then
Ledbiru = 0
Ledhijau = 1
Else
Ledbiru = 1
Ledhijau = 0
End If

Loop


Maju:

Do

Portd = &B00001000
Waitms 10

Portd = &B00000100
Waitms 10

Portd = &B00000010
Waitms 10

Portd = &B00000001
Waitms 10

Incr Count

Loop Until Count > 50

Goto Mulai

Return


Mundur:

Do

Portd = &B00000001
Waitms 10

Portd = &B00000010
Waitms 10

Portd = &B00000100
Waitms 10

Portd = &B00001000
Waitms 10

Incr Count

Loop Until Count > 50

Goto Mulai

Return





f. VIDEO HASILNYA