Threaded Mode | Linear Mode

~~amonvangrell~~ · 02-18-2014 06:12 AM

here is some VIP items I have on my shard.

Code:

//                             \\

//         By Diabolic      \\

//                             \\

[ITEMDEF i_mantle_vip]

ID=i_deathshroud

NAME=Vip Ancient Robe 

TYPE=T_CLOTHING

ON=@CREATE

ATTR=attr_newbie

COLOR=0455

HITPOINTS=99999

ON=@EQUIP

IF (<LINK> == 04fffffff)

    LINK = <SRC.UID>

ENDIF

IF (<LINK> == <SRC.UID>)

    Name=<SRC.NAME>'s Vip Ancient Robe

    SRC.MODSTR += 15

    SRC.MODINT += 15

    SRC.MODDEX += 15

    SRC.MAXHITS += 15

    SRC.MAXMANA += 15

    SRC.MAXSTAM += 15

    SRC.TAG.VIP=1

    SRC.SOUND=snd_SPELL_BLESS

ELSE

    IF (<LINK.FINDLAYER(21).UID> != 0)

        SRC.SYSMESSAGE These Vip Ancient Robe are not its.

        CONT = <LINK.FINDLAYER(21).UID>

    ELSE

        SRC.SYSMESSAGE The item was deleted. 

        REMOVE

    ENDIF

ENDIF

RETURN 0

ON=@UNEQUIP

IF (<LINK> == <SRC.UID>)

    SRC.MODSTR -= 15

    SRC.MODINT -= 15

    SRC.MODDEX -= 15

    SRC.MAXHITS -= 15

    SRC.MAXMANA -= 15

    SRC.MAXSTAM -= 15

    SRC.SOUND=snd_SPELL_BLESS

    IF (<SRC.HITS> > 100)

        SRC.HITS=100    

    ENDIF 

    IF (<SRC.MANA> > 100)

        SRC.MANA=100    

    ENDIF 

    IF (<SRC.STAM> > 100)

        SRC.STAM=100    

    ENDIF 

ENDIF

RETURN 0

/////////////////////////////////////////

[ITEMDEF i_boots_vip]

ID=i_boots_calf

NAME=Vip Boots

TYPE=T_CLOTHING

ON=@CREATE

ATTR=attr_newbie

COLOR=0455

HITPOINTS=99999

ON=@EQUIP

IF (<LINK> == 04fffffff)

    LINK = <SRC.UID>

ENDIF

IF (<LINK> == <SRC.UID>)

    Name=<SRC.NAME>'s Vip Boots

ELSE

    IF (<LINK.FINDLAYER(21).UID> != 0)

        SRC.SYSMESSAGE These Vip Boots are not its. 

        CONT = <LINK.FINDLAYER(21).UID>

    ELSE

        SRC.SYSMESSAGE The item was deleted.

        REMOVE

    ENDIF

ENDIF

RETURN 0

/////////////////////////////////////////

[ITEMDEF i_vip_half_apron]

ID=i_apron_half

NAME=Vip Half Apron

TYPE=T_CLOTHING

ON=@CREATE

ATTR=attr_newbie

COLOR=0455

HITPOINTS=99999

ON=@EQUIP

IF (<LINK> == 04fffffff)

    LINK = <SRC.UID>

ENDIF

IF (<LINK> == <SRC.UID>)

    Name=<SRC.NAME>'s Vip Half Apron

ELSE

    IF (<LINK.FINDLAYER(21).UID> != 0)

        SRC.SYSMESSAGE These Vip Half Apron are not its. 

        CONT = <LINK.FINDLAYER(21).UID>

    ELSE

        SRC.SYSMESSAGE The item was deleted.

        REMOVE

    ENDIF

ENDIF

RETURN 0

/////////////////////////////////////////

[ITEMDEF i_los_coin]

NAME=Land Of Sprit Coin

ID=i_gold

ON=@CREATE

COLOR=079a

[eof]

Threaded Mode \| Linear Mode help with a script
Author	Message