about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--decker/giblang.deck33
1 files changed, 33 insertions, 0 deletions
diff --git a/decker/giblang.deck b/decker/giblang.deck
new file mode 100644
index 0000000..54755a2
--- /dev/null
+++ b/decker/giblang.deck
@@ -0,0 +1,33 @@
+{deck}
+version:1
+card:1
+size:[512,342]
+
+{card:home}
+
+{card:card1}
+{widgets}
+speak:{"type":"button","size":[64,32],"pos":[336,176],"script":"card1.0","text":"Speak","style":"rect"}
+out:{"type":"field","size":[304,32],"pos":[96,128],"style":"code"}
+clear:{"type":"button","size":[64,32],"pos":[96,176],"script":"card1.1","text":"Clear","style":"rect"}
+
+{script:card1.0}
+on click do
+ sys.seed:sys.ms
+ cons: "|" split "b|c|d|f|g|h|j|k|l|m|n|p|r|s|t|v|w|z|ch|sh|zh|th"
+ vow: "|" split "a|e|i|o|u|y|ee|ai|ae|au"
+ 
+ on syl do random[vow],random[cons] end
+ on word do syl @ range random[1,2,3,4] end
+ on words x do " " fuse word @ range x end
+ speak:words[7]
+ out.text:speak
+end
+{end}
+
+{script:card1.1}
+on click do
+ out.text: ""
+end
+{end}
+