blob: 7a67cc1367f65ebe7079207fa42992c62ddc0e10 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
|
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]
show[speak]
|