迷路系なら Gosub @Setup While 1 Gosub @Start While 1 Gosub @Wave If Btl=1 Then Gosub @Battle Endif