kuhrPar.qsrc 13 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233
  1. # kuhrPar
  2. !! Date refactored: 31st March, 2024
  3. !! Author: Myles
  4. !!
  5. !! Version: .01 - initial refactoring
  6. !!
  7. !! Desc: Family home kitchen links to family flat corridor
  8. !! Start location initialisation
  9. !! Set location header - img path is set in init
  10. $setloc['StageTitle'] = 'Parents Kitchen'
  11. $setloc['StageImage'] = '<<$default_img_path>>/kuhrpar.jpg'
  12. !! Set location vars:
  13. !! Call in kitchen library:
  14. gs 'kit_din'
  15. !! Set up game location data
  16. gs 'shortgs', 'setloc', 'kuhrpar', $ARGS[0]
  17. !! End location initialisation
  18. !! Call in location default actions
  19. gs 'home_family_init', 'init'
  20. !! Begin location content
  21. if fullmorrout = 1:
  22. minut += 2
  23. act '<font color = maroon><b>Leave the apartment and go outside</b></font>':
  24. minut += 1
  25. killvar 'fullmorrout'
  26. gs 'korrPar'
  27. gt'pav_residential'
  28. end
  29. end
  30. act 'Return to the hallway':
  31. killvar 'fullmorrout'
  32. minut += 1
  33. gt 'korrPar'
  34. end
  35. if func('homes_properties', 'can_live_here'):
  36. if locat['Mother'] = 4:
  37. if locat['Mom_kitchen_action'] = 1:
  38. 'You <<$npc_nickname[''A29'']>> is here, busy making breakfast.'
  39. elseif locat['Mom_kitchen_action'] = 2:
  40. npc_rel['A29'] += 1
  41. cla & *clr
  42. minut += 5
  43. gs'stat'
  44. '<center><img <<$set_imgh>> src="<<$mother_img_path>>gotovka.jpg"></center>'
  45. 'Your <<$npc_nickname[''A29'']>> turns to you. "<<$pcs_nickname>>, please set the table for breakfast." You sigh and grab the dishes.'
  46. act 'Set the table for breakfast': gt 'kuhrPar'
  47. exit
  48. elseif locat['Mom_kitchen_action'] = 4:
  49. $mombreak = ''
  50. 'Your <a href="exec:gt''mother''"><<$npc_nickname[''A29'']>></a> is here clearing away the breakfast dishes.'
  51. else
  52. $mombreak = ', <a href="exec:gt''mother''">mother</a>'
  53. end
  54. end
  55. if ((hour = 6 and minut >= 45) or (hour = 7 and minut <= 15)) and week < 6 and locat['Fam_inGad'] = 0:
  56. '<a href="exec:gt''father''">Your stepfather</a><<$mombreak>>, <a href="exec:gt ''sister_chat'', ''talking''">Anya</a> and <a href="exec:gt ''brother'', ''start''">Kolka</a> are sitting at the table eating breakfast. You could sit down and join them for breakfast or just grab something and go.'
  57. elseif ((hour = 6 and minut >= 45) or (hour = 7 and minut <= 15)) and week > 5 and locat['Fam_inGad'] = 0:
  58. '<a href="exec:gt''father''">Your stepfather</a><<$mombreak>>, and <a href="exec:gt ''brother'', ''start''">Kolka</a> are sitting at the table eating breakfast. It seems your sister is sleeping in again. You could sit down and join them for breakfast or just grab something and go.'
  59. elseif hour = 18 and minut <= 30 and locat['Fam_inGad'] = 0 and locat['Anya'] = 12:
  60. '<a href="exec:gt''father''">Your stepfather</a>, <a href="exec:gt''mother''"><<$npc_nickname[''A29'']>></a>, <a href="exec:gt ''sister_chat'', ''talking''">Anya</a> and <a href="exec:gt ''brother'', ''start''">Kolka</a> are sitting at the table eating dinner. You could sit down and join them for dinner or just grab something and go.'
  61. elseif hour = 18 and minut <= 30 and locat['Fam_inGad'] = 0:
  62. '<a href="exec:gt''father''">Your stepfather</a>, <a href="exec:gt''mother''"><<$npc_nickname[''A29'']>></a> and <a href="exec:gt ''brother'', ''start''">Kolka</a> are sitting at the table eating dinner. You could sit down and join them for dinner or just grab something and go.'
  63. else
  64. 'The kitchen is not very impressive, but it has everything your family needs. Since everyone can''t always join for family meals, your <<$npc_nickname[''A29'']>> usually pre-cooks some meals and stores them in the fridge. Of course, you could also just have a snack if you''re not that hungry.'
  65. end
  66. end
  67. if locat['Mother'] = 11: 'Your <a href="exec:gt''mother''"><<$npc_nickname[''A29'']>></a> is here making diner.'
  68. if locat['Mother'] = 13 and locat['Anya'] = 23:
  69. 'Your <a href="exec:gt''mother''"><<$npc_nickname[''A29'']>></a> is here cleaning up after dinner with <a href="exec:gt ''sister_chat'', ''talking''">Anya</a> helping her. '
  70. elseif locat['Mother'] = 13:
  71. 'Your <a href="exec:gt''mother''"><<$npc_nickname[''A29'']>></a> is here cleaning up after dinner.'
  72. end
  73. if locat['Mother'] = 23: 'Your <a href="exec:gt''mother''"><<$npc_nickname[''A29'']>></a> is here cleaning.'
  74. !! Clean up of code to ensure stepdad doesn''t warp you to the living room
  75. killvar 'kit_dad'
  76. if locat['Stepdad'] = 4: '<a href="exec:gt''father'',''kit''">Your stepfather</a> is here reading the paper.'
  77. if locat['Stepdad'] = 7: '<a href="exec:gt''father'',''kit''">Your stepfather</a> is here setting the table for dinner.'
  78. if week = 6 and locat['Fam_set_month_inGad'] = 1 and grandmaQW['block'] = 0 and hour > 9 and hour < 12 and func('homes_properties', 'can_live_here'):'Your parents are getting ready to go to <a href="exec:gt ''gadhouse'', ''to_gadukino''">Gadukino</a> to visit your great grandparents. You can go with them if you want, or stay home like Anya usually does.'
  79. if func('homes_properties', 'can_live_here'):
  80. if ((hour = 6 and minut >= 45) or (hour = 7 and minut < 15)) and breakfast_day ! daystart and locat['Fam_inGad'] = 0:
  81. if cumloc[11] = 1 or cumloc[6] = 1 or cumloc[7] = 1:
  82. act 'Eat breakfast with your family':
  83. *clr & cla
  84. gs 'stat'
  85. '<center><img <<$set_imgh>> src="<<$mother_img_path>>prost6.jpg"></center>'
  86. 'Your <<$npc_nickname[''A29'']>> catches you just before you sit down.'
  87. 'Your Mum glares at you and you realize you haven''t washed the cum stains off which makes you feel terrible.'
  88. '"I''m so ashamed of you! Go and clean it off now! Get out of my sight you whore!"'
  89. 'Knowing there is nothing you can say to make it better right now, you simply mumble an apology and leave quickly and head to the bathroom.'
  90. act 'Go to bathroom': gt 'vanrPar'
  91. end
  92. elseif PCloswimwear ! 1 and $clothingworntype ! 'nude':
  93. act 'Eat breakfast with your family (0:20)':
  94. *clr & cla
  95. gs 'food', 'family_meals', 'breakfast'
  96. npc_rel['A29'] += 1
  97. breakfast_day = daystart
  98. gs 'stat'
  99. '<center><img <<$set_imgh>> src="<<$default_img_path>>/breakfasthome.jpg"></center>'
  100. 'As you sit down and join your family for breakfast, your stepfather engages you in conversation. "How are you doing in school <<$pcs_nickname>>?"'
  101. if kanikuli = 0 and mid($start_type,1,2) = 'sg' and $home['current'] = 'parents_home' and SchoolBlock = 0:
  102. if class['school_grade_average'] >= 80:
  103. 'You smile at him. "Really great. We were just learning something interesting the other day." You go on to talk about some of the stuff you have learned recently in school. He just nods, while your mother gives you a proud smile and Kolka rolls his eyes.'
  104. 'The rest of breakfast is taken up with some small talk about what everyone has been up to of late. You thoroughly enjoy your breakfast with your family.'
  105. else
  106. 'You glance at him. "Um okay, I guess..." You notice your mother frowning at you, so you quickly try to change the subject, but they won''t let you. You do your best to make them think you''re doing better than you are, but they don''t buy it. Kolka snickers at you getting grilled.'
  107. 'The rest of breakfast is taken up talking about how Kolka is doing in school. He seems to be doing better than you and is showered with praise from your mother and stepfather. The food is good, even if the conversation wasn''t the best. You quickly finish your meal.'
  108. end
  109. else
  110. if kanikuli ! 0:
  111. 'You smile at him. "I''m enjoying some time away from school hanging out with my friends. It''s nice to just relax for a change."'
  112. 'Your mother speaks up. "It wouldn''t hurt to study your school books and get ahead of your courses to get better grades." You roll your eyes, but before you can respond, your stepfather lays his hand on your mother''s. "Let her enjoy herself. This is her last year before she goes to university after all." he says with a little emphasis. You just sigh and nod as you both know that is what your mother wants.'
  113. else
  114. 'Vladamir looks over at you. "So have you found a cute boy that is head over heels in love with you, wanting to take you out on dates and buy you stuff yet?" he says in a slightly teasing tone and your mother smacks his arm. "She''s too young for that! She needs to focus on school."'
  115. 'You are about to answer, but Kolka chimes in. "Like any boy would want to be seen with her!" This earns him a playful punch on the arm from you and before long, you are all bantering at the table.'
  116. end
  117. end
  118. act 'Get up from the table': gt $loc, $loc_arg
  119. end
  120. else
  121. act 'Eat breakfast with your family':
  122. *clr & cla
  123. gs 'stat'
  124. '<center><img <<$set_imgh>> src="<<$default_img_path>>/breakfasthome.jpg"></center>'
  125. 'Everyone stares at you as you sit down for breakfast. "What?" you exclaim.'
  126. *nl
  127. 'Your mother stands up from her seat, nearly knocking her chair over in the process. "What on God''s earth are you doing <<$pcs_nickname>>?! Have you have no shame? Get dressed immediately young lady!"'
  128. act 'Leave':
  129. killvar 'fullmorrout'
  130. gt 'korrPar'
  131. end
  132. end
  133. end
  134. elseif hour = 18 and minut <= 30 and dinner_day ! daystart and locat['Fam_inGad'] = 0:
  135. if PCloswimwear ! 1 and $clothingworntype ! 'nude':
  136. act 'Eat dinner with your family (0:20)':
  137. *clr & cla
  138. gs 'food', 'family_meals', 'dinner'
  139. npc_rel['A29'] += 1
  140. dinner_day = daystart
  141. gs 'stat'
  142. '<center><img <<$set_imgh>> src="images/<<$default_img_path>>/dinnerhome.jpg"></center>'
  143. 'You sit down and join your family for dinner and your stepfather starts teasing you. "So, do you have a boyfriend yet <<$pcs_nickname>>?"'
  144. if fame['pav_slut'] > 150 and motherKnowSpravka = 0:
  145. 'You''re about to respond when your mother interrupts you. "Of course not! She''s still too young to be thinking about boys!"'
  146. 'Kolka then chimes in. "Like any boy would date her when she sucks them all off anyways."'
  147. 'Your mother turns towards Kolka. "That''s not funny! Apologize to your sister right now! Right now!"'
  148. if locat['Anya'] = 12:
  149. 'Anya smirks as Kolka freezes in place and decides he doesn''t want to be the one to tell her about your reputation and just apologizes to you.'
  150. else
  151. 'Kolka freezes in place and decides he doesn''t want to be the one to tell her about your reputation and just apologizes to you.'
  152. end
  153. 'Your stepfather clears his throat and quickly changes the subject, talking about how his work went. After that, you have a fairly enjoyable dinner.'
  154. elseif fame['pav_slut'] > 150:
  155. 'You''re about to respond when your mother interrupts you. "She''s too young to worry about that and... we talked about it." She gives you a meaningful glance and you shut your mouth.'
  156. 'Kolka then chimes in. "Like any boy would date her when she sucks them all off anyways."'
  157. 'Your mother turns towards Kolka. "That''s not funny!" She then glances at you. "She might have made some mistakes, but she''s trying to be a better girl now. Now apologize to your sister right now!"'
  158. if locat['Anya'] = 12:
  159. 'Anya just smirks as Kolka freezes in place and then apologizes to you.'
  160. else
  161. 'Startled, Kolka freezes in place and then apologizes to you.'
  162. end
  163. 'Your stepfather clears his throat and quickly changes the subject, talking about how his work went. After that, you have a fairly enjoyable dinner.'
  164. else
  165. 'You''re about to respond when your mother interrupts you. "Of course not! She''s still too young to be thinking about boys!"'
  166. 'Your stepfather sighs. "She''s old enough to start dating, dear."'
  167. 'Your mother gives him a hard stare. "No, she isn''t. She needs to focus on school and then university before she can start thinking about boys."'
  168. 'Your stepfather decides to drop it and start talking about some of the stuff that happened at his work. All and all, you have a fairly enjoyable dinner.'
  169. end
  170. act 'Get up from the table': gt $loc, $loc_arg
  171. end
  172. else
  173. act 'Eat dinner with your family':
  174. *clr & cla
  175. gs 'stat'
  176. '<center><img <<$set_imgh>> src="<<$default_img_path>>/dinnerhome.jpg"></center>'
  177. 'Everyone stares at you as you sit down for dinner. "What?" you exclaim.'
  178. *nl
  179. 'Your mother stands up from her seat, nearly knocking her chair over in the process. "What on God''s earth are you doing <<$pcs_nickname>>?! Have you have no shame? Get dressed immediately young lady!"'
  180. act 'Leave':
  181. killvar 'fullmorrout'
  182. gt 'korrPar'
  183. end
  184. end
  185. end
  186. else
  187. if (hour = 8 or (hour = 7 and locat['Fam_inGad'] = 1)) and breakfast_day ! daystart:
  188. act 'Eat breakfast alone (0:20)':
  189. *clr & cla
  190. menu_off = 1
  191. breakfast_day = daystart
  192. gs 'food', 'family_meals', 'breakfast'
  193. gs 'stat'
  194. '<center><img <<$set_imgh>> src="images/shared/food/breakfast_'+rand(0,1)+'.jpg"></center>'
  195. 'You enjoy a quiet breakfast by yourself. The portions were moderate and <<$mtxt>>. You accompany it with a mug of tea.'
  196. act 'Get up from the table': gt $loc, $loc_arg
  197. end
  198. end
  199. act 'Eat a hearty meal (0:20)':gs 'food', 'l_meal'
  200. act 'Eat a normal meal (0:15)':gs 'food', 'm_meal'
  201. act 'Eat a light meal (0:10)':gs 'food', 's_meal'
  202. end
  203. !! Call in meal and pill functions for location:
  204. dynamic $edasnack
  205. dynamic $sandwich
  206. dynamic $driwater
  207. dynamic $dritea
  208. dynamic $fill_bottle
  209. dynamic $edaD
  210. dynamic $pranik
  211. dynamic $fatdel
  212. dynamic $lekarstvo
  213. dynamic $vitamin
  214. end
  215. --- kuhrPar ---------------------------------