Solved Have it on TFS? Cursed Condition (Status)

[Binho®]

Cursed

This is a Special Condition where your character loses hit points over time, as long as they are cursed. This condition is indicated by the cursed icon on your character's status bar.

This effect is caused by an aggression of death power, and will eventually wear off on its own.

Have?

 

[Don Daniello]

I think it should be in conditions.

doAddCondition(cid, condition)

Just try
(read http://lua.myurl.pl)

 

[Binho®]

How to?

I think this is like a spell?

 

[Binho®]

I checked LUA files.

CONDITION_CURSED = 4194304

??

 

[Don Daniello]

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0)

local condition = createConditionObject(CONDITION_CURSED)
setCombatCondition(combat, condition)

function onCastSpell(cid, var)
	return doCombat(cid, combat, var)
end

This is for spell. Not tested yet

 

[Cykotitan]

And, here's a more practical version:

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_SMALLCLOUDS)
setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_DEATH)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 0, 0, 0, 0)

local area = createCombatArea(AREA_SQUARE1X1)
setCombatArea(combat, area)

local condition = createConditionObject(CONDITION_CURSED)
setConditionParam(condition, CONDITION_PARAM_DELAYED, 1)
addDamageCondition(condition, 7, 4000, -25)
setCombatCondition(combat, condition)

function onCastSpell(cid, var)
	return doCombat(cid, combat, var)
end

What it does is, creates a berserk-shaped, death-cloud attack. Then it curses the creatures hit with 7 turns of 25 hp loss, with death damage.

 

[Binho®]

I had thought that this made the script.

Thanks for help ppls!

PS: @Cykotitan and Don Daniello, with yours script not work, i changed codes and worked!