GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-24 03:52:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

Thai phrasebook started: Greetings OK

Browse Source
This commit is contained in:
aarne
2011-11-06 21:13:09 +00:00
parent 8ec4afde05
commit 394caa8fa8
6 changed files with 573 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
examples/phrasebook/GreetingsTha.gf Normal file
View File

@@ -0,0 +1,34 @@
concrete GreetingsTha of Greetings =
SentencesTha [Greeting,mkGreeting] **
open ResTha, Prelude in {
-- สุคสันต์วันเกิด
flags coding = utf8 ;
lin
GBye = mkGreeting (thbind "เจอ" "กัน" "นะ") ;
GCheers = mkGreeting (thbind "ไช" "โย") ;
GDamn = mkGreeting (thbind "a'ช่ง") ; ---- google
GExcuse, GExcusePol = mkGreeting (thbind "ขอ" "โทษ") ;
GGoodDay = mkGreeting (thbind "สวัส" "ดี") ;
GGoodEvening = mkGreeting (thbind "สวัส" "ดี") ;
GGoodMorning = mkGreeting (thbind "สวัส" "ดี") ;
GGoodNight = mkGreeting (thbind "รา" "ตรี" "สวัส" "ดิ์") ;
GGoodbye = mkGreeting (thbind "ลา" "ก่อน") ;
GHello = mkGreeting (thbind "หวัส" "ดี") ;
GHelp = mkGreeting (thbind "ช่วย" "ด้วย") ;
GHowAreYou = mkGreeting (thbind "สบาย" "ดี" "ไหม") ;
GLookOut = mkGreeting (thbind "ระ" "วัง") ; ---- google
GNiceToMeetYou, GNiceToMeetYouPol =
mkGreeting (thbind "ยิน" "ดี" "ฑี่" "ได้" "รู้" "จัก") ;
GPleaseGive, GPleaseGivePol = mkGreeting (thbind "ช่วย") ; ----
GSeeYouSoon = mkGreeting (thbind "เจอ" "กัน" "นะ") ;
GSorry, GSorryPol = mkGreeting (thbind "ขอ" "โทษ") ;
GThanks = mkGreeting (thbind "ขอบ" "คุณ") ;
GTheCheck = mkGreeting (thbind "เช็ค" "บิล") ;
GCongratulations = mkGreeting (thbind "ยิน" "ดี" "ด้วย") ;
GHappyBirthday = mkGreeting (thbind "สุค" "สันต์" "วัน" "เกิด") ;
GGoodLuck = mkGreeting (thbind "โจค" "ดี" "นะ") ;
}