booty_call_after.qsrc 36 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025
  1. # booty_call_after
  2. if $ARGS[0] = 'exit':
  3. gs 'arousal', 'end'
  4. if $clothingworntype = 'nude': gs'shortgs','dress'
  5. killvar 'booty_call_after'
  6. minut += 2
  7. !! exit should be based on type of apartment and location
  8. if npc_residence[$boy] = 1:
  9. !! Pav residential exit
  10. gt 'pav_residential'
  11. elseif npc_residence[$boy] = 2:
  12. !! Student dorms exit
  13. gt 'city_island'
  14. elseif npc_residence[$boy] = 3:
  15. !! St. Petersburg Residential exit
  16. gt 'city_residential'
  17. elseif npc_residence[$boy] = 4:
  18. !! St. Petersburg City Center exit
  19. gt 'city_center'
  20. !!{ disabled for bug testing
  21. else
  22. if $region = 'pav_residential':
  23. gt 'pav_residential'
  24. elseif $region = 'pav_commercial':
  25. gt 'pav_commercial'
  26. elseif $region = 'pav_park':
  27. gt 'pav_park','start'
  28. elseif $region = 'city_residential':
  29. gt 'city_residential'
  30. elseif $region = 'city_center':
  31. gt 'city_center'
  32. elseif $region = 'city_park':
  33. gt 'city_park','start'
  34. elseif $region = 'city_island':
  35. gt 'city_island'
  36. end}
  37. end
  38. end
  39. if $ARGS[0] = 'quit':
  40. act'Call it quits':
  41. cla & *clr
  42. !! IMAGE HERE
  43. 'Grab your things and leave in anger.'
  44. !! if npc_abusive[$boy] > 0 and rand(1,10) > number:
  45. !! get raped
  46. !! else
  47. act'Leave':gt'booty_call_after','exit'
  48. !!end
  49. end
  50. end
  51. if $ARGS[0] = 'stop_here':
  52. act'Finish here?':
  53. cla & *clr
  54. $npc_apt_bedroom[$boy]
  55. '"I think I''m reaching my limit. Want to end here?"'
  56. if booty_call['cum_count'] < npc_sexdrive[$boy] - 5:
  57. '"No way! I still want more!"'
  58. act'I can''t keep going':
  59. cla & *nl
  60. '"I''m sorry <<$npc_firstname[$boy]>>, but I just can''t. Maybe next time."'
  61. '<<$npc_firstname[$boy]>> seems really disappointed, almost upset.'
  62. gs'booty_call_after','after_sex1'
  63. end
  64. act'Well...':
  65. cla & *nl
  66. '"Well... I guess I might be able to keep going a <i>little</i> longer," you say with a soft smile.'
  67. gs'booty_call_after','after_sex1'
  68. end
  69. act'I don''t have time':
  70. cla & *nl
  71. '"I don''t have time <<$npc_firstname[$boy]>>," you shake your head. "I need to get going soon."'
  72. '<<$npc_firstname[$boy]>> seems really disappointed, almost upset.'
  73. gs'booty_call_after','after_sex1'
  74. end
  75. else
  76. gs'booty_call_after','finish'
  77. end
  78. end
  79. end
  80. if $ARGS[0] = 'keep_going':
  81. act'Keep going?':
  82. cla & *clr
  83. if booty_call['cum_count'] >= npc_sexdrive[$boy]:
  84. $npc_apt_bedroom[$boy]
  85. '"Wanna keep going?"'
  86. '"I don''t think I can," he says, cock already limp.'
  87. gs'booty_call_after','finish'
  88. else
  89. '<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
  90. '"Yeah, gimme a minute to get hard again."'
  91. 'While you wait, you consider what you want to do next...'
  92. gs'booty_call_sex','reset'
  93. act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
  94. act'Sex':cla & gs'booty_call_sex','position_change' & gs 'booty_call_sex', 'condoms'
  95. end
  96. end
  97. end
  98. if $ARGS[0] = 'finish':
  99. if booty_call['orgasm_count'] = 0 and booty_call['fake_orgasm_count'] = 0 and booty_call['fuck'] = 0 and npc_selfish[$boy] = 0:
  100. gs'booty_call_after','no_cum_end'
  101. elseif booty_call['cum_count'] >= npc_sexdrive[$boy]:
  102. booty_call['sex_end'] = 1
  103. '"I guess we can call it there."'
  104. gs'booty_call_after','after_sex1'
  105. else
  106. booty_call['sex_end'] = 1
  107. '"I''m good with that."'
  108. gs'booty_call_after','after_sex1'
  109. end
  110. end
  111. if $ARGS[0] = 'no_cum_end':
  112. '"Let''s end here."'
  113. '"Really? We didn''t do anything other than getting me off."'
  114. if know_virgin[$boy] = 1 and stat['virgin'] = 1:
  115. act'You know I''m saving my virginity':
  116. cla & *clr
  117. '<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
  118. $npc_apt_bedroom[$boy]
  119. '"Come on <<$boydesc>>," you sigh. "You know I''m saving myself for marriage."'
  120. '"And you still have a fuck buddy."'
  121. '"Shut up," you roll your eyes.'
  122. gs'booty_call_after','after_sex1'
  123. end
  124. else
  125. act'Didn''t feel like it today':
  126. cla & *nl
  127. '"Just didn''t feel like doing anything else today.'
  128. gs'booty_call_after','after_sex1'
  129. end
  130. act'Just wanted to fool around':
  131. cla & *nl
  132. '"Just wanted to play with your cock for a while. I had fun," you wink.'
  133. gs'booty_call_after','after_sex1'
  134. end
  135. act'I''m in a rush':
  136. cla & *nl
  137. '"I''m in a rush today. But don''t worry. I had fun," you wink.'
  138. gs'booty_call_after','after_sex1'
  139. end
  140. if stat['virgin'] = 1:
  141. act'I''m saving my virginity':
  142. know_virgin[$boy] = 1
  143. cla & *clr
  144. '<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
  145. $npc_apt_bedroom[$boy]
  146. '"Sorry. Saving myself for marriage."'
  147. '"Why?"'
  148. act'Because I want to':
  149. cla & *nl
  150. '"Because I want to?" you shrug. "Do I need a better reason?"'
  151. gs'booty_call_after','after_sex1'
  152. end
  153. act'Because I want to (annoyed)':
  154. cla & *nl
  155. '"Because I want to," you say, a little annoyed. "I have to explain myself to you?"'
  156. gs'booty_call_after','after_sex1'
  157. end
  158. if mid($start_type,1,2) = 'sg':
  159. act'Ask my mom':
  160. cla & *nl
  161. '"I don''t know," you shrug. "Ask my mom why it''s so important."'
  162. gs'booty_call_after','after_sex1'
  163. end
  164. end
  165. end
  166. end
  167. end
  168. end
  169. if $ARGS[0] = 'bad_sex_end':
  170. '"Let''s call it here."'
  171. '"What, done already?"'
  172. act'Don''t feel like it anymore':
  173. cla & *nl
  174. '"I don''t feel like doing anything else."'
  175. gs'booty_call_after','after_sex1'
  176. end
  177. act'You killed the mood':
  178. cla & *nl
  179. '"You killed the mood."'
  180. gs'booty_call_after','after_sex1'
  181. end
  182. act'You''re an asshole':
  183. cla & *nl
  184. '"You''re an asshole."'
  185. 'He snickers and slaps your ass.'
  186. gs'booty_call_after','after_sex1'
  187. end
  188. end
  189. !! ------------------------- Cleaning Stuff ------------------------------------------------------
  190. if $ARGS[0] = 'cum_clean':
  191. booty_call['cleanup'] = 1
  192. cumspclnt = 1
  193. if salfetka > 0:
  194. act'Get some wipes from your bag':
  195. gs 'cum_cleanup', 'cleanloc'
  196. gs'stat'
  197. cla & *clr
  198. '<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
  199. $npc_apt_bedroom[$boy]
  200. 'Leaning down off the bed, you dig into your bag with a clean hand and grab some wipes out of it, cleaning yourself off.'
  201. *nl
  202. 'Feeling nice, you also take a moment to clean <<$npc_firstname[$boy]>>''s cock for him at the same time. Once you''re both all wiped down off, you toss it into the wastebasket by his bed.'
  203. if booty_call['sex_end'] = 1:
  204. gs'booty_call_after','after_sex1'
  205. else
  206. gs'booty_call_sex','sex_end'
  207. end
  208. end
  209. end
  210. act'Ask him if he has any tissues':
  211. gs 'cum_cleanup', 'cleanloc'
  212. gs'stat'
  213. cla & *clr
  214. '<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
  215. $npc_apt_bedroom[$boy]
  216. '"Got anything for this?" you ask, holding up your hand, spreading your fingers to emphasize the sticky strands of cum hanging from them.'
  217. '"Yeah, got some wipes right here." <<$npc_firstname[$boy]>> reaches for his nightstand, pulling a bag of wipes out of the drawer. He pulls one out and starts wiping himself down, tossing you the bag.'
  218. *nl
  219. 'You pull out a handful and clean yourself off as well. Following <<$npc_firstname[$boy]>>''s lead, you finish by tossing the used wipe into a small trashcan in the corner of the room.'
  220. if booty_call['sex_end'] = 1:
  221. gs'booty_call_after','after_sex1'
  222. else
  223. gs'booty_call_sex','sex_end'
  224. end
  225. end
  226. act'Lick your fingers clean':
  227. gs'stat'
  228. gs 'cum_cleanup', 'cleanloc'
  229. swallow += 1
  230. cla & *clr
  231. '<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
  232. $npc_apt_bedroom[$boy]
  233. 'Briefly making eye contact with <<$npc_firstname[$boy]>>, you use your fingers to gather up all the loose cum on you and stick out your tongue, running it up your hand, licking every drop from it and into your mouth. You give your hand a thorough tongue bath, sucking your fingers clean at the end. Once finished, you smack your lips, smiling at <<$npc_firstname[$boy]>> who stared at you the whole time.'
  234. if booty_call['he_cleaned'] = 0:
  235. '"Any chance I could get one of those?" he gestures towards his cock.'
  236. act'You''re on your own':
  237. cla & *clr
  238. '<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
  239. $npc_apt_bedroom[$boy]
  240. '"Sorry soldier, but you''re on your own," you giggle.'
  241. '"<i>Of course I am...</i>" He sighs but reaches for his nightstand, pulling a pack of wipes from it and gets to work cleaning himself up. Once he''s done, he tosses the used wipe into a trash can in the corner of his room.'
  242. if booty_call['sex_end'] = 1:
  243. gs'booty_call_after','after_sex1'
  244. else
  245. gs'booty_call_sex','sex_end'
  246. end
  247. end
  248. act'Sure':
  249. cla & *clr
  250. '<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
  251. '"Sure thing," you smile. Crawling forward between his legs, you bend down and run your lips up and down his shaft, sucking, kissing, and licking every curve and contour until it''s completely clean.'
  252. '"There. All better?"'
  253. '"Much better," he smiles back.'
  254. if booty_call['cum_count'] < npc_sexdrive[$boy]:
  255. *nl
  256. 'He seems more than pleased by your act of service, considering the stiffness that seems to have returned to his dick under your touch.'
  257. end
  258. if booty_call['sex_end'] = 1:
  259. gs'booty_call_after','after_sex1'
  260. else
  261. gs'booty_call_after','stop_here'
  262. gs'booty_call_after','keep_going'
  263. end
  264. end
  265. else
  266. if booty_call['sex_end'] = 1:
  267. gs'booty_call_after','after_sex1'
  268. else
  269. gs'booty_call_sex','sex_end'
  270. end
  271. end
  272. end
  273. end
  274. if $ARGS[0] = 'facial_mouth_clean':
  275. if booty_call['cum_choice'] = 'face' or $booty_call['cum_choice'] = 'face_mouth':
  276. act'Clean him off with your mouth':
  277. booty_call['react'] = 1
  278. gs'stat'
  279. cla & *clr
  280. '<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial24.jpg"></center>'
  281. if booty_call['fuck'] = 1:
  282. 'Opening your mouth, you lean forward, wrapping your lips around <<$npc_firstname[$boy]>>''s cock and running them up and down to clean him off. You can faintly taste yourself, as well as the remenants of cum that was still inside it, drawn out your mouth. Looking up at <<$npc_firstname[$boy]>>, you are greeted with the sight of him staring down at you.'
  283. else
  284. 'Opening your mouth, you lean forward, wrapping your lips around <<$npc_firstname[$boy]>>''s cock and running them up and down to clean him off. You can taste the remenants of cum that was still inside it, drawn out by your mouth. Looking up at <<$npc_firstname[$boy]>>, you are greeted with the sight of him staring down at you.'
  285. end
  286. gs'booty_call_sex','sex_end'
  287. end
  288. end
  289. end
  290. if $ARGS[0] = 'cum_kiss_cock':
  291. if booty_call['cum_choice'] = 'face' or $booty_call['cum_choice'] = 'face_mouth' or $booty_call['cum_choice'] = 'mouth':
  292. act'Kiss his cock':
  293. booty_call['react'] = 1
  294. cla & *clr
  295. '<center><video autoplay loop src="images/shared/sex/cum/kiss_cock.mp4"></video></center>'
  296. '"Glad my hard work is appreciated," you smile, leaning in and giving <<$npc_firstname[$boy]>>''s cock a gentle kiss on the tip.'
  297. gs'booty_call_sex','sex_end'
  298. end
  299. end
  300. end
  301. !! -------------------------------------------------------------------------------
  302. if $ARGS[0] = 'after_sex1':
  303. act'Continue':
  304. cla & *clr
  305. $npc_apt_bedroom[$boy]
  306. if npc_smoker[$boy] > 0:
  307. 'The two of you pull apart and <<$npc_firstname[$boy]>> reaches over to his nightstand and pulls out a pack of cigarettes.'
  308. else
  309. *nl
  310. 'You and <<$npc_firstname[$boy]>> pull apart, quietly basking in the afterglow of your booty call.'
  311. end
  312. gs'booty_call_after','after_sex2'
  313. end
  314. end
  315. if $ARGS[0] = 'after_sex2':
  316. act'Get dressed':gt'booty_call_after','dressing1'
  317. if booty_call['shower'] = 0:
  318. act'Take a shower':
  319. cla & *clr
  320. $npc_apt_bedroom[$boy]
  321. '"I''m gonna borrow your shower."'
  322. if booty_call['cum_count'] < npc_sexdrive[$boy]:
  323. '"Why don''t I join you?"'
  324. act'I''d rather not':
  325. cla & *nl
  326. '"No thanks," you say. "I like my alone time in the shower."'
  327. act'Shower':gt'booty_call_after','shower_alone'
  328. end
  329. !!{ act'Sounds nice':
  330. cla & *nl
  331. '"That sounds like nice," you smile and you let him lead you into the bathroom.'
  332. act'Go shower':gt'booty_call_after','shower_together'
  333. end}
  334. else
  335. '"Sure thing. Don''t use up all my soap."'
  336. act'Okay':
  337. cla & *nl
  338. '"Okay. I won''t," you promise and head into the bathroom.'
  339. act'Shower':gt'booty_call_after','shower_alone'
  340. end
  341. act'I''ll try':
  342. cla & *nl
  343. '"I''ll try not to," you smile and head into the bathroom.'
  344. act'Shower':gt'booty_call_after','shower_alone'
  345. end
  346. act'We''ll see':
  347. cla & *nl
  348. '"We''ll see about that," you smirk and head into the bathroom.'
  349. act'Shower':gt'booty_call_after','shower_alone'
  350. end
  351. end
  352. end
  353. end
  354. if booty_call['phone'] = 0:
  355. act'Play with your phone':
  356. booty_call['phone'] = 1
  357. cla & *clr
  358. minut += rand(2,5)
  359. '<center><img <<$set_imgh>> src="images/shared/sex/after/phone.jpg"></center>'
  360. 'You play with your phone.'
  361. gs'booty_call_after','after_sex2'
  362. end
  363. end
  364. if siga > 0 and booty_call['cigarette'] = 0:
  365. act'Have a smoke':booty_call['cigarette'] = 1 & gt'booty_call_after','smoke'
  366. act'Have a smoke and play with your phone':
  367. booty_call['phone'] = 2
  368. booty_call['cigarette'] = 1
  369. gt'booty_call_after','smoke'
  370. end
  371. end
  372. if npc_smoker[$boy] > 0:
  373. act'Bum a cigarette':
  374. booty_call['bum_cigarette'] = 1
  375. gt'booty_call_after','smoke'
  376. end
  377. act'Bum a cigarette play with your phone':
  378. booty_call['bum_cigarette'] = 1
  379. booty_call['cigarette'] = 3
  380. gt'booty_call_after','smoke'
  381. end
  382. end
  383. if $stat_cum_msg ! '':
  384. if salfetka > 0:
  385. act'Clean yourself up (use your own wipes)':
  386. booty_call['wipes'] = 1
  387. salfetka -= 1
  388. gt'booty_call_after','wipes'
  389. end
  390. end
  391. act'Clean yourself up (ask him for wipes)':
  392. booty_call['wipes'] = 2
  393. gt'booty_call_after','wipes'
  394. end
  395. end
  396. if booty_call['pillow_talk'] = 0:
  397. act'Pillow talk':gt'booty_call_talk','pillow_talk_start'
  398. end
  399. if hour >= 20 and booty_call['spend_night'] = 0:
  400. act'Ask to spend the night':
  401. booty_call['spend_night'] = 1
  402. cla & *clr
  403. $npc_apt_bedroom[$boy]
  404. '"Mind if I spend the night?" you ask.'
  405. act'I don''t feel like going home':
  406. cla & *clr
  407. $npc_apt_bedroom[$boy]
  408. '"Mind if I spend the night?" you ask. "I don''t feel like going home tonight."'
  409. gs'booty_call_after','spend_night'
  410. end
  411. if mid($start_type,1,2) = 'sg':
  412. act'I''m sick of my mom':
  413. cla & *clr
  414. $npc_apt_bedroom[$boy]
  415. '"Mind if I spend the night?" you ask. "My mom has been such a pain in the ass lately and I don''t want to see her."'
  416. gs'booty_call_after','spend_night'
  417. end
  418. end
  419. if pcs_boyfriend > 0:
  420. act'I don''t want to see my boyfriend(annoyed)':
  421. cla & *clr
  422. $npc_apt_bedroom[$boy]
  423. '"Mind if I spend the night?" you ask. "My boyfriend''s been pissing me off lately and I don''t want to see his face."'
  424. gs'booty_call_after','spend_night'
  425. end
  426. !!{ act'I don''t want to see my boyfriend(guilt)':
  427. end}
  428. end
  429. end
  430. end
  431. if pcs_sleep < 30 and booty_call['get_up'] = 0:
  432. act'Rest your eyes':gt'booty_call_after','rest_eyes'
  433. end
  434. end
  435. if $ARGS[0] = 'smoke':
  436. cla & *clr
  437. booty_call['cigarette'] = 1
  438. gs 'drugs','smoke'
  439. cla & *clr
  440. '<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke0.jpg"></center>'
  441. if booty_call['bum_cigarette'] = 1:
  442. '"Can I get one of those?" you ask.'
  443. '<<$npc_firstname[$boy]>> hands over his pack to you and you accept one gratefully, lighting it and inhaling deeply.'
  444. elseif npc_smoker[$boy] > 0:
  445. 'Seeing <<$npc_firstname[$boy]>> grab a pack, you reach for your purse and pull out your own cigarettes and both of you light up together.'
  446. else
  447. 'You pull a cigarette from your purse and place it in your mouth, sparking it with your lighter while you inhale deeply.'
  448. end
  449. act'Smoke':
  450. if booty_call['phone'] = 2:gt'booty_call_after','smoke_phone'
  451. cla & *clr
  452. if npc_smoker[$boy] > 0:
  453. '<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke3.jpg"></center>'
  454. 'Smoke fills your lungs and you hold it there, savoring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, relaxing into the bed. <<$npc_firstname[$boy]>> does the same and you both enjoy your post-fuck smokes, winding down together.'
  455. else
  456. '<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke1.jpg"></center>'
  457. 'Smoke fills your lungs and you hold it there, savoring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, relaxing into the bed.'
  458. end
  459. gs'booty_call_after','after_sex2'
  460. end
  461. end
  462. if $ARGS[0] = 'smoke_phone':
  463. cla & *clr
  464. if npc_smoker[$boy] > 0:
  465. '<center><img <<$set_imgh>> src="images/shared/sex/after/phone_smoke.jpg"></center>'
  466. 'Smoke fills your lungs and you hold it there, savoring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, reaching down for your phone. You decide to spend some time scrolling through your feeds, while the both of you puff your way through your cigarettes, fully unwinding.'
  467. else
  468. '<center><img <<$set_imgh>> src="images/shared/sex/after/phone_smoke.jpg"></center>'
  469. 'Smoke fills your lungs and you hold it there, savoring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, reaching for your phone before relaxing into the bed. You spend some time scrolling through feeds while you puff your way through the cigarette, fully unwinding.'
  470. end
  471. gs'booty_call_after','after_sex2'
  472. end
  473. if $ARGS[0] = 'spend_night':
  474. if npc_cheating_know[$boy] = 1:
  475. !! this means he''s cheating on someone with you and you know it
  476. if rand(1,10) > 7 and hour < 22:
  477. '"Sorry, can''t. My girlfriend wanted to come over tonight. In fact, you should leave soon before she catches you."'
  478. '"Ugh, bitch."'
  479. '"Yeah, I know. Sucks."'
  480. gs'booty_call_after','after_sex2'
  481. else
  482. '"Sure, my girlfriend isn''t gonna be around for a while. You can crash here."'
  483. '"Thanks," you yawn, snuggling into <<$npc_firstname[$boy]>>. "Appreciate it."'
  484. act'Cuddle up':
  485. cla & *clr
  486. '<center><img <<$set_imgh>> src="images/shared/sex/after/cuddle1.jpg"></center>'
  487. 'He wraps his arms around you in return and you close your eyes, allowing yourself to drift off into sleep.'
  488. gs'booty_call_after','sleep'
  489. end
  490. end
  491. else
  492. !!if npc_cheating[$boy] = 1:
  493. !! this means he''s cheating on someone with you
  494. if rand(1,10) > 7 and hour < 22:
  495. '"Sorry, can''t. I have something to do in the morning."'
  496. '"Ugh, really?"'
  497. '"Yeah, I know. Sucks."'
  498. gs'booty_call_after','after_sex2'
  499. else
  500. '"Sure, I''m not doing anything tomorrow. You can crash here."'
  501. '"Thanks," you yawn, snuggling into <<$npc_firstname[$boy]>>. "Appreciate it."'
  502. act'Cuddle up':
  503. cla & *clr
  504. '<center><img <<$set_imgh>> src="images/shared/sex/after/cuddle1.jpg"></center>'
  505. 'He wraps his arms around you in return and you close your eyes, allowing yourself to drift off into sleep.'
  506. gs'booty_call_after','sleep'
  507. end
  508. end
  509. end
  510. end
  511. if $ARGS[0] = 'dressing1':
  512. cla & *clr
  513. if booty_call['CloDress'] = 1:
  514. '<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/bed_dress.jpg"></center>'
  515. else
  516. '<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
  517. end
  518. 'You reach down for where you left your clothes and start to pick them up.'
  519. '"You heading out?" <<$npc_firstname[$boy]>> asks.'
  520. gs'booty_call_after','dress_loop'
  521. act'Not yet':
  522. cla & *nl
  523. '"Not yet," you say, <<$booty_call[''dress_describe'']>>. "Just tired of hanging around naked."'
  524. '"I''m never tired of seeing you naked."'
  525. '"Whatever," you roll your eyes.'
  526. act'Finish getting dressed':
  527. cla & *clr
  528. $npc_apt_bedroom[$boy]
  529. 'You finish <<$booty_call[''dress_describe'']>>'
  530. gs'booty_call_after','after_sex_dressed'
  531. end
  532. end
  533. act'Yeah':
  534. cla & *nl
  535. '"Yeah," you say, <<$booty_call[''dress_describe'']>>.'
  536. act'Finish getting dressed':
  537. cla & *clr
  538. $npc_apt_bedroom[$boy]
  539. 'You finish <<$booty_call[''dress_describe'']>>'
  540. gs'booty_call_after','after_sex_dressed'
  541. end
  542. end
  543. !! act'Talk while you dress':
  544. !! gs'booty_call_after','dress_talk'
  545. !! end
  546. end
  547. !!{
  548. if $ARGS[0] = 'dress_talk':
  549. if rand(0,1) = 1:
  550. !! he initiates
  551. if booty_call['dress_talk1'] = 0:
  552. '"You busy tomorrow? Want to come by and do this again?"'
  553. end
  554. if booty_call['dress_talk2'] = 0:
  555. '"What''re you up to later?"'
  556. if date_variable > 0:
  557. act'I have a date with my boyfriend':
  558. cla & *clr
  559. gs'booty_call_after','dress_image'
  560. '"I have a date with my boyfriend later."'
  561. end
  562. end
  563. end
  564. if booty_call['dress_talk3'] = 0:
  565. end
  566. if booty_call['dress_talk4'] = 0:
  567. end
  568. if booty_call['dress_talk5'] = 0:
  569. end
  570. else
  571. !! player initiates
  572. if booty_call['dress_talk1'] = 0:
  573. end
  574. if booty_call['dress_talk2'] = 0:
  575. end
  576. if booty_call['dress_talk3'] = 0:
  577. end
  578. if booty_call['dress_talk4'] = 0:
  579. end
  580. if booty_call['dress_talk5'] = 0:
  581. end
  582. end
  583. end}
  584. if $ARGS[0] = 'dress_image':
  585. if booty_call['CloDress'] = 1:
  586. '<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/bed_dress.jpg"></center>'
  587. else
  588. '<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
  589. end
  590. end
  591. if $ARGS[0] = 'dress_loop1':
  592. :dress_loop_start
  593. if $lastpantyworntype ! 'none' and $pantyworntype = 'none':
  594. gs'panties','wear'
  595. $booty_call['dress_describe'] = 'pulling your panties up your legs'
  596. elseif $lastbraworntype ! 'none' and $braworntype = 'none':
  597. gs'bras','wear'
  598. $booty_call['dress_describe'] = 'throwing your arms through the straps of your bra and clasping it behind your back.'
  599. elseif $clothingworntype = 'nude':
  600. gs'clothing','wear'
  601. jump 'dress_loop_start'
  602. elseif $clothingworntype ! 'nude':
  603. if CloDress = 1:
  604. booty_call['dress_end'] = 1
  605. $booty_call['dress_describe'] = 'pulling your dress up'
  606. else
  607. if booty_call['pants_dress'] = 0 and booty_call['dress_end'] ! 1:
  608. booty_call['pants_dress'] = 1
  609. $booty_call['dress_describe'] = 'tugging your pants over your hips'
  610. else
  611. booty_call['dress_end'] = 1
  612. $booty_call['dress_describe'] = 'pulling your top down'
  613. end
  614. end
  615. end
  616. end
  617. if $ARGS[0] = 'after_sex_dressed':
  618. act'Head out':
  619. cla & *clr
  620. $npc_apt_bedroom[$boy]
  621. '"I gotta get going."'
  622. '"Okay, see you later."'
  623. act'Leave':gt'booty_call_after','exit'
  624. end
  625. act'Hang out':msg 'Work in progress! To be continued!'
  626. act'Break things off':
  627. cla & *clr
  628. $npc_apt_bedroom[$boy]
  629. '"I can''t do this anymore."'
  630. '"Why not?"'
  631. '"I just can''t. I''m sorry."'
  632. 'You leave the apartment.'
  633. !! missing code
  634. !! lover removal code
  635. act'Leave':gt'booty_call_after','exit'
  636. end
  637. !!{
  638. act'You don''t satisfy me anymore':
  639. end
  640. act'This is getting too complicated':
  641. end
  642. if pcs_boyfriend > 0:
  643. act'I''ve started seeing somebody':
  644. cla & *clr
  645. $npc_apt_bedroom[$boy]
  646. '"The truth is, I''ve started seeing somebody. Sex with you has been good, but... I can''t keep doing this. I don''t want to fuck things up with them."'
  647. end
  648. act'I can''t keep cheating like this':
  649. cla & *clr
  650. $npc_apt_bedroom[$boy]
  651. if npc_know_cheat[$boy] = 1:
  652. '"I can''t keep cheating on my boyfriend like this. It''s wrong, and I just can''t do this anymore."'
  653. else
  654. '"The truth is, I''m in a relationship with somebody. I''ve been cheating on them with you. It''s wrong, and I just can''t do this anymore."'
  655. end
  656. end
  657. end
  658. end
  659. }
  660. end
  661. if $ARGS[0] = 'wipes':
  662. gs'stat'
  663. if hypnoAddict > 0:
  664. cumspclnt = 18
  665. else
  666. cumspclnt = 1
  667. end
  668. cla & *clr
  669. if cumloc[11] > 0 or $booty_call['cum_choice'] = 'face':
  670. !! face
  671. '<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial36.jpg"></center>'
  672. if booty_call['wipes'] = 2:
  673. '"Hey, got anything I can use to clean up?" you trying not to smile under the spunk covering your face.'
  674. '"Oh yeah, right here." <<$npc_firstname[$boy]>> reaches over to his nightstand, pulling a packet of tissues and tossing them over to you. Gratefully accepting them, you pull out a handful and get to work cleaning yourself up.'
  675. else
  676. 'You reach up and poke at the sperm coating your face. Ew. You really need to clean that up before you do anything else. Reaching down to your purse, you pull some wipes out of your purse.'
  677. end
  678. *nl
  679. if cumloc[16] > 0:
  680. !! hair
  681. 'You carefully wipe the cum from your face, making sure to get every last drop, including getting the tangled web that <<$npc_firstname[$boy]>> managed to get in your hair. About a minute later, you can still feel a faintly sticky layer over the top of your skin, but at least nobody is going to give you funny looks walking down the street.'
  682. else
  683. 'You carefully wipe the cum from your face, making sure to get every last drop. About a minute later, you can still feel a faintly sticky layer over the top of your skin, but at least nobody is going to give you funny looks walking down the street.'
  684. end
  685. booty_call['wipes'] = 0
  686. elseif cumloc[12] > 0 or $booty_call['cum_choice'] = 'stomach':
  687. !! stomach
  688. '<center><img <<$set_imgh>> src="images/shared/sex/cum/stomach/bellycum3.jpg"></center>'
  689. if booty_call['wipes'] = 2:
  690. '"Hey, got anything I can use to clean up?" you ask, looking at your belly, cum still spattered over it.'
  691. '"Oh yeah, right here." <<$npc_firstname[$boy]>> reaches over to his nightstand, pulling a packet of tissues and tossing them over to you. Gratefully accepting them, you pull out a handful and get to work cleaning yourself up.'
  692. else
  693. 'You really need to clean yourself after up after that. Reaching down to your purse, you pull some wipes out of your purse.'
  694. end
  695. booty_call['wipes'] = 0
  696. elseif cumloc[4] > 0 or $booty_call['cum_choice'] = 'ass' or $booty_call['cum_choice'] = 'back':
  697. !! butt
  698. '<center><img <<$set_imgh>> src="images/shared/sex/cum/back1.jpg"></center>'
  699. if booty_call['wipes'] = 2:
  700. '"Hey, got anything I can use to clean up?" you ask, looking over your shoulder and wiggling your ass to emphasize the cum resting on it.'
  701. '"Oh yeah, right here." <<$npc_firstname[$boy]>> reaches over to his nightstand, pulling a packet of tissues and tossing them over to you. Gratefully accepting them, you pull out a handful and get to work awkwardly trying to wipe your ass and up your back.'
  702. else
  703. 'You really need to clean yourself after up after that. Reaching down to your purse, you pull some wipes out of your purse, awkwardly wiping your ass and back with it.'
  704. end
  705. booty_call['wipes'] = 0
  706. elseif cumloc[0] > 0 or $booty_call['cum_choice'] = 'creampie':
  707. !! vagina
  708. if hypnoAddict > 0:
  709. '<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
  710. $npc_apt_bedroom[$boy]
  711. if booty_call['wipes'] = 1:
  712. 'You reach down to your purse and pull out your bag of wipes before you stop, suddenly confused.'
  713. '<i>Why did I get out my wipes?</i> you think to yourself. You frown at the packet, befuddled as to what you wanted to do with the,.'
  714. '<i>Meh. If it''s important, it will come back to me later,</i> you think to yourself as you put it back into your purse, oblivious to the liquid dribbling down the inside of your thigh.'
  715. elseif booty_call['wipes'] = 2:
  716. '"Hey, do you-" you start and then suddenly lose track of what you were trying to say. You frown to yourself as <<$npc_firstname[$boy]>> looks at you quizically.'
  717. '"Did you need something?"'
  718. '"I uhh..." Your frown deepens. "I wanted to ask you something... but I forgot what it was... I guess it doesn''t really matter..."'
  719. '<i>Meh. If it''s important, it will come back to me later,</i> you think to yourself, oblivious to the liquid dribbling down the inside of your thigh.'
  720. end
  721. else
  722. if booty_call['wipes'] = 2:
  723. '<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/after1.mp4"></video></center>'
  724. '"Hey, got anything I can use to clean up?" you say, holding your fingers over your pussy, trying to keep the cum from spilling out any further.'
  725. '"Oh yeah, right here." <<$npc_firstname[$boy]>> reaches over to his nightstand, pulling a packet of tissues and tossing them over to you. Gratefully accepting them, you pull out a handful and get to work cleaning yourself up.'
  726. else
  727. '<center><img <<$set_imgh>> src="images/shared/sex/cum/cum111.jpg"></center>'
  728. 'You really need to clean yourself after up after that. Reaching down to your purse, you pull some wipes out of your purse before reaching between your legs to wipe yourself up.'
  729. *nl
  730. 'It takes a few tries, more cum seemingly coming out with every next wipe, but eventually you feel like you got most of it out. At least enough that nothing is going to be running down your legs walking home.'
  731. end
  732. end
  733. end
  734. if cumloc[13] > 0:
  735. *nl
  736. !! hands
  737. 'Once you''re satisfied that the rest of your body is clean, you wipe your hands off and toss the wipes into the trash.'
  738. end
  739. booty_call['wipes'] = 0
  740. gs'cum_cleanup'
  741. gs'booty_call_after','start'
  742. end
  743. if $ARGS[0] = 'shower_alone':
  744. minut += 10
  745. cla & *clr
  746. '<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
  747. booty_call['shower'] = 1
  748. dynamic $showerdin
  749. 'You turn on the faucet, relaxing as the hot water pours down over your skin. After a few minutes, you turn the tap off, and step out, walking back to <<$npc_firstname[$boy]>>''s room wet and dripping.'
  750. '"I really needed that," you smile at him.'
  751. gs'booty_call_after','after_sex2'
  752. end
  753. if $ARGS[0] = 'shower_together':
  754. booty_call['shower'] = 1
  755. cla & *clr
  756. '<center><img <<$set_imgh>> src="images/shared/home/bathroom/shower_together.jpg"></center>'
  757. 'The two of you step into the shower together, hot water raining down on you, letting it wash away the sweat of your recent lovemaking.'
  758. act'Continue':
  759. cla & *clr
  760. gs'arousal','massage',5,'no_orgasm_msg'
  761. '<center><video autoplay loop src="images/shared/sex/shower/grope1.mp4"></video></center>'
  762. 'It doesn''t take long before you feel <<$npc_firstname[$boy]>>''s hands on you, running up and down your body, across your breasts and down towards your pussy.'
  763. act'Protest':
  764. cla & *clr
  765. '<center><video autoplay loop src="images/shared/sex/shower/grope1.mp4"></video></center>'
  766. '"Hey!" you protest.'
  767. act'I''m not in the mood':
  768. cla & *clr
  769. '<center><video autoplay loop src="images/shared/sex/shower/grope1.mp4"></video></center>'
  770. '"Hey!" you protest. "I''m not in the mood for this."'
  771. if booty_call['cum_count'] >= npc_sexdrive[$boy]:
  772. '"They were staring right at me," he grins. But he backs off as you asked.'
  773. else
  774. '"You showed up for a booty call didn''t you?"'
  775. '"Yeah, and now I''m done. Keep it in your pants."'
  776. '"Fine, fine." He backs off, as you asked.'
  777. end
  778. act'Finish shower':gt'booty_call_after','shower_together_end'
  779. end
  780. act'I don''t have time':
  781. cla & *clr
  782. '<center><video autoplay loop src="images/shared/sex/shower/grope1.mp4"></video></center>'
  783. '"Hey!" you protest. "I don''t have time for this. I have shit to do and I can''t have you making me late."'
  784. if booty_call['cum_count'] >= npc_sexdrive[$boy]:
  785. '"They were staring right at me," he grins. But he backs off as you asked.'
  786. else
  787. '"You showed up for a booty call didn''t you?"'
  788. '"Yeah, and now I have something <i>else</i> to do."'
  789. '"Fine, fine." He backs off, as you asked.'
  790. end
  791. act'Finish shower':gt'booty_call_after','shower_together_end'
  792. end
  793. end
  794. act'Enjoy his touch':
  795. cla & *clr
  796. gs'arousal','massage',5,'no_orgasm_msg'
  797. '<center><video autoplay loop src="images/shared/sex/shower/grope2.mp4"></video></center>'
  798. '"Mmmmmmmm..."'
  799. 'You moan softly as he paws at your breasts, squeezing and groping them.'
  800. act'That''s enough':
  801. cla & *nl
  802. '"Okay, that''s enough for now," you smile at him.'
  803. if npc_condom_conscious[$boy] = 1 or booty_call['cum_count'] >= npc_sexdrive[$boy]:
  804. '<<$npc_firstname[$boy]>> backs down and you finish your shower together.'
  805. act'Finish shower':gt'booty_call_after','shower_together_end'
  806. else
  807. '"Come on... We could keep going..."'
  808. act'No thanks':
  809. cla & *nl
  810. '"No thanks, I got enough earlier."'
  811. '<<$npc_firstname[$boy]>> seems disappointed, but accepts anyways. He does continue to fondle your breasts until you finish up though.'
  812. act'Finish shower':gt'booty_call_after','shower_together_end'
  813. end
  814. !!{ act'Well...':
  815. cla & *nl
  816. gs'arousal','massage',5,'no_orgasm_msg'
  817. '"Well..." Your breath hitches as he gives your nipples a light squeeze. You feel so wet, and it''s not just the shower.'
  818. if booty_call['condom'] = 1:
  819. '"You won''t cum inside me, will you?"'
  820. '"Don''t worry, I won''t." You gasp as without further warning, <<$npc_firstname[$boy]>> pushes his cock inside you.'
  821. else
  822. 'You look at <<$npc_firstname[$boy]>> and your expression tells him everything he needs to know. Without another word, he pushes his cock inside you.'
  823. end
  824. act'Shower sex':gt'booty_call_after','shower_together_sex'
  825. end
  826. if booty_call['condom'] = 1:
  827. act'No condom':
  828. cla & *nl
  829. '"We don''t have a condom," you protest.'
  830. end}
  831. !! end
  832. end
  833. end
  834. !! act'Shower sex':
  835. !! end
  836. end
  837. end
  838. end
  839. if $ARGS[0] = 'shower_together_sex':
  840. end
  841. if $ARGS[0] = 'shower_together_end':
  842. cla & *clr
  843. $npc_apt_bathroom[$boy]
  844. 'You turn off the faucet and towel off together, before heading back to <<$npc_firstname[$boy]>>''s bedroom.'
  845. gs'booty_call_after','after_sex2'
  846. end
  847. if $ARGS[0] = 'bed':
  848. minut += rand(1,2)
  849. gs'stat'
  850. '<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
  851. if pcs_pubes < 4:
  852. '<center><img <<$set_imgh>> src="images/shared/sex/after/sleep1.jpg"></center>'
  853. else
  854. '<center><img <<$set_imgh>> src="images/shared/sex/after/sleep2.jpg"></center>'
  855. end
  856. 'Your eyelids feel so heavy right now. You should probably get up but... you just need to rest your eyes...'
  857. *nl
  858. 'just... for... a minute...'
  859. act'Drift off into sleep':
  860. cla & *clr
  861. !! '<center><img <<$set_imgh>> src="images/shared/home/bedroom/son.jpg"></center>'
  862. booty_call['sleep_accident'] = 1
  863. if $booty_call['cum_choice'] = 'face':
  864. !! face
  865. '<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/sleep<<rand(1,3)>>.jpg"></center>'
  866. elseif $booty_call['cum_choice'] = 'stomach':
  867. !! stomach
  868. '<center><img <<$set_imgh>> src="images/shared/sex/cum/stomach/sleep1.jpg"></center>'
  869. elseif $booty_call['cum_choice'] = 'ass' or $booty_call['cum_choice'] = 'back':
  870. !! butt
  871. '<center><img <<$set_imgh>> src="images/shared/sex/cum/back1.jpg"></center>'
  872. elseif $booty_call['cum_choice'] = 'creampie':
  873. !! vagina
  874. '<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/after2.jpg"></center>'
  875. !! 'Tired, you curl up onto your side to face <<$npc_firstname[$boy]>>, passively aware that his cum is still leaking from your pussy, slowly dribbling down the curve of your thigh.'
  876. else
  877. '<center><img <<$set_imgh>> src="images/shared/home/bedroom/son.jpg"></center>'
  878. end
  879. '<i>just... for... a minute...</i>'
  880. *nl
  881. 'That''s the last thing you remember before everything fading into darkness...'
  882. act'. . .':gt'booty_call_after','sleep'
  883. end
  884. gs 'willpower','misc','self'
  885. if will_cost <= pcs_willpwr:
  886. act'Force yourself to get up (<<will_cost>> Willpower)':
  887. cla & *clr
  888. booty_call['get_up'] = 1
  889. $npc_apt_bedroom[$boy]
  890. 'With tremendous effort, you force your eyes open and haul yourself out of bed. You can''t fall asleep now, not yet.'
  891. gs'booty_call_after','start'
  892. end
  893. else
  894. act'Force yourself to get up (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  895. end
  896. end
  897. if $ARGS[0] = 'sleep':
  898. act'Fall asleep':
  899. cla & *nl
  900. 'As you lay there together, your eyelids slowly grow heavier until they close completely and your consciousness drifts slowly into darkness...'
  901. act'. . .':
  902. if alko > 6:
  903. booty_call['hangover'] = 1
  904. gs'sleep','simple'
  905. gs'pain', 3, 'head', 'ache'
  906. else
  907. gs'sleep','simple'
  908. end
  909. if mid($start_type,1,2) = 'sg' and home_owned[2] = 1: sveta_punishment['no_come_home'] = 1
  910. gt'booty_call_morning','morning'
  911. end
  912. end
  913. end
  914. --- booty_call_after ---------------------------------