*二次元配列に移動したときに移動で きる方向の数値をいれておく  もちろんデータで  例( DIM BASYO[50,30] FOR X=0 TO 50 FOR Y=0 TO 30 READ BASYO[X,Y] DATA ........... ) いどうした時にどの方向に移動できるのかは 1/2/4/8 と  ANDを使えば...