Threaded Mode | Linear Mode

***Coruja*** · 08-09-2013 03:53 PM

try using this, it's a bit more performance optimized

Code:

[ITEMDEF i_vampire_knight_claw]

NAME=Vampire Knight Claw

...

ON=@AfterClick

IF (<TAG0.Charges>)

  LOCAL.ClickMsgText .= " (charged)"

ENDIF

ON=@Damage

TAG0.Charges ++

COLOR=0a4c

IF (<TAG0.Charges>==3)

  SRC.SAY Feel the hell blaze!

  SRC.SPELLEFFECT s_flamestrike 100 <TOPOBJ>

  TAG.Charges=

  COLOR=

ENDIF

Code:

[ITEMDEF i_sting_of_pain] 

NAME=Sting of Pain

ID=03f12

...

ON=@Damage

IF (25 > <R100>) && !(<SRC.FINDID.i_bleeding_delay>)

  SRC.SYSMESSAGE @38 You fell Bleeding effect

  SERV.NEWITEM i_bleeding_delay

  NEW.EQUIP <SRC>

ENDIF

[ITEMDEF i_bleeding_delay]

NAME=Bleeding delay 

ID=i_memory

TYPE=t_eq_script 

ON=@Equip 

SRC.EVENTS=+e_bleeding_effect

TIMER={1 3}

ON=@Unequip

SRC.EVENTS=-e_bleeding_effect

ON=@Timer

REMOVE

return 1

[EVENTS e_bleeding_effect]

//I dont understood what you want here, I will assume it has 50% chance to fail the spell

ON=@SpellCast

IF (50 > <R100>)

  ACTDIFF=-1000 //difficulty of the action, 1000 will always succeed and -1000 will always fail

ENDIF

Threaded Mode \| Linear Mode Vampire item's
Author	Message