Here's a very simple example. If you want more explanation feel free to post back here.
Example:
`Start a loop for the "game"
Sync on : Sync rate 60 : Do
`set cursor at top of screen
Set cursor 0,0
`make text for the character asking the question and make some space at the end
Set text to italic
Print "JOHN: Why have you come here to Teralgen, land of the plenty?"
Print " "
Print " "
`reset text style to normal for player + print the options + make some space at the end
Set text to normal
Print "1 - We have moved to Teralgen to get away from the floods"
Print "2 - None of your business!"
Print "3 - Please just leave us alone... We want rest"
Print "4 - <Silence>"
Print " "
Print " "
`To prevent player from selecting many options again and again, we make sure option is NOT equal to -1 (see below)
IF OPTION <> -1
`check key pressed and assign option accordingly
If keystate(2)=1 then option = 1
If keystate(3)=1 then option = 2
If keystate(4)=1 then option = 3
If keystate(5)=1 then option = 4
`print out results as per the chosen option + change option to -1 to make sure that player can't repeatedly choose options again and again
If option = 1
Set text to italic
Print "JOHN: Oh welcome refugees! We welcome you with open arms!"
option = -1
Endif
If option = 2
Set text to italic
Print "JOHN: Alright, alright, no need to get fired up"
option = -1
Endif
If option = 3
Set text to italic
Print "JOHN: Oh I'm so sorry, I will be on my way"
option = -1
Endif
If option = 4
Set text to italic
Print "JOHN: O...kay then..."
option = -1
Endif
ENDIF
Sync : Loop
Hello World Tommorrow
