verb$ = Input$("Please enter a Noun to use: ")
Noun$ = Input$("Please enter a Noun to use: ")
Adj$ = Input$("Please enter a Noun to use: ")
Pro$ = Input$("Please enter a Noun to use: ")
Adv$ = Input$("Now you only have to pick an Adjective: ")

Print ""
Print "You're done, here comes your story..."
Print ""

Delay 1000

Print "There was a pirate who had"
Print "no " + verb$ + ". So he would walk on"
Print "his hands. That meant his " + Noun$;
Print "had to sit on nubs and wear"
Print "an eye " + Adj$ + " on his " + Pro$ + ","
Print "needless to say this was the " + Adv$ + " pirate who sailed the seas."

Delay 10000
End;