表示させる文字列が予め決まっていたり動的に変化しないのであれば、
bufferに描画させ高さ幅を取得してディスプレイのクライアント領域(ry
gsel 0,-1
buffer 1
font "MS Pゴシック",30
mes "ワロタ〜〜よワロタ"
mesw = ginfo_mesx
mesh = ginfo_mesy
screen 2,ginfo_dispx,ginfo_dispy,0,,,640,480
font "MS Pゴシック",30
repeat
redraw 0
color 255,255,255
boxf
color
line ginfo_winx/2,-1,ginfo_winx/2,ginfo_winy+1
line -1,ginfo_winy/2,ginfo_winx+1,ginfo_winy/2
pos (ginfo_winx-mesw)/2,(ginfo_winy-mesh)/2
mes "ワロタ〜〜よワロタ"
redraw 1
await 16
loop
stop
screen 2なので自由に大きさを変えられます
描画文字を変えたいときはgselで描画先を変えて取得してまたgselで変えて…でしょうか(スマートじゃないですね…)