A ドリブル:21 凄く上がりやすい B パス: 22 凄く上がりやすい C シュート:19 凄く上がりやすい D タックル:21 凄く上がりやすい E パスカット:21 凄く上がりやすい F ブロック:20 凄く上がりやすい G せりあい:19 凄く上がりやすい H ガッツ:700 凄く上がりやすい
B パリのどこかに出かける ―――――――――――――――――――――――――――――――――――――――――――――
A 日本人学校 B 天ケ瀬家 C ヴォルテール通り D ル・エスト E アタリフランス F 双海家 G 15・16区周辺を散歩する G1 15・16区以外の散歩(要行き先の記述。 これが採用された場合、この週の日常生活は選択できなくなります) G2 15・16区以外の散歩(要行き先の記述。交通機関(註)を利用します) H その他、自由回答(要3票)
10 REM ●●●●●●●●●●●●●●●●スターライン●●●●●●●●●●●●●●● 20 CLS 30 BX=14;A$=‶$$$$″;YD=1:SC=0:BALL=5 40 DIM B(28,21) 50 FOR R=4 TO 7 60 FOR C=1 TO 26 70 B(C,R)=1 80 NEXT C 90 NEXT R 100 FOR R=4 TO 7 110 FOR C=1 TO 26 120 LOCATE C,R:PRINT ‶★″ 130 NEXT C 140 NEXT R 150 LOCATE BX,19:PRINT A= 160 Y=10:X=BX+2:XD=INT(RND(1)*2)-.5:PAUSE=30 170 LOCATE BX ,19:PRINT A‶●″ 180 FOR R=1 TO 1200:NEXT R 190 LOCATE 0,0:PRINT ‶BALL″;BALL 200 LOCATE X,Y:PRINT ‶●″ 210 FOR R=1 TO PAUSE:NEXT R 220 GOSUB 410 230 LOCATE X,Y:PRINT ‶●″ 240 IF B〔X,Y〕<>1 THEN 270 250 YD=‐YD:BEEP:B〔X,Y〕=0:SC=SC+1 260 LOCATE 20.0:PRINT ‶SCORE″,SC*10
270 IF SC=100 THEN 540 280 IF Y=4 THEN PAUSE=1 290 IF X<2 OR X>26 THEN XD=‐XD 300 IF Y<2 THEN YD=‐YD 310 IF Y=18 AND X>=BX AND X<BX+4 THEN 360 320 BB=INT〔X〕 330 IF Y=18 AND BB>BX‐2 AND BB<BX+6 THEN 350 340 GOTO 370 350 XD=‐-XD*.8 360 YD=‐YD 370 IF Y>20 THEN GOTO 500 380 X=X+XD 390 Y=Y+YD 400 GOTO 200 410 REM ラケット 420 LOCATE BX,19:PRINT‶====″ 430 G$=INKEY$ 440 IF G$=‶Z″ THEN BX=BX‐2 450 IF G$=‶X″ THEN BX=BX+2 460 IF BX<1 THEN BX=1 470 IF BX>25 THEN BX=25 480 LOCATE BX,19:PRINT A= 490 RETURN 500 BALL=BALL‐1 510 BEEP 520 IF BALL<0 THEN GOTO 540 530 GOTO 160 540 PRINT ‶もうおわり〜?″ (H/Y) 550 INPUT D$ 560 IF D$= ‶Y〜″ THEN END 570 RUN