uni_dorm.qsrc 34 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703
  1. # uni_dorm
  2. !!2022/10/05 - Alaratt
  3. if $ARGS[0] = 'start':
  4. *clr & cla
  5. minut += 5
  6. $menu_loc = 'uni_dorm'
  7. $menu_arg = 'start'
  8. menu_off = 0
  9. gs 'themes', 'indoors'
  10. minut += 1
  11. gs 'stat'
  12. *clr & cla
  13. '<center><b><font color="maroon">Dormitory</font></b></center>'
  14. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm.jpg"></center>'
  15. 'You walk up to the dorm building and go inside. It is pretty clean and in good shape. An older woman, with a very unpleasant and judgmental look on her face sits in a room just off the main hallway. It has a partially glass wall and a window, splitting it from the main room. She looks up at you as you enter, her look telling you she is already judging you as her face frowns into a look of disapproval.'
  16. act 'Go outside':
  17. minut += 1
  18. killvar 'university_dorm'
  19. gt 'uni_grounds', 'main'
  20. end
  21. if func('homes_properties', 'can_live_here') or university['student'] = 1:
  22. univ
  23. act 'Show her your student ID':
  24. *clr & cla
  25. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm.jpg"></center>'
  26. 'As you walk by, you take out your student ID and show it to her. She looks for just a second and nods before going back to what she was doing. You head for the elevators.'
  27. act 'Take the elevator':gt 'uni_dorm', 'elevator'
  28. end
  29. else
  30. menu_off = 1
  31. 'Since you''re not attending the university and don''t have an ID, you won''t be allowed in the dorms unless you''re on the guest list of a student.'
  32. if DjibrilQW['invite'] = 1 and hour >= 8 and hour < 22:
  33. act 'I''m here to visit Djibril':
  34. *clr & cla
  35. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm.jpg"></center>'
  36. 'You walk over to the counter and pull out your ID. "I''m here to visit Djibril."'
  37. 'The woman gives you a look of complete disgust. "What, your own kind not good enough for you? Go ahead and take care of those black cocks. He''s on the eighth floor, room 810." She turns away from you and goes back to what she was doing. Not wanting to get into an argument with her, you say nothing and quickly head for the elevator.'
  38. act 'Take the elevator':gt 'uni_dorm', 'elevator'
  39. end
  40. end
  41. if gosh > 0 and hour >= 8 and hour < 22:
  42. act 'I''m here to visit Gosha':
  43. *clr & cla
  44. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm.jpg"></center>'
  45. 'You walk over to the counter and pull out your ID. "I''m here to visit Gosha."'
  46. 'The woman shakes her head in disapproval. "You''re Gosha''s new whore? I''ll never understand what you sluts see in that scrawny bastard. He''s been through half of the dorm already! He''s on the sixth floor, room 602." She turns away from you and goes back to what she was doing. Not wanting to get into an argument with her, you say nothing and quickly head for the elevator.'
  47. reccoldorm = 1
  48. goshiflag = 1
  49. act 'Take the elevator':gt 'uni_dorm', 'elevator'
  50. end
  51. end
  52. if meet_kendra = 1 and hour >= 8 and hour < 22:
  53. act 'I''m here to visit Kendra':
  54. *clr & cla
  55. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm.jpg"></center>'
  56. if kendraQW['sub'] < 0:
  57. 'You walk over to the counter and pull out your ID. "I''m here to visit Kendra."'
  58. 'The woman gives you a look of complete disgust. "It seems like she''s gotten tired of you since you''re no longer on the guest list. Now get out of here before I call security." Surprised, you turn and quickly leave before the woman calls security.'
  59. act 'Go outside':
  60. killvar 'university_dorm'
  61. minut += 1
  62. gt 'uni_grounds', 'main'
  63. end
  64. else
  65. 'You walk over to the counter and pull out your ID. "I''m here to visit Kendra."'
  66. 'The woman gives you a look of complete disgust. "What, a man not good enough for you? Go ahead and serve that black whore. She''s on the eighth floor, room 801." She turns away from you and goes back to what she was doing. Not wanting to get into an argument with her, you say nothing and quickly head for the elevator.'
  67. act 'Take the elevator':gt 'uni_dorm', 'elevator'
  68. end
  69. end
  70. end
  71. if katjaQW['knows_dorm_room_number'] > 0 and yearstart > 1 and hour >= 8 and hour < 22:
  72. act 'I''m here to visit Katja':
  73. *clr & cla
  74. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm.jpg"></center>'
  75. 'You walk over to the counter and pull out your ID. "I''m here to visit Katja Meynold."'
  76. 'The woman smiles. "You''re one of Katja''s friends?" she asks. "She''s such a sweet girl. She''s on the second floor, room 204."'
  77. 'She lets you in and you thank her before heading for the elevator.'
  78. act 'Take the elevator':gt 'uni_dorm', 'elevator'
  79. end
  80. end
  81. !!if AlbinaQW['dorm_invite'] = 1 and yearstart > 1 and hour >= 8 and hour < 22:
  82. !!act 'I''m here to visit Albina':
  83. !!*clr & cla
  84. !!'<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm.jpg"></center>'
  85. !!'You walk over to the counter and pull out your ID. "I''m here to visit Albina Barlovskaya."'
  86. !!'"Oh. Her," the woman says with a frown. "That girl needs discipline. Strolling in here like she owns the place after spending the night in a place like <i>that</i>. Her mother should be ashamed of herself for raising such a slut!"'
  87. !!'She gives you a judgmental stare. "Your ''friend'' is on the seventh floor, room 707." She points you at the elevator before going back to what she was doing.'
  88. !!'You''ve better things to do than stand around and argue with her, so you head for the elevator.'
  89. !!act 'Take the elevator': gt 'uni_dorm', 'elevator'
  90. !!end
  91. !!end
  92. end
  93. end
  94. if $ARGS[0] = 'elevator':
  95. $menu_loc = 'uni_dorm'
  96. $menu_arg = 'elevator'
  97. menu_off = 0
  98. gs 'themes', 'indoors'
  99. minut += 5
  100. gs 'stat'
  101. *clr & cla
  102. '<center><b><font color="maroon">Dormitory</font></b></center>'
  103. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/elevator.jpg"></center>'
  104. 'You enter the dorm elevator. It seems to be in decent shape and fairly well maintained. The panel of floor numbers awaits your input.'
  105. if func('uniutil', 'student', 'enrolled'):
  106. 'Your dorm room is on the tenth floor.'
  107. end
  108. act 'Go to the first floor and leave the dorm':
  109. killvar 'university_dorm'
  110. minut += 1
  111. gt 'uni_grounds', 'main'
  112. end
  113. act 'Go to the second floor': gt 'uni_dorm', 'second_floor'
  114. act 'Go to the sixth floor': gt 'uni_dorm', 'sixth_floor'
  115. !!act 'Go to the seventh floor': gt 'uni_dorm', 'seventh_floor'
  116. act 'Go to the eighth floor': gt 'uni_dorm', 'eighth_floor'
  117. act 'Go to the tenth floor': gt 'uni_dorm', 'tenth_floor'
  118. end
  119. if $ARGS[0] = 'second_floor':
  120. $loc = 'uni_dorm'
  121. $loc_arg = 'second_floor'
  122. $menu_loc = 'uni_dorm'
  123. $menu_arg = 'second_floor'
  124. menu_off = 0
  125. $location_type = 'public_indoors'
  126. killvar '$locclass'
  127. minut += 1
  128. gs 'katja_meynold_schedule'
  129. gs 'stat'
  130. *clr & cla
  131. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_hall.jpg"></center>'
  132. 'Before you is the usual dorm hallway with the dilapidated walls of the second floor. You can hear music and loud talking from drunk students escaping from some rooms.'
  133. act 'Elevator': gt 'uni_dorm', 'elevator'
  134. if katjaQW['knows_dorm_room_number'] > 0 and yearstart > 1:
  135. act 'Katja''s room':
  136. *clr & cla
  137. if locat['katja'] = 31 or locat['katja'] = 35 or locat['katja'] = 51 or locat['katja'] = 52:
  138. '<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
  139. 'Katja opens the door. "Hey <<$pcs_nickname>>, come on in!" She stands aside to let you enter before closing the door behind you.'
  140. act 'Enter': gt 'katja_dorm', 'start'
  141. else
  142. if locat['katja'] = 29 and sofiaQW['know'] = 1 and rand(0,3) = 0 and week < 5:
  143. '<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big260.jpg"></center>'
  144. 'Sofia opens the door. "Hey, <<$pcs_nickname>>! Katja is at the library right now and I have Maxim over so I don''t have time to talk. See you later!" she says before closing the door.'
  145. else
  146. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_hall.jpg"></center>'
  147. 'You knock on the door, but no one answers. She must be asleep or not home.'
  148. end
  149. minut += 5
  150. gs 'stat'
  151. act 'Leave': gt 'uni_dorm', 'second_floor'
  152. end
  153. end
  154. end
  155. end
  156. if $ARGS[0] = 'sixth_floor':
  157. $loc = 'uni_dorm'
  158. $loc_arg = 'sixth_floor'
  159. $menu_loc = 'uni_dorm'
  160. $menu_arg = 'sixth_floor'
  161. menu_off = 0
  162. $location_type = 'public_indoors'
  163. killvar '$locclass'
  164. minut += 1
  165. gs 'stat'
  166. *clr & cla
  167. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_hall.jpg"></center>'
  168. 'Before you is the usual dorm hallway with the dilapidated walls of the sixth floor. You can hear music and loud talking from drunk students escaping from some rooms.'
  169. act 'Elevator': gt 'uni_dorm', 'elevator'
  170. if gosh > 0:
  171. act 'Gosha''s room':
  172. *clr & cla
  173. if (week <= 4 and hour >= 16 and hour < 23 and rand(1, 2) = 2) or (week = 6 and hour >= 9 and hour < 23 and rand(1, 2) = 2) or (week = 7 and hour >= 9 and hour < 23 and rand(1, 3) >= 2):
  174. '<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big83.jpg"></center>'
  175. 'Gosha opens the door. "Hey <<$pcs_nickname>>, why don''t you come in?" He stands aside tp let you enter before closing the door behind you.'
  176. act 'Enter':gt 'gosha', 'gosha_room'
  177. else
  178. minut += 5
  179. gs 'stat'
  180. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_hall.jpg"></center>'
  181. 'You knock on the door, but no one answers. He must be asleep or not home.'
  182. act 'Leave':gt 'uni_dorm', 'elevator'
  183. end
  184. end
  185. end
  186. end
  187. if $ARGS[0] = 'seventh_floor':
  188. $loc = 'uni_dorm'
  189. $loc_arg = 'seventh_floor'
  190. $menu_loc = 'uni_dorm'
  191. $menu_arg = 'seventh_floor'
  192. menu_off = 0
  193. $location_type = 'public_indoors'
  194. killvar '$locclass'
  195. minut += 1
  196. gs 'albina_uni_schedule'
  197. gs 'stat'
  198. *clr & cla
  199. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_hall.jpg"></center>'
  200. 'Before you is the usual dorm hallway with the dilapidated walls of the seventh floor. You can hear music and loud talking from drunk students escaping from some rooms.'
  201. act 'Elevator': gt 'uni_dorm', 'elevator'
  202. if AlbinaQW['dorm_invite'] = 1 and yearstart > 1:
  203. act 'Albina''s room':
  204. *clr & cla
  205. if locat['albina'] = 7 or locat['albina'] = 8 or locat['albina'] = 10:
  206. '<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big23.jpg"></center>'
  207. 'You knock on the door, and after a few seconds, Albina opens it. "<<$pcs_nickname>>! Come in, come in." She stands aside to let you enter before closing the door behind you.'
  208. act 'Enter': gt 'albina_dorm', 'start'
  209. elseif locat['albina'] = 15:
  210. if AlbinaQW['stripper'] = 1:
  211. '<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big23.jpg"></center>'
  212. 'Just as you''re about to knock on the door, it flies open and Albina walks out with a large bag slung over her shoulder. She''s in such a hurry that she almost collides with you. "Oh. Sorry, <<$pcs_nickname>>. I didn''t see you there."'
  213. '"Clearly," you reply as you look at her bag. "Off to work?" you whisper and she nods.'
  214. '"Yes, and I''m going to be late if I don''t get a move on. Talk to you later, <<$pcs_nickname>>!" She hurries off without another word, leaving you alone in the hallway.'
  215. act 'Leave': gt 'uni_dorm', 'seventh_floor' & minut += 2
  216. else
  217. '<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big23.jpg"></center>'
  218. 'Just as you''re about to knock on the door, it flies open and Albina walks out with a large bag slung over her shoulder. She''s in such a hurry that she almost collides with you. "Oh. Sorry, <<$pcs_nickname>>. I didn''t see you there."'
  219. '"Clearly," you reply as you look at her bag. "Why are you in such a rush?" you ask, but she brushes you aside.'
  220. '"I just have somewhere I need to be and need to go now before I''m late. I''ll talk to you some other time, <<$pcs_nickname>>." She hurries off without another word, leaving you alone and confused in the hallway.'
  221. act 'Leave': gt 'uni_dorm', 'seventh_floor' & minut += 2
  222. end
  223. elseif locat['albina'] = 16:
  224. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_hall.jpg"></center>'
  225. 'You knock on the door, but there''s no answer.'
  226. if AlbinaQW['stripper'] = 1:
  227. 'You then remember what day it is and realise that she''s at work and won''t be back until the early hours of the morning, so you head back to the elevator.'
  228. act 'Leave':gt 'uni_dorm', 'elevator'
  229. else
  230. 'You have no idea where she would be at this time of night, so you head back to the elevator.'
  231. act 'Leave':gt 'uni_dorm', 'elevator'
  232. end
  233. else
  234. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_hall.jpg"></center>'
  235. 'You knock on the door, but there''s no answer. She''s either still asleep or isn''t home.'
  236. act 'Leave':gt 'uni_dorm', 'elevator'
  237. end
  238. end
  239. end
  240. end
  241. if $ARGS[0] = 'eighth_floor':
  242. $loc = 'uni_dorm'
  243. $loc_arg = 'eighth_floor'
  244. $menu_loc = 'uni_dorm'
  245. $menu_arg = 'eighth_floor'
  246. menu_off = 0
  247. $location_type = 'public_indoors'
  248. killvar '$locclass'
  249. minut += 1
  250. gs 'stat'
  251. *clr & cla
  252. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_hall.jpg"></center>'
  253. 'Before you is the usual dorm hallway with the dilapidated walls of the eighth floor. You can hear music and loud talking from drunk students escaping from some rooms.'
  254. act 'Elevator': gt 'uni_dorm', 'elevator'
  255. if DjibrilQW['invite'] = 1:
  256. act 'Djibril'' room':
  257. *clr & cla
  258. if (week <= 4 and hour >= 16 and hour < 23 and rand(1, 2) = 2) or (week = 6 and hour >= 9 and hour < 23 and rand(1, 2) = 2) or (week = 7 and hour >= 9 and hour < 23 and rand(1, 3) >= 2):
  259. '<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big82.jpg"></center>'
  260. 'You knock on the door, and after a few seconds, Djibril opens it. He smiles as he notices it''s you. "I was hoping you would stop by <<$pcs_nickname>>. Come on in."'
  261. act 'Enter': gt 'djibril', 'djibril_room'
  262. else
  263. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_hall.jpg"></center>'
  264. minut += 5
  265. gs 'stat'
  266. 'You knock on the door, but no one answers. He must be asleep or not home.'
  267. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  268. end
  269. end
  270. end
  271. if meet_kendra = 1:
  272. act 'Kendra''s room':
  273. *clr & cla
  274. if (week <= 4 and hour >= 17 and hour < 23 and rand(1, 2) = 2) or (week <= 6 and hour >= 9 and hour < 20 and rand(1, 2) = 2) or (week = 7 and hour >= 9 and hour < 23 and rand(1, 3) >= 2):
  275. if kendra_busy ! daystart:
  276. if rand(1,5) = 1:
  277. '<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/door.jpg"></center>'
  278. 'You can hear Kendra''s voice as you get close to the door. It''s fairly loud and sounds harsh in tone, but you can''t quite make out what she''s saying. You hear a muffled reply that sounds male. It sounds like she''s already busy. You could knock or just leave her to her company.'
  279. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  280. act 'Knock':
  281. kendra_busy = daystart
  282. *clr & cla
  283. '<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/strapon_door.jpg"></center>'
  284. if kendraQW['sub'] < 0:
  285. 'You knock on the door, and after a few seconds, Kendra opens it. She is completely naked and wearing a strapon harness around her hips. She plays with the large black dildo attached to it as she frowns at you. "I told you last time, I don''t have time for games and I''m tired of yours! Now get lost, I''m busy!" She then slams the door in your face.'
  286. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  287. else
  288. if kendra_male_slave = 0:
  289. 'You knock on the door, and after a few seconds, Kendra opens it. She is completely naked and wearing a strapon harness around her hips. She plays with the large black dildo attached to it as she looks at you. "Well if it isn''t my new favorite white slave bitch. I''m kind of busy punishing one of my other slaves right now."'
  290. 'She starts to close the door before you can reply, then stops and smiles at you. "You could come in and watch." She holds the door open and stands aside to let you enter. You glance into the room and see a naked college boy kneeling next to the couch. When he notices you, he blushes bright red and moves to cover himself up, but stops with one look from Kendra and instead just lowers his gaze to the floor. You have no doubt what she''s going to do to him, but is it something you want to watch? It could be interesting and you might learn something from her as well. On the other hand, do you want to humiliate him more than he already is?'
  291. else
  292. 'You knock on the door. After a few seconds, Kendra opens the door. She is completely naked and wearing a strapon harness around her hips. She plays with the large black dildo attached to it as she looks at you. "Well if it isn''t my new favorite white slave bitch. I''m punishing one of the boys again. Want to come in and watch again?"'
  293. 'She holds the door open and stands aside to let you enter. You glance into the room and see the same college boy kneeling naked next to the couch, just like last time. When he notices you, he blushes bright red, this time not trying to cover himself up, instead just lowers his gaze to the floor. You know what she''s going to do to him after watching last time. Is it something you want to watch again? Is this something you might want to learn to do to others yourself? There are a few boys you know that it might be fun to do it with.'
  294. end
  295. gs 'arousal', 'erotic_nudity', 3
  296. gs 'stat'
  297. act 'Enter': gt 'kendra', 'kendra_male_slave'
  298. act 'Decline':
  299. *clr & cla
  300. '<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/strapon_door.jpg"></center>'
  301. if kendra_male_slave = 0:
  302. if kendraQW['sub'] >= 10:
  303. 'You shake your head. "No thanks. You look busy and I don''t want to disturb you..."'
  304. 'She laughs loudly and roughly grabs your chin in her hand. "You may leave, after you get down on the floor and kiss my boot like the good little white slave that you are."'
  305. gs 'willpower', 'humiliation', 'resist', 'hard'
  306. if will_cost <= pcs_willpwr:
  307. act 'Refuse (<<will_cost>> Willpower)':
  308. *clr & cla
  309. kendraQW['sub'] -= 5
  310. gs 'willpower', 'pay', 'resist'
  311. gs 'stat'
  312. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_hall.jpg"></center>'
  313. 'You glance around and see a few other students in the hall and feel yourself already blushing at the idea of kissing her boots. You shake you head. "No I can''t..."'
  314. 'She gets a angry look in her face. "Fine then don''t come back." Followed by her slamming the door in your face. You don''t think she really means to never come back.'
  315. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  316. end
  317. else
  318. act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  319. end
  320. act 'Get down':
  321. *clr & cla
  322. kendraQW['sub'] += 1
  323. '<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/kiss_boot.jpg"></center>'
  324. 'You glance around seeing a few other students in the hallway, then you get down on your hands and knees in front of her. You bend over forward until your face is in front of her boot. You then kiss her boot, you can hear some murmers from others and a few laughs. She steps away from you and closes the door. "That''s a good little bitch, now you may leave." Once the door is closed you stand back up and walk off.'
  325. gs 'arousal', 'BDSM', 1, 'humiliation', 'sub'
  326. gs 'arousal', 'end'
  327. gs 'stat'
  328. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  329. end
  330. else
  331. 'You shake your head. "No thanks. You look busy and I don''t want to disturb you..."'
  332. 'She laughs loudly and roughly grabs your chin in her hand. "Aww so shy, adorable... but I will break you in time. Maybe next time then." She closes the door and you turn to leave.'
  333. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  334. end
  335. else
  336. if kendraQW['sub'] >= 10:
  337. 'You shake your head. "No thanks. Last time was entertaining, but I didn''t come to see that again."'
  338. 'She laughs loudly and roughly grabs your chin in her hand. "You may leave, after you get down on the floor and kiss my boot like the good little white slave that you are."'
  339. gs 'willpower', 'humiliation', 'resist', 'hard'
  340. if will_cost <= pcs_willpwr:
  341. act 'Refuse (<<will_cost>> Willpower)':
  342. *clr & cla
  343. kendraQW['sub'] -= 5
  344. gs 'willpower', 'pay', 'resist'
  345. gs 'stat'
  346. 'You glance around and see a few other students in the hall and feel yourself already blushing at the idea of kissing her boots. You shake you head. "No I can''t..."'
  347. 'She gets a angry look in her face. "Fine then don''t come back." Followed by her slamming the door in your face. You don''t think she really means to never come back.'
  348. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  349. end
  350. else
  351. act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  352. end
  353. act 'Get down':
  354. *clr & cla
  355. kendraQW['sub'] += 1
  356. '<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/kiss_boot.jpg"></center>'
  357. 'You glance around seeing a few other students in the hallway, then you get down on your hands and knees in front of her. You bend over forward until your face is in front of her boot. You then kiss her boot, you can hear some murmers from others and a few laughs. She steps away from you and closes the door. "That''s a good little bitch, now you may leave." Once the door is closed you stand back up and walk off.'
  358. gs 'arousal', 'BDSM', 1, 'humiliation', 'sub'
  359. gs 'arousal', 'end'
  360. gs 'stat'
  361. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  362. end
  363. else
  364. 'You shake your head. "No thanks. Last time was entertaining, but I didn''t come to see that again."'
  365. 'She laughs loudly and roughly grabs your chin in her hand. "Your loss. I might have let you take a turn with him, or maybe not." She closes the door and you turn to leave.'
  366. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  367. end
  368. end
  369. gs 'arousal', 'end'
  370. gs 'stat'
  371. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  372. end
  373. end
  374. end
  375. else
  376. '<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big84.jpg"></center>'
  377. if kendraQW['sub'] < 0:
  378. 'You knock on the door, and after a few seconds, Kendra opens it. "I told you last time, I don''t have time for games and I''m tired of yours. Now get lost." She slams the door in your face.'
  379. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  380. else
  381. if kendraQW['sub'] >= 10:
  382. 'You knock on the door, and after a few seconds, Kendra opens it. "Well if it isn''t my new favorite white slave bitch. Come in." She stands aside to let you enter before closing the door behind you.'
  383. else
  384. 'You knock on the door, and after a few seconds, Kendra opens it. "So you came to worship your ebony mistress and learn how to become a proper white slave. Come in and let your lessons begin." She stands aside to let you enter before closing the door behind you.'
  385. end
  386. act 'Enter': gt 'kendra', 'kendra_room_start'
  387. end
  388. end
  389. else
  390. '<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/door.jpg"></center>'
  391. 'You can hear Kendra''s voice as you get close to the door. It''s fairly loud and sounds harsh in tone, but you can''t quite make out what she''s saying. You do hear a muffled reply that sounds male. It sounds like she''s busy right now, so you shouldn''t bother her.'
  392. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  393. end
  394. else
  395. minut += 5
  396. gs 'stat'
  397. '<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/door.jpg"></center>'
  398. 'You knock on the door, but no one answers. She must be asleep or not home.'
  399. act 'Leave':gt 'uni_dorm', 'eighth_floor'
  400. end
  401. end
  402. end
  403. end
  404. if $ARGS[0] = 'tenth_floor':
  405. killvar 'will_cost'
  406. $loc = 'uni_dorm'
  407. $loc_arg = 'tenth_floor'
  408. $menu_loc = 'uni_dorm'
  409. $menu_arg = 'tenth_floor'
  410. $locM = 'uni_dorm'
  411. $locM_arg = 'tenth_floor'
  412. menu_off = 0
  413. $location_type = 'public_indoors'
  414. killvar '$locclass'
  415. minut += 1
  416. gs 'stat'
  417. *clr & cla
  418. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_hall.jpg"></center>'
  419. if func('uniutil', 'student', 'enrolled'):
  420. 'Before you is the dorm hallway with it''s dilapidated walls leading to your dorm room. You can hear music and loud talking from drunk students escaping from some rooms.'
  421. else
  422. 'Before you is the usual dorm hallway with dilapidated walls. You can hear music and loud talking from drunk students escaping from some rooms.'
  423. end
  424. act 'Go outside':
  425. killvar 'university_dorm'
  426. minut += 6
  427. gt 'uni_grounds', 'main'
  428. end
  429. act 'Elevator': gt 'uni_dorm', 'elevator'
  430. if func('homes_properties', 'has_access', 'university_dorm'):
  431. gs 'courtletter'
  432. act 'Your room': gt 'uni_dorm', 'dorm_room'
  433. act 'Go to the shared kitchen': gt 'uni_dorm', 'dorm_kitchen'
  434. act 'Go to the shared shower': gt 'vann', 'start'
  435. end
  436. act 'Enter the women''s restroom': minut += 1 & gt 'uni_dorm', 'womens_restroom'
  437. gs 'willpower', 'exhib', 'self'
  438. if will_cost <= pcs_willpwr:
  439. act 'Enter the men''s restroom (<<will_cost>> Willpower)':
  440. gs 'willpower', 'exhib', 'self'
  441. gs 'willpower', 'pay', 'self'
  442. gs 'stat'
  443. gt 'uni_dorm', 'mens_restroom'
  444. end
  445. else
  446. act 'Enter the men''s restroom (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  447. end
  448. !! commented out until parties are added back in
  449. !! if (home_owned[11] = 1 or university['student'] = 1) and week = 5 and hour > 18 and hour < 23:
  450. !! 'You can hear music blasting in the corridor. It sounds like the Friday night party is in full swing.'
  451. !! act 'The party': minut += 1 & gt 'vecher', 'start'
  452. !! end
  453. end
  454. if $ARGS[0] = 'mens_restroom':
  455. $location_type = 'public_indoors'
  456. $menu_loc = 'uni_dorm'
  457. $menu_arg = 'mens_restroom'
  458. $locM = 'uni_dorm'
  459. $locM_arg = 'mens_restroom'
  460. menu_off = 0
  461. minut += 1
  462. gs 'stat'
  463. *clr & cla
  464. '<center><b><font color="maroon">Dormitory - Men''s Restroom</font></b></center>'
  465. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/restrooms/bathroom_mens.jpg"></center>'
  466. 'You peek around the corner. Inside this room, stalls line the right side, with urinals on the far wall and rows of sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a> to the left. The room has a smell of disinfectant and stale piss.'
  467. act 'Leave': gt 'uni_dorm', 'tenth_floor'
  468. dynamic $tampon
  469. dynamic $quickwash
  470. dynamic $basin
  471. end
  472. if $ARGS[0] = 'womens_restroom':
  473. $location_type = 'public_indoors'
  474. $menu_loc = 'uni_dorm'
  475. $menu_arg = 'womens_restroom'
  476. $locM = 'uni_dorm'
  477. $locM_arg = 'womens_restroom'
  478. menu_off = 0
  479. minut += 1
  480. gs 'stat'
  481. *clr & cla
  482. '<center><b><font color="maroon">Dormitory - Women''s Restroom</font></b></center>'
  483. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/restrooms/bathroom_womens.jpg"></center>'
  484. 'You peek around the corner. Inside this room, stalls line the right side and rows of sinks, with <a href="exec:gt ''mirror'', ''start''">mirrors</a> to the left. The room has a smell of disinfectant.'
  485. act 'Leave': gt 'uni_dorm', 'tenth_floor'
  486. dynamic $tampon
  487. dynamic $quickwash
  488. dynamic $basin
  489. end
  490. if $ARGS[0] = 'dorm_room':
  491. $sexloc = 'uni_dorm'
  492. CLOSE ALL
  493. $loc_arg = 'dorm_room'
  494. $loc = 'uni_dorm'
  495. $locM_arg = 'dorm_room'
  496. $locM = 'uni_dorm'
  497. $location_type = 'private'
  498. $menu_loc = 'uni_dorm'
  499. $menu_arg = 'dorm_room'
  500. menu_off = 0
  501. odkomp = 1
  502. gs 'themes', 'indoors'
  503. minut += 1
  504. gs 'stat'
  505. *clr & cla
  506. '<center><b>Your room</b></center>'
  507. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_room/room.jpg"></center>'
  508. 'This is the dorm room you share with Vika.'
  509. 'Your <a href="exec:gt ''bed'',''start''">bed</a> is positioned in one of the corners of the room. Your <a href="exec:gt ''stol'' ,''start''">desk</a> sits at the foot of it.'
  510. if $ml_guitar['location'] = $loc: 'Your guitar rests on its stand next to your bed.'
  511. if mc_inventory['mag_porn'] > 0:'You''ve hidden your porn magazines under the mattress of your bed.'
  512. if hour > 14 and hour < func('bordel', 'open_hour'):
  513. vika_inroom = 1
  514. vika_sleep = 0
  515. if npc_rel['A220'] >= 60 and birthday = day and birthmonth = month and vikaslut = 1 and b_vika_present_Day ! daystart:
  516. $vikatext = '<a href="exec:gt''Vika''">Vika</a> seems excited when she notices you. She is trying to hide a box behind her back.'
  517. else
  518. $vikatext = '<a href="exec:gt''Vika''">Vika</a> is lying on her bed.'
  519. end
  520. gs 'music_actions', 'not_alone'
  521. elseif hour > func('bordel', 'close_hour') and hour < 8:
  522. vika_inroom = 1
  523. vika_sleep = 1
  524. if vikaslut = 0:
  525. $vikatext = '<a href="exec:gt''Vika''">Vika</a> is sleeping in her bed after being out the whole night.'
  526. elseif vikaslut = 1:
  527. $vikatext = '<a href="exec:gt''Vika''">Vika</a> is sleeping in her bed after working hard in the brothel all night.'
  528. end
  529. gs 'music_actions', 'no_music'
  530. end
  531. if mc_inventory['tech_computer'] = 1:
  532. !! It is possible to say that the university Wifi filters out porn and webcam sites, in which case will need to allow the player to choose mobile net to watch porn or do webcam shows
  533. gs 'internet_mobile', 'get_access', 'free'
  534. !!TODO: This is for now until we decide how to handle these two with different scenarios
  535. !! 1. Sveta knows Vika is a slut but still keeps the pristine facade
  536. !! 2. Sveta is working in the brothel too
  537. !! 3. Sveta knows Vika works in the brothel and Vika knows Sveta is just as big a slut as she is.
  538. if vika_inroom = 1:
  539. acces['noporn'] = 1
  540. access['nocamshow'] = 1
  541. $access['noporn'] = 'You shouldn''t watch porn with Vika in the room!'
  542. $access['nocamshow'] ='You can''t do any webcam shows with Vika in the room!'
  543. end
  544. 'Your <a href="exec:gt ''Komp'',''start''">computer</a> sits on your desk.'
  545. end
  546. 'To the left of the entrance is an old <a href="exec:gt ''wardrobe'', ''start''">wardrobe</a>.'
  547. 'There''s a <a href="exec:gt ''mirror'',''start''">mirror</a> hanging on the wall.'
  548. if mc_inventory['contraceptive_pill'] > 0 and mc_inventory['equipped_condoms'] + mc_inventory['normal_condoms'] + mc_inventory['sabotaged_condoms'] > 0:
  549. 'Your <a href="exec:gt ''stol'', ''bc''">birth control</a> is hidden in one of your desk drawers, as are your <a href="exec:gt ''stol'', ''bc''">condoms</a>.'
  550. elseif mc_inventory['contraceptive_pill'] > 0:
  551. 'Your <a href="exec:gt ''stol'', ''bc''">birth control</a> is hidden in one of your desk drawers.'
  552. elseif mc_inventory['equipped_condoms'] + mc_inventory['normal_condoms'] + mc_inventory['sabotaged_condoms'] > 0:
  553. 'Your <a href="exec:gt ''stol'', ''bc''">condoms</a> are hidden in one of your desk drawers.'
  554. end
  555. *nl
  556. 'Your <a href="exec:gt ''alarmclock'', ''start''">alarm clock</a> is set to <<func(''alarmclock'', ''alarm_display'', alarmVars[''timerH''], alarmVars[''timerM''])>> during the week and <<func(''alarmclock'', ''alarm_display'', alarmVars[''timerEndH''], alarmVars[''timerEndM''])>> during the weekend. It is currently turned ' + iif(alarmVars['alarmOn'] = 0, '<a href="exec: alarmVars[''alarmOn''] = 1 & gt $loc, $loc_arg">OFF</a>.', '<a href="exec: alarmVars[''alarmOn''] = 0 & gt $loc, $loc_arg">ON</a>.')
  557. *nl
  558. gs 'exercise', 'start'
  559. '<<$vikatext>>'
  560. killvar '$vikatext'
  561. act 'Walk out to the corridor':
  562. if $clothingworntype ! 'nude':
  563. odkomp = 0
  564. gt 'uni_dorm', 'tenth_floor'
  565. else
  566. msg'<b><font color = red>You need to get dressed first.</font></b>'
  567. gt 'uni_dorm', 'dorm_room'
  568. end
  569. end
  570. act 'Leave the campus':
  571. if $clothingworntype ! 'nude':
  572. minut += 15
  573. odkomp = 0
  574. gt 'city_island'
  575. else
  576. msg'<b><font color = red>You need to get dressed first.</font></b>'
  577. gt 'uni_dorm', 'dorm_room'
  578. end
  579. end
  580. act 'Relax on your bed': gt 'bed', 'start'
  581. dynamic $wearpan
  582. dynamic $removepan
  583. gs 'prostitution_functions', 'prostitute_outfit_at_home'
  584. if func('homes_properties', 'is_current_home') ! -1:
  585. act 'Set this dorm room as your main home':gs 'homes_properties', 'set_home' & gt 'uni_dorm', 'dorm_room'
  586. end
  587. if $home['current'] = 'university_dorm': gs 'music_actions', 'music_icon'
  588. end
  589. if $args[0] = 'dorm_kitchen':
  590. $loc_arg = 'dorm_kitchen'
  591. $loc = 'uni_dorm'
  592. $location_type = 'private'
  593. $locclass = 'kitr'
  594. $menu_loc = 'uni_dorm'
  595. $menu_arg = 'dorm_kitchen'
  596. menu_off = 0
  597. food_loc = 0
  598. minut += 1
  599. gs 'kit_din'
  600. gs 'stat'
  601. *clr & cla
  602. '<center><b>Dorm Kitchen</b></center>'
  603. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_kitchen.jpg"></center>'
  604. 'The large shared kitchen for this floor. It is fairly tidy, with a lot of cabinets along two of the walls. Two ovens and two refrigerators, as well as several tables with chairs around them, are scattered around the room.'
  605. act 'Return to the corridor': gt 'uni_dorm', 'tenth_floor'
  606. if mc_inventory['food_basic'] > 0:
  607. if edahot = 0:
  608. $edagot = '<a href="exec:dynamic $edagotd">Cook a meal</a>'
  609. else
  610. $edagot = ''
  611. end
  612. 'Your shelf in the refrigerator holds enough food for <b><<mc_inventory[''food_basic'']>></b> ' + iif(mc_inventory['food_basic'] = 1, 'serving', 'servings') + '. <<$edagot>>'
  613. else
  614. '<b><font color="red">Your shelf in the refrigerator is bare. There is nothing left for you to eat.</font></b>'
  615. end
  616. if edahot > 0:'<a href="exec:dynamic $edahotd">There''s a warm meal on the table.</a>'
  617. dynamic $edasnack
  618. dynamic $sandwich
  619. dynamic $driwater
  620. dynamic $dritea
  621. dynamic $fill_bottle
  622. dynamic $edaD
  623. dynamic $pranik
  624. dynamic $fatdel
  625. dynamic $lekarstvo
  626. dynamic $vitamin
  627. end
  628. --- uni_dorm ---------------------------------