virginity_call.qsrc 38 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588
  1. # virginity_call
  2. !{ This is to keep track of how the main character loses her virginity. It can store a different set of details for vaginal, anal and oral.
  3. It creates messages that can serve as responses when talking about Sveta''s virginity
  4. Details it keeps track of:
  5. - Type of virginity
  6. - Name or description of who takes her virginity
  7. - Wether of not Sveta knows this person or persons
  8. - If she was forced or not
  9. - Rough or gentle
  10. - What state Sveta was in at the time
  11. - Where it happened
  12. - What object was used (Leave blank if it''s a dick!)
  13. $ARGS[0] 'vaginal', 'anal' or 'oral'
  14. $ARGS[1] is for the name of the sexual partner or description
  15. $ARGS[2] 'unknown', 'known' or 'unaware'
  16. $ARGS[3] 'rape', 'consensual' or 'self'
  17. $ARGS[4] 'gentle', 'rough' or 'unknown'
  18. $ARGS[5] 'sober', 'tipsy', 'verydrunk', 'hornyfromdrugs' or 'unabletomove'
  19. $ARGS[6] location description of where it happened. this should always start with 'in ...' for the automated messages
  20. $ARGS[7] object used in case you did it yourself (my dildo, a cucumber, a magically conjured horsecock)
  21. firstvagmsg1, firstvagmsg2, firstvagmsg3, firstanalmsg1, firstanalmsg2, firstanalmsg3, firstoralmsg1, firstoralmsg2, firstoralmsg3 are the generated responses.
  22. msg1 includes age, partner, location and object if applicable
  23. msg2 includes roughness
  24. msg3 includes state
  25. Examples:
  26. gs 'virginity_call', 'anal', 'Kolka', 'known', 'consensual', 'gentle', 'tipsy', 'in my room', ''
  27. gs 'virginity_call', 'vaginal', 'some guys', 'unknown', 'rape', 'rough', 'unabletomove', 'in their hotel room', 'various toys'
  28. gs 'virginity_call', 'anal', 'unknown', 'unaware', 'rape', 'rough', 'sober', 'in a hotel room', ''
  29. }
  30. ! This should only update if Sveta has vaginal, anal or oral sex for the first time. I check this by using firstvag, firstanal and firstoral variables.
  31. if ($ARGS[0] = 'vaginal' and firstvag ! 1) or ($ARGS[0] = 'anal' and firstanal ! 1) or ($ARGS[0] = 'oral' and firstoral ! 1):
  32. ! Storing all parameters
  33. if $ARGS[0] = 'vaginal':
  34. firstvag = 1
  35. firstvagage = age
  36. $firstvagwho = $ARGS[1]
  37. $firstvagpart = $ARGS[2]
  38. $firstvagconsent = $ARGS[3]
  39. $firstvagrough = $ARGS[4]
  40. $firstvagstate = $ARGS[5]
  41. $firstvagloc = $ARGS[6]
  42. $firstvagobj = $ARGS[7]
  43. elseif $ARGS[0] = 'anal':
  44. firstanal = 1
  45. firstanalage = age
  46. $firstanalwho = $ARGS[1]
  47. $firstanalpart = $ARGS[2]
  48. $firstanalconsent = $ARGS[3]
  49. $firstanalrough = $ARGS[4]
  50. $firstanalstate = $ARGS[5]
  51. $firstanalloc = $ARGS[6]
  52. $firstanalobj = $ARGS[7]
  53. elseif $ARGS[0] = 'oral':
  54. firstoral = 1
  55. firstoralage = age
  56. $firstoralwho = $ARGS[1]
  57. $firstoralpart = $ARGS[2]
  58. $firstoralconsent = $ARGS[3]
  59. $firstoralrough = $ARGS[4]
  60. $firstoralstate = $ARGS[5]
  61. $firstoralloc = $ARGS[6]
  62. $firstoralobj = $ARGS[7]
  63. end
  64. ! This will construct a default message in which Sveta explains how she lost her virginity
  65. if $ARGS[2] = 'unaware':
  66. if $ARGS[0] = 'vaginal':
  67. if $firstvagrough = 'gentle':
  68. $firstvagmsg1 = '"I-I was raped when I was <<firstvagage>>. I woke up <<$firstvagloc>> and my pussy hurt so I went to have a checkup and the gynaecologyst told me I wasn''t a virgin."'
  69. elseif firstvagrough = 'rough':
  70. $firstvagmsg1 = '"I-I was raped when I was <<firstvagage>>. I woke up <<$firstvagloc>> and my pussy felt like it was on fire so I went to have a checkup and the gynaecologyst told me I wasn''t a virgin."'
  71. elseif $firstvagrough = 'unknown':
  72. $firstvagmsg1 = '"I-I was raped when I was <<firstvagage>>. I woke up <<$firstvagloc>> and my pussy hurt a lot so I went to have a checkup and the gynaecologyst told me I wasn''t a virgin."'
  73. end
  74. $firstvagmsg2 = '"I broke down crying right there in his office. It''s just so... so creepy... and wrong!"'
  75. if $firstvagstate = 'sober' or $firstvagstate = 'tipsy':
  76. $firstvagmsg3 = '"What scares me the most is that I don''t know how it could have happened. I didn''t drink or eat anything funny."'
  77. elseif $firstvagstate = 'verydrunk':
  78. $firstvagmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  79. end
  80. elseif $ARGS[0] = 'anal':
  81. if $firstanalrough = 'gentle':
  82. $firstanalmsg1 = '"I-I was raped when I was <<firstanalage>>. I woke up <<$firstanalloc>> and my ass hurt so I went to have a checkup and the gynaecologyst told me it was because of anal sex. He even tried giving me advice on lubricants."'
  83. elseif firstanalrough = 'rough':
  84. $firstanalmsg1 = '"I-I was raped when I was <<firstanalage>>. I woke up <<$firstanalloc>> and my ass felt like it was on fire so I went to have a checkup and the gynaecologyst told me it was because of anal sex. He showed me his bloody fingertip and tried giving me advice on lubricants."'
  85. elseif $firstanalrough = 'unknown':
  86. $firstanalmsg1 = '"I-I was raped when I was <<firstanalage>>. I woke up <<$firstanalloc>> and my ass hurt a lot so I went to have a checkup and the gynaecologyst told me I wasn''t a virgin. He even tried giving me advice on lubricants."'
  87. end
  88. $firstanalmsg2 = '"I broke down crying right there in his office. It''s just so... so creepy... and wrong!"'
  89. if $firstanalstate = 'sober' or $firstanalstate = 'tipsy':
  90. $firstanalmsg3 = '"What scares me the most is that I don''t know how it could have happened. I didn''t drink or eat anything funny."'
  91. elseif $firstanalstate = 'verydrunk':
  92. $firstanalmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  93. end
  94. elseif $ARGS[0] = 'oral':
  95. if $firstoralrough = 'gentle':
  96. $firstoralmsg1 = '"I-I think I was raped when I was <<firstoralage>>. I woke up <<$firstoralloc>> and my throat hurt so I went to have a checkup and the doctor told me I had a bruised throat. He gently tried to tell me I should be careful when taking a penis in my throat."'
  97. elseif firstoralrough = 'rough':
  98. $firstoralmsg1 = '"I-I think I was raped when I was <<firstoralage>>. I woke up <<$firstoralloc>> and my throat felt like it was on fire so I went to have a checkup and the doctor told me I had a badly bruised throat. He tried to tell me I should practice before letting someone fuck my throat."'
  99. elseif $firstoralrough = 'unknown':
  100. $firstoralmsg1 = '"I-I think I was raped when I was <<firstoralage>>. I woke up <<$firstoralloc>> and my throat hurt a lot so I went to have a checkup and the doctor told me I had a bruised throat. He gently tried to tell me I should be careful when taking a penis in my throat."'
  101. end
  102. $firstoralmsg2 = '"I broke down crying right there in his office. It''s just so... so creepy... and wrong!"'
  103. if $firstoralstate = 'sober' or $firstoralstate = 'tipsy':
  104. $firstoralmsg3 = '"What scares me the most is that I don''t know how it could have happened. I didn''t drink or eat anything funny."'
  105. elseif $firstoralstate = 'verydrunk':
  106. $firstoralmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  107. end
  108. end
  109. elseif $ARGS2 ! 'unaware':
  110. if $ARGS[0] = 'vaginal':
  111. ! Building auto responses in case it was rape
  112. if $firstvagconsent = 'rape':
  113. if $firstvagobj = '':
  114. $firstvagmsg1 = '"I-I was raped when I was <<firstvagage>> by <<$firstvagwho>>. It all happened <<$firstvagloc>>."'
  115. else
  116. $firstvagmsg1 = '"I-I was raped when I was <<firstvagage>> by <<$firstvagwho>>. It happened with <<$firstvagobj>> <<$firstvagloc>>."'
  117. end
  118. if $firstvagrough = 'gentle':
  119. $firstvagmsg2 = '"It hurt when my hymen broke but I guess I should be thankful I wasn''t just used the second my pussy was bared. I-I was played with to prepare me first."'
  120. elseif $firstvagrough = 'rough':
  121. $firstvagmsg2 = '"It was so painful. As soon as my pussy was bared I was used roughly."'
  122. elseif $firstvagrough = 'unknown':
  123. $firstvagmsg2 = '"To be honest, I don''t really know how it felt at the time. I mostly just remember feeling discomfort after it was over. When I... got back to my senses."'
  124. end
  125. if $firstvagstate = 'sober' or $firstvagstate = 'tipsy':
  126. $firstvagmsg3 = '"Sometimes I wish I had been passed out drunk at the time. Because now I have to relive it in full detail from time to time in my nightmares."'
  127. elseif $firstvagstate = 'verydrunk':
  128. $firstvagmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  129. elseif $firstvagstate = 'hornyfromdrugs':
  130. $firstvagmsg3 = '"I guess I should count myself lucky that I was so horny from the drugs that I just couldn''t really care about it while it happened."'
  131. elseif $firstvagstate = 'unabletomove':
  132. $firstvagmsg3 = '"It was horrible. I wasn''t able to lift a finger but I felt every second of it as it happened. It would have been better if I had been unconcious because now I have to relive it in full detail from time to time in my nightmares."'
  133. end
  134. ! Building auto responses in case it was consensual
  135. elseif $firstvagconsent = 'consensual':
  136. if $firstvagobj = '':
  137. $firstvagmsg1 = '"I lost my virginity when I was <<firstvagage>>. It was <<$firstvagwho>> who claimed my first time. It all happened <<$firstvagloc>>."'
  138. else
  139. $firstvagmsg1 = '"I lost my virginity when I was <<firstvagage>>. It was <<$firstvagwho>> who claimed my first time. It all happened <<$firstvagloc>> with <<$firstvagobj>>."'
  140. end
  141. if $firstvagrough = 'gentle':
  142. $firstvagmsg2 = '"It hurt a bit when my hymen broke but soon after it felt good. I was soaking wet at the time."'
  143. elseif $firstvagrough = 'rough':
  144. $firstvagmsg2 = '"It was so painful. As soon as my pussy was bared I was used roughly."'
  145. elseif $firstvagrough = 'unknown':
  146. $firstvagmsg2 = '"To be honest, I don''t really know how it felt at the time. I mostly just remember feeling discomfort after it was over. When I... got back to my senses."'
  147. end
  148. if $firstvagstate = 'sober' or $firstvagstate = 'tipsy':
  149. $firstvagmsg3 = '"It''s good that I wasn''t out of it or anything. I wouldn''t want to be unable to remember my first time."'
  150. elseif $firstvagstate = 'verydrunk':
  151. $firstvagmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  152. elseif $firstvagstate = 'hornyfromdrugs':
  153. $firstvagmsg3 = '"At the time I was so horny from the drugs that I just couldn''t really do anything but go on."'
  154. ! I added this message even though it is unlikely that Sveta would agree to sex and take a daterape drug at the same time
  155. elseif $firstvagstate = 'unabletomove':
  156. $firstvagmsg3 = '"It was very uncomfortable. I wasn''t able to lift a finger but I felt every second of it as it happened. Thinking about it still makes me a bit uneasy."'
  157. end
  158. ! Building auto responses in case Sveta did it herself
  159. elseif $firstvagconsent = 'self':
  160. $firstvagmsg1 = '"I broke my own hymen when I was <<firstvagage>>. I did it <<$firstvagloc>> whith <<$firstvagobj>>."'
  161. if $firstvagrough = 'gentle':
  162. $firstvagmsg2 = 'It hurt a bit when I broke my hymen but soon after it felt good. I was soaking wet at the time.'
  163. elseif $firstvagrough = 'rough':
  164. $firstvagmsg2 = 'It was so painful I almost had to stop completely. As was too worked up and just shoved it in. Take it from me, that''s not the way for a girl to lose her virginity.'
  165. elseif $firstvagrough = 'unknown':
  166. $firstvagmsg2 = 'To be honest, I don''t really know how it felt at the time. I mostly just remember feeling discomfort after it was over. When I... got back to my senses.'
  167. end
  168. if $firstvagstate = 'sober' or $firstvagstate = 'tipsy':
  169. $firstvagmsg3 = '"It''s good that I wasn''t out of it or anything. I wouldn''t want to be unable to remember popping my own cherry."'
  170. elseif $firstvagstate = 'verydrunk':
  171. $firstvagmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  172. elseif $firstvagstate = 'hornyfromdrugs':
  173. $firstvagmsg3 = '"At the time I was so horny from the drugs that I just couldn''t really do anything but go on."'
  174. end
  175. end
  176. elseif $ARGS[0] = 'anal':
  177. if $firstanalconsent = 'rape':
  178. if $firstanalobj = '':
  179. $firstanalmsg1 = '"I-I was raped when I was <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>>."'
  180. else
  181. $firstanalmsg1 = '"I-I was raped when I was <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>>. It happened with <<$firstanalobj>>."'
  182. end
  183. if $firstanalrough = 'gentle':
  184. $firstanalmsg2 = '"It hurt when it happened but I guess I should be thankful I wasn''t just used the second my ass was bared. I-I was played with to prepare me first."'
  185. elseif $firstanalrough = 'rough':
  186. $firstanalmsg2 = '"It was so painful. As soon as my ass was bared I was used roughly."'
  187. elseif $firstanalrough = 'unknown':
  188. $firstanalmsg2 = '"To be honest, I don''t really know how it felt at the time. I mostly just remember feeling discomfort after it was over. When I... got back to my senses."'
  189. end
  190. if $firstanalstate = 'sober' or $firstanalstate = 'tipsy':
  191. $firstanalmsg3 = '"Sometimes I wish I had been passed out drunk at the time. Because now I have to relive it in full detail from time to time in my nightmares."'
  192. elseif $firstanalstate = 'verydrunk':
  193. $firstanalmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  194. elseif $firstanalstate = 'hornyfromdrugs':
  195. $firstanalmsg3 = '"I guess I should count myself lucky that I was so horny from the drugs that I just couldn''t really care about it while it happened."'
  196. elseif $firstanalstate = 'unabletomove':
  197. $firstanalmsg3 = '"It was horrible. I wasn''t able to lift a finger but I felt every second of it as it happened. It would have been better if I had been unconcious because now I have to relive it in full detail from time to time in my nightmares."'
  198. end
  199. elseif $firstanalconsent = 'consensual':
  200. if $firstanalobj = '':
  201. $firstanalmsg1 = '"I lost my anal virginity when I was <<firstanalage>>. It was <<$firstanalwho>> who claimed my first time. It all happened <<$firstanalloc>>."'
  202. else
  203. $firstanalmsg1 = '"I lost my anal virginity when I was <<firstanalage>>. It was <<$firstanalwho>> who claimed my first time. It all happened <<$firstanalloc>> with <<$firstanalobj>>."'
  204. end
  205. if $firstanalrough = 'gentle':
  206. $firstanalmsg2 = '"It hurt a bit at first but soon after it felt good. I was soaking wet at the time."'
  207. elseif $firstanalrough = 'rough':
  208. $firstanalmsg2 = '"It was so painful. As soon as my ass was bared I was used roughly."'
  209. elseif $firstanalrough = 'unknown':
  210. $firstanalmsg2 = '"To be honest, I don''t really know how it felt at the time. I mostly just remember feeling discomfort after it was over. When I... got back to my senses."'
  211. end
  212. if $firstanalstate = 'sober' or $firstanalstate = 'tipsy':
  213. $firstanalmsg3 = '"It''s good that I wasn''t out of it or anything. I wouldn''t want to be unable to remember my first time having anal sex."'
  214. elseif $firstanalstate = 'verydrunk':
  215. $firstanalmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  216. elseif $firstanalstate = 'hornyfromdrugs':
  217. $firstanalmsg3 = '"At the time I was so horny from the drugs that I just couldn''t really do anything but go on."'
  218. ! I added this message even though it is unlikely that Sveta would agree to sex and take a daterape drug at the same time
  219. elseif $firstanalstate = 'unabletomove':
  220. $firstanalmsg3 = '"It was very uncomfortable. I wasn''t able to lift a finger but I felt every second of it as it happened. Thinking about it still makes me a bit uneasy."'
  221. end
  222. elseif $firstanalconsent = 'self':
  223. $firstanalmsg1 = '"I first started exploring my ass when I was <<firstanalage>>. I did it <<$firstanalloc>> with <<$firstanalobj>>."'
  224. if $firstanalrough = 'gentle':
  225. $firstanalmsg2 = 'It hurt a bit when I forced the <<$fistanalobj>> in but soon after it felt good. I was soaking wet at the time.'
  226. elseif $firstanalrough = 'rough':
  227. $firstanalmsg2 = 'It was so painful I almost had to stop completely. As was too worked up and just shoved it in. Take it from me, that''s not the way for a girl to play with her ass the first time.'
  228. elseif $firstanalrough = 'unknown':
  229. $firstanalmsg2 = 'To be honest, I don''t really know how it felt at the time. I mostly just remember feeling discomfort after it was over. When I... got back to my senses.'
  230. end
  231. if $firstanalstate = 'sober' or $firstanalstate = 'tipsy':
  232. $firstanalmsg3 = '"It''s good that I wasn''t out of it or anything. I wouldn''t want to be unable to remember popping my own anal cherry."'
  233. elseif $firstanalstate = 'verydrunk':
  234. $firstanalmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  235. elseif $firstanalstate = 'hornyfromdrugs':
  236. $firstanalmsg3 = '"At the time I was so horny from the drugs that I just couldn''t really do anything but go on."'
  237. end
  238. end
  239. elseif $ARGS[0] = 'oral':
  240. if $firstoralconsent = 'rape':
  241. if $firstoralobj = '':
  242. $firstoralmsg1 = '"I-I was raped when I was <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>>."'
  243. else
  244. $firstoralmsg1 = '"I-I was raped when I was <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>>. It all happened with <<$firstanalobj>>."'
  245. end
  246. if $firstoralrough = 'gentle':
  247. $firstoralmsg2 = '"It was humiliating. First I had to lick it, when that wasn''t enough I had to suck. Eventually I even had to take it in my troat, I almost puked then."'
  248. elseif $firstoralrough = 'rough':
  249. $firstoralmsg2 = '"It was so painful. As soon as my mouth was forced open I was throatfucked roughly. I was very close to throwing up several times. The only way I kept it down was the fact that I knew it would get only worse if I actually threw up."'
  250. elseif $firstoralrough = 'unknown':
  251. $firstoralmsg2 = '"To be honest, I don''t really know how it felt at the time. I mostly just remember feeling discomfort after it was over. When I... got back to my senses."'
  252. end
  253. if $firstoralstate = 'sober' or $firstoralstate = 'tipsy':
  254. $firstoralmsg3 = '"Sometimes I wish I had been passed out drunk at the time. Because now I have to relive it in full detail from time to time in my nightmares."'
  255. elseif $firstoralstate = 'verydrunk':
  256. $firstoralmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  257. elseif $firstoralstate = 'hornyfromdrugs':
  258. $firstoralmsg3 = '"I guess I should count myself lucky that I was so horny from the drugs that I just couldn''t really care about it while it happened."'
  259. elseif $firstoralstate = 'unabletomove':
  260. $firstoralmsg3 = '"It was horrible. I wasn''t able to lift a finger but I felt every second of it as it happened. It would have been better if I had been unconcious because now I have to relive it in full detail from time to time in my nightmares."'
  261. end
  262. elseif $firstoralconsent = 'consensual':
  263. if $firstoralobj = '':
  264. $firstoralmsg1 = '"I sucked my first dick when I was <<firstoralage>>. It was <<$firstoralwho>> who claimed my first time. It all happened <<$firstoralloc>>."'
  265. else
  266. $firstoralmsg1 = '"I sucked my first <<$firstoralobj>> when I was <<firstoralage>>. It was <<$firstoralwho>> who claimed my first time. It all happened <<$firstoralloc>>."'
  267. end
  268. if $firstoralrough = 'gentle':
  269. $firstoralmsg2 = '"It turned me on so much as I was doing it. First I licked it, when I got it nice and wet I went on and started sucking. Eventually I even tried to take it in my troat. I almost puked then so I just went back to sucking it."'
  270. elseif $firstoralrough = 'rough':
  271. $firstoralmsg2 = '"It was so painful. As soon as I was on my knees I was used roughly."'
  272. elseif $firstoralrough = 'unknown':
  273. $firstoralmsg2 = '"To be honest, I don''t really know how it felt at the time. I mostly just remember feeling discomfort after it was over. When I... got back to my senses."'
  274. end
  275. if $firstoralstate = 'sober' or $firstoralstate = 'tipsy':
  276. $firstoralmsg3 = '"It''s good that I wasn''t out of it or anything. I wouldn''t want to be unable to remember sucking my first cock."'
  277. elseif $firstoralstate = 'verydrunk':
  278. $firstoralmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  279. elseif $firstoralstate = 'hornyfromdrugs':
  280. $firstoralmsg3 = '"At the time I was so horny from the drugs that I just couldn''t really do anything but go on."'
  281. ! I added this message even though it is unlikely that Sveta would agree to sex and take a daterape drug at the same time
  282. elseif $firstoralstate = 'unabletomove':
  283. $firstoralmsg3 = '"It was very uncomfortable. I wasn''t able to lift a finger but I felt every second of it as it happened. Thinking about it still makes me a bit uneasy."'
  284. end
  285. elseif $firstoralconsent = 'self':
  286. $firstoralmsg1 = '"I decided to practice before sucking a real dick when I was <<firstoralage>>. I did it <<$firstoralloc>> whith <<$firstoralobj>>."'
  287. if $firstoralrough = 'gentle':
  288. $firstoralmsg2 = '"It turned me on so much as I was doing it. First I licked it, when I got it nice and wet I went on and started sucking. Eventually I even tried to take it in my troat. I almost puked then so I just went back to sucking it."'
  289. elseif $firstoralrough = 'rough':
  290. $firstoralmsg2 = 'It was so painful I almost had to stop completely. As was too worked up and just shoved it in my throat. Take it from me, that''s not the way for a girl test her throating skills for the first time.'
  291. elseif $firstoralrough = 'unknown':
  292. $firstoralmsg2 = 'To be honest, I don''t really know how it felt at the time. I mostly just remember feeling discomfort after it was over. When I... got back to my senses.'
  293. end
  294. if $firstoralstate = 'sober' or $firstoralstate = 'tipsy':
  295. $firstoralmsg3 = '"It''s good that I wasn''t out of it or anything. I wouldn''t want to be unable to remember how it made me feel."'
  296. elseif $firstoralstate = 'verydrunk':
  297. $firstoralmsg3 = '"I sometimes wonder if it would have gone differently if I hadn''t been so drunk. Maybe..."'
  298. elseif $firstoralstate = 'hornyfromdrugs':
  299. $firstoralmsg3 = '"At the time I was so horny from the drugs that I just couldn''t really do anything but go on."'
  300. end
  301. end
  302. end
  303. end
  304. !! Generate message for description
  305. if $ARGS[2] = 'unaware':
  306. if $ARGS[0] = 'vaginal':
  307. if $firstvagrough = 'gentle' or $firstvagrough = 'unknown':
  308. if $firstvagobj = '':
  309. $firstvagstat = 'You were raped when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>>.'
  310. else
  311. $firstvagstat = 'You were raped when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
  312. end
  313. elseif firstvagrough = 'rough':
  314. if $firstvagobj = '':
  315. $firstvagstat = 'You were raped roughly when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>>.'
  316. else
  317. $firstvagstat = 'You were raped roughly when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
  318. end
  319. end
  320. elseif $ARGS[0] = 'anal':
  321. if $firstanalrough = 'gentle' or $firstanalrough = 'unknown':
  322. if $firstanalobj = '':
  323. $firstanalstat = 'You were raped when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>>.'
  324. else
  325. $firstanalstat = 'You were raped when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
  326. end
  327. elseif firstanalrough = 'rough':
  328. if $firstanalobj = '':
  329. $firstanalstat = 'You were raped roughly when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>>.'
  330. else
  331. $firstanalstat = 'You were raped roughly when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
  332. end
  333. end
  334. elseif $ARGS[0] = 'oral':
  335. if $firstoralrough = 'gentle' or $firstoralrough = 'unknown':
  336. if $firstoralobj = '':
  337. $firstoralstat = 'You were raped when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>>.'
  338. else
  339. $firstoralstat = 'You were raped when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
  340. end
  341. elseif firstoralrough = 'rough':
  342. if $firstoralobj = '':
  343. $firstoralstat = 'You were raped roughly when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>>.'
  344. else
  345. $firstoralstat = 'You were raped roughly when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
  346. end
  347. end
  348. end
  349. if $firstvagstate = 'sober':
  350. $firstvagstat += ' You don''t have any recollection of it happening even though you were <<$firstvagstate>>.'
  351. elseif $firstvagstate = 'tipsy':
  352. $firstvagstat += ' You don''t have any recollection of it happening even though you were only <<$firstvagstate>>.'
  353. elseif $firstvagstate = 'verydrunk':
  354. $firstvagstat += ' You don''t have any recollection of it happening, probably because you were <<$firstvagstate>>.'
  355. elseif $firstvagstate = 'hornyfromdrugs':
  356. $firstvagstat += ' You don''t have any recollection of it happening, probably a side effect of the drugs that made you horny.'
  357. elseif $firstvagstate = 'unabletomove':
  358. $firstvagstat += ' You don''t have any recollection of it happening, probably a side effect of the drugs that made you unable to move.'
  359. end
  360. elseif $ARGS2 ! 'unaware':
  361. if $ARGS[0] = 'vaginal':
  362. if $firstvagconsent = 'rape':
  363. if $firstvagrough = 'gentle' or $firstvagrough = 'unknown':
  364. if $firstvagobj = '':
  365. $firstvagstat = 'You were raped when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>>.'
  366. else
  367. $firstvagstat = 'You were raped when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
  368. end
  369. elseif $firstvagrough = 'rough':
  370. if $firstvagobj = '':
  371. $firstvagstat = 'You were raped roughly when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>>.'
  372. else
  373. $firstvagstat = 'You were raped roughly when you were <<firstvagage>> by <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
  374. end
  375. end
  376. if $firstvagstate = 'sober':
  377. $firstvagstat += ' You remember every moment of it as you were <<$firstvagstate>>.'
  378. elseif $firstvagstate = 'tipsy':
  379. $firstvagstat += ' You remember every moment of it as you were only <<$firstvagstate>>.'
  380. elseif $firstvagstate = 'verydrunk':
  381. $firstvagstat += ' You don''t remember every moment of it happening, probably because you were <<$firstvagstate>>.'
  382. elseif $firstvagstate = 'hornyfromdrugs':
  383. $firstvagstat += ' You still don''t like to think about how horny you were from the drugs despite knowing deep down that you didn''t want it to happen.'
  384. elseif $firstvagstate = 'unabletomove':
  385. $firstvagstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
  386. end
  387. elseif $firstvagconsent = 'consensual':
  388. if $firstvagrough = 'gentle' or $firstvagrough = 'unknown':
  389. if $firstvagobj = '':
  390. $firstvagstat = 'You lost your virginity when you were <<firstvagage>>. Your first time was with <<$firstvagwho>> <<$firstvagloc>>.'
  391. else
  392. $firstvagstat = 'You lost your virginity when you were <<firstvagage>>. Your first time was with <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
  393. end
  394. elseif $firstvagrough = 'rough':
  395. if $firstvagobj = '':
  396. $firstvagstat = 'You lost your virginity when you were <<firstvagage>>. Your first time you had rough sex with <<$firstvagwho>> <<$firstvagloc>>.'
  397. else
  398. $firstvagstat = 'You lost your virginity when you were <<firstvagage>>. Your first time you had rough sex with <<$firstvagwho>> <<$firstvagloc>> using <<$firstvagobj>>.'
  399. end
  400. end
  401. if $firstvagstate = 'sober':
  402. $firstvagstat += ' You remember every moment of it as you were <<$firstvagstate>>.'
  403. elseif $firstvagstate = 'tipsy':
  404. $firstvagstat += ' You remember every moment of it as you were only <<$firstvagstate>>.'
  405. elseif $firstvagstate = 'verydrunk':
  406. $firstvagstat += ' You don''t remember every moment of it happening, probably because you were <<$firstvagstate>>.'
  407. elseif $firstvagstate = 'hornyfromdrugs':
  408. $firstvagstat += ' You still remember how horny you were from the drugs.'
  409. elseif $firstvagstate = 'unabletomove':
  410. $firstvagstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
  411. end
  412. elseif $firstvagconsent = 'self':
  413. if $firstvagrough = 'gentle' or $firstvagrough = 'unknown':
  414. $firstvagstat = 'You broke your own hymen when you were <<firstvagage>>. You did it <<$firstvagloc>> using <<$firstvagobj>>.'
  415. elseif $firstvagrough = 'rough':
  416. $firstvagstat = 'You broke your own hymen when you were <<firstvagage>>. You fucked yourself rougly <<$firstvagloc>> using <<$firstvagobj>>.'
  417. end
  418. if $firstvagstate = 'sober':
  419. $firstvagstat += ' You remember every moment of it as you were <<$firstvagstate>>.'
  420. elseif $firstvagstate = 'tipsy':
  421. $firstvagstat += ' You remember every moment of it as you were only <<$firstvagstate>>.'
  422. elseif $firstvagstate = 'verydrunk':
  423. $firstvagstat += ' You don''t remember every moment of it happening, probably because you were <<$firstvagstate>>.'
  424. elseif $firstvagstate = 'hornyfromdrugs':
  425. $firstvagstat += ' You still remember how horny you were from the drugs.'
  426. !! This should be an impossibiliy - If this shows up someone passed the wrong parameters
  427. elseif $firstvagstate = 'unabletomove':
  428. $firstvagstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
  429. end
  430. end
  431. elseif $ARGS[0] = 'anal':
  432. if $firstanalconsent = 'rape':
  433. if $firstanalrough = 'gentle' or $firstanalrough = 'unknown':
  434. if $firstanalobj = '':
  435. $firstanalstat = 'You were raped when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>>.'
  436. else
  437. $firstanalstat = 'You were raped when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
  438. end
  439. elseif firstanalrough = 'rough':
  440. if $firstanalobj = '':
  441. $firstanalstat = 'You were raped roughly when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>>.'
  442. else
  443. $firstanalstat = 'You were raped roughly when you were <<firstanalage>> by <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
  444. end
  445. end
  446. if $firstanalstate = 'sober':
  447. $firstanalstat += ' You remember every moment of it as you were <<$firstanalstate>>.'
  448. elseif $firstanalstate = 'tipsy':
  449. $firstanalstat += ' You remember every moment of it as you were only <<$firstanalstate>>.'
  450. elseif $firstanalstate = 'verydrunk':
  451. $firstanalstat += ' You don''t remember every moment of it happening, probably because you were <<$firstanalstate>>.'
  452. elseif $firstanalstate = 'hornyfromdrugs':
  453. $firstanalstat += ' You still don''t like to think about how horny you were from the drugs despite knowing deep down that you didn''t want it to happen.'
  454. elseif $firstanalstate = 'unabletomove':
  455. $firstanalstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
  456. end
  457. elseif $firstanalconsent = 'consensual':
  458. if $firstanalrough = 'gentle' or $firstanalrough = 'unknown':
  459. if $firstanalobj = '':
  460. $firstanalstat = 'You lost your anal virginity when you were <<firstanalage>> to <<$firstanalwho>> <<$firstanalloc>>.'
  461. else
  462. $firstanalstat = 'You lost your anal virginity when you were <<firstanalage>> to <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
  463. end
  464. elseif firstanalrough = 'rough':
  465. if $firstanalobj = '':
  466. $firstanalstat = 'You lost your anal virginity when you were <<firstanalage>>. You had rough anal sex with <<$firstanalwho>> <<$firstanalloc>>.'
  467. else
  468. $firstanalstat = 'You lost your anal virginity when you were <<firstanalage>>. You had rough anal sex with <<$firstanalwho>> <<$firstanalloc>> using <<$firstanalobj>>.'
  469. end
  470. end
  471. if $firstanalstate = 'sober':
  472. $firstanalstat += ' You remember every moment of it as you were <<$firstanalstate>>.'
  473. elseif $firstanalstate = 'tipsy':
  474. $firstanalstat += ' You remember every moment of it as you were only <<$firstanalstate>>.'
  475. elseif $firstanalstate = 'verydrunk':
  476. $firstanalstat += ' You don''t remember every moment of it happening, probably because you were <<$firstanalstate>>.'
  477. elseif $firstanalstate = 'hornyfromdrugs':
  478. $firstanalstat += ' You still remember how horny you were from the drugs.'
  479. elseif $firstanalstate = 'unabletomove':
  480. $firstanalstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
  481. end
  482. elseif $firstanalconsent = 'self':
  483. if $firstanalrough = 'gentle' or $firstanalrough = 'unknown':
  484. $firstanalstat = 'You popped your own anal cherry when you were <<firstanalage>>. You did it <<$firstanalloc>> using <<$firstanalobj>>.'
  485. elseif $firstanalrough = 'rough':
  486. $firstanalstat = 'You popped your own anal cherry when you were <<firstanalage>>. You fucked yourself rougly <<$firstanalloc>> using <<$firstanalobj>>.'
  487. end
  488. if $firstanalstate = 'sober':
  489. $firstanalstat += ' You remember every moment of it as you were <<$firstanalstate>>.'
  490. elseif $firstanalstate = 'tipsy':
  491. $firstanalstat += ' You remember every moment of it as you were only <<$firstanalstate>>.'
  492. elseif $firstanalstate = 'verydrunk':
  493. $firstanalstat += ' You don''t remember every moment of it happening, probably because you were <<$firstanalstate>>.'
  494. elseif $firstanalstate = 'hornyfromdrugs':
  495. $firstanalstat += ' You still remember how horny you were from the drugs.'
  496. !! This should be an impossibiliy - If this shows up someone passed the wrong parameters
  497. elseif $firstanalstate = 'unabletomove':
  498. $firstanalstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
  499. end
  500. end
  501. elseif $ARGS[0] = 'oral':
  502. if $firstoralconsent = 'rape':
  503. if $firstoralrough = 'gentle' or $firstoralrough = 'unknown':
  504. if $firstoralobj = '':
  505. $firstoralstat = 'You were raped when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>>.'
  506. else
  507. $firstoralstat = 'You were raped when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
  508. end
  509. elseif firstoralrough = 'rough':
  510. if $firstoralobj = '':
  511. $firstoralstat = 'You were raped roughly when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>>.'
  512. else
  513. $firstoralstat = 'You were raped roughly when you were <<firstoralage>> by <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
  514. end
  515. end
  516. if $firstoralstate = 'sober':
  517. $firstoralstat += ' You remember every moment of it as you were <<$firstoralstate>>.'
  518. elseif $firstoralstate = 'tipsy':
  519. $firstoralstat += ' You remember every moment of it as you were only <<$firstoralstate>>.'
  520. elseif $firstoralstate = 'verydrunk':
  521. $firstoralstat += ' You don''t remember every moment of it happening, probably because you were <<$firstoralstate>>.'
  522. elseif $firstoralstate = 'hornyfromdrugs':
  523. $firstoralstat += ' You still don''t like to think about how horny you were from the drugs despite knowing deep down that you didn''t want it to happen.'
  524. elseif $firstoralstate = 'unabletomove':
  525. $firstoralstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
  526. end
  527. elseif $firstoralconsent = 'consensual':
  528. if $firstoralrough = 'gentle' or $firstoralrough = 'unknown':
  529. if $firstoralobj = '':
  530. $firstoralstat = 'You lost your anal virginity when you were <<firstoralage>> to <<$firstoralwho>> <<$firstoralloc>>.'
  531. else
  532. $firstoralstat = 'You lost your anal virginity when you were <<firstoralage>> to <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
  533. end
  534. elseif firstoralrough = 'rough':
  535. if $firstoralobj = '':
  536. $firstoralstat = 'You lost your anal virginity when you were <<firstoralage>>. You had rough anal sex with <<$firstoralwho>> <<$firstoralloc>>.'
  537. else
  538. $firstoralstat = 'You lost your anal virginity when you were <<firstoralage>>. You had rough anal sex with <<$firstoralwho>> <<$firstoralloc>> using <<$firstoralobj>>.'
  539. end
  540. end
  541. if $firstoralstate = 'sober':
  542. $firstoralstat += ' You remember every moment of it as you were <<$firstoralstate>>.'
  543. elseif $firstoralstate = 'tipsy':
  544. $firstoralstat += ' You remember every moment of it as you were only <<$firstoralstate>>.'
  545. elseif $firstoralstate = 'verydrunk':
  546. $firstoralstat += ' You don''t remember every moment of it happening, probably because you were <<$firstoralstate>>.'
  547. elseif $firstoralstate = 'hornyfromdrugs':
  548. $firstoralstat += ' You still remember how horny you were from the drugs.'
  549. elseif $firstoralstate = 'unabletomove':
  550. $firstoralstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
  551. end
  552. elseif $firstoralconsent = 'self':
  553. if $firstoralrough = 'gentle' or $firstoralrough = 'unknown':
  554. $firstoralstat = 'You popped your own anal cherry when you were <<firstoralage>>. You did it <<$firstoralloc>> using <<$firstoralobj>>.'
  555. elseif $firstoralrough = 'rough':
  556. $firstoralstat = 'You popped your own anal cherry when you were <<firstoralage>>. You fucked yourself rougly <<$firstoralloc>> using <<$firstoralobj>>.'
  557. end
  558. if $firstoralstate = 'sober':
  559. $firstoralstat += ' You remember every moment of it as you were <<$firstoralstate>>.'
  560. elseif $firstoralstate = 'tipsy':
  561. $firstoralstat += ' You remember every moment of it as you were only <<$firstoralstate>>.'
  562. elseif $firstoralstate = 'verydrunk':
  563. $firstoralstat += ' You don''t remember every moment of it happening, probably because you were <<$firstoralstate>>.'
  564. elseif $firstoralstate = 'hornyfromdrugs':
  565. $firstoralstat += ' You still remember how horny you were from the drugs.'
  566. !! This should be an impossibiliy - If this shows up someone passed the wrong parameters
  567. elseif $firstoralstate = 'unabletomove':
  568. $firstoralstat += ' You don''t remember every moment of it happening, probably a side effect of the drugs that made you unable to move.'
  569. end
  570. end
  571. end
  572. end
  573. end
  574. --- virginity_call ---------------------------------