1
0

boy_likes 106 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411
  1. # boy_likes
  2. gs 'boyStat', $lover[lover_number]
  3. !!$boybody = 1 - tall, 2 - average, 3 - short
  4. $boybody = $loverbody[lover_number]
  5. !!$boybod = 1 - thin, 2 - athletic, 3 - chunky, 4 - fat
  6. $boybod = $loverbod[lover_number]
  7. $boyface = $loverface[lover_number]
  8. !! sexual force of 0 prior_to 2
  9. silaVag = loversilaVag[lover_number]
  10. !!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
  11. finance = loverfinance[lover_number]
  12. !!check in appearance, a parameter vnesh
  13. vneshBoy = vneshlover[lover_number]
  14. $boyClo = $loverClo[lover_number]
  15. !!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100, 3 no pref
  16. figurBoy = figurlover[lover_number]
  17. !!0 - chest less or equal 3, 1 breast 3-4, 2 breasts bigger 4
  18. titBoy = titlover[lover_number]
  19. !!favorite hair color 0 - black, 1 - brown, 2 - Redhead, 3 - blonde
  20. hairBoy = hairlover[lover_number]
  21. !!character 0 - soft, 1 -norm 2 - aggressor
  22. harakBoy = haraklover[lover_number]
  23. !!perversity
  24. izvrat = loverizvrat[lover_number]
  25. husb_birth_year = year - boyage
  26. husbAge = boyage
  27. !!new preferences
  28. !!renaming perversity constant
  29. pervConstant = izvrat
  30. !!This is for clothing type preference
  31. !!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
  32. clotTypePrefTmp = clotTypePref[lover_number]
  33. !!This is for the quality of clothing
  34. !! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
  35. clotQualPrefTmp = clotQualPref[lover_number]
  36. !!Need to add modifiers based on breast size, where larger breasts end up forcing the player to show more cleavage than those with smaller breasts.
  37. !! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring
  38. !! The breast size must be adjusted either when the action is being calculeted or we can base it on their ideal breast size :titBoy + 0/3 depending on the players breast size
  39. !! How much they want to see your chest USE THIS FOR NOW
  40. !! 0 - no preference, 1 - 1 neckline , 2 - 2 or moderate, 3 - 3 to 4 or heavy to severe
  41. !! It doesn''t matter if your poor or rich, everyone loves tits.
  42. clotTopPrefTmp = clotTopPref[lover_number]
  43. !!THIS IS THE EQUATION FOR THE TIT ADDITION
  44. !! This is for pants and skirt shortness and will be grouped together as such.
  45. !! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 4 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
  46. bottShorPrefTmp = bottShorPref[lover_number]
  47. !! This is for clothes thinness.
  48. !! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
  49. !! I see the moderate to really thin overlapping. Its intentional.
  50. clotThinPrefTmp = clotThinPref[lover_number]
  51. !!This is to find out if they want you to wear bimbo clothing
  52. !! 0 - no preference, 1 - Prefers bimbo clothing.
  53. bimbPrefTmp = bimbPref[lover_number]
  54. !!This is to find out if they want you to wear piercings.
  55. !! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.
  56. pierPrefTmp = pierPref[lover_number]
  57. !!This is to find out if they want you to have tattoos.
  58. !! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
  59. tattPrefTmp = tattPref[lover_number]
  60. !!This is to find out how big they want your lips.
  61. !! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
  62. lipsPrefTmp = lipsPref[lover_number]
  63. !!This is to find out how big they want YOU.
  64. !! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
  65. !! Notice how this one overlaps. I believe that it should because changing ones weight is very hard.
  66. bodyPrefTmp = bodyPref[lover_number]
  67. !!This is to find out how much makeup they want you to wear.
  68. !! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
  69. makePrefTmp = makePref[lover_number]
  70. !! This is to see if they like a ditz, average, or a smartypants
  71. !!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence.
  72. IQPrefTmp = IQPref[lover_number]
  73. !!This is the new hair color preference
  74. !! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
  75. !!Putting his preferences into words
  76. !!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
  77. if clotTypePrefTmp = 0:
  78. $clotTypePrefTmp = ''
  79. elseif clotTypePrefTmp = 1:
  80. $clotTypePrefTmp = 'cheap'
  81. elseif clotTypePrefTmp = 2:
  82. $clotTypePrefTmp = 'average'
  83. elseif clotTypePrefTmp = 3:
  84. $clotTypePrefTmp = 'formal'
  85. elseif clotTypePrefTmp = 4:
  86. $clotTypePrefTmp = 'fetish'
  87. end
  88. !! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
  89. if clotQualPrefTmp = 0:
  90. $clotQualPrefTmp = 'any type of'
  91. elseif clotQualPrefTmp = 1:
  92. $clotQualPrefTmp = 'anything but expensive'
  93. elseif clotQualPrefTmp = 2:
  94. $clotQualPrefTmp = 'expensive'
  95. end
  96. !! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring
  97. if clotTopPrefTmp = 0:
  98. $clotTopPrefTmp = 'any amount of'
  99. elseif clotTopPrefTmp = 1:
  100. $clotTopPrefTmp = 'a little bit of'
  101. elseif clotTopPrefTmp = 2:
  102. $clotTopPrefTmp = 'a lot of'
  103. elseif clotTopPrefTmp = 3:
  104. $clotTopPrefTmp = 'a huge amount of'
  105. end
  106. !! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 4 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
  107. if bottShorPrefTmp = 0:
  108. $bottShorPrefTmp= 'any length'
  109. elseif bottShorPrefTmp = 1:
  110. $bottShorPrefTmp= 'modest length'
  111. elseif bottShorPrefTmp = 2:
  112. $bottShorPrefTmp= 'slightly short length'
  113. elseif bottShorPrefTmp = 3:
  114. $bottShorPrefTmp= 'really short length'
  115. end
  116. !! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
  117. if clotThinPrefTmp = 0:
  118. $clotThinPrefTmp= ''
  119. elseif clotThinPrefTmp = 1:
  120. $clotThinPrefTmp= 'thick'
  121. elseif clotThinPrefTmp = 2:
  122. $clotThinPrefTmp= 'a little thin'
  123. elseif clotThinPrefTmp = 3:
  124. $clotThinPrefTmp= 'really thin or even see through'
  125. end
  126. !! 0 - no preference, 1 - Prefers bimbo clothing.
  127. if bimbPrefTmp = 0:
  128. $bimboPref = ''
  129. else
  130. $bimboPref = 'a bimbo'
  131. end
  132. !! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.
  133. if pierPrefTmp = 0:
  134. $pierPrefTmp = 'any amount'
  135. elseif pierPrefTmp = 1:
  136. $pierPrefTmp = 'a couple'
  137. elseif pierPrefTmp = 2:
  138. $pierPrefTmp = 'a good amount'
  139. elseif pierPrefTmp = 3:
  140. $pierPrefTmp = 'a lot'
  141. end
  142. !! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
  143. if tattPrefTmp = 0:
  144. $tattPrefTmp = 'any amount'
  145. elseif tattPrefTmp = 1:
  146. $tattPrefTmp = 'a couple'
  147. elseif tattPrefTmp = 2:
  148. $tattPrefTmp = 'a good amount'
  149. elseif tattPrefTmp = 3:
  150. $tattPrefTmp = 'a lot'
  151. end
  152. !! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
  153. if lipsPrefTmp = 0:
  154. $lipsPrefTmp = 'any sized lips'
  155. elseif lipsPrefTmp = 1:
  156. $lipsPrefTmp = 'average sized lips'
  157. elseif lipsPrefTmp = 2:
  158. $lipsPrefTmp = 'thick lips'
  159. end
  160. !!This is the Players lip description, this allows flexibility when writing
  161. if pcs_lip = 0:
  162. $lipDesc = 'thin'
  163. elseif pcs_lip = 1:
  164. $lipDesc = 'soft'
  165. elseif pcs_lip = 2:
  166. $lipDesc = 'plump'
  167. elseif pcs_lip = 3:
  168. $lipDesc = 'juicy'
  169. elseif pcs_lip = 4:
  170. $lipDesc = 'thick'
  171. end
  172. !! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
  173. if bodyPrefTmp = 0:
  174. $bodyPrefTmp = 'any weight'
  175. elseif bodyPrefTmp = 1:
  176. $bodyPrefTmp = 'should be skinny'
  177. elseif bodyPrefTmp = 2:
  178. $bodyPrefTmp = ' should be not to skinny or fat'
  179. elseif bodyPrefTmp = 3:
  180. $bodyPrefTmp = 'should be thick and curvy'
  181. end
  182. !! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
  183. if makePrefTmp = 0:
  184. $makePrefTmp = 'any amount of makeup'
  185. elseif makePrefTmp = 1:
  186. $makePrefTmp = 'a sutle amount of makeup'
  187. elseif makePrefTmp = 2:
  188. $makePrefTmp = ' a good amount of makeup'
  189. elseif makePrefTmp = 3:
  190. $makePrefTmp = 'a slutty amount of makeup'
  191. end
  192. !!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence.
  193. if IQPrefTmp = 0:
  194. $IQPrefTmp = 'nice'
  195. elseif IQPrefTmp = 1:
  196. $IQPrefTmp = 'ditzy'
  197. elseif IQPrefTmp = 2:
  198. $IQPrefTmp = 'with at least a little brain power'
  199. elseif IQPrefTmp = 3:
  200. $IQPrefTmp = 'genius'
  201. end
  202. !! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
  203. if hairPref = 0:
  204. $hairPref = 'black'
  205. elseif hairPref = 1:
  206. $hairPref = 'brown'
  207. elseif hairPref = 2:
  208. $hairPref = 'redhead'
  209. elseif hairPref = 3:
  210. $hairPref = 'blond'
  211. elseif hairPref = 4:
  212. $hairPref = 'any color'
  213. end
  214. !!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
  215. if titBoy = 0:
  216. $titBoy = 'petite breasts'
  217. elseif titBoy = 1:
  218. $titBoy = 'good sized breasts'
  219. elseif titBoy = 2:
  220. $titBoy = 'huge breasts'
  221. end
  222. !! manna , mannamax * 50 / 100:
  223. if pcs_hairbsh = 1 and curly > 0:
  224. loverrelation[lover_number] += 2 &
  225. $meetHair = 'Your hair looks very beautiful.'
  226. end
  227. if pcs_hairbsh = 1 and curly = 0:
  228. loverrelation[lover_number] += 1
  229. $meetHair = 'You have pretty hair today.'
  230. end
  231. if pcs_hairbsh = 0:
  232. loverrelation[lover_number] -= 1
  233. $meetHair = 'You look like you were in a hurry.'
  234. end
  235. !!This are generic things your boyfriend will call you based on how much he likes you.
  236. if loverrelation[lover_number] > 80:
  237. randchan = rand(0,2)
  238. if randchan = 0 and haraklover[lover_number] ! 0:
  239. $giveNick = 'angel'
  240. elseif randchan = 1:
  241. $giveNick = 'beautiful'
  242. elseif randchan = 2:
  243. $giveNick = 'love'
  244. end
  245. elseif loverrelation[lover_number] > 20:
  246. randchan = rand(0,1)
  247. if randchan = 0:
  248. $giveNick = 'babe'
  249. elseif randchan = 1:
  250. $giveNick = '<<$pcs_nickname>>'
  251. end
  252. else
  253. $giveNick = '<<$pcs_firstname>>'
  254. end
  255. if $ARGS[0] = 'clotTypePrefTmp':
  256. if clotTypePrefTmp ! 0:
  257. if haraklover[lover_number] = 0:
  258. if $clotTypePrefTmp = $clothingworntype:
  259. loverrelation[lover_number] += 1
  260. $meetClot = '<<$loverdesc[lover_number]>> says, "I like the type of clothing you are wearing <<$pcs_nickname>>. I think girls look amazing in <<$clotTypePrefTmp>> clothing."'
  261. elseif $clotTypePrefTmp = $clothingworntype:
  262. loverrelation[lover_number] -= 1
  263. $meetClot = '<<$loverdesc[lover_number]>> says nerviously, "I don''t mean to be rude <<$pcs_nickname>>, but I don''t think <<$clothingworntype>> clothing looks nice on girls. I like girls who wear <<$clotTypePrefTmp>> clothing."'
  264. end
  265. elseif haraklover[lover_number] = 1:
  266. if $clotTypePrefTmp = $clothingworntype:
  267. loverrelation[lover_number] += 2
  268. $meetClot = '<<$loverdesc[lover_number]>> says, "I think girls who where <<$clothingworntype>> clothing look amazing. I''m glad you chose that type of clothing."'
  269. elseif $clotTypePrefTmp = $clothingworntype:
  270. loverrelation[lover_number] -= 2
  271. $meetClot = '<<$loverdesc[lover_number]>> says cafefully, "<<$pcs_nickname>> to be honest, I don''t think <<$clothingworntype>> clothing looks good on you. I think <<$clotTypePrefTmp>> clothing would look better on you."'
  272. end
  273. elseif haraklover[lover_number] = 2:
  274. if $clotTypePrefTmp = $clothingworntype:
  275. loverrelation[lover_number] += 3
  276. $meetClot = '<<$loverdesc[lover_number]>> says, "<<$pcs_nickname>>, you look fucking hot in <<$clothingworntype>> clothes. It looks amazing on you!"'
  277. elseif $clotTypePrefTmp = $clothingworntype:
  278. loverrelation[lover_number] -= 3
  279. $meetClot = '<<$loverdesc[lover_number]>> says rather rudely, "I think girls who wear <<$clothingworntype>> type clothing looks like shit. Girls who wear <<$clotTypePrefTmp>> turn me on much more."'
  280. end
  281. end
  282. end
  283. if clotTypePrefTmp ! 0:
  284. '<<$meetClot>>'
  285. end
  286. end
  287. if $ARGS[0] = 'clotQualPrefTmp':
  288. if clotQualPrefTmp = 1:
  289. if PCloQuality > 4:
  290. if haraklover[lover_number] = 0:
  291. loverrelation[lover_number] -= 2
  292. $meetQualPref = '<<$loverdesc[lover_number]>> says that he thinks your clothing quality is way too high and he likes girls that where clothing that is <<$clotQualPrefTmp>>."'
  293. elseif haraklover[lover_number] = 0:
  294. loverrelation[lover_number] -= 1
  295. $meetQualPref = '<<$loverdesc[lover_number]>> says that he thinks your clothing quality is way too high and he likes girls that where clothing that is <<$clotQualPrefTmp>>."'
  296. elseif haraklover[lover_number] = 0:
  297. loverrelation[lover_number] -= 2
  298. $meetQualPref = '<<$loverdesc[lover_number]>> says that he thinks your clothing quality is way too high and he likes girls that where clothing that is <<$clotQualPrefTmp>>."'
  299. end
  300. elseif PCloQuality < 4:
  301. if haraklover[lover_number] = 0:
  302. loverrelation[lover_number] += 2
  303. $meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear expensive clothing."'
  304. elseif haraklover[lover_number] = 0:
  305. loverrelation[lover_number] += 1
  306. $meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear expensive clothing."'
  307. elseif haraklover[lover_number] = 0:
  308. loverrelation[lover_number] += 3
  309. $meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear expensive clothing."'
  310. end
  311. end
  312. elseif clotQualPrefTmp = 2:
  313. if PCloQuality < 5:
  314. if haraklover[lover_number] = 0:
  315. loverrelation[lover_number] -= 2
  316. $meetQualPref = '<<$loverdesc[lover_number]>> says he likes girls that wear <<clotQualPrefTmp>> clothing, and anything else just doesnt look good."'
  317. elseif haraklover[lover_number] = 1:
  318. loverrelation[lover_number] -= 1
  319. $meetQualPref = '<<$loverdesc[lover_number]>> says he likes girls that wear <<clotQualPrefTmp>> clothing, and anything else is trash."'
  320. elseif haraklover[lover_number] = 2:
  321. loverrelation[lover_number] -= 2
  322. $meetQualPref = '<<$loverdesc[lover_number]>> says he likes girls that wear <<clotQualPrefTmp>> clothing, and anything else is crap."'
  323. end
  324. elseif PCloQuality > 4:
  325. if haraklover[lover_number] = 0:
  326. loverrelation[lover_number] += 2
  327. $meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear cheap clothing."'
  328. elseif haraklover[lover_number] = 1:
  329. loverrelation[lover_number] += 1
  330. $meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear cheap clothing."'
  331. elseif haraklover[lover_number] = 2:
  332. loverrelation[lover_number] += 2
  333. $meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear cheap clothing."'
  334. end
  335. end
  336. end
  337. if clotQualPrefTmp ! 0:
  338. '<<$meetQualPref>>'
  339. end
  340. end
  341. if $ARGS[0] = 'clotTopPrefTmp':
  342. if clotTopPrefTmp = 1:
  343. if PCloTopCut > clotTopMax:
  344. if haraklover[lover_number] = 0:
  345. loverrelation[lover_number] -= 1
  346. $meetTopPref = '<<$loverdesc[lover_number]>> says shyly that he likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you kind of have to much for his taste."'
  347. elseif haraklover[lover_number] = 1:
  348. loverrelation[lover_number] -= 1
  349. $meetTopPref = '<<$loverdesc[lover_number]>> says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is way to much."'
  350. elseif haraklover[lover_number] = 2:
  351. loverrelation[lover_number] -= 2
  352. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
  353. end
  354. else
  355. if haraklover[lover_number] = 0:
  356. loverrelation[lover_number] += 1
  357. $meetTopPref = '<<$loverdesc[lover_number]>> says with a blush he likes that you are wearing clothes with only <<$clotTopPrefTmp>> cleavage."'
  358. elseif haraklover[lover_number] = 1:
  359. loverrelation[lover_number] += 1
  360. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says hes glad you wear clothes with only <<$clotTopPrefTmp>> cleavage."'
  361. elseif haraklover[lover_number] = 2:
  362. loverrelation[lover_number] += 2
  363. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes that you wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
  364. end
  365. end
  366. elseif clotTopPrefTmp = 2:
  367. if PCloTopCut < clotTopMin:
  368. if haraklover[lover_number] = 0:
  369. loverrelation[lover_number] -= 1
  370. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says shyly that he likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you have to little for his taste."'
  371. elseif haraklover[lover_number] = 1:
  372. loverrelation[lover_number] -= 1
  373. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and yours is way to little."'
  374. elseif haraklover[lover_number] = 2:
  375. loverrelation[lover_number] -= 2
  376. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
  377. end
  378. elseif PCloTopCut > clotTopMax:
  379. if haraklover[lover_number] = 0:
  380. loverrelation[lover_number] -= 1
  381. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says slightly embarressed that he likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you have to much for his taste."'
  382. elseif haraklover[lover_number] = 1:
  383. loverrelation[lover_number] -= 1
  384. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and your''s is way to much."'
  385. elseif haraklover[lover_number] = 2:
  386. loverrelation[lover_number] -= 2
  387. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
  388. end
  389. else
  390. if haraklover[lover_number] = 0:
  391. loverrelation[lover_number] += 1
  392. $meetTopPref = '<<$loverdesc[lover_number]>> says with a blush he likes that you are wearing clothes with only <<$clotTopPrefTmp>> cleavage."'
  393. elseif haraklover[lover_number] = 1:
  394. loverrelation[lover_number] += 1
  395. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says hes glad you wear clothes with only <<$clotTopPrefTmp>> cleavage."'
  396. elseif haraklover[lover_number] = 2:
  397. loverrelation[lover_number] += 2
  398. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes that you wear clothes with <<$clotTopPrefTmp>> cleavage."'
  399. end
  400. end
  401. elseif clotTopPrefTmp = 3:
  402. if PCloTopCut < clotTopMin:
  403. if haraklover[lover_number] = 0:
  404. loverrelation[lover_number] -= 1
  405. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says shyly that he likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you have to little for his taste."'
  406. elseif haraklover[lover_number] = 1:
  407. loverrelation[lover_number] -= 1
  408. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and yours is way to little."'
  409. elseif haraklover[lover_number] = 2:
  410. loverrelation[lover_number] -= 2
  411. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
  412. end
  413. else
  414. if haraklover[lover_number] = 0:
  415. loverrelation[lover_number] += 1
  416. $meetTopPref = '<<$loverdesc[lover_number]>> says with a blush he likes that you are wearing clothes with only <<$clotTopPrefTmp>> cleavage."'
  417. elseif haraklover[lover_number] = 1:
  418. loverrelation[lover_number] += 1
  419. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says hes glad you wear clothes with only <<$clotTopPrefTmp>> cleavage."'
  420. elseif haraklover[lover_number] = 2:
  421. loverrelation[lover_number] += 2
  422. $meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes that you wear clothes with <<$clotTopPrefTmp>> cleavage, and it makes your breats look great."'
  423. end
  424. end
  425. end
  426. if clotTopPrefTmp ! 0:
  427. '<<$meetTopPref>>'
  428. end
  429. end
  430. if $ARGS[0] = 'bottShorPrefTmp':
  431. if bottShorPrefTmp = 1:
  432. if PCloSkirt > bottShorMax or PCloPants > bottShorMax:
  433. if haraklover[lover_number] = 0:
  434. loverrelation[lover_number] -= 1
  435. $meetBottPref = '<<$loverdesc[lover_number]>> says shyly that he likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of show too much for his taste."'
  436. elseif haraklover[lover_number] = 1:
  437. loverrelation[lover_number] -= 1
  438. $meetBottPref = '<<$loverdesc[lover_number]>> says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look lewd."'
  439. elseif haraklover[lover_number] = 2:
  440. loverrelation[lover_number] -= 2
  441. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a slut."'
  442. end
  443. else
  444. if haraklover[lover_number] = 0:
  445. loverrelation[lover_number] += 1
  446. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says that he likes that you are wearing clothes with only <<$bottShorPrefTmp>> bottoms."'
  447. elseif haraklover[lover_number] = 1:
  448. loverrelation[lover_number] += 1
  449. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says hes glad you wear clothes with only <<$bottShorPrefTmp>> bottoms."'
  450. elseif haraklover[lover_number] = 2:
  451. loverrelation[lover_number] += 2
  452. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says he likes that you wear clothes with <<$bottShorPrefTmp>> bottoms, and anything else is trash."'
  453. end
  454. end
  455. elseif bottShorPrefTmp = 2:
  456. if (PCloSkirt < bottShorMin + PCloPants < bottShorMin) = 1:
  457. if haraklover[lover_number] = 0:
  458. loverrelation[lover_number] -= 1
  459. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says shyly that he likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of have too long of clothing for his taste."'
  460. elseif haraklover[lover_number] = 1:
  461. loverrelation[lover_number] -= 1
  462. $meetBottPref = '<<$loverdesc[lover_number]>> says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look prudish."'
  463. elseif haraklover[lover_number] = 2:
  464. loverrelation[lover_number] -= 2
  465. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a prude."'
  466. end
  467. elseif PCloSkirt > bottShorMax or PCloPants > bottShorMax:
  468. if haraklover[lover_number] = 0:
  469. loverrelation[lover_number] -= 1
  470. $meetBottPref = '<<$loverdesc[lover_number]>> says shyly that he likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of show too much for his taste."'
  471. elseif haraklover[lover_number] = 1:
  472. loverrelation[lover_number] -= 1
  473. $meetBottPref = '<<$loverdesc[lover_number]>> says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look lewd."'
  474. elseif haraklover[lover_number] = 2:
  475. loverrelation[lover_number] -= 2
  476. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a slut."'
  477. end
  478. else
  479. if haraklover[lover_number] = 0:
  480. loverrelation[lover_number] += 1
  481. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length, blushing, and says that he likes that you are wearing clothes with <<$bottShorPrefTmp>> bottoms."'
  482. elseif haraklover[lover_number] = 1:
  483. loverrelation[lover_number] += 1
  484. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says hes glad you wear clothes with <<$bottShorPrefTmp>> bottoms."'
  485. elseif haraklover[lover_number] = 2:
  486. loverrelation[lover_number] += 2
  487. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says he likes that you wear clothes with <<$bottShorPrefTmp>> bottoms, and anything else is trash."'
  488. end
  489. end
  490. elseif bottShorPrefTmp = 3:
  491. if (PCloSkirt < bottShorMin + PCloPants < bottShorMin) = 1:
  492. if haraklover[lover_number] = 0:
  493. loverrelation[lover_number] -= 1
  494. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says shyly that he likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of show too little for his taste."'
  495. elseif haraklover[lover_number] = 1:
  496. loverrelation[lover_number] -= 1
  497. $meetBottPref = '<<$loverdesc[lover_number]>> says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look prudish."'
  498. elseif haraklover[lover_number] = 2:
  499. loverrelation[lover_number] -= 2
  500. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a prude."'
  501. end
  502. else
  503. if haraklover[lover_number] = 0:
  504. loverrelation[lover_number] += 1
  505. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says with a blush he likes that you are wearing clothes with <<$bottShorPrefTmp>> bottoms, and that he thinks the length looks great on you."'
  506. elseif haraklover[lover_number] = 1:
  507. loverrelation[lover_number] += 1
  508. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says hes glad you wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a seductress."'
  509. elseif haraklover[lover_number] = 2:
  510. loverrelation[lover_number] += 2
  511. $meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says he likes that you wear clothes with <<$bottShorPrefTmp>> bottoms, it makes you look sexy."'
  512. end
  513. end
  514. end
  515. if bottShorPrefTmp ! 0:
  516. '<<$meetBottPref>>'
  517. end
  518. end
  519. if $ARGS[0] = 'clotThinPrefTmp':
  520. if clotThinPrefTmp = 1:
  521. if PCloThinness > clotThinMax:
  522. if haraklover[lover_number] = 0:
  523. loverrelation[lover_number] -= 2
  524. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and looking down he mumbles that it makes you look like a slut."'
  525. elseif haraklover[lover_number] = 1:
  526. loverrelation[lover_number] -= 1
  527. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and that it makes you look like a slut."'
  528. elseif haraklover[lover_number] = 2:
  529. loverrelation[lover_number] -= 2
  530. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and only whores where clothes that thin."'
  531. end
  532. elseif PCloThinness <= clotThinMax:
  533. if haraklover[lover_number] = 0:
  534. loverrelation[lover_number] += 1
  535. $meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
  536. elseif haraklover[lover_number] = 1:
  537. loverrelation[lover_number] += 1
  538. $meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
  539. elseif haraklover[lover_number] = 2:
  540. loverrelation[lover_number] += 2
  541. $meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
  542. end
  543. end
  544. elseif clotThinPrefTmp = 2:
  545. if PCloThinness > clotThinMax:
  546. if haraklover[lover_number] = 0:
  547. loverrelation[lover_number] -= 2
  548. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and looking down he mumbles that it makes you look like a slut."'
  549. elseif haraklover[lover_number] = 1:
  550. loverrelation[lover_number] -= 1
  551. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and that it makes you look like a slut."'
  552. elseif haraklover[lover_number] = 2:
  553. loverrelation[lover_number] -= 2
  554. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and only whores where clothes that thin."'
  555. end
  556. elseif PCloThinness < clotThinMin:
  557. if haraklover[lover_number] = 0:
  558. loverrelation[lover_number] -= 2
  559. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and looking down he mumbles that it makes you look like a prude."'
  560. elseif haraklover[lover_number] = 1:
  561. loverrelation[lover_number] -= 1
  562. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and that it makes you look like a prude."'
  563. elseif haraklover[lover_number] = 2:
  564. loverrelation[lover_number] -= 2
  565. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and only prude where clothes that thick."'
  566. end
  567. elseif PCloThinness >= clotThinMin and PCloThinness <= clotThinMax:
  568. if haraklover[lover_number] = 0:
  569. loverrelation[lover_number] += 1
  570. $meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
  571. elseif haraklover[lover_number] = 1:
  572. loverrelation[lover_number] += 1
  573. $meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
  574. elseif haraklover[lover_number] = 2:
  575. loverrelation[lover_number] += 2
  576. $meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
  577. end
  578. end
  579. elseif clotThinPrefTmp = 3:
  580. if PCloThinness < clotThinMin:
  581. if haraklover[lover_number] = 0:
  582. loverrelation[lover_number] -= 2
  583. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and looking down he mumbles that it makes you look like a prude."'
  584. elseif haraklover[lover_number] = 1:
  585. loverrelation[lover_number] -= 1
  586. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and that it makes you look like a prude."'
  587. elseif haraklover[lover_number] = 2:
  588. loverrelation[lover_number] -= 2
  589. $meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and only prude where clothes that thick."'
  590. end
  591. elseif PCloThinness >= clotThinMin:
  592. if haraklover[lover_number] = 0:
  593. loverrelation[lover_number] += 1
  594. $meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is perfect, and he says shyly he likes to look at your body''s curves."'
  595. elseif haraklover[lover_number] = 1:
  596. loverrelation[lover_number] += 1
  597. $meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is perfect, and he loves to see every curve of your body."'
  598. elseif haraklover[lover_number] = 2:
  599. loverrelation[lover_number] += 2
  600. $meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is perfect, and his eyes take in the curves of your body."'
  601. end
  602. end
  603. end
  604. if clotThinPrefTmp ! 0:
  605. '<<$meetClotThin>>'
  606. end
  607. end
  608. if $ARGS[0] = 'bimbPrefTmp':
  609. if bimbPrefTmp = 1:
  610. if PCloBimbo > 0:
  611. if haraklover[lover_number] = 0:
  612. loverrelation[lover_number] += 1
  613. $meetbimbPrefTmp = '<<$loverdesc[lover_number]>> tells you blushing that he likes that you look like a bimbo."'
  614. elseif haraklover[lover_number] = 1:
  615. loverrelation[lover_number] += 1
  616. $meetbimbPrefTmp = '<<$loverdesc[lover_number]>> tells you that your bimbo clothes look amazing on you."'
  617. elseif haraklover[lover_number] = 2:
  618. loverrelation[lover_number] += 2
  619. $meetbimbPrefTmp = '<<$loverdesc[lover_number]>> tells you that he thinks all girls should dress up as much as a bimbo as you are."'
  620. end
  621. elseif PCloBimbo = 0:
  622. loverrelation[lover_number] -= 1
  623. $meetbimbPrefTmp = '<<$loverdesc[lover_number]>> says you would look much better dressed up as a bimbo."'
  624. end
  625. end
  626. if bimbPrefTmp ! 0:
  627. '<<$meetbimbPrefTmp>>'
  628. end
  629. end
  630. if $ARGS[0] = 'pierPrefTmp':
  631. if pierPrefTmp = 1:
  632. if pierWearCount > pierPrefTmpMax:
  633. $meetpierPrefTmp = '<<$loverdesc[lover_number]>> sees your piercings and tells you that you have to many piercings and anything more then <<pierPrefTmpMax>> is too much.'
  634. else
  635. $meetpierPrefTmp = '<<$loverdesc[lover_number]>> is glad to see you wear very few piercings."'
  636. end
  637. elseif pierPrefTmp = 2:
  638. if pierWearCount < pierPrefTmpMin:
  639. $meetpierPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of piercings and says a woman should at least have <<pierPrefTmpMin>> piercings.'
  640. elseif pierWearCount > pierPrefTmpMax:
  641. $meetpierPrefTmp = '<<$loverdesc[lover_number]>> comments on your many piercings and says a woman should at most <<pierPrefTmpMax>> piercings.'
  642. else
  643. $meetpierPrefTmp = '<<$loverdesc[lover_number]>> is glad you wear a few piercings, stating makes any girl look good.'
  644. end
  645. elseif pierPrefTmp = 3:
  646. if pierWearCount < pierPrefTmpMin:
  647. $meetpierPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of piercings and says a woman should at least have <<pierPrefTmpMin>> piercings.'
  648. else
  649. $meetpierPrefTmp = '<<$loverdesc[lover_number]>> is glad you wear many piercings, stating makes any girl look good.'
  650. end
  651. end
  652. if pierPrefTmp ! 0:
  653. '<<$meetpierPrefTmp>>'
  654. end
  655. end
  656. if $ARGS[0] = 'tattPrefTmp':
  657. if tattPrefTmp = 1:
  658. if TattCount > tattPrefTmpMax:
  659. $meettattPrefTmp = '<<$loverdesc[lover_number]>> sees your tattoos and tells you that you have to many tattoos and anything more then <<tattPrefTmpMax>> is too much.'
  660. else
  661. $meettattPrefTmp = '<<$loverdesc[lover_number]>> is glad to see you have very few tattoos."'
  662. end
  663. elseif tattPrefTmp = 2:
  664. if TattCount < tattPrefTmpMin:
  665. $meettattPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of tattoos and says a woman should at least have <<tattPrefTmpMin>> tattoos.'
  666. elseif TattCount > tattPrefTmpMax:
  667. $meettattPrefTmp = '<<$loverdesc[lover_number]>> comments on your many tattoos and says a woman should at most <<tattPrefTmpMax>> tattoos.'
  668. else
  669. $meettattPrefTmp = '<<$loverdesc[lover_number]>> is glad you have a few tattoos, stating makes any girl look good.'
  670. end
  671. elseif tattPrefTmp = 3:
  672. if TattCount < tattPrefTmpMin:
  673. $meettattPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of tattoos and says a woman should at least have <<tattPrefTmpMin>> tattoos.'
  674. else
  675. $meettattPrefTmp = '<<$loverdesc[lover_number]>> is glad you have many tattoos, stating makes any girl look good.'
  676. end
  677. end
  678. if tattPrefTmp ! 0:
  679. '<<$meettattPrefTmp>>'
  680. end
  681. end
  682. if $ARGS[0] = 'lipsPrefTmp':
  683. !!This is to find out how big they want your lips.
  684. !! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
  685. if lipsPrefTmp = 1:
  686. if pcs_lip > lipsPrefTmpMax:
  687. $meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a quick comment on how he hates the size of your lips, for him its way to big.'
  688. elseif pcs_lip <= lipsPrefTmpMin:
  689. $meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a comment on how he likes that your lips aren''t outragously huge.'
  690. end
  691. elseif lipsPrefTmp = 2:
  692. if pcs_lip < lipsPrefTmpMin:
  693. $meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a quick comment on how he hates the size of your lips, for him they are not big enough.'
  694. elseif pcs_lip >= lipsPrefTmpMin:
  695. $meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a comment on how he likes that your lips are huge.'
  696. end
  697. end
  698. if lipsPrefTmp ! 0:
  699. '<<$meetlipsPrefTmp>>'
  700. end
  701. end
  702. if $ARGS[0] = 'makePrefTmp':
  703. if pcs_makeup ! 0 and makePrefTmp ! 0:
  704. if haraklover[lover_number] = 0:
  705. if pcs_hairbsh = 0:
  706. loverrelation[lover_number] -= 1
  707. $meetMake = '<<$loverdesc[lover_number]>> says timidly "I guess you had to leave in a hurry huh?"'
  708. elseif pcs_makeup ! makePrefTmp + 1 and makePrefTmp ! 0:
  709. loverrelation[lover_number] -= 1
  710. $meetMake = '<<$loverdesc[lover_number]>> says timidly "I don''t mean to be pushy, but I think girls should wear <<$makePrefTmp>>."'
  711. elseif pcs_makeup = makePrefTmp + 1:
  712. loverrelation[lover_number] += 1
  713. $meetMake = '<<$loverdesc[lover_number]>> looks at your face and says, "I love the way you did your makeup."'
  714. end
  715. elseif haraklover[lover_number] = 1:
  716. if pcs_hairbsh = 0:
  717. loverrelation[lover_number] -= 1
  718. $meetMake = '<<$loverdesc[lover_number]>> says questionly, "I guess you had to leave in a hurry?"'
  719. elseif pcs_makeup ! makePrefTmp + 1 and makePrefTmp ! 0:
  720. loverrelation[lover_number] -= 1
  721. $meetMake = '<<$loverdesc[lover_number]>> looks at your makeup and says, "I don''t mean to be rude, but I really like it when girls wear <<$makePrefTmp>>."'
  722. elseif pcs_makeup = makePrefTmp + 1:
  723. loverrelation[lover_number] += 1
  724. $meetMake = '<<$loverdesc[lover_number]>> looks at your face and says, "I love the way you did your makeup. It makes you look beautiful."'
  725. else
  726. $meetMake = '<<$loverdesc[lover_number]>> says sweetly, "It seems any way you do your makeup is beautiful."'
  727. end
  728. elseif haraklover[lover_number] = 2:
  729. if pcs_hairbsh = 0:
  730. loverrelation[lover_number] -= 1
  731. $meetMake = '<<$loverdesc[lover_number]>> says rudely, "Couldn''t take the time to brush your hair?"'
  732. elseif pcs_makeup ! makePrefTmp + 1 and makePrefTmp ! 0:
  733. loverrelation[lover_number] -= 1
  734. $meetMake = '<<$loverdesc[lover_number]>> says rather crudely," You should wear <<$makePrefTmp>> <<$pcs_nickname>>. Anything else and it makes you look ugly."'
  735. elseif pcs_makeup = makePrefTmp + 1:
  736. loverrelation[lover_number] += 1
  737. $meetMake = '<<$loverdesc[lover_number]>> says with a smile, "Now THATS how a woman should do their makeup, it looks sexy on you!"'
  738. else
  739. $meetMake = '<<$loverdesc[lover_number]>> says, "It seems any way you do your makeup is beautiful."'
  740. end
  741. end
  742. if makePrefTmp ! 0:
  743. '<<$meetMake>>'
  744. end
  745. elseif pcs_makeup = 0:
  746. if haraklover[lover_number] = 0:
  747. loverrelation[lover_number] -= 1
  748. $meetMake = '<<$loverdesc[lover_number]>> looks at you and nerviously says, "Your makeup is running."'
  749. elseif haraklover[lover_number] = 1:
  750. loverrelation[lover_number] -= 1
  751. $meetMake = '<<$loverdesc[lover_number]>> says in a disapproving tone, "Your makeup is running."'
  752. elseif haraklover[lover_number] = 2:
  753. loverrelation[lover_number] -= 1
  754. $meetMake = '<<$loverdesc[lover_number]>> says in a rude tone, "Your makeup is running."'
  755. else
  756. loverrelation[lover_number] -= 1
  757. $meetMake = '"Um, your makeup is running."'
  758. end
  759. '<<$meetMake>>'
  760. end
  761. end
  762. if $ARGS[0] = 'hairPref':
  763. if pcs_haircol ! hairPref and hairPref ! 4:
  764. if haraklover[lover_number] = 0:
  765. loverrelation[lover_number] -= 1
  766. $meetHair = '<<$loverdesc[lover_number]>> says timidly "I don''t mean to judge you, but I kind of like girls with <<$hairPref>> hair."'
  767. elseif haraklover[lover_number] = 1:
  768. loverrelation[lover_number] -= 1
  769. $meetHair = '<<$loverdesc[lover_number]>> says to you curtly, "I am your boyfriend and all, but girls with <<$pcs_haircol>> hair just doesn''t do it for me. I like girls with <<$hairPref>> hair."'
  770. elseif haraklover[lover_number] = 2:
  771. loverrelation[lover_number] -= 1
  772. $meetHair = '<<$loverdesc[lover_number]>> says with a candor tone, "You don''t look good at all with <<$pcs_haircol>> hair, but girls with <<$hairPref>> hair look amazing."'
  773. end
  774. elseif pcs_haircol = hairPref:
  775. if haraklover[lover_number] = 0:
  776. loverrelation[lover_number] += 1
  777. $meetHair = '<<$loverdesc[lover_number]>> says sweetly "I love the color of your hair <<$pcs_nickname>>, it likes pretty on you."'
  778. elseif haraklover[lover_number] = 1:
  779. loverrelation[lover_number] += 1
  780. $meetHair = '<<$loverdesc[lover_number]>> says, "I think you look amazing with <<$pcs_haircol>> hair. I love girls that have <<$pcs_haircol>> hair."'
  781. elseif haraklover[lover_number] = 2:
  782. loverrelation[lover_number] += 1
  783. $meetHair = '<<$loverdesc[lover_number]>> says smiling, "I can''t even begin to tell you <<$pcs_nickname>> how amazing you look with <<$pcs_haircol>> hair."'
  784. end
  785. end
  786. if hairPref ! 4:
  787. '<<$meetHair>>'
  788. end
  789. end
  790. if $ARGS[0] = 'IQPrefTmp':
  791. end
  792. if $ARGS[0] = 'titBoy':
  793. if titBoy = 0:
  794. if tits > titMax:
  795. if haraklover[lover_number] = 0:
  796. loverrelation[lover_number] -= 1
  797. $meetTits = '<<$loverdesc[lover_number]>> tells you shyly, "Hey <<$giveNick>>, you look amazing, but I like girls with <<$titBoy>>."'
  798. elseif haraklover[lover_number] = 1:
  799. loverrelation[lover_number] -= 1
  800. $meetTits = '<<$loverdesc[lover_number]>> tells you cafefully, "Hey <<$giveNick>>, you look amazing, but I like girls with <<$titBoy>>.'
  801. elseif haraklover[lover_number] = 2:
  802. loverrelation[lover_number] -= 1
  803. $meetTits = '<<$loverdesc[lover_number]>> tells you bluntly, "Hey <<$giveNick>>, you look amazing, but I like girls with <<$titBoy>>.'
  804. end
  805. elseif tits <= titMax:
  806. if haraklover[lover_number] = 0:
  807. loverrelation[lover_number] += 1
  808. $meetTits = '<<$loverdesc[lover_number]>> tells you slightly embarrassed, "Um <<$giveNick>>, your breasts make you look amazing."'
  809. elseif haraklover[lover_number] = 1:
  810. loverrelation[lover_number] += 1
  811. $meetTits = '<<$loverdesc[lover_number]>> says to you, "Hey <<$giveNick>>, want you to know, your breasts make you look amazing."'
  812. elseif haraklover[lover_number] = 2:
  813. loverrelation[lover_number] += 1
  814. $meetTits = '<<$loverdesc[lover_number]>> says to you, "Hey <<$giveNick>>, want you to know, your breasts make you look amazing."'
  815. end
  816. end
  817. elseif titBoy = 1:
  818. if tits < titMin:
  819. if haraklover[lover_number] = 0:
  820. loverrelation[lover_number] -= 1
  821. $meetTits = '<<$loverdesc[lover_number]>> tells you shyly, "Hey <<$giveNick>>, you look beautiful, but I like girls with <<$titBoy>>, and yours are just to small."'
  822. elseif haraklover[lover_number] = 1:
  823. loverrelation[lover_number] -= 1
  824. $meetTits = '<<$loverdesc[lover_number]>> cafefully says to you, "Hey <<$giveNick>>, you look beautiful, but girls shouldn''t have a flat chest. I like girls with <<$titBoy>>.'
  825. elseif haraklover[lover_number] = 2:
  826. loverrelation[lover_number] -= 1
  827. $meetTits = '<<$loverdesc[lover_number]>> bluntly says, "Hey <<$giveNick>>, you look beautiful, but your small breasts make you look like a dude. I like girls with <<$titBoy>>.'
  828. end
  829. elseif tits > titMax:
  830. if haraklover[lover_number] = 0:
  831. loverrelation[lover_number] -= 1
  832. $meetTits = '<<$loverdesc[lover_number]>> says to you, "<<$pcs_firstname>>, you look amazing, but I like girls with <<$titBoy>>, and yours are way to big.'
  833. elseif haraklover[lover_number] = 1:
  834. loverrelation[lover_number] -= 1
  835. $meetTits = '<<$loverdesc[lover_number]>> says to you, "<<$pcs_firstname>>, you look amazing, but I like girls with <<$titBoy>>, and yours are way to big.'
  836. elseif haraklover[lover_number] = 2:
  837. loverrelation[lover_number] -= 1
  838. $meetTits = '<<$loverdesc[lover_number]>> says, "<<$pcs_firstname>>, you look amazing, but I like girls with <<$titBoy>>, and yours make you look like a cow.'
  839. end
  840. elseif tits >= titMin and tits <= titMax:
  841. if haraklover[lover_number] = 0:
  842. loverrelation[lover_number] += 1
  843. $meetTits = '<<$loverdesc[lover_number]>> tells you slightly embarrassed, "H-Hey <<$giveNick>>, your breasts are beautiful."'
  844. elseif haraklover[lover_number] = 1:
  845. loverrelation[lover_number] += 1
  846. $meetTits = '<<$loverdesc[lover_number]>> says to you, " Have I ever told you <<$giveNick>> that your breasts are beautiful?"'
  847. elseif haraklover[lover_number] = 2:
  848. loverrelation[lover_number] += 1
  849. $meetTits = '<<$loverdesc[lover_number]>> says to you, " You know your breasts look amazing, right <<$giveNick>>?"'
  850. end
  851. end
  852. elseif titBoy = 2:
  853. if tits < titMin:
  854. if haraklover[lover_number] = 0:
  855. loverrelation[lover_number] -= 1
  856. $meetTits = '<<$loverdesc[lover_number]>> says quietly, "Hey <<$giveNick>>, I don''t mean to be mean, but I like girls with <<$titBoy>>, and yours are just to small."'
  857. elseif haraklover[lover_number] = 1:
  858. loverrelation[lover_number] -= 1
  859. $meetTits = '<<$loverdesc[lover_number]>> says with a very calm voice, "Hey <<$giveNick>>, I don''t mean to be an ass, but I like girls with <<$titBoy>>, and yours are just not big enough for my liking."'
  860. elseif haraklover[lover_number] = 2:
  861. loverrelation[lover_number] -= 1
  862. $meetTits = '<<$loverdesc[lover_number]>> says crudely, "Hey <<$giveNick>>, girls should have a nice big rack, and your chest does''t even come close."'
  863. end
  864. elseif tits >= titMin:
  865. if haraklover[lover_number] = 0:
  866. loverrelation[lover_number] += 1
  867. $meetTits = '<<$loverdesc[lover_number]>> tells you in slightly embarrassed voice, "H-Hey <<$giveNick>>, I think you look amazing with <<$titBoy>>."'
  868. elseif haraklover[lover_number] = 1:
  869. loverrelation[lover_number] += 1
  870. $meetTits = '<<$loverdesc[lover_number]>> tells you, "Oh <<$giveNick>>, I think you look amazing with <<$titBoy>>."'
  871. elseif haraklover[lover_number] = 2:
  872. loverrelation[lover_number] += 1
  873. $meetTits = '<<$loverdesc[lover_number]>> tells you, "Oh <<$giveNick>>, I love girls with <<$titBoy>>."'
  874. end
  875. end
  876. end
  877. '<<$meetTits>>'
  878. end
  879. if $ARGS[0] = 'figPref':
  880. if figurBoy = 0:
  881. if salocatnow > figurePrefMax:
  882. if haraklover[lover_number] = 0:
  883. loverrelation[lover_number] -= 1
  884. $meetFigurPref = '<<$loverdesc[lover_number]>> says he prefers a woman that is skinny, and you are kind of chunky.'
  885. elseif haraklover[lover_number] = 1:
  886. loverrelation[lover_number] -= 1
  887. $meetFigurPref = '<<$loverdesc[lover_number]>> says he prefers a woman that is thin, and you are not at all.'
  888. elseif haraklover[lover_number] = 2:
  889. loverrelation[lover_number] -= 1
  890. $meetFigurPref = '<<$loverdesc[lover_number]>> says he prefers a woman that is slender, and your weight makes you look ugly.'
  891. end
  892. elseif salocatnow <= figurePrefMax:
  893. if haraklover[lover_number] = 0:
  894. loverrelation[lover_number] += 1
  895. $meetFigurPref = '<<$loverdesc[lover_number]>> tells you he loves your slim figure.'
  896. elseif haraklover[lover_number] = 1:
  897. loverrelation[lover_number] += 1
  898. $meetFigurPref = '<<$loverdesc[lover_number]>> says your slim figure proves that slenderness is sexy.'
  899. elseif haraklover[lover_number] = 2:
  900. loverrelation[lover_number] += 1
  901. $meetFigurPref = '<<$loverdesc[lover_number]>> says your slim body makes you look like a goddess.'
  902. end
  903. end
  904. elseif figurBoy = 1:
  905. if salocatnow > figurePrefMax:
  906. if haraklover[lover_number] = 0:
  907. loverrelation[lover_number] -= 1
  908. $meetFigurPref = '<<$loverdesc[lover_number]>> tells you that you are to overweight, and he prefers a woman a bit skinnier.'
  909. elseif haraklover[lover_number] = 1:
  910. loverrelation[lover_number] -= 1
  911. $meetFigurPref = '<<$loverdesc[lover_number]>> says your weight is unappealing and he prefers a woman that is slimmer.'
  912. elseif haraklover[lover_number] = 2:
  913. loverrelation[lover_number] -= 1
  914. $meetFigurPref = '<<$loverdesc[lover_number]>> crudely says you look fat and you should lose some weight.'
  915. end
  916. elseif salocatnow < figurePrefMin:
  917. if haraklover[lover_number] = 0:
  918. loverrelation[lover_number] -= 1
  919. $meetFigurPref = '<<$loverdesc[lover_number]>> quietly says you could do to gain a few pounds.'
  920. elseif haraklover[lover_number] = 1:
  921. loverrelation[lover_number] -= 1
  922. $meetFigurPref = '<<$loverdesc[lover_number]>> says you should eat more, because your body is too thin.'
  923. elseif haraklover[lover_number] = 2:
  924. loverrelation[lover_number] -= 1
  925. $meetFigurPref = '<<$loverdesc[lover_number]>> says you look anarexic.'
  926. end
  927. else
  928. if haraklover[lover_number] = 0:
  929. loverrelation[lover_number] += 1
  930. $meetFigurPref = '<<$loverdesc[lover_number]>> says your figure is perfect in his eyes.'
  931. elseif haraklover[lover_number] = 1:
  932. loverrelation[lover_number] += 1
  933. $meetFigurPref = '<<$loverdesc[lover_number]>> says he loves how you are not too skinny or fat.'
  934. elseif haraklover[lover_number] = 2:
  935. loverrelation[lover_number] += 1
  936. $meetFigurPref = '<<$loverdesc[lover_number]>> says your body looks amazing.'
  937. end
  938. end
  939. elseif figurBoy = 2:
  940. if salocatnow < figurePrefMin:
  941. if haraklover[lover_number] = 0:
  942. loverrelation[lover_number] -= 1
  943. $meetFigurPref = '<<$loverdesc[lover_number]>> says he prefers a woman that is thicker, and you are too slim.'
  944. elseif haraklover[lover_number] = 1:
  945. loverrelation[lover_number] -= 1
  946. $meetFigurPref = '<<$loverdesc[lover_number]>> says he thinks a woman''s figure should be on the thick side, and your body is too skinny.'
  947. elseif haraklover[lover_number] = 2:
  948. loverrelation[lover_number] -= 1
  949. $meetFigurPref = '<<$loverdesc[lover_number]>> crudely tells you he prefers a woman that is thick, and you look anerexic.'
  950. end
  951. elseif salocatnow >= figurePrefMin:
  952. !!Yeah, yeah I made it overlap, a preference that you can change if you want.
  953. if haraklover[lover_number] = 0:
  954. loverrelation[lover_number] += 1
  955. $meetFigurPref = '<<$loverdesc[lover_number]>> tells you he loves your thick figure.'
  956. elseif haraklover[lover_number] = 1:
  957. loverrelation[lover_number] += 1
  958. $meetFigurPref = '<<$loverdesc[lover_number]>> says your curvy figure proves that women should have curves.'
  959. elseif haraklover[lover_number] = 2:
  960. loverrelation[lover_number] += 1
  961. $meetFigurPref = '<<$loverdesc[lover_number]>> says your curvy body makes you look like a goddess.'
  962. end
  963. end
  964. end
  965. if figurBoy ! 3:
  966. '<<$meetFigurPref>>'
  967. end
  968. end
  969. if $ARGS[0] = 'clothesPref':
  970. gs 'boy_likes', 'clotTypePrefTmp'
  971. gs 'boy_likes', 'clotQualPrefTmp'
  972. gs 'boy_likes', 'clotTopPrefTmp'
  973. gs 'boy_likes', 'bottShorPrefTmp'
  974. gs 'boy_likes', 'clotThinPrefTmp'
  975. gs 'boy_likes', 'bimbPrefTmp'
  976. end
  977. if $ARGS[0] = 'facePref':
  978. gs 'boy_likes', 'makePrefTmp'
  979. gs 'boy_likes', 'hairPref'
  980. end
  981. if $ARGS[0] = 'bodyPrefTmp':
  982. gs 'boy_likes', 'figPref'
  983. gs 'boy_likes', 'pierPrefTmp'
  984. gs 'boy_likes', 'tattPrefTmp'
  985. gs 'boy_likes', 'titBoy'
  986. gs 'boy_likes', 'lipsPrefTmp'
  987. end
  988. if $ARGS[0] = 'allPref':
  989. gs 'boy_likes', 'makePrefTmp'
  990. gs 'boy_likes', 'hairPref'
  991. gs 'boy_likes', 'lipsPrefTmp'
  992. gs 'boy_likes', 'clotTypePrefTmp'
  993. gs 'boy_likes', 'clotQualPrefTmp'
  994. gs 'boy_likes', 'clotTopPrefTmp'
  995. gs 'boy_likes', 'bottShorPrefTmp'
  996. gs 'boy_likes', 'clotThinPrefTmp'
  997. gs 'boy_likes', 'bimbPrefTmp'
  998. gs 'boy_likes', 'figPref'
  999. gs 'boy_likes', 'pierPrefTmp'
  1000. gs 'boy_likes', 'tattPrefTmp'
  1001. gs 'boy_likes', 'titBoy'
  1002. end
  1003. if $ARGS[0] = 'checkPier':
  1004. pierWearCount = 0
  1005. if pirsA > 0 and pirsA < 1000:
  1006. pierWearCount += 1
  1007. end
  1008. if pirsB > 0 and pirsB < 1000:
  1009. pierWearCount += 1
  1010. end
  1011. if pirsC > 0 and pirsC < 1000:
  1012. pierWearCount += 1
  1013. end
  1014. if pirsD > 0 and pirsD < 1000:
  1015. pierWearCount += 1
  1016. end
  1017. if pirsE > 0 and pirsE < 1000:
  1018. pierWearCount += 1
  1019. end
  1020. if pirsF > 0 and pirsF < 1000:
  1021. pierWearCount += 1
  1022. end
  1023. if pirsG > 0 and pirsG < 1000:
  1024. pierWearCount += 1
  1025. end
  1026. if pirsN > 0 and pirsN < 1000:
  1027. pierWearCount += 1
  1028. end
  1029. end
  1030. if $ARGS[0] = 'compliance':
  1031. if loverscompliance[lover_number] >= 0 and loverscompliance[lover_number] < 2:
  1032. 'You are a bit frustrated that he doesn''t like you for who you are.'
  1033. elseif loverscompliance[lover_number] < 3:
  1034. pcs_horny += 3
  1035. 'You have done this at a couple of times and you feel... Strange thinking about how you are changing to suit his wants.'
  1036. elseif loverscompliance[lover_number] < 4:
  1037. pcs_horny += 5
  1038. 'You can''t understand why you feel tingly about changing into his dream girl...'
  1039. elseif loverscompliance[lover_number] < 5:
  1040. pcs_horny += 7
  1041. 'Your mind briefly fantasizes about turning more and more into his ideal girl...'
  1042. elseif loverscompliance[lover_number] < 6:
  1043. pcs_horny += 8
  1044. 'You think to yourself, "He is my boyfriend, I guess it would make sense to try to be the best girl I can be for him..."'
  1045. elseif loverscompliance[lover_number] < 7:
  1046. pcs_horny += 10
  1047. 'You feel from the amount of times you have changed for him you would do anything to become his ideal girlfriend.'
  1048. end
  1049. end
  1050. if $ARGS[0] = 'changeHair':
  1051. 'As you arrive at the salon with <<$loverdesc[lover_number]>>, he heads over to the counter and tells something to the barber. The barber nods and comes towards you.'
  1052. '"So Ms.<<$pcs_lastname>>, you want to get your hair dyed <<$hairPref>> now is that right?"'
  1053. act 'Nod':
  1054. cla
  1055. 'Knowing there is no way to back out of this now, you meekly nod.'
  1056. '"Alrighty then, your hair will be <<$hairPref>> before you know it!"'
  1057. act 'Take a seat':
  1058. cla
  1059. if pcs_haircol ! hairPref: pcs_haircol = hairPref
  1060. dyefade = rand(35,42)
  1061. collength = pcs_hairlng
  1062. minut += 20
  1063. 'In less then 20 minutes you see that your hair''s original color has been changed to <<$hairPref>>.'
  1064. act 'Get up from chair and go to your boyfriend.':
  1065. cla
  1066. 'You walk towards your boyfriend with your new <<$hairPref>> hair and he tells you that you look amazing.'
  1067. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  1068. 'You then leave the salon and head home.'
  1069. loverscompliance[lover_number] += 1
  1070. act 'Continue': dynamic $go_home
  1071. exit
  1072. end
  1073. end
  1074. end
  1075. end
  1076. if $ARGS[0] = 'changeMake':
  1077. 'After you agree to change your makeup routine for him, you talk a bit with him for an hour and then head home.'
  1078. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  1079. minut += 60
  1080. if makeupSetting ! makePrefTmp: makeupSetting = makePrefTmp
  1081. loverscompliance[lover_number] += 1
  1082. act 'Continue': dynamic $go_home
  1083. exit
  1084. end
  1085. if $ARGS[0] = 'changePier':
  1086. 'Since you agreed to adjust your piercings to fit your boyfriend''s preferences he looks at any pre existing piercings you may have.'
  1087. if pierWearCount < pierPrefTmpMin and pierCount >= pierPrefTmpMin:
  1088. '<<$loverdesc[lover_number]>> sees that you have enough piercings already, and that you just need to wear them.'
  1089. act 'Let him add piercings':
  1090. cla
  1091. 'He pulls out a couple of piercings starts to put them on you.'
  1092. if pirsA = 1000 and pierWearCount < pierPrefTmpMin:
  1093. 'He asks you to stick out your tongue, then inserts a barbell into your tongue.'
  1094. pirsA = 1
  1095. pierWearCount += 1
  1096. end
  1097. if pirsB = 1000 and pierWearCount < pierPrefTmpMin:
  1098. 'He gently holds your lip, then inserts a ring.'
  1099. pirsB = 1
  1100. pierWearCount += 1
  1101. end
  1102. if pirsC = 1000 and pierWearCount < pierPrefTmpMin:
  1103. 'He sees you do not have earrings and proceeds to put rings onto your ears. '
  1104. pirsC = 1
  1105. pierWearCount += 1
  1106. end
  1107. if pirsD = 1000 and pierWearCount < pierPrefTmpMin:
  1108. 'He takes out a ring and then carefully inserts a ring through your nose.'
  1109. pirsD = 1
  1110. pierWearCount += 1
  1111. end
  1112. if pirsE = 1000 and pierWearCount < pierPrefTmpMin:
  1113. '<<$loverdesc[lover_number]>> moves to your eyebrow and proceeds to insert a barbell.'
  1114. pirsE = 1
  1115. pierWearCount += 1
  1116. end
  1117. if pirsN = 1000 and pierWearCount < pierPrefTmpMin:
  1118. 'He takes out a barbell and inserts it into your navel.'
  1119. pcs_horny += 2
  1120. pirsN = 1
  1121. pierWearCount += 1
  1122. end
  1123. if pirsF = 1000 and pierWearCount < pierPrefTmpMin:
  1124. '<<$loverdesc[lover_number]>> looks around, then pulls out a couple of nipple rings. You can tell it slightly turns him on as works his way up your shirt to put on the nipple rings.'
  1125. pcs_horny += 5
  1126. pirsF = 1
  1127. pierWearCount += 1
  1128. end
  1129. if pirsG = 1000 and pierWearCount < pierPrefTmpMin:
  1130. '<<$loverdesc[lover_number]>> gets close to your ear, "Don''t make a scene okay?", then he non chalontely slides his hand down to your labia, and inserts a ring.'
  1131. 'You cover your mouth as you let out a quick "Eep!", but in a second, its over.'
  1132. pcs_horny += 7
  1133. pirsG = 1
  1134. pierWearCount += 1
  1135. end
  1136. act '"All done!" <<$loverdesc[lover_number]>> says.':
  1137. cla
  1138. gs'stat'
  1139. 'You look at your body and examine it.'
  1140. if pierPrefTmp = 1:
  1141. 'This should not fire off how did he want to add stuff to nothing?'
  1142. elseif pierPrefTmp = 2:
  1143. 'You can tell he likes a girl with a bit more piercings, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
  1144. elseif pierPrefTmp = 3:
  1145. 'With this many piercings, you can feel many people will be exploring your body with their eyes, curious on where else you may have piercings.'
  1146. end
  1147. if haraklover[lover_number] = 0:
  1148. 'You can see he loves how many piercings you have, as he has a slight blush on his face.'
  1149. elseif haraklover[lover_number] = 1:
  1150. '<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
  1151. elseif haraklover[lover_number] = 2:
  1152. '<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
  1153. end
  1154. act 'Continue':
  1155. cla
  1156. 'After this you guys talk for an hour about various things, before he gets up and says he has to go.'
  1157. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  1158. loverscompliance[lover_number] += 1
  1159. minut += 60
  1160. act 'Continue': dynamic $go_home
  1161. exit
  1162. end
  1163. end
  1164. end
  1165. elseif pierWearCount > pierPrefTmpMax:
  1166. '<<$loverdesc[lover_number]>> says that you just need to remove the ones that you have and you will look amazing.'
  1167. act 'Let him remove some piercings.':
  1168. cla
  1169. if pirsN > 0 and pirsN < 1000 and pierWearCount < pierPrefTmpMin:
  1170. 'He takes the barbell out of your navel.'
  1171. pcs_horny += 2
  1172. pirsN = 1000
  1173. pierWearCount -= 1
  1174. end
  1175. if pirsE > 0 and pirsE < 1000 and pierWearCount > pierPrefTmpMax:
  1176. '<<$loverdesc[lover_number]>> He sees the piercing in your eyebrow and proceeds to remove it.'
  1177. pirsE = 1000
  1178. pierWearCount -= 1
  1179. end
  1180. if pirsB > 0 and pirsB < 1000 and pierWearCount > pierPrefTmpMax:
  1181. 'He carefully takes the ring out of your lips.'
  1182. pirsB = 1000
  1183. pierWearCount -= 1
  1184. end
  1185. if pirsF > 0 and pirsF < 1000 and pierWearCount > pierPrefTmpMax:
  1186. '<<$loverdesc[lover_number]>> looks around, then carefully uses his hands to take the nipple rings off your breasts.'
  1187. pcs_horny += 5
  1188. pirsF = 1000
  1189. pierWearCount -= 1
  1190. end
  1191. if pirsD > 0 and pirsD < 1000 and pierWearCount > pierPrefTmpMax:
  1192. 'He sees the nose ring that you are wearing and removes it.'
  1193. pirsD = 1000
  1194. pierWearCount -= 1
  1195. end
  1196. if pirsG > 0 and pirsG < 1000 and pierWearCount > pierPrefTmpMax:
  1197. '<<$loverdesc[lover_number]>> gets close to your ear, "Don''t make a scene okay?", then he non chalontely slides his hand down to your labia, and removes the ring there.'
  1198. 'You cover your mouth as you let out a quick "Eep!", but in a second, its over.'
  1199. pcs_horny += 7
  1200. pirsG = 1000
  1201. pierWearCount -= 1
  1202. end
  1203. if pirsA > 0 and pirsA < 1000 and pierWearCount > pierPrefTmpMax:
  1204. 'He asks you to stick out your tongue, then removes the barbell in your tongue.'
  1205. pirsA = 1000
  1206. pierWearCount -= 1
  1207. end
  1208. if pirsC > 0 and pirsC < 1000 and pierWearCount > pierPrefTmpMax:
  1209. 'He sees your earrings and quickly takes them off.'
  1210. pirsC = 1000
  1211. pierWearCount -= 1
  1212. end
  1213. act '"All done!" <<$loverdesc[lover_number]>> says.':
  1214. cla
  1215. minut += 60
  1216. gs'stat'
  1217. '<<$loverdesc[lover_number]>> says "All done!" and promptly hands you the piercings he took off.'
  1218. 'After this you guys talk for an hour about various things, before he gets up and says he has to go.'
  1219. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  1220. loverscompliance[lover_number] += 1
  1221. act 'Continue': dynamic $go_home
  1222. exit
  1223. end
  1224. end
  1225. elseif pierWearCount < pierPrefTmpMin and pierCount < pierPrefTmpMin:
  1226. '<<$loverdesc[lover_number]>> takes you by the hand and heads over to the piercing salon.'
  1227. act 'Enter the piercing salon':
  1228. cla
  1229. 'As you both arrive at the salon, he talks real quick to the tattoo artist and piercer.'
  1230. 'You see him hand the artist some money and the artist starts to walk up towards you.'
  1231. '"Your boyfriend says you want to get some piercings?", the artist asks.'
  1232. act 'Quietly nod':
  1233. cla
  1234. 'You know you can''t pull out now, so you meekly nod.'
  1235. 'The man shrugs and says "Head over to the chair over there okay?"'
  1236. act 'Head over to the chair':
  1237. cla
  1238. 'As you sit down you see the man come over with the various needles he needs to do his job.'
  1239. 'He sees you are a little bit concerned about the needles and laughs, "Don''t worry ma ''am, it will be all over before you know it!"'
  1240. 'He takes out a clean needle and proceeds with his job.'
  1241. act 'Continue':
  1242. cls
  1243. randchan = rand(0, 7)
  1244. if randchan = 0 and pirsC = 0:
  1245. if pirsC = 0 and pierCount < pierPrefTmpMin:
  1246. 'The artist takes a look at your unpierced ears, and with a quick sharp pain, pierces them.'
  1247. '<center><img <<$set_imgh>> src="images/pc/body/piercings/c.jpg"></center>'
  1248. pirsC = 1
  1249. pierCount += 1
  1250. pierWearCount += 1
  1251. gs 'pain', 7, 'ears', 'pierce'
  1252. end
  1253. elseif randchan = 1 and pirsA = 0:
  1254. if pirsA = 0 and pierCount < pierPrefTmpMin:
  1255. 'He asks you to stick out your tongue. You comply and then start to regret it as he pierces your tongue.'
  1256. '<center><img <<$set_imgh>> src="images/pc/body/piercings/a.jpg"></center>'
  1257. pirsA = 1
  1258. pierCount += 1
  1259. pierWearCount += 1
  1260. gs 'pain', 7, 'tongue', 'pierce'
  1261. end
  1262. elseif randchan = 2 and pirsB = 0:
  1263. if pirsB = 0 and pierCount < pierPrefTmpMin:
  1264. 'The artist gently holds your lip as he drives the needle through to pierce it.'
  1265. '<center><img <<$set_imgh>> src="images/pc/body/piercings/b.jpg"></center>'
  1266. pirsB = 1
  1267. pierCount += 1
  1268. pierWearCount += 1
  1269. gs 'pain', 7, 'lips', 'pierce'
  1270. end
  1271. elseif randchan = 3 and pirsD = 0:
  1272. if pirsD = 0 and pierCount < pierPrefTmpMin:
  1273. 'You feel a sharp pain in your nose as he pierces your nose.'
  1274. '<center><img <<$set_imgh>> src="images/pc/body/piercings/d.jpg"></center>'
  1275. pirsD = 1
  1276. pierCount += 1
  1277. pierWearCount += 1
  1278. gs 'pain', 7, 'nose', 'pierce'
  1279. end
  1280. elseif randchan = 4 and pirsE = 0:
  1281. if pirsE = 0 and pierCount < pierPrefTmpMin:
  1282. 'The artist moves to above your eyes and quickly pierces your eyebrow.'
  1283. '<center><img <<$set_imgh>> src="images/pc/body/piercings/e.jpg"></center>'
  1284. pirsE = 1
  1285. pierCount += 1
  1286. pierWearCount += 1
  1287. gs 'pain', 7, 'eyebrows', 'pierce'
  1288. end
  1289. elseif randchan = 5 and pirsN = 0:
  1290. if pirsN = 0 and pierCount < pierPrefTmpMin:
  1291. 'He positions himself to pierce your belly button. You feel a sharp pain through your navel as he pierces it.'
  1292. '<center><img <<$set_imgh>> src="images/pc/body/piercings/n.jpg"></center>'
  1293. pcs_horny += 2
  1294. pirsN = 1
  1295. pierCount += 1
  1296. pierWearCount += 1
  1297. gs 'pain', 7, 'tummy', 'pierce'
  1298. end
  1299. elseif randchan = 6 and pirsF = 0:
  1300. if pirsF = 0 and pierCount < pierPrefTmpMin:
  1301. 'He motions for you to lift up your shirt. After you do the man grabs your breasts rather softly and carefully pierces each nipple.'
  1302. !!'<center><img <<$set_imgh>> src="images/pc/body/piercings/f.jpg"></center>'
  1303. pcs_horny += 5
  1304. pirsF = 1
  1305. pierCount += 1
  1306. pierWearCount += 1
  1307. gs 'pain', 7, 'nipples', 'pierce'
  1308. end
  1309. elseif randchan = 7 and pirsG = 0:
  1310. if pirsG = 0 and pierCount < pierPrefTmpMin:
  1311. '"Ma ''am can you take off your bottoms?", the man says. You realize that he plans to pierce your labia and you reluctantly present yourself.'
  1312. 'You cover your mouth as you let out a quick "Eep!", as you feel a quick pain through your labia, but in a second, its over.'
  1313. !!'<center><img <<$set_imgh>> src="images/pc/body/piercings/g.jpg"></center>'
  1314. pcs_horny += 7
  1315. pirsG = 1
  1316. pierCount += 1
  1317. pierWearCount += 1
  1318. gs 'pain', 7, 'pubic', 'pierce'
  1319. end
  1320. end
  1321. gs'stat'
  1322. '"All done!", the artist says as he starts to clean up his various tools. He says to not irritate the places that he pierced and baby them for a week or two.'
  1323. 'Before you leave he puts on the various new piercings throughout your body.'
  1324. act 'Go back towards your boyfriend':
  1325. cla
  1326. 'As you go back towards him, he looks you up and down.'
  1327. if pierWearCount < pierPrefTmpMin and pierCount >= pierPrefTmpMin:
  1328. '"Now lets just add the rest of the piercings...", <<$loverdesc[lover_number]>> says.'
  1329. if pirsA = 1000 and pierWearCount < pierPrefTmpMin:
  1330. 'He asks you to stick out your tongue, then inserts a barbell into your tongue.'
  1331. pirsA = 1
  1332. pierWearCount += 1
  1333. end
  1334. if pirsB = 1000 and pierWearCount < pierPrefTmpMin:
  1335. 'He gently holds your lip, then inserts a ring.'
  1336. pirsB = 1
  1337. pierWearCount += 1
  1338. end
  1339. if pirsC = 1000 and pierWearCount < pierPrefTmpMin:
  1340. 'He sees you do not have earrings and proceeds to put rings onto your ears. '
  1341. pirsC = 1
  1342. pierWearCount += 1
  1343. end
  1344. if pirsD = 1000 and pierWearCount < pierPrefTmpMin:
  1345. 'He takes out a ring and then carefully inserts a ring through your nose.'
  1346. pirsD = 1
  1347. pierWearCount += 1
  1348. end
  1349. if pirsE = 1000 and pierWearCount < pierPrefTmpMin:
  1350. '<<$loverdesc[lover_number]>> moves to your eyebrow and proceeds to insert a barbell.'
  1351. pirsE = 1
  1352. pierWearCount += 1
  1353. end
  1354. if pirsN = 1000 and pierWearCount < pierPrefTmpMin:
  1355. 'He takes out a barbell and inserts it into your navel.'
  1356. pcs_horny += 2
  1357. pirsN = 1
  1358. pierWearCount += 1
  1359. end
  1360. if pirsF = 1000 and pierWearCount < pierPrefTmpMin:
  1361. '<<$loverdesc[lover_number]>> looks around, then pulls out a couple of nipple rings. You can tell it slightly turns him on as works his way up your shirt to put on the nipple rings.'
  1362. pcs_horny += 5
  1363. pirsF = 1
  1364. pierWearCount += 1
  1365. end
  1366. if pirsG = 1000 and pierWearCount < pierPrefTmpMin:
  1367. '<<$loverdesc[lover_number]>> gets close to your ear, "Don''t make a scene okay?", then he non-challontely slides his hand down to your labia, and inserts a ring.'
  1368. 'You cover your mouth as you let out a quick "Eep!", but in a second, its over.'
  1369. pcs_horny += 7
  1370. pirsG = 1
  1371. pierWearCount += 1
  1372. end
  1373. gs'stat'
  1374. '"There we go!", he says with a smile.'
  1375. if pierPrefTmp = 2:
  1376. 'You can tell he likes a girl with a bit more piercings, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
  1377. elseif pierPrefTmp = 3:
  1378. 'With this many piercings, you can feel many people will be exploring your body with their eyes, curious on where else you may have piercings.'
  1379. end
  1380. if haraklover[lover_number] = 0:
  1381. 'You can see he loves how many piercings you have, as he has a slight blush on his face.'
  1382. elseif haraklover[lover_number] = 1:
  1383. '<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
  1384. elseif haraklover[lover_number] = 2:
  1385. '<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
  1386. end
  1387. act 'Continue':
  1388. minut += 40
  1389. cla
  1390. 'After getting the piercings, you both part ways and head home.'
  1391. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  1392. minut += 20
  1393. act 'Continue': dynamic $go_home
  1394. exit
  1395. end
  1396. elseif pierWearCount >= pierPrefTmpMin:
  1397. '"There we go!", he says with a smile.'
  1398. if pierPrefTmp = 2:
  1399. 'You can tell he likes a girl with a bit more piercings, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
  1400. elseif pierPrefTmp = 3:
  1401. 'With this many piercings, you can feel many people will be exploring your body with their eyes, curious on where else you may have piercings.'
  1402. end
  1403. if haraklover[lover_number] = 0:
  1404. 'You can see he loves how many piercings you have, as he has a slight blush on his face.'
  1405. elseif haraklover[lover_number] = 1:
  1406. '<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
  1407. elseif haraklover[lover_number] = 2:
  1408. '<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
  1409. end
  1410. act 'Continue':
  1411. minut += 40
  1412. cla
  1413. 'After getting the piercings, you both part ways and head home.'
  1414. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  1415. loverscompliance[lover_number] += 1
  1416. minut += 20
  1417. act 'Continue': dynamic $go_home
  1418. exit
  1419. end
  1420. else
  1421. '"There we go!", he says with a smile.'
  1422. if pierPrefTmp > 1: 'You can tell he likes a girl with a more piercings and you can''t help but agree in some aspect, it does make you look a bit sexier.'
  1423. if haraklover[lover_number] = 0:
  1424. 'You can see he is pleased with your piercing, as he has a slight blush on his face.'
  1425. elseif haraklover[lover_number] = 1:
  1426. '<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
  1427. elseif haraklover[lover_number] = 2:
  1428. '<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "You look much better."'
  1429. end
  1430. act 'Continue':
  1431. minut += 40
  1432. cla
  1433. 'After getting the piercing, you both part ways and head home.'
  1434. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  1435. loverscompliance[lover_number] += 1
  1436. minut += 20
  1437. act 'Continue': dynamic $go_home
  1438. exit
  1439. end
  1440. end
  1441. end
  1442. end
  1443. end
  1444. end
  1445. end
  1446. else
  1447. 'This should not fire off. NO else if.'
  1448. end
  1449. end
  1450. if $ARGS[0] = 'changeTatt':
  1451. !! Arm Slot tatarm4, tatarm
  1452. !! ass slot tatass21, tatass
  1453. !! back slot tatback2, tatback
  1454. !! belly slot tatblly1, tatblly
  1455. !! Breast Slot tatbrst8, tatbrst
  1456. !! Chest Slot tatchst1, tatchst
  1457. !! face slot tatfce1, tatfce
  1458. !! Foot Slot tatankle5, tatankle
  1459. !! Leg Slot tatleg2, tatleg
  1460. !! Lip Slot tatlip1, tatlip
  1461. !! Neck Slot tatnck12, tatneck
  1462. !! Pubic Slot tatvag6, tatvag
  1463. !! Shoulder Slot tatshldr7 ,tatlech
  1464. !! Side Slot tatside9 ,tatside
  1465. !! Tramp Slot tatlowbck16 , tatupb
  1466. !! UnderBreast Slot tatundbreast5 , tatunder
  1467. !! Wrist Slot tatwrst8 , tatwrist
  1468. act 'Enter Tattoo Parlor':
  1469. cla
  1470. 'As you arrive at the tattoo parlor, <<$loverdesc[lover_number]>> looks you up and down to decide what needs to be done about your tattoos.'
  1471. if tattCount < tattPrefTmpMin:
  1472. 'You need some more tattoos, it would make you look so much better!'
  1473. 'He heads over to the counter and starts talks to the tattoo artist.'
  1474. 'You see him hand the artist some money and the artist starts to walk up towards you.'
  1475. '"Your boyfriend says you want to get some tattoos?", the artist asks.'
  1476. act 'Quietly nod':
  1477. cla
  1478. 'You know you can''t pull out now, so you meekly nod.'
  1479. 'The man shrugs and says "Head over to the chair over there okay?"'
  1480. act 'Head over to the chair':
  1481. cls
  1482. 'As you sit down you see the man come over with the various needles he needs to do his job.'
  1483. 'He sees you are a little bit concerned about the needles and laughs, "Don''t worry ma ''am, it will be all over before you know it!"'
  1484. 'He takes out a clean needle and proceeds with his job.'
  1485. randchan = rand(0, 17)
  1486. if randchan = 0 and tatarm = 0:
  1487. randchan = rand(1, 82)
  1488. !!randchan = 4
  1489. if tatarm = 0 and tattCount < tattPrefTmpMin:
  1490. tatarm = randchan
  1491. tattCount += 1
  1492. 'He gives you a tattoo on your arm.'
  1493. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/arms/tatarm<<tatarm>>.jpg"></center>'
  1494. end
  1495. elseif randchan = 1 and tatass = 0:
  1496. randchan = rand(1, 23)
  1497. !!randchan = 21
  1498. if tatass = 0 and tattCount < tattPrefTmpMin:
  1499. tatass = randchan
  1500. tattCount += 1
  1501. 'He gives you a tattoo on your ass.'
  1502. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/ass/tatass<<tatass>>.jpg"></center>'
  1503. end
  1504. elseif randchan = 2 and tatback = 0:
  1505. randchan = rand(1, 53)
  1506. !!randchan = 2
  1507. if tatback = 0 and tattCount < tattPrefTmpMin:
  1508. tatback = randchan
  1509. tattCount += 1
  1510. 'He gives you a tattoo on your back.'
  1511. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/back/tatback<<tatback>>.jpg"></center>'
  1512. end
  1513. !!
  1514. elseif randchan = 3 and tatblly = 0:
  1515. randchan = rand(1, 20)
  1516. !!randchan = 1
  1517. if tatblly = 0 and tattCount < tattPrefTmpMin:
  1518. tatblly = randchan
  1519. tattCount += 1
  1520. 'He gives you a tattoo on your belly.'
  1521. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/belly/tatblly<<tatblly>>.jpg"></center>'
  1522. end
  1523. elseif randchan = 4 and tatbrst = 0:
  1524. randchan = rand(1, 10)
  1525. !!randchan = 8
  1526. if tatbrst = 0 and tattCount < tattPrefTmpMin:
  1527. tatbrst = randchan
  1528. tattCount += 1
  1529. 'He gives you a tattoo on your breasts.'
  1530. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/breasts/tatbrst<<tatbrst>>.jpg"></center>'
  1531. end
  1532. elseif randchan = 5 and tatchst = 0:
  1533. randchan = rand(1, 15)
  1534. !!randchan = 1
  1535. if tatchst = 0 and tattCount < tattPrefTmpMin:
  1536. tatchst = randchan
  1537. tattCount += 1
  1538. 'He gives you a tattoo on your chest.'
  1539. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/chest/tatchst<<tatchst>>.jpg"></center>'
  1540. end
  1541. elseif randchan = 6 and tatfce = 0:
  1542. randchan = rand(1, 8)
  1543. !!randchan = 1
  1544. if tatfce = 0 and tattCount < tattPrefTmpMin:
  1545. tatfce = randchan
  1546. tattCount += 1
  1547. 'He gives you a tattoo on your face.'
  1548. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/face/tatfce<<tatfce>>.jpg"></center>'
  1549. end
  1550. elseif randchan = 7 and tatankle = 0:
  1551. randchan = rand(1, 25)
  1552. !!randchan = 5
  1553. if tatankle = 0 and tattCount < tattPrefTmpMin:
  1554. tatankle = randchan
  1555. tattCount += 1
  1556. 'He gives you a tattoo on your ankles.'
  1557. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/foot/tatankle<<tatankle>>.jpg"></center>'
  1558. end
  1559. elseif randchan = 8 and tatleg = 0:
  1560. randchan = rand(1, 36)
  1561. !!randchan = 2
  1562. if tatleg = 0 and tattCount < tattPrefTmpMin:
  1563. tatleg = randchan
  1564. tattCount += 1
  1565. 'He gives you a tattoo on your legs.'
  1566. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/legs/tatleg<<tatleg>>.jpg"></center>'
  1567. end
  1568. elseif randchan = 9 and tatlip = 0:
  1569. randchan = rand(1, 9)
  1570. !!randchan = 1
  1571. if tatlip = 0 and tattCount < tattPrefTmpMin:
  1572. tatlip = randchan
  1573. tattCount += 1
  1574. 'He gives you a tattoo on your bottom lip.'
  1575. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/lip/tatlip<<tatlip>>.jpg"></center>'
  1576. end
  1577. elseif randchan = 10 and tatneck = 0:
  1578. randchan = rand(1, 28)
  1579. !!randchan = 12
  1580. if tatneck = 0 and tattCount < tattPrefTmpMin:
  1581. tatneck = randchan
  1582. tattCount += 1
  1583. 'He gives you a tattoo on your neck.'
  1584. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/neck/tatnck<<tatneck>>.jpg"></center>'
  1585. end
  1586. elseif randchan = 11 and tatvag = 0:
  1587. randchan = rand(1, 44)
  1588. !!randchan = 6
  1589. if tatvag = 0 and tattCount < tattPrefTmpMin:
  1590. tatvag = randchan
  1591. tattCount += 1
  1592. 'He gives you a tattoo above your cunt.'
  1593. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/pubic/tatvag<<tatvag>>.jpg"></center>'
  1594. end
  1595. elseif randchan = 12 and tatlech = 0:
  1596. randchan = rand(1, 25)
  1597. !!randchan = 7
  1598. if tatlech = 0 and tattCount < tattPrefTmpMin:
  1599. tatlech = randchan
  1600. tattCount += 1
  1601. 'He gives you a tattoo on your shoulder.'
  1602. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/shoulder/tatshldr<<tatlech>>.jpg"></center>'
  1603. end
  1604. elseif randchan = 13 and tatside = 0:
  1605. randchan = rand(1, 18)
  1606. !!randchan = 9
  1607. if tatside = 0 and tattCount < tattPrefTmpMin:
  1608. tatside = randchan
  1609. tattCount += 1
  1610. 'He gives you a tattoo on your sides.'
  1611. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/side/tatside<<tatside>>.jpg"></center>'
  1612. end
  1613. elseif randchan = 14 and tatupb = 0:
  1614. randchan = rand(1, 30)
  1615. !!randchan = 16
  1616. if tatupb = 0 and tattCount < tattPrefTmpMin:
  1617. tatupb = randchan
  1618. tattCount += 1
  1619. 'He gives you a tramp stamp.'
  1620. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/trampStamp/tatlowbck<<tatupb>>.jpg"></center>'
  1621. end
  1622. elseif randchan = 15 and tatunder = 0:
  1623. randchan = rand(1, 22)
  1624. !!randchan = 5
  1625. if tatunder = 0 and tattCount < tattPrefTmpMin:
  1626. tatunder = randchan
  1627. tattCount += 1
  1628. 'He gives you a tattoo under your breasts.'
  1629. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/underBreast/tatundbreast<<tatunder>>.jpg"></center>'
  1630. end
  1631. elseif randchan = 16 and tatwrist = 0:
  1632. randchan = rand(1, 51)
  1633. !!randchan = 8
  1634. if tatwrist = 0 and tattCount < tattPrefTmpMin:
  1635. tatwrist = randchan
  1636. tattCount += 1
  1637. 'He gives you a tattoo on your wrists.'
  1638. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/wrists/tatwrst<<tatwrist>>.jpg"></center>'
  1639. end
  1640. elseif randchan = 17 and tathand = 0:
  1641. randchan = rand(1, 9)
  1642. !!randchan = 8
  1643. if tathand = 0 and tattCount < tattPrefTmpMin:
  1644. tathand = randchan
  1645. tattCount += 1
  1646. 'He gives you a tattoo on your hand.'
  1647. '<center><img <<$set_imgh>> src="images/pc/body/tattoos/hand/tathnd<<tathand>>.jpg"></center>'
  1648. end
  1649. end
  1650. gs'stat'
  1651. '"All done!", the artist smiles as he starts to clean up his various tools."'
  1652. '"I must say, your body looks amazing with the art on you!"'
  1653. 'You are reluctant to admit it, but having these tattoos feels like they do make you look sexier for some people, though a bit more slutty too.'
  1654. act 'Go back towards your boyfriend':
  1655. cls
  1656. 'As you go back towards him, he looks you up and down.'
  1657. '"There we go!", he says with a smile.'
  1658. if pierPrefTmp = 2:
  1659. 'You can tell he likes a girl with at least a couple of tattoos, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
  1660. elseif pierPrefTmp = 3:
  1661. 'With this many tattoos, you look like a punk or scene girl, and you can feel that many people would want to explore you to see if you have any "hidden" gems underneath your clothes.'
  1662. end
  1663. if haraklover[lover_number] = 0:
  1664. 'You can see he loves how many tattoos you have, as he has a slight blush on his face.'
  1665. elseif haraklover[lover_number] = 1:
  1666. '<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
  1667. elseif haraklover[lover_number] = 2:
  1668. '<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
  1669. end
  1670. act 'Continue':
  1671. minut += 40
  1672. cla
  1673. 'After getting the tattoos, you both part ways and head home.'
  1674. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  1675. loverscompliance[lover_number] += 1
  1676. minut += 20
  1677. act 'Continue': dynamic $go_home
  1678. exit
  1679. end
  1680. end
  1681. end
  1682. end
  1683. elseif tattCount > tattPrefTmpMax:
  1684. 'You need to get rid of some tattoos, it would make you look so much better!'
  1685. 'He heads over to the counter and starts talks to the tattoo artist.'
  1686. 'You see him hand the artist some money and the artist starts to walk up towards you.'
  1687. '"Your boyfriend says you want to get rid of some tattoos?", the artist asks.'
  1688. act 'Quietly nod':
  1689. cla
  1690. 'You know you can''t pull out now, so you meekly nod.'
  1691. 'The man shrugs and says "Head over to the chair over there okay?"'
  1692. act 'Head over to the chair':
  1693. cls
  1694. 'As you sit down you see the man come over with the various needles and lasers he needs to do his job.'
  1695. 'He sees you are a little bit concerned about the laser and laughs, "Don''t worry ma ''am, it will be all over before you know it!"'
  1696. 'He takes he turns on the mini laser and proceeds with his job.'
  1697. randchan = rand(0, 16)
  1698. if randchan = 0 and tatarm > 0:
  1699. if tattCount > tattPrefTmpMax:
  1700. tatarm = 0
  1701. tattCount -= 1
  1702. 'He removes the tattoo on your arm.'
  1703. end
  1704. elseif randchan = 1 and tatass > 0:
  1705. if tattCount > tattPrefTmpMax:
  1706. tatass = 0
  1707. tattCount -= 1
  1708. 'He removes the tattoo on your ass.'
  1709. end
  1710. elseif randchan = 2 and tatback > 0:
  1711. if tattCount > tattPrefTmpMax:
  1712. tatback = 0
  1713. tattCount -= 1
  1714. 'He removes the tattoo on your back.'
  1715. end
  1716. elseif randchan = 3 and tatblly > 0:
  1717. if tattCount > tattPrefTmpMax:
  1718. tatblly = 0
  1719. tattCount -= 1
  1720. 'He removes the tattoo on your belly.'
  1721. end
  1722. elseif randchan = 4 and tatbrst > 0:
  1723. if tattCount > tattPrefTmpMax:
  1724. tatbrst = 0
  1725. tattCount -= 1
  1726. 'He removes the tattoo on your breasts.'
  1727. end
  1728. elseif randchan = 5 and tatchst > 0:
  1729. if tattCount > tattPrefTmpMax:
  1730. tatchst = 0
  1731. tattCount -= 1
  1732. 'He removes the tattoo on your chest.'
  1733. end
  1734. elseif randchan = 6 and tatfce > 0:
  1735. if tattCount > tattPrefTmpMax:
  1736. tatfce = 0
  1737. tattCount -= 1
  1738. 'He removes the tattoo on your face.'
  1739. end
  1740. elseif randchan = 7 and tatankle > 0:
  1741. if tattCount > tattPrefTmpMax:
  1742. tatankle = 0
  1743. tattCount -= 1
  1744. 'He removes the tattoo on your ankles.'
  1745. end
  1746. elseif randchan = 8 and tatleg > 0:
  1747. if tattCount > tattPrefTmpMax:
  1748. tatleg = 0
  1749. tattCount -= 1
  1750. 'He removes the tattoo on your legs.'
  1751. end
  1752. elseif randchan = 9 and tatlip > 0:
  1753. if tattCount > tattPrefTmpMax:
  1754. tatlip = 0
  1755. tattCount -= 1
  1756. 'He removes the tattoo on your bottom lip.'
  1757. end
  1758. elseif randchan = 10 and tatneck > 0:
  1759. if tattCount > tattPrefTmpMax:
  1760. tatneck = 0
  1761. tattCount -= 1
  1762. 'He removes the tattoo on your neck.'
  1763. end
  1764. elseif randchan = 11 and tatvag > 0:
  1765. if tattCount > tattPrefTmpMax:
  1766. tatvag = 0
  1767. tattCount -= 1
  1768. 'He removes the tattoo above your cunt.'
  1769. end
  1770. elseif randchan = 12 and tatlech > 0:
  1771. if tattCount > tattPrefTmpMax:
  1772. tatlech = 0
  1773. tattCount -= 1
  1774. 'He removes the tattoo on your shoulder.'
  1775. end
  1776. elseif randchan = 13 and tatside > 0:
  1777. if tattCount > tattPrefTmpMax:
  1778. tatside = 0
  1779. tattCount -= 1
  1780. 'He removes the tattoo on your sides.'
  1781. end
  1782. elseif randchan = 14 and tatupb > 0:
  1783. if tattCount > tattPrefTmpMax:
  1784. tatupb = 0
  1785. tattCount -= 1
  1786. 'He removes your tramp stamp.'
  1787. end
  1788. elseif randchan = 15 and tatunder > 0:
  1789. if tattCount > tattPrefTmpMax:
  1790. tatunder = 0
  1791. tattCount -= 1
  1792. 'He removes the tattoo under your breasts.'
  1793. end
  1794. elseif randchan = 16 and tatwrist > 0:
  1795. if tattCount > tattPrefTmpMax:
  1796. tatwrist = 0
  1797. tattCount -= 1
  1798. 'He removes the tattoo on your wrists.'
  1799. end
  1800. end
  1801. gs'stat'
  1802. '"All done!", the artist says as he starts to clean up his various tools."'
  1803. '"Me myself, I like a girl with a lot of tattoos, but to each their own." he tells you.'
  1804. 'You are reluctant to admit it, but taking away tattoos does make your skin look much cleaner, and makes people focus more on the figure, and not just the art on it.'
  1805. act 'Go back towards your boyfriend':
  1806. cla
  1807. 'As you go back towards him, he looks you up and down.'
  1808. '"There we go!", he says with a smile.'
  1809. if tattPrefTmp = 1:
  1810. 'You can tell he hates girls with tattoos and likes them to have as few as possible. You can''t help but agree in some aspect, it does make your body look a bit sexier.'
  1811. elseif tattPrefTmp = 2:
  1812. 'You can tell that though <<$loverdesc[lover_number]>> likes a girl to have some tattoos, he doesn''t want them to be the focus on a girl. You can''t help but agree that there is a thing as to many tattoos.'
  1813. end
  1814. if haraklover[lover_number] = 0:
  1815. 'You can see he loves how many tattoos you have, as he has a slight blush on his face.'
  1816. elseif haraklover[lover_number] = 1:
  1817. '<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
  1818. elseif haraklover[lover_number] = 2:
  1819. '<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
  1820. end
  1821. act 'Continue':
  1822. minut += 40
  1823. cla
  1824. 'After getting rid of the tattoos, you both part ways and head home.'
  1825. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  1826. loverscompliance[lover_number] += 1
  1827. minut += 20
  1828. act 'Continue': dynamic $go_home
  1829. exit
  1830. end
  1831. end
  1832. end
  1833. end
  1834. end
  1835. end
  1836. end
  1837. if $ARGS[0] = 'changeLips':
  1838. act 'Enter clinic':
  1839. 'As you arrive at the clinic, <<$loverdesc[lover_number]>> walks up to the front desc and asks to speak with the plastic surgeon. After a couple of minutes the plastic surgeon comes out with a clipboard.'
  1840. '<<$loverdesc[lover_number]>> talks to the surgeon and after a brief exchange of words, he hands the surgeon a respectable stack of bills. The surgeon discreetly puts the bills into his jacket and starts to walk toward you.'
  1841. 'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
  1842. if pcs_lip < lipsPrefTmpMin:
  1843. '"So that man over there says you want to get lip enhancements?", the doctor asks quizically, looking at the size of your lips.'
  1844. else
  1845. '"So that man over there says you want to get a lip reduction?", the doctor asks quizically, looking at the size of your lips.'
  1846. end
  1847. '"Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
  1848. '"All right, lets get started right away", he says as he looks at his clipboard.'
  1849. act 'Go with doctor to operating room':
  1850. cls
  1851. 'The doctor motions for you to sit on the operating table, and you reluctantly comply.'
  1852. '"Don''t worry it will just be a quick injection and we will be done, its perfectly safe.", the doctor says.'
  1853. 'As you try to get confortable on the table the doctor comes up to you with the injection.'
  1854. '"Okay now if you can pucker out your lips it will give me a nice surface for the shot.", he says holding your face gently.'
  1855. act 'Pucker out lips':
  1856. cla
  1857. '"And... Done. There we go! You should feel the effects almost immediately."'
  1858. 'He holds up a mirror and you look at your changed lips.'
  1859. if pcs_lip < lipsPrefTmpMin:
  1860. minut += 20
  1861. pcs_lip = lipsPrefTmpMin + 1
  1862. gs 'stat'
  1863. 'Your lips have grown! They are whorishly huge!'
  1864. 'You look at the doctor and he shrugs, "You look much nicer with huge lips in my opinion."'
  1865. else
  1866. minut += 20
  1867. pcs_lip = lipsPrefTmpMax - 1
  1868. 'Your lips have shrunk! They look much more modest now.'
  1869. 'You look at the doctor and he shrugs, "You look much nicer with more modest lips in my opinion."'
  1870. end
  1871. 'You stand up and leave the room.'
  1872. act 'Go back towards your boyfriend':
  1873. cla
  1874. 'As you go back towards him, he looks you up and down.'
  1875. '"There we go!", he says with a smile.'
  1876. if lipsPrefTmp = 1:
  1877. 'You can tell he loves girls with more modest yet full lips, and you have to admit, its better then having big whorish, cocksucking lips.'
  1878. elseif lipsPrefTmp = 2:
  1879. 'You can tell that <<$loverdesc[lover_number]>> likes a girl to have whorish, cocksucking lips, and as you give the mirror in the room a quick slutty face, you have to admit it does make you look sexier.'
  1880. end
  1881. if haraklover[lover_number] = 0:
  1882. 'You can see he loves the size of your lips, for even with all of his shyness, he still gives you a kiss on your new lips.'
  1883. elseif haraklover[lover_number] = 1:
  1884. '<<$loverdesc[lover_number]>> gives you one last examination of your new lips before giving you a kiss on the lips, probably to test the new wares.'
  1885. elseif haraklover[lover_number] = 2:
  1886. '<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on your new lips and says, "Now those lips are the lips of a goddess."'
  1887. end
  1888. act 'Continue':
  1889. cla
  1890. 'After improving your lips, you both part ways and head home.'
  1891. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  1892. loverscompliance[lover_number] += 1
  1893. minut += 20
  1894. act 'Continue': dynamic $go_home
  1895. exit
  1896. end
  1897. end
  1898. end
  1899. end
  1900. end
  1901. end
  1902. if $ARGS[0] = 'changeTits':
  1903. act 'Enter clinic':
  1904. cla
  1905. 'As you arrive at the clinic, <<$loverdesc[lover_number]>> walks up to the front desc and asks to speak with the plastic surgeon. After a couple of minutes the plastic surgeon comes out with a clipboard.'
  1906. '<<$loverdesc[lover_number]>> talks to the surgeon and after a brief exchange of words, he hands the surgeon a respectable stack of bills. The surgeon discreetly puts the bills into his jacket and starts to walk toward you.'
  1907. if tits < titMin:
  1908. 'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
  1909. '"So that man over there says you want to get breast implants?", the doctor asks quizically, looking you up and down.'
  1910. '"Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
  1911. '"All right, lets get started right away, let me see what size he got for you...", he says as he looks at his clipboard.'
  1912. titAmount = (titMin - tits) * 5 + 9
  1913. if titAmount <= 10:
  1914. '"It seems you will be getting our smallest breast implants."'
  1915. 'As you hear this you relax a bit. At least its not a big difference.'
  1916. elseif titAmount <= 15:
  1917. '"It seems you will be getting small breast implants." '
  1918. 'As you hear this you shift nervously. At least its not going to be that big of a change.'
  1919. elseif titAmount <= 20:
  1920. '"It seems you will be getting medium breast implants."'
  1921. 'Your heart skips a beat, "Those are kind of big.", you think to yourself.'
  1922. elseif titAmount <= 25:
  1923. '"It seems you will be getting large breast implants."'
  1924. 'Your heart skips a beat, What? "Those will be huge...", you tell to yourself.'
  1925. elseif titAmount <= 30:
  1926. '"It seems you will be getting our largest, the XLarge breast implants." '
  1927. 'What?! You are about to get up and leave but you realize that its to late for that now. "God, those will be MASSIVE", you think to yourself.'
  1928. else
  1929. 'This should not shoot off, if you go from 10 to 35 it should fall into preference still.'
  1930. end
  1931. '"If you would follow me, I will take you to the operating room.", the doctor says indifferently.'
  1932. act 'Go with doctor to operating room':
  1933. cls
  1934. 'The doctor motions for you to lay on the operating table, and you reluctantly comply.'
  1935. '"Now this is going to take about 2 hours for us to do the procedure, but do not worry, the procedure is safe, I have done this dozens of times." the doctor says.'
  1936. 'As you try to get confortable on the table the doctor comes up to you with the anesthesia.'
  1937. '"Okay before I continue I want you to take a deep breath okay?", he says.'
  1938. act 'Take a deep breath':
  1939. cla
  1940. 'You take a deep breath of the sleeping gas, and soon the room starts to spin and your mind starts to fog, then everything goes dark...'
  1941. *nl
  1942. *nl
  1943. *nl
  1944. act 'Wake up':
  1945. minut += 120
  1946. silicone += titAmount
  1947. gs 'stat'
  1948. '"<<$pcs_firstname>> <<$pcs_lastname>>, are you listening?"'
  1949. ' ''Wait... I''m awake?'' It seemed just a couple of seconds ago you were laying down on the operating table about to have surgery.'
  1950. ' ''My breasts feel fuller...'' '
  1951. 'You grab your breasts as you look down, and you see you have a bigger breasts! Your breasts are now <<$titsize>>s.'
  1952. '<center><img <<$set_imgh>> src="images/pc/body/tits/t<<tits>>.jpg"></center>'
  1953. 'You aren''t paying attention to the doctor as he finishes up, and you slowly get off the operating table and head over to your boyfriend.'
  1954. act 'Head over to your boyfriend':
  1955. cla
  1956. 'As you go back towards him, he looks you up and down.'
  1957. '"There we go!", he says with a smile.'
  1958. if titBoy = 0:
  1959. 'If you are getting inplants this should not fire off.'
  1960. elseif titBoy = 1:
  1961. 'You can tell that <<$loverdesc[lover_number]>> likes a girl with a good rack, thankfully although you look more like a bimbo then before, his tit preference is not outragously big, and you must admit, it does make you look sexier.'
  1962. elseif titBoy = 2:
  1963. '<<$loverdesc[lover_number]>> you can clearly tell loves a girl with bimbo-sized tits, as you hold your tits you look at yourself in the mirror. The girl staring back at you looks like a bimbo that doesn''t know where to put her whorish tits. And you have to admit, it does turn you on a little.'
  1964. end
  1965. if haraklover[lover_number] = 0:
  1966. 'From the blush on his face, you can tell <<$loverdesc[lover_number]>> loves your new breasts.'
  1967. elseif haraklover[lover_number] = 1:
  1968. '<<$loverdesc[lover_number]>> gives you one last look and gives you a quick kiss on your cheek.'
  1969. elseif haraklover[lover_number] = 2:
  1970. '<<$loverdesc[lover_number]>> comes up to you, and with a quick slap on the ass, kisses you on the lips and says, "Now you look like a bombshell!"'
  1971. end
  1972. act 'Continue':
  1973. minut += 40
  1974. cla
  1975. 'After getting your new breasts, you both part ways and head home.'
  1976. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  1977. loverscompliance[lover_number] += 1
  1978. minut += 20
  1979. act 'Continue': dynamic $go_home
  1980. end
  1981. exit
  1982. end
  1983. end
  1984. end
  1985. end
  1986. elseif tits > titMax:
  1987. 'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
  1988. '"So that man over there says you want to get breast implants?", the doctor asks quizically, looking you up and down.'
  1989. '"Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
  1990. '"All right, lets get started right away, he had a set size he wanted so we will be doing that.", he says as he looks at his clipboard.'
  1991. titAmount = (tits - titMax) * 5 + 9
  1992. '"If you would follow me, I will take you to the operating room.", the doctor says indifferently.'
  1993. act 'Go with doctor to operating room':
  1994. cls
  1995. 'The doctor motions for you to lay on the operating table, and you reluctantly comply.'
  1996. '"Now this is going to take about 2 hours for us to do the procedure, but do not worry, the procedure is safe, I have done this dozens of times." the doctor says.'
  1997. 'As you try to get confortable on the table the doctor comes up to you with the anesthesia.'
  1998. '"Okay before I continue I want you to take a deep breath okay?", he says.'
  1999. act 'Take a deep breath':
  2000. cla
  2001. 'You take a deep breath of the sleeping gas, and soon the room starts to spin and your mind starts to fog, then everything goes dark...'
  2002. *nl
  2003. *nl
  2004. *nl
  2005. act 'Wake up':
  2006. cla
  2007. minut += 120
  2008. if silicone - titAmount < 0:
  2009. titExtra = titAmount - silicone
  2010. silicone = 0
  2011. nbsize -= titExtra
  2012. else
  2013. silicone -= titAmount
  2014. end
  2015. gs 'stat'
  2016. '"<<$pcs_firstname>> <<$pcs_lastname>>, are you listening?"'
  2017. ' ''Wait... I''m awake?'' It seemed just a couple of seconds ago you were laying down on the operating table about to have surgery.'
  2018. ' ''My breasts feel lighter...'' '
  2019. 'You grab your breasts as you look down, and you realize you have much smaller breasts! Your breasts are now <<$titsize>>s.'
  2020. '<center><img <<$set_imgh>> src="images/pc/body/tits/t<<tits>>.jpg"></center>'
  2021. 'You aren''t paying attention to the doctor as he finishes up, and you slowly get off the operating table and head over to your boyfriend.'
  2022. act 'Head over to your boyfriend':
  2023. cla
  2024. 'As you go back towards him, he looks you up and down.'
  2025. '"There we go!", he says with a smile.'
  2026. if titBoy = 0:
  2027. 'You can tell that <<$loverdesc[lover_number]>> likes a girl without whorish tits, and you can kind of see why as you slowly grope your now tinier breasts.'
  2028. elseif titBoy = 1:
  2029. 'You can tell that <<$loverdesc[lover_number]>> likes a girl with a good rack, but thankfully not to big, and you admittadly agree with him, as you slowly massage your breasts.'
  2030. elseif titBoy = 2:
  2031. 'Reducing to max? What?'
  2032. end
  2033. if haraklover[lover_number] = 0:
  2034. 'From the blush on his face, you can tell <<$loverdesc[lover_number]>> loves your new breasts.'
  2035. elseif haraklover[lover_number] = 1:
  2036. '<<$loverdesc[lover_number]>> gives you one last look and gives you a quick kiss on your cheek.'
  2037. elseif haraklover[lover_number] = 2:
  2038. '<<$loverdesc[lover_number]>> comes up to you, and with a quick slap on the ass, kisses you on the lips and says, "Now you look like a bombshell!"'
  2039. end
  2040. act 'Continue':
  2041. minut += 40
  2042. cla
  2043. 'After getting your new breasts, you both part ways and head home.'
  2044. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  2045. loverscompliance[lover_number] += 1
  2046. minut += 20
  2047. act 'Continue': dynamic $go_home
  2048. end
  2049. exit
  2050. end
  2051. end
  2052. end
  2053. end
  2054. end
  2055. end
  2056. end
  2057. !!This is a interesting one as it will take in a couple of things, not just clothes preferences. I need to find clothing pictures for most of the types of clothes. Think of these as quest clothes.
  2058. if $ARGS[0] = 'changeClothes':
  2059. !! void code - need future work
  2060. !! act 'Enter Clothing Shop':
  2061. !! cla
  2062. !! if
  2063. !! end
  2064. end
  2065. !! This should not increase the weight at all, and should only have been called if they weigh over the figurePrefMax
  2066. if $ARGS[0] = 'changeFigure':
  2067. act 'Enter clinic':
  2068. cla
  2069. 'As you arrive at the clinic, <<$loverdesc[lover_number]>> walks up to the front desc and asks to speak with the plastic surgeon. After a couple of minutes the plastic surgeon comes out with a clipboard.'
  2070. '<<$loverdesc[lover_number]>> talks to the surgeon and after a brief exchange of words, he hands the surgeon a respectable stack of bills. The surgeon discreetly puts the bills into his jacket and starts to walk toward you.'
  2071. 'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
  2072. '"So you want to get a lyposuction procedure done, is that right?", the doctor asks you.'
  2073. act 'Meekly nod':
  2074. cla
  2075. 'You know you can''t back out now. "Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
  2076. '"All right, lets get started right away, if you can follow me into the operating room.'
  2077. act 'Go with doctor to operating room':
  2078. cls
  2079. 'The doctor motions for you to lay on the operating table, and you reluctantly comply.'
  2080. '"Now this is going to take about 2 hours for us to do the procedure, but do not worry, the procedure is safe, I have done this dozens of times." the doctor says.'
  2081. 'As you try to get confortable on the table the doctor comes up to you with the anesthesia.'
  2082. '"Okay before I continue I want you to take a deep breath okay?", he says.'
  2083. act 'Take a deep breath':
  2084. cla
  2085. 'You take a deep breath of the sleeping gas, and soon the room starts to spin and your mind starts to fog, then everything goes dark...'
  2086. *nl
  2087. *nl
  2088. *nl
  2089. !!'<<salocatnow>> is the value for salocatnow, the value for fat is <<fat>>, and the value for salo is <<salo>>.'
  2090. act 'Wake up':
  2091. cla
  2092. minut += 120
  2093. if figurlover[lover_number] ! 3:
  2094. :loopfatRemover
  2095. salo = 20 * figurePrefMin + 1
  2096. if salo < 11: salo = 11
  2097. gs 'body_shape', 'softreset'
  2098. !!'<<salocatnow>> is the value for salocatnow, the value for fat is <<fat>>, and the value for salo is <<salo>>.'
  2099. if salocatnow > figurePrefMax:jump 'loopfatRemover'
  2100. else
  2101. 'This should not fire, I made it so that you can''t ADD weight.'
  2102. end
  2103. gs 'stat'
  2104. !!'The stat for salocatnow is <<salocatnow>> and the stat for figurePrefMax is <<figurPrefMax>>.'
  2105. '"<<$pcs_firstname>> <<$pcs_lastname>>, are you listening?"'
  2106. ' ''Wait... I''m awake?'' It seemed just a couple of seconds ago you were laying down on the operating table about to have surgery.'
  2107. 'You aren''t paying attention to the doctor as he finishes up, and you slowly get off the operating table and head over to your boyfriend.'
  2108. act 'Head over to your boyfriend':
  2109. cls
  2110. 'As you go back towards him, he looks you up and down.'
  2111. '"There we go!", he says with a smile.'
  2112. gs 'obj_din', 'body'
  2113. if figurlover[lover_number] = 0:
  2114. 'You can tell that <<$loverdesc[lover_number]>> likes a girl that has very little fat on her whorish tits, and you can kind of see why as you slowly look at yourself in the mirror.'
  2115. elseif figurBoy = 1:
  2116. 'You can tell that <<$loverdesc[lover_number]>> likes a girl thats not too fat, but thankfully not too skinny, and you admittadly agree with him, as you slowly run your hands over your now smaller curves.'
  2117. elseif figurBoy = 2:
  2118. 'Reducing to max? What?'
  2119. end
  2120. if haraklover[lover_number] = 0:
  2121. 'From the blush on his face, you can tell <<$loverdesc[lover_number]>> loves your new figure.'
  2122. elseif haraklover[lover_number] = 1:
  2123. '<<$loverdesc[lover_number]>> gives your figure one last look and gives you a quick kiss on your cheek.'
  2124. elseif haraklover[lover_number] = 2:
  2125. '<<$loverdesc[lover_number]>> comes up to you, and with a quick slap on the ass, kisses you on the lips and says, "Now you have the body of a bombshell!"'
  2126. end
  2127. act 'Continue':
  2128. cla
  2129. 'After getting a lyposuction treatment, you both part ways and head home.'
  2130. 'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
  2131. loverscompliance[lover_number] += 1
  2132. minut += 20
  2133. act 'Continue': dynamic $go_home
  2134. end
  2135. exit
  2136. end
  2137. end
  2138. end
  2139. end
  2140. end
  2141. end
  2142. end
  2143. if $ARGS[0] = 'testLikes':
  2144. figurlover[lover_number] = 0
  2145. titlover[lover_number] = 0
  2146. !!new preferences
  2147. clotTypePref[lover_number] = 0
  2148. clotQualPref[lover_number] = 0
  2149. clotTopPref[lover_number] = 0
  2150. bottShorPref[lover_number] = 0
  2151. clotThinPref[lover_number] = 0
  2152. bimbPref[lover_number] = 0
  2153. pierPref[lover_number] = 0
  2154. tattPref[lover_number] = 0
  2155. lipsPref[lover_number] = 0
  2156. makePref[lover_number] = 0
  2157. IQPref[lover_number] = 0
  2158. haraklover[lover_number] = 0
  2159. loverfinance[lover_number] = 2
  2160. 'figurlover[lover_number] is <<figurlover[lover_number]>>, titlover[lover_number] is <<titlover[lover_number]>>, clotTypePref[lover_number] is <<clotTypePref[lover_number]>>, clotQualPref[lover_number] is <<clotQualPref[lover_number]>>, clotTopPref[lover_number] is <<clotTopPref[lover_number]>>'
  2161. 'bottShorPref[lover_number] is <<bottShorPref[lover_number]>>, clotThinPref[lover_number] is <<clotThinPref[lover_number]>>, bimbPref[lover_number] is <<bimbPref[lover_number]>>, pierPref[lover_number] is <<pierPref[lover_number]>>, tattPref[lover_number] is <<tattPref[lover_number]>>'
  2162. 'lipsPref[lover_number] is <<lipsPref[lover_number]>>, makePref[lover_number] is <<makePref[lover_number]>>, IQPref[lover_number] is <<IQPref[lover_number]>>, loverscompliance[lover_number] is <<loverscompliance[lover_number]>>.'
  2163. end
  2164. !!When I test things I like to have a small preference. Don''t mind this, nothing to see here.
  2165. if $ARGS[0] = 'bimTest':
  2166. figurlover[lover_number] = 0
  2167. titlover[lover_number] = 2
  2168. hairlover[lover_number] = 3
  2169. clotTypePref[lover_number] = 4
  2170. clotQualPref[lover_number] = 2
  2171. clotTopPref[lover_number] = 3
  2172. bottShorPref[lover_number] = 3
  2173. clotThinPref[lover_number] = 3
  2174. bimbPref[lover_number] = 1
  2175. pierPref[lover_number] = 2
  2176. tattPref[lover_number] = 1
  2177. lipsPref[lover_number] = 2
  2178. makePref[lover_number] = 3
  2179. IQPref[lover_number] = 0
  2180. haraklover[lover_number] = 2
  2181. loverfinance[lover_number] = 2
  2182. boybodyrand = 1
  2183. loverbodyrand[lover_number] = boybodyrand
  2184. if loverbodyrand[lover_number] = 1: $boybody = 'tall'
  2185. $loverbody[lover_number] = $boybody
  2186. boybodrand = 2
  2187. loverbodyrand[lover_number] = boybodrand
  2188. if boybodrand = 2: $boybod = 'athletic'
  2189. $loverbod[lover_number] = $boybod
  2190. izvrat = 1
  2191. loverizvrat[lover_number] = izvrat
  2192. 'figurlover[lover_number] is <<figurlover[lover_number]>>, titlover[lover_number] is <<titlover[lover_number]>>, clotTypePref[lover_number] is <<clotTypePref[lover_number]>>, clotQualPref[lover_number] is <<clotQualPref[lover_number]>>, clotTopPref[lover_number] is <<clotTopPref[lover_number]>>'
  2193. 'bottShorPref[lover_number] is <<bottShorPref[lover_number]>>, clotThinPref[lover_number] is <<clotThinPref[lover_number]>>, bimbPref[lover_number] is <<bimbPref[lover_number]>>, pierPref[lover_number] is <<pierPref[lover_number]>>, tattPref[lover_number] is <<tattPref[lover_number]>>'
  2194. 'lipsPref[lover_number] is <<lipsPref[lover_number]>>, makePref[lover_number] is <<makePref[lover_number]>>, IQPref[lover_number] is <<IQPref[lover_number]>>, loverscompliance[lover_number] is <<loverscompliance[lover_number]>>.'
  2195. end
  2196. --- boy_likes ---------------------------------