# Kikatak
if $ARGS[0] = 'player':
set defsumV = agilV + reaktV + KikDefV
set defkofV = defsumV * 20/100
set defV = RAND(defsumV - defkofV, defsumV + defkofV)
if popad >= defV * 2:
'CRETE'
set damageKrit = damage * 20/100
set damage += damageKrit
set healthV -= damage
set pointKik += 1
'You applied <> points of damage'
if damage >= healthV * 20/100:
set pointKik += 1
'<<$nameV>> fell to the ring'
if healthV < (vitalV*10 + strenV*5)/4:
'<<$nameV>> in a knockout. This is a victory!'
xgt 'enderKik','winKO'
exit
end
end
end
if popad < defV*2 and popad >= defV:
'Contact'
set healthV -= damage
set pointKik += 1
'You applied <> points of damage'
if damage >= healthV * 20/100:
set pointKik += 1
'<<$nameV>> fell to the ring'
if healthV < (vitalV*10 + strenV*5)/4:
'<<$nameV>> in a knockout. This is a victory!'
xgt 'enderKik','winKO'
exit
end
end
end
if popad < defV:
'Slip'
end
end
if $ARGS[0] = 'enemy':
set defsum = agil + reakt + KikDef
set defkof = defsum * 20/100
set def = RAND(defsum - defkof, defsum + defkof)
if popad >= def * 2:
'CRETE'
set damageKrit = damage * 20/100
set damage += damageKrit
set health -= damage
set pointKikV += 1
'You have caused <> points of damage'
if damage >= health * 20/100:
set pointKikV += 1
'You have fallen into the ring'
if health < (vital*10 + stren*5)/4:
'You are in a knockout. This defeat'
xgt 'enderKik','loss'
exit
end
end
end
if popad < def*2 and popad >= def:
'Contact'
set health -= damage
set pointKikV += 1
'You have caused <> points of damage'
if damage >= health * 20/100:
set pointKikV += 1
'You have fallen into the ring'
if health < (vital*10 + stren*5)/4:
'You are in a knockout. This defeat'
xgt 'enderKik','loss'
exit
end
end
end
if popad < def:
'Slip'
end
end
--- Kikatak ---------------------------------