Elmo HARmonica ユーザーズマニュアル

Elmo HARmonica Software Manual

P R E L I M I N A R Y D R A F T

HARSFEN0602

218

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

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