無駄があった。こっちの方がいいね
screen ,160,20
*main
await 15: fp++: gettime t,6
if t!=tt{title " FPS="+fp:fp=0}tt=t
goto *main

自分の環境では
1〜15　　64fps
16　　　　40fps
17〜31　32fps
32　　　　24fps
33〜　　　20fps

awaitってsleep()つかってんのかね。それともtimeGetTimeでループかね？
どっちにしろHSPからtimeBeginPeriod()関数が呼べればいいのに。