burger.qsrc 40 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855
  1. # burger
  2. if $ARGS[0] = 'start':
  3. $loc_arg = 'start'
  4. $loc = 'burger'
  5. $menu_loc = 'burger'
  6. $menu_arg = 'start'
  7. menu_off = 0
  8. killvar '$locclass'
  9. *clr & cla
  10. $location_type = 'public_indoors'
  11. CLOSE ALL
  12. gs 'stat'
  13. gs 'themes', 'indoors'
  14. '<center><b><font color="maroon">Diner Bystroeshka</font></b></center>'
  15. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/burger.jpg"></center>'
  16. 'A bright advertising on the wall reads, "The most nutritious food in the county"'
  17. 'There is a <a href="exec:gt ''butoilet''">WC</a> for visitors.'
  18. if BurgerQW['BossSlut'] > 0:'<a href="exec:gt ''burger'', ''boss''">The Office of the Director</a> Anatoly Borisovich'
  19. act 'Leave the diner': minut += 1 & gt 'city_center'
  20. act 'Order from the menu (0:05)':gs 'food_menu'
  21. if money >= 315: act 'Order take-out (0:20) (315<b>₽</b>)':money -= 315 & gt 'food', 'f_food'
  22. if BurgerQW['IvanQW'] = 2: act 'Go into the office to Anatoly Borisovich':gt 'burger', 'office'
  23. if BurgerQW['WashDishesCount'] = 0:
  24. act 'Ask about work':gt 'burger', 'apply'
  25. elseif BurgerQW['WashDishesCount'] >= 3 and BurgerQW['WashFloorCount'] = 0:
  26. act 'Go to the manager':gt 'burger', 'manager'
  27. end
  28. if BurgerQW['WashDishesCount'] >= 1 and BurgerQW['WashedDishesLastDay'] ! daystart and BurgerQW['WorkBlocked'] = 0 and BurgerQW['Secretary'] = 0: act 'Wash the dishes for 70 <b>₽</b> (1:00)':gt 'burger', 'dishes'
  29. if BurgerQW['WashFloorCount'] >= 1 and BurgerQW['WashFloorLastDay'] ! daystart and hour < 10 and BurgerQW['WorkBlocked'] = 0 and BurgerQW['Secretary'] = 0: act 'Wash the floor for 70 <b>₽</b> (1:00)':gt 'burger', 'floor'
  30. end
  31. if $ARGS[0] = 'office':
  32. $menu_loc = 'burger'
  33. $menu_arg = 'office'
  34. menu_off = 0
  35. *clr & cla
  36. gs 'stat'
  37. minut += 5
  38. 'You go to the office of the owner. He is sitting at his desk, dealing with your papers. Anatoly Borisovich looks at you and says, "Well? Do you have any news?"'
  39. act 'Leave':gt 'burger', 'start'
  40. if money >= 650000:
  41. act 'Repay the debt (650,000 <b>₽</b>)':
  42. *clr & cla
  43. menu_off = 1
  44. minut += 5
  45. money -= 650000
  46. BurgerQW['IvanQW'] = 5
  47. gs 'stat'
  48. 'You get the money out and hand it over to Anatoly Borisovich. He counts it and promises not to prosecute you anymore.'
  49. act 'Leave':gt 'burger', 'start'
  50. end
  51. end
  52. if BurgerQW['IvanQWEvidence'] = 1:
  53. act 'Show proof':
  54. *clr & cla
  55. menu_off = 1
  56. minut += 5
  57. BurgerQW['IvanQW'] = 6
  58. BurgerQW['IvanQWTatianaHelp'] = 0
  59. BurgerQW['IvanQWEvidence'] = 0
  60. gs 'stat'
  61. 'You show the recording, where Ivan confesses and promises to return the money, to Anatoly Borisovich. Anatoly Borisovich takes the record and says, that he understands and will take the statement to the police.'
  62. act 'Leave':gt 'burger', 'start'
  63. end
  64. end
  65. end
  66. if $ARGS[0] = 'apply':
  67. $menu_loc = 'burger'
  68. $menu_arg = 'apply'
  69. menu_off = 0
  70. cla
  71. minut += 5
  72. 'You go into the manager''s office where you meet a smart girl. She begins to tell you, that you can work almost every day, "Come in any time, run the snack bar and wash the dishes for 1:00. You will get 70 <b>₽</b> immediately on hand."'
  73. act 'Refuse and leave':gt 'burger', 'start'
  74. act 'Accept work':
  75. cla
  76. menu_off = 1
  77. BurgerQW['WashDishesCount'] = 1
  78. 'You agree to work.'
  79. act 'Leave':gt 'burger', 'start'
  80. end
  81. end
  82. if $ARGS[0] = 'manager':
  83. $menu_loc = 'burger'
  84. $menu_arg = 'manager'
  85. menu_off = 0
  86. cla
  87. minut += 5
  88. 'You go to the office of the manager. The girl tells the manager that you are doing good work and offers you another part-time job, "You can wash the floors in the morning, from 8 to 9. 1 hour of cleaning floors will get you 70 <b>₽</b> immediately on hand."'
  89. act 'Refuse and leave':gt 'burger', 'start'
  90. act 'Agree to work':
  91. cla
  92. menu_off = 1
  93. BurgerQW['WashFloorCount'] = 1
  94. BurgerQW['sergeyQWServiced1'] = 0
  95. BurgerQW['sergeyQWServiced2'] = 0
  96. 'You agree to work.'
  97. act 'Leave':gt 'burger', 'start'
  98. end
  99. end
  100. if $ARGS[0] = 'dishes':
  101. menu_off = 1
  102. *clr & cla
  103. BurgerQW['WashedDishesLastDay'] = daystart
  104. minut += 60
  105. BurgerQW['WashDishesCount'] += 1
  106. pcs_mood -= 15
  107. money += 70
  108. gs 'sweat', 'add', 10
  109. if BurgerQW['Level'] = 10:BurgerQW['Level'] = 0
  110. '<center><img <<$set_imgh>> src="images/shared/home/kitchen/dirt.jpg"></center>'
  111. 'You clean the food residue and grease from the dirty dishes for an hour. Afterwards you are given 70 <b>₽</b> for your work.'
  112. if pcs_apprnc >= 80 and BurgerQW['WashDishesCount'] >= 7 and BurgerQW['Level'] < 10:
  113. if BurgerQW['Level'] = 1:
  114. 'Out of the his office comes the owner of the bistro smiling at you. "<<$pcs_nickname>>. My offer still stands. Would you like to go to a restaurant?"'
  115. elseif BurgerQW['Level'] = 0:
  116. BurgerQW['Level'] = 1
  117. 'Out of the his office comes the owner of the bistro and nearly bumps into you.'
  118. '"Oh, sorry. How could I not see such a charming girl."'
  119. '"Don''t worry", you respond with a smile.'
  120. '"Have we met? I am Anatoly Borisovich."'
  121. '"<<$pcs_nickname>>."'
  122. 'Anatoly takes your hand and kisses it.'
  123. '"Would you like to dine somewhere outside of this hole?"'
  124. end
  125. gs 'willpower', 'misc', 'resist', 'medium'
  126. if will_cost <= pcs_willpwr:
  127. act 'Refuse (<<will_cost>> Willpower)':
  128. gs 'willpower', 'pay', 'resist'
  129. gt 'burger', 'start'
  130. end
  131. else
  132. act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  133. end
  134. act 'Agree':
  135. *clr & cla
  136. BurgerQW['Level'] = 10
  137. '"Let''s go to the shop first and pick up a gorgeous dress for you. You are not allowed in the restaurant with anything else." says Anatoly while walking you to his car.'
  138. gs 'boyStat', 'A74'
  139. act 'Get in the car':
  140. *clr & cla
  141. minut += 15
  142. BurgerQW['Level'] = 20
  143. gs 'stat'
  144. '<center><img <<$set_imgh>> src="images/locations/city/shared/car.jpg"></center>'
  145. 'In the car Anatoly takes your hand and doesn''t let go for the whole ride.'
  146. 'You arrive at a very expensive boutique with a french name.'
  147. 'Anatoly tells you to pick out a dress.'
  148. 'After showing him a few dresses, he chooses one and tells you to go to the dressing room.'
  149. act 'Go into the fitting room':
  150. *clr & cla
  151. minut += 15
  152. gs 'stat'
  153. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/butic.jpg"></center>'
  154. 'You undress and begin to inspect the dress.'
  155. 'Suddenly Anatoly comes into the dressing room.'
  156. '"Sorry, I could not resist to take a look at your beauty."'
  157. 'Looking at the dresses, Anatoly says, '
  158. '"I think you should take this one. It is the most expensive one. And I think, <<$pcs_nickname>>, you should be very thankful for such a gift."'
  159. 'Anatoly''s eyes point at his pants showing what he wants from you.'
  160. act 'Give him a blowjob':
  161. *clr & cla
  162. BurgerQW['Level'] = 50
  163. guy += 1
  164. average[23] = 1
  165. averageH[23] = 160
  166. averageB[23] = pcs_hips
  167. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj.jpg"></center>'
  168. 'You squat down in front of Anatoly, he unbuttons his pants and pulls out his penis. You lean over his hard cock and kiss it, feeling its warmth. You run your tongue along his cock finally putting it in your big wet mouth and start to suck his dick.'
  169. 'Soon Anatoly groans and you feel a spurt of warm liquid like in your mouth. You are giving your best to swallow all of his cum, trying not to choke. Anatoly straightens his clothes and leaves.'
  170. 'You feel a little woozy as you walk out of the dressing room and look for Anatoly.'
  171. 'He smiles and gestures to the seller who takes the dress.'
  172. gs 'arousal', 'bj', 15, 'sub'
  173. gs 'cum_call', 'mouth_swallow', 'A74', 1
  174. gs 'stat'
  175. act 'Exit from the boutique':
  176. *clr & cla
  177. minut += 15
  178. gs 'stat'
  179. '<center><img <<$set_imgh>> src="images/locations/city/shared/car.jpg"></center>'
  180. '"Whew, <<$pcs_nickname>>. I''m a little tired. Let''s go to a restaurant some other time." Anatoly tells you, taking you by the hand as he leads you to his car. You quickly get to your home and Anatoly says goodbye to you.'
  181. gs 'arousal', 'end'
  182. gs 'stat'
  183. act 'Out of the car':gt 'city_residential'
  184. end
  185. end
  186. act 'Hesitate':
  187. *clr & cla
  188. minut += 15
  189. gs 'stat'
  190. 'You hesitate, not sure what to do. Anatoly Borisovich takes you by the shoulders and pushes you down, making you squat in front of him helplessly. He unbuttons his pants and pulls out his already hard dick.'
  191. act 'Look at him frightened':
  192. *clr & cla
  193. minut += 1
  194. BurgerQW['Level'] = 50
  195. guy += 1
  196. average[24] = 1
  197. averageH[24] = 160
  198. averageB[24] = pcs_hips
  199. gs 'stat'
  200. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/pr.jpg"></center>'
  201. 'You look up at him startled as you notice the hot head of his cock resting on your lips. Anatoly pushes his dick to your lips. "Don''t shy baby, lick it with your tongue."'
  202. act 'Start licking':
  203. *clr & cla
  204. gs 'arousal', 'bj', 2, 'sub'
  205. gs 'stat'
  206. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/pr1.jpg"></center>'
  207. 'You hesitantly stick out your tongue and lick the purple head again and again. Soon you are running your tongue along the whole length of his cock, wetting it with your saliva.'
  208. act 'Keep licking his dick':
  209. *clr & cla
  210. gs 'stat'
  211. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/pr2.jpg"></center>'
  212. 'You continue to lick his dick and Anatoly Borisovich puts his hand on the back of your head pushing your head into is groin. You feel his cock fill up your mouth almost completely as your wet lips part to take in the hot and firm flesh of his member. "That''s it baby, suck it now." says Anatoly Borisovich as he starts moving his hips, slowly fucking your mouth. You wrap your lips tightly around his member, trying not to choke as his thrusts become more and more forceful.'
  213. gs 'arousal', 'bj', 2, 'sub', 'deepthroat'
  214. gs 'stat'
  215. act 'Suck his dick':
  216. *clr & cla
  217. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/pr3.jpg"></center>'
  218. 'You actively suck his dick and feel your jaw getting tired. Suddenly a hot jet shoots into your mouth. Surprised you release his member from your mouth an a jet of sperm hits you on the nose. Semen spills out of your mouth and hangs on your chin. Anatoly Borisovich takes your head and sticks his member back in your mouth to clean of the sperm.'
  219. gs 'arousal', 'bj', 4, 'sub', 'humiliation'
  220. gs 'boyStat', 'A74'
  221. gs 'cum_call', 'mouth_swallow', 'A74', 1, 0, 10000, 13
  222. facial += 1
  223. gs 'cum_call', 'face', 'A74', 1, 0, 10000, 27
  224. gs 'stat'
  225. act 'Sit on the floor':
  226. *clr & cla
  227. minut += 2
  228. gs 'stat'
  229. cumspclnt = 11
  230. gs 'cum_cleanup'
  231. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/pr4.jpg"></center>'
  232. 'Finally Anatoly Borisovich stops, puts his cleaned off dick back in his pants and starts to button them up. You sit on the floor stunned with semen dripping from your face. You feel taste the distinct flavor of semen in your mouth. Anatoly Borisovich helps you back to your feet and quickly walks out of the dressing room. You try to clean the traces of sperm from your face.'
  233. act 'Exit out of the dressing':
  234. *clr & cla
  235. minut += 2
  236. gs 'stat'
  237. !!'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/pr4.jpg"></center>'
  238. 'You come out of the dressing room, your face red with shame. You feel like everyone is already aware of the fact that you just sucked a dick in a public place. Anatoly Borisovich tells the saleswoman that he will buy the dress for you and pays. The saleswoman wraps the dress for you and you feel her gaze on your face as she gives you the package.'
  239. act 'Exit from the boutique':
  240. *clr & cla
  241. minut += 15
  242. gs 'stat'
  243. '<center><img <<$set_imgh>> src="images/locations/city/shared/car.jpg"></center>'
  244. 'You walk out of the boutique with Anatoly Borisovich. "Whew, <<$pcs_nickname>>. I''m a little tired. Let''s go to a restaurant some other time." Anatoly tells you, taking you by the hand as he leads you to his car. You quickly get to your home and Anatoly says goodbye to you.'
  245. gs 'arousal', 'end'
  246. gs 'stat'
  247. act 'Out of the car':gt 'city_residential'
  248. end
  249. end
  250. end
  251. end
  252. end
  253. end
  254. end
  255. end
  256. gs 'willpower', 'bj', 'resist', 'medium'
  257. if will_cost <= pcs_willpwr:
  258. act 'Thank you very much. (Deny) (<<will_cost>> Willpower)':
  259. *clr & cla
  260. gs 'willpower', 'pay', 'resist'
  261. gs 'stat'
  262. 'You grin and say, "Thank you very much." Anatoly flushes and says emphatically, "You know what I mean." He unbuttons his pants and pulls out his hard member.'
  263. 'You laugh, "Oh yes, I understand perfectly. You can wear this dress yourself, if you think I''m spreading my legs for every fat cat, who fancies himself the king of the world. So don''t insult my intelligence and put your ugly dick back in your pants. If you think I am going to suck you off for buying me a dress you are a bigger idiot than I thought. Wo do you think you are? Casanova? Are you fucking serious?"'
  264. 'Antaloy''s face turns red with anger and begins to threaten you, "Yes I am, I''ll fire you!"'
  265. 'You laugh in his face, "Oh I''m scared. Alright fire me and then use this dress as a rag to wash the dishes."'
  266. 'Anatoly pale, flushed and hissing angrily jumps out of the fitting followed by your loud laughter.'
  267. act 'Leave':
  268. minut += 1
  269. gt 'city_center'
  270. end
  271. end
  272. else
  273. act 'Thank you very much. (Deny) (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  274. end
  275. end
  276. end
  277. end
  278. exit
  279. elseif BurgerQW['Level'] = 20:
  280. bisrand = rand(0, 10)
  281. if bisrand = 10:'Out of the office of the owner comes Anatoly Borisovich. Upon seeing you he turns away with an arrogant expression.'
  282. elseif BurgerQW['Level'] = 56:
  283. 'When you''re finished you are suddenly approached by the manager Ivan. "Okay <<$pcs_nickname>>. I''m sorry. I was wrong about you. I do not know what got into me. We are currently looking for an Assistant Manager. I think you can do it. You have the nature for it. Well? What do you say?"'
  284. act 'Yes':
  285. *clr & cla
  286. gs 'stat'
  287. 'You agree with the proposal to become Ivan''s assistant manager. Ivan immediately beams at you with happiness. "Well then, here is your first work assignment. Here are the keys to the Anatoly Borisovich''s office. Take them with you when you go home. Go to his office, open the safe and take the envelope in there. Do not forget to close the safe afterwards. Bring the envelope to me. Did you understand everything? Then go!"'
  288. act 'I changed my mind':
  289. *clr & cla
  290. BurgerQW['Level'] = 57
  291. gs 'stat'
  292. 'You refuse Ivan''s offer and notice a flash of annoyance on his face. Disappointed he says to you. "Well, the offer stands."'
  293. act 'Leave':gt 'burger', 'start'
  294. end
  295. act 'Take the key and go into Anatoly Borisovich''s office':
  296. *clr & cla
  297. BurgerQW['Level'] = 111
  298. gs 'stat'
  299. 'Taking key from Ivan you go to the office of the owner. You open the door, enter the office and go to the safe. When you open the safe you see some documents and a thick envelope.'
  300. act 'Look in the envelope':
  301. *clr & cla
  302. $BurgerQW['IvanSecurityCamDesc']= 'You look into the envelope. Then you close the safe and head to the exit.'
  303. gs 'stat'
  304. 'You look into the envelope and see a thick wad of money. You guess, that it amounts to about half a million. A surprised whistle escapes your mouth.'
  305. act 'Take the envelope to Ivan':
  306. *clr & cla
  307. BurgerQW['IvanQWDay'] = daystart
  308. BurgerQW['IvanQW'] = 1
  309. BurgerQW['WorkBlocked'] = 1
  310. gs 'stat'
  311. 'Coming out of the office, you see Ivan standing in the corridor at the cooler talking on the cell phone. Seeing you, he waves you over. You come up and give the envelope to Ivan. He quickly picks it up and puts it in his jacket pocket. After that, he nods. You can go. You want to give him the keys to the office, but Ivan shakes his head and closing his hand tells you. "Take them home with you. Come back tomorrow, we shall discuss the details of your new appointment."'
  312. act 'Leave':gt 'burger', 'start'
  313. end
  314. end
  315. act 'Take the envelope to Ivan':
  316. *clr & cla
  317. $BurgerQW['IvanSecurityCamDesc']= 'You take the envelope, close the safe and head out.'
  318. BurgerQW['IvanQWDay'] = daystart
  319. BurgerQW['IvanQW'] = 1
  320. BurgerQW['WorkBlocked'] = 1
  321. gs 'stat'
  322. 'Coming out of the office, you see Ivan standing in the corridor at the cooler talking on the cell phone. Seeing you, he waves you over. You come up and give the envelope to Ivan. He quickly picks it up and puts it in his jacket pocket. After that, he nods. You can go. You want to give him the keys to the office, but Ivan shakes his head and closing his hand tells you. "Take them home with you. Come back tomorrow, we shall discuss the details of your new appointment."'
  323. act 'Leave':gt 'burger', 'start'
  324. end
  325. end
  326. end
  327. act 'No':
  328. *clr & cla
  329. BurgerQW['Level'] = 57
  330. gs 'stat'
  331. 'You refuse Ivan''s offer and notice his face flashing with a shadow of annoyance. Disappointed he says to you. "Well, the offer stands."'
  332. act 'Leave':gt 'burger', 'start'
  333. end
  334. exit
  335. elseif BurgerQW['Level'] = 50:
  336. 'During your work, you learned that Anatoly Borisovich is away on business affairs and Ivan is replacing him as the manager. When you are getting ready to go to work Ivan comes out of the manager''s office and says in a conspiratorial tone, "Well <<$pcs_nickname>>, you obviously do not want to work for a couple of pennies? Come to me for special work. Special work for special Salary."'
  337. act 'Go to the manager''s office':
  338. *clr & cla
  339. minut += 15
  340. BurgerQW['Level'] = 55
  341. gs 'boyStat', 'A76'
  342. gs 'stat'
  343. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj1.jpg"></center>'
  344. 'You go into the office and close the door. Ivan is sitting in a chair in front of you seemingly at ease, lounging in it. As you go over to the manager waiting for what he would do, he sneers at you and deftly grabs you by the hand pulling you towards him.'
  345. act 'Bend over':
  346. *clr & cla
  347. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj2.jpg"></center>'
  348. 'You bend over and come face to face with Ivan, he whispers, unbuttoning his pants, "Get to work with your mouth, baby"'
  349. act 'Use your mouth':
  350. *clr & cla
  351. guy += 1
  352. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj3.jpg"></center>'
  353. 'Still standing in front of Ivan you bend over even more gently lick his member with your tongue, again and again. Finally your lips wrap around his cock and begin to suck it. His curly pubes tickle your nose with every movement, as you put his whole member in your mouth.'
  354. 'Ivan finally lets out a loud moan and without warning begins to cum in your mouth. A Jet of hot liquid hits you in the mouth. Your eyes widen, but you continue to suck his seed-spewing dick until finally you have a mouth full of semen. As your mouth can not contain it anymore it emerges on your lips and runs down Ivan''s member.'
  355. gs 'arousal', 'bj', 3, 'sub', 'prostitution'
  356. gs 'stat'
  357. act 'Swallow cum and clean his cock':
  358. *clr & cla
  359. minut += 2
  360. gs 'cum_call', 'mouth_swallow', 'A76', 1
  361. money += 500
  362. gs 'stat'
  363. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj4.jpg"></center>'
  364. 'You squat in front of the manager and swallow his sperm before licking the remnants of his semen off of the still standing, but quickly lowering penis.'
  365. 'Finally Ivan sinks back, completely satisfied and gives you 500 <b>₽</b> for the work you have done.'
  366. gs 'arousal', 'end'
  367. gs 'stat'
  368. act 'Leave':gt 'burger', 'start'
  369. end
  370. end
  371. end
  372. gs 'willpower', 'sex', 'resist', 'medium'
  373. if will_cost <= pcs_willpwr:
  374. act 'Leave (<<will_cost>> Willpower)':
  375. *clr & cla
  376. gs 'willpower', 'pay', 'resist'
  377. gs 'stat'
  378. BurgerQW['Level'] = 56
  379. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj1.jpg"></center>'
  380. 'You escape from Ivan''s hands who was not expecting such a reaction. He glares at you, "You suck off Borisovich but get squeamish with his deputy?" You are taken aback by these words. How does he know about what happened in the fitting room. Apparently your thoughts are reflected on your face and Ivan chuckles. "Yes Borisovich himself bragged about it. If you thought, Borisovich wouldn''t tell anyone you''re an idiot. But I won''t tell anyone. And I''m offering you a decent reward. So, be a good girl and show me what you can do with this mouth of yours. "'
  381. gs 'willpower', 'bj', 'resist', 'medium'
  382. if will_cost <= pcs_willpwr:
  383. act 'That''s bullshit! (<<will_cost>> Willpower)':
  384. *clr & cla
  385. gs 'willpower', 'pay', 'resist'
  386. gt 'burger', 'start'
  387. end
  388. else
  389. act 'That''s bullshit! (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  390. end
  391. act 'Use your mouth':
  392. *clr & cla
  393. BurgerQW['Level'] = 55
  394. guy += 1
  395. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj3.jpg"></center>'
  396. 'Still standing in front of Ivan you bend over even more gently lick his member with your tongue, again and again. Finally your lips wrap around his cock and begin to suck it. His curly pubes tickle your nose with every movement, as you put his whole member in your mouth.'
  397. 'Ivan finally lets out an audible moan and without warning begins to cum in your mouth. A Jet of hot liquid hits you in the mouth. Your eyes widen, but you continue to suck his seed-spewing dick until finally you have a mouth full of semen. You can not contain it anymore and as it emerges on your lips and runs down Ivan''s member.'
  398. gs 'arousal', 'bj', 3, 'sub', 'deepthroat', 'prostitution'
  399. gs 'stat'
  400. act 'Swallow his cum and clean his cock':
  401. *clr & cla
  402. minut += 2
  403. gs 'cum_call', 'mouth_swallow', 'A76', 1
  404. money += 500
  405. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj4.jpg"></center>'
  406. 'You squat in front of the manager and swallow his sperm as you began to lick the remnants of his semen off of the still standing, but quickly lowering penis.'
  407. 'Finally Ivan sinks back, completely satisfied and gives you 500 <b>₽</b> for the work you have done.'
  408. gs 'arousal', 'end'
  409. gs 'stat'
  410. act 'Leave':gt 'burger', 'start'
  411. end
  412. end
  413. end
  414. else
  415. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  416. end
  417. exit
  418. end
  419. elseif BurgerQW['Level'] = 55:
  420. 'Ivan approaches you and says, "I''ll see you in my office."'
  421. act 'Go to the manager''s office':
  422. *clr & cla
  423. BurgerQW['Level'] = 60
  424. 'You go into the office where Ivan is sitting at the table and motions you to get under it. You immediatly understand what he wants from you.'
  425. act 'Crawl under the table':
  426. *clr & cla
  427. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bjud.jpg"></center>'
  428. 'You crawl under the table and Ivan pulls out his penis in front of your face. You wrap your lips around it and begin to suck trying to get it into your mouth as deeply as possible. It is cramped and uncomfortable under the table, but you cope with it and after a few minutes of skilfully sucking him off you get Ivan to release his semen into your mouth. You quickly start to swallow, trying to avoid getting your clothes dirty.'
  429. 'Afterwards, Ivan takes out 500 <b>₽</b> and hands them to you.'
  430. money += 500
  431. gs 'boyStat', 'A76'
  432. gs 'arousal', 'bj', 3, 'sub', 'prostitution'
  433. gs 'cum_call', 'mouth_swallow', 'A76', 1
  434. gs 'arousal', 'end'
  435. gs 'stat'
  436. act 'Leave':gt 'burger', 'start'
  437. end
  438. end
  439. elseif BurgerQW['Level'] = 60:
  440. 'Ivan is nowhere to be seen and he has not approached you, so you decide to check his office.'
  441. act 'Go to the manager''s office':
  442. *clr & cla
  443. BurgerQW['Level'] = 65
  444. 'You come to the office, but it is closed. The deputy manager comes over to you and tells you with a chuckle, "What <<$pcs_nickname>>? Can''t work without a dick? I know all about you and our general manager. But he is not here until the end of the week. And if you do not want me to tell other people how you earn a living, then you will go to the office and serve me."'
  445. act 'Nod obediently':
  446. *clr & cla
  447. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj21.jpg"></center>'
  448. 'You go into the office and kneel before the deputy manager. He takes out his member and puts it in your face showering you with the smell of his unwashed crotch. You lick the salty cock and, with a sigh of despair, begin to suck him. The pimply jerk lasts just a few of your movements and begins to violently cum in your mouth. You can''t keep all his semen in your mouth and it runs down your lips.'
  449. guy += 1
  450. gs 'boyStat', 'A75'
  451. gs 'arousal', 'bj', 3, 'sub'
  452. gs 'cum_call', 'mouth_swallow', 'A75', 1
  453. facial += 1
  454. gs 'cum_call', 'face', 'A75', 1
  455. gs 'arousal', 'end'
  456. gs 'stat'
  457. act 'Leave':gt 'burger', 'start'
  458. end
  459. act 'Send him away':
  460. *clr & cla
  461. 'You contemptuously tell this boy, that he can go to hell with his threats.'
  462. '"Ha, listen here slut! My father is the real owner of the bistro and Borisovich is just a hired director. And if he learns that you fuck Borisovich whenever he wants it, it will be very bad for you! So if you want me to keep quiet…"'
  463. 'After these words, he calls two movers over and says'
  464. '"Guys would you like to blow off some steam on this nymph? Don''t worry, she enjoys it. She is here to serve. Am I right <<$pcs_nickname>>?'
  465. gs 'willpower', 'group', 'resist', 'medium'
  466. if will_cost <= pcs_willpwr:
  467. act 'Refuse (<<will_cost>> Willpower)':
  468. gs 'willpower', 'pay', 'resist'
  469. BurgerQW['Level'] = 61
  470. gt 'burger', 'start'
  471. end
  472. else
  473. act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  474. end
  475. act 'Yes':
  476. *clr & cla
  477. BurgerQW['Level'] = 70
  478. guy += 3
  479. !gruzsex += 1
  480. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/tri.jpg"></center>'
  481. 'You jitter and mumble, "Yes." as you stand in front of the three men. The movers smile and you are quickly grabbed by your hand and taken to the warehouse. They help you undress and put you on your knees. Then they pull out their cocks waiting for you to serve them.'
  482. 'You begin to diligently suck and stroke the cocks of the three man. Soon they groan and one of them grabs your head with one hand, holding his erect cock with the other.'
  483. gs 'boyStat', 'A75', 'a'
  484. gs 'npcgeneratec', 0, 'First Moving Man', rand(18,40)
  485. BurgerQW['GroupSex1'] = $npclastgenerated
  486. gs 'boystat', BurgerQW['GroupSex1'], 'b'
  487. gs 'npcgeneratec', 0, 'Second Moving Man', rand(18,40)
  488. BurgerQW['GroupSex2'] = $npclastgenerated
  489. gs 'boystat', BurgerQW['GroupSex2'], 'c'
  490. gs 'arousal', 'bj', 3, 'dick1', 'sub', 'group'
  491. gs 'arousal', 'bj', -1, 'dick2', 'sub', 'group'
  492. gs 'arousal', 'bj', -1, 'dick3', 'sub', 'group'
  493. gs 'arousal', 'hj', -1, 'dick1', 'sub', 'group'
  494. gs 'arousal', 'hj', -1, 'dick2', 'sub', 'group'
  495. gs 'arousal', 'hj', -1, 'dick3', 'sub', 'group'
  496. gs 'stat'
  497. act 'Let them cum on you':
  498. *clr & cla
  499. gs 'cum_call', 'face', 'A75', 1
  500. gs 'cum_call', 'face', BurgerQW['GroupSex1']
  501. gs 'cum_call', 'face', BurgerQW['GroupSex2']
  502. facial += 3
  503. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/tri2.jpg"></center>'
  504. 'Hot jets of sperm slap you in the face, you close your eyes and just feel the stinky seed on your skin. Soon after the sprays of semen stop and your face is all covered with a thick layer of sticky cum. The guys look satisfied and laugh at you. Afterwards they exit the warehouse leaving you by yourself.'
  505. gs 'arousal', 'end'
  506. gs 'stat'
  507. act 'Leave':gt 'burger', 'start'
  508. end
  509. end
  510. end
  511. end
  512. elseif BurgerQW['Level'] >= 65 and BurgerQW['sergeyQWServiced1'] ! 3:
  513. 'The pimply deputy manager comes to you and, taking your hand, leads you into his office.'
  514. 'In the office, he sits down on a chair pulls out his dick and puts you in front of him on all fours.'
  515. act 'Use your mouth':
  516. *clr & cla
  517. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/bj31.jpg"></center>'
  518. 'You kneel in front of the kid sitting in a chair and begin to diligently suck his dick. You caress his cock and testicles with your tongue while simoultaneously stroking his shaft with your hand.'
  519. gs 'boyStat', 'A75'
  520. gs 'arousal', 'bj', 3, 'sub', 'prostitution'
  521. gs 'arousal', 'hj', -3, 'sub', 'prostitution'
  522. gs 'stat'
  523. act 'Continue':
  524. *clr & cla
  525. money += 300
  526. BurgerQW['sergeyQWServiced2'] += 1
  527. if BurgerQW['sergeyQWServiced2']=10:set BurgerQW['sergeyQWServiced1']=3
  528. '<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum19.jpg"></center>'
  529. 'A hot jet of sperm slaps you in the mouth, while you continue to stroke his member. You are careful not to spill a drop of the nasty smelling liquid out of your mouth. Finally the stream dries up and you swallow the sperm. He grins and tosses 300 <b>₽</b> on the floor. You pick them up and hide them in your pocket as you rise up from your knees and leave the office.'
  530. gs 'cum_call', 'mouth_swallow', 'A75', 1
  531. gs 'arousal', 'end'
  532. gs 'stat'
  533. act 'Leave':gt 'burger', 'start'
  534. end
  535. end
  536. exit
  537. elseif (BurgerQW['Level'] = 57 and BurgerQW['BossSlut'] = 0) or (BurgerQW['Level'] >= 65 and BurgerQW['BossSlut'] = 0 and BurgerQW['sergeyQWServiced1'] = 3):
  538. BurgerQW['BossSlut'] = 1
  539. if BurgerQW['sergeyQWServiced1'] = 3:BurgerQW['sergeyQWServiced1'] = 4
  540. 'After you finish, you see Anatoly Borisovich. He nods and tells you "Hello <<$pcs_nickname>>, when you''re done, come to me."'
  541. act 'Leave':gt 'burger', 'start'
  542. exit
  543. end
  544. act 'Leave':gt 'burger', 'start'
  545. end
  546. if $ARGS[0] = 'floor':
  547. menu_off = 1
  548. *clr & cla
  549. BurgerQW['WashFloorLastDay'] = daystart
  550. minut += 60
  551. BurgerQW['WashDishesCount'] += 1
  552. if pcs_mood > 15: pcs_mood -= 15
  553. money += 70
  554. gs 'sweat', 'add', 10
  555. gs 'stat'
  556. '<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'
  557. 'You wash the floors of the bistro for an hour. Afterwards you are given 70 <b>₽</b> for your work.'
  558. act 'Leave':gt 'burger', 'start'
  559. end
  560. if $ARGS[0] = 'boss':
  561. $menu_loc = 'burger'
  562. $menu_arg = 'boss'
  563. menu_off = 0
  564. gs 'stat'
  565. if BurgerQW['BossSlut'] = 10:
  566. if week < 6 and hour >= 9 and hour < 17:'Anatoly Borisovich is sitting at the table talking to someone on the phone.'
  567. if week < 6 and hour < 9 or week < 6 and hour >= 17:'Anatoly Borisovich is not here.'
  568. if week >= 6:'It''s the weekend and Anatoly Borisovich is not here.'
  569. act 'Leave':gt 'burger', 'start'
  570. if BurgerQW['Secretary'] = 2:
  571. if week < 6 and hour < 10:'Anatoly Borisovich looks at you sternly, "<<$pcs_nickname>>, you''re fired. Go away, we''re done, I love my wife more than you."'
  572. elseif BurgerQW['Secretary'] = 1:
  573. if week < 6 and hour < 10 and $clothingworntype = 'office':
  574. act 'Work':gt 'burgerWork', 'start'
  575. act 'Resign':
  576. BurgerQW['Secretary'] = 0
  577. work = 0
  578. minut += 20
  579. gt 'burger', 'start'
  580. end
  581. elseif week < 6 and hour < 10 and $clothingworntype ! 'office':
  582. 'Anatoly Borisovich looks at you sternly, "<<$pcs_nickname>>, why aren''t you dressed properly? Go home and come back tomorrow dressed appropriately, you''re not working today!"'
  583. end
  584. elseif BurgerQW['Secretary'] = 0 and week < 6:
  585. if secrDiplom = 1:
  586. act 'Show your secretary diploma':
  587. *clr & cla
  588. menu_off = 1
  589. minut += 1
  590. gs 'stat'
  591. 'You show Anatoly Borisovich your diploma and he asks you, "Do you want to work for me?"'
  592. act 'No':
  593. *clr & cla
  594. minut += 1
  595. gs 'stat'
  596. 'You tell him, that you already work somewhere else. Anatoly Borisovich smiles a little, "What can I do to make you quit your job and work for me? You can think about it, I won''t force you, but I''ll pay you a normal salary. You will get 1250 <b>₽</b> per day."'
  597. act 'Leave':gt 'burger', 'start'
  598. end
  599. if (work = 0 and BurgerQW['Secretary'] = 0 and cheatWork = 0) or (BurgerQW['Secretary'] = 0 and cheatWork = 1):
  600. act 'Ask about the work':
  601. *clr & cla
  602. minut += 1
  603. gs 'stat'
  604. 'You ask about the job. Anatoly Borisovich smiles a little, "You can think about it, I won''t force you, but I''ll pay you a normal salary. You will get 1250 <b>₽</b> per day. I''m looking for loyalty, hard work, and strict compliance with my guidelines."'
  605. act 'Leave':gt 'burger', 'start'
  606. act 'Take the job':
  607. *clr & cla
  608. minut += 1
  609. work = 1
  610. BurgerQW['Secretary'] = 1
  611. gs 'stat'
  612. 'You agree to become a secretary to Anatoly Borisovich. He takes your CV, makes a copy of your passport and diploma, and tells you. "Come to work here every weekday, no later than 9 am, you must wear an office outfit. You will receive calls, take letters, and copy documents, and you have to do any other general office work as required. You will work until 17:00, your salary will be paid into your bank account every month."'
  613. act 'Leave':gt 'burger', 'start'
  614. end
  615. end
  616. end
  617. end
  618. end
  619. end
  620. elseif BurgerQW['BossSlut'] = 1:
  621. 'You enter the manager''s office. Anatoly Borisovich is sitting at the table studying some documents. When he sees you, he puts them aside and invites you to sit on a chair.'
  622. act 'Sit on a chair':
  623. *clr & cla
  624. menu_off = 1
  625. minut += 1
  626. BurgerQW['BossSlut'] = 10
  627. gs 'stat'
  628. if BurgerQW['Level'] = 57:
  629. kosmetica += 200
  630. 'You sit on a chair and Anatoly Borisovich smiles at you. "I''m so glad this damn trip is over. I really missed you. Incidentally I do not come empty-handed, here''s a gift." with these words Anatoly Borisovich puts some expensive cosmetics on the table. "And yet, I have to tell you about some facts. I am married and I have kids. So do not even think about marriage, it won''t work. My wife is the daughter of a very influential deputy and currently I am only the manager of this lousy diner. Very soon I''ll get the post of deputy minister of construction, but for now I just need to do my job here. So, don''t start any trouble. I need loyal people, and I want you to be my secretary. Did you get the diploma for the secretary course? "'
  631. if secrDiplom = 1:
  632. act 'Yes, I have a diploma':
  633. *clr & cla
  634. minut += 1
  635. gs 'stat'
  636. 'You tell him that you already have a secretary diploma. Anatoly Borisovich smiles. "That''s good. Listen, I need to make a couple of calls, so leave now."'
  637. act 'Leave':gt 'burger', 'start'
  638. end
  639. elseif secrDiplom = 0 and sekrObu > 0:
  640. act 'I do not have a diploma, but I am a secretary':
  641. *clr & cla
  642. minut += 1
  643. gs 'stat'
  644. 'You tell him that you do not have a diploma, but are experienced at working as a secretary. Anatoly Borisovich smiles. "That''s good. Douchishsya, come to me. Listen, I now need to make a couple of calls, leave now."'
  645. act 'Leave':gt 'burger', 'start'
  646. end
  647. elseif secrDiplom = 0 and sekrObu = 0:
  648. act 'No':
  649. *clr & cla
  650. sekrObu = 1
  651. minut += 1
  652. gs 'stat'
  653. 'You shake your head. Anatoly Borisovich smiles. "It doesn''t matter, I will pay for your training and once you''re done, come to me."'
  654. act 'Leave':gt 'burger', 'start'
  655. end
  656. end
  657. elseif BurgerQW['Level'] >= 65:
  658. 'You sit down on a chair and Anatoly Borisovich gives you a grim look. "I did not think you were so cheap. What is your fee? 300 <b>₽</b> for a blowjob?" He pulls 300 <b>₽</b> out of his pocket and throws them on the floor. "Get down on your knees and do your work, slut."'
  659. gs 'willpower', 'bj', 'resist', 'medium'
  660. if will_cost <= pcs_willpwr:
  661. act 'Leave (<<will_cost>> Willpower)':
  662. *clr & cla
  663. gs 'willpower', 'pay', 'resist'
  664. gt 'burger', 'start'
  665. end
  666. else
  667. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  668. end
  669. act 'Get on your knees':
  670. *clr & cla
  671. money += 300
  672. BurgerQW['BossSlut'] = 2
  673. BurgerQW['BossSlutLastServed'] = daystart
  674. '<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bj2.jpg"></center>'
  675. 'You kneel down and take the money from the floor. Anatoly Borisovich pulls his already hard member out and holds it in front of your face. You wrap your lips around it and begin to suck as the hard cock fills your mouth. Anatoly Borisovich grits his teeth with pleasure "Suck it slut and don''t forget to swallow every last drop!" You feel his sperm hit the inside of your mouth and begin to quickly swallow his cum to prevent yourself from choking. After you finish, Anatoly Borisovich puts his dick back in his pants. "Now get out."'
  676. gs 'boyStat', 'A74'
  677. gs 'arousal', 'bj', 5, 'sub', 'prostitution'
  678. gs 'cum_call', 'mouth_swallow', 'A74', 1
  679. gs 'arousal', 'end'
  680. gs 'stat'
  681. act 'Leave':gt 'burger', 'start'
  682. end
  683. end
  684. end
  685. elseif BurgerQW['BossSlut'] = 2 and BurgerQW['BossSlutLastServed'] = daystart:
  686. 'Knocking you walk into the office to Anatoly Borisovich. He looks at you angrily, "I said, get out of here."'
  687. act 'Leave':gt 'burger', 'start'
  688. elseif BurgerQW['BossSlut'] = 2 and BurgerQW['BossSlutLastServed'] ! daystart:
  689. BurgerQW['BossSlutLastServed'] = daystart
  690. 'Knocking you walk into the office to Anatoly Borisovich. He looked at you grimly and pulls out 300 <b>₽</b>, "Get down on your knees and get to work, slut."'
  691. gs 'willpower', 'bj', 'resist', 'medium'
  692. if will_cost <= pcs_willpwr:
  693. act 'Leave (<<will_cost>> Willpower)':
  694. *clr & cla
  695. gs 'willpower', 'pay', 'resist'
  696. gt 'burger', 'start'
  697. end
  698. else
  699. act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  700. end
  701. act 'Get on your knees':
  702. *clr & cla
  703. menu_off = 1
  704. money += 300
  705. BurgerQW['BossSlutLastServed'] = daystart
  706. '<center><img <<$set_imgh>> src="images/characters/city/anatoly/sex/bj2.jpg"></center>'
  707. 'You kneel down and take the money from the floor. Anatoly Borisovich pulls his already hard member out and holds it in front of your face. You wrap your lips around it and begin to suck as the hard cock fills your mouth. Anatoly Borisovich grits his teeth with pleasure "Suck it slut and don''t forget to swallow every last drop!" You feel his sperm hit the inside of your mouth and begin to quickly swallow his cum to prevent yourself from choking. After you finish, Anatoly Borisovich puts his dick back in his pants. "Now get out."'
  708. gs 'boyStat', 'A74'
  709. gs 'arousal', 'bj', 5, 'sub', 'prostitution'
  710. gs 'cum_call', 'mouth_swallow', 'A74', 1
  711. gs 'arousal', 'end'
  712. gs 'stat'
  713. act 'Leave':gt 'burger', 'start'
  714. end
  715. end
  716. end
  717. --- burger ---------------------------------