Membuat program mikrokontroler AT89C51, dengan motor steper bergerak secara half step Counter Wise

Membuat program mikrokontroler AT89C51, dengan motor steper bergerak secara half step Counter Wise

$mod51

Org 0h

Start      :mov p2, #07h                   //menyalin #07h ke p2 (07h= 0111)

                Acall delay                           //memanggil delay

mov p2, #03h                     //menyalin #03h ke p2 (03h= 0011)

                Acall delay

mov p2, #0bh                    //menyalin #0bh ke p2 (0bh= 1101)

Acall delay

mov p2, #09h                     //menyalin #09h ke p2 (09h= 1001)

Acall delay

mov p2, #0dh                    //menyalin #0dh ke p2 (0dh= 1101 )

Acall delay

mov p2, #0ch                     //menyalin #0ch ke p2 (0ch= 1100)

Acall delay

mov p2, #0eh                    //menyalin #0eh ke p2 (0eh= 1110)

Acall delay

mov p2, #06h                     //menyalin #0eh ke p2 (0eh= 0110)

Acall delay

                Sjmp start                           //lompat start

Delay     :mov r0, #0ah

Lagi        : djnz r0, lagi

                  Djnz r0, lagi

                Ret

end