sex_ev_leave.qsrc 95 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351
  1. # sex_ev_leave
  2. if $ARGS[0] = 'exit':
  3. minut += 2
  4. !! exit should be based on type of apartment and location
  5. if $sex_ev['loc'] = 'npc_home':
  6. gs 'sex_ev_leave', 'ending'
  7. if npc_residence[$boy] = 1:
  8. !! Pav residential exit
  9. gt 'pav_residential'
  10. elseif npc_residence[$boy] = 2:
  11. !! Student dorms exit
  12. gt 'city_island'
  13. elseif npc_residence[$boy] = 3:
  14. !! St. Petersburg Residential exit
  15. gt 'city_residential'
  16. elseif npc_residence[$boy] = 4:
  17. !! St. Petersburg City Center exit
  18. gt 'city_center'
  19. !!{ disabled for bug testing
  20. else
  21. if $region = 'pav':
  22. gt 'pav_residential'
  23. elseif $region = 'pav':
  24. gt 'pav_commercial'
  25. elseif $region = 'pav_park':
  26. gt 'pav_park', 'start'
  27. elseif $region = 'city':
  28. gt 'city_residential'
  29. elseif $region = 'city_center':
  30. gt 'city_center'
  31. elseif $region = 'city_park':
  32. gt 'city_park', 'start'
  33. elseif $region = 'city_island':
  34. gt 'city_island'
  35. end}
  36. end
  37. elseif $sex_ev['loc'] = 'hotel':
  38. gs 'sex_ev_leave', 'ending'
  39. if $region = 'pav':
  40. gt 'pav_hotel'
  41. elseif $region = 'city':
  42. gt 'city_center'
  43. end
  44. gt $sex_ev_exit['exit_file'], $sex_ev_exit['exit_arg']
  45. elseif $sex_ev['loc'] = 'pc_home':
  46. gs 'sex_ev_leave', 'ending'
  47. if $sex_ev_exit['loc'] = 'bedroom':
  48. gt 'bedr'
  49. elseif $sex_ev_exit['loc'] = 'hallway':
  50. gt 'korr'
  51. end
  52. end
  53. end
  54. if $ARGS[0] = 'break_up':
  55. if $npc_rel_type[$boy] = 'fuckbuddy':
  56. gs 'lover', 'remove fuckbuddy', $boy
  57. elseif $npc_rel_type[$boy] = 'sugar_daddy':
  58. gs 'lover', 'remove sugardaddy', $boy
  59. else
  60. gs 'lover', 'remove', $boy
  61. end
  62. act'Leave':gt'sex_ev_leave', 'exit'
  63. end
  64. if $ARGS[0] = 'fuckbuddy_add':
  65. gs 'lover', 'add fuckbuddy', $boy
  66. npc_fuckbuddy[$boy] = 1
  67. npc_no_booty_call[$boy] = daystart
  68. end
  69. if $ARGS[0] = 'lover_add':
  70. gs 'lover', 'add', $boy
  71. end
  72. if $ARGS[0] = 'ending':
  73. !! gs 'sex_ev_stats', 'save'
  74. gs 'arousal', 'end'
  75. if $clothingworntype = 'nude': gs'sex_ev_leave', 'dress'
  76. if sex_ev['fuck'] > 0: know_virgin[$boy] = 0
  77. if sex_ev['creampie_orgasm'] = 1: stat_memory['creampie_orgasm'] = daystart
  78. npc_last_sex[$boy] = daystart
  79. killvar 'sex_ev'
  80. end
  81. if $ARGS[0] = 'leaving_dialogue':
  82. '"I gotta get going," you say.'
  83. '"Okay, see you later."'
  84. act'"Bye"':
  85. $sex_ev['leave_dialogue'] = 'Bye'
  86. gs'sex_ev_leave', 'leaving_action'
  87. end
  88. act'"See ya"':
  89. $sex_ev['leave_dialogue'] = 'See ya'
  90. gs'sex_ev_leave', 'leaving_action'
  91. end
  92. act'"Toodles"':
  93. $sex_ev['leave_dialogue'] = 'Toodles'
  94. gs'sex_ev_leave', 'leaving_action'
  95. end
  96. if $npc_rel_type[$boy] ! '':
  97. act'"Text me"':
  98. $sex_ev['leave_dialogue'] = 'Text me'
  99. gs'sex_ev_leave', 'leaving_action'
  100. end
  101. if npc_booty_call_date[$boy] = daystart and sex_ev['sleepover'] = 1:
  102. act'"See you soon"':
  103. $sex_ev['leave_dialogue'] = 'See you soon'
  104. gs'sex_ev_leave', 'leaving_action'
  105. end
  106. elseif npc_booty_call_date[$boy] = daystart + 1:
  107. act'"See you tomorrow"':
  108. $sex_ev['leave_dialogue'] = 'See you tomorrow'
  109. gs'sex_ev_leave', 'leaving_action'
  110. end
  111. else
  112. act'"Till next time"':
  113. $sex_ev['leave_dialogue'] = 'Till next time'
  114. gs'sex_ev_leave', 'leaving_action'
  115. end
  116. end
  117. end
  118. end
  119. if $ARGS[0] = 'leaving_action':
  120. cla
  121. act'Nonchalant':
  122. $sex_ev['leave_action'] = ' nonchalantly and head out the door without a second glance'
  123. gs'sex_ev_leave', 'leaving_end'
  124. end
  125. act'Wave goodbye':
  126. $sex_ev['leave_action'] = ', waggling your fingers at him and head out the door'
  127. gs'sex_ev_leave', 'leaving_end'
  128. end
  129. act'Wink':
  130. $sex_ev['leave_action'] = ' with a wink as you close the door behind you'
  131. gs'sex_ev_leave', 'leaving_end'
  132. end
  133. act'Blow him a kiss':
  134. $sex_ev['leave_action'] = ', blowing him a kiss just before the door closes behind you'
  135. gs'sex_ev_leave', 'leaving_end'
  136. end
  137. act'Shake your ass':
  138. $sex_ev['leave_action'] = ', giving him a teasing shake of your ass just before you close the door behind you'
  139. gs'sex_ev_leave', 'leaving_end'
  140. end
  141. end
  142. if $ARGS[0] = 'leaving_end':
  143. cla & *nl
  144. if $npc_rel_type[$boy] = 'sugar_daddy':
  145. 'Just before you go, <<$npc_firstname[$boy]>> hands you an envelope with 2000<b>₽‎</b> in it.'
  146. *nl
  147. end
  148. '"<<$sex_ev[''leave_dialogue'']>>," you say<<$sex_ev[''leave_action'']>>.'
  149. act'Leave':gt'sex_ev_leave', 'exit'
  150. end
  151. if $ARGS[0] = 'npc_leave':
  152. cla & *clr
  153. $sex_ev['bed_room']
  154. if npc_latesleeper[$boy] = 1 and sex_ev['boy_wakeup'] = 0:
  155. 'Not wanting to wake <<$npc_firstname[$boy]>>, you sneak over to the door and let yourself out, closing it as gently as you can behind you.'
  156. act'Leave':gt'sex_ev_leave', 'exit'
  157. else
  158. if sex_ev['angry_after'] = 1 or sex_ev['annoyed'] > 0:
  159. '"You should go," you say flatly.'
  160. '<<$npc_firstname[$boy]>> stiffly gets out of bed and gets dressed, neither of you really looking the other in the eye as he does. After a minute or two, he''s finished and leaves without another word.'
  161. act'Finish':gt'sex_ev_leave', 'exit'
  162. else
  163. '"This was fun, but you should probably go," you say to <<$npc_firstname[$boy]>>, who nods and moves to start picking up his clothes and get dressed.'
  164. gt'sex_ev_leave', 'npc_leaving_action'
  165. end
  166. end
  167. end
  168. if $ARGS[0] = 'npc_leaving_action':
  169. cla
  170. if $clothingworntype = 'nude':
  171. act'Stay in bed (covers on)':
  172. $sex_ev_exit['loc'] = 'bedroom'
  173. $sex_ev['leave_action1'] = 'You stay sat on the bed, demurely pulling the sheets up around you to preserve some modesty as you watch <<$npc_firstname[$boy]>> get dressed. As he finishes, you say,'
  174. $sex_ev['leave_action2'] = 'He flashes you a quick smile and then gathers the rest of his stuff to leave, closing the door behind him.'
  175. gs'sex_ev_leave', 'npc_leaving_dialogue'
  176. end
  177. act'Stay in bed (covers off)':
  178. $sex_ev_exit['loc'] = 'bedroom'
  179. $sex_ev['leave_action'] = 'You stay sat on the bed, casually laying nude atop the sheets as you watch <<$npc_firstname[$boy]>> get dressed. He throws more than a few admiring glances your way as he does and when he finishes you say,'
  180. $sex_ev['leave_action2'] = 'He flashes you a quick smile and then gathers the rest of his stuff to leave, closing the door behind him.'
  181. gs'sex_ev_leave', 'npc_leaving_dialogue'
  182. end
  183. end
  184. act'Kiss goodbye':
  185. $sex_ev_exit['loc'] = 'bedroom'
  186. $sex_ev['leave_action'] = 'You sit on the bed, waiting patiently for <<$npc_firstname[$boy]>> to get dressed. Once he''s finished you move over to him and give him a gentle kiss on the lips, saying,'
  187. $sex_ev['leave_action2'] = 'He flashes you a quick smile and then gathers the rest of his stuff to leave, closing the door behind him.'
  188. gs'sex_ev_leave', 'npc_leaving_dialogue'
  189. end
  190. act'See <<$npc_firstname[$boy]>> to the door':
  191. if $clothingworntype = 'nude':
  192. $sex_ev_exit['loc'] = 'hallway'
  193. $sex_ev['leave_action'] = 'You sit on the bed, waiting patiently for <<$npc_firstname[$boy]>> to get dressed. Once he''s finished you move to take him to the door, making no move to get dressed yourself. Opening it for him, he steps out and you stand completely nude in the frame and say,'
  194. $sex_ev['leave_action2'] = 'He flashes you a quick smile in return before stepping off. You watch him go for a few moments before heading back inside and closing the door behind you.'
  195. else
  196. $sex_ev['leave_action'] = 'You sit on the bed, waiting patiently for <<$npc_firstname[$boy]>> to get dressed. Once he''s finished you move to take him to the door. As he steps out, you say,'
  197. $sex_ev['leave_action2'] = 'He flashes you a quick smile in return before stepping off. You watch him go for a few moments before heading back inside and closing the door behind you.'
  198. end
  199. gs'sex_ev_leave', 'npc_leaving_dialogue'
  200. end
  201. act'Kiss <<$npc_firstname[$boy]>> at the door':
  202. $sex_ev_exit['loc'] = 'hallway'
  203. if $clothingworntype = 'nude':
  204. $sex_ev['leave_action'] = 'You sit on the bed, waiting patiently for <<$npc_firstname[$boy]>> to get dressed. Once he''s finished you move to take him to the door, making no move to get dressed yourself. Just as <<$npc_firstname[$boy]>> steps out, you grab hold of his shirt to drag him back into a passionate kiss, pulling him tight against your naked body, a sight to be seen by anyone who has a view of your front door. After several long seconds, you break the kiss, saying,'
  205. if rand(1,1) = 5:
  206. $sex_ev['leave_action2'] = 'You pull <<$npc_firstname[$boy]>> back in for another kiss, but softer and quicker. As you pull back somebody walks past behind him, staring wide eyed at your chest. '
  207. else
  208. $sex_ev['leave_action2'] = 'You pull <<$npc_firstname[$boy]>> back in for another kiss, but softer and quicker. He flashes you a quick smile in return before stepping off. You watch him go for a few moments before heading back inside and closing the door behind you.'
  209. end
  210. else
  211. $sex_ev['leave_action'] = 'You sit on the bed, waiting patiently for <<$npc_firstname[$boy]>> to get dressed. Once he''s finished you move to take him to the door, making no move to get dressed yourself. Just as <<$npc_firstname[$boy]>> steps out, you grab hold of his shirt to pull him into a passionate kiss. After several long seconds, you break the kiss, saying,'
  212. $sex_ev['leave_action2'] = 'You pull <<$npc_firstname[$boy]>> back in for another kiss, but softer and quicker. He flashes you a quick smile in return before stepping off. You watch him go for a few moments before heading back inside and closing the door behind you.'
  213. end
  214. gs'sex_ev_leave', 'npc_leaving_dialogue'
  215. end
  216. end
  217. if $ARGS[0] = 'npc_leaving_dialogue':
  218. act'"Thanks for coming over."':
  219. if sex_ev['sleepover'] = 1:
  220. $sex_ev['leave_dialogue'] = '"Thanks for coming over last night. It was fun."'
  221. else
  222. $sex_ev['leave_dialogue'] = '"Thanks for coming over. It was fun."'
  223. end
  224. gs'sex_ev_leave', 'npc_leaving_end'
  225. end
  226. act'"See ya"':
  227. $sex_ev['leave_dialogue'] = '"See ya."'
  228. gs'sex_ev_leave', 'npc_leaving_end'
  229. end
  230. if $npc_rel_type[$boy] ! '':
  231. act'"Text me"':
  232. $sex_ev['leave_dialogue'] = '"Text me."'
  233. gs'sex_ev_leave', 'npc_leaving_end'
  234. end
  235. if npc_booty_call_date[$boy] = daystart and sex_ev['sleepover'] = 1:
  236. act'"See you soon"':
  237. $sex_ev['leave_dialogue'] = '"See you soon."'
  238. gs'sex_ev_leave', 'npc_leaving_end'
  239. end
  240. elseif npc_booty_call_date[$boy] = daystart + 1:
  241. act'"See you tomorrow"':
  242. $sex_ev['leave_dialogue'] = '"See you tomorrow."'
  243. gs'sex_ev_leave', 'npc_leaving_end'
  244. end
  245. else
  246. act'"Till next time"':
  247. $sex_ev['leave_dialogue'] = '"Till next time."'
  248. gs'sex_ev_leave', 'npc_leaving_end'
  249. end
  250. !!{ if sex_ev['sleepover'] = 1 or hour < 5:
  251. act'"Wanna do this again?"':
  252. sex_ev['invite_today'] = 1
  253. gs'sex_ev_leave', 'npc_leaving_end'
  254. end
  255. else
  256. act'"Wanna do this again? tomorrow?"':
  257. sex_ev['invite_tomorrow'] = 1
  258. gs'sex_ev_leave', 'npc_leaving_end'
  259. end
  260. end}
  261. end
  262. end
  263. end
  264. if $ARGS[0] = 'npc_leaving_end':
  265. cla & *nl
  266. if sex_ev['invite_today'] = 0 and sex_ev['invite_tomorrow'] = 0:
  267. '<<$sex_ev[''leave_action1'']>> <<$sex_ev[''leave_dialogue'']>> <<$sex_ev[''leave_action2'']>>'
  268. elseif sex_ev['invite_today'] = 1:
  269. '<<$sex_ev[''leave_action1'']>>'
  270. *nl
  271. '"Want to do this again later?" you ask.'
  272. *nl
  273. '<<$sex_ev[''leave_action2'']>>'
  274. elseif sex_ev['invite_tomorrow'] = 1:
  275. '<<$sex_ev[''leave_action1'']>>'
  276. *nl
  277. '"Want to do this again tomorrow?" you ask.'
  278. *nl
  279. '<<$sex_ev[''leave_action2'']>>'
  280. end
  281. act'Leave':gt'sex_ev_leave', 'exit'
  282. end
  283. if $ARGS[0] = 'hurry_leave':
  284. act'No time for goodbyes':
  285. cla & *nl
  286. npc_rel[$boy] -= 1
  287. $sex_ev['leave_dialogue'] = ' without even saying goodbye'
  288. gs'sex_ev_leave', 'hurry_leave2'
  289. end
  290. act'"See you later!"':
  291. cla & *nl
  292. $sex_ev['leave_dialogue'] = ', calling, "See you later!" just before it slams behind you.'
  293. gs'sex_ev_leave', 'hurry_leave2'
  294. end
  295. act'"Text me!"':
  296. cla & *nl
  297. $sex_ev['leave_dialogue'] = ', calling, "Text me!" just before it slams behind you.'
  298. gs'sex_ev_leave', 'hurry_leave2'
  299. end
  300. if $sex_ev['type'] = 'hookup':
  301. act'Leave your number (fuckbuddy)':
  302. sex_ev['fuckbuddy_invite'] = 1
  303. cla & *nl
  304. if sex_ev['fuck_count'] > 0:
  305. $sex_ev['leave_dialogue'] = ', stopping to scribble your number on a random piece of paper. "Text me if you want to fuck again!" you call over your shoulder as you dash out the door, slamming it behind you.'
  306. else
  307. $sex_ev['leave_dialogue'] = ', stopping to scribble your number on a random piece of paper. "Text me if you want to fool around again!" you call over your shoulder as you dash out the door, slamming it behind you.'
  308. end
  309. gs'sex_ev_leave', 'hurry_leave2'
  310. end
  311. act'Leave your number (date)':
  312. cla & *nl
  313. sex_ev['date_invite'] = 1
  314. $sex_ev['leave_dialogue'] = ', stopping to scribble your number on a random piece of paper. "Text me if you want to go out on a date some time!" you call over your shoulder as you dash out the door, slamming it behind you.'
  315. gs'sex_ev_leave', 'hurry_leave2'
  316. end
  317. end
  318. if npc_booty_call_date[$boy] = daystart and sex_ev['sleepover'] = 1 and $npc_rel_type[$boy] ! 'husband':
  319. act'"See you soon"':
  320. $sex_ev['leave_dialogue'] = ', shouting, "See you soon!" just before it slams behind you.'
  321. gs'sex_ev_leave', 'hurry_leave2'
  322. end
  323. elseif npc_booty_call_date[$boy] = daystart + 1:
  324. act'"See you tomorrow"':
  325. $sex_ev['leave_dialogue'] = ', shouting, "See you tomorrow!" just before it slams behind you.'
  326. gs'sex_ev_leave', 'hurry_leave2'
  327. end
  328. end
  329. end
  330. if $ARGS[0] = 'hurry_leave2':
  331. cla
  332. act'Run!':
  333. cla & *nl
  334. $sex_ev['leave_action'] = 'You make sure all your clothes are in place with one last quick check and dash to the door'
  335. gs'sex_ev_leave', 'hurry_leave_finish'
  336. end
  337. act'Peck on the cheek':
  338. cla & *nl
  339. $sex_ev['leave_action'] = 'You make sure all your clothes are in place with one last quick check and dash over to <<$npc_firstname[$boy]>> to give him a quick kiss on the cheek'
  340. gs'sex_ev_leave', 'hurry_leave_finish'
  341. end
  342. act'Peck on the lips':
  343. cla & *nl
  344. $sex_ev['leave_action'] = 'You make sure all your clothes are in place with one last quick check and dash over to <<$npc_firstname[$boy]>> to give him a quick kiss on the lips'
  345. act'Leave':gs'sex_ev_leave', 'hurry_leave_finish'
  346. end
  347. act'Passionate kiss':
  348. cla & *nl
  349. $sex_ev['leave_action'] = 'You make sure all your clothes are in place with one last quick check and dash over to <<$npc_firstname[$boy]>> to kiss him. Despite your rush, you savour this moment, breathing in the taste of <<$npc_firstname[$boy]>>''s lips even as you force your tongue into his mouth to dance with his. A full five seconds go by until you break the kiss'
  350. act'Leave':gs'sex_ev_leave', 'hurry_leave_finish'
  351. end
  352. end
  353. if $ARGS[0] = 'hurry_leave_finish':
  354. cla & *nl
  355. '"<<$sex_ev[''leave_action'']>><<$sex_ev[''leave_dialogue'']>>.'
  356. if (rand(1,3) = 1 or npc_goal[$boy] = 3) and sex_ev['fuckbuddy_invite'] = 1:
  357. act'Leave':msg 'Unfortunately, he never ends up texting you.' & gt'sex_ev_leave', 'exit'
  358. elseif (rand(1,3) = 1 or npc_goal[$boy] = 1) and sex_ev['date_invite'] = 1:
  359. act'Leave':msg 'Unfortunately, he never ends up texting you.' & gt'sex_ev_leave', 'exit'
  360. else
  361. if sex_ev['fuckbuddy_invite'] = 1:
  362. gs 'sex_ev_leave', 'fuckbuddy_add'
  363. elseif sex_ev['date_invite'] = 1:
  364. gs 'sex_ev_leave', 'lover_add'
  365. end
  366. act'Leave':gt'sex_ev_leave', 'exit'
  367. end
  368. end
  369. if $ARGS[0] = 'breakup_start':
  370. if $npc_rel_type[$boy] ! 'husband' and $sex_ev['type'] ! 'hookup':
  371. act'Break things off':
  372. cla & *clr
  373. $sex_ev['bed_room']
  374. iif($sex_ev['loc'] ! 'pc_home','"This is the last time I''m coming over," you say, abruptly.','"This is the last time you can come over," you say abruptly.')
  375. '"Huh?" <<$npc_firstname[$boy]>> looks at you oddly. "What are you talking about?"'
  376. if $npc_rel_type[$boy] = 'boyfriend':
  377. '"I''m breaking up with you."'
  378. '"What?!" he asks.'
  379. act'Don''t explain':
  380. cla & *clr
  381. '<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
  382. '"I just can''t be with you anymore," you say. "I''m sorry."'
  383. 'You grab your things and leave.'
  384. gs'sex_ev_leave', 'break_up'
  385. end
  386. !! gs'sex_ev_leave', 'found_someone_else_breakup'
  387. !! gs'sex_ev_leave', 'cheating_on_you_breakup'
  388. else
  389. '"Don''t text me to come over anymore."'
  390. '"Why not?" he asks.'
  391. act'Don''t explain':
  392. cla & *clr
  393. '<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
  394. '"I just can''t do this any longer," you say. "I''m sorry."'
  395. 'You grab your things and leave.'
  396. gs'sex_ev_leave', 'break_up'
  397. end
  398. gs'sex_ev_leave', 'unsatisfied_breakup'
  399. gs'sex_ev_leave', 'no_more_cheating_breakup'
  400. end
  401. end
  402. end
  403. end
  404. if $ARGS[0] = 'unsatisfied_breakup':
  405. act'You don''t satisfy me':
  406. cla & *clr
  407. $sex_ev['bed_room']
  408. '"You''re just not what I want out of a fuckbuddy," you say flatly.'
  409. act'Sexually incompatible':
  410. cla & *clr
  411. '<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
  412. '"You''re just not what I want out of a fuckbuddy," you say flatly. "I just don''t think we''re sexually compatible."'
  413. *nl
  414. 'You shrug once, grab your things, and leave without another word.'
  415. gs'sex_ev_leave', 'break_up'
  416. end
  417. if npc_sexdrive[$boy] = 1 or npc_two_pump[$boy] = 1:
  418. act'You''re a two pump chump':
  419. cla & *clr
  420. $sex_ev['bed_room']
  421. '"You''re just not what I want out of a fuckbuddy," you say flatly. "You come too fast. I can''t trust you to get me off."'
  422. *nl
  423. '"Wait but-"'
  424. gs'sex_ev_leave', 'isnt_going_to_work'
  425. end
  426. elseif npc_sexdrive[$boy] < 5:
  427. act'You don''t last long enough for me':
  428. cla & *clr
  429. $sex_ev['bed_room']
  430. '"You''re just not what I want out of a fuckbuddy," you say flatly. "You can''t keep it up and I can''t trust you to get me off."'
  431. *nl
  432. '"Wait but-"'
  433. gs'sex_ev_leave', 'isnt_going_to_work'
  434. end
  435. else
  436. act'You last too long':
  437. cla & *clr
  438. $sex_ev['bed_room']
  439. '"You''re just not what I want out of a fuckbuddy," you say flatly. "Honestly, your sex drive is way too high. By the time you''re satisfied, my pussy is sore."'
  440. *nl
  441. '"Wait but-"'
  442. gs'sex_ev_leave', 'isnt_going_to_work'
  443. end
  444. end
  445. !! act'You''re boring':
  446. end
  447. end
  448. if $ARGS[0] = 'no_more_cheating_breakup':
  449. if pcs_lover > 0 and (npc_know_have_boyfriend + npc_know_have_girlfriend = 0):
  450. act'I''ve started seeing somebody':
  451. cla & *clr
  452. npc_know_cheat[$boy] = 1
  453. $sex_ev['bed_room']
  454. '"The truth is, I''ve started seeing somebody. The sex has been good, but..." You shake your head, grabbing your purse. "I can''t keep doing this. I don''t want to fuck things up."'
  455. if npc_fidelity[$boy] < 7:
  456. '"Come on," he says. "We''re just having fun. It''s not cheating if it''s just physical. When you masturbate in the shower, you''re not cheating on him with your showerhead are you?"'
  457. act'No means no':
  458. cla & *clr
  459. '<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
  460. '"You''re not going to change my mind," you say. "We''re done."'
  461. *nl
  462. 'And with that, you head out the door.'
  463. gs'sex_ev_leave', 'break_up'
  464. end
  465. act'Well...':
  466. cla & *nl
  467. 'You pause, biting your lip in consideration.'
  468. act'As long as it''s just physical':
  469. cla & *clr
  470. $sex_ev['bed_room']
  471. '"Well..." you say slowly. "As long as it''s <i>just</i> physical..."'
  472. '"Thatta girl," <<$npc_firstname[$boy]>> grins from bed.'
  473. gs'sex_ev_after', 'cheating_end'
  474. end
  475. act'Set some rules':
  476. cla & *nl
  477. '"Okay..." you say. "But there have to be rules!"'
  478. gs'sex_ev_talk', 'cheating_rules'
  479. end
  480. end
  481. else
  482. '"Oh." <<$npc_firstname[$npclastsaved]>> looks at you. "I guess that''s fair. So... I''ll see you around?"'
  483. act'See you':
  484. cla & *nl
  485. '"Yeah," you mumble wistfully. "See you..."'
  486. *nl
  487. 'And with that, you head out the door.'
  488. gs'sex_ev_leave', 'break_up'
  489. end
  490. act'No I won''t':
  491. cla & *clr
  492. '<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
  493. '"No, I won''t," you frown. "That''s the point."'
  494. *nl
  495. 'And with that, you head out the door.'
  496. gs'sex_ev_leave', 'break_up'
  497. end
  498. end
  499. end
  500. if pcs_lover - pcs_girlfriends > 0:
  501. act'I can''t keep cheating on my boyfriend':
  502. cla & *clr
  503. '<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
  504. if npc_know_cheat[$boy] = 1:
  505. '"I can''t keep cheating on my boyfriend like this," you say, hanging your head shamefully. "It''s wrong, and I just can''t do this anymore. I have to go."'
  506. else
  507. '"The truth is, I''m in a relationship with somebody," you say, hanging your head shamefully. "I''ve been cheating on them with you this whole time. It''s wrong, and I— I just can''t do this anymore!"'
  508. end
  509. 'You grab your things and rush out the door.'
  510. gs'sex_ev_leave', 'break_up'
  511. end
  512. end
  513. if pcs_girlfriends > 0:
  514. act'I can''t keep cheating on my girlfriend':
  515. cla & *clr
  516. '<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
  517. if npc_know_cheat[$boy] = 1:
  518. '"I can''t keep cheating on my girlfriend like this," you say, hanging your head shamefully. "It''s wrong, and I just can''t do this anymore. I have to go."'
  519. else
  520. '"The truth is, I''m in a relationship with somebody," you say, hanging your head shamefully. "I''ve been cheating on them with you this whole time. It''s wrong, and I— I just can''t do this anymore!"'
  521. end
  522. 'You grab your things and rush out the door.'
  523. gs'sex_ev_leave', 'break_up'
  524. end
  525. end
  526. end
  527. end
  528. if $ARGS[0] = 'isnt_going_to_work':
  529. act'Grab your things':
  530. cla & *clr
  531. '<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
  532. '"This just isn''t going to work," you say, cutting him off. "We''re done."'
  533. *nl
  534. 'And with that, you head out the door.'
  535. gs'sex_ev_leave', 'break_up'
  536. end
  537. end
  538. if $ARGS[0] = 'no_condom_breakoff':
  539. if npc_no_condoms_know[$boy] = 1:
  540. act'I can''t do this (break things off)':
  541. !! add in rape chance later
  542. cla & *clr
  543. '<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
  544. '"Fuck this," you say, getting up and grabbing your clothes.'
  545. '"Where the fuck are you going?" <<$npc_firstname[$boy]>> asks in bewilderment.'
  546. '"I''m not gonna be fuckbuddies with a guy who never uses condoms," you sneer at him. "<i>Don''t</i> text me again."'
  547. *nl
  548. 'The second you''re dressed you stalk out the door and slam it behind you.'
  549. gs'sex_ev_leave', 'break_up'
  550. end
  551. end
  552. end
  553. if $ARGS[0] = 'sneak_out1':
  554. act'Sneak out': gt'sex_ev_leave', 'sneak_out2'
  555. act'Leave a note':
  556. cla & *clr
  557. $sex_ev['hall_way']
  558. 'Not wanting to leave without saying goodbye but not wanting to wake <<$npc_firstname[$boy]>> either, you find a piece of paper and a pen and scribble out a quick message.'
  559. gs'sex_ev_leave', 'sneak_out_note1'
  560. end
  561. if $pantyworntype ! 'none':
  562. act'Leave your panties':
  563. npc_panty_give[$boy] += 1
  564. gs 'panties', 'dispose'
  565. cla & *clr
  566. $sex_ev['hall_way']
  567. if CloSkirtShortness > 0:
  568. 'Suddenly feeling naughty, you quickly slip your panties down your legs, leaving your pussy bare underneath your skirt. You loop your warm underwear around the handle of <<$npc_firstname[$boy]>>''s bedroom door and then quietly sneak out of his apartment, leaving only your gift behind.'
  569. else
  570. 'Suddenly feeling naughty, you pull down your trousers down and spend a minute untangling your legs before pulling your bottoms back up back up, sans panties. You loop your warm underwear around the handle of <<$npc_firstname[$boy]>>''s bedroom door and then quietly sneak out of his apartment, leaving only your gift behind.'
  571. end
  572. act'Leave':gt'sex_ev_leave', 'exit'
  573. end
  574. act'Leave your a note on your panties':
  575. sex_ev['panty_note'] = 1
  576. npc_panty_give[$boy] += 1
  577. gs 'panties', 'dispose'
  578. cla & *clr
  579. $sex_ev['hall_way']
  580. if CloSkirtShortness > 0:
  581. 'Not wanting to leave without saying goodbye but not wanting to wake <<$npc_firstname[$boy]>> either, you start to look for a piece of paper when a naughty thought runs through your mind. Unable to resist the thought, you quickly slip your panties down from underneath your skirt and then rummage for a big marker.'
  582. else
  583. 'Not wanting to leave without saying goodbye but not wanting to wake <<$npc_firstname[$boy]>> either, you start to look for a piece of paper when a naughty thought runs through your mind. Unable to resist the thought, you quickly pull down your trousers down and spend a minute untangling your legs before pulling your bottoms back up, sans panties. Then you rummage for a big marker.'
  584. end
  585. *nl
  586. 'You pop the cap with a grin and start scribbling.'
  587. gs'sex_ev_leave', 'sneak_out_note1'
  588. end
  589. end
  590. end
  591. if $ARGS[0] = 'sneak_out_note1':
  592. act'Thanks for letting me stay over':
  593. cla & *clr
  594. $sex_ev['hall_way']
  595. $sex_ev['note_desc1'] = '<i>Thanks for letting me spend the night.</i>'
  596. $sex_ev['note_desc1']
  597. gs'sex_ev_leave', 'sneak_out_note2'
  598. end
  599. act'I had a good time':
  600. cla & *clr
  601. $sex_ev['hall_way']
  602. $sex_ev['note_desc1'] = '<i>I had a good time last night.</i>'
  603. $sex_ev['note_desc1']
  604. gs'sex_ev_leave', 'sneak_out_note2'
  605. end
  606. if sex_ev['fuck_count'] > 0:
  607. act'Thanks for the fuck':
  608. cla & *clr
  609. $sex_ev['hall_way']
  610. $sex_ev['note_desc1'] = '<i>Thanks for the fuck.</i>'
  611. $sex_ev['note_desc1']
  612. gs'sex_ev_leave', 'sneak_out_note2'
  613. end
  614. end
  615. end
  616. if $ARGS[0] = 'sneak_out_note2':
  617. act'It was fun':
  618. $sex_ev['note_desc2'] = '<i>It was fun.</i>'
  619. gs'sex_ev_leave', 'sneak_out_note3'
  620. end
  621. act'See ya':
  622. $sex_ev['note_desc2'] = '<i>See ya later.</i>'
  623. gs'sex_ev_leave', 'sneak_out_note3'
  624. end
  625. if $sex_ev['type'] = 'hookup':
  626. act'Text me (fuckbuddies)':
  627. sex_ev['fuckbuddy_invite'] = 1
  628. if sex_ev['fuck_count'] > 0:
  629. $sex_ev['note_desc2'] = '<i>Text me if you want to fuck again.</i>'
  630. else
  631. $sex_ev['note_desc2'] = '<i>Text me if you want to fool around again.</i>'
  632. end
  633. gs'sex_ev_leave', 'sneak_out_note3'
  634. end
  635. act'Text me (date)':
  636. sex_ev['date_invite'] = 1
  637. $sex_ev['note_desc2'] = '<i>Text me if you want to go out on a date sometime.</i>'
  638. gs'sex_ev_leave', 'sneak_out_note3'
  639. end
  640. else
  641. act'Text me':
  642. $sex_ev['note_desc2'] = '<i>Don''t forget to text me.</i>'
  643. gs'sex_ev_leave', 'sneak_out_note3'
  644. end
  645. end
  646. act'Till next time':
  647. $sex_ev['note_desc2'] = '<i>Until next time.</i>'
  648. gs'sex_ev_leave', 'sneak_out_note3'
  649. end
  650. end
  651. if $ARGS[0] = 'sneak_out_note3':
  652. cla & *clr
  653. $sex_ev['hall_way']
  654. '<<$sex_ev[''note_desc1'']>> <<$sex_ev[''note_desc2'']>>'
  655. 'You sign it with...'
  656. act'Just your name':
  657. cla & *clr
  658. $sex_ev['hall_way']
  659. '<<$sex_ev[''note_desc1'']>> <<$sex_ev[''note_desc2'']>> - <<$pcs_nickname>>'
  660. gs'sex_ev_leave', 'sneak_out_note_end'
  661. end
  662. act'A smiley face':
  663. cla & *clr
  664. $sex_ev['hall_way']
  665. '<<$sex_ev[''note_desc1'']>> <<$sex_ev[''note_desc2'']>> <b><i>:)</i></b>'
  666. *nl
  667. 'You leave a little face, unable to keep yourself from smiling as you dot two little eyes over the mouth.'
  668. gs'sex_ev_leave', 'sneak_out_note_end'
  669. end
  670. act'A winky face':
  671. cla & *clr
  672. $sex_ev['hall_way']
  673. '<<$sex_ev[''note_desc1'']>> <<$sex_ev[''note_desc2'']>> <b><i>;)</i></b>'
  674. *nl
  675. 'You leave a little face, unable to keep yourself from smiling as you dot little winky eyes over the mouth.'
  676. gs'sex_ev_leave', 'sneak_out_note_end'
  677. end
  678. act'A heart':
  679. cla & *clr
  680. $sex_ev['hall_way']
  681. '<<$sex_ev[''note_desc1'']>> <<$sex_ev[''note_desc2'']>> <b><i><3</i></b>'
  682. *nl
  683. 'You punctuate the note with a tiny little heart, feeling warmth in your chest as you do.'
  684. gs'sex_ev_leave', 'sneak_out_note_end'
  685. end
  686. if pcs_makeup > 2:
  687. act'A kiss':
  688. cla & *clr
  689. $sex_ev['hall_way']
  690. '<<$sex_ev[''note_desc1'']>> <<$sex_ev[''note_desc2'']>>'
  691. *nl
  692. if sex_ev['panty_note'] = 1:
  693. 'You run your tongue over your lips and press them together a moment before signing your note with a big sloppy wet smooch. As you pull back, your lipstick leaves a large kiss mark across your discarded panties. Good thing you did your makeup before you left.'
  694. else
  695. 'You run your tongue over your lips and press them together a moment before signing your note with a big sloppy wet smooch. As you pull back, your lipstick leaves large kiss on the page. Good thing you did your makeup before you left.'
  696. end
  697. gs'sex_ev_leave', 'sneak_out_note_end'
  698. end
  699. end
  700. end
  701. if $ARGS[0] = 'sneak_out_note_end':
  702. *nl
  703. if sex_ev['panty_note'] = 1:
  704. 'Satisfied, you leave your panties on the counter and quietly slip out the door, wondering what <<$npc_firstname[$boy]>> will think when he discovers them.'
  705. else
  706. 'Satisfied, you leave your note on the counter and quietly slip out the door, letting it click shut behind you.'
  707. end
  708. if (rand(1,3) = 1 or npc_goal[$boy] = 3) and sex_ev['fuckbuddy_invite'] = 1:
  709. act'Leave':msg 'Unfortunately, he never ends up texting you.' & gt'sex_ev_leave', 'exit'
  710. elseif (rand(1,3) = 1 or npc_goal[$boy] = 1) and sex_ev['date_invite'] = 1:
  711. act'Leave':msg 'Unfortunately, he never ends up texting you.' & gt'sex_ev_leave', 'exit'
  712. else
  713. if sex_ev['fuckbuddy_invite'] = 1:
  714. gs 'sex_ev_leave', 'fuckbuddy_add'
  715. elseif sex_ev['date_invite'] = 1:
  716. gs 'sex_ev_leave', 'lover_add'
  717. end
  718. act'Leave':gt'sex_ev_leave', 'exit'
  719. end
  720. end
  721. if $ARGS[0] = 'sneak_out2':
  722. $sex_ev['hall_way']
  723. 'You tip toe your way to the door, turning the handle as gently as you can so you don''t disturb <<$npc_firstname[$boy]>>, closing it with a soft click behind you.'
  724. act'Leave':gt'sex_ev_leave', 'exit'
  725. end
  726. if $ARGS[0] = 'dress':
  727. if $clothingworntype = 'nude': gs 'clothing', 'wear_last_worn'
  728. !! if $pantyworntype = 'none' and $lastwornpantytype ! 'none' and $lastwornpantytype ! '':
  729. if $pantyworntype = 'none' and $lastwornpantytype ! 'none':
  730. gs 'panties', 'wear', $lastwornpantytype, lastwornpantynumber
  731. end
  732. !! if $braworntype = 'none' and $lastwornbratype ! 'none' and $lastwornbratype ! '':
  733. if $braworntype = 'none' and $lastwornbratype ! 'none':
  734. gs 'bras', 'wear', $lastwornbratype, lastwornbranumber
  735. end
  736. gs 'stat'
  737. end
  738. if $ARGS[0] = 'dressing_image':
  739. !! elseif $sex_ev['dress_describe'] = 'pulling your panties up your legs and fastening your bra around your chest':
  740. !! '<center><video autoplay loop src="images/pc/activities/misc/dress_underwear1.mp4"></video></center>'
  741. if $sex_ev['dress_describe'] = 'fastening your bra around your chest':
  742. '<center><video autoplay loop src="images/pc/activities/misc/dress_bra1.mp4"></video></center>'
  743. elseif $sex_ev['dress_describe'] = 'slipping your skirt up your legs':
  744. '<center><video autoplay loop src="images/pc/activities/misc/dress_skirt1.mp4"></video></center>'
  745. !! elseif $sex_ev['dress_describe'] = 'zipping your skirt up over your panties':
  746. !! '<center><video autoplay loop src="images/pc/activities/misc/dress_skirt1.mp4"></video></center>'
  747. elseif $sex_ev['dress_describe'] = 'pulling your panties up':
  748. '<center><video autoplay loop src="images/pc/activities/misc/dress_panties1.mp4"></video></center>'
  749. elseif $sex_ev['dress_describe'] = 'pulling your top over your breasts':
  750. '<center><video autoplay loop src="images/pc/activities/misc/dress_top1.mp4"></video></center>'
  751. !! elseif $sex_ev['dress_describe'] = 'pulling your top over your bra':
  752. !! '<center><video autoplay loop src="images/pc/activities/misc/dress_top1.mp4"></video></center>'
  753. elseif $sex_ev['dress_describe'] = 'tugging your pants over your hips':
  754. '<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
  755. elseif sex_ev['CloDress'] = 1 and sex_ev['dress_end'] = 0:
  756. '<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/bed_dress.jpg"></center>'
  757. elseif sex_ev['hotel'] = 1:
  758. !! IMAGE HERE
  759. !! hotel room image
  760. else
  761. $sex_ev['bed_room']
  762. end
  763. end
  764. if $ARGS[0] = 'pc_or_npc_dressing':
  765. if sex_ev['dressing_start'] ! 1:
  766. else
  767. end
  768. end
  769. if $ARGS[0] = 'dress_start_desc':
  770. if sex_ev['towel'] = 1:
  771. !!sex_ev['towel'] = 0
  772. 'You drop the towel and reach down for your clothes and start to pick them up.'
  773. else
  774. 'You reach down for where you left your clothes and start to pick them up.'
  775. end
  776. end
  777. if $ARGS[0] = 'dressing1':
  778. cla & *clr
  779. !! gs'sex_ev_leave', 'dress'
  780. gs'sex_ev_leave', 'dress_loop'
  781. if sex_ev['sleepover'] = 1 and npc_latesleeper[$boy] = 1 and sex_ev['boy_asleep'] ! 0:
  782. if sex_ev['towel'] = 1:
  783. sex_ev['towel'] = 0
  784. 'You drop the towel and quietly reach down for your clothes and try to pick them up without waking <<$npc_firstname[$boy]>>.'
  785. else
  786. 'You quietly reach down for where you left your clothes and try to pick them up without waking <<$npc_firstname[$boy]>>.'
  787. end
  788. gs'sex_ev_leave', 'dressing2'
  789. else
  790. gs'sex_ev_leave', 'dress_start_desc'
  791. if sex_ev['angry_after'] = 1 or sex_ev['annoyed'] > 0:
  792. '"I have to go," you say flatly, reaching down for your clothes without looking at <<$npc_firstname[$boy]>>.'
  793. gs'sex_ev_leave', 'dressing2'
  794. elseif sex_ev['cant_stay'] = 1:
  795. !! there is an additional dress_loop here to make it possible to give panties here
  796. gs'sex_ev_leave', 'dress_loop_code'
  797. '"Guess I''ll go then," you sigh, <<$sex_ev[''dress_describe'']>>.'
  798. gs'sex_ev_leave', 'dressing2'
  799. gs 'sex_ev_leave', 'panty_gift'
  800. elseif sex_ev['npc_late'] = 0:
  801. '"You heading out?" <<$npc_firstname[$boy]>> asks as you are <<$sex_ev[''dress_describe'']>>.'
  802. gs'sex_ev_leave', 'not_leaving'
  803. gs'sex_ev_leave', 'leaving_soon'
  804. gs'sex_ev_leave', 'something_to_do'
  805. gs'sex_ev_leave', 'see_a_friend'
  806. gs'sex_ev_leave', 'another_fuckbuddy'
  807. if sex_ev['sleepover'] < 1:
  808. gs'sex_ev_leave', 'going_disco'
  809. gs'sex_ev_leave', 'mom_late'
  810. gs'sex_ev_leave', 'need_homework'
  811. gs'sex_ev_leave', 'school_night'
  812. else
  813. gs'sex_ev_leave', 'going_school'
  814. end
  815. !! gs'sex_ev_leave', 'dress_talk'
  816. else
  817. '<<$npc_firstname[$boy]>> starts getting dressed next to you.'
  818. gs'sex_ev_leave', 'dressing2'
  819. end
  820. !! act'Talk while you dress':
  821. !! gs'sex_ev_leave', 'dress_talk'
  822. !! end
  823. end
  824. end
  825. if $ARGS[0] = 'dressing2':
  826. sex_ev['leaving'] = 1
  827. if sex_ev['sleepover'] = 1:
  828. gs'sex_ev_morning', 'end_morning'
  829. !! gs'sex_ev_hookup_leave', 'end_morning'
  830. else
  831. gs'sex_ev_leave', 'dressing_finish'
  832. end
  833. act'Talk while you dress':cla & gs'sex_ev_leave', 'dress_talk'
  834. if sex_ev['ma_pill_money'] = 0 and npc_pay_for_ma_pill[$boy] = 1 and sex_ev['creampie_count'] > 0:
  835. cla
  836. act'Continue':cla & gs'sex_ev_leave', 'money_for_ma_pill'
  837. end
  838. end
  839. if $ARGS[0] = 'dressing_finish':
  840. !! if sex_ev['dress_end'] ! 1:
  841. act'Finish getting dressed':
  842. sex_ev['dressed_to_go'] = 1
  843. cla & *clr
  844. !! $sex_ev['bed_room']
  845. gs'sex_ev_leave', 'dress_loop'
  846. 'You finish <<$sex_ev[''dress_describe'']>>.'
  847. gs'sex_ev_leave', 'dress_loop_end'
  848. gs'sex_ev_after', 'after_sex_dressed'
  849. end
  850. end
  851. if $ARGS[0] = 'not_leaving':
  852. act'Not yet':
  853. cla & *clr
  854. gs'sex_ev_leave', 'dress_loop'
  855. gs'sex_ev_leave', 'dress_start_desc'
  856. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  857. '"Not yet," you say, <<$sex_ev[''dress_describe'']>>. "Just tired of hanging out naked."'
  858. '"I''m never tired of seeing you naked."'
  859. act'Roll your eyes':
  860. cla & *nl
  861. '"Whatever," you sigh, rolling your eyes to the heavens.'
  862. gs 'sex_ev_leave', 'dressing2'
  863. end
  864. end
  865. end
  866. if $ARGS[0] = 'leaving_soon':
  867. act'Yeah':
  868. sex_ev['leaving'] = 1
  869. cla & *clr
  870. gs'sex_ev_leave', 'dress_loop'
  871. gs'sex_ev_leave', 'dress_start_desc'
  872. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  873. if sex_ev['sleepover'] < 1:
  874. '"Yeah," you say, <<$sex_ev[''dress_describe'']>>.' + iif($sex_ev['loc'] = 'pc_home', ' "Get your clothes on so I can get out of here."', ' ')
  875. gs 'sex_ev_leave', 'dressing2'
  876. gs 'sex_ev_leave', 'panty_gift'
  877. else
  878. '"Yeah," you say, <<$sex_ev[''dress_describe'']>>.'
  879. if rand(1,3) = 3 and (npc_day_off[$boy] = week and sex_ev['sleepover'] = 1) or ((npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
  880. gs 'sex_ev_leave', 'sex_ev_invite_later'
  881. else
  882. gs 'sex_ev_leave', 'dressing2'
  883. gs 'sex_ev_leave', 'panty_gift'
  884. end
  885. end
  886. end
  887. end
  888. if $ARGS[0] = 'going_disco':
  889. if hour >= 18 and (week = 5 or week = 6):
  890. if $region = 'pav':
  891. act'Going to the disco':
  892. cla & *clr
  893. gs'sex_ev_leave', 'dress_loop'
  894. gs'sex_ev_leave', 'dress_start_desc'
  895. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  896. if sex_ev['disco_after'] = 1:
  897. '"Weren''t you listening to me?" you say, <<$sex_ev[''dress_describe'']>>. "I told you, I''m going to the disco tonight.' + iif($sex_ev['loc'] = 'pc_home', 'So get your clothes on already so I can make it!"','"')
  898. else
  899. '"Yeah," you say, <<$sex_ev[''dress_describe'']>>. "I want to go to the disco.' + iif($sex_ev['loc'] = 'pc_home', 'So get your clothes on already so I can make it!"','"')
  900. end
  901. !! add spontaneous disco date
  902. gs 'sex_ev_leave', 'dressing2'
  903. gs 'sex_ev_leave', 'panty_gift'
  904. end
  905. else
  906. act'Going to the club':
  907. cla & *clr
  908. gs'sex_ev_leave', 'dress_loop'
  909. gs'sex_ev_leave', 'dress_start_desc'
  910. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  911. if sex_ev['club_after'] = 1:
  912. '"Weren''t you listening to me?" you say, <<$sex_ev[''dress_describe'']>>. "I told you, I''m going clubbing tonight."' + iif($sex_ev['loc'] = 'pc_home', 'So get your clothes on already so I can make it before it closes!"','"')
  913. else
  914. '"Yeah," you say, <<$sex_ev[''dress_describe'']>>. "I want to hit the club tonight."' + iif($sex_ev['loc'] = 'pc_home', 'So get your clothes on already so I can make it before it closes!"','"')
  915. end
  916. !! add spontaneous club date
  917. gs 'sex_ev_leave', 'dressing2'
  918. gs 'sex_ev_leave', 'panty_gift'
  919. end
  920. end
  921. end
  922. end
  923. if $ARGS[0] = 'mom_late':
  924. if mid($start_type,1,2) = 'sg' and hour >= 20 and $sex_ev['loc'] ! 'pc_home':
  925. act'Mom will kill me':
  926. sex_ev['mom_kill'] = 1
  927. cla & *clr
  928. gs'sex_ev_leave', 'dress_loop'
  929. gs'sex_ev_leave', 'dress_start_desc'
  930. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  931. if hour < 3:
  932. '"Yeah," you say, <<$sex_ev[''dress_describe'']>>. "I''m already going to be in trouble as it is, but if I don''t come home at all tonight, my mom will kill me."'
  933. else
  934. '"Yeah," you say, <<$sex_ev[''dress_describe'']>>. "My mom will kill me if I don''t come home before curfew."'
  935. end
  936. gs 'sex_ev_leave', 'dressing2'
  937. gs 'sex_ev_leave', 'panty_gift'
  938. end
  939. end
  940. end
  941. if $ARGS[0] = 'need_homework':
  942. if lernHome > 0:
  943. act'Need to finish my homework':
  944. cla & *clr
  945. gs'sex_ev_leave', 'dress_loop'
  946. gs'sex_ev_leave', 'dress_start_desc'
  947. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  948. '"Yeah," you say, <<$sex_ev[''dress_describe'']>>. "I need to do my homework.' + iif($sex_ev['loc'] = 'pc_home', 'So get dressed and skedaddle so I can get it done."','"')
  949. !! if rand(0,1) = 1:
  950. if npc_intel[$boy] < 30 and npc_finance[$boy] < 2:
  951. '"Seriously? That''s what you''re in a rush for?"'
  952. act'I want to go to uni':
  953. cla & *clr
  954. gs'sex_ev_leave', 'dress_loop'
  955. gs'sex_ev_leave', 'dress_start_desc'
  956. '"I want to go to uni," you say, <<$sex_ev[''dress_describe'']>>. "Can''t do that if I fail out of school for not doing my homework."'
  957. gs 'sex_ev_leave', 'dressing2'
  958. end
  959. act'Don''t be an asshole':
  960. cla & *clr
  961. gs'sex_ev_leave', 'dress_loop'
  962. gs'sex_ev_leave', 'dress_start_desc'
  963. '"Don''t be an asshole," you glare, <<$sex_ev[''dress_describe'']>>. "My grades are important to me. More important than spending more time fucking you."'
  964. gs 'sex_ev_leave', 'dressing2'
  965. end
  966. else
  967. '"I guess your future after school is pretty important," <<$npc_firstname[$boy]>> says.'
  968. act'Thanks for understanding':
  969. gs'sex_ev_leave', 'dress_loop'
  970. gs'sex_ev_leave', 'dress_start_desc'
  971. '"Thanks," you say, <<$sex_ev[''dress_describe'']>>. "It means a lot to me that you get it."'
  972. gs 'sex_ev_leave', 'dressing2'
  973. end
  974. act'Want to go to uni':
  975. gs'sex_ev_leave', 'dress_loop'
  976. gs'sex_ev_leave', 'dress_start_desc'
  977. '"I really want to go to uni," you say, <<$sex_ev[''dress_describe'']>>. "So keeping up with my classes is really important."'
  978. gs 'sex_ev_leave', 'dressing2'
  979. end
  980. act'Damn straight':
  981. gs'sex_ev_leave', 'dress_loop'
  982. gs'sex_ev_leave', 'dress_start_desc'
  983. '"Damn straight it is," you say, <<$sex_ev[''dress_describe'']>>. "Skipping schoolwork to fuck you could end up fucking me for life!"'
  984. gs 'sex_ev_leave', 'dressing2'
  985. end
  986. act'No hard feelings':
  987. gs'sex_ev_leave', 'dress_loop'
  988. gs'sex_ev_leave', 'dress_start_desc'
  989. '"No hard feelings, right?" you ask, <<$sex_ev[''dress_describe'']>>. "I really like you, I just can''t afford to get kicked out of school."'
  990. gs 'sex_ev_leave', 'dressing2'
  991. end
  992. end
  993. gs 'sex_ev_leave', 'panty_gift'
  994. end
  995. end
  996. end
  997. if $ARGS[0] = 'something_to_do':
  998. act'Gotta do something':
  999. sex_ev['leaving'] = 1
  1000. cla & *clr
  1001. gs'sex_ev_leave', 'dress_loop'
  1002. gs'sex_ev_leave', 'dress_start_desc'
  1003. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  1004. if sex_ev['sleepover'] < 1:
  1005. '"Yeah," you say, <<$sex_ev[''dress_describe'']>>. "Have a few things I need to get done.' + iif($sex_ev['loc'] = 'pc_home', ' Sorry to kick you out so quickly."','"')
  1006. gs 'sex_ev_leave', 'dressing2'
  1007. gs 'sex_ev_leave', 'panty_gift'
  1008. else
  1009. '"Yeah," you say, <<$sex_ev[''dress_describe'']>>. "Have a few things I need to get done.' + iif($sex_ev['loc'] = 'pc_home',' Sorry to kick you out so quickly."',' Thanks for letting me spend the night."')
  1010. if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
  1011. gs 'sex_ev_leave', 'sex_ev_invite_later'
  1012. else
  1013. iif($sex_ev['loc'] = 'pc_home','"It''s fine. I get it."','"No problem. It was fun."')
  1014. gs'sex_ev_morning', 'end_morning'
  1015. end
  1016. end
  1017. end
  1018. end
  1019. if $ARGS[0] = 'see_a_friend':
  1020. act'Meeting a friend':
  1021. sex_ev['leaving'] = 1
  1022. cla & *clr
  1023. gs'sex_ev_leave', 'dress_loop'
  1024. gs'sex_ev_leave', 'dress_start_desc'
  1025. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  1026. if sex_ev['sleepover'] < 1:
  1027. '"Yeah," you say, <<$sex_ev[''dress_describe'']>>. "Need to see a friend later.' + iif($sex_ev['loc'] = 'pc_home', 'Sorry to kick you out so quickly."','"')
  1028. gs 'sex_ev_leave', 'dressing2'
  1029. gs 'sex_ev_leave', 'panty_gift'
  1030. else
  1031. '"Yeah," you say, <<$sex_ev[''dress_describe'']>>. "Need to see a friend later.' + iif($sex_ev['loc'] = 'pc_home','Sorry to kick you out so quickly."','Thanks for letting me spend the night."')
  1032. if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
  1033. gs 'sex_ev_leave', 'sex_ev_invite_later'
  1034. else
  1035. '"No problem."'
  1036. gs'sex_ev_morning', 'end_morning'
  1037. end
  1038. end
  1039. end
  1040. end
  1041. if $ARGS[0] = 'another_fuckbuddy':
  1042. if arrsize('$fuckbuddy') > 1:
  1043. act'Another booty call':
  1044. sex_ev['leaving'] = 1
  1045. cla & *clr
  1046. gs'sex_ev_leave', 'dress_loop'
  1047. gs'sex_ev_leave', 'dress_start_desc'
  1048. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  1049. '"Yeah," you smirk, <<$sex_ev[''dress_describe'']>>. "Got another booty call to show up to."'
  1050. '"You really get around don''t you?" <<$npc_firstname[$boy]>> smirks back.'
  1051. gs 'sex_ev_leave', 'dressing2'
  1052. gs 'sex_ev_leave', 'panty_gift'
  1053. end
  1054. end
  1055. end
  1056. if $ARGS[0] = 'going_school':
  1057. if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6:
  1058. act'School':
  1059. cla & *clr
  1060. gs'sex_ev_leave', 'dress_loop'
  1061. gs'sex_ev_leave', 'dress_start_desc'
  1062. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  1063. if $sex_ev['loc'] = 'pc_home':
  1064. if sex_ev['late_for_school'] = 1 and hour >= 8:
  1065. '"I already told you, I''m late for school," you say, <<$sex_ev[''dress_describe'']>>. "You gotta get out of here so I can lock up."'
  1066. elseif sex_ev['late_for_school'] = 1:
  1067. '"I already told you, I''m gonna be late for school," you say, <<$sex_ev[''dress_describe'']>>. "You gotta get out of here so I can lock up."'
  1068. elseif hour = 7:
  1069. '"Gotta get to school," you say, <<$sex_ev[''dress_describe'']>>. "And you gotta get out of here so I can lock up."'
  1070. else
  1071. '"Gotta get ready for school," you say, <<$sex_ev[''dress_describe'']>>. "And you gotta get out of here so I can lock up."'
  1072. end
  1073. if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
  1074. gs 'sex_ev_leave', 'sex_ev_invite_later'
  1075. else
  1076. '"No problem."'
  1077. gs'sex_ev_morning', 'end_morning'
  1078. end
  1079. else
  1080. if sex_ev['late_for_school'] = 1 and hour >= 8:
  1081. '"I already told you, I''m late for school," you say, <<$sex_ev[''dress_describe'']>>. "But thanks for letting me spend the night. And the second fuck," you add with a wink.'
  1082. elseif sex_ev['late_for_school'] = 1:
  1083. '"I already told you, I''m gonna be late for school," you say, <<$sex_ev[''dress_describe'']>>. "But thanks for letting me spend the night. And the second fuck," you add with a wink.'
  1084. elseif hour = 7:
  1085. '"Gotta get to school," you say, <<$sex_ev[''dress_describe'']>>. "Thanks for letting me spend the night."'
  1086. else
  1087. '"Gotta get ready for school," you say, <<$sex_ev[''dress_describe'']>>. "Thanks for letting me spend the night."'
  1088. end
  1089. if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
  1090. gs 'sex_ev_leave', 'sex_ev_invite_later'
  1091. else
  1092. '"No problem."'
  1093. gs'sex_ev_morning', 'end_morning'
  1094. end
  1095. end
  1096. gs'sex_ev_leave', 'dress_talk'
  1097. end
  1098. end
  1099. end
  1100. if $ARGS[0] = 'school_night':
  1101. if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and (week < 5 or week = 7):
  1102. act'It''s a school night':
  1103. cla & *clr
  1104. gs'sex_ev_leave', 'dress_loop'
  1105. gs'sex_ev_leave', 'dress_start_desc'
  1106. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  1107. !! if schoolprogul = 1:
  1108. if $sex_ev['loc'] = 'pc_home':
  1109. '"It''s a school night," you say, <<$sex_ev[''dress_describe'']>>. "You gotta go so I can get up for class tomorrow."'
  1110. if rand(1,10) < 0:
  1111. '"Are you sure I can''t spend the night?'
  1112. else
  1113. '"Okay."'
  1114. if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
  1115. gs 'sex_ev_leave', 'sex_ev_invite_later'
  1116. else
  1117. gs 'sex_ev_leave', 'dressing2'
  1118. end
  1119. gs'sex_ev_leave', 'dress_talk'
  1120. end
  1121. else
  1122. '"It''s a school night," you say, <<$sex_ev[''dress_describe'']>>. "Gotta get home so I can set my alarm and get up for class tomorrow."'
  1123. if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
  1124. gs 'sex_ev_leave', 'sex_ev_invite_later'
  1125. else
  1126. gs 'sex_ev_leave', 'dressing2'
  1127. end
  1128. gs'sex_ev_leave', 'dress_talk'
  1129. end
  1130. end
  1131. end
  1132. end
  1133. if $ARGS[0] = 'panty_gift':
  1134. if $pantyworntype ! 'none' and $braworntype = 'none' and $clothingworntype = 'nude' and sex_ev['mad'] = 0 and sex_ev['fuck_count'] > 0 and $sex_ev['loc'] ! 'pc_home':
  1135. act'Give him your panties':
  1136. npc_panty_give[$boy] += 1
  1137. gs 'panties', 'dispose'
  1138. cla & *clr
  1139. '<center><video autoplay loop src="images/shared/romance/misc/panty_gift.mp4"></video></center>'
  1140. 'Just after you put on your panties, a sexy thought pops into your head.'
  1141. *nl
  1142. '"But before I go," you say mischievously. "I have a gift for you."'
  1143. if npc_panty_give[$boy] = 1:
  1144. '"A gift?" <<$npc_firstname[$boy]>> asks curiously.'
  1145. *nl
  1146. 'In one smooth motion, you slide your panties down your legs and daintily toss them onto the rumpled sheets of the bed on which you fucked <<$npc_firstname[$boy]>>.'
  1147. gs 'sex_ev_leave', 'panty_gift2'
  1148. else
  1149. '"Another pair of your panties?" <<$npc_firstname[$boy]>> grins.'
  1150. '"You guessed correctly," you grin back. "And your prize is-!"'
  1151. *nl
  1152. 'In one smooth motion, you slide your panties down your legs and daintily toss them into the rumpled sheets of the bed you were just fucked in.'
  1153. *nl
  1154. !!'"Enjoy," you smirk.'
  1155. gs 'sex_ev_leave', 'panty_gift2'
  1156. end
  1157. end
  1158. end
  1159. end
  1160. if $ARGS[0] = 'panty_gift2':
  1161. act'You did a good job':
  1162. cla & *clr
  1163. gs'sex_ev_leave', 'dress_loop'
  1164. '"You did a good job," you smile, <<$sex_ev[''dress_describe'']>>. "Consider that your reward."'
  1165. if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
  1166. if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
  1167. '"And what am I supposed to do with these when my girlfriend comes home?" he asks, looking at them amusedly.'
  1168. if $sex_ev['type'] = 'hookup':
  1169. gs 'sex_ev_hookup_leave', 'panty_gift_girlfriend'
  1170. else
  1171. gs 'sex_ev_leave', 'panty_gift_girlfriend'
  1172. end
  1173. else
  1174. '<<$npc_firstname[$boy]>> doesn''t reply, but his expression says that he isn''t displeased.'
  1175. if $sex_ev['type'] = 'hookup':
  1176. gs 'sex_ev_hookup_leave', 'later'
  1177. else
  1178. gs 'sex_ev_leave', 'dressing2'
  1179. end
  1180. end
  1181. end
  1182. act'Something to remember the occasion':
  1183. cla & *clr
  1184. gs'sex_ev_leave', 'dress_loop'
  1185. if daystage > 3:
  1186. '"Something to remember the night," you smile, <<$sex_ev[''dress_describe'']>>. "Keep the good times in mind."'
  1187. else
  1188. '"Something to remember the day," you smile, <<$sex_ev[''dress_describe'']>>. "Keep the good times in mind."'
  1189. end
  1190. if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
  1191. if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
  1192. '"And what am I supposed to do with these when my girlfriend comes home?" he asks, looking at them amusedly.'
  1193. if $sex_ev['type'] = 'hookup':
  1194. gs 'sex_ev_hookup_leave', 'panty_gift_girlfriend'
  1195. else
  1196. gs 'sex_ev_leave', 'panty_gift_girlfriend'
  1197. end
  1198. else
  1199. '"Maybe I should frame it," <<$npc_firstname[$boy]>> snickers.'
  1200. if $sex_ev['type'] = 'hookup':
  1201. gs 'sex_ev_hookup_leave', 'later'
  1202. else
  1203. gs 'sex_ev_leave', 'dressing2'
  1204. end
  1205. end
  1206. end
  1207. act'Consider it a trophy':
  1208. cla & *clr
  1209. gs'sex_ev_leave', 'dress_loop'
  1210. '"A trophy," you smile, <<$sex_ev[''dress_describe'']>>. "Consider it proof of conquest."'
  1211. if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
  1212. if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
  1213. '"And what am I supposed to do with these when my girlfriend comes home?" he asks, looking at them amusedly.'
  1214. if $sex_ev['type'] = 'hookup':
  1215. gs 'sex_ev_hookup_leave', 'panty_gift_girlfriend'
  1216. else
  1217. gs 'sex_ev_leave', 'panty_gift_girlfriend'
  1218. end
  1219. else
  1220. '<<$npc_firstname[$boy]>> doesn''t reply, but his expression says that he isn''t displeased.'
  1221. if $sex_ev['type'] = 'hookup':
  1222. gs 'sex_ev_hookup_leave', 'later'
  1223. else
  1224. gs 'sex_ev_leave', 'dressing2'
  1225. end
  1226. end
  1227. end
  1228. if sex_ev['virgin'] = 1:
  1229. act'To remember my virginity':
  1230. cla & *clr
  1231. gs'sex_ev_leave', 'dress_loop'
  1232. '"To remember my virginity," you smile, <<$sex_ev[''dress_describe'']>>. "And that you made me a woman."'
  1233. if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
  1234. if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
  1235. '"And what am I supposed to do with these when my girlfriend comes home?" he asks, looking at them amusedly.'
  1236. if $sex_ev['type'] = 'hookup':
  1237. gs 'sex_ev_hookup_leave', 'panty_gift_girlfriend'
  1238. else
  1239. gs 'sex_ev_leave', 'panty_gift_girlfriend'
  1240. end
  1241. else
  1242. '<<$npc_firstname[$boy]>> doesn''t reply, but his expression says that he isn''t displeased.'
  1243. if $sex_ev['type'] = 'hookup':
  1244. gs 'sex_ev_hookup_leave', 'later'
  1245. else
  1246. gs 'sex_ev_leave', 'dressing2'
  1247. end
  1248. end
  1249. end
  1250. end
  1251. if sex_ev['orgasm_count'] > 0:
  1252. act'For making me orgasm':
  1253. cla & *clr
  1254. gs'sex_ev_leave', 'dress_loop'
  1255. '"For making me come," you smile, <<$sex_ev[''dress_describe'']>>. "That deserves an award."'
  1256. if npc_girlfriend[$boy] = 1:
  1257. if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
  1258. '"And what am I supposed to do with these when my girlfriend comes home?" he asks, looking at them amusedly.'
  1259. if $sex_ev['type'] = 'hookup':
  1260. gs 'sex_ev_hookup_leave', 'panty_gift_girlfriend'
  1261. else
  1262. gs 'sex_ev_leave', 'panty_gift_girlfriend'
  1263. end
  1264. else
  1265. '<<$npc_firstname[$boy]>> doesn''t say anything in response, but given the lustful glint in his eyes, he seems pretty pleased.'
  1266. if $sex_ev['type'] = 'hookup':
  1267. gs 'sex_ev_hookup_leave', 'later'
  1268. else
  1269. gs 'sex_ev_leave', 'dressing2'
  1270. end
  1271. end
  1272. end
  1273. act'For making me orgasm (tradition)':
  1274. cla & *clr
  1275. gs'sex_ev_leave', 'dress_loop'
  1276. if $sex_ev['type'] = 'hookup':
  1277. '"For making me come," you smile, <<$sex_ev[''dress_describe'']>>. "I always give a boy my panties if he makes me come."'
  1278. else
  1279. '"Cause you made me come," you smile, <<$sex_ev[''dress_describe'']>>. "You know I always give a boy my panties if he makes me come."'
  1280. end
  1281. if npc_girlfriend[$boy] = 1:
  1282. if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
  1283. '"And what am I supposed to do with these when my girlfriend comes home?" he asks, looking at them amusedly.'
  1284. if $sex_ev['type'] = 'hookup':
  1285. gs 'sex_ev_hookup_leave', 'panty_gift_girlfriend'
  1286. else
  1287. gs 'sex_ev_leave', 'panty_gift_girlfriend'
  1288. end
  1289. else
  1290. '<<$npc_firstname[$boy]>> doesn''t say anything in response, but given the lustful glint in his eyes, he seems pretty pleased.'
  1291. if $sex_ev['type'] = 'hookup':
  1292. gs 'sex_ev_hookup_leave', 'later'
  1293. else
  1294. gs 'sex_ev_leave', 'dressing2'
  1295. end
  1296. end
  1297. end
  1298. end
  1299. end
  1300. if $ARGS[0] = 'panty_gift_girlfriend':
  1301. act'Hide them':
  1302. cla & *nl
  1303. '"Just hide them," you say, <<$sex_ev[''dress_describe'']>>. "If you can hide a fucking a girl in your bed, surely you can hide a pair of panties."'
  1304. gs 'sex_ev_leave', 'dressing2'
  1305. end
  1306. act'Say they''re hers':
  1307. cla & *nl
  1308. '"Tell her they''re hers," you shrug with a wry smirk, <<$sex_ev[''dress_describe'']>>. "Maybe she''ll think she bought them."'
  1309. gs 'sex_ev_leave', 'dressing2'
  1310. end
  1311. act'Say they''re yours':
  1312. gs'sex_ev_leave', 'dress_loop_code'
  1313. cla & *nl
  1314. '"Tell her they''re yours," you shrug with a wry smirk, <<$sex_ev[''dress_describe'']>>. "A guy can''t wear a cute pair of panties now and then?"'
  1315. if npc_insecure[$boy] = 1:
  1316. gs'sex_ev_leave', 'dress_loop_code'
  1317. '<<$npc_firstname[$boy]>>''s face immediately reddens and he looks at you with an angry glare.'
  1318. '"What the fuck? I''m not some twink who puts on girlie panties like a fucking faggot!"'
  1319. act'I was kidding (amused)':
  1320. cla & *clr
  1321. $sex_ev['bed_room']
  1322. '"I was just kidding," you snicker, rolling your eyes. "Bad joke, sorry."'
  1323. 'You move to <<$sex_ev[''dress_describe'']>> but <<$npc_firstname[$boy]>> continues to glare at you out of the corner of your eye for a few moments longer before looking away.'
  1324. gs 'sex_ev_leave', 'dressing2'
  1325. end
  1326. act'I was kidding (acerbic)':
  1327. cla & *clr
  1328. $sex_ev['bed_room']
  1329. '"Christ, I was just kidding," you say, giving <<$npc_firstname[$boy]>> a look of exasperation. "Of course I wasn''t seriously suggesting that. Take a joke, dumbass."'
  1330. 'You start <<$sex_ev[''dress_describe'']>> but <<$npc_firstname[$boy]>> continues to glare at you out of the corner of your eye for a few moments longer before looking away.'
  1331. gs 'sex_ev_leave', 'dressing2'
  1332. end
  1333. else
  1334. '<<$npc_firstname[$boy]>> laughs aloud.'
  1335. '"Yeah, I bet that''d get me off the hook."'
  1336. gs 'sex_ev_leave', 'dressing2'
  1337. end
  1338. end
  1339. act'Give them to her':
  1340. cla & *nl
  1341. '"Gift them to her," you say mischievously, <<$sex_ev[''dress_describe'']>>. "Maybe she''ll put them on."'
  1342. gs 'sex_ev_leave', 'dressing2'
  1343. end
  1344. act'Throw them away':
  1345. cla & *nl
  1346. '"Throw them away then," you shrug, <<$sex_ev[''dress_describe'']>>. "I don''t care. Do whatever you want with them.'
  1347. gs'sex_ev_leave', 'dress_loop_code'
  1348. '"After all, they''re your panties now," you add with a smirk, <<$sex_ev[''dress_describe'']>>.'
  1349. gs 'sex_ev_leave', 'dressing2'
  1350. end
  1351. end
  1352. if $ARGS[0] = 'dress_image':
  1353. cla & *clr
  1354. if sex_ev['CloDress'] = 1:
  1355. '<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/bed_dress.jpg"></center>'
  1356. else
  1357. '<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
  1358. end
  1359. end
  1360. if $ARGS[0] = 'dress_loop':
  1361. !! always call at the top before the text, not after
  1362. cla & *clr
  1363. gs'sex_ev_leave', 'dress_loop_code'
  1364. gs'sex_ev_leave', 'dressing_image'
  1365. gs'stat'
  1366. end
  1367. if $ARGS[0] = 'dress_loop_end':
  1368. !! this forces the player to get fully dressed
  1369. gs'sex_ev_leave', 'dress_loop_code'
  1370. if sex_ev['dress_end'] ! 1:
  1371. gs'sex_ev_leave', 'dress_loop_end'
  1372. else
  1373. gs'stat'
  1374. end
  1375. end
  1376. if $ARGS[0] = 'dress_loop_code':
  1377. :dress_loop_start
  1378. if sex_ev['dressing_start'] ! 1:
  1379. sex_ev['dressing_start'] = 1
  1380. $sex_ev['dress_describe'] = 'reaching down for your clothes'
  1381. !! elseif $lastwornpantytype ! 'none' and $lastwornbratype ! 'none' and $pantyworntype = 'none' and sex_ev['panty_wear'] ! 1 and sex_ev['bra_wear'] ! 1:
  1382. !! gs 'panties', 'wear', $lastwornpantytype, lastwornpantynumber['sex_ev']
  1383. !! gs 'bras', 'wear', $lastwornbratype, lastwornbranumber['sex_ev']
  1384. !! sex_ev['panty_wear'] = 1
  1385. !! sex_ev['bra_wear'] = 1
  1386. !! killvar 'lastwornpantytype'
  1387. !! killvar 'lastwornpantynumber'
  1388. !! killvar 'lastwornbratype'
  1389. !! killvar 'lastwornbranumber'
  1390. !! $sex_ev['dress_describe'] = 'pulling your panties up your legs and fastening your bra around your chest'
  1391. elseif $lastwornpantytype ! 'none' and $pantyworntype = 'none' and sex_ev['panty_wear'] ! 1:
  1392. gs 'panties', 'wear', $lastwornpantytype, lastwornpantynumber
  1393. killvar 'lastwornpantytype'
  1394. killvar 'lastwornpantynumber'
  1395. sex_ev['panty_wear'] = 1
  1396. $sex_ev['dress_describe'] = 'pulling your panties up'
  1397. elseif $lastwornbratype ! 'none' and $lastwornbratype ! '' and $braworntype = 'none' and sex_ev['bra_wear'] ! 1:
  1398. gs 'bras', 'wear', $lastwornbratype, lastwornbranumber
  1399. killvar 'lastwornbratype'
  1400. killvar 'lastwornbranumber'
  1401. sex_ev['bra_wear'] = 1
  1402. $sex_ev['dress_describe'] = 'fastening your bra around your chest'
  1403. elseif $clothingworntype = 'nude' and $lastwornclothingtype ! 'nude':
  1404. gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
  1405. jump 'dress_loop_start'
  1406. elseif $clothingworntype ! 'nude' and sex_ev['dress_end'] ! 1:
  1407. if CloDress = 1 and (sex_ev['dress_top_wear'] ! 1 or sex_ev['dress_skirt_wear'] ! 1):
  1408. if sex_ev['dress_top_wear'] ! 1:
  1409. sex_ev['dress_top_wear'] = 1
  1410. $sex_ev['dress_describe'] = 'pulling your dress over your shoulders'
  1411. elseif sex_ev['dress_skirt_wear'] ! 1:
  1412. sex_ev['dress_skirt_wear'] = 1
  1413. sex_ev['dress_end'] = 1
  1414. $sex_ev['dress_describe'] = 'smoothing your skirt out'
  1415. end
  1416. else
  1417. if CloSkirtShortness > 0 and sex_ev['skirt_wear'] ! 1 and sex_ev['dress_end'] ! 1:
  1418. sex_ev['skirt_wear'] = 1
  1419. if $pantyworntype = 'none':
  1420. $sex_ev['dress_describe'] = 'slipping your skirt up your legs'
  1421. else
  1422. $sex_ev['dress_describe'] = 'zipping your skirt up over your panties'
  1423. end
  1424. elseif CloSkirtShortness = 0 and sex_ev['dress_end'] ! 1 and sex_ev['pants_wear'] ! 1:
  1425. sex_ev['pants_wear'] = 1
  1426. $sex_ev['dress_describe'] = 'tugging your pants over your hips'
  1427. else
  1428. sex_ev['dress_end'] = 1
  1429. if $braworntype = 'none':
  1430. $sex_ev['dress_describe'] = 'pulling your top over your breasts'
  1431. else
  1432. $sex_ev['dress_describe'] = 'pulling your top over your bra'
  1433. end
  1434. end
  1435. end
  1436. elseif $shoeworntype ! 'none' and sex_ev['dress_end'] ! 1:
  1437. if $shoeworntype = 'danilovich':
  1438. $sex_ev['dress_describe'] = 'tying up your shoe laces'
  1439. else
  1440. $sex_ev['dress_describe'] = 'slipping on your shoes'
  1441. end
  1442. sex_ev['dress_end'] = 1
  1443. elseif sex_ev['dress_end'] = 1:
  1444. if CloDress = 1:
  1445. $sex_ev['dress_describe'] = 'checking your dress'
  1446. elseif CloSkirtShortness > 0:
  1447. $sex_ev['dress_describe'] = 'smoothing your skirt'
  1448. else
  1449. $sex_ev['dress_describe'] = 'checking your clothes'
  1450. end
  1451. else
  1452. '<b>Failsafe:</b> dressing did not happen properly and <<sex_ev[''dress_end'']>> ! 1'
  1453. end
  1454. end
  1455. if $ARGS[0] = 'dress_talk':
  1456. cla
  1457. gs'sex_ev_leave', 'dressing_finish'
  1458. gs 'sex_ev_leave', 'dress_talk_pc'
  1459. gs 'sex_ev_leave', 'panty_gift'
  1460. if sex_ev['dress_end'] ! 1 and sex_ev['plans_later_talk'] = 0 and rand(0,1) = 1 and $sex_ev['type'] ! 'hookup':
  1461. gs 'sex_ev_leave', 'npc_sex_ev_invite'
  1462. !!{
  1463. !! he initiates
  1464. gs 'sex_ev_leave', 'dress_talk_boy'
  1465. else
  1466. !! player initiates
  1467. gs 'sex_ev_leave', 'dress_talk_pc'
  1468. }
  1469. else
  1470. gs 'sex_ev_after', 'after_sex_dressed'
  1471. end
  1472. end
  1473. if $ARGS[0] = 'dress_talk_boy':
  1474. if $sex_ev['type'] ! 'hookup':
  1475. if sex_ev['dress_talk2'] = 0:
  1476. '"What''re you up to later?"'
  1477. if date_variable > 0:
  1478. !! CHANGE THIS PLACEHOLDER VARIABLE
  1479. act'I have a date with my boyfriend':
  1480. cla
  1481. act'Embarrassed':
  1482. gs'sex_ev_after', 'dress_image'
  1483. '"I have a date with my boyfriend later," you say, blushing shyly.'
  1484. gs'sex_ev_after', 'npc_date_later_response'
  1485. 'Your blush deepens in response.'
  1486. end
  1487. act'Casual':
  1488. gs'sex_ev_after', 'dress_image'
  1489. '"I have a date with my boyfriend later,"'
  1490. gs'sex_ev_after', 'npc_date_later_response'
  1491. end
  1492. act'Exhasperated':
  1493. gs'sex_ev_after', 'dress_image'
  1494. '"I have a date with my boyfriend later,"'
  1495. gs'sex_ev_after', 'npc_date_later_response'
  1496. end
  1497. end
  1498. end
  1499. end
  1500. if sex_ev['dress_talk3'] = 0:
  1501. end
  1502. if sex_ev['dress_talk4'] = 0:
  1503. end
  1504. if sex_ev['dress_talk5'] = 0:
  1505. end
  1506. gs 'sex_ev_leave', 'npc_sex_ev_invite'
  1507. end
  1508. end
  1509. if $ARGS[0] = 'dress_talk_pc':
  1510. if sex_ev['plans_later_talk'] = 0 and (hour < 16 or sex_ev['sleepover'] = 1):
  1511. act'Ask him what he''s doing later':
  1512. sex_ev['plans_later_talk'] = 1
  1513. gs'sex_ev_leave', 'dress_loop'
  1514. '"Got any plans for the rest day?" you ask, casually <<$sex_ev[''dress_describe'']>>.'
  1515. gs 'sex_ev_leave', 'dress_talk'
  1516. if npc_day_off[$boy] = week:
  1517. '"Not really," <<$npc_firstname[$boy]>> shrugs. "It''s my day off so I''m just chilling."'
  1518. gs'sex_ev_leave', 'pc_sex_ev_invite'
  1519. else
  1520. '"I have to go to work," <<$npc_firstname[$boy]>> replies.'
  1521. gs'sex_ev_leave', 'when_do_you_get_off'
  1522. end
  1523. end
  1524. end
  1525. if sex_ev['dress_talk2'] = 0:
  1526. end
  1527. if sex_ev['dress_talk3'] = 0:
  1528. end
  1529. if sex_ev['dress_talk4'] = 0:
  1530. end
  1531. gs'sex_ev_leave', 'had_a_good_time'
  1532. gs'sex_ev_leave', 'stay_over_thanks'
  1533. gs'sex_ev_leave', 'walk_funny'
  1534. !! gs'sex_ev_leave', 'leak_all_day'
  1535. end
  1536. !!if $ARGS[0] = '':
  1537. !!end
  1538. if $ARGS[0] = 'had_a_good_time':
  1539. if sex_ev['good_time'] = 0 and sex_ev['annoyed'] = 0:
  1540. act'I had a good time':
  1541. cla & *clr
  1542. sex_ev['good_time'] = 1
  1543. gs'sex_ev_leave', 'dress_loop'
  1544. if sex_ev['spend_night_thanks'] = 1:
  1545. '"Last night was really great," you smile at <<$npc_firstname[$boy]>>. "I had a lot of fun."'
  1546. elseif sex_ev['sleepover'] = 1:
  1547. '"I had a great time last night," you smile at <<$npc_firstname[$boy]>>.'
  1548. else
  1549. '"This was really fun," you smile at <<$npc_firstname[$boy]>>. "I had a great time."'
  1550. end
  1551. if sex_ev['blue_ball'] = 0:
  1552. '"Me too," he smirks back, watching you <<$sex_ev[''dress_describe'']>>.'
  1553. elseif npc_selfish[$boy] = 1:
  1554. '"Still bullshit that I didn''t get to finish properly," he mutters sourly.'
  1555. else
  1556. '"I just wish it didn''t have to end so soon," he replies, watching you <<$sex_ev[''dress_describe'']>>.'
  1557. '"Sorry," you say ruefully.'
  1558. end
  1559. gs'sex_ev_leave', 'dress_talk'
  1560. gs'sex_ev_leave', 'stay_over_thanks'
  1561. end
  1562. end
  1563. end
  1564. if $ARGS[0] = 'stay_over_thanks':
  1565. if sex_ev['spend_night_thanks'] = 0 and sex_ev['sleepover'] = 1:
  1566. act'Thanks for letting me stay over':
  1567. cla & *clr
  1568. sex_ev['spend_night_thanks'] = 1
  1569. gs'sex_ev_leave', 'dress_loop'
  1570. if sex_ev['good_time'] = 1:
  1571. '"Thanks for letting me stay over too," you tell <<$npc_firstname[$boy]>>. "I really appreciate it."'
  1572. else
  1573. '"Thanks for letting me spend the night," you tell <<$npc_firstname[$boy]>>. "I really appreciate it."'
  1574. end
  1575. if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
  1576. pc_know_npc_has_girlfriend[$boy] = 1
  1577. '"Lucky my girlfriend wasn''t coming over," he smirks back, watching you <<$sex_ev[''dress_describe'']>>.'
  1578. elseif npc_caretaker[$boy] = 1 or npc_generous[$boy] = 1:
  1579. '"Yeah no problem," he smiles back, watching you <<$sex_ev[''dress_describe'']>>.'
  1580. elseif sex_ev['pass_out'] = 1:
  1581. '"You passed out on me," he shrugs, watching you <<$sex_ev[''dress_describe'']>>. "What was I supposed to do? Wake you up and kick you out?"'
  1582. else
  1583. 'He shrugs in a "whatever" manner while he watches you <<$sex_ev[''dress_describe'']>>.'
  1584. end
  1585. gs'sex_ev_leave', 'dress_talk'
  1586. gs'sex_ev_leave', 'had_a_good_time'
  1587. end
  1588. end
  1589. end
  1590. if $ARGS[0] = 'walk_funny':
  1591. if sex_ev['fuck_count'] > 5 and $sex_ev['walk_funny_talk'] = '' and pain['vaginal'] > 10:
  1592. if hour < 16:
  1593. $sex_ev['walk_funny_day'] = 'day'
  1594. else
  1595. $sex_ev['walk_funny_day'] = 'day tomorrow'
  1596. end
  1597. act'I''m gonna walk funny because of you':
  1598. cla
  1599. act'Embarrassed':
  1600. cla & *clr
  1601. $sex_ev['walk_funny_talk'] = 'embarrassed'
  1602. gs'sex_ev_leave', 'dress_loop'
  1603. if $sex_ev['dress_describe'] = 'pulling your panties up':
  1604. '"I''m going to walk funny all <<$sex_ev[''walk_funny_day'']>> because of you," you say, blushing slightly as you pull your panties up over your sore pussy.'
  1605. elseif $sex_ev['dress_describe'] = 'tugging your pants over your hips' and $pantyworntype = 'none':
  1606. '"I''m going to walk funny all <<$sex_ev[''walk_funny_day'']>> because of you," you say, blushing slightly as you pull your pants up over your sore pussy.'
  1607. else
  1608. '"I''m going to walk funny all <<$sex_ev[''walk_funny_day'']>> because of you," you say, blushing as you''re <<$sex_ev[''dress_describe'']>>.'
  1609. end
  1610. gs'sex_ev_leave', 'walk_funny2'
  1611. end
  1612. act'Annoyed':
  1613. cla & *clr
  1614. $sex_ev['walk_funny_talk'] = 'annoyed'
  1615. gs'sex_ev_leave', 'dress_loop'
  1616. if $sex_ev['dress_describe'] = 'pulling your panties up':
  1617. '"I''m going to walk funny all <<$sex_ev[''walk_funny_day'']>> because of you," you scowl, wincing slightly as you pull your panties up over your sore pussy.'
  1618. elseif $sex_ev['dress_describe'] = 'tugging your pants over your hips' and $pantyworntype = 'none':
  1619. '"I''m going to walk funny all <<$sex_ev[''walk_funny_day'']>> because of you," you scowl, wincing slightly as you pull your pants up over your sore pussy.'
  1620. else
  1621. '"I''m going to walk funny all <<$sex_ev[''walk_funny_day'']>> because of you," you scowl, wincing slightly as you''re <<$sex_ev[''dress_describe'']>>.'
  1622. end
  1623. gs'sex_ev_leave', 'walk_funny2'
  1624. end
  1625. act'Sexy':
  1626. cla & *clr
  1627. $sex_ev['walk_funny_talk'] = 'sexy'
  1628. gs'sex_ev_leave', 'dress_loop'
  1629. if $sex_ev['dress_describe'] = 'pulling your panties up':
  1630. '"I''m going to walk funny all <<$sex_ev[''walk_funny_day'']>> because of you," you say ruefully while also sexily rubbing your thighs together even as you pull your panties up over your sore pussy.'
  1631. elseif $sex_ev['dress_describe'] = 'tugging your pants over your hips' and $pantyworntype = 'none':
  1632. '"I''m going to walk funny all <<$sex_ev[''walk_funny_day'']>> because of you," you say ruefully while also sexily rubbing your thighs together even as you pull your pants up over your sore pussy.'
  1633. else
  1634. '"I''m going to walk funny all <<$sex_ev[''walk_funny_day'']>> because of you," you say ruefully while also sexily rubbing your thighs together even as you''re <<$sex_ev[''dress_describe'']>>.'
  1635. end
  1636. gs'sex_ev_leave', 'walk_funny2'
  1637. end
  1638. end
  1639. end
  1640. end
  1641. if $ARGS[0] = 'walk_funny2':
  1642. if sex_ev['rough_enjoy'] = 1:
  1643. '"I know you like it rough," <<$npc_firstname[$boy]>> smirks at your awkward stance.'
  1644. gs'sex_ev_leave', 'walk_funny3'
  1645. elseif npc_caretaker[$boy] = 1:
  1646. '"Sorry," <<$npc_firstname[$boy]>> says with a guilty smile.'
  1647. if $sex_ev['walk_funny_talk'] = 'embarrassed':
  1648. '"It''s okay," you reply. "It''s my fault too."'
  1649. elseif $sex_ev['walk_funny_talk'] = 'annoyed':
  1650. '"At least you have the decency to apologize," you reply with a rueful smirk.'
  1651. elseif $sex_ev['walk_funny_talk'] = 'sexy':
  1652. '"Don''t be. I loved it."'
  1653. 'You flash a sexy smile back at him.'
  1654. end
  1655. gs'sex_ev_leave', 'dress_talk'
  1656. elseif npc_arrogant[$boy] = 1:
  1657. '"You know you liked it," <<$npc_firstname[$boy]>> says, proudly looking at your awkward stance.'
  1658. gs'sex_ev_leave', 'walk_funny3'
  1659. elseif npc_rough_lover[$boy] = 1:
  1660. '"It wasn''t good sex if you aren''t sore the next day," <<$npc_firstname[$boy]>> snickers, seemingly taking pleasure in your awkward stance.'
  1661. gs'sex_ev_leave', 'walk_funny3'
  1662. else
  1663. '"I''ll take credit for that," <<$npc_firstname[$boy]>> says, smirking at your awkward stance.'
  1664. gs'sex_ev_leave', 'walk_funny3'
  1665. end
  1666. end
  1667. if $ARGS[0] = 'walk_funny3':
  1668. if $sex_ev['walk_funny_talk'] = 'embarrassed':
  1669. 'You can''t help but blush even deeper at his reply.'
  1670. elseif $sex_ev['walk_funny_talk'] = 'annoyed':
  1671. 'Your scowl deepens at his reply.'
  1672. elseif $sex_ev['walk_funny_talk'] = 'sexy':
  1673. 'You flash a sexy smile back at him.'
  1674. end
  1675. gs'sex_ev_leave', 'dress_talk'
  1676. end
  1677. if $ARGS[0] = 'leak_all_day':
  1678. if cum_vol['vagina'] > 100 and $sex_ev['cum_leak_talk'] = '' and hour < 10:
  1679. act'Gonna be leaking cum all day':
  1680. cla
  1681. act'Embarrassed':
  1682. cla & *clr
  1683. $sex_ev['cum_leak_talk'] = 'embarrassed'
  1684. gs'sex_ev_leave', 'dress_loop'
  1685. if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and (week < 5 or week = 7):
  1686. !! if schoolday
  1687. if $sex_ev['dress_describe'] = 'pulling your panties up':
  1688. '"I can''t believe I have to go to class full of your cum," you say, blushing furiously as you pull your panties up over your dripping snatch. The aforementioned cum immediately seeps into the fabric, creating an uncomfortable damp spot. "I''m going to be sitting in it all day!"'
  1689. elseif $pantyworntype = 'none':
  1690. if $sex_ev['dress_describe'] = 'slipping your skirt up your legs':
  1691. '"I can''t believe I have to go to class full of your cum," you say, blushing furiously as you slip your skirt up over your hips, feeling the aforementioned cum trickle down your thighs. "I''m going to be leaking all day! It''s gonna stain my skirt!"'
  1692. elseif $sex_ev['dress_describe'] = 'tugging your pants over your hips':
  1693. '"I can''t believe I have to go to class full of your cum," you say, blushing furiously as you pull your pants up over your dripping snatch. The aforementioned cum immediately seeps into the fabric, creating an uncomfortable damp spot between your thighs. "I''m going to be leaking all day! It''s gonna stain my skirt!"'
  1694. elseif CloSkirtShortness > 0:
  1695. '"I can''t believe I have to go to class full of your cum," you say, blushing furiously as you''re <<$sex_ev[''dress_describe'']>>, suddenly feeling some trickle down your thighs beneath your skirt. "I''m going to be leaking all day! It''s gonna stain my skirt!"'
  1696. else
  1697. '"I can''t believe I have to go to class full of your cum," you say, blushing furiously as you''re <<$sex_ev[''dress_describe'']>>. The aforementioned cum has already seeped into the fabric of your pants, creating an uncomfortable damp spot between your thighs. "I''m going to be leaking all day! It''s gonna stain my skirt!"'
  1698. end
  1699. else
  1700. '"I can''t believe I have to go to class full of your cum," you say, blushing furiously as you''re <<$sex_ev[''dress_describe'']>>. The aforementioned cum has already seeped into your panties, creating an uncomfortable damp spot between your thighs. "I''m going to be leaking all day! It''s gonna stain my skirt!"'
  1701. end
  1702. else
  1703. !! if not schoolday
  1704. if $sex_ev['dress_describe'] = 'pulling your panties up':
  1705. '"I''m so full of your cum, I''m going to have to sit in it all," you say, blushing furiously as you pull your panties up over your dripping snatch. The aforementioned cum immediately seeps into the fabric, creating an uncomfortable damp spot. "It''s gonna stain my panties!"'
  1706. elseif $pantyworntype = 'none':
  1707. if $sex_ev['dress_describe'] = 'slipping your skirt up your legs':
  1708. '"I''m so full of your cum, I''m going to be leaking all day," you say, blushing furiously as you slip your skirt up over your hips, feeling the aforementioned cum trickle down your thighs. "It''s gonna stain my skirt!"'
  1709. elseif $sex_ev['dress_describe'] = 'tugging your pants over your hips':
  1710. '"I''m so full of your cum, I''m going to have to sit in it all," you say, blushing furiously as you pull your pants up over your dripping snatch. The aforementioned cum immediately seeps into the fabric, creating an uncomfortable damp spot between your thighs.'
  1711. elseif CloSkirtShortness > 0:
  1712. '"I''m so full of your cum, I''m going to be leaking all day," you say, blushing furiously as you''re <<$sex_ev[''dress_describe'']>>, suddenly feeling some trickle down your thighs beneath your skirt. "It''s gonna stain my skirt!"'
  1713. else
  1714. '"I''m so full of your cum, I''m going to be sitting in it all day," you say, blushing furiously as you''re <<$sex_ev[''dress_describe'']>>. The aforementioned cum has already seeped into the fabric of your pants, creating an uncomfortable damp spot between your thighs.'
  1715. end
  1716. else
  1717. '"I''m so full of your cum, I''m going to be sitting in it all day," you say, blushing furiously as you''re <<$sex_ev[''dress_describe'']>>. The aforementioned cum has already seeped into your panties, creating an uncomfortable damp spot between your thighs. "It''s gonna stain my panties!"'
  1718. end
  1719. end
  1720. gs'sex_ev_leave', 'leak_all_day2'
  1721. end
  1722. act'Annoyed':
  1723. cla & *clr
  1724. $sex_ev['cum_leak_talk'] = 'annoyed'
  1725. gs'sex_ev_leave', 'dress_loop'
  1726. if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and (week < 5 or week = 7):
  1727. !! if schoolday
  1728. if $sex_ev['dress_describe'] = 'pulling your panties up':
  1729. '"I can''t believe I have to go to class like this," you scowl, pulling your panties up over your hips and immediately feel a glob of <<$npc_firstname[$boy]>>''s cum seep out to form an uncomfortable damp spot on the fabric. "I''m going to be sitting in this all day!"'
  1730. elseif $pantyworntype = 'none':
  1731. if $sex_ev['dress_describe'] = 'slipping your skirt up your legs':
  1732. '"I can''t believe I have to go to class like this," you scowl as you slip your skirt up over your hips and feel <<$npc_firstname[$boy]>>''s cum trickle out of your pussy and down your thighs. "If my classmates see this, it''s your fault."'
  1733. elseif $sex_ev['dress_describe'] = 'tugging your pants over your hips':
  1734. '"I can''t believe I have to go to class like this," you scowl, pulling your pants up over your dripping snatch and immediately feel an uncomfortable damp spot form on the fabric. "Ugh! This is going to be leaking out of me all day!"'
  1735. elseif CloSkirtShortness > 0:
  1736. '"I can''t believe I have to go to class like this," you scowl as you''re <<$sex_ev[''dress_describe'']>>, suddenly feeling some trickle down your thighs beneath your skirt. "I''m going to be leaking all day! It''s gonna stain my skirt!"'
  1737. else
  1738. '"I can''t believe I have to go to class like this," you scowl as you''re <<$sex_ev[''dress_describe'']>>. The aforementioned cum has already seeped into the fabric of your pants, creating an uncomfortable damp spot between your thighs. "I''m going to be leaking all day! <i>And</i> my pants are gonna stain!"'
  1739. end
  1740. else
  1741. '"I can''t believe I have to go to class like this," you scowl as you''re <<$sex_ev[''dress_describe'']>>. <<$npc_firstname[$boy]>>''s cum has already seeped into your panties, creating an uncomfortable damp spot between your thighs. "I''m going to be sitting in cum soaked panties all day because of you."'
  1742. end
  1743. else
  1744. !! if not schoolday
  1745. if $sex_ev['dress_describe'] = 'pulling your panties up':
  1746. '"I can''t believe how much cum you pumped into me," you scowl, pulling your panties up over your dripping snatch. The aforementioned cum immediately seeps into the fabric, creating an uncomfortable damp spot. "I''m going to be leaking <i>all day!</i> My panties are gonna stain!"'
  1747. elseif $pantyworntype = 'none':
  1748. if $sex_ev['dress_describe'] = 'slipping your skirt up your legs':
  1749. '"I can''t believe how much cum you pumped into me," you scowl as you slip your skirt up over your hips, feeling the aforementioned cum trickle down your thighs. "It''s gonna be running down my legs all day!"'
  1750. elseif $sex_ev['dress_describe'] = 'tugging your pants over your hips':
  1751. '"I can''t believe how much cum you pumped into me," you scowl, pulling your pants up over your dripping snatch. The aforementioned cum immediately seeps into the fabric, creating an uncomfortable damp spot between your thighs. "I''m going to be leaking <i>all day!</i> This is gonna stain!"'
  1752. elseif CloSkirtShortness > 0:
  1753. '"I can''t believe how much cum you pumped into me," you scowl as you''re <<$sex_ev[''dress_describe'']>>, suddenly feeling some trickle down your thighs beneath your skirt. "It''s gonna be running down my legs all day!"'
  1754. else
  1755. '"I can''t believe how much cum you pumped into me," you scowl as you''re <<$sex_ev[''dress_describe'']>>. The aforementioned cum has already seeped into the fabric of your pants, creating an uncomfortable damp spot between your thighs. "I''m going to be leaking <i>all day!</i> This is gonna stain!"'
  1756. end
  1757. else
  1758. '"I can''t believe how much cum you pumped into me," you scowl as you''re <<$sex_ev[''dress_describe'']>>. The aforementioned cum has already seeped into your panties, creating an uncomfortable damp spot between your thighs. "I''m going to be leaking <i>all day!</i> This is gonna stain!"'
  1759. end
  1760. end
  1761. gs'sex_ev_leave', 'leak_all_day2'
  1762. end
  1763. act'Sexy':
  1764. cla & *clr
  1765. $sex_ev['cum_leak_talk'] = 'sexy'
  1766. gs'sex_ev_leave', 'dress_loop'
  1767. if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and (week < 5 or week = 7):
  1768. !! if schoolday
  1769. if $sex_ev['dress_describe'] = 'pulling your panties up':
  1770. '"My pussy is so full of your cum," you say with a sultry smirk, pulling your panties up over your dripping snatch. It seeps into the fabric, forming a damp spot. "My panties are going to be soaked with it before class is over."'
  1771. elseif $pantyworntype = 'none':
  1772. if $sex_ev['dress_describe'] = 'slipping your skirt up your legs':
  1773. '"My pussy is so full of your cum," you say with a sultry smirk as you slip your skirt up over your hips, feeling the aforementioned cum trickle down your thighs. "You''re going to be leaking out of me through all my classes."'
  1774. elseif $sex_ev['dress_describe'] = 'tugging your pants over your hips':
  1775. '"My pussy is so full of your cum," you say with a sultry smirk, pulling your pants up over your dripping snatch. It seeps into the fabric, forming a damp spot between your thighs. "This might end up staining my uniform."'
  1776. elseif CloSkirtShortness > 0:
  1777. '"My pussy is so full of your cum," you say with a sultry smirk as you''re <<$sex_ev[''dress_describe'']>>, feeling it trickle down your thighs beneath your skirt. "You''re going to be leaking out of me through all my classes."'
  1778. else
  1779. '"My pussy is so full of your cum," you say with a sultry smirk as you''re <<$sex_ev[''dress_describe'']>>. The aforementioned cum has already seeped into the fabric of your pants, forming a damp spot between your thighs. "This might end up staining my uniform."'
  1780. end
  1781. else
  1782. '"My pussy is so full of your cum," you say with a sultry smirk as you''re <<$sex_ev[''dress_describe'']>>. The aforementioned cum has already seeped into your panties, forming a damp spot between your thighs. "My panties are going to be soaked with it before class is over."'
  1783. end
  1784. else
  1785. !! if not schoolday
  1786. if $sex_ev['dress_describe'] = 'pulling your panties up':
  1787. '"My pussy is so full of your cum," you say with a sultry smirk, pulling your panties up over your hips and immediately feeling a glob of <<$npc_firstname[$boy]>>''s cum seep out to form a damp spot on the fabric. "You''re going to be leaking out of me all day."'
  1788. elseif $pantyworntype = 'none':
  1789. if $sex_ev['dress_describe'] = 'slipping your skirt up your legs':
  1790. '"My pussy is so full of your cum," you say with a sultry smirk as you slip your skirt up over your hips, feeling the thick liquid run down your thighs. "You''re going to be leaking out of me all day."'
  1791. elseif $sex_ev['dress_describe'] = 'tugging your pants over your hips':
  1792. '"My pussy is so full of your cum," you say with a sultry smirk pulling your pants up over your dripping snatch and immediately feel a damp spot form on the fabric. "This might end up staining my pants."'
  1793. elseif CloSkirtShortness > 0:
  1794. '"My pussy is so full of your cum," you say with a sultry smirk as you''re <<$sex_ev[''dress_describe'']>> and feel thick liquid trickle down your thighs beneath your skirt. "You''re going to be leaking out of me all day."'
  1795. else
  1796. '"My pussy is so full of your cum," you say with a sultry smirk as you''re <<$sex_ev[''dress_describe'']>>. The aforementioned cum has already seeped into the fabric of your pants, forming a damp spot between your thighs. "You''re going to be leaking out of me all day."'
  1797. end
  1798. else
  1799. '"My pussy is so full of your cum," you say with a sultry smirk as you''re <<$sex_ev[''dress_describe'']>>, feeling a distinct damp spot between your legs. "My panties are already soaked with it."'
  1800. end
  1801. end
  1802. gs'sex_ev_leave', 'leak_all_day2'
  1803. end
  1804. end
  1805. end
  1806. end
  1807. if $ARGS[0] = 'leak_all_day2':
  1808. if npc_caretaker[$boy] > 0:
  1809. if $npc_cum_pref[$boy] = 'creampie':
  1810. '"Sorry about that," <<$npc_firstname[$boy]>> replies with a guilty smile, though you can''t help noticing that his eyes are fixed between your legs.'
  1811. else
  1812. '"Sorry about that," <<$npc_firstname[$boy]>> replies with a guilty smile.'
  1813. end
  1814. else
  1815. end
  1816. end
  1817. if $ARGS[0] = 'leak_all_day3':
  1818. if $sex_ev['walk_funny_talk'] = 'embarrassed':
  1819. 'You can''t help but blush even deeper at his reply.'
  1820. elseif $sex_ev['walk_funny_talk'] = 'annoyed':
  1821. 'Your scowl deepens at his reply.'
  1822. elseif $sex_ev['walk_funny_talk'] = 'sexy':
  1823. 'You flash a sexy smile back at him.'
  1824. end
  1825. gs'sex_ev_leave', 'dress_talk'
  1826. end
  1827. if $ARGS[0] = 'when_do_you_get_off':
  1828. act'Ask what time he gets off':
  1829. cla & *clr
  1830. gs'sex_ev_leave', 'dress_loop'
  1831. '"What time do you get off?" you ask while <<$sex_ev[''dress_describe'']>>.'
  1832. '"Around <<npc_start_free_time[$boy]>>. Why?"'
  1833. act'Just curious':
  1834. cla & *clr
  1835. gs'sex_ev_leave', 'dress_loop'
  1836. '"Just curious," you shrug, <<$sex_ev[''dress_describe'']>> next.'
  1837. gs'sex_ev_leave', 'dress_talk'
  1838. end
  1839. gs'sex_ev_leave', 'pc_sex_ev_invite'
  1840. end
  1841. end
  1842. if $ARGS[0] = 'ruined_panties':
  1843. if cum_loc['vagina'] > 0 and sex_ev['ruin_my_panties'] = 0 and $lastwornpantytype ! 'none' and sex_ev['panty_wear'] ! 1:
  1844. act'':
  1845. end
  1846. end
  1847. end
  1848. if $ARGS[0] = 'npc_date_later_response':
  1849. if npc_know_cheat[$boy] = 1:
  1850. if npc_fidelity[$boy] < 7:
  1851. '"You''re still with that stick in the mud?" <<$npc_firstname[$boy]>> scoffs.'
  1852. else
  1853. end
  1854. else
  1855. npc_know_cheat[$boy] = 1
  1856. if npc_fidelity[$boy] < 7:
  1857. '"And you''re fucking me right before your date?" <<$npc_firstname[$boy]>> snickers. "Hot."'
  1858. else
  1859. '"Oh." <<$npc_firstname[$boy]>> looks away uncomfortably.'
  1860. end
  1861. end
  1862. end
  1863. if $ARGS[0] = 'pc_sex_ev_invite':
  1864. if $sex_ev['type'] = 'hookup':
  1865. gs 'sex_ev_hookup_leave', 'pc_fuckbuddy_request'
  1866. elseif sex_ev['sleepover'] = 1 or hour < 5:
  1867. act'Ask to come over later':
  1868. sex_ev['invite_today'] = 1
  1869. cla & *clr
  1870. gs'sex_ev_leave', 'dress_loop'
  1871. if sex_ev['sleepover'] = 1:
  1872. '"Want to do this again later?" you grin, <<$sex_ev[''dress_describe'']>>.'
  1873. else
  1874. '"Want to do this again later?" you grin, <<$sex_ev[''dress_describe'']>>. "In the daytime?"'
  1875. end
  1876. if npc_day_off[$boy] = week:
  1877. if rand(1,10)/2 <= npc_sexdrive[$boy]:
  1878. '"Maybe. What time were you thinking?"'
  1879. gs'sex_ev_leave', 'pc_sex_ev_timeset'
  1880. else
  1881. '"Twice in one day might be a little bit too much for me," <<$npc_firstname[$boy]>> smiles back ruefully.'
  1882. gs'sex_ev_leave', 'dress_loop_code'
  1883. '"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
  1884. gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
  1885. end
  1886. else
  1887. if rand(1,10)/2 <= npc_sexdrive[$boy]:
  1888. '"What time were you thinking?"'
  1889. gs'sex_ev_leave', 'pc_sex_ev_timeset'
  1890. else
  1891. '"Think I might be a little too tapped out from work," <<$npc_firstname[$boy]>> grunts.'
  1892. gs'sex_ev_leave', 'dress_loop_code'
  1893. '"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
  1894. gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
  1895. end
  1896. end
  1897. end
  1898. elseif hour >= 5:
  1899. act'Ask to come over tomorrow':
  1900. sex_ev['invite_tomorrow'] = 1
  1901. cla & *clr
  1902. gs'sex_ev_leave', 'dress_loop'
  1903. '"Want to do this again tomorrow?" you ask, flashing a smile while you''re <<$sex_ev[''dress_describe'']>>.'
  1904. if npc_day_off[$boy] = week + 1 or (npc_day_off[$boy] = 1 and week = 7):
  1905. if rand(1,10)/2 <= npc_sexdrive[$boy]:
  1906. '"Hmm... It''ll be my day off... What time were you thinking?"'
  1907. gs'sex_ev_leave', 'pc_sex_ev_timeset'
  1908. else
  1909. '"Sorry, I have some things I need to get done tomorrow."'
  1910. gs'sex_ev_leave', 'dress_loop_code'
  1911. '"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
  1912. gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
  1913. end
  1914. else
  1915. if rand(1,10)/2 <= npc_sexdrive[$boy]:
  1916. '"What time were you thinking?"'
  1917. gs'sex_ev_leave', 'pc_sex_ev_timeset'
  1918. else
  1919. '"Sorry, I have some things I need to get done tomorrow."'
  1920. gs'sex_ev_leave', 'dress_loop_code'
  1921. '"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
  1922. gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
  1923. end
  1924. end
  1925. end
  1926. end
  1927. end
  1928. if $ARGS[0] = 'pc_sex_ev_timeset':
  1929. act'How about...':
  1930. :invalid_timeset
  1931. npc_booty_call_time[$boy] = input ("When do you want to come over to <<$npc_firstname[$boy]>>''s? (Pick an hour 1 - 22.)")
  1932. if npc_booty_call_time[$boy] > 22:
  1933. msg 'Invalid input. Pick an hour between 1 and 22.'
  1934. jump 'invalid_timeset'
  1935. else
  1936. gs'sex_ev_leave', 'pc_sex_ev_invite2'
  1937. end
  1938. end
  1939. end
  1940. if $ARGS[0] = 'pc_sex_ev_invite2':
  1941. cla & *clr
  1942. gs'sex_ev_leave', 'dress_loop'
  1943. if sex_ev['invite_today'] = 1:
  1944. if npc_booty_call_time[$boy] = npc_start_free_time[$boy]:
  1945. '"How about <<npc_booty_call_time[$boy]>>?" you smirk <<$sex_ev[''dress_describe'']>>. "We can get off together."'
  1946. gs 'sex_ev_leave', 'pc_sex_ev_invite_accepted'
  1947. else
  1948. '"How about <<npc_booty_call_time[$boy]>>?" you ask <<$sex_ev[''dress_describe'']>>.'
  1949. if npc_booty_call_time[$boy] > npc_end_free_time[$boy] or npc_booty_call_time[$boy] < npc_start_free_time[$boy]:
  1950. gs'sex_ev_leave', 'dress_loop_code'
  1951. '"Sorry, that doesn''t work for me," <<$npc_firstname[$boy]>> grunts.'
  1952. gs'sex_ev_leave', 'dress_loop_code'
  1953. '"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
  1954. gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
  1955. else
  1956. '"That sounds good," <<$npc_firstname[$boy]>> grins back. "Okay, see you then."'
  1957. gs 'sex_ev_leave', 'pc_sex_ev_invite_accepted'
  1958. end
  1959. end
  1960. else
  1961. '"How about <<npc_booty_call_time[$boy]>>?" you ask <<$sex_ev[''dress_describe'']>>.'
  1962. if npc_booty_call_time[$boy] > npc_end_free_time[$boy] or npc_booty_call_time[$boy] < npc_start_free_time[$boy]:
  1963. gs'sex_ev_leave', 'dress_loop_code'
  1964. '"Sorry, that doesn''t work for me," <<$npc_firstname[$boy]>> grunts.'
  1965. gs'sex_ev_leave', 'dress_loop_code'
  1966. '"Damn," you sigh disappointedly, continuing <<$sex_ev[''dress_describe'']>>'
  1967. gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
  1968. else
  1969. '"That sounds good," <<$npc_firstname[$boy]>> grins back. "Okay, see you then."'
  1970. gs 'sex_ev_leave', 'pc_sex_ev_invite_accepted'
  1971. end
  1972. end
  1973. end
  1974. if $ARGS[0] = 'pc_sex_ev_invite_accepted':
  1975. gs 'booty_call', 'set_booty_call_date'
  1976. gs 'sex_ev_leave', 'dress_talk'
  1977. if sex_ev['morning_after'] = 1: gs 'sex_ev_morning', 'end_morning'
  1978. end
  1979. if $ARGS[0] = 'pc_sex_ev_invite_denied':
  1980. gs 'booty_call', 'block_booty_calls'
  1981. gs 'sex_ev_leave', 'dress_talk'
  1982. if sex_ev['morning_after'] = 1: gs 'sex_ev_morning', 'end_morning'
  1983. end
  1984. if $ARGS[0] = 'npc_sex_ev_invite':
  1985. if (rand(1,10) < npc_sexdrive[$boy] or rand(1,200) < npc_rel[$boy]) and sex_ev['plans_later_talk'] = 0:
  1986. cla
  1987. act'Continue':
  1988. gs 'sex_ev_leave', 'dress_loop'
  1989. sex_ev['plans_later_talk'] = 1
  1990. if npc_day_off[$boy] = week + 1 or (week = 7 and npc_day_off[$boy] = 1):
  1991. sex_ev['invite_tomorrow'] = 1
  1992. if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
  1993. pc_know_npc_has_girlfriend[$boy] = 1
  1994. '"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$sex_ev[''dress_describe'']>>. "It''ll be my day off and my girlfriend won''t be around. Want to come over and do this again?"'
  1995. else
  1996. '"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$sex_ev[''dress_describe'']>>. "It''ll be my day off. Want to come by and do this again?"'
  1997. end
  1998. elseif npc_day_off[$boy] = week and (sex_ev['sleepover'] = 1 or hour < 5):
  1999. sex_ev['invite_today'] = 1
  2000. if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
  2001. pc_know_npc_has_girlfriend[$boy] = 1
  2002. '"You busy later?" <<$npc_firstname[$boy]>> asks as you''re <<$sex_ev[''dress_describe'']>>. "Today''s my day off and my girlfriend won''t be around. Want to come over and do this again?"'
  2003. else
  2004. '"You busy later?" <<$npc_firstname[$boy]>> asks as you''re <<$sex_ev[''dress_describe'']>>. "It''s my day off. Want to come by and do this again?"'
  2005. end
  2006. else
  2007. sex_ev['invite_tomorrow'] = 1
  2008. if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
  2009. pc_know_npc_has_girlfriend[$boy] = 1
  2010. '"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$sex_ev[''dress_describe'']>>. "My girlfriend won''t be around. Want to come over and do this again?"'
  2011. else
  2012. '"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$sex_ev[''dress_describe'']>>. "Want to come by and do this again?"'
  2013. end
  2014. end
  2015. gs 'sex_ev_leave', 'busy_later'
  2016. act'What time?':
  2017. gs 'sex_ev_leave', 'dress_loop'
  2018. '"That depends," you say, <<$sex_ev[''dress_describe'']>>. "What time were you thinking?"'
  2019. '"<<npc_start_free_time[$boy]>>?" <<$npc_firstname[$boy]>> asks.'
  2020. gs 'sex_ev_leave', 'busy_time'
  2021. gs 'sex_ev_leave', 'sex_ev_plan'
  2022. end
  2023. end
  2024. else
  2025. sex_ev['plans_later_talk'] = 1
  2026. end
  2027. end
  2028. if $ARGS[0] = 'sex_ev_invite_later':
  2029. act'Continue':
  2030. sex_ev['plans_later_talk'] = 1
  2031. gs 'sex_ev_leave', 'dress_loop'
  2032. if npc_day_off[$boy] = week and sex_ev['sleepover'] = 1:
  2033. $sex_ev_plan_loc[$boy] = 'lover_home'
  2034. sex_ev['invite_today'] = 1
  2035. if npc_girlfriend[$boy] = 1:
  2036. pc_know_npc_has_girlfriend[$boy] = 1
  2037. '"You busy later?" <<$npc_firstname[$boy]>> asks as you''re <<$sex_ev[''dress_describe'']>>. "It''s my day off and my girlfriend won''t be around. Want to come over to my place and do this again?"'
  2038. else
  2039. '"You busy later?" <<$npc_firstname[$boy]>> asks as you''re <<$sex_ev[''dress_describe'']>>. "It''s my day off. Want to come by and do this again?"'
  2040. end
  2041. elseif (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1):
  2042. sex_ev['invite_tomorrow'] = 1
  2043. if npc_girlfriend[$boy] = 1:
  2044. pc_know_npc_has_girlfriend[$boy] = 1
  2045. '"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$sex_ev[''dress_describe'']>>. "My girlfriend won''t be around. Want to come over and do this again?"'
  2046. else
  2047. '"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$sex_ev[''dress_describe'']>>. "It''ll be my day off. Want to come by and do this again?"'
  2048. end
  2049. end
  2050. gs 'sex_ev_leave', 'busy_later'
  2051. act'What time?':
  2052. cla & *nl
  2053. '"That depends," you say, <<$sex_ev[''dress_describe'']>>. "What time were you thinking?"'
  2054. '"<<npc_start_free_time[$boy]>>?" <<$npc_firstname[$boy]>> asks.'
  2055. gs 'sex_ev_leave', 'busy_time'
  2056. gs 'sex_ev_leave', 'sex_ev_plan'
  2057. end
  2058. end
  2059. end
  2060. if $ARGS[0] = 'busy_later':
  2061. act'I''m busy':
  2062. gs 'booty_call', 'block_booty_calls'
  2063. gs 'sex_ev_leave', 'dress_loop'
  2064. if sex_ev['invite_tomorrow'] = 1:
  2065. '"I can''t, sorry," you say, <<$sex_ev[''dress_describe'']>>. "I''ve got a busy schedule tomorrow."'
  2066. else
  2067. '"I can''t, sorry," you say, <<$sex_ev[''dress_describe'']>>. "I''m busy today."'
  2068. end
  2069. '"Damn," <<$npc_firstname[$boy]>> says disappointedly.'
  2070. gs 'sex_ev_leave', 'dress_talk'
  2071. end
  2072. end
  2073. if $ARGS[0] = 'busy_time':
  2074. act'I''m busy':
  2075. gs 'booty_call', 'block_booty_calls'
  2076. gs 'sex_ev_leave', 'dress_loop'
  2077. '"I can''t, sorry," you say, <<$sex_ev[''dress_describe'']>>. "I have something to do then."'
  2078. '"Damn," <<$npc_firstname[$boy]>> says disappointedly.'
  2079. gs 'sex_ev_leave', 'dress_talk'
  2080. if sex_ev['morning_after'] = 1: gs 'sex_ev_morning', 'end_morning'
  2081. end
  2082. end
  2083. if $ARGS[0] = 'sex_ev_plan':
  2084. act'Sounds good':
  2085. gs 'booty_call', 'set_booty_call_date'
  2086. gs 'sex_ev_leave', 'dress_loop'
  2087. '"Sounds good," you grin, <<$sex_ev[''dress_describe'']>>. "I''ll see you then."'
  2088. '"Great," <<$npc_firstname[$boy]>> grins back.'
  2089. gs 'sex_ev_leave', 'dress_talk'
  2090. if sex_ev['morning_after'] = 1: gs 'sex_ev_morning', 'end_morning'
  2091. end
  2092. act'I''ve got nothing better to do':
  2093. gs 'booty_call', 'set_booty_call_date'
  2094. gs 'sex_ev_leave', 'dress_loop'
  2095. '"Sure," you smirk, <<$sex_ev[''dress_describe'']>>. "I got nothing better to do."'
  2096. '"Great," <<$npc_firstname[$boy]>> grins back.'
  2097. gs 'sex_ev_leave', 'dress_talk'
  2098. if sex_ev['morning_after'] = 1: gs 'sex_ev_morning', 'end_morning'
  2099. end
  2100. act'I could fit it in':
  2101. gs 'booty_call', 'set_booty_call_date'
  2102. gs 'sex_ev_leave', 'dress_loop'
  2103. '"I think I can fit that in," you smirk, <<$sex_ev[''dress_describe'']>>.'
  2104. if npc_humor[$boy] = 2:
  2105. '"You sure can," <<$npc_firstname[$boy]>> grins lewdly at you.'
  2106. else
  2107. '"Great," <<$npc_firstname[$boy]>> grins back.'
  2108. end
  2109. gs 'sex_ev_leave', 'dress_talk'
  2110. if sex_ev['morning_after'] = 1: gs 'sex_ev_morning', 'end_morning'
  2111. end
  2112. act'Another time?':
  2113. gs 'sex_ev_leave', 'dress_loop'
  2114. '"That''s no good for me," you shake your head while <<$sex_ev[''dress_describe'']>>. "I have something to do then. What about..."'
  2115. act'Pick a time':
  2116. :invalid_timeset2
  2117. npc_booty_call_time[$boy] = input ("When do you want to come over to <<$npc_firstname[$boy]>>''s? (Pick an hour 1 - 22.)")
  2118. if npc_booty_call_time[$boy] > 22:
  2119. msg 'Invalid input. Pick an hour between 1 and 22.'
  2120. jump 'invalid_timeset2'
  2121. else
  2122. gs'sex_ev_leave', 'sex_ev_plan2'
  2123. end
  2124. end
  2125. end
  2126. end
  2127. if $ARGS[0] = 'sex_ev_plan2':
  2128. cla & *clr
  2129. gs'sex_ev_leave', 'dressing_image'
  2130. '"That''s no good for me," you shake your head while <<$sex_ev[''dress_describe'']>>. "I have something to do then. What about <<npc_booty_call_time[$boy]>>? Does that work for you?"'
  2131. if (sex_ev['invite_tomorrow'] = 1 and (npc_day_off[$boy] = week + 1 or (week = 7 and npc_day_off[$boy] = 1))) or (sex_ev['invite_today'] = 1 and npc_day_off[$boy] = week):
  2132. '"Sure," he smirks. "It''s my day off. Any time works for me."'
  2133. '"Great," you say back. "I''ll swing by tomorrow."'
  2134. gs 'sex_ev_leave', 'pc_sex_ev_invite_accepted'
  2135. elseif npc_booty_call_time[$boy] > npc_end_free_time[$boy] or npc_booty_call_time[$boy] < npc_start_free_time[$boy]:
  2136. '"No," <<$npc_firstname[$boy]>> grunts with a shake of his head. "I''ll be busy then too."'
  2137. '"Damn it all!" you curse. "Why is it so hard just to schedule a time to have sex?!"'
  2138. gs'sex_ev_leave', 'pc_sex_ev_invite_denied'
  2139. else
  2140. '"I think that works for me," <<$npc_firstname[$boy]>> says with a nod of his head.'
  2141. '"Great," you smile back. "Then I''ll see you at <<npc_booty_call_time[$boy]>>."'
  2142. gs 'sex_ev_leave', 'pc_sex_ev_invite_accepted'
  2143. end
  2144. end
  2145. if $ARGS[0] = 'money_for_ma_pill':
  2146. sex_ev['ma_pill_money'] = 1
  2147. money += 1000
  2148. cla & *clr
  2149. gs'sex_ev_leave', 'dress_loop'
  2150. '"Hey," <<$npc_firstname[$boy]>> says as you''re <<$sex_ev[''dress_describe'']>>. "Don''t forget this."'
  2151. 'He grabs his wallet and pulls out a 1000<b>₽</b note, holding it out to you.'
  2152. '"For the morning after pill," he says.'
  2153. '"Oh yeah, thanks," you nod, taking it from him.'
  2154. gs 'sex_ev_leave', 'dressing2'
  2155. end
  2156. --- sex_ev_leave ---------------------------------