CLSで画面をクリアして、文字を表示して、また画面をクリアして文字表示…を繰り返してしまっている為です。 画面クリアと文字表示は、最初の１回だけ行えば大丈夫なので、@TOPのラベルは、BUTTON関数の直前に移動しましょう。