help with buy macro

[jago]

Hello, right now im using this macro to buy 60 non-stackable items.

is there anyway to condense it or make it faster?

i used /click left because the /buyitem command didn't work well.

thanks

Code: Select all

#turbo
Sub Main 

/target [merchant]
/press u
/delay 10
/selectitem "XXXXXXXXXXX" merchant 
/delay 5
/mouseto merchant buy
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4
/click left
/delay 4



/return

[EqMule]

this should work, what exactly is your problem with buyitem?

Code: Select all

#turbo 
Sub Main
/declare myloop global
/declare mycash global
/declare mytimer timer
/target "XXXmerchant"
:waitfortarget
/if "$target(name,clean)"!="XXXmerchant" {
    /delay 0
    /goto :waitfortarget
}
:openmerchant
/press u
/delay 5
/varset mytimer 3s
:waitforopening
/if "$merchant(name)"!="XXXmerchant" {
    /delay 1
    /if n @mytimer<=0 /goto :openmerchant
    /goto :waitforopening
}
/delay 1s
:doselection
/selectitem "XXXXXXXXXXX" merchant
/varset mytimer 3s
:waitforselection
/if "$selecteditem(name)"!="XXXXXXXXXXX" {
    /delay 0
    /if n @mytimer<=0 /goto :doselection
    /goto :waitforselection
}
/for myloop 0 to 2
/varset mycash $char(cash)
/buyitem 20
/delay 3
:waitforbuyitem
/if @mycash==$char(cash) {
    /delay 3
    /goto :waitforbuyitem
}
/next myloop
/return

[Goofmester1]

Just loop the buy commands.. could try this.

Code: Select all

#turbo 
Sub Main 

/target [merchant] 
/press u 
/delay 10 
/selectitem "XXXXXXXXXXX" merchant 
/delay 5 
/mouseto merchant buy 
/for bloop 0 to 59
/click left 
/delay 4 
 
/next bloop
/return

[Shali]

here is a nice working macro ive tested that will buy an item until your inventory is full, just changed the capitalized words to the correct value/name, make sure you subtract 1 from the slot number as they start with 0.

Code: Select all

[color=yellow]|=-buy.mac-=|

#include routines.mac


Sub Main
   :Targetmerchant
   /target MERCHANTNAME
   /face
   /press u
   /delay 10
   /click left merchant #SLOTOFMERCHANTSITEM
   /goto :Checkinvspace

   :Checkinvspace
   /if $freeinv(space)==>0 /goto :Buyitem
   /if $freeinv(space)==0 /goto :Done
   

   :Buyitem
      /click left merchant buy
      /goto :Checkinvspace

   :Done
   /click left merchant done
/endmacro   [/color]

hope it helps

[Drunkensloth]

interesting... why dont you use a for loop


i thought there was something not alllowed about plat macros.. we all know what this is for