From 3b57a78482aea4849418d279f9ad4efedc69bd1e Mon Sep 17 00:00:00 2001
From: elioat <hi@eli.li>
Date: Fri, 1 Dec 2023 10:11:10 -0500
Subject: sketch of a deck

---
 decker/giblang.deck | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 decker/giblang.deck

(limited to 'decker')

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}
+
-- 
cgit 1.4.1-2-gfad0