Fixed major code errors

fixed code so it does jump over a section of code

FT-1.bas

@@ -1,4 +1,4 @@
-Rem Fortune Teller 1.0
+Rem Fortune Teller 1.1
 
 Rem This file was originally named FT/1 as a reference to past tech names like OS/2 and CP/M, but Gitlab didn't like it.
 
@@ -41,7 +41,7 @@ Rem Like I said, please run the application before you look at the code.
 
 
 
-Rem If you attempt to continue scrolling, I will attempt your hard drive.
+Rem If you attempt to continue scrolling, I will attempt to corrupt your hard drive.
 
 
 
@@ -82,7 +82,7 @@ Dim fname$
 Dim coconutcreampie$
 Dim binaryquestion$ ' Hold value of key press
 Dim heav%
-Dim weight%
+
 
 
 heav% = 0
@@ -109,10 +109,10 @@ Cls
 Sleep 5
 Print "Thank you, " + fname$ ' Clear the screen and say thanks to the user.
 
-Sleep 2
+Sleep 5
 Print
 Print "Now let's get started."
-Sleep 2
+Sleep 5
 
 Cls
 
@@ -124,8 +124,8 @@ Do
     binaryquestion$ = InKey$
 Loop Until ((LCase$(binaryquestion$) = "y") Or (LCase$(binaryquestion$) = "n"))
 
-If binaryquestion$ = "y" Then Print "Thank you for your patronage.": Print "19999999999.99 has been deducted from your bank account as a one time, non-renewing payment.": GoTo paid
-If binaryquestion$ = "n" Then Print "Fine. It's your too bad.": Print "All further communications to the web will be made via unsecured http.": GoTo cheap
+If binaryquestion$ = "y" Then cls: Print "Thank you for your patronage.": Print "19999999999.99 has been deducted from your bank account as a one time, non-renewing payment.": sleep 8: GoTo paid
+If binaryquestion$ = "n" Then cls: Print "Fine. It's your too bad.": Print "All further communications to the web will be made via unsecured http.": sleep 8: GoTo cheap
 
 
 cheap:
@@ -204,6 +204,6 @@ Print
 Print "Thank you for trying our this expieramental Fortune telling program."
 Print "If you found it insightful, share it with your friends and family."
 Print
-Print "To retry, press 1"
+Print "To retry, press 1 and hit ENTER. Otherwide, please close the window."
 Input restart%
 If restart% = 1 Then GoTo start