sbReksHome 9.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194
  1. # sbReksHome
  2. CLOSE ALL
  3. $metka = $ARGS[0]
  4. $loc = $CURLOC
  5. $location_type = 'event'
  6. gs'dinParty'
  7. if night_mode = 1:
  8. fcolor = rgb(255, 255, 255)
  9. bcolor = rgb(0, 0, 0)
  10. lcolor = rgb(106, 90, 205)
  11. else
  12. fcolor = rgb(0, 0, 0)
  13. bcolor = rgb(255, 255, 255)
  14. lcolor = rgb(106, 90, 205)
  15. end
  16. if (indorf = 0) and ((sisboyparty_day + 2 = daystart) or (hour > 21)):
  17. $ARGS[0] = ''
  18. cls
  19. '<center><b><font color = maroon>Rex''s Apartment</font></b></center>'
  20. '<center><img src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_6_' + rand(1,5) + '.jpg"></center>'
  21. *nl 'Drunk and disheveled, Anya bursts into the room. You noticed that her hair, and all over her clothes she is smeared in sticky sperm. Anya stopped you and said:'
  22. '"We should move our asses and go home <<$pcs_nickname>>, or mommy will kill us both, if you don''t come home tonight."'
  23. if Rex_save =1 and Rex_Love =0:'As you leave the apartment, you gently kiss Rex on the cheek, thanking for the evening.'
  24. if Rex_Love =1:'As you leave the apartment, you passionate kiss Rex on the lips, "Thank you for a lovely evening."'
  25. if party_boys_in >=1:'As you leave the apartment, some drunk guys tell you they will miss you and sleep well, while laughing to each other.'
  26. gs 'arousal', 'end'
  27. gs 'stat'
  28. act 'Go home':minut += 15 & gt'bedrPar'
  29. end
  30. if $ARGS[0] = 'party':
  31. $metkaM = $ARGS[0]
  32. $locM = $CURLOC
  33. cls
  34. minut += 15
  35. sisboyparty = 1
  36. sisboypartyQW += 1
  37. alkoParty = 0
  38. if sbReksHomeIn = 0:sbReksHomeIn = 1
  39. party_girls_talk = 0
  40. girls_smoke = 0
  41. party_dj = 0
  42. dj_beer = 0
  43. dj_thank = 0
  44. dj_bad = 0
  45. dj_boobs = 0
  46. party_boys_drink = 0
  47. Rex_save = 0
  48. party_boys_in = 0
  49. rex_talk =0
  50. rex_sex =0
  51. drunk_sveta = 0
  52. iralenasleep = 0
  53. sister_party_dom = 0
  54. sister_party_talk = 0
  55. gs'stat'
  56. '<center><img src="images/locations/pavlovsk/resident/rekshome/party/reksparty_1_' + rand(1,5) + '.jpg"></center>'
  57. 'You arrive at Rex''s apartment, for the weekend party. Going inside with the others, the loud music drowned out any noise from outside. As soon as you are inside several boys immediately start offering you drinks.'
  58. act 'Drink':
  59. cls
  60. minut += 5
  61. alko += 1
  62. cumspclnt = 2
  63. gs 'cum_cleanup'
  64. pcs_breath = 0
  65. alkoParty += 1
  66. gs'stat'
  67. '<center><img src="images/locations/pavlovsk/resident/rekshome/party/reksparty_2_' + rand(1,4) + '.jpg"></center>'
  68. 'In all this mess you are unable to find a clean cup and are handed a full bottle of booze. Clinking glasses with the bottle, you put your lips to the mouth of the bottle and turn it up, gulping down several swigs of strong drink, noticing the effects almost at once.'
  69. 'The party has just begun, you can still walk through the apartment and find something to do.'
  70. act 'Move away':gt'sbReksHome','party_home'
  71. end
  72. end
  73. !room Rex
  74. if $ARGS[0] = 'party_home':
  75. $metkaM = $ARGS[0]
  76. $locM = $CURLOC
  77. cls
  78. minut += 5
  79. gs'stat'
  80. '<center><b><font color = maroon>Rex''s Room</font></b></center>'
  81. '<center><img src="images/locations/pavlovsk/resident/rekshome/party/reksparty_1_' + rand(1,5) + '.jpg"></center>'
  82. 'Sitting at a table and drinking with your friends, sitting to one side of you sharing a bottle as always is <a href="exec:GT ''lena'',''lena''">Lena</a> who is always fun, her slightly more reserved friend <a href="exec:GT ''ira'',''ira''">Ira</a>, and always up beat <a href="exec:GT ''reks'',''party''">Rex</a>.'
  83. 'To your other side sits your sister <a href="exec:GT ''sister_party'',''sister_party''">Anya</a> drinking already and <a href="exec:GT ''roma''">Roma</a>, whom himself sits just a bit away looking more serious than normal, plus lots of <a href="exec:GT ''party_girls'',''party_girls''">girls</a> and <a href="exec:GT ''party_boys'',''party_boys''">guys</a> you barely know.'
  84. if alko < 3:'One of the guys offers you a bottle to <a href="exec:GT ''sbReksHome'',''party_drink''">drink</a> from as they say "A little more to set the mood."'
  85. !You''re drunk
  86. if alko >= 3:
  87. *clr
  88. gs'stat'
  89. '<center><b><font color = maroon>Rex''s Room</font></b></center>'
  90. '<center><img src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_1_' + rand(1,5) + '.jpg"></center>'
  91. 'After awhile everyone gets up to go dance and drink. Only a few <a href="exec:GT ''party_girls'',''party_girls''">girls</a>, are left in the room, who are fun to hang out and gossip with.'
  92. iif(party_girls_talk >= 2,'You <a href="exec:GT ''party_girls'',''talk''">chat</a> and gossip with them. One of the girls pulls out some marijuana and invites all of you to <a href="exec:GT ''party_girls'',''smoke''">have a smoke</a>.','You <a href="exec:GT ''party_girls'',''talk''">chat</a> and gossip with them.')
  93. if pcs_mood = 100 and pcs_horny >= 50 and girls_smoke > 1:
  94. 'All the girls are in a good mood, and several of them excited pull you with them to have some <a href="exec:GT ''party_girls'',''fun''">fun</a>.'
  95. end
  96. end
  97. act 'Go to the living room':gt'sbReksHome','party_gost'
  98. end
  99. !Drink
  100. if $ARGS[0] = 'party_drink':
  101. cls
  102. minut += 5
  103. alko += 1
  104. cumspclnt = 2
  105. gs 'cum_cleanup'
  106. pcs_breath = 0
  107. alkoParty += 1
  108. gs'stat'
  109. '<center><img src="images/locations/pavlovsk/resident/rekshome/party/reksparty_2_' + rand(1,4) + '.jpg"></center>'
  110. 'Someone hands you a half full bottle of booze, putting your lips to the mouth of the bottle, you turn it up and gulp down several swigs of strong drink, noticing the effects almost at once.'
  111. 'The party has just begun, you can still walk through the apartment and find something to do.'
  112. act 'Move away':gt $locM,$metkaM
  113. end
  114. !Rex Lounge
  115. if $ARGS[0] = 'party_gost':
  116. $metkaM = $ARGS[0]
  117. $locM = $CURLOC
  118. cls
  119. minut += 5
  120. gs'stat'
  121. if alko < 3:
  122. '<center><b><font color = maroon>Living room</font></b></center>'
  123. '<center><img src="images/locations/pavlovsk/resident/rekshome/party/reksparty_3.jpg"></center>'
  124. 'This is a large living room, hardly anyone is here, most are all still sitting in the other room talking and drinking. Only one <a href="exec:GT ''party_boy'',''party_boy''">guy</a> is in here tinkering with a turntable.'
  125. elseif alko >= 3:
  126. '<center><img src="images/locations/pavlovsk/resident/rekshome/party/reksparty_4_' + rand(1,8) + '.jpg"></center>'
  127. 'The party is in full swing. In one corner a <a href="exec:GT ''party_boy'',''party_boy''">guy</a> the party DJ is spinning the beats at the turntable. You want to give it a try and <a href="exec:gt ''dinParty'', ''dance''">spin some beats</a>.'
  128. '<a href="exec:GT ''roma''">Roma</a> and <a href="exec:GT ''sister_party'',''sister_party''">Anya</a> are locked together having fun dancing.'
  129. if Rex_Love =0:'<a href="exec:GT ''reks'',''party''">Rex</a> is having fun dancing with some <a href="exec:GT ''party_girls'',''party_girls''">girls</a>.'
  130. if Rex_Love =1:'You are dancing with some <a href="exec:GT ''party_girls'',''party_girls''">girls</a> and <a href="exec:GT ''reks'',''party''">Rex</a>, who looks at you with loving eyes.'
  131. '<a href="exec:GT ''lena'',''lena''">Lena</a> and <a href="exec:GT ''ira'',''ira''">Ira</a> are having fun in the company of drunken <a href="exec:GT ''party_boys'',''party_boys''">guys</a>.'
  132. end
  133. act 'Go to the Rex''s room':gt'sbReksHome','party_home'
  134. act 'Go to the kitchen':gt'sbReksHome','party_kuh'
  135. act 'Go to the bathroom':gt'sbReksHome','party_toilet'
  136. act 'Leave Rex''s home': gt 'pavCommercial'
  137. end
  138. !Kitchen Rex
  139. if $ARGS[0] = 'party_kuh':
  140. $metkaM = $ARGS[0]
  141. $locM = $CURLOC
  142. cls
  143. minut += 5
  144. gs'stat'
  145. '<center><b><font color = maroon>Kitchen</font></b></center>'
  146. '<center><img src="images/locations/pavlovsk/resident/rekshome/party/kuh.jpg"></center>'
  147. 'The kitchen is spacious, but kinda dirty. The kitchen table is covered in cans and bottles of beer as well as 5th''s of booze. You can grab any bottle you want and <a href="exec:GT ''sbReksHome'',''party_drink''">drink</a>.'
  148. if party_dj =1 and dj_beer < 1:'You grab two bottles and <a href="exec:gt ''dinParty'', ''dj''">take</a> them for the DJ.'
  149. if alko >= 3: 'Some <a href="exec:GT ''party_boys'',''party_boys''">guys</a> bang their empty drinks down on the table, refilling they offer a cup to you and try to get you to <a href="exec:GT ''party_boys'',''drink''">drink</a> with them.'
  150. act 'Go to the living room':gt'sbReksHome','party_gost'
  151. end
  152. !Toilet Rex
  153. if $ARGS[0] = 'party_toilet':
  154. $metkaM = $ARGS[0]
  155. $locM = $CURLOC
  156. cls
  157. minut += 5
  158. gs'stat'
  159. if alko > 3 and rand(1,100) <= 30:gt 'dinParty', 'party_toilet_event'
  160. '<center><b><font color = maroon>Toilet</font></b></center>'
  161. '<center><img src="images/locations/pavlovsk/resident/rekshome/toilet.jpg"></center>'
  162. 'Here you can wash your face, freshen up or touch up your make up at <a href="exec:GT ''mirror'',''start''">mirrors</a>.'
  163. if pcs_horny > 50:'Feeling yourself ready to burst with desire, you can''t take it anymore and begin to <a href="exec:gt ''dinParty'', ''toilet_mast''">masturbate</a>.'
  164. act 'Go to the living room':gt 'sbReksHome','party_gost'
  165. if spdirtyv > 0 or spdirtyb > 0:
  166. act 'Clean the sperm from your face (0:10)':
  167. cla
  168. *clr
  169. pcs_makeup = 1
  170. cumspclnt = 9
  171. gs 'cum_cleanup'
  172. cumspclnt = 13
  173. gs 'cum_cleanup'
  174. if pcs_sweat > 19 : pcs_sweat -= 5
  175. minut += 10
  176. '<center><img src="images/shared/home/bathroom/facesp.jpg"></center>'
  177. *nl
  178. 'You clean your face and get rid of any trace of cum.'
  179. act 'Move away':gt 'sbReksHome','party_toilet'
  180. end
  181. end
  182. end
  183. --- sbReksHome ---------------------------------