Armor Packing - Printable Version

Code:
[itemdef i_armor_packing_deed]

id=i_deed

name=armor packing deed

type=t_normal

weight=1



category=Dat System

subsection=Dem Feels about Armor Packing

description=Armor Packing Deed



on=@Create

attr=attr_blessed

color=pack_deed_color

tag0.armor=0



on=@DClick

if (<cont> != <src>)

 src.smsg This item must be in your backpack to use it.

 return 1

endif



if (<tag.packed> == 1)

 if (<cont> != <src>)

  src.smsg This item must be in your packpack to use it.

  return 1

 endif



 if !(<isempty <tag.arms>>)

  armor_unpack arms

 endif

 if !(<isempty <tag.gloves>>)

  armor_unpack gloves

 endif

 if !(<isempty <tag.chest>>)

  armor_unpack chest

 endif

 if !(<isempty <tag.legs>>)

  armor_unpack legs

 endif

 if !(<isempty <tag.helm>>)

  armor_unpack helm

 endif

 if !(<isempty <tag.collar>>)

  armor_unpack collar

 endif



 if (<def.pack_deed_remove> == 1)

  remove

  return 1

 else

  tag.packed=

  tag0.armor=0

  color=pack_deed_color

  name=armor packing deed

  return 1

 endif

endif



src.smsg Please target each piece of armor you would like to pack.

src.smsg Cancel targetting when you are done if the set is complete and less than a full set.

target

return 1



on=@TargOn_Item

// If the target is the deed and something was added we are going to finish the deed.

if (<argo.baseid> == i_armor_packing_deed)

 if (<tag0.armor> > 0)

  src.smsg You have completed the deed.

  color=pack_deed_color_complete

  name=armor packing deed [complete]

  tag.packed=1

  return 1

 endif

endif



// Check to be sure it is in the backpack.

if (<argo.cont> != <src>)

 src.smsg You may only pack armor that is in your backpack.

 return 1

endif



// If we are not armor it is time to try again.

if (<argo.isarmor> != 1)

 src.smsg You may only pack armor with this deed.

 src.smsg Please choose an armor piece.

 target

 return 1

endif



if (<argo.layer> == layer_arms)

 pack_armor arms

elif (<argo.layer> == layer_chest)

 pack_armor chest

elif (<argo.layer> == layer_gloves)

 pack_armor gloves

elif (<argo.layer> == layer_legs)

 pack_armor legs

elif (<argo.layer> == layer_helm)

 pack_armor helm

elif (<argo.layer> == layer_collar)

 pack_armor collar

endif



[function unpack_armor]

args=<tag.<args>>

serv.newitem=<argv[0]>

new.color=<argv[1]>

new.more1l=<argv[2]>

new.more1h=<argv[3]>

new.attr=<argv[4]>

new.bounce



[function pack_armor]

// pack_armor legs

if (<tag.armor> &pack_<args>)

 src.smsg You already have a <args> piece packed.

 target

 return 1

endif



tag.<args>=<argo.id>,<argo.color>,<argo.more1l>,<argo.more1h>,<argo.attr>

argo.remove

tag0.armor |pack_<args>

if (<tag0.armor> &03F)

 src.smsg You have completed the deed.

 color=pack_deed_color_complete

 name=armor packing deed [complete]

 tag.packed=1

 return 1

else

 src.smsg Please choose the next piece of armor to pack. Target the deed if you are done.

 target

 return 1

endif



[defname armor_packing_flags]

pack_arms            01

pack_chest            02

pack_gloves            04

pack_legs            08

pack_helm            010

pack_collar            020



[defname armor_packing_controls]

pack_deed_color            020    // base color.

pack_deed_color_complete    030    // completed color.

pack_deed_remove        0    // 0 dont remove, 1 remove after use.

pack_armor_strict        0    // 1 on and 0 off.











[eof]