preALT.qsrc 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224
  1. # preALT
  2. !!2020/04/01
  3. *clr & cla
  4. gs 'themes', 'indoors'
  5. !!School Girl Specific Story elements
  6. if $ARGS[0] = 'One':
  7. menu_off = 1
  8. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_5.jpg"></center>'
  9. 'You are <<$pcs_firstname>> "<<$pcs_nickname>>" <<$pcs_lastname>>'
  10. 'You were born in <<birthyear>>. You have an older sister, <<$npc_firstname[''A33'']>>, who is a year older than you.'
  11. 'Your mother is <<$npc_firstname[''A29'']>> <<$pcs_lastname>>. You don''t know much about your biological father... your mother never wants to talk about him, or why he left you and <<$npc_firstname[''A33'']>> with her.'
  12. 'Your mother met another man not too long after her and your biological father got divorced, <<$npc_firstname[''A28'']>> <<$pcs_lastname>>. Together they had your little brother <<$npc_firstname[''A34'']>>. Even though he''s not your real father, <<$npc_firstname[''A28'']>> has always treated you and <<$npc_firstname[''A33'']>> as if you were his own children.'
  13. act 'Continue': gt 'preALT', 'Two'
  14. end
  15. if $ARGS[0] = 'Two':
  16. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_6.jpg"></center>'
  17. 'You had a pleasant, undisturbed childhood when you were young. Although you don''t remember much from kindergarten, you do remember going to elementary school when you were 6 years old.'
  18. ''
  19. act 'Continue': gt 'preALT', 'Three'
  20. end
  21. if $ARGS[0] = 'Three':
  22. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_7.jpg"></center>'
  23. gs 'outdoors', 'weather'
  24. if yearlefttemp = 1:
  25. 'Your 13th year began like it did for most other girls in your class: you occasionally got sick, you started to grow breasts, armpit and pubic hair. Your skin became very greasy and you had a pretty bad case of acne. You did your best in school, and managed to get very decent results. Only one more year of school left before you graduate!'
  26. 'But first: it''s time for a well-deserved holiday!'
  27. else
  28. 'Like it does for most girls, you reached the milestone of puberty when you were 13 years old. You had your first period, which sucked... but that was just the start of your changes.'
  29. *nl
  30. 'Your chest then felt strange and you discovered your breasts were growing! This excited you: how big will they be when you grow up? Hair also began to grow in at your armpits and pubic area, and at the same time you felt things... intimate things. Over time you learned to appreciate these feelings, and how to manage your developing body. Your troublesome skin complexion remains an issue though.'
  31. *nl
  32. 'When you finished 9th grade, you decided to continue with your secondary education. Two more years of school to go, but first: it''s time for the summer holiday!'
  33. end
  34. killvar 'yearlefttemp'
  35. if MagikDostup = 1:
  36. showstat 1
  37. showobjs 1
  38. gs 'obj_din', 'old'
  39. act 'Continue':
  40. *clr
  41. cla
  42. '<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/start_sg.jpg"></center>'
  43. 'Welcome to the Schoolgirl version! You will need to carry on with your school life, manage your relationships and deal with whatever else comes up along the way!'
  44. act 'Begin':
  45. close all
  46. if start_location = 2:
  47. gt 'gadhouse', 'intro'
  48. elseif start_location = 1:
  49. gt 'bedrPar', 'intro'
  50. end
  51. end
  52. end
  53. else
  54. act 'Continue': close all & gt 'preALT', 'Cursed Schoolgirl Start'
  55. end
  56. act 'Restart':
  57. *clr & cla
  58. 'This will reset everything and take you back to the begining.'
  59. 'Are you <i><b>very</i></b> sure you want to start from the begining again?'
  60. act 'No, I hit the wrong option!': gt 'preALT', 'Three'
  61. act 'Yes, I''m sure, start over.': killall & gt 'start'
  62. end
  63. end
  64. if $ARGS[0] = 'Cursed Schoolgirl Start':
  65. *clr & cla
  66. menu_off = 1
  67. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_gadukino.jpg"></center>'
  68. 'You are on summer holiday with your parents and have been stuck here for weeks. Good thing this evening you''re finally able to go home, there is nothing to do here but watch animals graze.'
  69. act 'Take a walk':
  70. *clr & cla
  71. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_woods.jpg"></center>'
  72. 'While taking a walk and playing with your phone. You look up and suddenly realize that you are lost.'
  73. act 'Find a way back':
  74. *clr & cla
  75. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_ruin.jpg"></center>'
  76. 'You try to find your way back but the only thing you manage to do is get more lost. After hours of wandering around you come across an old ruin.'
  77. act 'Take a break':
  78. *clr & cla
  79. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_tunnel_1.jpg"></center>'
  80. 'You sit down on a large stone in the ruins and take a breath. You are starting to get hungry. If it''s not one thing it''s another. You stomp your foot in frustration and the floor gives way. You desperately try to hold on to something but everything in reach comes loose and falls down the hole with you. You feel slightly dazed but after a quick check you seem to be uninjured. You seem to be in an underground chamber of some sort. Looking up you see that climbing out is not an option, there is an old gate here but it''s either locked or rusted shut. Looks like the only way out is the tunnel on the other side of the chamber.'
  81. act 'Follow the tunnel':
  82. *clr & cla
  83. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_tunnel_2.jpg"></center>'
  84. 'The tunnel goes on for what feels like miles. You start to worry that your phone battery will die.'
  85. act 'Further':
  86. *clr & cla
  87. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_altar.jpg"></center>'
  88. 'At the end of the tunnel you find a dead end. Or at least it seems so. You can see light coming through the cracks in the wall so you do your best to knock it down. Suddenly the wall crumbles and you find yourself in another chamber filled with old pottery and baubles. Opposite you is another tunnel, hopefully it leads out. In the center of the room is an altar and on it is what seems to be centerpiece of this room, a strange amulet.'
  89. act 'Examine amulet':
  90. *clr & cla
  91. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/item_amulet.jpg"></center>'
  92. 'You take the amulet in your hands and notice it''s much lighter than it looks and unusually warm for a piece of metal. It''s shaped like an antique oil lamp and... is that a penis? As you are about to pocket it, the amulet grows even hotter and zaps you. Oww. You drop it. Screw this, you are out of here.'
  93. act 'Find a way out':
  94. *clr & cla
  95. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_working.jpg"></center>'
  96. 'You follow the passage and find yourself in a construction site. There are several <b>keep out</b> signs visible from here. Shit.'
  97. act 'Sneak out':
  98. *clr & cla
  99. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_road.jpg"></center>'
  100. 'The workers shift has long since finished so sneaking out is not too hard. The site is on the highway so hopefully you can make it back before your mother starts freaking out. As you start walking back you feel a sudden rush of heat and find yourself falling...'
  101. act 'Continue': gt 'preALT','Cursed Schoolgirl Start 2'
  102. end
  103. end
  104. end
  105. end
  106. end
  107. end
  108. end
  109. end
  110. act 'Skip intro':
  111. *clr & cla
  112. hour = 18
  113. showstat 1
  114. showobjs 1
  115. gs 'obj_din', 'old'
  116. '<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/start_csg.jpg"></center>'
  117. 'Welcome to the Cursed Schoolgirl version! Guide <<$pcs_nickname>> through her school life, relationships and myriad of other issues that might pop up and all with the added spice of magic to keep things interesting!'
  118. act 'Begin':
  119. close all
  120. if start_location = 2:
  121. gt 'gadhouse', 'intro'
  122. elseif start_location = 1:
  123. gt 'bedrPar', 'intro'
  124. end
  125. end
  126. end
  127. end
  128. if $ARGS[0] = 'Cursed Schoolgirl Start 2':
  129. *clr & cla
  130. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
  131. 'You wake up in an unfamiliar room. Standing near you is a red-haired girl.'
  132. '"Ah, you woke up," she chirped. "We found you half-dead, you know. You almost didn''t make it. You shouldn''t be fondling ancient amulets you know nothing about."'
  133. '"I did some research on what happened to you. Turns out the Amulet of Power passed to you, which should only happen if touched by a male mage. Unfortunately, I got some bad news for you. Reinhold, who''s a really powerful mage. He''s been tracking down this amulet for a while now and if he realizes that the amulet''s power has passed to you he might think you pose a risk."'
  134. act 'What''s going on?':
  135. *clr & cla
  136. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
  137. '"What the hell is going on?" you respond. You try to move your hands, but you''re tied to the bed.'
  138. '"Um, okay, I''ll start from the beginning," the girl says. "Magic exists and is real. Ages ago the world was not the same, the fae creatures who possess natural magic lived in balance but the succubus were free to breed with whom ever they wished."'
  139. '"They bred with humans and so human magicians were born. The Sidhe as the most powerful of the fae feared the increasing numbers of human magicians and cast a very powerful spell to bind the succubus to them, this prevented one from being able to reproduce without the other."'
  140. '"All magicians have some of that original fae blood in their bodies and it is through that that they are able to connect with the world of magic."'
  141. *nl
  142. 'The redhead adjusts her glasses. "Most of the world simply ignores magic or are protected from it by magic''s natural desire to remain hidden."'
  143. '"But last night there was a powerful burst of magical energy, strong enough to be clearly seen by any with magical connections. Can you guess where this surge came from? Yeah, that cave you found. Apparently the surge occurred when you opened the seal to the archive. Anyway, that was when we started to search, that source of power is desired by many, but it is extremely dangerous and in the wrong hands could do untold horrors."'
  144. 'She stops for a few seconds for you to process that information. It seems really far fetched.'
  145. '"Reinhold wants to prevent the amulet being misused, he is tasked with maintaining order and will search for you."'
  146. act 'So, the whole world is just an illusion?':
  147. *clr & cla
  148. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
  149. '"So magic exists and is used by all these people and creatures, but the rest of us just don''t see it, or convince ourselves it didn''t happen?" You ask.'
  150. 'The girl nods. "Yes. You''re a quick student. Machines, apartments, television and the Internet, all this really does exist and is in the form in which people see it. But if I say, hurl a fireball, then people might see that I threw a grenade or shot from a flamethrower. The human mind can''t process magic, so it blocks it as a way to protect the person from going crazy."'
  151. '"Hence such things as little green men, UFOs, poltergeists, spontaneous combustion, are when people encounter a difficult to hide phenomenon and the conclusion is flawed. In some cases, if someone''s mind can not cope with the spell they witness, they can be driven crazy and then no one believes them."'
  152. act 'And who are you?':
  153. *clr & cla
  154. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
  155. '"And who are you?" you ask.'
  156. 'The girl smiled. "Me? I''m Tatiana, a young mage with a keen interest in magical phenomenon. I specialize in the treatment of mutations, and magic relating to the body. I have little combat skill, so I rely on the services of Gustav to provide some muscle. He''s a Mutant, his mutation is due to magical exposure and it gives him unmatched physical strength and he is a great tracker."'
  157. '"The two of us run a detective agency for cover and money, but our real objective is studying magic and its effects."'
  158. act 'What do you want from me?':
  159. *clr & cla
  160. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
  161. '"What do you want from me?" you ask.'
  162. '"Hmm, well... the amulet obviously," Tatiana replies. "When I looked for you, I was hoping to get that object of power to study but the power transferred to you first. The amulet will now be pretty much useless."'
  163. '"But this is not good for you. You may think that since you have the amulets'' power, you can do anything. But in reality, you''re helpless without the skill to use it. Its power already knocked you out and I had to use magic to stabilize you."'
  164. act 'What is this amulet? Where did it come from?':
  165. *clr & cla
  166. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
  167. '"And what is this amulet? Where did it come from?" you ask.'
  168. 'Tatiana thinks about it for a few moments. "It was made by the trickster Rikudo, one of the most powerful ancient magicians before he died, he taunted the only living mage who could control its immense power by cursing him to be stuck in a female form and making it only activate for a male mage."'
  169. '"Great. So I''ve been thrown into this mess by the dead owner of that ancient tomb. Hang on, I''m not male or a mage, how could the power be transferred to me?"'
  170. '"It seems that its long time underground has caused it to malfunction and its power has entered your body."'
  171. '"You are lucky to be a woman," Tatiana adds, "Rikudo''s power seems to only work if it is in a man''s body. Since you cannot harness its power you shouldn''t arouse suspicion."'
  172. act 'So what should I do?':
  173. *clr & cla
  174. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
  175. '"Lay low for now. Go on with your life. We will contact you if anything comes up. Gustav here will drop you off at your '+iif($month = 'June','grandparent''s','parent''s')+'."'
  176. act 'Follow Gustav':
  177. hour = 18
  178. *clr & cla
  179. if start_location = 2:
  180. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_gadukino.jpg"></center>'
  181. 'You give Gustav directions to your grandparent''s house, half an hour later he drops you off at your grandparent''s yard in Gadukino.'
  182. elseif start_location = 1:
  183. '<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_pavlovsk.jpg"></center>'
  184. 'You give Gustav directions to your family''s apartment building, half an hour later he drops you off in front of your apartment complex in Pavlovsk.'
  185. end
  186. act 'Continue':
  187. showstat 1
  188. showobjs 1
  189. gs 'obj_din', 'old'
  190. *clr & cla
  191. '<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/start_csg.jpg"></center>'
  192. 'Welcome to the Cursed Schoolgirl version! Guide <<$pcs_nickname>> through her school life, relationships and myriad of other issues that might pop up and all with the added spice of magic to keep things interesting!'
  193. act 'Begin!':
  194. if start_location = 2:
  195. gt 'gadhouse', 'intro'
  196. elseif start_location = 1:
  197. gt 'bedrPar', 'intro'
  198. end
  199. end
  200. end
  201. end
  202. end
  203. end
  204. end
  205. end
  206. end
  207. end
  208. end
  209. --- preALT ---------------------------------