bass 4.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179
  1. # bass
  2. if $ARGS[0] = 'start':
  3. CLOSE ALL
  4. $metka = $ARGS[0]
  5. $loc = $CURLOC
  6. $metkaM = $ARGS[0]
  7. $locM = $CURLOC
  8. $location_type = 'public_indoors'
  9. cls
  10. minut += 5
  11. gs 'stat'
  12. if night_mode = 1:
  13. fcolor = rgb(255, 255, 255)
  14. bcolor = rgb(0, 0, 0)
  15. lcolor = rgb(106, 90, 205)
  16. else
  17. fcolor = rgb(0, 0, 0)
  18. bcolor = rgb(255, 255, 255)
  19. lcolor = rgb(106, 90, 205)
  20. end
  21. '<center><b><font color="maroon">Pool</font></b></center>'
  22. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/pool/bass.jpg"></center>'
  23. 'Entrance to the pool costs 100 <b>₽</b>, you must have a swimsuit.'
  24. act 'Use changing room':gt 'changingroom', 'view_swim_list'
  25. if $clothingworntype = 'swimwear':
  26. if db >= 1 and Goraday ! daystart:act 'Search ZHoru':Goraday = daystart & gt 'klofdomhouse', 'ev42'
  27. if money >= 100:
  28. act 'Pay to swim in the pool for an hour (100 <b>₽</b>)':
  29. cla
  30. minut += 5
  31. money -= 100
  32. gt 'bass', 'a'
  33. end
  34. end
  35. end
  36. act'Leave':
  37. if $clothingworntype = 'swimwear':
  38. cla
  39. 'You need to get dressed in regular clothing first.'
  40. act'Return':gt 'bass', 'start'
  41. elseif $clothingworntype = 'nude':
  42. cla
  43. 'You need to get dressed before leaving.'
  44. act'Return':gt 'bass', 'start'
  45. else
  46. minut += 5
  47. gt 'down'
  48. end
  49. end
  50. end
  51. if $ARGS[0] = 'a':
  52. cla
  53. *clr
  54. minut += 5
  55. '<center><b><font color="maroon">Pool</font></b></center>'
  56. if pcs_magik < 4:'<center><img <<$set_imgh>> src="images/locations/city/citycenter/pool/bass.jpg"></center>'
  57. if pcs_magik >= 4 and kisameQW = 0:
  58. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/pool/bass1.jpg"></center>'
  59. 'In pool floats hefty athlete, he swims with mad speed and clearly feels like a fish in water, he come to the shore to the edge of the pool and in one motion jumps right in front of you. Looking at you, he greedily smiling showing you a range of white teeth.'
  60. act 'Watch for swimmers':
  61. cla
  62. *clr
  63. kisameQW = 1
  64. minut += 60
  65. gs 'exercise', 'tier1', 1, 'stren_exp'
  66. pcs_sweat = 10 + rand(0,4)
  67. '<center><img <<$set_imgh>> src="images/characters/city/kisame/kisame.jpg"></center>'
  68. 'Athlete put on a towel and walked up to you. He smiled and said "Hi sweetie My name is Kisame just for you Kitty!"'
  69. act 'Say hello':
  70. cla
  71. '(You) - Hi! I <<$pcs_nickname>>.'
  72. '(Plavec) - <<$pcs_nickname>> can swim together?'
  73. 'Kisame without waiting grabs you by the waist and powerful jump jumps to the middle of the pool.'
  74. act 'Next':gt 'kisameQW', 'start'
  75. end
  76. act 'Tell Kisame to fuck off':
  77. cla
  78. '(You) - Fuck off Kish!'
  79. '(Plavec) - How rude!'
  80. 'You do not have time to blink as an athlete grabbed you by the waist and lifted over your head easily threw you into the middle of the pool.'
  81. 'When you spitting surfaced over the water you can see how to you under the water at breakneck speed approaching Kisame.'
  82. act 'Next':gt 'kisameQW', 'start'
  83. end
  84. end
  85. elseif kisameQW = 1 and KisameDead < 1:
  86. '<center><img <<$set_imgh>> src="images/characters/city/kisame/kisamev.jpg"></center>'
  87. 'Seeing you akulopodobny Kisame smiling "Hi baby. Want me to fill your hot mouth with his shark-seed?"'
  88. act 'Attack Kisame':
  89. cla
  90. pcs_horny += 10
  91. gs 'boyStat', 40
  92. !!stats
  93. strenV = 300
  94. speedV = 100
  95. agilV = 100
  96. reactV = 100
  97. vitalV = 200
  98. intelV = 100
  99. willV = 50
  100. !!skills
  101. magikV = 10
  102. boxingV = 100
  103. shootV = 100
  104. !!parameters
  105. healthV = vitalV * 10 + strenV * 5
  106. mannaV = intelV * magikV + magikV * 100 + vitalV * 10
  107. willpowerV = willV * 10
  108. BonusAtakV = 0
  109. BonusDefV = 0
  110. !!Programme of Action
  111. program = 5
  112. KisaFight = 1
  113. klonV = 5
  114. defenceV = 800
  115. if spellavtoklon = 1:klon = 3
  116. gt 'fight', 'start'
  117. end
  118. act 'Give him a blowjob under water':
  119. cla
  120. *clr
  121. cumspclnt = 10
  122. gs 'cum_cleanup'
  123. if pcs_sweat > 15 : pcs_sweat = 10 + rand(0,4)
  124. pcs_mood += 5
  125. pcs_willpwr += 5
  126. if pcs_stren < 40:stren_exp += 1 + (steroid_dose - rand(0,steroid_dose)) & gs 'obj_din', 'steroids'
  127. if KisameSex = 0:KisameSex = 1 & Set guy += 1
  128. gs 'boyStat', 40
  129. spafinloc = 12
  130. sexpartkno = 1
  131. gs 'Cum_Manage'
  132. '<center><img <<$set_imgh>> src="images/characters/city/kisame/sex/kisamebj.jpg"></center>'
  133. 'You downcast eyes, Kisame smiled even wider and dragged you into the water. His strong hands pressed your face to his groin and you wrapped around his dick lips quite quickly Kisame finished your mouth.'
  134. gs 'arousal', 'bj', 60, 'sub'
  135. gs 'arousal', 'end'
  136. gs 'stat'
  137. act 'Out of the water':gt 'bass', 'start'
  138. end
  139. end
  140. act 'Swim (1:00)':
  141. cla
  142. *clr
  143. cumspclnt = 10
  144. gs 'cum_cleanup'
  145. minut += 60
  146. gs 'exercise', 'tier1', 1, 'stren_exp'
  147. pcs_sweat = 10 + rand(0,4)
  148. '<center><img <<$set_imgh>> src="images/locations/shared/lake/swim.jpg"></center>'
  149. 'You swim in the pool, the water refreshes and invigorates.'
  150. act 'Out of the water':gt 'bass', 'start'
  151. end
  152. act 'Leave':gt 'bass', 'start'
  153. end
  154. --- bass ---------------------------------