今思ったのですが
アプリケーションの情報をタイトルバーに表示するのなら
タイトルバーの文字が変更されたときにだけ
「title」命令を実行すればいいのでは
タートルバーの文字が変わった時に
タイトルバーを更新するサンプル
winx = 320
winy = 128
screen 0, winx, winy, 0, (ginfo_dispx - winx) / 2, (ginfo_dispy - winy) / 2
load = 0
loadm = 500
repeat
redraw 0
load += 1
kazu = 100 * load / loadm
moji2 = moji1
moji1 = "" + kazu + "%完了"
color 192, 192, 192 : boxf
color 0, 0, 255 : boxf 0, winy / 2 + (winy / 2 - 32) / 2, winx * load / loadm, winy / 2 + (winy / 2 - 32) / 2 + 32
font "MS ゴシック", 32, 0 : color 0, 0, 0
pos (winx - 16 * 10) / 2, (winy / 2 - 32) / 2 : mes "読み込み中"
if moji1 ! moji2 : title moji1
if load = loadm : break
redraw 1
wait 1
loop
redraw 0
kazu = 100 * load / loadm
moji2 = moji1
moji1 = "" + kazu + "%完了"
color 192, 192, 192 : boxf
color 0, 0, 255 : boxf 0, winy / 2 + (winy / 2 - 32) / 2, winx * load / loadm, winy / 2 + (winy / 2 - 32) / 2 + 32
font "MS ゴシック", 32, 0 : color 0, 0, 0
pos (winx - 16 * 12) / 2, (winy / 2 - 32) / 2 : mes "読み込み完了"
if moji1 ! moji2 : title moji1
redraw 1