スパゲティというかインデントが嫌がらせのレベルなのでは…というのは置いといて:) この内容だとFORをREPEAT-UNTILに変えるだけでも結構速くなりそう。あと関数呼び出しも展開したいところ。4重ループ内での関数呼び出しはちょっと高くついちゃうからなぁ。