Threaded Mode | Linear Mode

Staff_Stanic · (11-28-2013)

Sometimes a player sell a lot of items to the same vendor, without any problem or wait for something.
This script "lock" the vendor for some time, so he can't buy anything from players while locked and the player will have to find another NPC to sell his things.

Code:

////////////// Script by: Stanic - Daniel Barbosa Maranhão - Email: pikulinhu@hotmail.com | Skype: daniel.bmaranhao

/// To install open your sphere.ini and add e_PlayerSell to EventsPlayer 

[DEFNAME VendorsEconomy]

SellStockDelay    "3600"    //Delay in seconds to "restock" the vendor.

[EVENTS e_PlayerSell]

ON=@ItemSell

LOCAL.MaxAmount=<eval <SERV.VendorMaxSell>-<ARGO.TAG0.SellStock>>

IF (<ARGN1> > <LOCAL.MaxAmount>)

  IF (<LOCAL.MaxAmount>==<SERV.VendorMaxSell>)

   ARGO.SAY Sorry <NAME>, I don't want to buy all these items. Give me <SERV.VendorMaxSell> and we both will be satisfied!

  ELIF (<LOCAL.MaxAmount> > 0)

   ARGO.SAY Sorry <NAME>, my stock of items is almost full and I can only carry with me more <dLOCAL.MaxAmount> items.

  ELSE

   ARGO.SAY Sorry <NAME>, my stock of items is full and I can't take more anything with me.

  ENDIF

  return 1

ENDIF

ARGO.TAG0.SellStock +=<ARGN1>

ARGO.TIMERF <dDEF.SellStockDelay>, SellReStock <ARGN1>

[FUNCTION SellReStock]

TAG.SellStock -=<ARGS>

[EOF]

http://forum.spherecommunity.net/sshare/...ccarry.scp

Threaded Mode \| Linear Mode NPC buy limit
Author	Message