>>166
redraw 0
; 〜ここに描画処理を書く〜
redraw 1

こうやれ。あと、cls は遅いから代わりに color と boxf 使え。
それでもチラつくならループ内に無駄な処理があるはずだ。削れ。