移動先の座標を計算して表示する前にその位置にある キャラクターをチェックしてスペースモンスターなら @MISSに移動って処理にしないと上手くいかないですね。 LOCATE X1,Y1:PRINT "大" の前に C=CHKCHR(X1,Y1) を入れて下さい。4方向分必要です。 @UP,@DOWN,@LEFT,@RIGHTの処理を良く見比べて下さい。 座標計算以外は同じですよね。 上手くまとめればかなり行数を減らせますよ。 一度ご自身で考えてみて下さい。