NERD HPCで数あてクイズ。

NERD HPCで数あてクイズ。
プログラミング入門書だと乱数処理を学んだ辺りに
サンプルとして提示されるようなゲームで
ご存じな方も居るのではなかろうか。
試せる環境があれば、軽い気持ちで遊んでみて欲しい。

KAZUATE.TXT

10 CLS
20 GCLS
30 PRINT "KAZUATE QUIZ"
31 PRINT "version 1.0.0"
32 PRINT "REGEKATSU SOFT"
33 PRINT "07 Jul, 2025"
34 PRINT ""
40 B=RND(100)-1
50 INPUT "GUESS(0-99)?:"A
60 IF (A<0)+(A>99) PRINT "GIVE UP! A=",B;GOTO 120
70 IF A=B PRINT "IT'S CORRECT!! A=",B;GOTO 120
80 IF (A=B-1)+(A=B+1) PRINT "IT'S NEAR!";GOTO 110
90 IF A>B PRINT "IT'S SMALLER."
100 IF A<B PRINT "IT'S LARGER."
110 GOTO 50
120 INPUT "RETRY? 1.Y 2.N:"A
130 IF A=1 GOTO 40
140 IF A=2 STOP
150 GOTO 120