Pemrograman Assembly - Program MOTOR STEPPER berputar CW dan CCW bergantian

Berikut ini ada alah Program MOTOR STEPPER berputar CW dan CCW bergantian

; =============
; Judul:Program Output Motor Stepper
; Port: Port0=> CONTROL MOTOR STEPPER
; Port1  => -
; Port2  => -
; Port3  => -
; Ket:MOTOR STEPPER berputar CW dan CCW bergantian
; ------------
; By   : ARC. Robotika Club
; ===========
$MOD51
ORG 0000H
AJMP START
ORG 0100H
MOV P0, #0H
DELAY:MOV R5, #04H
DEL1:MOV R6, #0FH
DEL2:MOV R7, #0FFH
 DJNZ R7, $
 DJNZ R6, DEL2
 DJNZ R5, DEL1
 RET
START: MOV SP, #30H
LOOP: MOV R3, #0FH
LOOPKA: MOV R1,#04H
MOV A, #00000001B
KANAN: MOV P0, AA
 CALL DELAY
 RL A
 DJNZ R1, KANAN
 DJNZ R3, LOOPKA
 MOV R4, #0FH
LOOPKI: MOV R2, #04H
 MOV A, #00001000B
KIRI: MOV P0, A
 ACALL DELAY
 RR A
 DJNZ R2, KIRI
 DJNZ R4, LOOPKI
 SJMP LOOP
END