1
0

core_library.qsrc 6.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190
  1. # core_library
  2. !! Date Created: 17th Sept, 2022
  3. !! Modified date:
  4. !! Version: .01 - initial release
  5. !! Version: .02 - refactoring to streamline content start, new standardised locations function for kitchen and bathroom test code
  6. !! Author: Hooded Silence
  7. !!
  8. !! Ballet School Initiator - This class is to act as a gateway to the various locations for the ballet school
  9. if $ARGS[0] = 'init':
  10. !! Summer School
  11. !! $start_type['cat'] is the mc backstry, mod_ballet[beta] is a test variable to initiate regardless
  12. if $start_type['cat'] = 'dancer' or mod_ballet['beta'] = 1:
  13. if daystart = 1:
  14. mod_ballet['blocker'] = 1
  15. end
  16. !! Parents Home Triggers
  17. if $loc = 'kuhrPar':
  18. if daystart < 6 and mod_ballet['blocker'] = 1:
  19. gs 'pushkin_ballet_init', 'init'
  20. end
  21. if ((daystart >= 6 and daystart <= 14) and mod_ballet['letter'] = 0) or (daystart >= 45 and balletqw['school'] > 1):
  22. gs 'pushkin_ballet_init', 'start'
  23. end
  24. end
  25. !! Pavlovsk
  26. if $loc = 'gdksport':
  27. !! Close down Starlets
  28. if mod_ballet['letter'] = 1 and (month = 7 or (month = 6 and day > 6)):
  29. if AlbinaQW['StarletsJoined'] > 0 and AlbinaQW['StarletsShutDown'] = 0 and npc_pregtalk['A23'] = 0 and AlbinaQW['startletsday'] ! daystart:
  30. if hour = 15 and starlets_on = 1:
  31. act 'Tell Albina about the letter' : gt 'pushkin_ballet_evt', 'starlets'
  32. end
  33. end
  34. end
  35. !! Dance job?
  36. end
  37. if $loc = 'pav_commcenter':
  38. if month = 7 and day = 3 and (hour >= 16 and hour < 17) and mod_ballet['letter'] = 1:
  39. ! Pre-flight - travel to school dorms
  40. act 'Get on the bus': gt 'pushkin_ballet_res', 'start'
  41. end
  42. end
  43. !! Pushkin
  44. !! Theatre
  45. !! Other Events
  46. end
  47. end
  48. !! --- Generic shared Locations and classes ---
  49. !! like SetLoc, to reduce code bloat and memorisation of header title and images.
  50. !! Project: allow for scene changes on the fly rather than static content based on story?
  51. !! Set two var, third if you need to change the ext.:
  52. !! $setloc[''StageTitle'']: Var to set up $loc h1 header
  53. !! $setloc[''StageImage'']: Var to set up $loc image - set 1 to randomise
  54. if $ARGS[0] = 'stage_title':
  55. *clr & cla
  56. '<center><h2><<$setloc[''StageTitle'']>></h2></center>'
  57. '<center><img <<$set_imgh>> src="images/<<$setloc[''StageImage'']>>"></center>'
  58. !! set indoor or outdoor location specific variables
  59. !! set standardised location variables such as kitchen, bathroom, personal bedroom
  60. !! npc location tracker - if tracking npc locations add them here.
  61. end
  62. !! clothing_status - fnct to determine clothing status
  63. if $ARGS[0] = 'clothing_status':
  64. $apparel['panty'] = ''
  65. $apparel['bra'] = ''
  66. $apparel['status'] = ''
  67. if $pantyworntype = 'none': $apparel['panty'] = 'pantyless'
  68. if $braworntype = 'none': $apparel['bra'] = 'braless'
  69. if $clothingworntype = 'nude': $apparel['status'] = 'nude'
  70. if $clothingworntype = 'danilovich_outfits' and $shoeworntype = 'danilovich': $apparel['status'] = 'sport'
  71. if $clothingworntype = 'ballet_secrets' and $shoeworntype = 'ballet_secrets': $apparel['status'] = 'dance'
  72. end
  73. if $ARGS[0] = 'corridor':
  74. if frost > 0: frost = 0
  75. music_loop = 0
  76. menu_off = 0
  77. CLOSE ALL
  78. if $location_type = 'private':
  79. elseif $location_type = 'public':
  80. end
  81. end
  82. if $ARGS[0] = 'bathroom':
  83. !! Location facilities
  84. if $location_type = 'private':
  85. 'Your accommodation for the week has the luxury of a private shower and a bath. There''s a poster on the wall promoting the health benefits of ice baths and other advice on looking after your body.'
  86. *nl
  87. 'There is a shower, toilet, sink, and a <a href="exec:gt ''mirror'',''start''">mirror</a> where you can ' + iif(pcs_hairbsh = 0,'<a href="exec:gt ''mirror'',''brush''">brush</a>','brush') + ' your hair.'
  88. gs 'din_van', 'private'
  89. elseif $location_type = 'public':
  90. act 'Take a shower':
  91. *clr & cla
  92. pcs_hairbsh = 0
  93. pcs_makeup = 1
  94. minut += 10
  95. pcs_mood += 10
  96. noShampoo = 1
  97. dynamic $showerdin
  98. gs 'stat'
  99. 'You grab a quick shower, but you wish you could stay longer in the shower to let the heat soak into your muscles.'
  100. act 'Continue' : gt $loc, $loc_arg
  101. end
  102. 'There is a shower and <a href="exec:gt ''mirror'',''start''">mirrors</a> where you can ' + iif(pcs_hairbsh = 0,'<a href="exec:gt ''mirror'',''brush''">brush</a>','brush') + ' your hair.'
  103. elseif $location_type = 'communal':
  104. end
  105. !! Default facilities
  106. dynamic $basin
  107. dynamic $tampon
  108. if pcs_hairbsh = 0: act 'Brush your hair': gt 'mirror', 'brush'
  109. if deodorant > 0 and deodorant_on = 0:
  110. 'Your deodorant will last you for <b><<deodorant>></b> more '+iif(deodorant = 1, 'application.', 'applications.')
  111. act 'Apply deodorant (0:01)':
  112. *clr & cla
  113. menu_off = 1
  114. minut += 1
  115. deodorant -= 1
  116. gs 'sweat', 'deo'
  117. iif(func('body_din','pregnancyVisibility') = 1, '<center><img <<$set_imgh>> src="images/shared/home/bathroom/deodorant_preg.jpg"></center>', '<center><img <<$set_imgh>> src="images/shared/home/bathroom/deodorant.jpg"></center>')
  118. 'You apply deodorant to your armpits. It will keep you feeling fresh and clean for longer.'
  119. act 'Continue': menu_off = 0 & gt $loc, $loc_arg
  120. end
  121. end
  122. end
  123. if $ARGS[0] = 'kitchen':
  124. !! Location facilities
  125. if $location_type = 'private':
  126. !! Home or parents kitchen
  127. dynamic $edasnack
  128. dynamic $sandwich
  129. dynamic $pranik
  130. dynamic $fatdel
  131. dynamic $lekarstvo
  132. dynamic $vitamin
  133. elseif $location_type = 'public_indoors':
  134. !! canteen type location
  135. elseif $location_type = 'communal':
  136. !! shared or communal kitchen
  137. dynamic $edasnack
  138. dynamic $sandwich
  139. dynamic $pranik
  140. dynamic $vitamin
  141. end
  142. !! Default facilities
  143. dynamic $driwater
  144. dynamic $dritea
  145. dynamic $fill_bottle
  146. end
  147. if $ARGS[0] = 'bedroom':
  148. !! Default facilities
  149. if $location_type = 'private':
  150. if pcs_horny >= 50:
  151. act 'Masturbate':gt 'selfplay', 'start'
  152. end
  153. elseif $location_type = 'guest':
  154. elseif $location_type = 'private_shared':
  155. end
  156. act 'Relax on your bed': gt 'bed', 'start'
  157. act 'Open wardrobe': gt 'wardrobe', 'start'
  158. gs 'events', 'read'
  159. gs 'exercise', 'start'
  160. end
  161. --- core_library ---------------------------------