MOTOR STEPPER DENGAN BASCOM AVR

[KEMBALI KE MENU SEBELUMNYA]

DAFTAR ISI

1. Rangkaian Simulasi

2. Listing Program

3. Link Download

1. Rangkaian Simulasi [kembali]

2. Listing Program [kembali]

$regfile = "m8535.dat"                                      'memanggil library ATmrga 8535

$regfile = 160000000

                              'menentukan kecepatan Crystal

Ddra = &B1111                                               'PORTA sebagai output

Ddrb = &B0000                                               'PORTB sebagai output

Porta = &B0000                                              'keadaan awal PORTA

Portb = &B0000                                              'keadaan awal PORTB



Do                                                          'fungsi utama

If Pinb.0 = 1 Then                                          'pemilihan kondisi pada PORTB

Porta = &B1000                                              'keluaran pada PORTA

Waitms 100                                                  'delay 100 ms


Elseif Pinb.1 = 1 Then                                      'pemilihan kondisi pada PORTB

Porta = &B0100                                              'keluaran pada PORTA

Waitms 100                                                  'delay 100 ms



Elseif Pinb.2 = 1 Then                                      'pemilihan kondisi pada PORTB

Porta = &B0010                                              'keluaran pada PORTA

Waitms 100                                                  'delay 100 ms



Elseif Pinb.3 = 1 Then                                      'pemilihan kondisi pada PORTB

Porta = &B0001                                              'keluaran pada PORTA

Waitms 100                                                  'delay 100 ms


Else                                                        'pemilihan kondisi terakhir

Porta = &B0000                                              'keluaran pada PORTA

Waitms 100                                                  'delay 100 ms


End If                                                      'pemilihan kondisi selesai

Loop                                                        'fungsi utama

End                                                         'program selesai

3. Link Download [kembali]

File HTML - Download

File Proteus - Download

File Program - Download