125_Military 5.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162
  1. # Military
  2. if $ARGS[0] = 'start':
  3. $sexloc = $CURLOC
  4. gs 'stat'
  5. '<center><B><font color = maroon>polygon</font></B></center>'
  6. '<center><img src="images\img\military\military.jpg"></center>'
  7. 'Full of people around, near the tent city, and many guys are running around with guns.'
  8. act 'Work in the infirmary':
  9. cla
  10. set minut += 60
  11. set sanrand = rand(0,10)
  12. if sanrand = 0: gt 'Military','san0'
  13. if sanrand = 1: gt 'Military','san1'
  14. 'You worked in the infirmary.'
  15. act 'Exit': gt 'Military','start'
  16. end
  17. act 'Go to his tent': gt 'Palatka','start'
  18. act 'Walking in the woods':
  19. cla
  20. set minut += 60
  21. set milprorand = rand(0,10)
  22. if milprorand = 0: gt 'Military','pro0'
  23. if milprorand = 1: gt 'Military','pro1'
  24. 'You walk.'
  25. act 'Finish': gt 'Military','start'
  26. end
  27. act 'There is a field kitchen':
  28. set minut += 30
  29. set health += 10
  30. set manna += 20
  31. set energy += 20
  32. set water += 20
  33. gs 'stat'
  34. end
  35. if week < 6 or week = 7 and hour >= 18:
  36. cla
  37. set minut += 60
  38. set money += 5000
  39. act 'Go to town': gt 'street'
  40. end
  41. end
  42. if $ARGS[0] = 'san0':
  43. cla
  44. *clr
  45. '<center><img src="images\img\military\san0.jpg"></center>'
  46. 'During the examination, the patient shows you your erection and looks at you in anticipation of responses.'
  47. act 'Drive away': gt 'Military','start'
  48. act 'Post':
  49. set guy += 1
  50. set picrand = 41
  51. gt 'sex','minet'
  52. end
  53. end
  54. if $ARGS[0] = 'san1':
  55. cla
  56. *clr
  57. '<center><img src="images\img\military\san1.jpg"></center>'
  58. 'While in the infirmary is unoccupied, the doctor begins to pester you.'
  59. act 'Send': gt 'Military','start'
  60. act 'Post':
  61. set guy += 1
  62. set picrand = 42
  63. gt 'sex','minet'
  64. end
  65. end
  66. if $ARGS[0] = 'pro0':
  67. cla
  68. 'To suit you two guys and offer to help them in one game, play the role of a captive spy.'
  69. act 'Refuse': gt 'Military','start'
  70. act 'Agree':
  71. cla
  72. *clr
  73. '<center><img src="images\img\military\pro0.jpg"></center>'
  74. 'You tie the hands and lead to the headquarters, where they represent a long interrogation, and then with the words "We will torture you" get members. That´s what you thought before allowing two burly men you associate.'
  75. act 'Submit':
  76. set guy += 2
  77. set SUB += 1
  78. set picrand = 21
  79. xgt 'sexdvoe','var'
  80. end
  81. end
  82. end
  83. if $ARGS[0] = 'pro1':
  84. cla
  85. 'For you several minutes is what that guy'
  86. act 'Disregard': gt 'military','rape'
  87. act 'Run':
  88. if beg < 10: set peshimraperand = rand(0,11)
  89. if beg >= 10 and beg < 20: set peshimraperand = rand(0,20)
  90. if beg >= 20 and beg < 30: set peshimraperand = rand(0,30)
  91. if beg >= 30 and beg < 40: set peshimraperand = rand(0,40)
  92. if beg >= 40 and beg < 50: set peshimraperand = rand(0,50)
  93. if beg >= 50 and beg < 60: set peshimraperand = rand(0,60)
  94. if beg >= 60 and beg < 70: set peshimraperand = rand(0,70)
  95. if beg >= 70 and beg < 80: set peshimraperand = rand(0,80)
  96. if beg >= 80 and beg < 90: set peshimraperand = rand(0,90)
  97. if beg >= 90: set peshimraperand = rand(11,100)
  98. if peshimraperand < 11:
  99. cla
  100. 'You tried to run away but the guy you caught'
  101. act 'Further': gt 'military','rape'
  102. end
  103. if peshimraperand > 10:
  104. 'You are rushing headlong, crashing through the bushes. Finally, you ran to the polygon'
  105. act 'Further': gt 'military','start'
  106. end
  107. end
  108. end
  109. if $ARGS[0] = 'rape':
  110. cla
  111. *clr
  112. set rape += 1
  113. set bj += 1
  114. set sex += 1
  115. set guy += 1
  116. set anal += 1
  117. '<center><img src="images\img\military\rape1.jpg"></center>'
  118. 'You woke up in a certain barn with a bag on his head, his head ached badly from the impact.'
  119. act 'Shout':
  120. cla
  121. *clr
  122. '<center><img src="images\img\military\rape2.jpg"></center>'
  123. 'You began to cry, when you stuck in his mouth member.'
  124. '"Here´s the nipple to not scream" came the voice of a rapist.'
  125. 'You tried to spit out a member, but this was worse, he thrust it down your throat, and began to fuck your mouth.'
  126. act 'Further':
  127. cla
  128. *clr
  129. '<center><img src="images\img\military\rape3.jpg"></center>'
  130. 'When you have already started to lose consciousness, choking his cock in her throat, he took it out and threw you on what that box with the power you entered into the vagina, his cock pecked nischadno you, and you had to look at the leash him through tears.'
  131. act 'Further':
  132. cla
  133. *clr
  134. '<center><img src="images\img\military\rape4.jpg"></center>'
  135. 'When your pussy bored him, and he turned you apart buttocks drove a screw you in the ass, you cried out in pain, but he did not care and he continued to fuck your ass as I could, you cried and begged him to even be lubricated, but in response heard only pleased sniff, Mom told you learn to run that would not hurt Ass.'
  136. act 'Further':
  137. cla
  138. *clr
  139. '<center><img src="images\img\military\rape5.jpg"></center>'
  140. 'You do not remember how much time passed that you fainted then again came to himself, but in the end he pulled you from the box and you´re exhausted knelt down, he again stuck you dick in your mouth, with the words "Suck", you dutifully started dildo suck it, he has just brutally raped your anus, head wondered bite him, but knocked it a second thought, and suddenly not be able to do it then with my ass, finally he came in your mouth. And once you have lowered his head again as got hit on the head.'
  141. set cumlip += 1
  142. set mop = 0
  143. set minut += 240
  144. set SUB += 5
  145. act 'Further': gt 'military','start'
  146. end
  147. end
  148. end
  149. end
  150. end
  151. --- Military ---------------------------------