08-24-2011, 11:27 AM
Here you go.
Code:
1000 { SHP } VarSetEx(Total, 100) VarSet(Potnow) Misc.ItemCountEx(236) VarSub(Total, !Potnow!) HUD.Display(!Total!) Self.Say(hi) Macro.Wait(2000) NPC.Say(trade) NPC.Buy(236, !Total!, 1) Macro.Wait(2000) NPC.Say(bye))