0
0

043_fight 10.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349
  1. # fight
  2. if $ARGS[0] = 'start':
  3. cla
  4. inFight = 1
  5. fcolor = rgb(0, 0, 0)
  6. bcolor = rgb(255, 255, 255)
  7. lcolor = rgb(106, 90, 205)
  8. gs 'defence'
  9. gs 'statBat'
  10. if SasoriBody > 2 and healthV <= 0 or SasoriBody > 2 and mannaV <= 0 or SasoriBody > 2 and willpowerV <= 0:
  11. set SasoriBody -= 1
  12. gs 'priziv', 'sasori'
  13. '<b><font color="red">Doll crumbled into parts, and immediately entered into battle other doll Sasori.</font></b>'
  14. '<b><font color="red">You´ve heard the sonorous voice Sasori "I have a lot of dolls, you can not win."</font></b>'
  15. end
  16. if SasoriBody = 2 and healthV <= 0 or SasoriBody = 2 and mannaV <= 0 or SasoriBody = 2 and willpowerV <= 0:
  17. set SasoriBody -= 1
  18. gs 'priziv', 'sasori1'
  19. '<b><font color="red">Last doll crumbled into pieces and entered the fight Sasori himself.</font></b>'
  20. end
  21. if stunV > 0 and SasoriBody > 1:
  22. set stunV = 0
  23. '<b><font color="red">Doll began to move again.</font></b>'
  24. end
  25. if stunV > 0 and SasoriBody = 1:
  26. set stunV = 0
  27. '<b><font color="red">again moves Sasori.</font></b>'
  28. end
  29. if GedoMazo = 1 and healthV <= 0 or GedoMazo = 1 and mannaV <= 0 or GedoMazo = 1 and willpowerV <= 0:
  30. set GedoMazo = 2
  31. set barierV = 0
  32. '<b><font color="green"><<$nameV>> fell to the ground turning into ashes</font></b>'
  33. gs 'priziv', 'tobi'
  34. '<b><font color="green"><<$nameV>> attacked you</font></b>'
  35. end
  36. if health <= 0 and heart = 0 and izanagi = 0:
  37. '<b><font color="red">you lose</font></b>'
  38. xgt 'ender', 'loss'
  39. exit
  40. end
  41. if healthV <= 0 and heartV = 0 and izanagiV = 0:
  42. '<b><font color="green"><<$nameV>> lost</font></b>'
  43. xgt 'ender', 'win'
  44. exit
  45. end
  46. if manna <= 0 and heart = 0 and izanagi = 0:
  47. '<b><font color="red">you lose</font></b>'
  48. xgt 'ender', 'loss'
  49. exit
  50. end
  51. if mannaV <= 0 and heartV = 0 and izanagiV = 0:
  52. '<b><font color="green"><<$nameV>> lost</font></b>'
  53. xgt 'ender', 'win'
  54. exit
  55. end
  56. if willpower <= 0 and heart = 0 and izanagi = 0:
  57. '<b><font color="red">you lose</font></b>'
  58. xgt 'ender', 'loss'
  59. exit
  60. end
  61. if willpowerV <= 0 and heartV = 0 and izanagiV = 0:
  62. '<b><font color="green"><<$nameV>> lost</font></b>'
  63. xgt 'ender', 'win'
  64. exit
  65. end
  66. if izanagiV > 0 and healthV <= 0 or izanagiV > 0 and mannaV <= 0 or izanagiV > 0 and willpowerV <= 0:
  67. set izanagiV -= 1
  68. '<b><font color="red"><<$nameV>> simply disappeared</font></b>'
  69. set healthV = vitalV * 10 + strenV * 5
  70. set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
  71. set willpowerV = willV * 10
  72. set stunV = 0
  73. if program = 6 and izanagiOnce = 0:set izanagiOnce = 1 & set unmaterialV = 40 & set tobizanagi = 0
  74. '<b><font color="red"><<$nameV>> was in front of you completely healthy. He folded his hands and Arcanum said Izanagi - perfect illusion.</font></b>'
  75. '<b><font color="red">One of his eyes closed for ever, paying for it with a spell.</font></b>'
  76. end
  77. if heartV > 0 and healthV <= 0 or heartV > 0 and mannaV <= 0 or heartV > 0 and willpowerV <= 0:
  78. set heartV -= 1
  79. '<b><font color="red"><<$nameV>> staggered and his heart burst</font></b>'
  80. set healthV = vitalV * 10 + strenV * 5
  81. set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
  82. set willpowerV = willV * 10
  83. set stunV = 0
  84. '<b><font color="red"><<$nameV>> stood up and rushed into the fray. He has run another heart.</font></b>'
  85. end
  86. if izanagi > 0 and health <= 0 or izanagi > 0 and manna <= 0 or izanagi > 0 and willpower <= 0:
  87. set izanagi -= 1
  88. '<b><font color="green">You are gone</font></b>'
  89. set health = vital * 10 + stren * 5
  90. set willpower = intel * 5 + will * 5
  91. set manna = intel * magik + magik * 100 + vital * 10 + rikudo
  92. set stun = 0
  93. set zerkaloV = 0
  94. set poisonV = 0
  95. set bloodV = 0
  96. '<b><font color="green">Immediately before the enemy appeared completely healthy.</font></b>'
  97. end
  98. if heart > 0 and health <= 0 or heart > 0 and manna <= 0 or heart > 0 and willpower <= 0:
  99. set heart -= 1
  100. set zerkaloV = 0
  101. set poisonV = 0
  102. set bloodV = 0
  103. '<b><font color="green">Your heart gave out and snapped.</font></b>'
  104. set health = vital * 10 + stren * 5
  105. set willpower = intel * 5 + will * 5
  106. set manna = intel * magik + magik * 100 + vital * 10 + rikudo
  107. set stun = 0
  108. '<b><font color="green">You´re not dead, you run another heart.</font></b>'
  109. end
  110. gs 'before'
  111. '<b>=============================================== ===========</b>'
  112. '<b>======================== (ROUND <<round>>) ================= ==========</b>'
  113. '<b>=============================================== ===========</b>'
  114. '<b><<$nameV>></b> Life <b><font color="red"><<healthV>></font></b>, manna <b><font color="blue"><<mannaV>></font></b>, the force will <b>(9 )<<willpowerV>></font></b>'
  115. if defenceV > 0:'<b><font color="red">Protection <<defenceV>> units</font></b>'
  116. if defenceMV > 0:'<b><font color="red">Protection of manna <<defenceMV>> units</font></b>'
  117. if defenceWV > 0:'<b><font color="red">will protection <<defenceWV>> units</font></b>'
  118. 'Your life <b><font color="red"><<health>></font></b>, the manna <b><font color="blue"><<manna>></font></b>, willpower <b><font color="green"><<willpower>></font> ( 5)'
  119. if defence > 0:'<b><font color="green">Protection <<defence>> units</font></b>'
  120. if defenceM > 0:'<b><font color="green">Protection from the effects of manna <<defenceM>> units</font></b>'
  121. if defenceW > 0:'<b><font color="green">Protection from the effects at will <<defenceW>> units</font></b>'
  122. if defenceAct > 0:'<b><font color="green"><<defenceAct>> moves the regeneration of protection</font></b>'
  123. if defenceActM > 0:'<b><font color="green"><<defenceActM>> moves the protection from the effects of regeneration manna</font></b>'
  124. if unmaterial > 0:'<b><font color="green">, Left <<unmaterial>> moves not materiality.</font></b>'
  125. '<b>=============================================== ===========</b>'
  126. gs 'init'
  127. if hod = 0:
  128. !Player attacks
  129. '<font color="green">You can attack</font>'
  130. if gun > 0:
  131. !Boomstick
  132. if bulletIn > 0:
  133. '<<bulletIn>> load cartridges in gun'
  134. act 'Shoot a gun':
  135. cla
  136. bulletIn -= 1
  137. gunpower = 150
  138. buu = 1
  139. gunpricel = 1
  140. Gcrime += 1
  141. gt 'strelba'
  142. end
  143. end
  144. if bulletIn <= 0:
  145. if bullet = 0:'Ammunition for the gun ran.'
  146. if bullet > 0:
  147. '<<bullet>> ammunition for the pistol'
  148. act 'Reload':
  149. cla
  150. if bullet < 7:
  151. bulletIn = bullet
  152. bullet = 0
  153. 'You loaded any remaining bullets in the gun.'
  154. end
  155. if bullet >= 7:
  156. bullet -= 7
  157. bulletIn = 7
  158. 'You loaded 7m rounds in the gun.'
  159. end
  160. act 'Further':gt 'fight', 'sta'
  161. end
  162. end
  163. end
  164. end
  165. if Mgun > 0:
  166. !Boomstick
  167. if mbulletIn > 0:
  168. '<<mbulletIn>> load cartridges in the machine'
  169. act 'Of single machine':
  170. cla
  171. mbulletIn -= 1
  172. buu = 1
  173. gunpower = 300
  174. gunpricel = 2
  175. Gcrime += 1
  176. gt 'strelba'
  177. end
  178. if mbulletIn >= 3:
  179. act 'A short burst of machine':
  180. cla
  181. mbulletIn -= 3
  182. buu = 3
  183. gunpower = 300
  184. gunpricel = 1
  185. Gcrime += buu
  186. gt 'strelba'
  187. end
  188. end
  189. if mbulletIn >= 3:
  190. act 'Long queue of machine':
  191. cla
  192. buu = mbulletIn
  193. mbulletIn = 0
  194. gunpower = 300
  195. gunpricel = 0
  196. Gcrime += buu
  197. gt 'strelba'
  198. end
  199. end
  200. end
  201. if mbulletIn <= 0:
  202. if mbullet = 0:'Chucks for machine ran.'
  203. if mbullet > 0:
  204. '<<mbullet>> ammunition for the machine'
  205. act 'Reload':
  206. cla
  207. if mbullet < 7:
  208. mbulletIn = mbullet
  209. mbullet = 0
  210. 'You loaded any remaining ammunition into the machine.'
  211. end
  212. if mbullet >= 30:
  213. mbullet -= 30
  214. mbulletIn = 30
  215. 'You loaded the 30 rounds in the machine.'
  216. end
  217. act 'Further':gt 'fight', 'sta'
  218. end
  219. end
  220. end
  221. end
  222. if tragun > 0:
  223. !Travmatik
  224. if tbulletIn > 0:
  225. 'travmatik loaded'
  226. act 'Shoot a gun':
  227. cla
  228. tbulletIn -= 1
  229. gunpower = 50
  230. buu = 1
  231. gunpricel = 0
  232. gt 'strelba'
  233. end
  234. end
  235. if tbulletIn <= 0:
  236. if tbullet = 0:'Cartridges ran travmatika.'
  237. if tbullet > 0:
  238. '<<tbullet>> cartridges for travmatika'
  239. act 'Reload':
  240. cla
  241. if tbullet >= 1:
  242. tbullet -= 1
  243. tbulletIn = 1
  244. 'You loaded the cartridge in travmatik.'
  245. end
  246. act 'Further':gt 'fight', 'sta'
  247. end
  248. end
  249. end
  250. end
  251. act 'Physical Attack':xgt 'boxing'
  252. if magik > 0:
  253. act 'Magical Attack':gt 'magik'
  254. end
  255. end
  256. if hod = 1:
  257. !Enemy attacks
  258. '<font color="red"><<$nameV>> attacks</font>'
  259. act 'Further':xgt 'enemy', 'start'
  260. end
  261. end
  262. if $ARGS[0] = 'sta':
  263. cla
  264. set damTip = 0
  265. set damTipM = 0
  266. set damTipV = 0
  267. set damTipMV = 0
  268. set magweapbonus = 0
  269. set magweapbonusV = 0
  270. set bonusSh = 0
  271. set bonusShV = 0
  272. set eleSh = 0
  273. set eleShV = 0
  274. set poisonAV = 0
  275. set hidanAtk = 0
  276. '<b>=============================================== ===========</b>'
  277. '<b><<$nameV>></b> Life <b><font color="red"><<healthV>></font></b>, manna <b><font color="blue"><<mannaV>></font></b>, the force will <b>(9 )<<willpowerV>></font></b>'
  278. if defenceV > 0:'<b><font color="red">Protection <<defenceV>> units</font></b>'
  279. if defenceMV > 0:'<b><font color="red">Protection of manna <<defenceMV>> units</font></b>'
  280. if defenceWV > 0:'<b><font color="red">will protection <<defenceWV>> units</font></b>'
  281. 'Your life <b><font color="red"><<health>></font></b>, the manna <b><font color="blue"><<manna>></font></b>, willpower <b><font color="green"><<willpower>></font> ( 5)'
  282. if defence > 0:'<b><font color="green">Protection <<defence>> units</font></b>'
  283. if defenceM > 0:'<b><font color="green">Protection from the effects of manna <<defenceM>> units</font></b>'
  284. if defenceW > 0:'<b><font color="green">Protection from the effects at will <<defenceW>> units</font></b>'
  285. if defenceAct > 0:'<b><font color="green"><<defenceAct>> moves the regeneration of protection</font></b>'
  286. if defenceActM > 0:'<b><font color="green"><<defenceActM>> moves the protection from the effects of regeneration manna</font></b>'
  287. '<b>=============================================== ===========</b>'
  288. act 'Further':gt 'fight', 'start'
  289. end
  290. --- fight ---------------------------------