<<silently>>\n<<set $count = parameter(0).length / 2>>\n<<set $skip = rand(0, 1)>>\n<<set $rand = random(0, $count - 1)>>\n<<set $rand = $rand * 2 + $skip>>\n<<set $text = parameter(0)[$rand]>>\n<<endsilently>>//<<print $text>>//

<<silently>>\n<<set $path = "">>\n<<set $arr1 = 0>>\n<<set $arr2 = 0>>\n<<set $arr3 = 0>>\n<<endsilently>>Welcome to 7KPP Clue. \n\nThis is a random prompt generator for fanfic, scenarios, memes, or whatever you please. \n\nPick a scenario: \n\n* [[Clue style]] - two characters in a room. \n* [[Regular prompt]] - two characters and a trope. \n* [[Generate a character]] - random MC.

<<silently>>\n<<set $ind = random(0, 5)>>\n<<set $bg = $backgrounds[$ind]>>\n<<set $rest = $restrictions[$ind]>>\n<<endsilently>>Generating a random MC... \n\nYour character is: <<RandomName>> of ''<<print $bg>>''\n\nSkills: <<GenerateRestricted $skills $rest>> and <<GenerateRestricted $skills $rest>>\n\nWeaknesses: <<GenerateRestricted $weak $rest>> and <<GenerateRestricted $weak $rest>>\n\nKnowledge: <<GenerateRestricted $knowledge $rest>> and <<GenerateRestricted $knowledge $rest>>\n\nPersonality: <<GenerateSkip $personality>> and <<GenerateSkip $personality>>\n\n[[Back to menu|Begin]] or [[generate another|Generate a character]].

<<silently>>\n<<set $pi = random(0, $prefix.length - 1)>>\n<<set $si = random(0, $suffix.length - 1)>>\n<<set $name = $prefix[$pi] + $suffix[$si]>>\n<<endsilently>>''<<print $name>>''

/% 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<<set $castle = ["Gazebo", "Cliffs", "Forbidden wing", "Gardens", "Staff quarters", "Parlor", "Small library", "Your room", "Guest hall", "Ballroom", "Music room", "Practice room", "Grand library"]>>\n\n<<set $approved = ["Anaele", "Clarmont", "Emmett", "Hamin", "Lisle", "Lyon", "Zarad"]>>\n\n<<set $delegates = $approved.concat("Avalie", "Blain", "Cordelia", "Gisette", "Jarrod", "Penelope")>>\n<<set $delegates.sort()>>\n\n<<set $secret = ["Gisette", "Jarrod", "Jasper", "Ria", "Woodly"]>>\n\n<<set $romances = $approved.concat($secret)>>\n<<set $romances.sort()>>\n\n<<set $backgrounds = ["Arland (sheltered princess)", "Corval (court lady)", "Hise (pirate's daughter)", "Jiyel (minor scholar)", "Revaire (ambitious widow)", "Wellin (tomboy countess)"]>>\n\n<<set relationships = ["friendship", "respect", "romance", "rivalry"]>>\n\n<<set $tropes = ["tragic backstory", "love confession", "break-up", "keeping secrets from each other", "flirty banter", "comedic kidnapping", "first kiss", "dancing", "soul-bond", "sex pollen", "jealousy", "love triangle", "corsets", "love letters", "gift-giving", "caught in the rain", "unrequited affection", "seduction", "cohabitation", "wedding", "evil twin", "hurt/comfort", "trust issues", "dirty talk", "dystopia", "mermaids", "wing fic", "drinking to excess", "sedoretu", "SCIENCE!!", "contraceptives", "canon-divergence A/U"]>>\n\n<<set $skills = ["charm", "eloquence", "beauty", "leadership", "self-defense", "charisma", "manipulation", "courage", "intelligence", "etiquette", "grace", "poise", "cunning"]>>\n\n<<set $weak = ["charm", "eloquence", "beauty", "leadership", "charisma", "courage", "intelligence", "grace"]>>\n\n<<set $sheltered = ["self-defense", "manipulation", "courage", "cunning", "warfare", "overt", "cynical", "autonomous", "ambitious", "innovative"]>>\n\n<<set $tomboy = ["manipulation", "etiquette"]>>\n\n<<set $ambitious = ["unassuming"]>>\n\n<<set $scholar = ["emotional", "intelligence"]>>\n\n<<set $pirate = ["traditional"]>>\n\n<<set $restrictions = [$sheltered, [], $pirate, $scholar, $ambitious, $tomboy]>>\n\n<<set $knowledge = ["history", "politics", "street smarts", "warfare", "practical", "academic", "people", "plants and animals"]>>\n\n<<set $personality = ["arrogant", "humble", "selfish", "noble", "overt", "subtle", "sensible", "imaginative", "introverted", "social", "autonomous", "dependent", "indifferent", "compassionate", "logical", "emotional", "cynical", "romantic", "unassuming", "ambitious", "innovative", "spontaneous", "methodical", "immoral", "ethical"]>>\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"]>>

<<silently>>\n<<set $arr3 = $tropes>>\n\n<<if $path neq "Prompt">\n\t<<set $arr1 is 0>>\n\t<<set $arr2 is 0>>\n\t<<set $path is "Prompt">>\n<<endif>>\n<<endsilently>>Generating a regular, trope-based prompt... \n\n<<if $arr1 eq 0>>Choose which characters: \n* [[Approved romance|Regular prompt][$arr1 = $backgrounds, $arr2 = $approved]]\n* [[Secret romance|Regular prompt][$arr1 = $backgrounds, $arr2 = $secret]]\n* [[Any kind of romance|Regular prompt][$arr1 = $backgrounds, $arr2 = $romances]]\n* [[Platonic|Regular prompt][$arr1 = $backgrounds, $arr2 = $delegates]] (any delegate)\n* [[NPC|Regular prompt][$arr1 = $delegates, $arr2 = $delegates]] (two delegates)\n<<else>>\s\n<<display "Generate">>Prompt: ''<<print $res1>>'' and ''<<print $res2>>'' - ''<<print $res3>>''. \n\n[[Back to menu|Begin]] or [[generate another|Regular prompt]]. \n<<endif>>

version 1.2.2

<<silently>>\n<<set $rand = random(0, parameter(0).length - 1)>>\n<<set $text = parameter(0)[$rand]>>\n<<set $found = parameter(1).indexOf($text)>>\n\n<<if $found gt -1>>\n<<set $rand = random(0, parameter(0).length - 1)>>\n<<set $text = parameter(0)[$rand]>>\n<<endif>>\n<<endsilently>>//<<print $text>>//

!Vail Isle Cluedo\n\n!!a 7KPP random prompt generator\n\n[[Begin]].

/* 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: #fee;\n\tcolor: #555;\n\tfont-family: Lucida Console, Calibri, sans serif;\n\tfont-size: 14pt;\n\t\n}\n.passage {\n\t/* This only affects passages */\n\tcolor: #955;\n\t\n}\n.passage a {\n\t/* This affects passage links */\n\tcolor: #622;\n\t\n}\n.passage a:hover {\n\t/* This affects links while the cursor is over them */\n\tcolor: #c99;\n\t\n}\n\n.passage h1 {\n\tfont-size: 24pt;\n\tfont-weight: normal;\n}\n\n.passage h2 {\n\tfont-size: 16pt;\n\tfont-weight: normal;\n}

<<silently>>\n<<set $arr3 = $castle>>\n\n<<if $path neq "Clue">\n\t<<set $arr1 is 0>>\n\t<<set $arr2 is 0>>\n\t<<set $path is "Clue">>\n<<endif>>\n<<endsilently>>Generating a Clue-style prompt... \n\n<<if $arr1 eq 0>>Choose which characters: \n\n* [[Approved romance|Clue style][$arr1 = $backgrounds, $arr2 = $approved]]\n* [[Secret romance|Clue style][$arr1 = $backgrounds, $arr2 = $secret]]\n* [[Any kind of romance|Clue style][$arr1 = $backgrounds, $arr2 = $romances]]\n* [[Platonic|Clue style][$arr1 = $backgrounds, $arr2 = $delegates]] (any delegate)\n* [[NPC|Clue style][$arr1 = $delegates, $arr2 = $delegates]] (two delegates)\n<<else>>\s\n<<display "Generate">>It was ''<<print $res1>>'' and ''<<print $res2>>'', in the ''<<print $res3>>''! \n\n[[Back to menu|Begin]] or [[generate another|Clue style]]. \n<<endif>>

7KPP Prompt Generator

not the Matchmaker

<<silently>>\n<<set $ind = random(0, $arr1.length - 1)>>\n<<set $res1 = $arr1[$ind]>>\n\n<<set $ind = random(0, $arr2.length - 1)>>\n<<set $res2 = $arr2[$ind]>>\n\n<<set $ind = random(0, $arr3.length - 1)>>\n<<set $res3 = $arr3[$ind]>>\n<<endsilently>>