FishFillet.mac

Lord Beavis · Post by **Lord Beavis** » Wed Jul 17, 2002 9:55 pm

i am trying to make a macro for fish fillets. with the one listed below, it stops after making the fish fillets and doesnt auto equip them. any thoughts or fixes?

((Edit-L124RD: Put it in code brackets...))

Code: Select all

| - fishfillet.mac -
| - Orignally BatWingPie.mac 
| - Modified by Lord Beavis

#include routines.mac 

Sub Main 
    
/call FindCombiner Baking 
/if $return==99 /return 
    

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

      /finditem "Fresh Fish" 
      /if $find()==FALSE /goto :Done 
      /click left pack $return 0 

      /finditem "Jug Of Sauces" 
      /if $find()==FALSE /goto :Done 
      /click left pack $return 1 
      /sendkey up ctrl 
      /click left pack $return combine 

      /if "$cursor()"=="TRUE" /goto :AutoDrop 
      /for v1 1 to 5 
         /delay 2 
         /if "$cursor()"=="TRUE" /goto :AutoDrop 
      /next v1 

   /goto :MakeFillet 

   :AutoDrop 
   /click left auto 
   /delay 2 
   /click left auto    
   /goto :MakeFillet 

  :Done 
    /sendkey up ctrl 

/return

King Bass Fisher · Post by **King Bass Fisher** » Wed Jul 17, 2002 10:23 pm

Here try this.
An edited version of JC.mac
I use JC for most of my combine stuff.

Oh yeah just incase you dont know hang out in Felwithe and make fish Fillets.
You get your jug of sauces at the Shop of Holds and your fresh fish
from the Bait and Tackle. 8)

You may have known this already but just incase I wanted to save ya from running all over the world to get your ingredients for the fillets.

((Edit-L124RD: Fixed the first line of code (deleted the | and moved it into the code brackets)))

Code: Select all

| - JC.mac - 
| Syntax: /call JC "metal" "gem" 
| ie. /call JC Silver Malachite 
#include routines.mac 

Sub Main 
/call FindCombiner Baking 
/if $return==99 /return 

/cleanup 
/click right inv $return 

/sendkey down ctrl 
:MakeJC 
/click left auto 
/finditem "$fish fillets" 
/if $find()==FALSE /goto :Done 
/click left pack $return 0 
/finditem "jug of sauces" 
/if $find()==FALSE /goto :Done 
/click left pack $return 1 
/click left pack $return combine 
:WaitJC 
/delay 1 
/if $pack($return,empty)==FALSE /goto :WaitJC 
/delay 1 
/click left auto 
/goto :MakeJC 

:Done 
/sendkey up ctrl 
/return