sexm 46 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424
  1. # sexm
  2. if $ARGS[0] = 'start':
  3. cla
  4. *clr
  5. if loverlove[lover_number] = 0 and loverrelation[lover_number] >= 100 and loverdays[lover_number] >= 30 and husband = 0:
  6. act 'Talk about cohabitation':gt 'love', 'start'
  7. end
  8. '<<$loverdesc[lover_number]>> stops at the entrance of your building.'
  9. if haraklover[lover_number] = 2:'"<<$pcs_nickname>>, can I come in for a cup of coffee?"'
  10. if haraklover[lover_number] = 1:'"Let me kiss you, love."'
  11. if haraklover[lover_number] = 0:'"Good night, <<$pcs_nickname>>. I cannot wait until our next date; I miss you already."'
  12. act 'Kiss him goodnight':
  13. cla
  14. if boyonce[lover_number] = 0:
  15. if haraklover[lover_number] = 2:
  16. if loverdays[lover_number] < 3:
  17. loverrelation[lover_number] += 1
  18. '<<$loverdesc[lover_number]>> kisses you on the lips, while his hand squeezes your ass.'
  19. gs 'arousal', 'kiss', 5
  20. gs 'stat'
  21. elseif loverdays[lover_number] >= 3:
  22. loverrelation[lover_number] -= 2
  23. '<<$loverdesc[lover_number]>> kisses you on the lips and then pulls away mumbling irritably: "Not much happening, so far."'
  24. gs 'arousal', 'kiss', 5
  25. gs 'stat'
  26. end
  27. elseif haraklover[lover_number] = 1:
  28. if loverdays[lover_number] < 10:
  29. loverrelation[lover_number] += 2
  30. '<<$loverdesc[lover_number]>> kisses you goodbye on the lips, hugging your waist.'
  31. gs 'arousal', 'kiss', 5
  32. gs 'stat'
  33. elseif loverdays[lover_number] >= 10:
  34. loverrelation[lover_number] -= 2
  35. '<<$loverdesc[lover_number]>> kisses you goodbye on the lips and asks: "How long are we just going to hold hands?".'
  36. gs 'arousal', 'kiss', 5
  37. gs 'stat'
  38. end
  39. elseif haraklover[lover_number] = 0:
  40. if loverdays[lover_number] < 20:
  41. loverrelation[lover_number] += 3
  42. '<<$loverdesc[lover_number]>> kisses you goodbye on the lips and gently hugs your waist.'
  43. gs 'arousal', 'kiss', 5
  44. gs 'stat'
  45. elseif loverdays[lover_number] >= 20:
  46. loverrelation[lover_number] -= 1
  47. '<<$loverdesc[lover_number]>> kisses you goodbye on the lips and breaks away from the kiss looking at you with sad eyes.'
  48. gs 'arousal', 'kiss', 5
  49. gs 'stat'
  50. end
  51. end
  52. elseif boyonce[lover_number] = 1:
  53. if haraklover[lover_number] = 2:
  54. if loverdays[lover_number] < 3:
  55. loverrelation[lover_number] -= 2
  56. '<<$loverdesc[lover_number]>> kisses you goodbye on the lips while squeezing your ass with both hands.'
  57. gs 'arousal', 'kiss', 5
  58. gs 'stat'
  59. elseif loverdays[lover_number] >= 3:
  60. loverrelation[lover_number] -= 3
  61. '<<$loverdesc[lover_number]>> kisses you on the lips, then pulls away from the kiss muttering in exasperation: "No sex today, huh?"'
  62. gs 'arousal', 'kiss', 5
  63. gs 'stat'
  64. end
  65. elseif haraklover[lover_number] = 1:
  66. if loverdays[lover_number] < 10:
  67. loverrelation[lover_number] -= 1
  68. '<<$loverdesc[lover_number]>> kisses you goodbye on the lips, hugging your waist.'
  69. gs 'arousal', 'kiss', 5
  70. gs 'stat'
  71. elseif loverdays[lover_number] >= 10:
  72. loverrelation[lover_number] -= 2
  73. '<<$loverdesc[lover_number]>> kisses you goodbye on the lips and says: "Okay, I can live one day without sex.".'
  74. gs 'arousal', 'kiss', 5
  75. gs 'stat'
  76. end
  77. elseif haraklover[lover_number] = 0:
  78. if loverdays[lover_number] < 20:
  79. loverrelation[lover_number] += 1
  80. '<<$loverdesc[lover_number]>> kisses you goodbye on the lips and gently hugs your waist.'
  81. gs 'arousal', 'kiss', 5
  82. gs 'stat'
  83. elseif loverdays[lover_number] >= 20:
  84. loverrelation[lover_number] -= 1
  85. '<<$loverdesc[lover_number]>> kisses you goodbye on the lips and breaks away from the kiss looking at you with sad eyes.'
  86. gs 'arousal', 'kiss', 5
  87. gs 'stat'
  88. end
  89. end
  90. end
  91. act 'Continue':
  92. gs 'arousal', 'end'
  93. dynamic $go_home
  94. end
  95. end
  96. act 'Say goodnight':
  97. cla
  98. if boyonce[lover_number] = 0:
  99. if haraklover[lover_number] = 2:
  100. if loverdays[lover_number] < 3:
  101. loverrelation[lover_number] -= 1
  102. '<<$loverdesc[lover_number]>> seems slightly annoyed. "What are you, a holy virgin?"'
  103. elseif loverdays[lover_number] >= 3:
  104. loverrelation[lover_number] -= 3
  105. '<<$loverdesc[lover_number]>> seems irritated "So you do not even want to kiss? Oh well."'
  106. end
  107. elseif haraklover[lover_number] = 1:
  108. if loverdays[lover_number] < 10:
  109. loverrelation[lover_number] += 1
  110. '<<$loverdesc[lover_number]>> waves and leaves for the night.'
  111. elseif loverdays[lover_number] >= 10:
  112. loverrelation[lover_number] -= 2
  113. '<<$loverdesc[lover_number]>> waves goodbye irritably and walks away briskly.'
  114. end
  115. elseif haraklover[lover_number] = 0:
  116. if loverdays[lover_number] < 20:
  117. loverrelation[lover_number] += 2
  118. '<<$loverdesc[lover_number]>> waves goodbye with a smile.'
  119. elseif loverdays[lover_number] >= 20:
  120. loverrelation[lover_number] -= 1
  121. '<<$loverdesc[lover_number]>> waves goodbye, looking a bit sad.'
  122. end
  123. end
  124. elseif boyonce[lover_number] = 1:
  125. if haraklover[lover_number] = 2:
  126. if loverdays[lover_number] < 3:
  127. loverrelation[lover_number] -= 2
  128. '<<$loverdesc[lover_number]>> is annoyed and tells you to go fuck yourself'
  129. elseif loverdays[lover_number] >= 3:
  130. loverrelation[lover_number] -= 4
  131. '<<$loverdesc[lover_number]>> is dissapointed and asks " What are you afraid of?"'
  132. end
  133. elseif haraklover[lover_number] = 1:
  134. if loverdays[lover_number] < 10:
  135. loverrelation[lover_number] -= 1
  136. '<<$loverdesc[lover_number]>> waves and walks out of the house.'
  137. elseif loverdays[lover_number] >= 10:
  138. loverrelation[lover_number] -= 3
  139. '<<$loverdesc[lover_number]>> irritably waves goodbye and walks quickly out of the house.'
  140. end
  141. elseif haraklover[lover_number] = 0:
  142. if loverdays[lover_number] < 20:
  143. loverrelation[lover_number] += 1
  144. '<<$loverdesc[lover_number]>> waves you goodbye and smiles at you.'
  145. elseif loverdays[lover_number] >= 20:
  146. loverrelation[lover_number] -= 2
  147. '<<$loverdesc[lover_number]>> waves you goodbye and looks at you with big sad eyes.'
  148. end
  149. end
  150. end
  151. dynamic $go_home
  152. end
  153. if husband = 0:
  154. act 'Invite him in':
  155. cla
  156. gt 'sexm', 'room'
  157. end
  158. elseif husband > 0:
  159. if week < 6 and hour < 17 and hour > 7:
  160. act 'Invite him in':gt 'sexm', 'room'
  161. elseif week > 5 or week < 6 and hour > 16:
  162. act 'Tell him that your husband is home and you can''t invite him in':
  163. cla
  164. if haraklover[lover_number] = 0:
  165. loverrelation[lover_number] = 0
  166. pcs_lover -= 1
  167. '"What, you are married! You didn''t think to say anything earlier? I thought I loved you, you bitch!" he shouts and then runs away in tears.'
  168. act 'Go to your apartment':
  169. if curr_home = 1:
  170. gt 'korrPar'
  171. elseif curr_home = 2:
  172. gt 'gadukino'
  173. elseif curr_home = 3:
  174. gt 'korr'
  175. end
  176. end
  177. elseif haraklover[lover_number] = 1:
  178. '"Well then, see you, I''ll call you, " he said quietly and left.'
  179. act 'Go to your apartment':
  180. if curr_home = 1:
  181. gt 'korrPar'
  182. elseif curr_home = 2:
  183. gt 'gadukino'
  184. elseif curr_home = 3:
  185. gt 'korr'
  186. end
  187. end
  188. elseif haraklover[lover_number] = 2:
  189. '"If your husband is in the apartment, maybe you can climb a little higher, perhaps up to the attic?" he says, with a sly grin.'
  190. act 'Refuse':
  191. loverrelation[lover_number] -= 1
  192. if curr_home = 1:
  193. gt 'korrPar'
  194. elseif curr_home = 2:
  195. gt 'gadukino'
  196. elseif curr_home = 3:
  197. gt 'korr'
  198. end
  199. end
  200. act 'Agree':
  201. loverrelation[lover_number] += 1
  202. boycherdaksex = 1
  203. gt 'sexm', 'room'
  204. end
  205. end
  206. end
  207. end
  208. end
  209. end
  210. !!harakHusb > 0
  211. if $ARGS[0] = 'room':
  212. clr
  213. minut += 20
  214. gs 'stat'
  215. if night_mode = 1:
  216. fcolor = rgb(255, 255, 255)
  217. bcolor = rgb(0, 0, 0)
  218. lcolor = rgb(106, 90, 205)
  219. else
  220. fcolor = rgb(0, 0, 0)
  221. bcolor = rgb(255, 255, 255)
  222. lcolor = rgb(106, 90, 205)
  223. end
  224. if boycherdaksex = 1:
  225. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/cherdak.jpg"></center>'
  226. 'You climb up into the attic with your boyfriend.'
  227. elseif boycherdaksex = 0:
  228. '<center><b><font color="maroon">Bedroom</font></b></center>'
  229. if rembedr = 0:'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/bedr.jpg"></center>'
  230. if rembedr = 1:'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/bedr2.jpg"></center>'
  231. 'You take off your shoes and lead your lover to your bedroom.'
  232. end
  233. if haraklover[lover_number] = 2:
  234. '<<$loverdesc[lover_number]>> grabs you and rudely pushes you on your back. he starts to kiss you passionately and tries to take off your clothes.'
  235. 'Finally <<$loverdesc[lover_number]>> won the difficult battle with your bra straps.'
  236. gs 'arousal', 'kiss', 5, 'sub'
  237. gs 'stat'
  238. if boyonce[lover_number] = 1:
  239. sexrand = rand(0, 3)
  240. if sexrand = 0:
  241. '"<<$pcs_nickname>>, suck my dick."'
  242. act 'Give blowjob':
  243. cla
  244. loverrelation[lover_number] += 3
  245. gt 'sexm', 'minet'
  246. end
  247. act 'I don''t want to do this, let''s try something else':gt 'sexm', 'variant'
  248. elseif sexrand = 1:
  249. '"<<$pcs_nickname>>, cup your ass."'
  250. act 'Anal':
  251. cla
  252. loverrelation[lover_number] += 5
  253. gt 'sexm', 'anal'
  254. end
  255. act 'I don''t want to do this, let''s try something else':gt 'sexm', 'variant'
  256. elseif sexrand = 2:
  257. '"Lie down and spread your legs <<$pcs_nickname>> Lyashko."'
  258. act 'Spread her legs ':gt 'sexm', 'miss'
  259. act 'I don''t want to do this, let''s try something else':gt 'sexm', 'variant'
  260. elseif sexrand = 3:
  261. '"get on you hands and knees <<$pcs_nickname>> ."'
  262. act 'Doggy-Style':gt 'sexm', 'dog'
  263. act 'I don''t want to do this, let''s try something else':gt 'sexm', 'variant'
  264. end
  265. elseif boyonce[lover_number] = 0:
  266. '<<$loverdesc[lover_number]>> throws you on the bed and starts sucking on your breasts.'
  267. act 'Sex':gt 'sexm', 'miss'
  268. act 'I don''t want to do this, let''s try something else':gt 'sexm', 'variant'
  269. end
  270. elseif haraklover[lover_number] = 1:
  271. '<<$loverdesc[lover_number]>> gently hugs you and starts to cuddle.'
  272. 'You undress and smoothly <<$loverdesc[lover_number]>> asks you "how do you want it, darling?"'
  273. act 'I want as much as you want':
  274. cla
  275. if boyonce[lover_number] = 1:
  276. sexrand = rand(0, 3)
  277. if sexrand = 0:
  278. '"<<$pcs_firstname>>, I want you to suck it."'
  279. act 'Give blowjob':
  280. cla
  281. loverrelation[lover_number] += 2
  282. gt 'sexm', 'minet'
  283. end
  284. act 'I don''t want to do this, let''s try something else':gt 'sexm', 'variant'
  285. elseif sexrand = 1:
  286. '"<<$pcs_firstname>>, I want to take you in the ass."'
  287. act 'Anal':
  288. cla
  289. loverrelation[lover_number] += 4
  290. gt 'sexm', 'anal'
  291. end
  292. act 'I don''t want to do this, let''s try something else':gt 'sexm', 'variant'
  293. elseif sexrand = 2:
  294. '"<<$pcs_firstname>>, I want you."'
  295. act 'Spread her legs ':gt 'sexm', 'miss'
  296. act 'I don''t want to do this, let''s try something else':gt 'sexm', 'variant'
  297. elseif sexrand = 3:
  298. '"<<$pcs_firstname>>, stand on all fours."'
  299. act 'Doggy-Style':gt 'sexm', 'dog'
  300. act 'I don''t want to do this, let''s try something else':gt 'sexm', 'variant'
  301. end
  302. elseif boyonce[lover_number] = 0:
  303. '<<$loverdesc[lover_number]>> throws you on the bed and starts sucking on your breasts.'
  304. act 'Sex':gt 'sexm', 'miss'
  305. act 'I don''t want to do this, let''s try something else':gt 'sexm', 'variant'
  306. end
  307. end
  308. act 'Propose options':gt 'sexm', 'variant'
  309. elseif haraklover[lover_number] = 0:
  310. '<<$loverdesc[lover_number]>> is shy and does not know what to do.'
  311. act 'Propose options':gt 'sexm', 'variant'
  312. end
  313. end
  314. if $ARGS[0] = 'variant':
  315. if haraklover[lover_number] = 0:loverrelation[lover_number] += 1
  316. if haraklover[lover_number] = 2:loverrelation[lover_number] -= 1
  317. '<<$loverdesc[lover_number]>> looks at you and is waiting for you to say something'
  318. act 'Lie down and spread your legs':gt 'sexm', 'miss'
  319. act 'Doggy-Style':gt 'sexm', 'dog'
  320. act 'Anal':gt 'sexm', 'anal'
  321. act 'Give him a blowjob':gt 'sexm', 'minet'
  322. act 'Wank him off':gt 'sexm', 'hand'
  323. if kunday ! daystart:
  324. act 'Have him lick you out':gt 'sexm', 'kuni'
  325. end
  326. if pcs_dom > 0 and boyonce[lover_number] = 1 and haraklover[lover_number] = 0 and izvrat[lover_number] = 1 and strapon > 0:
  327. act 'Fuck him with your strapon':gt 'sexm', 'strapon'
  328. end
  329. end
  330. if $ARGS[0] = 'minet':
  331. *clr
  332. popolaini = 1
  333. loverrelation[lover_number] += 1
  334. bja += 1
  335. dick = loverdick[lover_number]
  336. harakBoy = haraklover[lover_number]
  337. gs 'boyStat', $lover[lover_number]
  338. gs 'brosok'
  339. gs 'stat'
  340. '<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bj24.jpg"></center>'
  341. 'you wrap you lips around <<$loverdesc[lover_number]>> ''s dick.'
  342. if stat['bj'] = 1:'You thought, "Damn, now I am just sitting here sucking his dick."'
  343. gs 'arousal', 'bj', 15, 'sub'
  344. gs 'stat'
  345. act 'Continue to suck':
  346. cla
  347. *clr
  348. swallow += 1
  349. spafinloc = 12
  350. gs 'cum_manage'
  351. loverrelation[lover_number] += 3
  352. '<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum30.jpg"></center>'
  353. 'A hot jet of sperm hit you in the mouth. You started to swallow his cum while <<$loverdesc[lover_number]>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'
  354. act 'Leave':gt 'sexm', 'endsex'
  355. end
  356. act 'Remove his cock before he cums':
  357. cla
  358. *clr
  359. if haraklover[lover_number] = 0:
  360. spafinloc = 13
  361. gs 'cum_manage'
  362. '<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
  363. 'You remove his dick from your mouth and finish off <<$loverdesc[lover_number]>> with your hand.'
  364. elseif haraklover[lover_number] = 1:
  365. tiprand = rand(0, 3)
  366. if tiprand < 3:
  367. spafinloc = 13
  368. gs 'cum_manage'
  369. '<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
  370. 'You remove his dick from your mouth and finish off <<$loverdesc[lover_number]>> with your hand.'
  371. elseif tiprand = 3:
  372. facial += 1
  373. spafinloc = 11
  374. gs 'cum_manage'
  375. loverrelation[lover_number] += 1
  376. '<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
  377. 'You took his dick out of your mouth and pointed it right at your face. You are now covered with <<$loverdesc[lover_number]>>s warm and sticky cum.'
  378. end
  379. elseif haraklover[lover_number] = 2:
  380. facial += 1
  381. spafinloc = 11
  382. gs 'cum_manage'
  383. loverrelation[lover_number] += 1
  384. '<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
  385. '<<$loverdesc[lover_number]>> holds you by your hair. He takes his dick out of your mouth and cums on your face, covering it with warm and sticky cum.'
  386. end
  387. act 'Leave':gt 'sexm', 'endsex'
  388. end
  389. end
  390. if $ARGS[0] = 'hand':
  391. *clr
  392. popolaini = 1
  393. hja += 1
  394. pcs_horny += pcs_dom
  395. gs 'brosok'
  396. gs 'stat'
  397. '<center><img <<$set_imgh>> src="images/shared/sex/cum/handjob/hand1.jpg"></center>'
  398. 'You take his <<loverdick[lover_number]>> centimeter penis and begin to caress it gently, moving the skin on the purple head back and forth.'
  399. 'Soon, your skillful movements makes the guy cum in your hands, covering them with warm and sticky sperm.'
  400. if haraklover[lover_number] = 0:loverrelation[lover_number] -= 1
  401. if haraklover[lover_number] = 1:loverrelation[lover_number] -= 5
  402. if haraklover[lover_number] = 2:loverrelation[lover_number] -= 10
  403. gs 'arousal', 'hj', 30, 'dom'
  404. gs 'stat'
  405. act 'Wipe your hands and walk him to the door':gt 'sexm', 'endsex'
  406. end
  407. if $ARGS[0] = 'kuni':
  408. *clr
  409. kunday = daystart
  410. pcs_horny += pcs_dom + (silaVag * 2 + 5)
  411. gs 'brosok'
  412. gs 'stat'
  413. '<center><img <<$set_imgh>> src="images/shared/sex/kuni/kuni.jpg"></center>'
  414. 'You undress and go lie down on the bed. You ask him to use his tongue to pleasure you .'
  415. '<<$loverdesc[lover_number]>> lies down between your legs and begins to work his tongue on your pussy.'
  416. if haraklover[lover_number] = 0:loverrelation[lover_number] -= 1
  417. if haraklover[lover_number] = 1:loverrelation[lover_number] -= 5
  418. if haraklover[lover_number] = 2:loverrelation[lover_number] -= 10
  419. gs 'arousal', 'cuni', 30, 'dom'
  420. gs 'stat'
  421. act 'Further':
  422. cla
  423. if husband > 0 and hour < 17 and hour > 7 and boycherdaksex = 0:popolaini = 2 & gt 'sexm', 'popala'
  424. gt 'sexm', 'variant'
  425. end
  426. end
  427. if $ARGS[0] = 'strapon':
  428. *clr
  429. loverrelation[lover_number] += 5
  430. gs 'brosok'
  431. gs 'stat'
  432. '<center><img <<$set_imgh>> src="images/shared/sex/dom/pegging.gif"></center>'
  433. 'You go to the drawer and put on your strapon. <<$loverdesc[lover_number]>> gets ready on all fours on the bed.'
  434. 'you use some lubrication on the guys anus and stick in the strapon. While you fuck his ass he groans a lot and finally finishes. You remove the strapon from his ass and go to the bathroom.'
  435. gs 'arousal', 'anal_strap_give', 30, 'dom'
  436. gs 'stat'
  437. act 'Wipe your hands and walk him to the door':
  438. cla
  439. gs 'arousal', 'end'
  440. if curr_home = 1:
  441. gt 'korrPar'
  442. elseif curr_home = 2:
  443. gt 'gadukino'
  444. elseif curr_home = 3:
  445. gt 'korr'
  446. end
  447. end
  448. end
  449. if $ARGS[0] = 'anal':
  450. *clr
  451. popolaini = 3
  452. loverrelation[lover_number] += 1
  453. anala += 1
  454. if loverdick[lover_number] < pcs_ass:pcs_ass += 1
  455. gs 'brosok'
  456. gs 'stat'
  457. '<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/dog2.jpg"></center>'
  458. if analplugin = 1 :
  459. analpluginbonus = 10
  460. analplugin = 0
  461. if pcs_ass < 16 :
  462. '<<$loverdesc[lover_number]>> has pulled the buttplug out of your narrow and tight ass'
  463. elseif pcs_ass >= 16 :
  464. ' <<$loverdesc[lover_number]>>pulled out your butt plug '
  465. end
  466. 'and you feel his hard cock resting on your ass.'
  467. gs 'arousal', 'anal', 30, 'dom'
  468. gs 'stat'
  469. if pcs_ass + analpluginbonus < dick:
  470. 'You scream and bite your lip from the sharp pain you suddenly feel when his <<loverdick[lover_number]>> centimeter penis rips apart your ass when it enters.'
  471. elseif pcs_ass + analpluginbonus >= dick:
  472. 'You groan slightly when you feel his <<loverdick[lover_number]>> centimeter dick enters your ass.'
  473. end
  474. 'Finally <<$loverdesc[lover_number]>> grabs your tight ass and starts slamming inside you fiercely. With one final thrust he finishes balls deep inside you.'
  475. spafinloc = 4
  476. gs 'cum_manage'
  477. minut += 3
  478. spafinloc = 3
  479. gs 'cum_manage'
  480. gs 'stat'
  481. act 'Show him out':gt 'sexm', 'endsex'
  482. else
  483. if lubri = 0:
  484. lubonus = 2
  485. 'You do not have any lubricant so <<$loverdesc[lover_number]>> spits on his fingers to lubricate your ass.'
  486. elseif lubri > 0:
  487. lubri -= 1
  488. lubonus = 10
  489. 'You take out a tube of lubricant and hand it to the guy. He squeezes a little on the palm of his hand and rubs your anus.'
  490. end
  491. '<<$loverdesc[lover_number]>> puts you on your stomach on the bed and begins to massage your buttocks and your anus with his fingers. First one, then two.'
  492. gs 'arousal', 'anal_finger', 10, 'dom'
  493. gs 'stat'
  494. if pcs_ass < 10:'When he enters the third finger you involuntarily groan in pain.'
  495. if pcs_ass >= 10:'When he enters the third finger you can feel your anus getting stretched out.'
  496. '<<$loverdesc[lover_number]>> pulls his fingers out of your buttocks and you feel his hard cock resting on your ass.'
  497. gs 'arousal', 'anal', 15, 'dom'
  498. gs 'stat'
  499. if pcs_ass + lubonus < loverdick[lover_number]:
  500. 'You scream and bite your lip from the sharp pain you suddenly feel as his cock stretches your ass while he enters.'
  501. elseif pcs_ass + lubonus >= loverdick[lover_number]:
  502. 'You groan slightly when you feel his cock entering your ass.'
  503. end
  504. '<<$loverdesc[lover_number]>> stops for a moment to give your ass some time to adapt to the big dick inside. Then he starts moving again with a lot more force then before.'
  505. if pcs_ass + lubonus + 2 < loverdick[lover_number]:
  506. if pcs_makeup > 1:pcs_makeup = 0
  507. 'You cry and bite into the pillow when his <<loverdick[lover_number]>> centimeter cock begins to fuck your ass in full force.'
  508. elseif pcs_ass + lubonus + 2 >= loverdick[lover_number]:
  509. 'You start to moan rhythmically following the pace of the movements of the dick inside you.'
  510. end
  511. 'Finally <<$loverdesc[lover_number]>> grabs your tight ass and starts slamming inside you with all his might. With one final thrust he finishes balls deep inside you.'
  512. gs 'arousal', 'anal', 10, 'dom', 'rough'
  513. gs 'stat'
  514. if klismaday ! daystart:
  515. loverrelation[lover_number] -= 8
  516. '<<$loverdesc[lover_number]>> takes his dick out of your ass and he see some traces of excrement. He says, "Baby, I did not come here to watch Charlie and the Chocolate Factory. You should use an enema before we start."'
  517. elseif klismaday = daystart:
  518. loverrelation[lover_number] += 5
  519. spafinloc = 3
  520. gs 'cum_manage'
  521. '<<$loverdesc[lover_number]>> took his dick out of you and gave you a kiss. Then you went to the bathroom.'
  522. end
  523. if pcs_ass < dick:pcs_ass += 1
  524. gs 'stat'
  525. act 'Show him out':lubonus = 0 & gt 'sexm', 'endsex'
  526. end
  527. end
  528. if $ARGS[0] = 'miss':
  529. *clr
  530. popolaini = 3
  531. loverrelation[lover_number] += 1
  532. sexa += 1
  533. pose = 0
  534. gs 'boyStat', $lover[lover_number]
  535. dick = loverdick[lover_number]
  536. silavag = silaVag[lover_number]
  537. gs 'brosok'
  538. gs 'cum_manage'
  539. gs 'stat'
  540. '<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/vag.jpg"></center>'
  541. '<<$loverdesc[lover_number]>> spreads your legs and begins to fondle your pussy with his fingers. Once he is satisfied that you are ready he takes you vigorously.'
  542. gs 'arousal', 'vaginal_finger', 5
  543. gs 'arousal', 'vaginal', 25
  544. gs 'stat'
  545. act 'Show him out':gt 'sexm', 'endsex'
  546. end
  547. if $ARGS[0] = 'dog':
  548. *clr
  549. popolaini = 3
  550. loverrelation[lover_number] += 1
  551. sexa += 1
  552. pose = 1
  553. gs 'boyStat', $lover[lover_number]
  554. dick = loverdick[lover_number]
  555. silavag = silaVag[lover_number]
  556. gs 'brosok'
  557. gs 'cum_manage'
  558. gs 'stat'
  559. '<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/dog1.jpg"></center>'
  560. '<<$loverdesc[lover_number]>> made you get on all fours and spread your pussy before he enters.'
  561. gs 'arousal', 'vaginal', 30, 'dom'
  562. gs 'stat'
  563. act 'Show him out':gt 'sexm', 'endsex'
  564. end
  565. if $ARGS[0] = 'startPod':
  566. podrand = rand(0, 1)
  567. if podrand = 0:
  568. '<<$loverdesc[lover_number]>> whispered to you, take it in your mouth.'
  569. act 'Fuck off!':
  570. cla
  571. pcs_dom += 1
  572. loverrelation[lover_number] = 0
  573. pcs_lover -= 1
  574. if curr_home = 1:
  575. gt 'korrPar'
  576. elseif curr_home = 2:
  577. gt 'gadukino'
  578. elseif curr_home = 3:
  579. gt 'korr'
  580. end
  581. end
  582. act 'use your mouth':gt 'sexm', 'blow'
  583. elseif podrand = 1:
  584. '<<$loverdesc[lover_number]>> began to strip off your clothes.'
  585. act 'Fuck off!':
  586. cla
  587. pcs_dom += 1
  588. loverrelation[lover_number] = 0
  589. pcs_lover -= 1
  590. if curr_home = 1:
  591. gt 'korrPar'
  592. elseif curr_home = 2:
  593. gt 'gadukino'
  594. elseif curr_home = 3:
  595. gt 'korr'
  596. end
  597. end
  598. act 'Doggy-Style':gt 'sexm', 'doggy'
  599. end
  600. end
  601. if $ARGS[0] = 'doggy':
  602. loverrelation[lover_number] += 1
  603. sexa += 1
  604. pose = 1
  605. gs 'boyStat', $lover[lover_number]
  606. dick = loverdick[lover_number]
  607. silavag = silaVag[lover_number]
  608. gs 'brosok'
  609. gs 'cum_manage'
  610. gs 'stat'
  611. '<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/dog.jpg"></center>'
  612. '<<$loverdesc[lover_number]>> made you get on all fours and spread your pussy before he enters.'
  613. gs 'arousal', 'vaginal', 30, 'dom'
  614. gs 'stat'
  615. act 'Collect clothes and leave':
  616. cla
  617. if curr_home = 1:
  618. gt 'korrPar'
  619. elseif curr_home = 2:
  620. gt 'gadukino'
  621. elseif curr_home = 3:
  622. gt 'korr'
  623. end
  624. end
  625. end
  626. if $ARGS[0] = 'blow':
  627. minut += 20
  628. gs 'stat'
  629. 'You squatted and <<$loverdesc[lover_number]>> pulled out his penis.'
  630. act 'Take by mouth':
  631. cla
  632. *clr
  633. loverrelation[lover_number] += 1
  634. bja += 1
  635. dick = loverdick[lover_number]
  636. harakBoy = haraklover[lover_number]
  637. gs 'boyStat', $lover[lover_number]
  638. gs 'brosok'
  639. gs 'stat'
  640. '<center><img src ="images/shared/sex/blowjob/bj24.jpg"></center>'
  641. 'you wrap you lips around <<$loverdesc[lover_number]>> ''s dick.'
  642. if stat['bj'] = 1:'You thought, "Damn, now I am just sitting here sucking his dick."'
  643. gs 'arousal', 'bj', 30, 'dom'
  644. gs 'stat'
  645. act 'Continue to suck':
  646. cla
  647. *clr
  648. swallow += 1
  649. spafinloc = 12
  650. gs 'cum_manage'
  651. '<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum30.jpg"></center>'
  652. 'A hot jet of sperm hit you in the mouth. You started to swallow his cum while <<$loverdesc[lover_number]>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'
  653. act 'Leave':
  654. cla
  655. gs 'arousal', 'end'
  656. if curr_home = 1:
  657. gt 'korrPar'
  658. elseif curr_home = 2:
  659. gt 'gadukino'
  660. elseif curr_home = 3:
  661. gt 'korr'
  662. end
  663. end
  664. end
  665. act 'Remove from mouth':
  666. cla
  667. *clr
  668. if haraklover[lover_number] = 0:
  669. spafinloc = 13
  670. gs 'cum_manage'
  671. '<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
  672. 'You remove his dick from your mouth and finish off <<$loverdesc[lover_number]>> with your hand.'
  673. elseif haraklover[lover_number] = 1:
  674. tiprand = rand(0, 3)
  675. if tiprand < 3:
  676. spafinloc = 13
  677. gs 'cum_manage'
  678. '<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
  679. 'You remove his dick from your mouth and finish off <<$loverdesc[lover_number]>> with your hand.'
  680. elseif tiprand = 3:
  681. facial += 1
  682. spafinloc = 11
  683. gs 'cum_manage'
  684. '<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
  685. 'You took his dick out of your mouth and pointed it right at your face. You are now covered with <<$loverdesc[lover_number]>>''s warm and sticky cum.'
  686. end
  687. elseif haraklover[lover_number] = 2:
  688. facial += 1
  689. spafinloc = 11
  690. gs 'cum_manage'
  691. '<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
  692. '<<$loverdesc[lover_number]>> holds you by your hair. He takes his dick out of your mouth and cums on your face, covering it with warm and sticky cum.'
  693. end
  694. act 'Leave':
  695. cla
  696. gs 'arousal', 'end'
  697. if curr_home = 1:
  698. gt 'korrPar'
  699. elseif curr_home = 2:
  700. gt 'gadukino'
  701. elseif curr_home = 3:
  702. gt 'korr'
  703. end
  704. end
  705. end
  706. end
  707. act 'Masturbate him':
  708. cla
  709. *clr
  710. hja += 1
  711. gs 'brosok'
  712. spafinloc = 13
  713. gs 'cum_manage'
  714. gs 'stat'
  715. '<center><img <<$set_imgh>> src="images/shared/sex/cum/handjob/hand1.jpg"></center>'
  716. 'You take his <<loverdick[lover_number]>> centimeter penis in your hands and begin to caress it gently.'
  717. 'Soon, your skillful movements makes the guy cum in your hands, covering them with warm and sticky sperm.'
  718. if haraklover[lover_number] = 0:loverrelation[lover_number] -= 1
  719. if haraklover[lover_number] = 1:loverrelation[lover_number] -= 5
  720. if haraklover[lover_number] = 2:loverrelation[lover_number] -= 10
  721. gs 'arousal', 'hj', 30, 'dom'
  722. gs 'stat'
  723. act 'Wipe your hands and walk away':
  724. cla
  725. gs 'arousal', 'end'
  726. if curr_home = 1:
  727. gt 'korrPar'
  728. elseif curr_home = 2:
  729. gt 'gadukino'
  730. elseif curr_home = 3:
  731. gt 'korr'
  732. end
  733. end
  734. end
  735. end
  736. if $ARGS[0] = 'gangrape':
  737. 'You begin to struggle and one of the guys hits you with his hand on your cheek, saying, "Shut up slut! Now spread your legs! We will fuck you up now!"'
  738. gs 'npcgeneratec', 0, 'Stranger', rand(18,45)
  739. gs 'boyStat', $npclastgenerated
  740. act 'Obey':gt 'sexm', 'gangbang'
  741. act 'Start a fight':
  742. cla
  743. !!stats
  744. strenV = 100
  745. speedV = 20
  746. agilV = 10
  747. reactV = 10
  748. vitalV = 50
  749. intelV = 10
  750. willV = 10
  751. !!skills
  752. magikV = 100
  753. boxingV = 10
  754. shootV = 100
  755. !!parameters
  756. healthV = vitalV * 10 + strenV * 5
  757. mannaV = intelV * 10 + magikV * 10
  758. willpowerV = willV * 10
  759. BonusAtakV = 0
  760. BonusDefV = 0
  761. !!Programme of Action
  762. program = 0
  763. gangrapeFight = 1
  764. if spellavtoklon = 1:klon = 3
  765. if spellbefshild = 1:defence = 500
  766. gt 'fight', 'start'
  767. end
  768. end
  769. if $ARGS[0] = 'gangbang':
  770. if izvrat = 1:
  771. loverrelation[lover_number] += 5
  772. else
  773. loverrelation[lover_number] = 0
  774. pcs_lover -= 1
  775. end
  776. gang += 1
  777. guy += 4
  778. cumprecheck = 1
  779. gs 'cum_manage'
  780. spafinloc = 11
  781. gs 'cum_manage'
  782. spafinloc = 12
  783. gs 'cum_manage'
  784. gs 'npcgeneratec', 0, 'Stranger', rand(18,45)
  785. gs 'boyStat', $npclastgenerated
  786. spafinloc = 11
  787. gs 'cum_manage'
  788. spafinloc = 12
  789. gs 'cum_manage'
  790. gs 'npcgeneratec', 0, 'Stranger', rand(18,45)
  791. gs 'boyStat', $npclastgenerated
  792. spafinloc = 11
  793. gs 'cum_manage'
  794. spafinloc = 12
  795. gs 'cum_manage'
  796. gs 'npcgeneratec', 0, 'Stranger', rand(18,45)
  797. gs 'boyStat', $npclastgenerated
  798. spafinloc = 11
  799. gs 'cum_manage'
  800. spafinloc = 12
  801. gs 'cum_manage'
  802. facial += 1
  803. pcs_vag += 1
  804. pcs_ass += 1
  805. pcs_throat += 1
  806. if pcs_makeup > 1:pcs_makeup = 0
  807. gs 'stat'
  808. '<center><img <<$set_imgh>> src="images/shared/sex/group/gangbang.jpg"></center>'
  809. 'One of the guys lives nearby and he drags you into his apartment. There he started tearing off your clothes.'
  810. 'Once you are completely naked they put you on your knees. One of them shoves his dick inside your mouth. They give you a cock in each hand and instruct you to start jerking them off. They make you feel like a real whore.'
  811. 'Suddenly one of the boys pushes you on the couch and grabs you by the waist. he thrusts his cock deep inside your pussy, you do not have time to react to this because you get two cocks shoved into your mouth at once.'
  812. 'You feel a cold sensation on your ass. It looks like they are rubbing some lubrication there. Then you feel something big and solid at your rear entrance.'
  813. gs 'arousal', 'bj', 10, 'gangbang', 'sub'
  814. gs 'arousal', 'hj', 10, 'gangbang', 'sub'
  815. minut -= 10
  816. gs 'stat'
  817. act 'Moan':
  818. cla
  819. *clr
  820. '<center><img <<$set_imgh>> src="images/shared/sex/group/gangbang1.jpg"></center>'
  821. 'You moan when you feel a fat cock entering your ass. Now you are filled up in every hole.'
  822. gs 'arousal', 'bj', 10, 'gangbang', 'sub'
  823. gs 'arousal', 'vaginal', 10, 'gangbang', 'sub'
  824. gs 'arousal', 'anal', 10, 'gangbang', 'sub'
  825. minut -= 10
  826. gs 'stat'
  827. if pcs_ass >= 10:
  828. pcs_horny += pcs_ass + SUB
  829. 'Two cocks are hammering you from behind, you can feel like them rubbing through the thin barriers between the anus and the vaginal wall. you are starting to get wet while the two cocks enthusiastically continue to pound.'
  830. elseif pcs_ass < 10:
  831. pcs_horny += (10 - pcs_ass)
  832. 'You are crying very hard from the severe pain you feel from the hard cock ramming your ass while another cock is fucking you in your pussy.'
  833. end
  834. if pcs_horny >= 90:
  835. $orgasm_or = 'custom'
  836. $orgasm_txt = 'You can feel the sensation in your stomach begins to grow and soon your whole body is overtaken by a shock as you moan through your orgasm.'
  837. end
  838. 'It seems the guys have played enough with you and they have decided to come on your face. They removed their dicks from your holes and point them at you.'
  839. act 'Get on your knees':
  840. cla
  841. *clr
  842. '<center><img <<$set_imgh>> src="images/shared/sex/group/gangbang2.jpg"></center>'
  843. 'You humbly knelt before the guys, they quickly surround you and they all start to cum on your face, covering it with sticky, warm and fragrant sperm.'
  844. 'After the boys spent their load they lost interest in you and began to leave.'
  845. act 'Leave':
  846. cla
  847. gs 'arousal', 'end'
  848. if curr_home = 1:
  849. gt 'korrPar'
  850. elseif curr_home = 2:
  851. gt 'gadukino'
  852. elseif curr_home = 3:
  853. gt 'korr'
  854. end
  855. end
  856. end
  857. end
  858. end
  859. if $ARGS[0] = 'popala':
  860. cla
  861. *clr
  862. sexpartkno = 1
  863. gs 'boyStat', $husID
  864. gs 'boyStat', $lover[lover_number], 'a'
  865. if popolaini = 1:
  866. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/p0.jpg"></center>'
  867. 'Just as you were about to go to the bathroom to wash up you husband walked in and caught you kneeling in front of a naked man while you are covered in semen.'
  868. elseif popolaini = 2:
  869. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/p5.jpg"></center>'
  870. 'Just as you changed position your husband entered the room.'
  871. end
  872. !!if popolaini = 2:
  873. !! '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/p4.jpg"></center>'
  874. !! 'Just when you start to enjoy yourself your husband enters the room.'
  875. !!end
  876. if harakHusb = 0:
  877. '"Honey what''s happening here ? why are you cheating on me ? " stammered <<$husName>> while looking at you.'
  878. '"<<$husName>> it''s not what you think. It''s just sex, no feelings, I only love you. He does not mean anything. Come to me, I''ll show you how much I love you. " you answered him. You know you are caught red-handed so you made up some excuse on the spot but you don''t really think he will believe this.'
  879. if izvratH = 0:
  880. husbizvradd = 0
  881. husbharmin = 0
  882. husbandMark = 0
  883. husband = 0
  884. divorced += 1
  885. gs 'boyStat', $lover[lover_number]
  886. '"No, I''m going, you betrayed our love." he faltered and ran out of the room almost sobbing.'
  887. if haraklover[lover_number] = 0:
  888. loverrelation[lover_number] = 0
  889. pcs_lover -= 1
  890. '"Wait,you''re married ! You deceived me even though I loved you. Goodbye!" your guy shouts at you and runs after your husband.'
  891. act 'Leave':
  892. if curr_home = 1:
  893. gt 'korrPar'
  894. elseif curr_home = 2:
  895. gt 'gadukino'
  896. elseif curr_home = 3:
  897. gt 'korr'
  898. end
  899. end
  900. elseif haraklover[lover_number] = 1:
  901. '"Well, I see you are not only for me, so perhaps I''ll go, but if you want I can stay and comfort you " said <<$loverdesc[lover_number]>>'
  902. act 'Let him go':
  903. if curr_home = 1:
  904. gt 'korrPar'
  905. elseif curr_home = 2:
  906. gt 'gadukino'
  907. elseif curr_home = 3:
  908. gt 'korr'
  909. end
  910. end
  911. act 'Let him stay':
  912. loverrelation[lover_number] += 1
  913. picrand = 83
  914. if popolaini = 3:picrand = 84
  915. xgt 'sex', 'var'
  916. end
  917. elseif haraklover[lover_number] = 2:
  918. '"This is a surprise, but oh well that clown ran away, and I am once again ready. Let''s continue and let this wimp go" said <<$loverdesc[lover_number]>>, clearly intending to continue the evening.'
  919. act 'Refuse':
  920. loverrelation[lover_number] -= 1
  921. if curr_home = 1:
  922. gt 'korrPar'
  923. elseif curr_home = 2:
  924. gt 'gadukino'
  925. elseif curr_home = 3:
  926. gt 'korr'
  927. end
  928. end
  929. act 'Continue':
  930. loverrelation[lover_number] += 2
  931. picrand = 83
  932. if popolaini = 3:picrand = 84
  933. xgt 'sex', 'var'
  934. end
  935. end
  936. elseif izvratH = 1:
  937. '"You really only love me ?" asked <<$husName>>.'
  938. '"Yes, so you come to me and i will do everything with you like he did, but it will be with love now and you will understand the difference" you replied. You are amazed at how he believes in this nonsense. <<$husName>> came up to you and you unbuttoned his pants to reveal his dick.'
  939. if haraklover[lover_number] = 0:
  940. loverrelation[lover_number] = 0
  941. pcs_lover -= 1
  942. husbizvradd = 0
  943. husbharmin = 0
  944. husbandMark = 0
  945. husband = 0
  946. divorced += 1
  947. '"So you''re married ! you deceived me even though I loved you. You are a despicable liar. Goodbye!" your guy shouted and ran out of the room.'
  948. '"He''s right, you''re a liar, and you do not deserve me, you''re a fallen woman, I don''t want to see you again" You husband burst into tears and ran out to follow the guy.'
  949. act 'Leave':
  950. if curr_home = 1:
  951. gt 'korrPar'
  952. elseif curr_home = 2:
  953. gt 'gadukino'
  954. elseif curr_home = 3:
  955. gt 'korr'
  956. end
  957. end
  958. elseif haraklover[lover_number] = 1:
  959. '<<$loverdesc[lover_number]>> stood by you and watched as you fucked your husband, "Wow, you seem to really enjoy sex with your husband. This really can''t compare to what we did. Well maybe you can use your mouth and I can still be useful" he said.'
  960. '"Sure, come on." perked <<$husName>> "Dear lie down on the bed"'
  961. act 'Lie down':
  962. cla
  963. *clr
  964. houseslut += 1
  965. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/p1.jpg"></center>'
  966. 'You lie down on the bed and <<$husName>> enters your pussy while <<$loverdesc[lover_number]>> lies before you and moves his cock to your mouth. You diligently work your husband''s cock while not forgetting your lover''s cock in your mouth.'
  967. '"Mmm <<$pcs_nickname>> I have never seen you so enthousiastic when we were together. Maybe we should try some other positions" proposed <<$loverdesc[lover_number]>>, and your husband agreed.'
  968. gs 'arousal', 'vaginal', 10
  969. gs 'stat'
  970. act 'Continue':
  971. loverrelation[lover_number] += 1
  972. if popolaini = 1:picrand = 40
  973. if popolaini = 2:picrand = 41
  974. if popolaini = 3:picrand = 42
  975. xgt 'sexdvoe', 'var'
  976. end
  977. end
  978. elseif haraklover[lover_number] = 2:
  979. '"That''s right, her mouth is great, but her ass is even better. You fuck her ass, and I''ll fuck her mouth. With her ass she can show you if she really loves you, or not. " said <<$loverdesc[lover_number]>>, explicitly directed at your husband.'
  980. '"Yeah, come to bed, see how I am going to love your ass, " said <<$husName>>.'
  981. act 'Lie down':
  982. cla
  983. *clr
  984. houseslut += 1
  985. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/p2.jpg"></center>'
  986. 'You lie down on the bed and <<$husName>> enters you in the anus, while <<$loverdesc[lover_number]>> lies before you, presenting his cock to your mouth. You diligently work your husband''s cock in your ass while not forgetting your lover''s cock in your mouth.'
  987. '"If you remove your dick from her ass now then she can really show you how much she loves you." proposed <<$loverdesc[lover_number]>>, and the husband agreed.'
  988. gs 'arousal', 'anal', 10
  989. gs 'stat'
  990. act 'Continue':
  991. loverrelation[lover_number] += 1
  992. if popolaini = 2:picrand = 41
  993. if popolaini = 1:picrand = 40
  994. if popolaini = 3:picrand = 42
  995. xgt 'sexdvoe', 'var'
  996. end
  997. end
  998. end
  999. end
  1000. elseif harakHusb = 1:
  1001. husbizvradd = 0
  1002. husbharmin = 0
  1003. husbandMark = 0
  1004. husband = 0
  1005. divorced += 1
  1006. gs 'boyStat', $lover[lover_number]
  1007. '"What the hell is going on here? " said <<$husName>> while looking at you.'
  1008. '"<<$husName>> it''s not what you think. It''s just sex, no feelings, I only love you. He does not mean anything. Come to me, I''ll show you how much I love you. " you answered him. You know you are caught red-handed so you made up some excuse on the spot but you don''t really think he will believe this.'
  1009. if izvratH = 0:
  1010. '"You filthy slut. what love ? You fuck with everyone. Let''s see if you will still like it in the forest you whore." he said and left the room, slamming the door.'
  1011. if haraklover[lover_number] = 0:
  1012. loverrelation[lover_number] = 0
  1013. pcs_lover -= 1
  1014. '"Wait,you''re married !, you deceived me even though I loved you. Goodbye!" your guy shouted and ran out of the room.'
  1015. act 'Leave':
  1016. if curr_home = 1:
  1017. gt 'korrPar'
  1018. elseif curr_home = 2:
  1019. gt 'gadukino'
  1020. elseif curr_home = 3:
  1021. gt 'korr'
  1022. end
  1023. end
  1024. elseif haraklover[lover_number] = 1:
  1025. '"Well, I see am not the only one for you, so perhaps I''ll go. But if you want I can stay and comfort you " said <<$loverdesc[lover_number]>>'
  1026. act 'Let him go':
  1027. if curr_home = 1:
  1028. gt 'korrPar'
  1029. elseif curr_home = 2:
  1030. gt 'gadukino'
  1031. elseif curr_home = 3:
  1032. gt 'korr'
  1033. end
  1034. end
  1035. act 'Let him stay':
  1036. loverrelation[lover_number] += 1
  1037. picrand = 83
  1038. if popolaini = 3:picrand = 84
  1039. xgt 'sex', 'var'
  1040. end
  1041. elseif haraklover[lover_number] = 2:
  1042. '"Well this is a surprise, but oh well it looks like your hubby dumped you, and I am once again ready, let''s continue. Let this cuckold run away like a little bitch" said <<$loverdesc[lover_number]>>, clearly intending to continue the evening.'
  1043. act 'Refuse':
  1044. loverrelation[lover_number] -= 1
  1045. if curr_home = 1:
  1046. gt 'korrPar'
  1047. elseif curr_home = 2:
  1048. gt 'gadukino'
  1049. elseif curr_home = 3:
  1050. gt 'korr'
  1051. end
  1052. end
  1053. act 'Continue':
  1054. loverrelation[lover_number] += 2
  1055. picrand = 83
  1056. if popolaini = 3:picrand = 84
  1057. xgt 'sex', 'var'
  1058. end
  1059. end
  1060. elseif izvratH = 1:
  1061. loverrelation[lover_number] = 0
  1062. pcs_lover -= 1
  1063. '"Can you even hear yourself while you are talking nonsense ? " asked <<$husName>>.'
  1064. '"I''m sorry" I muttered while looking at the floor'
  1065. '<<$husName>> came up to you. "I''ll leave today and will file for divorce, but first, I will punish you, " he said while unzipping his pants and pulling out his penis. "Well, what are you wating for? Suck, whore!"'
  1066. if haraklover[lover_number] = 0:
  1067. act 'Take by mouth':
  1068. cla
  1069. *clr
  1070. spafinloc = 12
  1071. gs 'Cum_Manage'
  1072. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/p3.jpg"></center>'
  1073. '"So you''re married ? You cheated on me even though I loved you. You despicable liar! goodbye!" your guy shouted and ran out of the room.'
  1074. '<<$husName>> did not pay any attention to him, he put his dick in your mouth and grabbed your head. he litterally started to fuck you in the mouth with each thrust pushing it deeper. You were frantically grasping and trying to breathe, desperately trying not to choke as he continued, suddenly he made an abrupt movement and his cock popped into your throat, you try to pull away, but he sternly tells you to take it. He gave you a couple of seconds to get used to the dick in your throat and began to fuck your throat, you are still not getting enough air and you frantically begin to beat him to get free, but this makes <<$husName>> only tighten his grip on your head. When you''re starting to lose consciousness, he finally finishes. You feel his sperm go down your throat. After a couple of strong aftershocks he lets you go. You collapse on the floor coughing up sperm mixed with your saliva and wheezing air. <<$husName>> looked at you as you writhe on the floor. He spits on the floor next to you, and leaves the room.'
  1075. gs 'arousal', 'bj', 10, 'sub', 'deepthroat'
  1076. gs 'stat'
  1077. act 'Leave':
  1078. gs 'arousal', 'end'
  1079. if curr_home = 1:
  1080. gt 'korrPar'
  1081. elseif curr_home = 2:
  1082. gt 'gadukino'
  1083. elseif curr_home = 3:
  1084. gt 'korr'
  1085. end
  1086. end
  1087. end
  1088. elseif haraklover[lover_number] = 1:
  1089. '<<$loverdesc[lover_number]>> stood and watched as you get fucked by your husband, "Well, I''ll probably go." he said.'
  1090. '"Wait! This whore can handle two cocks. you can join us if you want." offered <<$husName>>.'
  1091. '"Thanks for the offer, I do believe she will be able to handle me." replied <<$loverdesc[lover_number]>>'
  1092. act 'Lie on the bed':
  1093. cla
  1094. *clr
  1095. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/p1.jpg"></center>'
  1096. 'You lie down on the bed and <<$husName>> enters your pussy while <<$loverdesc[lover_number]>> lies before you and moves his cock to your mouth. You diligently work your husband''s cock while not forgetting your lover''s cock in your mouth.'
  1097. '"she is still a great fuck, " said the husband.'
  1098. '"I could not agree more" replied <<$loverdesc[lover_number]>>'
  1099. gs 'arousal', 'bj', 10, 'sub', 'group'
  1100. gs 'arousal', 'vaginal', 10, 'sub', 'group'
  1101. minut -= 10
  1102. gs 'stat'
  1103. act 'Continue':
  1104. if popolaini = 1:picrand = 40
  1105. if popolaini = 2:picrand = 41
  1106. if popolaini = 3:picrand = 42
  1107. xgt 'sexdvoe', 'var'
  1108. end
  1109. end
  1110. elseif haraklover[lover_number] = 2:
  1111. '"That''s right this whore should be punished, if you want to let me help we can do it together and she will not be able to sit down for a week, " said <<$loverdesc[lover_number]>>, explicitly riling up your husband.'
  1112. '"Yes, let''s punish the bitch, and then I can go to the authorities to initiate my divorce and remove this whore from my life" said <<$husName>>.'
  1113. act 'Lie on the bed':
  1114. cla
  1115. *clr
  1116. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/p2.jpg"></center>'
  1117. 'You lie down on the bed and <<$husName>> entered your anus while <<$loverdesc[lover_number]>> lay before you presenting his cock to your mouth. You diligently work your husband''s cock in your ass while not forgetting your lover''s cock in your mouth.'
  1118. '"Wow, even now she knows how to work that ass " said <<$husName>>.'
  1119. '"Yeah, please leave some for me" replied <<$loverdesc[lover_number]>>'
  1120. gs 'arousal', 'bj', 10, 'sub', 'group'
  1121. gs 'arousal', 'vaginal', 10, 'sub', 'group'
  1122. minut -= 10
  1123. gs 'stat'
  1124. act 'Continue':
  1125. if popolaini = 1:picrand = 40
  1126. if popolaini = 2:picrand = 41
  1127. if popolaini = 3:picrand = 42
  1128. xgt 'sexdvoe', 'var'
  1129. end
  1130. end
  1131. end
  1132. end
  1133. elseif harakHusb = 2:
  1134. fingal += 1
  1135. '"Oh damn, " was the last thing you heared before you were thrown to the wall by a powerful blow to the face.'
  1136. if izvratH = 0:
  1137. husbizvradd = 0
  1138. husbharmin = 0
  1139. husbandMark = 0
  1140. husband = 0
  1141. divorced += 1
  1142. loverrelation[lover_number] = 0
  1143. pcs_lover -= 1
  1144. pcs_makeup = 0
  1145. minut += 120
  1146. stolmoney = 0
  1147. money = 0
  1148. komp = 0
  1149. 'while getting up you could see in the corner of the room your husband giving blow after blow to your lover, and <<$loverdesc[lover_number]>> was trying hard to escape out the door, finally he succeeds and he runs out of the apartment at a breakneck pace.'
  1150. '<<$husName>> looked at you, "Here ... you ... whore ... cock ... and pussy ... and ass ... and in your mouth." he says putting a strong emphasis on every word. At the end of the last word, he kicks you in the face, rendering you unconscious . You woke up two hours later. Your husband was gone and so was all of his stuff. Some of your stuff was missing too'
  1151. act 'Leave':
  1152. if curr_home = 1:
  1153. gt 'korrPar'
  1154. elseif curr_home = 2:
  1155. gt 'gadukino'
  1156. elseif curr_home = 3:
  1157. gt 'korr'
  1158. end
  1159. end
  1160. elseif izvratH = 1:
  1161. loverrelation[lover_number] = 0
  1162. pcs_lover -= 1
  1163. houseslut += 1
  1164. '"Oh damn, she allowed you inside of her ?" asked <<$husName>>, "So now you will need to pay me for the pleasure of using her. This is my slut! " he added, referring to you. "Once that is settled we will fuck her together." he added, lifting you off the floor and throwing you on the bed.'
  1165. if haraklover[lover_number] = 0:'<<$loverdesc[lover_number]>> tried to protest, but after seeing your husband''s face contorted with rage he agreed'
  1166. if haraklover[lover_number] = 1:'<<$loverdesc[lover_number]>> silently complied to your husband''s request'
  1167. if haraklover[lover_number] = 2:'<<$loverdesc[lover_number]>> gladly accepted'
  1168. act 'Continue':
  1169. if popolaini = 1:picrand = 40
  1170. if popolaini = 2:picrand = 41
  1171. if popolaini = 3:picrand = 42
  1172. xgt 'sexdvoe', 'var'
  1173. end
  1174. end
  1175. end
  1176. end
  1177. if $ARGS[0] = 'endsex':
  1178. if husband > 0 and hour < 17 and hour > 7 and boycherdaksex = 0:gt 'sexm', 'popala'
  1179. boycherdaksex = 0
  1180. gs 'arousal', 'end'
  1181. if curr_home = 1:
  1182. gt 'korrPar'
  1183. elseif curr_home = 2:
  1184. gt 'gadukino'
  1185. elseif curr_home = 3:
  1186. gt 'korr'
  1187. end
  1188. end
  1189. --- sexm ---------------------------------