From f569f70654def8f2b590fca62dbfa3e7b2b5dd8c Mon Sep 17 00:00:00 2001
From: "Juan J. Martinez" <jjm@usebox.net>
Date: Sat, 29 Jul 2023 08:12:16 +0100
Subject: Initial import

---
 game.bas | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 game.bas

(limited to 'game.bas')

diff --git a/game.bas b/game.bas
new file mode 100644
index 0000000..1757efb
--- /dev/null
+++ b/game.bas
@@ -0,0 +1,10 @@
+10 REM Guess a number
+20 CLS : RANDOMIZE
+30 LET n = INT(RND * 8) +1 : LET t = 1
+100 INPUT "Guess a number from 1 to 9", g
+120 PRINT "Your guess is "; g
+130 IF g < n THEN PRINT "The number is bigger"
+140 IF g > n THEN PRINT "The number is smaller"
+150 IF g = n THEN GO TO 200
+160 LET t = t + 1 : GO TO 100
+200 PRINT "You won in "; t ; " turns"
-- 
cgit v1.2.3