Here is a little snippet from my new gamebook adventure, jus to help me rember functions better.
Rem Project: GameBook Project
Rem Created: 5:15:09 AM (WOW)
Rem ***** Main Source File *****
set text size 18
print "Welcome to the 'Shadow Forest' interactive gamebook"
print " by DaZ of CDsoftware"
print "press any key to begin"
suspend for key
cls
Rem *******main loop*******
do
print "Your walk to the Elgore's takes little over half a day,"
print " and you arrive at his stone tavern dirty and hungry"
print "you knock on the door........"
input " You hear a faint grunt, Who is it??? its me (type your name) - " ;pname$
cls
print "Oh its you ";pname$;" What can I do for you"
print "'I wish to purchase weapons' you reply"
print "Ahhh weapons my specialty"
print "Elgore turns to go up the stairs"
input "(A) Follow him upp the stairs, or (B) Draw your sword and attack? - " ;choise1$
if choise1$ = "a" then 261()
if choise1$ = "b" then 54()
suspend for key
loop
Rem selections
function 261()
cls
print "Your Quest Will Be Continued!!!"
suspend for key
end
endfunction
function 54()
cls
print "BIG MISTAKE, Elgore turns and laughs. The last thing you hear before you die"
print "are you shattering bones"
print "Game Over"
suspend for key
end
endfunction
function 2()
cls
print "Your adventure finneshes here as your tasty fresh flesh is about to
print "become a savoury feast for the victorious ghoul."
suspend for key
end
endfunction
If you want more I will upload some more chapters to the book for your enjoyment lol.
DaZ
"There is only 2 ways off this island: The first is in little pieces and the seconds with me" - (Hunter/DaZ)
