1
0

narkopriton.qsrc 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373
  1. # narkopriton
  2. *clr & cla
  3. gs 'stat'
  4. gs 'themes', 'indoors'
  5. menu_off = 1
  6. '<center><b>Local drug den</b></center>'
  7. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
  8. 'A local drug den, where you know addicts come to buy and use heroin in peace.'
  9. 'A skinny guy opens the door, with a paranoid look in his eyes. He says doubtfully: "Are you sure you can afford to be here? My product ain''t cheap..."'
  10. act 'Get out of here': minut += 5 & gt 'street'
  11. act 'You roll your eyes and push the door open': gt 'narkopriton', 'start'
  12. if $ARGS[0] = 'start':
  13. *clr & cla
  14. '<center><b>Local drug den</b></center>'
  15. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
  16. 'The skinny guy at the door looks you up and down as you enter, "So what can I get for you, honey?"'
  17. if drugUser = 1:
  18. act 'Leave the drug den': minut += 5 & gt 'street'
  19. act 'Ask for heroin': gt 'narkopriton', 'heroin'
  20. act 'Ask for amphetamine': gt 'narkopriton', 'amphetamine'
  21. !!act 'Ask for joints': gt 'narkopriton', 'joint'
  22. if StoryLine = 1 and snarkozak = 0:
  23. act 'Ask for a drop-off point in Pavlovsk':
  24. minut +=5
  25. gs 'events', 'narkozakladka'
  26. end
  27. end
  28. elseif drugUser = 0:
  29. '"Ahhh, what do you have?" you ask.'
  30. 'His eyes light up at a freshy and smiles wildy, "Well I have some H and amphetamine."'
  31. act 'Leave the drug den': minut += 5 & gt 'street'
  32. act 'Ask for heroin': gt 'narkopriton', 'heroin'
  33. act 'Ask for amphetamine': gt 'narkopriton', 'amphetamine'
  34. !!act 'Ask for joints': gt 'narkopriton', 'joint'
  35. elseif (StrongNarkota > 23 and ampHigh > 23) or ampHigh > 23 or StrongNarkota > 23:
  36. gt 'narkopriton', 'kiteHigh'
  37. end
  38. end
  39. if $ARGS[0] = 'kiteHigh':
  40. act 'Leave the drug den':
  41. minut += 15
  42. gs 'events', 'snkayf1'
  43. end
  44. end
  45. if $ARGS[0] = 'amphetamine':
  46. *clr & cla
  47. gs 'stat'
  48. '<center><b>Local drug den</b></center>'
  49. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
  50. '"That''ll be 80 <b>₽</b> per pill," he says.'
  51. 'You have <<amphetamine>> pills.'
  52. act 'Leave the drug den': minut += 5 & gt 'street'
  53. if money >= 1600:
  54. act 'Buy 20 (1600 <b>₽</b>)':
  55. money -= 1600
  56. drugUser = 1
  57. amphetamine += 20
  58. minut += 5
  59. gt 'narkopriton', 'amphetamine'
  60. end
  61. end
  62. if money >= 800:
  63. act 'Buy 10 (800 <b>₽</b>)':
  64. money -= 800
  65. drugUser = 1
  66. amphetamine += 10
  67. minut += 5
  68. gt 'narkopriton', 'amphetamine'
  69. end
  70. end
  71. if money >= 400:
  72. act 'Buy 5 (400 <b>₽</b>)':
  73. money -= 400
  74. drugUser = 1
  75. amphetamine += 5
  76. minut += 5
  77. gt 'narkopriton', 'amphetamine'
  78. end
  79. end
  80. if money >= 80:
  81. act 'Buy 1 (80 <b>₽</b>)':
  82. money -= 80
  83. drugUser = 1
  84. amphetamine += 1
  85. minut += 5
  86. gt 'narkopriton', 'amphetamine'
  87. end
  88. end
  89. act 'Buy some heroin instead': gt 'narkopriton', 'heroin'
  90. !!act 'Buy some joints instead': gt 'narkopriton', 'joint'
  91. end
  92. if $ARGS[0] = 'joints':
  93. *clr & cla
  94. gs 'stat'
  95. '<center><b>Local drug den</b></center>'
  96. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
  97. '"That''ll be 50 <b>₽</b> per joint," he says.'
  98. 'You have <<joint>>.'
  99. act 'Leave the drug den': minut += 5 & gt 'street'
  100. if money >= 1000:
  101. act 'Buy 20 (1000 <b>₽</b>)':
  102. money -= 1000
  103. drugUser = 1
  104. joint += 20
  105. minut += 5
  106. gs 'stat'
  107. gt 'narkopriton', 'joint'
  108. end
  109. end
  110. if money >= 500:
  111. act 'Buy 10 (500 <b>₽</b>)':
  112. money -= 500
  113. drugUser = 1
  114. joint += 10
  115. minut += 5
  116. gs 'stat'
  117. gt 'narkopriton', 'joint'
  118. end
  119. end
  120. if money >= 250:
  121. act 'Buy 5 (250 <b>₽</b>)':
  122. money -= 250
  123. drugUser = 1
  124. joint += 5
  125. minut += 5
  126. gt 'narkopriton', 'joint'
  127. end
  128. end
  129. if money >= 50:
  130. act 'Buy 1 (50 <b>₽</b>)':
  131. money -= 50
  132. drugUser = 1
  133. joint += 1
  134. minut += 5
  135. gt 'narkopriton', 'joint'
  136. end
  137. end
  138. act 'Buy some heroin instead': gt 'narkopriton', 'heroin'
  139. act 'Buy some amphetamine instead': gt 'narkopriton', 'amphetamine'
  140. end
  141. if $ARGS[0] = 'heroin':
  142. *clr & cla
  143. gs 'stat'
  144. '<center><b>Local drug den</b></center>'
  145. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
  146. '"That''ll be 1000 <b>₽</b>," he says.'
  147. act 'Leave the drug den': minut += 5 & gt 'street'
  148. if money >= 1000:
  149. act 'Buy some heroin and use it (1,000 <b>₽</b>)':
  150. money -= 1000
  151. if SNarkTimes = 0:
  152. *clr & cla
  153. minut += 10
  154. gs 'stat'
  155. '<center><b>Local drug den</b></center>'
  156. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
  157. 'It''s obvious that you have no idea what to do. He takes pitty on you and cooks you up a shot. He loads the needle full and gives it to you.'
  158. '"Thanks." You take the needle and go find a couch in the house to sit on.'
  159. 'Finding a couch, you sit down and look at the needle apprehensively, you question yourself...'
  160. act 'You remember the look of bliss on the junkies faces in the park and use the drugs':
  161. *clr & cla
  162. '<center><b>Local drug den</b></center>'
  163. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/usingheroin.jpg"></center>'
  164. 'You inject the needle into your arm unable to stop yourself from trembling a little.'
  165. 'The rush is instantaneous, you close your eyes as it rolls over you.'
  166. StrongNarkota += 25
  167. pcs_mood += 40
  168. SNarkTimes += 1
  169. drugUser = 1
  170. gs 'stat'
  171. act 'You lay there briefly rolling, before leaving': gs 'events', 'snkayf1'
  172. end
  173. act 'You can''t help but think of all the horror stories and return the drugs':
  174. *clr & cla
  175. '<center><b>Local drug den</b></center>'
  176. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
  177. 'You change your mind and give the syringe back to the guy.'
  178. '"I don''t do refunds girl," he said.'
  179. act '"I know," you say and leave': minut += 5 & gt 'street'
  180. end
  181. elseif SNarkTimes >= 1:
  182. *clr & cla
  183. minut += 5
  184. StrongNarkota += 25
  185. pcs_mood += 40
  186. SNarkTimes += 1
  187. drugUser = 1
  188. gs 'stat'
  189. '<center><b>Local drug den</b></center>'
  190. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/usingheroin.jpg"></center>'
  191. 'You buy some heroin and find a quiet place in the house to use it, and without thinking twice you shoot up.'
  192. act 'Leave the drug den': minut += 5 & gt 'street'
  193. end
  194. end
  195. elseif money < 1000 and SLomka > 0:
  196. act 'Beg him to give you some': gs 'narkopriton', 'drugslut'
  197. end
  198. act 'Buy some amphetamine instead': gt 'narkopriton', 'amphetamine'
  199. !!act 'Buy some joints instead': gt 'narkopriton', 'joint'
  200. end
  201. if $ARGS[0] = 'drugslut':
  202. *clr & cla
  203. '<center><b>Local drug den</b></center>'
  204. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
  205. minut += 5
  206. gs 'stat'
  207. act 'Leave dejectedly': minut += 5 & gt 'street'
  208. if NarkShmaraTimes > 0:
  209. '"Bobka, please! You remember me, right? I''m good for it, you can trust me!" you beg him, but he gives you a wicked grin.'
  210. '"Come on, <<$pcs_nickname>>! You know I don''t do credit!" he snorts.'
  211. act 'Keep begging, promising you''ll do anything':
  212. *clr & cla
  213. minut += 5
  214. '<center><b>Local drug den</b></center>'
  215. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
  216. 'With a trembling lip, you drop to your knees and continue to beg: "Please! I''ll do anything... anything you want!"'
  217. 'He looks at you appreciatively for a moment, and gives you a short nod with his head: "Shut up, and follow me. I may have some for you, but you''re going to have to earn it."'
  218. act 'Follow him into the house':
  219. *clr & cla
  220. minut += 5
  221. bobrand = rand(0, 4)
  222. if bobrand < 3:
  223. $bobtalk = '"You know the drill. Get on your knees and start sucking!"'
  224. $bobtext = 'Do as he says'
  225. elseif bobrand = 3:
  226. $bobtalk = '"You''re just a dirty whore, aren''t you? Lick my dirty asshole and I''ll consider it!"'
  227. $bobtext = 'Lick his ass'
  228. else
  229. $bobtalk = '"I don''t need more blowjobs from you. I do have to pee, though... maybe you''ll make a decent toilet. Get down on your knees and open your mouth!" <br>Despite your need for drugs, you realize you can''t keep doing this! You''ll lose yourself if you keep this up...'
  230. $bobtext = 'Kneel down and open your mouth'
  231. end
  232. 'bobrand: <<bobrand>>'
  233. '<center><b>Local drug den</b></center>'
  234. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/narkopriton.jpg"></center>'
  235. 'You keep begging Bobka to give you some heroin, while you follow him to an empty room. He just laughs at you and says: <<$bobtalk>>'
  236. act '<<$bobtext>>':
  237. NarkShmaraTimes += 1
  238. gt 'bobka', bobrand
  239. end
  240. act 'Change your mind and leave':
  241. minut += 5
  242. gt 'street'
  243. end
  244. end
  245. end
  246. if NarkShmaraTimes > 5:
  247. act 'Submit to your fate':
  248. *clr & cla
  249. over = 8
  250. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/crackwhore.jpg"></center>'
  251. 'Your ever increasing dependence on drugs has taken its toll on you. Your will was slowly being worn down by always having to go to Bobka to beg for your next dosage... and he supplies it readily, considering it an investment. When he thinks you''re ready, he offers you permanent lodging in the drug den.'
  252. 'You readily accept. Paid housing, food and your daily dose, too! What more could you need?'
  253. 'Of course Bobka is no kind Samaritan, and expects things from you in return...'
  254. act '...':
  255. *clr & cla
  256. '<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/crackwhore2.jpg"></center>'
  257. 'Your life has changed drastically. Your mouth, pussy and ass are completely owned by Bobka, and he readily whores you out to whoever will pay him for it. The rumour of the drug den having a new full-time whore spreads quickly. Bobka is willing to rent you out to whoever is willing to pay, even if they''re not paying much at all! Some money is better than no money, in the end...'
  258. 'At first you try to resist, but you soon realize that you can''t. You need Bobka to survive, and have no choice but to meekly accept your new role as his whore.'
  259. act '...':
  260. *clr & cla
  261. '<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/crackwhore3.jpg"></center>'
  262. '"What difference does it make?" you think to yourself, as yet another stranger buries his cock to the hilt in your well-used ass. Bobka sold you to a brothel owner, who keeps you in his basement as a cheap attraction for his regulars. He takes good care of you though, giving you a roof over your head and the daily dosage of heroin you need so badly.'
  263. act '...':
  264. *clr & cla
  265. '<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/crackwhore4.jpg"></center>'
  266. 'In the rare moments your mind is not intoxicated by your last hit, you think back to the friends and family you used to have. It all seems surreal now.'
  267. act '...':
  268. *clr & cla
  269. '<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/crackwhore5.jpg"></center>'
  270. 'Your future was so bright, when you were in school. The teachers would sing your praises, saying how much potential you had.'
  271. 'You can''t help but wonder what they would think of you now. On your knees, with some random stranger making your cheeks bulge when he feeds you yet another fat cock. The guy snaps you out of your memories when he roughly forces his cock down your throat, nearly making you choke.'
  272. 'It''s nothing new to you, this is your life now. You don''t try to resist or fend him off any more, but simply open your mouth wider and stick your tongue out to give him full access to your throat. Force of habit. What else could you do?'
  273. 'You''ve long since realized it: you''re a whore now, doing whatever perverted acts the customers demand from you. You have to! Anything to earn enough money for your next dose...'
  274. act '...':
  275. *clr & cla
  276. '<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/crackwhore6.jpg"></center>'
  277. 'You''ve long since stopped taking care of yourself, tending to your poor-paying customers'' cocks out of sheer habit. Your former beauty is completely gone, and traces of dried semen cover your hair, face and clothes constantly.'
  278. 'The brothel owner is starting to lose his patience with you. Even his customers, who already have fairly low standards, no longer seem to be very interested in you. Lucky for you, some them of them can''t afford any better.'
  279. 'Occasionally, when you get ready to offer your broken down holes up again to yet another customer, you wonder... was there anything you could''ve done differently?'
  280. act '...':gt 'gameover'
  281. end
  282. end
  283. end
  284. end
  285. end
  286. end
  287. end
  288. act 'Leave dejectedly': minut += 5 & gt 'street'
  289. elseif NarkShmaraTimes = 0:
  290. 'You beg the man: "Please! I need a hit... I need it badly! Please, I''ll pay you back! I promise!"'
  291. 'The guy laughs: "Yea, sure. Do you know how many times a day I hear that? If I had a ruble for every time someone told me that, I would''ve retired by now! I don''t do credit, simple as that. Get lost."'
  292. act 'Keep begging, promising you''ll do anything':
  293. *clr & cla
  294. minut += 5
  295. 'With a trembling lip, you drop to your knees and continue to beg: "Please! I''ll do anything... anything you want!"'
  296. 'He looks at you appreciatively for a moment, and gives you a short nod with his head: "Shut up, and follow me. I may have some for you, but you''re going to have to earn it."'
  297. act 'Follow him into the house':
  298. *clr & cla
  299. minut += 5
  300. gs 'stat'
  301. 'You follow him dejectedly... you don''t know what he wants from you, but what choice do you have?'
  302. 'He takes you by the hand and pulls you into an empty room. He doesn''t bother closing the door, and simply orders you: "Get down on your knees and suck me off. If you do good, we''ll see."'
  303. act 'Suck his cock':
  304. *clr & cla
  305. guy += 1
  306. swallow += 1
  307. NarkShmaraTimes += 1
  308. spafinloc = 12
  309. gs 'cum_manage'
  310. dynamic $venerasiak
  311. '<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/bj.jpg"></center>'
  312. 'You need the drugs so badly, you drop to your knees automatically and quickly pull his pants down without even thinking of rejecting him. His cock is still flaccid but you close your lips around it anyway, doing the best you can to arouse him. You slowly feel his cock grow inside your mouth and suck him off obediently, until you feel several warm jets of sperm land on the back of your throat.'
  313. 'The guy moans exhaustedly: "Could be better..."'
  314. 'He pulls up his pants again and throws you a syringe, with a discompassionate look in his eyes. He smirks: "I believe this is what you were looking for?"'
  315. gs 'arousal', 'bj', 5, 'sub'
  316. gs 'stat'
  317. act 'Take the hit right in front of him':
  318. *clr & cla
  319. minut += 5
  320. StrongNarkota += 25
  321. SNarkTimes += 1
  322. pcs_mood += 40
  323. '<center><b>Local drug den</b></center>'
  324. '<center><img <<$set_imgh>> src="images/locations/city/residential/den/usingheroin.jpg"></center>'
  325. 'You grab the syringe off the ground nervously and use it without a second thought, injecting it into your arm with a shaky hand. He shakes his head, almost as if he is disappointed in you, but says with a pitiful smile: "I reckon I''m going to see you around more often! My name is Bobka. Who are you?"'
  326. 'The drugs is quickly clouding your mind, and you barely register him talking. You softly mutter: "<<$pcs_nickname>>..."'
  327. 'He laughs, and says: "I think we''ll be seeing more of you here, <<$pcs_nickname>>..."'
  328. 'When the fog in your mind clears, Bobka is gone and you''re by yourself in the room.'
  329. gs 'arousal', 'end'
  330. gs 'stat'
  331. act 'Leave the drug den': minut += 5 & gt 'street'
  332. end
  333. end
  334. act 'Change your mind and leave': minut += 5 & gt 'street'
  335. end
  336. end
  337. end
  338. end
  339. --- narkopriton ---------------------------------