ソース載せるの忘れた・・・

#N88BASIC
0 DIM ANS,N,A
10 RANDOMIZE
20 ANS=Int(Rnd()*5+1)
30 PRINT "スライムが現れた｡"
40 PRINT "呪文一覧"
50 PRINT "1、ファイヤー"
60 PRINT "2、サンダー"
70 PRINT "3、ブリザード"
80 PRINT "4、アース"
90 PRINT "5、ウォーター"
100 INPUT "使いたい呪文の番号を記入してください｡->",N
110 IF N=6 THEN PRINT "終了します":GOTO 150
120 IF ANS<N THEN PRINT "まったく効果が無いようだ｡":GOTO 160
130 IF ANS>N THEN PRINT "まったく効果が無いようだ｡":GOTO 160
140 PRINT "スライムを倒した｡"
150 INPUT "",A
155 END
160 A=Int(Rnd()*5+1)
165 PRINT "スライムの攻撃！"+Str$(A)+"ダメージ"
170 PRINT "反撃チャンス！":GOTO 100