1
0

atakM 4.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184
  1. # atakM
  2. if $ARGS[0] = 'atakVmanna':
  3. cla
  4. !payment hit dodge
  5. poSp = speedV*20/100
  6. uvAg = pcs_agil*20/100
  7. poBox = reactV*20/100
  8. uvBox = pcs_react*20/100
  9. popad = RAND(reactV-poBox,reactV+poBox) + RAND(speedV-poSp,speedV+poSp)
  10. uvorot = RAND(pcs_react-uvBox,pcs_react+uvBox) + RAND(pcs_agil-uvAg,pcs_agil+uvAg)
  11. uvorKoef = uvorot*50/100
  12. popKoef = popad*50/100
  13. if popad > uvorot:
  14. if popad >= uvorot+uvorKoef:
  15. !Crete, very direct hit
  16. '<b><font color = red>Critical hits</font></b>'
  17. xgt'atakM','uronKritV'
  18. elseif popad < uvorot+uvorKoef:
  19. !Normal hit
  20. !He attacks the enemy
  21. '<b><font color = red>EYE</font></b>'
  22. xgt'atakM','uronV'
  23. end
  24. elseif popad <= uvorot:
  25. '<b><font color = green>LOST</font></b>'
  26. xgt'fight','sta'
  27. end
  28. end
  29. if $ARGS[0] = 'uronKritV':
  30. cla
  31. damage = RAND(1000,2000)
  32. damageM = RAND(1000,2000)
  33. if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
  34. if dospeh > 0:damage = damage - dospehDef & dospehEn = dospehEn - 1
  35. if damage < 0:damage = 0
  36. pcs_health = pcs_health - damage
  37. pcs_manna = pcs_manna - damageM
  38. '<b><font color = red>Your health harmed <<damage>> units</font></b>'
  39. '<b><font color = red>Your manna harmed <<damageM>> units</font></b>'
  40. if zerkalo > 0:
  41. zerkalo = zerkalo - 1
  42. healthV = healthV - damage
  43. '<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
  44. end
  45. xgt'fight','sta'
  46. end
  47. if defence > 0 and klon <= 0 and unmaterial <= 0:
  48. damSum = damage + damageM
  49. defence = defence - damSum
  50. '<b><font color = red>Your protection harmed <<damSum>> units</font></b>'
  51. xgt'fight','sta'
  52. end
  53. if klon > 0 and unmaterial <= 0:
  54. klon = klon - 1
  55. '<b><font color = red>It destroys your clone, Do you have more <<Klon>> Clones</font></b>'
  56. xgt'fight','sta'
  57. end
  58. if unmaterial > 0:
  59. unmaterial = unmaterial - 1
  60. '<b><font color = green>Beat the enemy flew right through your body. YOU are not material</font></b>'
  61. xgt'fight','sta'
  62. end
  63. if barier > 0:
  64. !imeniteta barrier for damage
  65. if barier >= damage:
  66. '<b><font color = green>You can easily withstand the impact of the enemy</font></b>'
  67. xgt'fight','sta'
  68. elseif barier < damage:
  69. pcs_manna = pcs_manna - damageM
  70. pcs_health = pcs_health - damage
  71. '<b><font color = red>You harmed <<damage>> units</font></b>'
  72. '<b><font color = red>Your manna harmed <<damageM>> units</font></b>'
  73. if zerkalo > 0:
  74. zerkalo = zerkalo - 1
  75. healthV = healthV - damage
  76. '<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
  77. end
  78. end
  79. xgt'fight','sta'
  80. end
  81. end
  82. if $ARGS[0] = 'uronV':
  83. cla
  84. damage = RAND(500,1000)
  85. damageM = RAND(500,1000)
  86. if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
  87. if dospeh > 0:damage = damage - dospehDef & dospehEn = dospehEn - 1
  88. if damage < 0:damage = 0
  89. pcs_health = pcs_health - damage
  90. pcs_manna = pcs_manna - damageM
  91. '<b><font color = red>Your health harmed <<damage>> units</font></b>'
  92. '<b><font color = red>Your manna harmed <<damageM>> units</font></b>'
  93. if zerkalo > 0:
  94. zerkalo = zerkalo - 1
  95. healthV = healthV - damage
  96. '<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
  97. end
  98. xgt'fight','sta'
  99. end
  100. if defence > 0 and klon <= 0 and unmaterial <= 0:
  101. damSum = damage + damageM
  102. defence = defence - damSum
  103. '<b><font color = red>Your protection harmed <<damSum>> units</font></b>'
  104. xgt'fight','sta'
  105. end
  106. if klon > 0 and unmaterial <= 0:
  107. klon = klon - 1
  108. '<b><font color = red>It destroys your clone, Do you have more <<Klon>> Clones</font></b>'
  109. xgt'fight','sta'
  110. end
  111. if unmaterial > 0:
  112. unmaterial = unmaterial - 1
  113. '<b><font color = green>Beat the enemy flew right through your body. YOU are not material</font></b>'
  114. xgt'fight','sta'
  115. end
  116. if barier > 0:
  117. !imeniteta barrier for damage
  118. if barier >= damage:
  119. '<b><font color = green>You can easily withstand the impact of the enemy</font></b>'
  120. xgt'fight','sta'
  121. elseif barier < damage:
  122. pcs_manna = pcs_manna - damageM
  123. pcs_health = pcs_health - damage
  124. '<b><font color = red>You harmed <<damage>> units</font></b>'
  125. '<b><font color = red>Your manna harmed <<damageM>> units</font></b>'
  126. if zerkalo > 0:
  127. zerkalo = zerkalo - 1
  128. healthV = healthV - damage
  129. '<b><font color = green>You are repelled and the damage <<$boydesc>> We received <<damage>> points of damage</font></b>'
  130. end
  131. end
  132. xgt'fight','sta'
  133. end
  134. end
  135. --- atakM ---------------------------------