今日の１４０文字プログラム 140UFO

T=0U=1Z=63↓
@U↓
T=T+0.1+U*RND(5)X=Z+(SIN(T)+COS(T*3))/2*(Z-T)BEEP 36,0,90,X↓
VSYNC 8U=TCHST:Q=ABS(X-TCHX/2)30)GOTO@U↓
BEEP 14-Q?30-T

今日の140文字プログラム 140UFO
【遊び方】惑星αからやってきた見えないUFOをサウンドスキャナで探知し、音の位置をタッチして撃破せよ！
外すとタイムロスになるぞ。
侵略される前に撃破すれば得点が表示される。
ステレオイヤホン推奨
#petitcom

プログラムのツイートでハッシュタグを付けられなかったので、とりあえず、はてぶに転載。