Wednesday, March 19, 2008

macro Auto Buy

automacro Auto_Buy {
storage "Arrow" < 5000
class hunter
call Auto_Buy_Arrows
run-once 1
}

macro Auto_Buy_Arrows {
storage close
conf char 0 # if BlackSmith is in slot 0
conf saveMap
conf autoTalkCont 1
conf lockMap prt_fild05
conf route_randomWalk 0
conf storageAuto 0
conf storageAuto_npc 52392
relog
}

automacro BuyArrows {
map prt_fild05
class blacksmith
run-once 1
call Arrows
}

macro Arrows {

move 290 221 prt_fild05

talk @npc (290 221)
@pause 5
store
@pause 5
store
@pause 5
buy @store (Arrow) @eval (30000 - @invamount (Arrow))

@pause 20

move 290 221 prt_fild05

talk @npc (290 224)
@pause 5
talk resp 1
@pause 5
storage add @inventory (Arrow) @eval (30000 - @storamount (Arrow))

@pause 5
storage close

conf char 1 #if Hunter is in Slot 1
conf saveMap alberta
conf autoTalkCont 0
conf lockMap tur_dun01
conf route_randomWalk 1
conf storageAuto 1
conf storageAuto_npc 52401
@release BuyArrows
relog
@release Auto_Buy
}

No comments: