macro not working

MQnoob · Post by **MQnoob** » Mon Sep 02, 2002 4:26 am

when i do /macro <name of the macro> it immediately says that macro has ended, i have all the current stuff and i'm using the old ui

MQnoob · Post by **MQnoob** » Mon Sep 02, 2002 4:39 am

ok, update, i can get the macro to run, but all it does is open the aa screen and pull out 1 copper, i think this has to do with what position my bags are in, if you can help me pls do

ddh · Post by **ddh** » Mon Sep 02, 2002 6:02 am

It could help people if you maybe posted the name of the macro you're using or the macro it's self if you wrote it.

MQnoob · Post by **MQnoob** » Mon Sep 02, 2002 5:02 pm

i'm just using the Arrows.mac, i don't know how to post the code itself so heres the copy and paste part
[[L124RD loves code brackets]]

Code: Select all

| - Arrows.mac -
|
#turbo
#event CombineFail "You lacked the skills to fashion the items together."
#event CombineSuceed "You have fashioned the items together to create something new!"

Sub Main
/call FindCombiner Fletching
/varset v80 $return
/if n $v80==99 /return

/cleanup
/click right inv $return
:MakeArrows
/sendkey down ctrl

/finditem similar "Fletching"
/click left pack $v80 0

/finditem similar "Nock"
/click left pack $v80 1

/finditem similar "Shaft"
/click left pack $v80 2

/finditem similar "Arrowhead"
/click left pack $v80 3

/sendkey up ctrl
/click left pack $return combine


/if "$item($v80,0,name)"~~"Arrowhead" /if "$item($v80,1,name)"~~"Shaft" /if "$item($v80,2,name)"~~"Fletching" /if "$item($v80,3,name)"~~"nock" /goto :DoCombine 
/sendkey up ctrl
/return 

:DoCombine 
/varset v61 0 
/doevents flush
/varset t9 30s
/click left pack $v80 combine 
/goto :DropArrows 

:DropArrows 
/doevents
/if n $v61==0 /if n $t9>0 /goto :DropArrows 
/doevents flush
/if $cursor()!=TRUE /if n $v61/goto :MakeArrows
:WaitCursor
/delay 0
/if $cursor()!=TRUE /goto :WaitCursor
/click left auto 
/goto :MakeArrows 
/return

Sub Event_CombineFail 
/varset v61 1
/return 

Sub Event_CombineSuceed 
/varset v61 2 
/return 

Sub FindCombiner 
/varset p2 99 
/for v99 0 to 7 
/if "$pack($v99,combine)"=="$p0" /varset p2 $v99 
/next v99 
/return $p2 :DoCombine 
/varset v61 0 
/doevents flush
/varset t9 30s
/click left pack $v80 combine 
/goto ropArrows 

ropArrows 
/doevents
/if n $v61==0 /if n $t9>0 /goto ropArrows 
/doevents flush
/if $cursor()!=TRUE /if n $v61/goto :MakeArrows
:WaitCursor
/delay 0
/if $cursor()!=TRUE /goto :WaitCursor
/click left auto 
/goto :MakeArrows 
/return

Sub Event_CombineFail 
/varset v61 1
/return 

Sub Event_CombineSuceed 
/varset v61 2 
/return 

Sub FindCombiner 
/varset p2 99 
/for v99 0 to 7 
/if "$pack($v99,combine)"=="$p0" /varset p2 $v99 
/next v99 
/return $p2

rizwank · Post by **rizwank** » Mon Sep 02, 2002 6:10 pm

problem one, about 3/4 way through you have a line that says

ropArrows

I have a feeling it was supposed to be Sub DropArrows

gingertips · Post by **gingertips** » Tue Sep 03, 2002 5:55 am

/if "$item($v80,0,name)"~~"Arrowhead" /if "$item($v80,1,name)"~~"Shaft" /if "$item($v80,2,name)"~~"Fletching" /if "$item($v80,3,name)"~~"nock" /goto

oCombine

Not seen it like this before - does this mean that it will only goto docombine if it finds all those items? And does it work?

L124RD · Post by **L124RD** » Tue Sep 03, 2002 9:17 am

Salutations,
yes. it should.

gingertips · Post by **gingertips** » Tue Sep 03, 2002 9:43 am

nice - solves a problem i have! thx