Restock Macros

#when hunter doing autostorage, this macro may trigger
automacro initiater {
class Hunter
storage "Silver Arrow" < 5000
call initiate
}

macro initiate {
do conf char 2
do reload config
pause 2
do relog
}

#Check Blacksmith location
automacro checkLocation {
class Blacksmith
storage "Silver Arrow" < 5000
location not morocc_in 137 65
call moveLoc
}

macro moveLoc {
do move 137 65 morocc_in
}

#Buy silver arrow and put in storage
automacro silver {
class Blacksmith
inventory "Silver Arrow" < 5000
location morocc_in 137 65
call buy_silver
}

macro buy_silver {
do talk @npc (141 67)
pause 2
do store
pause 2
while (@cartamount (Silver Arrow) < 20000) as buyLoop
do buy @store (Silver Arrow) @eval (10000 - @invamount (Silver Arrow))
pause 2
do cart add @inventory (Silver Arrow) @eval (20000 - @invamount (Silver Arrow))
end buyLoop
do buy @store (Silver Arrow) 5000
pause 2
}

automacro putStorage {
class Blacksmith
inventory "Silver Arrow" > 0
cart "Silver Arrow" > 0
call storage
}

macro storage {
do move 153 95 morocc
do talk @npc (156 97)
pause 3
do talk resp 1
pause 2
do storage add @inventory (Silver Arrow)
pause 2
while (@cartamount (Silver Arrow) > 0) as storageLoop
do cart get @cart (Silver Arrow) 10000
pause 2
do storage add @inventory (Silver Arrow)
pause 2
end storageLoop
do storage close
}

#change to hunter
automacro changeHunter {
class Blacksmith
cart "Silver Arrow" = 0
inventory "Silver Arrow" = 0
call hunter
}

macro hunter {
do conf char 0
do reload config
pause 2
do relog
}