Demonstrating the usage of the status of the X-motor

rem Demonstrating the usage of the status of the X-motor

rem This program makes the X-motor to move back and forth
rem Commands demonstrated; velx, accx, posx, movax, rem, wait, goto, rstsx, rx

rem Set the velocity
velx 2000

rem Set the acceleration
accx 20000

200
rem Set the position to move to
posx 5000

rem Start the absolute move
movax

rem Wait until the move is completed
100
rx
wait 250
rstsx A
if (A & 1) = 1 then goto 100
rx

rem Wait for 250 msec
wait 250

rem Set the position to move to
posx 0

rem Start the absolute move
movax

rem Wait until the move is completed
150
rx
wait 250
rstsx A
if (A & 1) = 1 then goto 150
rx

rem Wait for 250 msec
wait 250

rem Start all over again
goto 200
end
$