Pet level system - Printable Version

Code:
ON=@TARGON_CHAR

if (<src.targ.distance> > 3)

        src.sysmessage @09c1 You are unable to reach the creature.

            return 1

elseif (<src.targ.body>==c_man) || (<src.targ.body>==c_woman) || (<src.targ.npc>==0)

        src.sysmessage @09c1 You can not training another human!

            return 1

elseif ( <src.targ.flags> & statf_conjured )

        src.sysmessage @09c1 You can not training summoned animals!

            return 1

elseif (!<src.targ.ismypet>)

        src.sysmessage @09c1 The animal must be loyal to you!

            return 1

elseif (<src.targ.events>==e_pet_level_system)

        src.sysmessage @09c1 The training is already in progress.

            return 1

else

    src.targ.events=-e_no_pet_level_system

        src.targ.tag.level=0

            src.targ.tag.experience=0

                src.targ.events=+e_pet_level_system

            src.consume 1 i_pet_level_system

        src.sysmessage @09c1 Now you can training your pet.

    endif

return 1