hmm now when i run the mac next to person it says and have bowl in 8 slot it syas recipe CE not found ...doing something wrong i take it
#event Broke "#*#you cannot afford#*#"
#event Broke "#*#you can't afford#*#"
Sub Buy(Item ItemToBuy, int amount)
/echo Buying ${ItemToBuy}!
/declare QTY int Inner
/declare l2 local int
|---SMALL delay to allow the MERCHANT Window to populate
/delay ${Math.Calc[${DelayMult}*2]}s
/varset QTY ${Math.Calc[${amount}-${FindItemCount[=${ItemToBuy}]}]}
/delay 1s
/if (${FindItemCount[=${ItemToBuy}]}>= ${amount}) {
/echo Done!
/return
}
/varset l2 ${Window[MerchantWnd].Child[ItemList].List[=${ItemToBuy},2]}
/if (!${l2}) {
/echo couldn't find ${ItemToBuy}
/endm
} else {
/notify MerchantWnd ItemList listselect ${l2}
/notify MerchantWnd ItemList leftmouse ${l2}
/delay 2
}
/echo Buying ${ItemToBuy} Till I get ${amount}
[COLOR="Red"]:Loop
/if (${QTY}>19) {
/buyitem 20
/delay 1s
/doevents
/varset QTY ${Math.Calc[${amount}-${FindItemCount[=${ItemToBuy}]}]}
/goto :Loop
} ELSE {
/if (${QTY}>0 && ${QTY}<20) {
/buyitem ${QTY}
/delay 1s
/varset QTY ${Math.Calc[${amount}-${FindItemCount[=${ItemToBuy}]}]}
}
}
/if (${QTY}==0) {
/echo Done!
/return
}
/goto :Loop [/COLOR]
/return
Sub Event_Broke
/echo Error: You are out of money!
/beep
/endmacro
/return
AFAIK, I had the ts.zip from the first post. I added it to the files section, so it doesn't get lost:So the TS.zip link is returning a 404 error. Anyone have a copy of the zip for these macros?
:Loop
/if (${QTY}>=1) {
/if (${QTY}>19) {
/buyitem 20
/delay 1s
/doevents
/varset QTY ${Math.Calc[${amount}-${FindItemCount[${ItemToBuy}]}]}
/goto :Loop
} ELSE {
/if (${QTY}>0 && ${QTY}<20) {
/buyitem ${QTY}
/delay 1s
/varset QTY ${Math.Calc[${amount}-${FindItemCount[${ItemToBuy}]}]}
}
}
}
/if (${QTY}<=0) {
/echo Done!
/return
}
/goto :Loop
Sub OpenPacks
/nomodkey /keypress OPEN_INV_BAGS
/delay 1s
|** /declare bag int local 0
/if (!${Window[InventoryWindow].Open}) /nomodkey /keypress inventory
/delay 3s ${Window[InventoryWindow].Open}
/for bag 1 to 10
/if (!${Window[Pack${bag}].Open}) /nomodkey /itemnotify pack${bag} rightmouseup
/delay 3s ${Window[Pack${bag}].Open} **|
/if (${Window[TradeskillWnd].Open}) /nomodkey /notify TradeskillWnd ExperimentButton leftmouseup
/delay 5s !${Window[TradeskillWnd].Open}
| /next bag
/return
Sub ClosePacks
/nomodkey /keypress OPEN_INV_BAGS
/declare bag int local 0
/if (!${Window[InventoryWindow].Open}) /nomodkey /keypress inventory
/delay 3s ${Window[InventoryWindow].Open}
/for bag 1 to 10
/if (${Window[Pack${bag}].Open}) /nomodkey /itemnotify Pack${bag} rightmouseup
/delay 3s !${Window[Pack${bag}].Open}
/next bag
/if (${Window[InventoryWindow].Open}) /nomodkey /keypress inventory
/delay 3s !${Window[InventoryWindow].Open}
/return