From 8a23216392cd0f7eeac7fc02c8896e7e7a1c227a Mon Sep 17 00:00:00 2001 From: John Paul Wohlscheid Date: Sun, 11 Jul 2021 20:17:06 -0400 Subject: [PATCH] 1.0 fix --- FT-1.bas | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/FT-1.bas b/FT-1.bas index 7a9d28d..47a2156 100644 --- a/FT-1.bas +++ b/FT-1.bas @@ -74,7 +74,7 @@ Rem I'll do it. STOP NOW. -screen 12 +Screen 12 weight = 0 @@ -83,7 +83,7 @@ Dim coconutcreampie$ Dim binaryquestion$ ' Hold value of key press Dim heav% Dim weight% -Dim restart$ + heav% = 0 @@ -94,7 +94,7 @@ Print "However, we can't guarantee that the results of the application." ' Intro Print "(Disclaimer added due to lawsuit.)" Print start: -cls +Cls Print Print "Before we begin, please answer a few questions." Print @@ -129,8 +129,8 @@ If binaryquestion$ = "n" Then Print "Fine. It's your too bad.": Print "All furth cheap: -print "I hope your information is safe." -sleep 1 +Print "I hope your information is safe." +Sleep 1 Cls Input "What is your age? ", age$ Print