fpsは1秒間の実行回数を計測すればいいだけなのでこれでできます。 INC FPS:IF MAINCNT-CNT>59THEN LOCATE 0,0:?"FPS";FPS,:FPS=0:CNT=MAINCNT カウントするFPSという変数を実行するたびにインクリメントしていって前回から59フレーム超（つまり1秒）経ったら実行回数（FPS）を表示してカウンタをクリアして現在のフレーム数を変数CNTに入れているという仕組みです。 FPSの桁数が減った場合にもうまく表示できるように最後に「,」を付けるのがポイントです。