<<silently>>\n<<set $arr1 = 0>>\n<<set $arr2 = 0>>\n<<set $arr3 = 0>>\n<<endsilently>>''7KPP Random Pairing Generator''\n\nThis is a random prompt generator for fanfic, scenarios, memes, or whatever you please. \n\nPick a scenario: \n* [[F x F|Pairing][$arr1 = $female, $arr2 = $female]]\n* [[F x M|Pairing][$arr1 = $female, $arr2 = $male]]\n* [[M x M|Pairing][$arr1 = $male, $arr2 = $male]]\n* [[F x any|Pairing][$arr1 = $female, $arr2 = $female.concat($male)]]\n* [[M x any|Pairing][$arr1 = $male, $arr2 = $female.concat($male)]]\n\nOr gender-neutral MC-base pairings: \n* [[MC x F|Pairing][$arr1 = $backgrounds, $arr2 = $female]]\n* [[MC x M|Pairing][$arr1 = $backgrounds, $arr2 = $male]]\n* [[MC x any|Pairing][$arr1 = $backgrounds, $arr2 = $female.concat($male)]]\n* [[MC x MC|Pairing][$arr1 = $backgrounds, $arr2 = $backgrounds]]
/% 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 $female = ["Anaele", "Avalie", "Blackthorn", "Constance", "Cordelia", "Estelle", "Gisette", "Greer", "Imogen", "Jaslen", "Katyia", "Leala", "Matchmaker", "Penelope", "Ria", "Sayra", "Mrs. White", "Yvette"]>>\n<<set $male = ["Aamir", "Adalric", "Blain", "Clarmont", "Emmett", "Emroy", "Falon", "Hamin", "Jarrod", "Jasper", "Kade", "Lee", "Lisle", "Lyon", "Master Jorges", "Woodly", "Zarad"]>>\n\n<<set $backgrounds = ["Arland Princess", "Corval Lady", "Hise Pirate", "Jiyel Scholar", "Revaire Widow", "Wellin Countess", "Weaver", "Historian", "Rebel"]>>\n\n
Generating a random pairing... \n<<display "Generate">>\n!!<<print $res1>> + <<print $res2>>\n\n//A pairing does not have to be romantic! Maybe try writing the characters as friends, rivals, allies, etc...//\n\n[[Back to menu|Begin]] or [[generate another|Pairing]].
version 1.0
!Random Pairing Generator\n\n!!an extra-flexible 7KPP random 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: 11pt;\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}
7KPP Random Pairing 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<<if $arr3.length > 0>>\n\t<<set $ind = random(0, $arr3.length - 1)>>\n\t<<set $res3 = $arr3[$ind]>>\n<<endif>>\n<<endsilently>>