diff options
author | elioat <elioat@tilde.institute> | 2023-05-06 08:02:34 -0400 |
---|---|---|
committer | elioat <elioat@tilde.institute> | 2023-05-06 08:02:34 -0400 |
commit | 464d6b689f18713f1ee306ec2f1c9ab79120d568 (patch) | |
tree | 0a3639394dcdfa4948e0da92d2bdc86c32944690 /lil/giblang.lil | |
parent | e1ed8ffb51feb3b189286ad96e03273e9552ac6d (diff) | |
download | tour-464d6b689f18713f1ee306ec2f1c9ab79120d568.tar.gz |
SUCCESS
Diffstat (limited to 'lil/giblang.lil')
-rw-r--r-- | lil/giblang.lil | 20 |
1 files changed, 6 insertions, 14 deletions
diff --git a/lil/giblang.lil b/lil/giblang.lil index 7370a8c..ddd13de 100644 --- a/lil/giblang.lil +++ b/lil/giblang.lil @@ -1,17 +1,9 @@ sys.seed:sys.ms -cons: ("b", "c", "d", "f", "g", "h", "j", "k", "l", "m", "n", "p", "r", "s", "t", "v", "w", "z", "ch", "sh", "zh", "th") -vow: ("a", "e", "i", "o", "u", "y", "ee", "ai", "ae", "au") +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 v c do - "" fuse random[v 1],random[c 1] -end +on syl do random[vow],random[cons] end +on word do "" fuse syl @ range random[1,2,3,4] end +on words x do word @ range x end -on word i v c do - "" fuse each x in i syl[v c] end -end - -p:random[(1,2,2,3,4) 1] -r:range sum p - -out:word[r vow cons] -show[out] \ No newline at end of file +show[words[12]] \ No newline at end of file |