#N88BASIC
0 DIM ANS,N
10 RANDOMIZE
20 ANS=Int(Rnd()*6+1)
30 PRINT "スライムが現れた。"
40 PRINT "呪文一覧"
50 PRINT "1、ファイヤー"
60 PRINT "2、サンダー"
70 PRINT "3、ブリザード"
80 PRINT "4、ウォーター"
90 PRINT "5、アース"
100 PRINT "6、ストーン"
110 PRINT "7、逃げる。"
500 INPUT "使いたい呪文の番号を記入してください。->",N
510 IF N=11 THEN PRINT "逃げ出した!":GOTO 550
520 IF ANS<N THEN PRINT "まったく効果が無いようだ。":GOTO 800
530 IF ANS>N THEN PRINT "まったく効果が無いようだ。":GOTO 800
540 PRINT "スライムを倒した。"
550 END
790 A=Int(Rnd()*5+1)
800 PRINT "スライムの攻撃!"+Str$(A)+"ダメージ"
810 PRINT "反撃チャンス!":GOTO 500
やっぱ変わりませんねぇ・・・
って言うか、質問厨ですみません。(汗