REM 944BASIC 'MP3再生、画面オフ'
SCREEN 2,2,8,8
EVENT 100,999,1:REM 常駐時ｲﾍﾞﾝﾄ制御

DIM A(3,2)
A(0,0)='XMP3',52,244,'再生'
A(0,1)='@MOR',196,12,'画面オフ'
A(0,2)='@END',4,4,'終了'

COLORFG 255,0,0:CLS

FOR I=0 TO 2

 IF STRCMP(A(0,I),'@END')=0 THEN I=2:GOTO *BR
 IF STRCMP(A(0,I),'@MOR')=0 THEN GOTO *SKIP1

 APL A(0,I)
 SYNC

*SKIP1
 SETPEN 0,A(1,I),A(2,I)
*BR
NEXT I
END