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 7d721eb16e
commit c5c6d13546
1729 changed files with 113 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
old-examples/dialogue/LightsEng.gf Normal file
View File

@@ -0,0 +1,19 @@
--# -path=.:multimodal:alltenses:prelude
concrete LightsEng of Lights =
DialogueEng ** open MultiEng, ParadigmsEng, AuxEng, Prelude in {
lin
Light = UseN (regN "light") ;
Room = UseN (regN "room") ;
SwitchOnIn = dirV3 (partV (regV "switch") "on") (mkPrep "in") ;
SwitchOffIn = dirV3 (partV (regV "switch") "off") (mkPrep "in") ;
SwitchOn = dirV2 (partV (regV "switch") "on") ;
SwitchOff = dirV2 (partV (regV "switch") "off") ;
LivingRoom = defN (regN ["living-room"]) ;
Kitchen = defN (regN ["kitchen"]) ;
MorningMode = mkMove (optStr "the" ++ ["morning mode"]) ;
}