forked from GitHub/gf-core
extended dialogue example
This commit is contained in:
20
examples/dialogue/LightsProlog.gf
Normal file
20
examples/dialogue/LightsProlog.gf
Normal file
@@ -0,0 +1,20 @@
|
||||
--# -path=.:prelude
|
||||
|
||||
concrete LightsProlog of Lights =
|
||||
DialogueProlog ** open ResProlog, Prelude in {
|
||||
|
||||
lin
|
||||
Light = ss "light" ;
|
||||
Room = ss "room" ;
|
||||
SwitchOnIn = ss "switch_on" ;
|
||||
SwitchOffIn = ss "switch_off" ;
|
||||
SwitchOn = ss "switch_on" ;
|
||||
SwitchOff = ss "switch_off" ;
|
||||
|
||||
LivingRoom = ss "living_room" ;
|
||||
Kitchen = ss "kitchen" ;
|
||||
|
||||
MorningMode = ss "morning_mode" ;
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user