fight.qsrc 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392
  1. # fight
  2. if $ARGS[0] = 'start':
  3. menu_off = 1
  4. cla
  5. if fight_cheat = 1:
  6. xgt 'ender', 'win'
  7. exit
  8. end
  9. inFight = 1
  10. gs 'themes', 'indoors'
  11. gs'defence'
  12. gs'statBat'
  13. if SasoriBody > 2 and healthV <= 0 or SasoriBody > 2 and mannaV <= 0 or SasoriBody > 2 and willpowerV <= 0:
  14. SasoriBody = SasoriBody - 1
  15. gs'priziv','sasori'
  16. '<b><font color = red>The doll parts scatter all over and immediately head into battle mode.</font></b>'
  17. '<b><font color = red>You hear the sonorous voice of Sasori, "I have a lots of dolls, you can''t beat me."</font></b>'
  18. elseif SasoriBody = 2 and healthV <= 0 or SasoriBody = 2 and mannaV <= 0 or SasoriBody = 2 and willpowerV <= 0:
  19. SasoriBody = SasoriBody - 1
  20. gs'priziv','sasori1'
  21. '<b><font color = red>The last doll crumbles into pieces and you''ve finally reached Sasori.</font></b>'
  22. end
  23. if stunV > 0 and SasoriBody > 1:
  24. stunV = 0
  25. '<b><font color = red>The doll began to move again.</font></b>'
  26. end
  27. if stunV > 0 and SasoriBody = 1:
  28. stunV = 0
  29. '<b><font color = red>Sasori moves again.</font></b>'
  30. end
  31. if GedoMazo = 1 and healthV <= 0 or GedoMazo = 1 and mannaV <= 0 or GedoMazo = 1 and willpowerV <= 0:
  32. GedoMazo = 2
  33. barierV = 0
  34. '<b><font color = green><<$boydesc>> He fell to the ground and turned to dust.</font></b>'
  35. gs'priziv','tobi'
  36. '<b><font color = green><<$boydesc>>Attack</font></b>'
  37. end
  38. if pcs_health <= 0 and heart = 0 and izanagi = 0:
  39. '<b><font color = red> You lost!</font></b>'
  40. xgt'ender','loss'
  41. exit
  42. elseif healthV <= 0 and heartV = 0 and izanagiV = 0:
  43. '<b><font color = green><<$boydesc>> You won!</font></b>'
  44. xgt'ender','win'
  45. exit
  46. elseif pcs_manna <= 0 and heart = 0 and izanagi = 0:
  47. '<b><font color = red> You won!</font></b>'
  48. xgt'ender','loss'
  49. exit
  50. elseif mannaV <= 0 and heartV = 0 and izanagiV = 0:
  51. '<b><font color = green><<$boydesc>> lost!</font></b>'
  52. xgt'ender','win'
  53. exit
  54. elseif pcs_willpwr <= 0 and heart = 0 and izanagi = 0:
  55. '<b><font color = red> You lost!</font></b>'
  56. xgt'ender','loss'
  57. exit
  58. elseif willpowerV <= 0 and heartV = 0 and izanagiV = 0:
  59. '<b><font color = green><<$boydesc>> won!</font></b>'
  60. xgt'ender','win'
  61. exit
  62. end
  63. if izanagiV > 0 and healthV <= 0 or izanagiV > 0 and mannaV <= 0 or izanagiV > 0 and willpowerV <= 0:
  64. izanagiV = izanagiV - 1
  65. '<b><font color = red><<$boydesc>> disappeared.</font></b>'
  66. healthV = vitalV*10 + strenV*5
  67. mannaV = intelV*magikV + magikV*100 + vitalV*10
  68. willpowerV = willV*10
  69. stunV = 0
  70. if program = 6 and izanagiOnce = 0:izanagiOnce = 1 & unmaterialV = 40 & tobizanagi = 0
  71. '<b><font color = red><<$boydesc>> appeared in front of you, completely healthy. He folded his arms and made the magic sign for Izanagi, the perfect illusion.</font></b>'
  72. '<b><font color = red>The price for this spell was to sacrifice one of my eyes.</font></b>'
  73. elseif heartV > 0 and healthV <= 0 or heartV > 0 and mannaV <= 0 or heartV > 0 and willpowerV <= 0:
  74. heartV = heartV - 1
  75. '<b><font color = red><<$boydesc>> staggered, as his heart burst.</font></b>'
  76. healthV = vitalV*10 + strenV*5
  77. mannaV = intelV*magikV + magikV*100 + vitalV*10
  78. willpowerV = willV*10
  79. stunV = 0
  80. '<b><font color = red><<$boydesc>> stood up and got in a frenzy. He must have another heart.</font></b>'
  81. elseif izanagi > 0 and pcs_health <= 0 or izanagi > 0 and pcs_manna <= 0 or izanagi > 0 and pcs_willpwr <= 0:
  82. izanagi = izanagi - 1
  83. '<b><font color = green>He vanishes.</font></b>'
  84. pcs_health = pcs_vital*10 + pcs_stren*5
  85. pcs_willpwr = pcs_intel*5 + pcs_sprt*5
  86. pcs_manna = (pcs_intel*pcs_magik) + pcs_magik*100 + pcs_vital*10 + rikudo
  87. stun = 0
  88. zerkaloV = 0
  89. poisonV = 0
  90. bloodV = 0
  91. '<b><font color = green>All of a sudden he appears in front of you completely healthy.</font></b>'
  92. elseif heart > 0 and pcs_health <= 0 or heart > 0 and pcs_manna <= 0 or heart > 0 and pcs_willpwr <= 0:
  93. heart = heart - 1
  94. zerkaloV = 0
  95. poisonV = 0
  96. bloodV = 0
  97. '<b><font color = green>Your heart took too much of a beating and gave up.</font></b>'
  98. pcs_health = pcs_vital*10 + pcs_stren*5
  99. pcs_willpwr = pcs_intel*5 + pcs_sprt*5
  100. pcs_manna = (pcs_intel*pcs_magik) + pcs_magik*100 + pcs_vital*10 + rikudo
  101. stun = 0
  102. '<b><font color = green>You open your eyes as you''re not dead...</font></b>'
  103. end
  104. gs'before'
  105. '<b>= = = = = = = = = = = = = (ROUND <<round>>) = = = = = = = = = = = = =</b>'
  106. '<b><<$boydesc>></b> life <b><font color = red><<healthV>></font></b>, manna <b><font color = blue><<mannaV>></font></b>, willpower <b><font color = green><<willpowerV>></font></b>'
  107. if defenceV > 0:'<b><font color = red>Protection <<defenceV>> units</font></b>'
  108. if defenceMV > 0:'<b><font color = red>Mana protection <<defenceMV>> units</font></b>'
  109. if defenceWV > 0:'<b><font color = red>Will protection <<defenceWV>> units</font></b>'
  110. 'Your life <b><font color = red><<pcs_health>></font></b>, manna <b><font color = blue><<pcs_manna>></font></b>, willpower <b><font color = green><<pcs_willpwr>></font></b>'
  111. if defence > 0:'<b><font color = green>Protection <<defence>> units</font></b>'
  112. if defenceM > 0:'<b><font color = green>Mana impact protection <<defenceM>> units</font></b>'
  113. if defenceW > 0:'<b><font color = green>Will impact protection <<defenceW>> units</font></b>'
  114. if defenceAct > 0:'<b><font color = green><<defenceAct>> Regeneration</font></b>'
  115. if defenceActM > 0:'<b><font color = green><<defenceActM>> Mana recovery protection</font></b>'
  116. if unmaterial > 0:'<b><font color = green>You''re <<unmaterial>> strokes are not material.</font></b>'
  117. '<b>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =</b>'
  118. gs'init'
  119. if hod = 0:
  120. !player attacks
  121. '<font color = green>Choose your attack</font>'
  122. if gun > 0:
  123. !Boomstick
  124. if bulletIn > 0:
  125. 'You have <<bulletIn>> bullets loaded in the gun.'
  126. act 'Pistol shot':
  127. cla
  128. bulletIn -= 1
  129. gunpower = 150
  130. buu = 1
  131. gunpricel = 1
  132. Gcrime += 1
  133. gt'strelba'
  134. end
  135. elseif bulletIn <= 0:
  136. if bullet = 0:
  137. 'You''re out of ammunition.'
  138. elseif bullet>0:
  139. 'You have <<bullet>> left.'
  140. act 'Reload':
  141. cla
  142. if bullet < 7:
  143. bulletIn = bullet
  144. bullet = 0
  145. 'You reload the empty gun.'
  146. end
  147. if bullet >= 7:
  148. bullet -= 7
  149. bulletIn = 7
  150. 'You reload all the 7 bullets in the gun.'
  151. end
  152. act 'Further':gt'fight','sta'
  153. end
  154. end
  155. end
  156. end
  157. if Mgun > 0:
  158. !Boomstick
  159. if mbulletIn > 0:
  160. 'You have <<mbulletIn>> bullets left in the machine gun.'
  161. act 'Single shot':
  162. cla
  163. mbulletIn -= 1
  164. buu = 1
  165. gunpower = 300
  166. gunpricel = 2
  167. Gcrime += 1
  168. gt'strelba'
  169. end
  170. if mbulletIn >= 3:
  171. act 'Burst shot':
  172. cla
  173. mbulletIn -= 3
  174. buu = 3
  175. gunpower = 300
  176. gunpricel = 1
  177. Gcrime += buu
  178. gt'strelba'
  179. end
  180. act 'Automatic shot':
  181. cla
  182. buu = mbulletIn
  183. mbulletIn = 0
  184. gunpower = 300
  185. gunpricel = 0
  186. Gcrime += buu
  187. gt'strelba'
  188. end
  189. end
  190. elseif mbulletIn <= 0:
  191. if mbullet = 0:
  192. 'You''ve run out of ammunition.'
  193. elseif mbullet > 0:
  194. 'You have <<mbullet>> bullets left in the machine gun.'
  195. act 'Reload':
  196. cla
  197. if mbullet < 7:
  198. mbulletIn = mbullet
  199. mbullet = 0
  200. 'You reload the empty gun.'
  201. end
  202. if mbullet >= 30:
  203. mbullet -= 30
  204. mbulletIn = 30
  205. 'You''ve reloaded 30 bullets for the machine gun.'
  206. end
  207. act 'Further':gt'fight','sta'
  208. end
  209. end
  210. end
  211. end
  212. if tragun > 0:
  213. !travmatik
  214. if tbulletIn > 0:
  215. 'You have <<mbulletIn>> bullets left in the non-lethal gun.'
  216. act 'Pistol shot':
  217. cla
  218. tbulletIn -= 1
  219. gunpower = 50
  220. buu = 1
  221. gunpricel = 0
  222. gt'strelba'
  223. end
  224. elseif tbulletIn <= 0:
  225. if tbullet = 0:
  226. 'You''ve run out of ammunition.'
  227. elseif tbullet > 0:
  228. 'You have <<mbullet>> bullets left in the non-lethal gun.'
  229. act 'Charge':
  230. cla
  231. if tbullet >= 1:
  232. tbullet -= 1
  233. tbulletIn = 1
  234. 'You reload the empty gun.'
  235. end
  236. act 'Further':gt'fight','sta'
  237. end
  238. end
  239. end
  240. end
  241. if autocombat_cheat = 0 or pcs_magick > 0:
  242. act 'Physical Attack':xgt'boxing'
  243. if pcs_magik > 0: act 'Magical Attack':gt'magik'
  244. act 'Surrender to your opponent': autocombat_surrender = 1 & gt 'ender', 'loss'
  245. elseif autocombat_cheat = 1 and pcs_magick = 0:
  246. xgt'boxing'
  247. end
  248. elseif hod = 1:
  249. !enemy attacks
  250. '<font color = red><<$boydesc>> attacks</font>'
  251. if autocombat_cheat = 0:
  252. act 'Continue': xgt'enemy','start'
  253. act 'Surrender to your opponent': autocombat_surrender = 1 & gt 'ender', 'loss'
  254. elseif autocombat_cheat = 1:
  255. xgt'enemy','start'
  256. end
  257. end
  258. end
  259. if $ARGS[0] = 'sta':
  260. menu_off = 1
  261. cla
  262. damTip = 0
  263. damTipM = 0
  264. damTipV = 0
  265. damTipMV = 0
  266. magweapbonus = 0
  267. magweapbonusV = 0
  268. bonusSh = 0
  269. bonusShV = 0
  270. eleSh = 0
  271. eleShV = 0
  272. poisonAV = 0
  273. hidanAtk = 0
  274. '<b>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =</b>'
  275. '<b><<$boydesc>></b> life <b><font color = red><<healthV>></font></b>, manna <b><font color = blue><<mannaV>></font></b>, willpower <b><font color = green><<willpowerV>></font></b>'
  276. if defenceV > 0:'<b><font color = red>Protection <<defenceV>> units</font></b>'
  277. if defenceMV > 0:'<b><font color = red>Mana protection <<defenceMV>> units</font></b>'
  278. if defenceWV > 0:'<b><font color = red>Will protection <<defenceWV>> units</font></b>'
  279. 'Your life <b><font color = red><<pcs_health>></font></b>, manna <b><font color = blue><<pcs_manna>></font></b>, willpower <b><font color = green><<pcs_willpwr>></font></b>'
  280. if defence > 0:'<b><font color = green>Protection <<defence>> units</font></b>'
  281. if defenceM > 0:'<b><font color = green>Mana impact protection <<defenceM>> units</font></b>'
  282. if defenceW > 0:'<b><font color = green>Will impact protection <<defenceW>> units</font></b>'
  283. if defenceAct > 0:'<b><font color = green><<defenceAct>> Regeneration</font></b>'
  284. if defenceActM > 0:'<b><font color = green><<defenceActM>> Mana recovery protection</font></b>'
  285. '<b>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =</b>'
  286. if autocombat_cheat = 0: act 'Continue':gt'fight','start'
  287. if autocombat_cheat = 1: gt'fight','start'
  288. end
  289. if $ARGS[0] = 'Wrestlergen':
  290. if nopornowrestling = 0:
  291. nopornowrestling = 1
  292. NPCnum = 30
  293. NPCnow = 1
  294. !!shag = 1
  295. gs 'npc'
  296. NoView = 1
  297. NPCrost = 30
  298. gs 'generation'
  299. NoView = 1
  300. NPCrost = 30
  301. gs 'generation'
  302. NoView = 1
  303. NPCrost = 30
  304. gs 'generation'
  305. NoView = 1
  306. NPCrost = 30
  307. gs 'generation'
  308. NoView = 1
  309. NPCrost = 30
  310. gs 'generation'
  311. $nikname[1] = 'schoolgirl'
  312. !!musle[0] = 100
  313. !!flex[0] = pcs_agil
  314. !!stamina[0] = pcs_vital * 3
  315. !!wipo[0] = pcs_sprt
  316. !!pcs_intel[0] = 10
  317. !!krasota[0] = pcs_apprnc
  318. !!pcs_hgt[0] = 165
  319. !!salo[0] = 100
  320. !!fat[0] = 100
  321. !!$nikname[1] = 'steel Virgo'
  322. !!musle[1] = 100
  323. !!flex[1] = 100
  324. !!stamina[1] = 300
  325. !!wipo[1] = 50
  326. !!pcs_intel[1] = 10
  327. !!krasota[1] = 10
  328. !!pcs_hgt[1] = 165
  329. !!salo[1] = 100
  330. !!fat[1] = 100
  331. end
  332. end
  333. --- fight ---------------------------------