@LOOP COLOR RND(16) LOCATE RND(50),29:? "@" WAIT 2 GOTO @LOOP プログラム楽しいです。