> > 0 ON STOP GOTO 1000
> > 10 CLS
> > 20 BEEP:PRINT"ﾁﾝﾎﾟ";
> > 30 GOTO 20
> > 1000 BEEP:PRINT"ﾏﾝｺ";
> > 1010 GOTO 20
> 20 PLAY "T150C4E4G2"; : COLOR RND*15: PRINT "ﾁﾝﾎﾟ"; GOTO 20
> 曲が流れるやら色が変わるやらでもー大騒ぎ

PC8*系だと30回以降はｱﾄﾘﾋﾞｭｰﾄｴﾘｱがめちゃくちゃになってさらに出鱈目になるはず

参考：2017/10/19(木)23時29分36秒