Code: Select all
|Character bought something event
#event ItemsBought "You give"
|Expects "merchant name" and "item name" to be passed in
Sub Main
/declare Selected global
/varset Selected 0
|Buy Item
|Param0 is MerchantName Param1 is item
/call BuyItem "@Param0" "@Param1"
/return
|Expects two parameters to be passed
|Buys 20 of a stackable <itemname>;
Sub BuyItem
|Target the merchant
:RetargetMerchant
/target npc "@Param0"
/if "$target(name,clean)"!="@Param0" /goto :RetargetMerchant
|Open the merchant
:RightClickVendor
/rclicktarget
/if $merchant==FALSE /goto :RightClickVendor
|Select the item from the vendor
/delay 5
:WaitForSelection
/selectitem "@Param1" merchant
/delay 5
/if $selecteditem!=@Param1 /goto :WaitForSelection
/varset Selected 0
|Buy items
:Buying
/buyitem 20
/delay 5
/doevents ItemsBought
/delay 3
/if n @Selected==0 /goto :Buying
/click left merchant done
/doevents flush
/return
Sub Event_ItemsBought
/varset Selected 1
/return


