なのでプログラム(僕の↑のコメントの)を書き直すと、 SPSET 0,1 @LOOP R=RND(2) IF R==0 THEN PX=PX+1 IF R==1 THEN PX=PX-1 SPOFS 0,PX,100 GOTO @LOOP のようにします。