Threaded Mode | Linear Mode

**Soulless** · 09-17-2013 07:00 AM

this is for consume gold from bank and pack for your custom vendors you have

should just be able to put in .consumegold ##### without doing any checks and they will either deny it or allow it. obviously consume the gold before you give them anything.

Code:

[function consumegoldtest]

local.bankgold=<findlayer.29.rescount.i_gold>

local.baggold=<findlayer.21.rescount.i_gold>

if (<eval <local.baggold>+<local.bankgold>> >= <args>)

return 1

else

return 0

endif

[function consumegold]

local.bankgold=<findlayer.29.rescount.i_gold>

local.baggold=<findlayer.21.rescount.i_gold>

if (<eval <local.baggold>+<local.bankgold>> >= <args>)

if (<local.baggold> >= <args>)

findlayer.21.contconsume i_gold <args> 

else

findlayer.21.contconsume i_gold <local.baggold> 

findlayer.29.contconsume i_gold <eval <args>-<local.baggold>>

endif

//sound 54

update

return 1

else

message You do not have sufficient gold to cover this purchase

return 0

endif

here is a body cutting event that will keep bones on the group and allow, just add the even tto your players and your good

Code:

[events e_body_cutting]

on=@itemTargon_Item

if (<act.type>==t_weapon_sword) || (<act.type>==t_weapon_mace_sharp) || (<act.type>==t_weapon_fence) || (<act.type>==t_weapon_axe)

if (<src.targ.type>==t_corpse)    

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

src.sysmessage @0482 That is too far away.

return 1

endif

if (<src.region.safe>==1)

src.sysmessage @0482 You can not cut corpses here.    

return 1

endif

if (<src.targ.link.ISGM>==1)

src.sysmessage @0482 Tsk.. Tsk..

return 1

endif

if ((<src.targ.link.isplayer>==1) && !(<src.targ.link.tag0.newbie>) && !(<src.tag0.newbie>)) || (<src.targ.link.uid>==<src.uid>)

if (<src.targ.tag0.cut>)

src.sysmessage @0482 Your <act.name> scrapes bone but rends no flesh

return 1

endif

if (<src.notogetflag <src.targ.link.uid>>==1) && (<src.targ.link>!=<src.uid>)

src.criminal

endif

src.anim 13

src.sound 319

serv.newitem i_blood_pool_large

new.p=<src.targ.P>

new.attr=attr_decay

new.timer=<eval (<serv.DecayTimer>*60)>

src.targ.dispid=i_bones

src.targ.color=0

src.targ.tag0.cut=1

src.targ.name=remains of <src.targ.link.name>

src.targ.updatex

serv.newitem i_flesh_torso

new.name=torso of <src.targ.link.name>

new.link=<src.targ.link.uid>

new.p=<src.targ.P>

new.nudgeup

new.attr=attr_decay

new.timer=<eval (<serv.DecayTimer>*60)>

serv.newitem i_flesh_left_leg

new.name=left leg of <src.targ.link.name>

new.link=<src.targ.link.uid>

new.p=<src.targ.P>

new.nudgeup

new.attr=attr_decay

new.timer=<eval (<serv.DecayTimer>*60)>

serv.newitem i_flesh_right_leg

new.name=right leg of <src.targ.link.name>

new.link=<src.targ.link.uid>

new.p=<src.targ.P>

new.nudgeup

new.attr=attr_decay

new.timer=<eval (<serv.DecayTimer>*60)>

serv.newitem i_flesh_right_arm

new.name=right arm of <src.targ.link.name>

new.link=<src.targ.link.uid>

new.p=<src.targ.P>

new.nudgeup

new.attr=attr_decay

new.timer=<eval (<serv.DecayTimer>*60)>

serv.newitem i_flesh_left_arm

new.name=left arm of <src.targ.link.name>

new.link=<src.targ.link.uid>

new.p=<src.targ.P>

new.nudgeup

new.attr=attr_decay

new.timer=<eval (<serv.DecayTimer>*60)>

serv.newitem i_flesh_head

new.name=Head of <src.targ.link.name>

new.link=<src.targ.link.uid>

new.p=<src.targ.P>

new.nudgeup

new.attr=attr_decay

new.timer=<eval (<serv.DecayTimer>*60)>

return 1

else

return 0

endif

endif

endif

Threaded Mode \| Linear Mode New shard - Need testers
Author	Message