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
A 岬「今度はサッカーゲームでも作ってもらえないかな?(ちょっと興味がわいてきたぞ)」 B 岬「双海さん達の他にプログラミングやってる人っている? (誰か教えた人がいるはずだ。これ程の腕だと仲良くなれば役に立つかも)」 C 岬「意外だなあ、コレコビジョンはどうしたの?(交流の機会を持てないかな)」 D 岬「あずみちゃんとの仲直り、もう済んだ? (随分会ってないけど大丈夫かな。友好的な相手が潰れるのはもったいない)」 E 岬「あれからあずみちゃん、どうしてる? (随分会ってないけど大丈夫かな。友好的な相手が潰れるのはもったいない)」 F 岬「ここの学校や外の人達はマイコンゲームするの?それともテレビゲーム? (そうだ、金儲けの種になるかもしれない、聞いてみよう)」 G 岬「僕がサッカー修行中に、凄い事してるたんだなあ (彼女達を褒めつつ、さりげなく自分の行動をアピールしよう)」 H その他、自由回答(要3票)
A ドアを軽く叩いてみて、相手の反応を待つ B ほんの少しだけドアを開けて、歌声を聴いてみる C 「ちょっと聴かせてもらっていいかな」 ドアを開け、素直に尋ねてみる D 僕の存在には気づいていない。こっそり忍び寄って後ろから驚かせてみようか E ドアを少しだけ開け、数歩離れた後、彼女達に聞こえるか聞こえないか位の声で僕も歌ってみよう F 興味ないから他の所へ行こう G その他、自由回答(要3票)
A 岬「今何を歌っていたの」 B 岬「3人で歌っているみたいだけど、自主練?」 C 岬「良かったらもう一度歌ってもらえないかな」 D 岬「中原さん、さっきの点数ってどういう意味」 E 岬「伊東さんって早川さんに似てるなあ」 F 岬「原田さん、困っている事があったら何でも言ってみて。力になるから」 G 岬「僕はサッカー部に入ろうと思うんだけど、何か知ってることないかな?」 H 岬「この学校で個性的な人って、どんな人がいるかな」 I 岬「良かったら一緒に歌ってもいい?なんか楽しそうだったから」 J その他、自由回答(要3票)
A 岬「良かったらもう一度歌ってもらえないかな」 B 岬「中原さん、さっきの点数ってどういう意味」 C 岬「伊東さんって早川さんに似てるなあ」 D 岬「原田さん、困っている事があったら何でも言ってみて。力になるから」 E 岬「僕はサッカー部に入ろうと思うんだけど、何か知ってることないかな?」 F 岬「同じクラスのコーラス部員って他にいる?」 G その他、自由回答(要3票)
B パリのどこかに出かける ―――――――――――――――――――――――――――――――――――――――――――――
A 日本人学校 B 天ケ瀬家 C ヴォルテール通り D ル・エスト(早乙女家) E アタリフランス F 双海家 G 15・16区周辺を散歩する G1 15・16区以外の散歩(要行き先の記述。 これが採用された場合、この週の日常生活は選択できなくなります) G2 15・16区以外の散歩(要行き先の記述。交通機関(註)を利用します) H その他、自由回答(要3票)