スパゲッティ過ぎたプログラム。 もはや自分にしか読めなくなりかけているという末期状態です。 …これがROKERITE OSです。プログラムはデザインにこだわりません。 PORTIM OSのプログラムリストの3倍くらいの密度です。 自動でセンタリングさせるプログラムを完成させないと…。

IF ～ THEN 命令群 ELSE 命令群 ENDIF など字下げをした方が少し見やすくなると思いますがどうですか？ 他にもFOR～NEXT、WHILE～WEND、REPEAT～UNTILなど字下げを した方が見やすくなる命令があります。

SYS_TSK_X[SYS_TSK_NOW]という配列にアクセスするコードが何度も登場しているので、 一時的な変数を用意して（例えばWXなど）、代入してやればソースコードがスッキリすると思います。

WC=#GRAY:IF SYS_TSK_CTID==SYS_TSK_NOW THEN WC=WINDOW_COLOR WX=SYS_TSK_X[SYS_TSK_NOW]:WY=SYS_TSK_Y[SYS_TSK_NOW] GFILL WX,WY,WX+72,WY+7,WC こうすると647～651はスッキリするかなぁ。他の部分もWX,WYで 置き換えをすると配列変数への参照が減って実行速度も上がります。