>>545-546
DrawAreaを変更したら一発でうまくいきました。
ありがとうございます。これで快適になりました。

適当に移植してから軽量化を考えようと思っていたのですが
そのままでも十分な速度で動いてしまったので驚いています。