ふむふむ。えと、ワールド生成のプログラム(同じ)が2回使われてます。なのでサブルーチンにするかDEF化するといいと思います。