msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

changed names of resource-1.3; added a note on homepage on release

Browse Source
This commit is contained in:
aarne
2008-06-25 16:54:35 +00:00
parent b96b36f43d
commit e9e80fc389
903 changed files with 113 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
old-examples/dialogue/LightsProlog.gf Normal file
View File

@@ -0,0 +1,20 @@
--# -path=.:prelude
concrete LightsProlog of Lights =
DialogueProlog ** open ResProlog, Prelude in {
lin
Light = ss "light" ;
Room = ss "room" ;
SwitchOnIn = op2 "switch_on" "switch_what" "switch_where" ;
SwitchOffIn = op2 "switch_off" "switch_what" "switch_where" ;
SwitchOn = op1 "switch_on" "switch_what" ;
SwitchOff = op1 "switch_off" "switch_what" ;
LivingRoom = ss "living_room" ;
Kitchen = ss "kitchen" ;
MorningMode = ss (bracket (app1 "answer" "morning_mode")) ;
}