From ba1daaea6b879a8a5c1baa5e09cb128cea0f4502 Mon Sep 17 00:00:00 2001
From: John Paul Wohlscheid <wohlschied@gmail.com>
Date: Wed, 3 Mar 2021 17:42:43 -0500
Subject: [PATCH] update latest work

---
 qb64/cascading-numbers2.bas |  3 ++-
 qb64/guessing-game.bas      | 24 ++++++++++++++++++++++++
 qb64/order-system.bas       |  7 +++++++
 3 files changed, 33 insertions(+), 1 deletion(-)
 create mode 100644 qb64/guessing-game.bas
 create mode 100644 qb64/order-system.bas

diff --git a/qb64/cascading-numbers2.bas b/qb64/cascading-numbers2.bas
index 1580366..f1425f4 100644
--- a/qb64/cascading-numbers2.bas
+++ b/qb64/cascading-numbers2.bas
@@ -23,7 +23,8 @@ finalnum% = ab% - cd%
 
 REM displaying numbers while using str$ to convert numbers to strings
 CLS
-PRINT STR$(num1%) + "     " + STR$(num2%) + "     " + STR$(num3%) + "     " + STR$(num4%) + "     " + STR$(num5%) + "     " + STR$(num6%)
+PRINT STR$(num1%) + "     " + STR$(num2%) + "     " + STR$(num3%) + "     " + STR$(num4%) + "     " + STR$(num5%) + "     " + STR$(num6%) + "     " + STR$(num7%) + "     " + STR$(num8%) + "     " + STR$(num9%) + "     " + STR$(num10%)
+PRINT "     " + STR$(ab%) + "     " + STR$(cd%) + "     " + STR$(ef%) + "     " + STR$(gh%) + "     " + STR$(ij%)
 
 
 PRINT "=========================================================="
\ No newline at end of file
diff --git a/qb64/guessing-game.bas b/qb64/guessing-game.bas
new file mode 100644
index 0000000..e2ff766
--- /dev/null
+++ b/qb64/guessing-game.bas
@@ -0,0 +1,24 @@
+score = 0
+PRINT "Hello, Player! What is your name?"
+INPUT ; name$
+PRINT
+PRINT "Welcome " + name$ + "!"
+PRINT "Please answer the following questions."
+PRINT "A score of 5 is perfect."
+PRINT "What is the result of 1 + 1?"
+INPUT ; answer
+IF answer = 2 THEN score = score + 1
+PRINT "What does 3 times 4 equal?"
+INPUT ; answer
+IF answer = 12 THEN score = score + 1
+PRINT "What is the answer to 81 divided by 9"
+INPUT ; answer
+IF answer = 9 THEN score = score + 1
+print "What does 7 time 8 plus 10 equal"
+INPUT ; answer
+if answer = 66 then score = score + 1
+print "What is the answer to the ultimate auestion of life, the universe, and everything."
+input ; answer
+if answer = 42 then score = score + 1
+print "Your score: " + score
+print "You have the skillof 
\ No newline at end of file
diff --git a/qb64/order-system.bas b/qb64/order-system.bas
new file mode 100644
index 0000000..8f4a023
--- /dev/null
+++ b/qb64/order-system.bas
@@ -0,0 +1,7 @@
+REM Order System 1.0
+rem by John Paul Wohlscheid
+
+print tab(15); "Welcome to the first version of the Order System."
+print tab(15); "In order to place your order, enter the amount you"
+print tab(15); "of each item you want and the amount will be totalled"
+print tab(15); "at the end."
\ No newline at end of file