Microsoft Small Basic

Program Listing: ZTM891

'order to teach variation one

'Ask the user to enter an adverb, save it as words["currentAdverb"] -- # 1.0
'Ask the user to enter a verb ending in '-ed', save it as words["currentEdVerb"] -- # 1.1
'Ask the user to enter an body part, save it as words["currentBodyPart"] -- # 1.2

'Use the Parser's merge to merge the words with the template in the next line as the currentStory-- # 2.0
'"Today I woke {currentAdverb}. Then I {currentEdVerb} my {currentBodyPart}." -- # 2.1

'You will be able to delete all of these lines after you complete the Parser!
'Set the value of the currentStory to the word 'Today '-- # 3.0
'Add the words 'I woke ' + currentAdverb + '. ' to the currentStory -- # 3.1
'Add the words 'Then I ' + currentEdVerb + ' ' to the currentStory -- # 3.2
'Add the words 'my ' + currentBodyPart + '. ' to the current story -- 3.3

'Show the currentStory in a message box as a message. -- # unchanged