Enjoy programming more!
Kidspod is a post site which supports young programmers.
First step to join us.
Register as a member
For members

2017/05/04 15:45:13

MixJuice GET URL : kidspod.club/mj/201

ドリブルサッカーMobileB2版

パスサッカーの簡単な改造です
プレイヤー1人を上下左右で操作して右のゴールを狙ってください。

SOURCE CODE

10 'FOOTBALL
20 X=0:Y=1:A=0:B=2:C=1:D=1:E=0:M=0:N=7:V=20:W=20:S=0
30 CLS:LC15,4:?"(#99)":?CHR$(28);"(#92)":?CHR$(28);"(#9B)"
40 @IN:K=INKEY():IFW<6W=6
50 IFV<6V=6
60 IFE%W=0ORE%V=0LCA,B:?" ";
70 IFK>0LCX,Y:?" ";:'LCM,N:?" ";
80 X=X+(X<14)*(K=29)-(X>0)*(K=28):Y=Y+(Y<7)*(K=31)-(Y>1)*(K=30)
90 'M=M+(M<14)*(K=88)-(M>0)*(K=90)
100 IFD>0IFA+C=XANDB+D=Y D=-D
110 IFD<0IFA+C=XANDB+D=Y D=-D:W=W+((K=28)-(K=29))*5:V=V+((K=30)-(K=31))*5
120 IFE%W=0A=A+C
130 IFE%V=0B=B+D
140 IFA>14A=0:GSB@SC:B=RND(3)+3
150 IFB>7ORB<0:PLAY"BB":LC0,4:?"";:END
160 @PR:LCX,Y:?"(#FB)";
170 'LCM,N:?"(#FB)";
180 LCA,B:?"(#EB)";
190 E=E+1:GOTO@IN
200 @SC:IFB>2ANDB<6:S=S+1:LC0,0:?"SCORE ";S:PLAY"DD"
210 RTN

COMMENT

Kidspod運営チーム
Kidspod運営チーム2017/05/26 18:10:45

シンプルでいいゲームですね。ふたり用のせわしさがなくなった分、集中できていい感じです!