a simple Text based adventure engine that i made and is the first code ive ever made by hand... and this sort of reflects off my Qbasic programing skills which is really none but o

Well i did this mostly on my spare time.
my first piece of code written with darkbasic v1.13 registerd
and... i would like to thank the people in the IRc chatroom for
helping me decide what i wanted to code first. thats really
how this engine was made... and not to mention im makeing a game/story out of
it so no matter what i sort of had to make a engine for my game and well.... here it is
i hope you enjoy this code... please leave a comment... and REMEMBER .... this is my first piece of code.

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    rem ******************************************************
rem * TEXT Based Adventure   | By David Cluett in 2005   *
rem ******************************************************
rem * This game Engine is and will be freeware and       *
rem * to be distributed freely.                          *
rem ******************************************************
rem * Version 1.0 beta Created on Febuary 1st 2005       *
rem ******************************************************



rem *Basic start up nodes*
sync rate 0
hide mouse

rem *Basic title* NOTE: you can load objects for this to.
print "Press any Key to Begin the DEMO story"
print "  "
print "  "
wait key
print "***Demo of the Adventure text engine***"
print "  "
wait 1500
print "Press the space bar to start"
rem *start*
do
If inkey$()=" " then goto print1
loop
print1:
   print "  "
   print "You were at home useing Darkbasic ..."
   print "  "
   wait 2000
   ink rgb(255,255,0),0 :print "(A)" :ink rgb(255,255,255),0 : print " DarkBasic Pro "
   ink rgb(0,255a,0),0 :print "or"
   ink rgb(255,255,0),0 :print "(B)":ink rgb(255,255,255),0 : print " DarkBasic "
   ink rgb(255,0,0),0 :print "Press A or B depending on selection"

ink rgb(255,255,255),0 :

do
If inkey$()="a" then goto print2
loop
print2:
   print "Wow you program !! u must be l337 "
   print ""
   print ""
   print ""
   print ""
   print ""

do
If inkey$()="b" then goto print3
loop
print3:
 print "wow you are really ... legit! wow"


rem ink rgb(255,255,255),0 : << uses rgb color format and is used to change color of text
rem If inkey$()="a" then goto print2 << basic code and print2 is a defined
rem code and the brackets "A" is the button slash slection you can make.