johnblood/ft-1
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fixed code

Browse Source
This commit is contained in:
John Paul Wohlscheid 2021-06-19 23:32:27 -04:00
parent 59b248f419
commit caa3da3959
1 changed files with 29 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

51
FT-1.bas
View File

@ -1,8 +1,8 @@
rem Fortune Teller 1.0
Rem Fortune Teller 1.0
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.
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.
rem by John Paul Wohlscheid
Rem by John Paul Wohlscheid
@ -10,37 +10,44 @@ rem by John Paul Wohlscheid
rem You are free to read this source code, but I would ask that you try the application first.
Rem You are free to read this source code, but I would ask that you try the application first.
rem
Rem
rem
Rem
weight = 0
print "Welcome to FT/1"
print "The most advanced fortune telling appliction available."
print
print "However, we coonte garuntee that the results of the appliction."
print "(Discalimer added due tolawsuit)"
print
print
print "Before we begin, please answer a few questions."
print
print
print
color 3; input "What is your frist name? ", fname$
print
print
input "What is your last name? ", coconutcreampie
cls
Print "Welcome to FT/1"
Print "The most advanced fortune telling appliction available."
Print
Print "However, we coonte garuntee that the results of the appliction."
Print "(Discalimer added due tolawsuit)"
Print
Print
Print "Before we begin, please answer a few questions."
Print
Print
Print
Input "What is your frist name? ", fname$
Print
Print
input "What is your last name? ", coconutcreampie$
Clear
Sleep 5
Print "Thank you, " + fname$
Sleep 2
Print
Print "Now let's get started."
Clear
Print "But first"