1
0

preALT.qsrc 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241
  1. # preALT
  2. cls
  3. gs 'themes', 'indoors'
  4. !!School Girl Specific Story elements
  5. if $ARGS[0] = 'One':
  6. '<center><img <<$set_imgh>> src="images/pre/alt/altstart.jpg"></center>'
  7. 'You are <<$pcs_firstname>> "<<$pcs_nickname>>" <<$pcs_lastname>>'
  8. 'You were born in <<birthyear>>. You have a older sister, <<$npc_firstname[''A33'']>>, who is 2 years older than you.'
  9. '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.'
  10. '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.'
  11. act 'Continue': gt 'preALT', 'Two'
  12. end
  13. if $ARGS[0] = 'Two':
  14. '<center><img <<$set_imgh>> src="images/pre/alt/altstart1.jpg"></center>'
  15. '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 7 years old.'
  16. ''
  17. act 'Continue': gt 'preALT', 'Three'
  18. end
  19. if $ARGS[0] = 'Three':
  20. '<center><img <<$set_imgh>> src="images/pre/alt/altstart2.jpg"></center>'
  21. gs 'outdoors', 'weather'
  22. if yearlefttemp = 1:
  23. '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!'
  24. 'But first: it''s time for a well-deserved holiday!'
  25. else
  26. 'As with all girls, you reached the milestone of puberty two years ago. Like it does for most girls, it started for you when you were 13 years old. You had your first period, which sucked... but that was the start of your changes.'
  27. *nl
  28. '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.'
  29. *nl
  30. '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!'
  31. end
  32. killvar 'yearlefttemp'
  33. if MagikDostup = 1:
  34. showstat 1
  35. showobjs 1
  36. gs 'obj_din', 'old'
  37. act 'Continue':
  38. *clr
  39. cla
  40. '<center><img <<$set_imgh>> src="images/system/schoolgirl.jpg"></center>'
  41. '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!'
  42. act 'Begin':
  43. close all
  44. if start_location = 2:
  45. gt 'Gadhouse', 'intro'
  46. elseif start_location = 1:
  47. gt 'bedrPar', 'intro'
  48. end
  49. end
  50. end
  51. else
  52. act 'Continue': close all & gt 'preALT', 'Cursed Schoolgirl Start'
  53. end
  54. act 'Restart':
  55. cls
  56. 'This will reset everything and take you back to the begining.'
  57. 'Are you <i><b>very</i></b> sure you want to start from the begining again?'
  58. act 'No, I hit the wrong option!': gt 'preALT', 'Three'
  59. act 'Yes, I''m sure, start over.': killall & gt 'start'
  60. end
  61. end
  62. if $ARGS[0] = 'Cursed Schoolgirl Start':
  63. '<center><img <<$set_imgh>> src="images/pre/alt/gadukino.jpg"></center>'
  64. '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.'
  65. act 'Take a walk':
  66. *clr
  67. cla
  68. '<center><img <<$set_imgh>> src="images/pre/alt/woodspre.jpg"></center>'
  69. 'While taking a walk and playing with your phone. You look up and suddenly realize that you are lost.'
  70. act 'Find a way back':
  71. *clr
  72. cla
  73. '<center><img <<$set_imgh>> src="images/pre/alt/ruinpre.jpg"></center>'
  74. '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.'
  75. act 'Take a break':
  76. *clr
  77. cla
  78. '<center><img <<$set_imgh>> src="images/pre/alt/tunnel1pre.jpg"></center>'
  79. 'You sit down on a large stone in the ruins and take a breath. You are starting to get hungry. If its not one thing its 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 its either locked or rusted shut. Looks like the only way out is the tunnel on the other side of the chamber.'
  80. act 'Follow the tunnel':
  81. *clr
  82. cla
  83. '<center><img <<$set_imgh>> src="images/pre/alt/tunnel2pre.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
  87. cla
  88. '<center><img <<$set_imgh>> src="images/pre/shared/dunpre3.jpg"></center>'
  89. '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.'
  90. act 'Examine amulet':
  91. *clr
  92. cla
  93. '<center><img <<$set_imgh>> src="images/pre/shared/amuletpre.jpg"></center>'
  94. 'You take the amulet in your hands and notice its much lighter than it looks and unusually warm for a piece of metal. Its 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.'
  95. act 'Find a way out':
  96. *clr
  97. cla
  98. '<center><img <<$set_imgh>> src="images/pre/shared/kotpre.jpg"></center>'
  99. 'You follow the passage and find yourself in a construction site. There are several <b>keep out</b> signs visible from here. Shit.'
  100. act 'Sneak out':
  101. *clr
  102. cla
  103. '<center><img <<$set_imgh>> src="images/pre/alt/road.jpg"></center>'
  104. '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...'
  105. act 'Continue': gt 'preALT','Cursed Schoolgirl Start 2'
  106. end
  107. end
  108. end
  109. end
  110. end
  111. end
  112. end
  113. end
  114. act 'Skip intro':
  115. *clr
  116. cla
  117. hour = 18
  118. showstat 1
  119. showobjs 1
  120. gs 'obj_din', 'old'
  121. '<center><img <<$set_imgh>> src="images/system/magicschoolgirl.jpg"></center>'
  122. '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!'
  123. act 'Begin':
  124. close all
  125. if start_location = 2:
  126. gt 'Gadhouse', 'intro'
  127. elseif start_location = 1:
  128. gt 'bedrPar', 'intro'
  129. end
  130. end
  131. end
  132. end
  133. if $ARGS[0] = 'Cursed Schoolgirl Start 2':
  134. clr
  135. '<center><img <<$set_imgh>> src="images/pre/alt/karinpre.jpg"></center>'
  136. 'You wake up in an unfamiliar room. Standing near you is a red-haired girl.'
  137. '"Ah, you woke up," she chirped. "We found you half-dead, you know. You almost didnt make it. You shouldn''t be fondling ancient amulets you know nothing about."'
  138. '"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."'
  139. act 'What''s going on?':
  140. cla
  141. *clr
  142. '<center><img <<$set_imgh>> src="images/pre/alt/karinpre.jpg"></center>'
  143. '"What the hell is going on?" you respond. You try to move your hands, but you''re tied to the bed.'
  144. '"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."'
  145. '"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."'
  146. '"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."'
  147. *nl
  148. '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."'
  149. '"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."'
  150. 'She stops for a few seconds for you to process that information. It seems really far fetched.'
  151. '"Reinhold wants to prevent the amulet being misused, he is tasked with maintaining order and will search for you."'
  152. act 'So, the whole world is just an illusion?':
  153. cla
  154. *clr
  155. clr
  156. '<center><img <<$set_imgh>> src="images/pre/alt/karinpre.jpg"></center>'
  157. '"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.'
  158. '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."'
  159. '"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."'
  160. act 'And who are you?':
  161. cla
  162. *clr
  163. clr
  164. '<center><img <<$set_imgh>> src="images/pre/alt/karinpre.jpg"></center>'
  165. '"And who are you?" you ask.'
  166. '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."'
  167. '"The two of us run a detective agency for cover and money, but our real objective is studying magic and its effects."'
  168. act 'What do you want from me?':
  169. cla
  170. *clr
  171. clr
  172. '<center><img <<$set_imgh>> src="images/pre/alt/karinpre.jpg"></center>'
  173. '"What do you want from me?" you ask.'
  174. '"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."'
  175. '"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."'
  176. act 'What is this amulet? Where did it come from?':
  177. cla
  178. *clr
  179. '<center><img <<$set_imgh>> src="images/pre/alt/karinpre.jpg"></center>'
  180. '"And what is this amulet? Where did it come from?" you ask.'
  181. '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."'
  182. '"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?"'
  183. '"It seems that its long time underground has caused it to malfunction and its power has entered your body."'
  184. '"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."'
  185. act 'So what should I do?':
  186. cla
  187. *clr
  188. '<center><img <<$set_imgh>> src="images/pre/alt/karinpre.jpg"></center>'
  189. '"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')+'."'
  190. act 'Follow Gustav':
  191. hour = 18
  192. cla
  193. *clr
  194. if start_location = 2:
  195. '<center><img <<$set_imgh>> src="images/pre/alt/gadukino.jpg"></center>'
  196. 'You give Gustav directions to your grandparent''s house, half an hour later he drops you off at your grandparent''s yard in Gadukino.'
  197. elseif start_location = 1:
  198. '<center><img <<$set_imgh>> src="images/pre/alt/gorodok.jpg"></center>'
  199. '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.'
  200. end
  201. act 'Continue':
  202. showstat 1
  203. showobjs 1
  204. gs 'obj_din', 'old'
  205. cla
  206. *clr
  207. '<center><img <<$set_imgh>> src="images/system/magicschoolgirl.jpg"></center>'
  208. 'Welcome to the Cursed Schoolgirl version! Guide <<$pcs_nickname>> through her school life, relationships and myriad other issues that might pop up and all with the added spice of magic to keep things interesting!'
  209. act 'Begin!':
  210. if start_location = 2:
  211. gt 'Gadhouse', 'intro'
  212. elseif start_location = 1:
  213. gt 'bedrPar', 'intro'
  214. end
  215. end
  216. end
  217. end
  218. end
  219. end
  220. end
  221. end
  222. end
  223. end
  224. end
  225. --- preALT ---------------------------------