1
0

Military 6.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208
  1. # Military
  2. if $ARGS[0] = 'start':
  3. $metkaM = $ARGS[0]
  4. $locM = $CURLOC
  5. $sexloc = $CURLOC
  6. gs 'stat'
  7. '<center><b><font color="maroon">Army Camp</font></b></center>'
  8. '<center><img src="images/img/military/military.jpg"></center>'
  9. 'A small city with a lot of tents and full of people, a lot of soldiers are running around with guns, training.'
  10. act 'Work in the infirmary':
  11. cla
  12. minut += 60
  13. sanrand = rand(0, 10)
  14. gs 'stat'
  15. if sanrand = 0:gt 'Military', 'san0'
  16. if sanrand = 1:gt 'Military', 'san1'
  17. 'You are working in the infirmary.'
  18. act 'Leave':gt 'Military', 'start'
  19. end
  20. act 'Go to your tent':gt 'Palatka', 'start'
  21. act 'Take a walk in the woods':
  22. cls
  23. '<center><img src="images/img/_nuki/military/woman_forest.jpg"></center>'
  24. minut += 60
  25. milprorand = rand(0, 10)
  26. gs 'stat'
  27. 'You walk for a while in the forest.'
  28. if milprorand = 0:gt 'Military', 'pro0'
  29. if milprorand = 1:gt 'Military', 'pro1'
  30. act 'Finish':gt 'Military', 'start'
  31. end
  32. act 'Get some food and drink from the mess hall':gs 'food', 'm_meal'
  33. if week < 6 or week = 7 and hour >= 18:
  34. cla
  35. minut += 60
  36. money += 5000
  37. act 'Go back to town':gt 'street'
  38. end
  39. end
  40. if $ARGS[0] = 'san0':
  41. cla
  42. *clr
  43. $boy = 'Soldier'
  44. soldercount = 1
  45. :soldiernaming
  46. $boycount = '#<<soldercount>> '+$boy
  47. arrmodtmp = arrpos('$cumarrnam',$boycount)
  48. if $cumarrnam[arrmodtmp] = $boycount:soldercount += 1 & jump 'soldiernaming'
  49. $boy=$boycount
  50. '<center><img src="images/img/military/san0.jpg"></center>'
  51. 'During the examination, the patient shows you his erection and looks at you with anticipation.'
  52. act 'Drive him away':gt 'Military', 'start'
  53. act 'Play along':
  54. guy += 1
  55. picrand = 41
  56. sexpartkno = 1
  57. gt 'sex', 'minet'
  58. end
  59. end
  60. if $ARGS[0] = 'san1':
  61. cla
  62. *clr
  63. $boy = 'Army Doctor'
  64. '<center><img src="images/img/military/san1.jpg"></center>'
  65. 'While the infirmary is unoccupied, the doctor begins to molest you.'
  66. act 'Drive him away':gt 'Military', 'start'
  67. act 'Play along':
  68. guy += 1
  69. picrand = 42
  70. sexpartkno = 1
  71. gt 'sex', 'minet'
  72. end
  73. end
  74. if $ARGS[0] = 'pro0':
  75. cla
  76. 'You met two soldiers whom ask you to help them out with a war game, in the role of a captive spy.'
  77. act 'Refuse':gt 'Military', 'start'
  78. act 'Agree':
  79. dynamic $CatName, 'Soldier'
  80. dynamic $CatName, 'Soldier', '$boy1'
  81. cla
  82. *clr
  83. '<center><img src="images/img/military/pro0.jpg"></center>'
  84. 'Your hands are tied and you are led to the headquarters where they set up an interrogation, then with the words "Now the interrogation begins!", they pull out their cocks. That''s what you get for allowing two burly men you do not even know to bind your hands.'
  85. act 'Submit':
  86. guy += 2
  87. SUB += 1
  88. picrand = 21
  89. sexpartkno = 1
  90. xgt 'sexdvoe', 'var'
  91. end
  92. end
  93. end
  94. if $ARGS[0] = 'pro1':
  95. cla
  96. 'You notice that a guy follows you for several minutes.'
  97. act 'Ignore it':gt 'military', 'rape'
  98. act 'Run away':
  99. '<center><img src="images/img/_nuki/military/forest_running.jpg"></center>'
  100. if beg < 10:peshimraperand = rand(0, 11)
  101. if beg >= 10 and beg < 20:peshimraperand = rand(0, 20)
  102. if beg >= 20 and beg < 30:peshimraperand = rand(0, 30)
  103. if beg >= 30 and beg < 40:peshimraperand = rand(0, 40)
  104. if beg >= 40 and beg < 50:peshimraperand = rand(0, 50)
  105. if beg >= 50 and beg < 60:peshimraperand = rand(0, 60)
  106. if beg >= 60 and beg < 70:peshimraperand = rand(0, 70)
  107. if beg >= 70 and beg < 80:peshimraperand = rand(0, 80)
  108. if beg >= 80 and beg < 90:peshimraperand = rand(0, 90)
  109. if beg >= 90:peshimraperand = rand(11, 100)
  110. if peshimraperand < 11:
  111. cla
  112. 'You tried to run away but the guy caught you.'
  113. act 'Further':gt 'military', 'rape'
  114. else
  115. cla
  116. 'You are rushing headlong, crashing through the bushes. Finally you ran back to the camp.'
  117. act 'Further':gt 'military', 'start'
  118. end
  119. end
  120. end
  121. if $ARGS[0] = 'rape':
  122. dynamic $CatName, 'Rapist'
  123. cla
  124. *clr
  125. rape += 1
  126. bj += 1
  127. sex += 1
  128. guy += 1
  129. anal += 1
  130. 'You suddenly feel a blow on the back of your head, and lose conciousness.'
  131. '...'
  132. '<center><img src="images/img/military/rape1.jpg"></center>'
  133. '...'
  134. 'You woke up in a barn with a bag on your head, so you can''t see anything. You also have a headache from the impact to your head, and a leash around your neck.'
  135. act 'Shout':
  136. cla
  137. *clr
  138. '<center><img src="images/img/military/rape2.jpg"></center>'
  139. 'You began to cry for help, when a dick is stuffed in your mouth.'
  140. '"Here''s something to shut your mouth", came the voice of a rapist.'
  141. 'You tried to spit it out, but its getting worse as he thrust it down your throat, and began to throatfuck you.'
  142. act 'Further':
  143. cla
  144. *clr
  145. cumprecheck = 1
  146. gs 'cum_manage'
  147. '<center><img src="images/img/military/rape3.jpg"></center>'
  148. 'When you are starting to lose consciousness choking on his cock, he takes it out of you mouth, pulls the baf from your head and throws you on a crate. He steps to you, forcing his dick into your vagina quite forcefully. Although you can see now, you still tied up to do effectively anything.'
  149. act 'Further':
  150. cla
  151. *clr
  152. '<center><img src="images/img/military/rape4.jpg"></center>'
  153. 'When your pussy bored him, he turned you around and drove his cock into your ass. You cry out in pain, but he does not care and continues to fuck your ass as hard as he could. You cry and beg him to at least use some lubrication, but he just scowls in response. You pass out from the pain and shock.'
  154. act 'Further':
  155. cla
  156. *clr
  157. sexpartkno = 1
  158. spafinloc = 12
  159. gs 'cum_manage'
  160. mop = 0
  161. minut += 240
  162. SUB += 5
  163. '<center><img src="images/img/military/rape5.jpg"></center>'
  164. 'You do not know how much time passed since you fainted, but when you regain your concoiusness he''s pulling out of you. He pulls you to your knees and stuck his dick in your mouth, saying only a word, "Suck". You dutifully start to suck him off with your ass is brutally raped and in pain, wondering whether to bite it off, but before you could give it a second thought your rapist suddenly comes in your mouth. After this you are immediately knocked out again with a blow to your head.'
  165. act 'Further':gt 'military', 'start'
  166. end
  167. end
  168. end
  169. end
  170. end
  171. --- Military ---------------------------------