10 CGEN3:FORA=0TO1:DEFSPRITEA,(A,0,0,0,0)="{G7}":NEXT:CLS:PALETB 0,3,51,35,35:LOCATE0,6:PRINT" {K2|K2|L0|K7|L0|K2|L0|K2} {L0|K7|L0}     {K2|K2|K2|K7|L0|K2|L0|K7|L0} ";" {K6|K6|K6|K6|K6|K6} {K4|L0|K6|K4|L2} {K5|K5|K5} {K6|K6|K6|K6|K6|K6} {L1|L0} ";" {K1|K1|K1|L1|K1|K1} {K1|L2|K1|L1|K5}     {L1|K1|L2|L1|K1|K1} {L1|L2} ":PRINT" マ-ブル ウォ-ズ   NO.2「TRAINING」 ":PRINT"  PUSH[START]KEY  {CP}LAP1985"
20 ONSTRIG(0)+1GOTO20:SPRITEOFF:PALETB 0,3,3,3,3:CLS:POKE&H4015,15:POKE&H4000,15,9,143,140,8:FORA=0TO50:LOCATERND(27),RND(22):PRINT"{G5}":NEXT:PALETB 0,15,48,35,19::PALETS 1,15,48,38,22:CLEAR:W=176:X=80:Y=120:Z=Y:F=0:SPRITEON:SPRITE0,X,Y:SPRITE1,W,Z:
30 A=STICK(0):C=C-((A=1)+(A=5)+(A=9))*2+((A=2)+(A=6)+(A=10))*2:D=D-((A=4)+(A=5)+(A=6))*2+((A=8)+(A=9)+(A=10))*2:C=C-SGN(C):D=D-SGN(D):X=X+C:Y=Y+D:
40 A=STICK(1):B=B-((A=1)+(A=5)+(A=9))*2+((A=2)+(A=6)+(A=10))*2:E=E-((A=4)+(A=5)+(A=6))*2+((A=8)+(A=9)+(A=10))*2:B=B-SGN(B):E=E-SGN(E):W=W+B:Z=Z+E:
50 F=F-((X<0)+(X>255)+(Y<0)+(Y>249))*3-((W<0)+(W>255)+(Z<0)+(Z>240)):ONF GOTO70,70,80,90,90,80,90,90:SPRITE0,X,Y:SPRITE1,W,Z:IFABS(W-X)<8ANDABS(Y-Z)<8THENPOKE&H4004,159,140,140,32:B=B+SGN(B):C=C+SGN(C):D=D+SGN(D):E=E+SGN(E):SWAPB,C:SWAPD,E:
60 GOTO30:
70 SPRITE1:POKE&H4000,143,156,0,9:FORA=0TO50:G=G-(X<120)*2+(X>120)*2:H=H-(Y<120)*2+(Y>120)*2:G=G-SGN(G):H=H-SGN(H):X=X+G:Y=Y+H:SPRITE0,X,Y:NEXT:LOCATE4,10:PRINT"{F4}{F6}YOU{J3}WIN{J3}A{J3}GAME!{F4}{F6}":GOTO100:
80 SPRITE0:POKE&H4000,143,156,0,9:FORA=0TO50:G=G-(W<120)*2+(W>120)*2:H=H-(Z<120)*2+(Z>120)*2:G=G-SGN(G):H=H-SGN(H):W=W+G:Z=Z+H:SPRITE1,W,Z:NEXT:LOCATE4,10:PRINT"{F4}{F6}YOU{J3}WIN{J3}A{J3}GAME!{F4}{F6}":GOTO100:
90 SPRITE0:SPRITE1:POKE&H4000,143,156,0,11:LOCATE4,10:PRINT"{F4}{F5}{F5}{F6}DRAWN{J3}GAME!{F4}{F5}{F5}{F6}":
100 PALETB 0,3,48,35,19:LOCATE4,14:PRINT"{F4}{F5}{F5}{F6}PLAY{J3}AGAIN!{F4}{F5}{F5}{F6}":LOCATE4,16:PRINT"{F4}{F6}PUSH[START]KEY!{F4}{F6}":GOTO20:
