Threaded Mode | Linear Mode

xwerswoodx · 07-21-2013 02:55 PM

ADD sphere_defs at [DEFNAME can_i_flags]

Code:

CAN_I_RECHARGE         020000    //Recharged items

And after add your items which is like i_shield_of_flame

Code:

CAN=CAN_I_RECHARGE

If you write CAN=CAN_I_RECHARGE on any items the potion which I will write, can recharge your item.

For example;

Code:

[Itemdef i_shield_asd]

ID=blabla

NAME=Asd Shield

CAN=CAN_I_RECHARGE

...

SO you will not check every item with if.

Code:

[ITEMDEF i_recharging_potion]

Name=Recharging Potion

ID=i_bottle_3

WEIGHT=1

On=@Create

MOREY=10

On=@Click

message @63 <name>

message (Charges: <dmorey>)

On=@Dclick

IF !(<TOPOBJ> == <SRC>)

src.sysmessage You can't reach that.

ELSE

TARGET What item do you want to recharge?

ENDIF

RETURN 1

ON=@TARGON_ITEM

REF1=<SRC.TARG>

IF !(<REF1.TOPOBJ> == <SRC>)

src.sysmessage You can't reach that.

ELIF !(<REF1.CAN>&CAN_I_RECHARGE)

src.sysmessage This can't be recharged!

ELSE

REF1.MOREY +=<dmorey>

ENDIF

RETURN 1

On=@TARGON_CHAR

src.sysmessage Are you joking with me?

return 1

On=@TARGON_GROUND

src.sysmessage Really! Do you want to waste it?

return 1

Threaded Mode \| Linear Mode Shield of Flame Strike
Author	Message