Added the global variables, and set up the procedure function to start of the opening to the story