1>CLS 2>@TOP 3>BEEP 5 4>IF 1==R THEN END 5>GOTO @TOP こんな風にすればBEEP 5がループする簡単なプログラムができる…と思う