HARSFEN0602
PX=0;UM=2;AC=60000000; PX=0;
UM=2;
AC=60000000;
IA[1]=2000;IA[2]=-2000 ; IA[1]=2000;
IA[2]=-2000 ;
MO=1;**Motor On MO=1;**Motor On
BG;**Begin BG;**Begin
##LOOP1 ##LOOP1
JP##LOOP1,PX<IA[1] ; if PX<IA[1]
goto##LOOP1
end ;
##LOOP2 ##LOOP2
JZ##LOOP2,PX>IA[2]; if PX>IA[2]
reset LOOP2
end
#@AUTOEXEC #@AUTOEXEC
WT=200 wait 200
##LOOP ##LOOP
JP##LOOP goto##LOOP
RT return
#@AUTO_I1 #@AUTO_I1
**THE BLOCKING MODE **THE BLOCKING MODE
MO=0;UM=2;RM=0;MO=1;JV=0;BG MO=0;
UM=2;
RM=0;
MO=1;
JV=0;
BG
AF,IB[1]=0 until IB==0
MO=0;UM=1;RM=1;MO=1 MO=0;
UM=1;
RM=1;
MO=1
SM=2AH SM=0x2A
RT return
EN exit