Well, this isn't particularly elegant or anything, but you could do something like this:
Code: Select all
screen planner:
hbox:
frame:
vbox:
text "What will she do for the first part of the month?"
textbutton (act1 + job1) action SetVariable("decideact", 1)
if decideact == 1:
hbox:
frame:
vbox:
textbutton "Work" action SetVariable("act1", "Work")
textbutton "Study" action SetVariable("act1", "Study")
textbutton "Explore" action SetVariable("act1", "Explore")
textbutton "Rest" action SetVariable("act1", "Rest")
frame:
vbox:
if act1 == "Work":
textbutton "Church":
action (SetVariable("job1", " at the Church"), SetVariable("decideact", 0))
textbutton "Farm":
action (SetVariable("job1", " at the Farm"), SetVariable("decideact", 0))
textbutton "Graveyard":
action (SetVariable("job1", " at the Graveyard"), SetVariable("decideact", 0))
textbutton "Seedy Bar":
action (SetVariable("job1", " at the Seedy Bar"), SetVariable("decideact", 0))
if act1 == "Study":
textbutton "Dance":
action (SetVariable("job1", " Dance"), SetVariable("decideact", 0))
textbutton "Rhetoric":
action (SetVariable("job1", " Rhetoric"), SetVariable("decideact", 0))
textbutton "Logic":
action (SetVariable("job1", " Logic"), SetVariable("decideact", 0))
textbutton "Science":
action (SetVariable("job1", " Science"), SetVariable("decideact", 0))
if act1 == "Explore":
textbutton "Lake":
action (SetVariable("job1", " the Lake"), SetVariable("decideact", 0))
textbutton "Mountain":
action (SetVariable("job1", " the Mountain"), SetVariable("decideact", 0))
textbutton "Forest":
action (SetVariable("job1", " the Forest"), SetVariable("decideact", 0))
textbutton "Swamp":
action (SetVariable("job1", " the Swamp"), SetVariable("decideact", 0))
if act1 == "Rest":
textbutton "At home":
action (SetVariable("job1", " at home"), SetVariable("decideact", 0))
textbutton "On holiday":
action (SetVariable("job1", " on holiday"), SetVariable("decideact", 0))
text "What will she do for the second part of the month?"
textbutton (act2 + job2) action SetVariable("decideact", 2)
if decideact == 2:
hbox:
frame:
vbox:
textbutton "Work" action SetVariable("act2", "Work")
textbutton "Study" action SetVariable("act2", "Study")
textbutton "Explore" action SetVariable("act2", "Explore")
textbutton "Rest" action SetVariable("act2", "Rest")
frame:
vbox:
if act2 == "Work":
textbutton "Church":
action (SetVariable("job2", " at the Church"), SetVariable("decideact", 0))
textbutton "Farm":
action (SetVariable("job2", " at the Farm"), SetVariable("decideact", 0))
textbutton "Graveyard":
action (SetVariable("job2", " at the Graveyard"), SetVariable("decideact", 0))
textbutton "Seedy Bar":
action (SetVariable("job2", " at the Seedy Bar"), SetVariable("decideact", 0))
if act2 == "Study":
textbutton "Dance":
action (SetVariable("job2", " Dance"), SetVariable("decideact", 0))
textbutton "Rhetoric":
action (SetVariable("job2", " Rhetoric"), SetVariable("decideact", 0))
textbutton "Logic":
action (SetVariable("job2", " Logic"), SetVariable("decideact", 0))
textbutton "Science":
action (SetVariable("job2", " Science"), SetVariable("decideact", 0))
if act2 == "Explore":
textbutton "Lake":
action (SetVariable("job2", " the Lake"), SetVariable("decideact", 0))
textbutton "Mountain":
action (SetVariable("job2", " the Mountain"), SetVariable("decideact", 0))
textbutton "Forest":
action (SetVariable("job2", " the Forest"), SetVariable("decideact", 0))
textbutton "Swamp":
action (SetVariable("job2", " the Swamp"), SetVariable("decideact", 0))
if act2 == "Rest":
textbutton "At home":
action (SetVariable("job2", " at home"), SetVariable("decideact", 0))
textbutton "On holiday":
action (SetVariable("job2", " on holiday"), SetVariable("decideact", 0))
text "What will she do for the third part of the month?"
textbutton (act3 + job3) action SetVariable("decideact", 3)
if decideact == 3:
hbox:
frame:
vbox:
textbutton "Work" action SetVariable("act3", "Work")
textbutton "Study" action SetVariable("act3", "Study")
textbutton "Explore" action SetVariable("act3", "Explore")
textbutton "Rest" action SetVariable("act3", "Rest")
frame:
vbox:
if act3 == "Work":
textbutton "Church":
action (SetVariable("job3", " at the Church"), SetVariable("decideact", 0))
textbutton "Farm":
action (SetVariable("job3", " at the Farm"), SetVariable("decideact", 0))
textbutton "Graveyard":
action (SetVariable("job3", " at the Graveyard"), SetVariable("decideact", 0))
textbutton "Seedy Bar":
action (SetVariable("job3", " at the Seedy Bar"), SetVariable("decideact", 0))
if act3 == "Study":
textbutton "Dance":
action (SetVariable("job3", " Dance"), SetVariable("decideact", 0))
textbutton "Rhetoric":
action (SetVariable("job3", " Rhetoric"), SetVariable("decideact", 0))
textbutton "Logic":
action (SetVariable("job3", " Logic"), SetVariable("decideact", 0))
textbutton "Science":
action (SetVariable("job3", " Science"), SetVariable("decideact", 0))
if act3 == "Explore":
textbutton "Lake":
action (SetVariable("job3", " the Lake"), SetVariable("decideact", 0))
textbutton "Mountain":
action (SetVariable("job3", " the Mountain"), SetVariable("decideact", 0))
textbutton "Forest":
action (SetVariable("job3", " the Forest"), SetVariable("decideact", 0))
textbutton "Swamp":
action (SetVariable("job3", " the Swamp"), SetVariable("decideact", 0))
if act3 == "Rest":
textbutton "At home":
action (SetVariable("job3", " at home"), SetVariable("decideact", 0))
textbutton "On holiday":
action (SetVariable("job3", " on holiday"), SetVariable("decideact", 0))
if not job1 == " where?" and not job2 == " where?" and not job3 == " where?":
textbutton "Finished Deciding" action Jump("dotasks")
Now, remembering to initialise variables somewhere... Probably just after the start label?
Then you need to set the variables back to their default values before you show the planner again.
You can of course mess around with the positioning and everything... And if you want your choices stored in a more useful variable/format, that's easy enough to add in.
You could probably save a lot of typing by defining stuff better, but I kind of just went ahead on the spur of the moment, so this is pretty unpolished.