いいですね。 でも、そのプログラムだとIF文が大量になってしまうので、 IF A[○]==1 THEN @STAGE1 の部分を GOTO @STAGE+STR$(A[○]) にするといいと思います。