r=asc("×") print " " + chr$(r)+"="; right$("00000"+str$(nr),5) よりも r$="×" print format$(" %s=%05d", r$, nr) の方が速い。 配列アクセスは基本遅いので、回避する努力を。 gosub で飛んだ先で該当判定するより、該当判定してから gosub した方が速い。 同じセルに複数種族が同居することはないのだから、 world[x,y] が現世代の種を現すようにすればいいかも。 これらを踏まえて(続く)