univer.qsrc 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336
  1. # univer
  2. if $ARGS[0] = 'start':
  3. $sexloc = 'univer'
  4. $location_type = 'public_indoors'
  5. cla & *clr
  6. minut += 5
  7. $menu_loc = 'univer'
  8. $menu_arg = 'start'
  9. menu_off = 0
  10. gs 'stat'
  11. gs 'themes', 'indoors'
  12. '<center><b><font color="maroon">The University</font></b></center>'
  13. '<center><img <<$set_imgh>> src="images/locations/city/island/university/univer.jpg"></center>'
  14. 'University lectures begin at <b>'+func('uniutil', 'lecture', 'start_hour')+':00</b>. Students aren''t allowed to attend if late.'
  15. func('uniutil', 'semester', 'print_all_months')
  16. if func('uniutil', 'diploma', 'obtained'):
  17. 'You have graduated from the University.'
  18. elseif func('uniutil', 'student', 'expelled_for_failing'):
  19. 'You have been expelled from the University for failing your exams.'
  20. elseif func('uniutil', 'student', 'expelled_for_skipping'):
  21. 'You have been expelled from the University for skipping your exams.'
  22. elseif func('uniutil', 'student', 'expelled_for_other_reason'):
  23. 'You have been expelled from the University for reasons unrelated to your exam results.'
  24. elseif func('uniutil', 'student', 'enrolled'):
  25. if func('uniutil', 'passed_semesters', 'get') = func('uniutil', 'student', 'semesters_to_graduate'):
  26. gs 'uniutil', 'student', 'graduate'
  27. 'Congratulations, you''ve earned your degree!'
  28. elseif func('uniutil', 'semester_result', 'is_failed'):
  29. gs 'uniutil', 'student', 'expel'
  30. 'You got expelled from the University.'
  31. else
  32. 'You are enrolled at the University.'
  33. end
  34. else
  35. if func('uniutil', 'prepclass', 'is_enrolled'):
  36. 'You''ve enrolled in the preparatory classes.'
  37. else
  38. 'You can take preparatory classes at the University on weekdays for '+func('uniutil', 'prepclass', 'cost')+' <b>₽</b>.'
  39. end
  40. 'Admission examinations for the University are held in <b>'+func('uniutil', 'entrance_exam', 'print_month')+'</b>.'
  41. end
  42. act 'Leave':
  43. cla
  44. minut += 5
  45. gt 'city_island'
  46. end
  47. if func('uniutil', 'eligible_for_university'):
  48. if func('uniutil', 'prepclass', 'offered_this_month'):
  49. if func('uniutil', 'prepclass', 'is_enrolled'):
  50. if func('uniutil', 'prepclass', 'in_session'):
  51. act 'Attend preparatory class (1:00)':
  52. cla
  53. *clr
  54. minut += 60
  55. gs 'uniutil', 'prepclass', 'update_count'
  56. intel_exp += 1 + (mentats_dose - rand(0,mentats_dose))
  57. '<center><img <<$set_imgh>> src="images/locations/city/island/university/classroom.jpg"></center>'
  58. 'You attend the preparatory class for an hour. You pay close attention to what is being said and take notes for the entrance examination later on.'
  59. act 'Leave class':gt 'univer', 'start'
  60. end
  61. end
  62. else
  63. if money >= func('uniutil', 'prepclass', 'cost'):
  64. act 'Pay for the preparatory classes ('+func('uniutil', 'prepclass', 'cost')+' <b>₽</b>)':
  65. cla
  66. minut += 5
  67. menu_off = 1
  68. gs 'uniutil', 'prepclass', 'enroll'
  69. 'You paid '+func('uniutil', 'prepclass', 'cost')+' <b>₽</b> for the preparatory classes. They are held every weekday until <b>'+func('uniutil', 'prepclass', 'closing_hour')+':00</b>.'
  70. act 'Move away':gt 'univer', 'start'
  71. end
  72. end
  73. end
  74. end
  75. if func('uniutil', 'entrance_exam', 'offered_today'):
  76. 'You can try to take an entrance exam.'
  77. act 'Take the entrance exam (1:00)':
  78. cla
  79. *clr
  80. minut += 60
  81. '<center><img <<$set_imgh>> src="images/locations/city/island/university/classroom.jpg"></center>'
  82. if func('uniutil', 'entrance_exam', 'is_passed'):
  83. gs 'uniutil', 'student', 'enroll'
  84. 'You have successfully passed the entrance exam and can attend the University in '+func('uniutil', 'lecture', 'print_start_month', func('uniutil', 'semester', 'get'))+'.'
  85. else
  86. 'You have failed the entrance exam. You need to study harder...'
  87. end
  88. act 'Leave class':gt 'univer', 'start'
  89. end
  90. end
  91. end
  92. if func('uniutil', 'student', 'enrolled'):
  93. if func('uniutil', 'lecture', 'offered_today'):
  94. act 'Visit the Dean':
  95. cla
  96. gt 'univer', 'deans_office'
  97. end
  98. elseif func('uniutil', 'exam', 'offered_today'):
  99. act 'Take the exam':gt 'univer', 'exam_room'
  100. end
  101. end
  102. end
  103. if $ARGS[0] = 'deans_office':
  104. $sexloc = 'univer'
  105. cla & *clr
  106. minut += 5
  107. gs 'stat'
  108. '<center><b><font color="maroon">Dean</font></b></center>'
  109. '<center><img <<$set_imgh>> src="images/locations/city/island/university/dekanat.jpg"></center>'
  110. 'You are enrolled at the University for semester '+func('uniutil', 'semester', 'get')+'.'
  111. 'At the end of your semester, you must pass your exams. Attending lectures will help you prepare.'
  112. 'You must also complete at least '+func('uniutil', 'assignments_done', 'min_num')+' assignment'+iif(func('uniutil', 'assignments_done', 'min_num') = 1, '', 's')+', though it is positively looked upon if you manage to complete more.'
  113. 'You''ve complete '+func('uniutil', 'assignments_done', 'get')+' assignment'+iif(func('uniutil', 'assignments_done', 'get') = 1, '', 's')+' so far.'
  114. if func('uniutil', 'scholarship', 'is_active'):
  115. 'You are receiving a scholarship of '+func('uniutil', 'scholarship', 'get')+' <b>₽</b> per month from the University this semester because of how you did in the previous one.'
  116. else
  117. 'The University is known to award scholarships to students with exceptional performance.'
  118. end
  119. act 'Leave the Dean''s office':gt 'univer', 'start'
  120. if func('uniutil', 'lecture', 'in_session') and func('uniutil', 'student', 'enrolled'):
  121. act 'Attend the lecture ('+func('uniutil', 'lecture', 'length')+':00)':
  122. cla
  123. *clr
  124. hour = func('uniutil', 'lecture', 'start_hour') + func('uniutil', 'lecture', 'length')
  125. minut = 0
  126. gs 'uniutil', 'attendance', 'update'
  127. intel_exp += 1 + (mentats_dose - rand(0,mentats_dose))
  128. menu_off = 1
  129. gs 'stat'
  130. '<center><img <<$set_imgh>> src="images/locations/city/island/university/classroom1.jpg"></center>'
  131. 'You attend the lecture, taking notes as the professor calmly goes through the course material.'
  132. zanrand = rand(0, 9)
  133. if zanrand = 0:
  134. minut += 60
  135. 'During the lecture, professor Krupin asks you a question that you do not have the answer for. You let him know, and he asks that you stay behind after class so he can help you.'
  136. !!expanded this scene a lot, check code.
  137. act 'Stay after class':
  138. cla
  139. *clr
  140. gs 'stat'
  141. '<center><img <<$set_imgh>> src="images/locations/city/island/university/krupin.jpg"></center>'
  142. 'The professor patiently explains some of the material he went through in class in an effort to help you better understand so you don''t fall too far behind.'
  143. act 'Leave':gt 'univer', 'deans_office'
  144. act 'Seduce':
  145. cla
  146. *clr
  147. gs 'npcgeneratec', 0, 'professor Krupin', 51
  148. dick = 15
  149. $dick_girth = 'well proportioned'
  150. gs 'boyStat', $npclastgenerated
  151. '<center><img <<$set_imgh>> src="images/locations/city/island/university/sex/gradepay.jpg"></center>'
  152. 'Feeling pressured, you move over to his desk and take a seat on it, making sure he has a good view of your legs and short skirt. You grab his scarf and slide it back and forth across his neck as you open your legs, giving him a glimpse up your skirt. "This is all so "hard" to understand" you say, "but maybe if I do you a favor, you can repay me by giving me a passing grade." You don''t have a lot of time to be subtle as you need to make sure you''re going to pass the class before you leave.'
  153. 'For a moment, he seems unsure. "Well what do you have in mind?" he asks as he looks around the classroom.'
  154. 'You bite your lower lip seductively, knowing you have him trapped. You pull him by his scarf till he is standing, while you get on all fours. You look up at him, "let me show you, professor Krupin."'
  155. gs 'arousal', 'foreplay', 5
  156. gs 'stat'
  157. act 'Give him a blow job':
  158. cla
  159. *clr
  160. '<center><img <<$set_imgh>> src="images/locations/city/island/university/sex/gradepay1.jpg"></center>'
  161. 'You undo his belt and pants, letting them drop down to his knees. You start stroking his cock, and it doesn''t take long before it''s grown hard in your hand. You lick up and down along the shaft, then wrap your lips around his cock and start bobbing your head up and down while stroking it with your hand.'
  162. 'He reaches over you and pulls up your skirt, pulling aside your panties. He rubs your pussy till he gets it wet, and then he slips his fingers inside and starts finger fucking you, causing you to moan in pleasure.'
  163. gs 'arousal', 'vaginal_finger', 10
  164. gs 'arousal', 'bj', 10
  165. minut -= 10
  166. gs 'stat'
  167. act 'A for sure':
  168. cla
  169. *clr
  170. gs 'cum_call', 'face', $boy, 1, '', '', 20
  171. gs 'cum_call', 'breasts', $boy, 1, '', '', 20
  172. gs 'arousal', 'end'
  173. '<center><img <<$set_imgh>> src="images/locations/city/island/university/sex/gradepay2.jpg"></center>'
  174. 'Either your mouth or hand is constantly pleasuring his cock, often both at once. He begins pulling off your clothes, and you offer no resistance. Once you are completely naked and back in place he goes back to fingering your pussy.'
  175. 'You know he is yearning to fuck you, but you want to save that in case you start doing even worse in class and need to raise your grades again, so you intensify your efforts sucking him off and start deep throating him while fondling his balls.'
  176. 'He starts groaning, as he''s on the edge but trying to hold back. Suddenly he says, "I''m about to cum. I want to cum all over your face." At those words, you let go of his cock and start stroking him with your hand. Soon he is spurting loads of sperm all over you, splattering your face and perky breasts. Once he finishes, you sit up to give him a perfect view of your naked body covered in his cum. You grin at him. "So about my grades..."'
  177. 'He collapses back in his chair and nods his head, "yes yes, don’’t worry you did well this time, you little minx." With a final smile and wink, you gather your stuff and get dressed and head out of classroom.'
  178. gs 'arousal', 'hj', 5
  179. gs 'arousal', 'bj', 5, 'deepthroat'
  180. gs 'stat'
  181. minut -= 5
  182. act 'Leave':gt 'univer', 'deans_office'
  183. end
  184. end
  185. end
  186. end
  187. !!end of first scene expansion
  188. elseif zanrand = 1:
  189. minut += 60
  190. 'During the lecture, professor Krupin asks you a question that you do not have the answer for. You let him know, and you hear a girl smirk behind you. Without any hesitation, the professor calls her out and tells her to speak with him after class. He also asks you to stay behind so he can help you.'
  191. act 'Stay after class':
  192. cla
  193. *clr
  194. gs 'stat'
  195. '<center><img <<$set_imgh>> src="images/locations/city/island/university/krupin.jpg"></center>'
  196. 'The professor patiently explains some of the material he went through in class to you in an effort to help you better understand so you don''t fall too far behind. He tells the other girl that it''s not polite to do what she did in class and she needs to properly behave.'
  197. act 'Leave':gt 'univer', 'deans_office'
  198. !!expanding scene two. check code.
  199. act 'Seduce':
  200. cla
  201. *clr
  202. gs 'npcgeneratec', 0, 'professor Krupin', 51
  203. dick = 15
  204. $dick_girth = 'well proportioned'
  205. gs 'boyStat', $npclastgenerated
  206. '<center><img <<$set_imgh>> src="images/locations/city/island/university/sex/gradepay.jpg"></center>'
  207. 'Feeling pressured, you move over to his desk and take a seat on it, making sure he has a good view of your legs and short skirt. You grab his scarf and slide it back and forth across his neck as you open your legs, giving him a glimpse up your skirt. "This is all so "hard" to understand" you say, "but maybe if I do you a favor, you can repay me by giving me a passing grade." You don''t have a lot of time to be subtle as you need to make sure you''re going to pass the class before you leave.'
  208. 'For a moment he seems unsure. "You should stop that..." he says, glancing at the other girl, but you can tell he doesn''t mean it.'
  209. 'You bite your lower lip seductively, knowing you have him trapped. You pull him by his scarf till he is standing, while you get on all fours. You look up at him, "let me show you what I mean, professor Krupin."'
  210. 'The other girl''s eyes almost pop out as she realizes what you are trying to do. She looks at the professor and then the exit, unsure how to respond.'
  211. gs 'arousal', 'foreplay', 5
  212. gs 'stat'
  213. act 'Give him a blow job':
  214. cla
  215. *clr
  216. gs 'arousal', 'bj', 10
  217. gs 'stat'
  218. '<center><img <<$set_imgh>> src="images/locations/city/island/university/sex/2forone.jpg"></center>'
  219. 'You undo his belt and pants, letting them drop down to his knees. You start stroking his cock, and it doesn''t take long before it''s grown hard in your hand. You lick up and down along the shaft, then wrap your lips around his cock and start bobbing your head up and down while stroking it with your hand.'
  220. 'The other girl stands off to the side with her mouth open while you do this, her face showing a combination of shock and arousal. The arousal wins out in the end however. Turned on, she kneels down beside you, giving you a little smile, and joins in on the action.'
  221. act 'Share':
  222. cla
  223. *clr
  224. '<center><img <<$set_imgh>> src="images/locations/city/island/university/sex/2forone1.jpg"></center>'
  225. 'With her kneeling beside you, you continue to suck on the professors cock for a bit and then pass it over to her. She eagerly locks her lips around it and slowly starts bobbing her head up and down. She seems really good at this, and it dawns on you that if you don''t match her, she might be the only one professor Krupin gives a free pass! Well you can''t have that, so you start sucking his balls as she continues sucking his cock.'
  226. gs 'arousal', 'bj', 5, 'group'
  227. gs 'stat'
  228. act 'A for sure':
  229. cla
  230. *clr
  231. gs 'cum_call', 'mouth', $boy, 1, '', '', 20
  232. '<center><img <<$set_imgh>> src="images/locations/city/island/university/sex/2forone2.jpg"></center>'
  233. 'The two of you trade back and forth, taking turns sucking your professor''s cock, each trying to outdo the other. Under this relentless tag team competition, he''s unable to last for long.'
  234. 'He starts groaning, as he''s on the edge but trying to hold back. Suddenly he says, "I''m about to cum. I''m going to cum in your mouth and then the two of you share it as you please." The other girl happens to have him in her mouth, and she dutifully sucks his cock until he finishes. Once he''s done, she removes her mouth, and you lick his cock clean.'
  235. 'You then turn to her and french kiss her, the two of you swapping cum in each other''s mouths. As professor Krupin collapses back into his chair, you stop kissing and swallow the remains of the sperm you ended up with. You turn to him, grinning, "so about my grades..." "And my behavior..." the other girl chimes in.'
  236. 'He peacefully observes the two of you and waves his hand absently at the question, "yes yes, I will make sure you get a passing grade, while you''re let off the hook, missy." The two of you smile at each other, then straighten your clothes up and give the professor a last little smile as you leave the classroom.'
  237. gs 'arousal', 'bj', 10, 'group'
  238. gs 'arousal', 'kiss', 10, 'lesbian'
  239. minut -= 10
  240. gs 'arousal', 'end'
  241. gs 'stat'
  242. act 'Leave':gt 'univer', 'deans_office'
  243. end
  244. end
  245. end
  246. end
  247. end
  248. else
  249. act 'Leave':gt 'univer', 'deans_office'
  250. end
  251. end
  252. end
  253. !!end of second scene expansion.
  254. if func('uniutil', 'assignment_progress', 'is_finished'):
  255. act 'Hand in your assignment':
  256. cla
  257. *clr
  258. intel_exp += 1 + (mentats_dose - rand(0,mentats_dose))
  259. gs 'uniutil', 'assignments_done', 'update'
  260. '<center><img <<$set_imgh>> src="images/locations/city/island/university/classroom1.jpg"></center>'
  261. 'You hand in your completed assignment.'
  262. act 'Leave the lecture hall':gt 'univer', 'deans_office'
  263. end
  264. end
  265. end
  266. if $ARGS[0] = 'exam_room':
  267. cla
  268. clr
  269. *clr
  270. minut += 60
  271. gs 'stat'
  272. '<center><b><font color="maroon">Exam</font></b></center>'
  273. '<center><img <<$set_imgh>> src="images/locations/city/island/university/examen.jpg"></center>'
  274. if func('uniutil', 'attendance', 'is_great') and func('uniutil', 'assignments_done', 'did_min_num'):
  275. gs 'uniutil', 'exam_outcome', 'passed_honors'
  276. 'You completed all your examinations, passing them with honors, and on top of that, you had outstanding attendance.'
  277. elseif pcs_intel >= 100 and func('uniutil', 'attendance', 'is_bad') and func('uniutil', 'assignments_done', 'did_great_num'):
  278. gs 'uniutil', 'exam_outcome', 'passed_honors'
  279. 'Despite missing a lot of classes, you still managed to complete all the assignments and somehow still managed to pass with honors.'
  280. elseif pcs_intel >= 100 and func('uniutil', 'attendance', 'is_ok') and func('uniutil', 'assignments_done', 'did_min_num'):
  281. gs 'uniutil', 'exam_outcome', 'passed_honors'
  282. 'You completed all your examinations, passing them with honors.'
  283. elseif (pcs_intel >= 80 or func('uniutil', 'attendance', 'is_ok')) and func('uniutil', 'assignments_done', 'did_min_num'):
  284. gs 'uniutil', 'exam_outcome', 'passed'
  285. 'You completed all your assignments and passed the exam.'
  286. else
  287. gs 'uniutil', 'exam_outcome', 'failed'
  288. 'You failed to pass the exam.'
  289. end
  290. if func('uniutil', 'scholarship', 'is_active'):
  291. 'Based on your results, you will receive a scholarship of '+func('uniutil', 'scholarship', 'get')+' <b>₽</b> per month next semester.'
  292. end
  293. act 'Leave the exam room':gt 'univer', 'start'
  294. end
  295. --- univer ---------------------------------