/% Place your story's setup code in this passage.\nAny macros in this passage will be run before the Start passage (or any passage you wish to Test Play) is run. %/\n\n<<set $prefix = ["A", "B", "C", "D", "E"]>>\n\n<<set $affix = []>>\n\n<<set $suffix = ["a", "e", "i", "o", "u"]>>\n\n<<set $pi = random(0, $prefix.length - 1)>>\n<<set $ai = -1>>\n<<set $useaffix = False>>\n<<set $si = random(0, $suffix.length - 1)>>\n<<set $name = $prefix[$pi] + $suffix[$si]>>\n\n<<set $result = ''>>\n<<set $list = []>>\n<<set $addname = -1>>\n\n/% First set of name parts %/\n<<set $prefix1 = ["Ti", "Ran", "Val", "Ver", "Mo", "Dar", "Ki", "Ply", "Kho"]>>\n<<set $affix1 = []>>\n<<set $suffix1 = ["nissa", "noa", "arun", "dy", "dun", "ross", "este", "adin", "kin"]>>\n\n<<set $prefix2 = ["Mel", "Gar", "Min", "Sat", "Ond", "Shor", "Brem", "Ist"]>>\n<<set $affix2 = []>>\n<<set $suffix2 = ["ind", "usk", "is", "oum", "al", "eos", "are", "old", "iaz"]>>\n\n<<set $prefix3 = ["Una", "Lu", "Iru", "Po", "Gli", "Agi", "Yu", "Via", "Ita"]>>\n<<set $affix3 = []>>\n<<set $suffix3 = ["rim", "tran", "selm", "val", "la", "pra", "daun", "stra"]>>\n\n/%\nOriginal set of affixes from the 7KPP generator:\n\n<<set $prefix = ["Ana", "Emmi", "Sel", "Car", "Jessa", "Ry", "Lor", "Rosa", "Dani", "Juli", "Nia", "Gen", "Mor", "Io", "Er"]>>\n\n<<set $suffix = ["bel", "lee", "la", "may", "ny", "lyn", "ette", "ella", "andre", "is", "een", "cia", "ko", "ix"]>>%/\n\n/% morpheme generator variables %/\n<<set $vowels = ["a", "e", "i", "o", "u", "y"]>>\n<<set $vcluster = ["ai", "ea", "ia", "au", "ou", "ey", "ay", "ue", "oe"]>>\n\n<<set $consonants = ["b", "d", "f", "g", "h", "j", "k", "l", "m", "n", "p", "r", "s", "t", "v", "w", "z"]>>\n<<set $ccluster = ["ch", "dh", "kh", "sh", "th", "zh", "bl", "br", "gr", "gl", "ts", "ks", "tr", "pr", "pl"]>>\n\n<<set $morphemes = []>>
!Quick Name Gen\n!!Menu\n\n* [[Random]] name. \n* [[View]] all. \n* [[Select]] name set. \n* [[List][$name = '', $si = -1, $pi = -1]] of names. \n* [[Mash]] a bunch of letters together to make syllables. \n\n<<if $name neq ''>>A name has been randomly generated.<<endif>>\n<<if $list.length gt 0>>A list of names has been randomly generated.<<endif>>
!Quick Name Gen\n!!Random name\n\n<<RandConcat>><<silently>>\n\t<<if $result neq ''>>\n\t\t<<set $name = $result>>\n\t<<endif>>\n<<endsilently>>''<<print $name>>''\n\n[[Regenerate|Random][$name = '', $si = -1, $pi = -1]].\n[[Clear|Menu][$name = '', $si = -1, $pi = -1]].\n[[Back|Menu]].
!Quick Name Gen\n!!List of random names\n\n<<if $list.length eq 0>>First item in list: \n<<RandConcat>><<silently>>\n\n\t\t<<if $result neq ''>>\n\t\t\t<<set $name = $result>>\n\t\t\t<<set $list.push($name)>>\n\t\t<<endif>>\n\n\t<<endsilently>>''<<print $name>>''\n<<else>>\n''List'': <<print $list>>\n\n<<if $addname gt 0>><<RandConcat>><<silently>>\n\n\t\t<<if $result neq ''>>\n\t\t\t<<set $name = $result>>\n\t\t\t<<set $list.push($name)>>\n\t\t<<endif>>\n\n\t<<endsilently>>New name: ''<<print $name>>''\n<<endif>><<endif>>\n\n[[Add|List][$addname = 1, $name = '', $si = -1, $pi = -1]] name. \n[[Blank|List][$addname = -1, $list = [], $name = '', $si = -1, $pi = -1]] list. \n[[Back|Menu]].
version 1.0.1
!Quick Name Gen\n!!Morphene generator\n\n<<silently>>\n\t/% save previous? %/\n\t<<if $addmorph gt 0>>\n\t\t<<set $morphemes.push($masharr)>>\n\t<<endif>>\n\n\t<<set $masharr = []>>\n<<endsilently>><<MashInner>>, <<MashInner>>, <<MashInner>>, <<MashInner>>, <<MashInner>>.\n\nSaved: <<print $morphemes>>\n\n[[Refresh|Mash][$addmorph = -1]] or [[Save|Mash][$addmorph = 1]] or [[Clear|Mash][$morphemes = [], $masharr = [], $addmorph = -1]]. \n[[Back|Menu]].
!Quick Name Gen\n!!by Hazel\n\n[[Begin|Menu]].
!Quick Name Gen\n!!Name sets\n\n<<silently>>\n\n\t<<if $affix.length gt 0>>\n\t\t<<set $useaffix = True>>\n\t<<else>>\n\t\t<<set $useaffix = False>>\n\t<<endif>>\n\n<<endsilently>>\n* [[Select|Menu][$prefix = $prefix1, $affix = $affix1, $suffix = $suffix1]] set 1: \n** ''Prefixes'': <<print $prefix1>>\n**''Affixes'': <<print $affix1>>\n**''Suffixes'': <<print $suffix1>>\n* [[Select|Menu][$prefix = $prefix2, $affix = $affix2, $suffix = $suffix2]] set 2: \n** ''Prefixes'': <<print $prefix2>>\n**''Affixes'': <<print $affix2>>\n**''Suffixes'': <<print $suffix2>>\n* [[Select|Menu][$prefix = $prefix3, $affix = $affix3, $suffix = $suffix3]] set 3: \n** ''Prefixes'': <<print $prefix3>>\n**''Affixes'': <<print $affix3>>\n**''Suffixes'': <<print $suffix3>>\n\n[[Back|Menu]].
Quick Name Gen
<<silently>>\n\t<<set $mph = "">>\n\t<<set $dbg = "">>\n\n\t<<set $isvf = random(0, 1)>>\n\t<<set $iscc = random(0, 1)>>\n\t<<set $iscv = random(0, 1)>>\n\n\t<<if $isvf eq 0>>\n\n\t\t/% first consonant %/\n\t\t<<if $iscc eq 0>>\n\t\t\t<<set $ind1 = random(0, $consonants.length - 1)>>\n\t\t\t<<set $dbg += $ind1>>\n\t\t\t<<set $mph = $consonants[$ind1]>>\n\t\t<<else>>\n\t\t\t<<set $ind2 = random(0, $ccluster.length - 1)>>\n\t\t\t<<set $dbg += $ind2>>\n\t\t\t<<set $mph = $ccluster[$ind2]>>\n\t\t<<endif>>\n\n\t\t/% then vowel %/\n\t\t<<set $ind3 = random(0, $vowels.length - 1)>>\n\t\t<<set $dbg += ", " + $ind3>>\n\t\t<<set $mph += $vowels[$ind3]>>\n\t<<else>>\n\n\t\t/% first vowel %/\n\t\t<<if $iscv eq 0>>\n\t\t\t<<set $ind4 = random(0, $vowels.length - 1)>>\n\t\t\t<<set $dbg += $ind4>>\n\t\t\t<<set $mph = $vowels[$ind4]>>\n\t\t<<else>>\n\t\t\t<<set $ind5 = random(0, $vcluster.length - 1)>>\n\t\t\t<<set $dbg += $ind5>>\n\t\t\t<<set $mph = $vcluster[$ind5]>>\n\t\t<<endif>>\n\n\t\t/% then consonant %/\n\t\t<<set $ind6 = random(0, $consonants.length - 1)>>\n\t\t<<set $dbg += ", " + $ind6>>\n\t\t<<set $mph += $consonants[$ind6]>>\n\t<<endif>>\n\n\t<<set $masharr.push($mph)>>\n\n<<endsilently>><<print $mph>>
by Hazel
<<silently>>\n\t<<set $result = ''>>\n\n\t<<if $si lt 0 or $pi lt 0>>\n\t\t<<set $pi = random(0, $prefix.length - 1)>>\n\t\t<<set $si = random(0, $suffix.length - 1)>>\n\t\t\n\t\t<<set $atemp = ''>>\n\t\t\n\t\t<<if $useaffix>>\n\t\t\t<<set $ai = random(0, $affix.length - 1)>>\n\t\t\t<<set $atemp = $affix[$ai]>>\n\t\t<<endif>>\n\n\t\t<<set $result = $prefix[$pi] + $atemp + $suffix[$si]>>\n\n\t\t<<set $pi = -1>>\n\t\t<<set $ai = -1>>\n\t\t<<set $si = -1>>\n\t<<endif>>\n<<endsilently>>
/* Your story will use the CSS in this passage to style the page.\nGive this passage more tags, and it will only affect passages with those tags.\nExample selectors: */\n\nbody {\n\t/* This affects the entire page */\n\tbackground-color: #fffff0;\n\tcolor: #303030;\n\t\n}\n.passage {\n\t/* This only affects passages */\n\tcolor: #301030;\n\tfont-size: 14pt;\n\t\n}\n.passage a {\n\t/* This affects passage links */\n\tcolor: #601060;\n\t\n}\n.passage a:hover {\n\t/* This affects links while the cursor is over them */\n\tcolor: #601060;\n\t\n}
!Quick Name Gen\n!!View name parts\n\n''Prefixes'': <<print $prefix>>\n\n''Affixes'': <<print $affix>>\n\n''Suffixes'': <<print $suffix>>\n\n[[Back|Menu]].