10 CLS:CLV:X=15:FORI=0TO33:R=RND(4):S=S+1:COPY(#FF-R)*8,S/4%2*#2A*8,8:LCX,4:?" ";:LCRND(31),23-S%2:?CHR$(#FF-R):X=(X-BTN(28)+BTN(29)+31)%31:LCX,4:I=SCR():?CHR$(#ED);:LC0,0:?S/2:WAITS-1700:BEEPR+5:NEXT
アイデアがすごいですね。障害物が見えなくなるというゲーム性、星がまたたくというビジュアル、タイトルになる詩情……。3つの観点でゲームを良くする一石三鳥のナイスアイデア!