Program post site for everyone
いわゆる酔っぱらいゲームです。MSX・FAN 1987年12月号に掲載されていたもの ( 作者は Beta.K 氏 ) を、IchigoJam へ移植しました。
放っておくと加速がついて落ちる点を、スペースキーを押し続けて上向きに持ち上げます。画面の上端か下端、今まで引いてきた軌跡に点が当たるとゲームオーバー。エンターキーで再プレイ。左右の壁に跳ね返って方向転換する際に、軌跡と当たらないようにするのがプレイの肝です。
10 CLS:CLV:CLK:V=1 20 W=W+1-BTN(SPACE)*2:CLK 30 X=X+V:Y=Y+W/2 40 A=POINT(X,Y):C=C+1 50 DRAW O,P,X,Y 60 DRAW O,P+1,X,Y+1 70 IF X<0 V=1 ELSE IF X>63 V=-1 80 O=X:P=Y 90 BEEP 10+Y/2,75:WAIT 5 100 IF !A AND Y>=0 AND Y<=47 GOTO 20 110 FOR I=1 TO 12 120 DRAW X,Y,X+COS(15+30*I)/20,Y+SIN(15+30*I)/20 130 NEXT 140 LOCATE12,10:?"SCORE ";C:LOCATE9,13:?"PRESS ENTER KEY":CLK 150 IF INKEY()=10 GOTO 10 ELSE GOTO 150
うまくコントロールできるようでコントロールできない……！ 音の演出が酔っ払い感強くていいですね。そしてやってみて気付く、414というスコアのすごさ！
