# atakM
if $ARGS[0] = 'atakVmanna':
cla
!!payment hit dodge
poSp = speedV * 20 / 100
uvAg = agil * 20 / 100
poBox = reactV * 20 / 100
uvBox = react * 20 / 100
popad = rand(reactV - poBox, reactV + poBox) + rand(speedV - poSp, speedV + poSp)
uvorot = rand(react - uvBox, react + uvBox) + rand(agil - uvAg, agil + uvAg)
uvorKoef = uvorot * 50 / 100
popKoef = popad * 50 / 100
if popad > uvorot:
if popad >= uvorot + uvorKoef:
!!Crete, very direct hit
'critical hits'
xgt 'atakM', 'uronKritV'
else
!!normal hit
!!attack the enemy
'Contact'
xgt 'atakM', 'uronV'
end
else
'is washed'
xgt 'fight', 'sta'
end
end
if $ARGS[0] = 'uronKritV':
cla
damage = rand(1000, 2000)
damageM = rand(1000, 2000)
if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
if dospeh > 0:damage -= dospehDef & dospehEn -= 1
if damage < 0:damage = 0
health -= damage
manna -= damageM
'caused damage your health <> units'
'caused damage your manna <> units'
if zerkalo > 0:
zerkalo -= 1
healthV -= damage
'You are repelled damage and <<$nameV>> to give <> points of damage'
end
xgt 'fight', 'sta'
end
if defence > 0 and klon <= 0 and unmaterial <= 0:
damSum = damage + damageM
defence -= damSum
'Protection of your harmed <> units'
xgt 'fight', 'sta'
end
if klon > 0 and unmaterial <= 0:
klon -= 1
'destroy your clone, you have more <> clones'
xgt 'fight', 'sta'
end
if unmaterial > 0:
unmaterial -= 1
'Strike the enemy flew right through your body. YOU is not material'
xgt 'fight', 'sta'
end
if barier > 0:
!!imeniteta barrier for damage
if barier >= damage:
'You can easily withstood the impact of the opponent'
xgt 'fight', 'sta'
else
manna -= damageM
health -= damage
'You harmed <> units'
'caused damage your manna <> units'
if zerkalo > 0:
zerkalo -= 1
healthV -= damage
'You are repelled damage and <<$nameV>> to give <> points of damage'
end
end
xgt 'fight', 'sta'
end
end
if $ARGS[0] = 'uronV':
cla
damage = rand(500, 1000)
damageM = rand(500, 1000)
if defence <= 0 and klon <= 0 and unmaterial <= 0 and barier <= 0:
if dospeh > 0:damage -= dospehDef & dospehEn -= 1
if damage < 0:damage = 0
health -= damage
manna -= damageM
'caused damage your health <> units'
'caused damage your manna <> units'
if zerkalo > 0:
zerkalo -= 1
healthV -= damage
'You are repelled damage and <<$nameV>> to give <> points of damage'
end
xgt 'fight', 'sta'
end
if defence > 0 and klon <= 0 and unmaterial <= 0:
damSum = damage + damageM
defence -= damSum
'Protection of your harmed <> units'
xgt 'fight', 'sta'
end
if klon > 0 and unmaterial <= 0:
klon -= 1
'destroy your clone, you have more <> clones'
xgt 'fight', 'sta'
end
if unmaterial > 0:
unmaterial -= 1
'Strike the enemy flew right through your body. YOU is not material'
xgt 'fight', 'sta'
end
if barier > 0:
!!imeniteta barrier for damage
if barier >= damage:
'You can easily withstood the impact of the opponent'
xgt 'fight', 'sta'
else
manna -= damageM
health -= damage
'You harmed <> units'
'caused damage your manna <> units'
if zerkalo > 0:
zerkalo -= 1
healthV -= damage
'You are repelled damage and <<$nameV>> to give <> points of damage'
end
end
xgt 'fight', 'sta'
end
end
--- atakM ---------------------------------