Bone chips - full auto

mtwood2013 · Aug 19, 2014

Where would I look to find resources for learning how to modify/write my own macro's? I really like the autobones but would like to change it so it somehow keeps the rusty two-handed swords for sale and the small lanterns for faction building.

Razkle · Aug 19, 2014

ANY text editor simply take out the section where it sells the items you want to keep... I recommend notpad ++

boswack · Aug 24, 2014

Hello, Im trying this macro out. Im a beginner at this, and I downloaded the .mac file and tried to open it in game via the /mac autobones command. I get the error "Couldn't open macro file:". Any suggestions?

GPS_Soldier · Aug 24, 2014

boswack said:
Hello, Im trying this macro out. Im a beginner at this, and I downloaded the .mac file and tried to open it in game via the /mac autobones command. I get the error "Couldn't open macro file:". Any suggestions?

If you have MQ2 configured correctly..... You should have a release folder and then a macro folder. This macro should go into the macro folder to be executed by mq.

Razkle · Aug 24, 2014

most of the times it is because you do not have the autobonex.mac in the macro folder, not the mq folder, the macro folder....

boswack · Aug 24, 2014

Razkle said:
most of the times it is because you do not have the autobonex.mac in the macro folder, not the mq folder, the macro folder....

The autobones.mac is in the macro folder, after fooling around with it , it started working. Now i have another problem. While running 2 accounts on the same PC, I get the error "You are not connected...". I also use the /bccmd connect command, and it fails. I believe it is because the toon I am running the macro on cannot connect to the wizard? I replaced "Canywen" with my wizard's name, is there anything else that is needed?

PussyFoot · Aug 24, 2014

Check the IP on the connect status and the IP of your computer and make sure they match. If your computer is on a DHCP server your IP can change from day to day and your bccmd will almost always try to reconnect to the previous one.

boswack · Aug 25, 2014

PussyFoot said:
Check the IP on the connect status and the IP of your computer and make sure they match. If your computer is on a DHCP server your IP can change from day to day and your bccmd will almost always try to reconnect to the previous one.

I checked, and they are different, thanks. Is there a way to fix this, so the bone chips macro will work?

Goatse Moneyshot · Aug 27, 2014

ive been doing this same quest manually for months LOL.
is there any way to just nix all the porting and do hand ins and destroying only
what is the benefit of using EQBC?

Razkle · Aug 27, 2014

eqbc tells the porter to port you and add you to his group and stuff the chips are in a separate zone from the turn in so...

malphual · Sep 16, 2014

I was having the same issue as lighthouse, but I had all the plugins just like PallyDPS explained and outlined so very well. There is something to the "first person" view instead of third person view. Your wizard does not have to be in first person, but your powerlevel toon does.

malphual · Sep 19, 2014

Go back through the thread and find the instructions written by PallyDPS (his avatar is a blonde toon). If you follow those instructions to the letter and run both EQ accounts on the same computer, you will enjoy this macro. :-) I cannot endure running this past level 60 because it becomes an extremely long process. I don't like running macros overnight because it tends to draw attention and mess up everyone else's chance of eventually using the same exploit. So, please be judicious and try not to draw attention to yourself while using this macro.

AshLyNN · Oct 12, 2014

i would like to try this macro, but am a little confused where i add wiz name. is it here:

Rich (BB code):

:port
	    /target clear
	    /target ${wizard}
	    /if (${Target.Type.Equal[pc]}) {
	        /bct ${wizard} //invite ${Me.Name}
	        /delay 5s

Maskoi · Oct 13, 2014

Change Candywen, fake wizzie name to your wizards name

Rich (BB code):

/declare wizard string outer Candywen

AshLyNN · Oct 17, 2014

thank you much

Randyleo · Oct 20, 2014

What would I need to change to make this work with a druid?

hotpocket · Oct 20, 2014

Two spots differ - all i changed was;
:port
/target clear
/target ${wizard}
/if (${Target.Type.Equal[pc]}) {
/bct ${wizard} //invite ${Me.Name}
/delay 5s
/bct ${wizard} //cast "Circle of Brell's Rest"
/delay 60s
/goto :buy
} else {
/delay 2s
/goto :port
}

This has "Circle of Brell's Rest" as the port spell... and

:bind
/target clear
/target ${wizard}
/if (${Target.Type.Equal[pc]}) {
/navigate target
/delay 30s
/bct ${wizard} //alt activate 7009
|/bct ${wizard} //cast Teleport
/delay 60s
/goto :top
} else {
/delay 2s
/goto :bind
}

Has the Alt Act Code for Druids Teleport Bind.

Works a charm for me.

Randyleo · Oct 21, 2014

I keep getting these errors while running Razkle's version this mac on my druid.

Rich (BB code):

 /declare 'destroydelay' failed.  Name already in use.

 autobones.mac@13 (main): /declare destroydelay int local 1

 /declare 'chips' failed.  Name already in use.

 autobones.mac@15 (main): /declare chips int local

 /declare 'done' failed.  Name already in use.

 autobones.mac@16 (main): /declare done int local 0

I think this may be causing the crashes, but I know nothing about code. Does anyone have any ideas on how to fix this.

Maskoi · Oct 21, 2014

/plugin mq2log
/mlog on
start mac
after you get the errors
/mlog off
look for the log folder in your mq2 folder and the toon name and post the revelvant sections along with the error message and line numbers.

Randyleo · Oct 21, 2014

That is where I got the errors I posted. I only took off the timestamps.

ctaylor22 · Oct 21, 2014

Randyleo said:
I keep getting these errors while running Razkle's version this mac on my druid.

Rich (BB code):

/declare 'destroydelay' failed. Name already in use. autobones.mac@13 (main): /declare destroydelay int local 1 /declare 'chips' failed. Name already in use. autobones.mac@15 (main): /declare chips int local /declare 'done' failed. Name already in use. autobones.mac@16 (main): /declare done int local 0

I think this may be causing the crashes, but I know nothing about code. Does anyone have any ideas on how to fix this.

It looks like the Macro is trying to /declare the same variables more than once.

/declare destroydelay
/declare chips
/declare done

or someone moved a Line Label above the /declare statements and are using a /goto to jump back above the /declares so they get excuted a second time.

Randyleo · Oct 22, 2014

Here is the first 24 lines of the mac:

Rich (BB code):

sub main

| tradin.mac, by amml
| modified by tms
| full automation added by fuzzymelon
| Buy function courtesy of RedGuides.com
| modified by Pepekeao for SOLO Wizard use! Made it to level 95 in days unattended!

:top

    | *** Increase the destroydelay ONE by ONE until every item on your cursor gets destroyed.
    /declare destroydelay int local 1
    
    /declare chips int local
    /declare done int local 0
    
    /echo Opening Bags
    /keypress OPEN_INV_BAGS
    /delay 5

    /target clear
    /target Gunlok Jure
    /delay 5
    /face fast

I think the :top needs to be moved to after the declares. Am I correct in my thinking? Making it look like this:

Rich (BB code):

| tradin.mac, by amml
| modified by tms
| full automation added by fuzzymelon
| Buy function courtesy of RedGuides.com
| modified by Pepekeao for SOLO Wizard use! Made it to level 95 in days unattended!


	| *** Increase the destroydelay ONE by ONE until every item on your cursor gets destroyed.
	/declare destroydelay int local 1
	
	/declare chips int local
	/declare done int local 0

Sub Main

            :top	

	/echo Opening Bags
	/keypress OPEN_INV_BAGS
	/delay 5


             /target clear
	/target Gunlok Jure
	/delay 5
	/face fast

I'm not sure why the sub main is up at the very top. I'll try it out after I get home from work. Could this cause the random crashes?

- - - Updated - - -

I got frustrated with the random crashes, and with the help of ctaylor22, edited all four versions in this thread. Wizard porter, Druid porter, Wizard solo, and Druid solo. The only one I've tested so far is the on for solo Druid. It has been running for 8 hours and only one hiccup, getting stuck with one stack of bone chips stuck on the cursor, during the buying loop. It doesn't crash, but, it hangs there until you end mac. If you /autoinventory, gate to bind, and restart macro it takes off again. If someone knows what is causing this, please let me know.

Wizard porter:

Rich (BB code):

| tradin.mac, by amml
| modified by tms
| full automation added by fuzzymelon
| Buy function courtesy of RedGuides.com

Sub Main

	| *** Increase the destroydelay ONE by ONE until every item on your cursor gets destroyed.
	/declare destroydelay int local 1
	
	/declare chips int local
	/declare done int local 0

	| *** Change Candywen to Wizard's name ***
	/declare wizard string outer Candywen
	/autoaccept add ${wizard}

	:top
	
	/echo Opening Bags
	/keypress OPEN_INV_BAGS
	/delay 5

	/target clear
	/target Gunlok Jure
	/delay 5
	/face fast
	/if (${Target.Type.Equal[npc]}) {
	    /if (${Me.Grouped}) {
	        /echo You are grouped - Disbanding
	        /keypress ctrl+d
	}
	
	:Loop
	/if (!${FindItem[=Bone Chips].InvSlot}) {
	  /echo backpacks empty go get more stuff
	  /goto :EmptyBags
	}
	
	/if (!${FindItem[=Bone Chips].InvSlot}) /goto :EmptyBags
	
	/echo Handing in Chips.
	/for chips 1 to 4
	/shift /itemnotify ${FindItem[=Bone Chips].InvSlot} leftmouseup
	/delay 5
	/click left target
	/click left target
	/delay 5
	/next chips
	
	/delay 8
	/notify GiveWnd GVW_Give_Button leftmouseup
	/delay 2s
	
	/echo Clearing Cursor
	:cursorclear
	/if (${Cursor.ID} && ${Cursor.ID} != 13073) {
	    /destroy
	    /delay ${destroydelay}
	    /goto :cursorclear
	}
	
	/if (!${FindItem[=Bone Chips].InvSlot}) /goto :EmptyBags
	
	/goto :Loop
	
	:EmptyBags
	
	/if (!${done}) { 
	    /varset done 1
	    /goto :cursorclear
	}
	
	/echo Clearing up your bags, this will take a moment.
	
	/delay 8
	/while (${FindItem[=Rusty Axe].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Axe].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Broad Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Broad Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Mace].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Mace].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Short Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Short Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Two Handed Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Two Handed Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Small Lantern].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Lantern].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	    
	/while (${FindItem[=Small Tattered Gloves].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Tattered Gloves].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	    
	/while (${FindItem[=Torch].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Torch].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Tunic].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Tunic].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Tattered Skullcap].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Tattered Skullcap].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Sleeves].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Sleeves].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Pants].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Pants].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	:Done
	/delay 8 
	/notify GiveWnd GVW_Give_Button leftmouseup
	/delay 8
	/echo Closing Bags
	/keypress CLOSE_INV_BAGS
	/echo Done .. Have fun.. 
        /goto :port
	} else {
            /delay 2s
	    /goto :top
	}
	
	:port
	    /target clear
	    /target ${wizard}
	    /if (${Target.Type.Equal[pc]}) {
	        /bct ${wizard} //invite ${Me.Name}
	        /delay 5s
	        /bct ${wizard} //cast "Brell's Rest Portal"
	        /delay 60s
	        /goto :buy    
	    } else {
                /delay 2s
	        /goto :port
	    }
	
	:buy
	    /target clear
	    /target "Marie Fay"
	    /if (${Target.Type.Equal[npc]}) {
	        /navigate target
	        /delay 30s
                /face fast
                /delay 5
                /call npc "Marie Fay"
	        /call Buy "bone chips" 32000
	        /goto :bind
	    } else {
                /delay 2s
	        /goto :buy
	    }
	
	:bind
	     /target clear
	     /target ${wizard}
	     /if (${Target.Type.Equal[pc]}) {
	         /navigate target
	         /delay 30s
	         /bct ${wizard} //alt activate 456
                 |/bct ${wizard} //cast Teleport
	         /delay 60s
	         /goto :top
	    } else {
                /delay 2s
	        /goto :bind
	    }

/goto :top

/return

Sub NPC(NPCName)
    /target npc ${NPCName}
    /delay 1s
    /if (!${Select[${Target.Type},npc,pet]} || !${Target.ID} || ${Target.Type.Equal[pet]} && !${Target.CleanName.Find[familiar]}) {
        /echo Please target a vendor or guildbanker
        /return
    }
    /echo Doing business with ${NPCName}
    /target id ${Spawn[${NPCName}].ID}
    /delay 3s ${Target.ID}==${Spawn[${NPCName}].ID}
    /if (${Target.Distance}>15) {
        /moveto id  ${Spawn[${NPCName}].ID}
        /delay 250 ${MoveTo.Stopped}
    }
    /face nolook
    /delay 1s
    /echo Opening merchant/guildbank window
    /nomodkey /click right target
    /echo Waiting 5s for merchant/guildbank window to populate
    /delay 5s
/return

Sub Buy(string ItemToBuy, int amount)
    /declare i int local
    | /echo Buying ${ItemToBuy}!
    /declare QTY int local
    /declare ListItem int local
    /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]}
    /delay 1s
    /if (${FindItemCount[${ItemToBuy}]}>= ${amount}) {
        /echo I have enough ${ItemToBuy}.
        /return
    }   
    /varset ListItem ${Window[MerchantWnd].Child[ItemList].List[=${ItemToBuy},2]}
    /if (!${ListItem}) {
        /echo couldn't find ${ItemToBuy}
        /return
    } else {
        /notify MerchantWnd ItemList listselect ${ListItem}
        /delay 1s       
    } 
    /echo Buying ${ItemToBuy} Till I get ${amount} 
    :BuyLoop
    /doevents
    /if (${InventoryFull}) /return
    /if (${QTY}>0) {
        /if (${QTY}>19) {
            /Shiftkey /notify merchantwnd MW_Buy_Button leftmouseup
            /delay 1s ${FindItemCount[${ItemToBuy}]}>=${QTY}
            /echo ${FindItemCount[${ItemToBuy}]} ${ItemToBuy} in inventory
            /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]} 
            /delay 3
            /if (${QTY}<=0) /return
            /goto :BuyLoop
        }
        /if (${QTY}>0 && ${QTY}<20) {
            /for i 1 to ${QTY} 
                /Ctrlkey /notify merchantwnd MW_Buy_Button leftmouseup
                /delay 1s ${FindItemCount[${ItemToBuy}]}>=${Math.Calc[${FindItemCount[${ItemToBuy}]}+${i}]}
                /echo Buying ${ItemToBuy} ${i} of ${QTY}
                /if (${i}>=${QTY}) {
                    /echo ${FindItemCount[${ItemToBuy}]} ${ItemToBuy} in inventory
                    /return
                }
            /next i
            /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]}
            
        }
    }
/return

Druid porter:

Rich (BB code):

| tradin.mac, by amml
| modified by tms
| full automation added by fuzzymelon
| Buy function courtesy of RedGuides.com

Sub Main

	| *** Increase the destroydelay ONE by ONE until every item on your cursor gets destroyed.
	/declare destroydelay int local 1
	
	/declare chips int local
	/declare done int local 0

	| *** Change Flowersniffer to Druid's name ***
	/declare druid string outer Flowersniffer
	| *** You may be able to rem this out if the name is already in your autoaccept list ***
	/autoaccept add ${druid}

	:top
	
	/echo Opening Bags
	/keypress OPEN_INV_BAGS
	/delay 5

	/target clear
	/target Gunlok Jure
	/delay 5
	/face fast
	/if (${Target.Type.Equal[npc]}) {
	    /if (${Me.Grouped}) {
	        /echo You are grouped - Disbanding
	        /keypress ctrl+d
	}
	
	:Loop
	/if (!${FindItem[=Bone Chips].InvSlot}) {
	  /echo backpacks empty go get more stuff
	  /goto :EmptyBags
	}
	
	/if (!${FindItem[=Bone Chips].InvSlot}) /goto :EmptyBags
	
	/echo Handing in Chips.
	/for chips 1 to 4
	/shift /itemnotify ${FindItem[=Bone Chips].InvSlot} leftmouseup
	/delay 5
	/click left target
	/click left target
	/delay 5
	/next chips
	
	/delay 8
	/notify GiveWnd GVW_Give_Button leftmouseup
	/delay 2s
	
	/echo Clearing Cursor
	:cursorclear
	/if (${Cursor.ID} && ${Cursor.ID} != 13073) {
	    /destroy
	    /delay ${destroydelay}
	    /goto :cursorclear
	}
	
	/if (!${FindItem[=Bone Chips].InvSlot}) /goto :EmptyBags
	
	/goto :Loop
	
	:EmptyBags
	
	/if (!${done}) { 
	    /varset done 1
	    /goto :cursorclear
	}
	
	/echo Clearing up your bags, this will take a moment.
	
	/delay 8
	/while (${FindItem[=Rusty Axe].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Axe].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Broad Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Broad Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Mace].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Mace].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Short Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Short Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Two Handed Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Two Handed Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Small Lantern].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Lantern].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	    
	/while (${FindItem[=Small Tattered Gloves].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Tattered Gloves].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	    
	/while (${FindItem[=Torch].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Torch].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Tunic].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Tunic].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Tattered Skullcap].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Tattered Skullcap].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Sleeves].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Sleeves].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Pants].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Pants].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	:Done
	/delay 8 
	/notify GiveWnd GVW_Give_Button leftmouseup
	/delay 8
	/echo Closing Bags
	/keypress CLOSE_INV_BAGS
	/echo Done .. Have fun.. 
        /goto :port
	} else {
            /delay 2s
	    /goto :top
	}
	
	:port
	    /target clear
	    /target ${druid}
	    /if (${Target.Type.Equal[pc]}) {
	        /bct ${druid} //invite ${Me.Name}
	        /delay 5s
	        /bct ${druid} //cast "Circle of Brell's Rest"
	        /delay 60s
	        /goto :buy    
	    } else {
                /delay 2s
	        /goto :port
	    }
	
	:buy
	    /target clear
	    /target "Marie Fay"
	    /if (${Target.Type.Equal[npc]}) {
	        /navigate target
	        /delay 30s
                /face fast
                /delay 5
                /call npc "Marie Fay"
	        /call Buy "bone chips" 28800
	        /goto :bind
	    } else {
                /delay 2s
	        /goto :buy
	    }
	
	:bind
	     /target clear
	     /target ${druid}
	     /if (${Target.Type.Equal[pc]}) {
	         /navigate target
	         /delay 30s
	         /bct ${druid} //alt activate 7009
                 |/bct ${druid} //cast Teleport Bind
	         /delay 60s
	         /goto :top
	    } else {
                /delay 2s
	        /goto :bind
	    }

/goto :top

/return

Sub NPC(NPCName)
    /target npc ${NPCName}
    /delay 1s
    /if (!${Select[${Target.Type},npc,pet]} || !${Target.ID} || ${Target.Type.Equal[pet]} && !${Target.CleanName.Find[familiar]}) {
        /echo Please target a vendor or guildbanker
        /return
    }
    /echo Doing business with ${NPCName}
    /target id ${Spawn[${NPCName}].ID}
    /delay 3s ${Target.ID}==${Spawn[${NPCName}].ID}
    /if (${Target.Distance}>15) {
        /moveto id  ${Spawn[${NPCName}].ID}
        /delay 250 ${MoveTo.Stopped}
    }
    /face nolook
    /delay 1s
    /echo Opening merchant/guildbank window
    /nomodkey /click right target
    /echo Waiting 5s for merchant/guildbank window to populate
    /delay 5s
/return

Sub Buy(string ItemToBuy, int amount)
    /declare i int local
    | /echo Buying ${ItemToBuy}!
    /declare QTY int local
    /declare ListItem int local
    /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]}
    /delay 1s
    /if (${FindItemCount[${ItemToBuy}]}>= ${amount}) {
        /echo I have enough ${ItemToBuy}.
        /return
    }   
    /varset ListItem ${Window[MerchantWnd].Child[ItemList].List[=${ItemToBuy},2]}
    /if (!${ListItem}) {
        /echo couldn't find ${ItemToBuy}
        /return
    } else {
        /notify MerchantWnd ItemList listselect ${ListItem}
        /delay 1s       
    } 
    /echo Buying ${ItemToBuy} Till I get ${amount} 
    :BuyLoop
    /doevents
    /if (${InventoryFull}) /return
    /if (${QTY}>0) {
        /if (${QTY}>19) {
            /Shiftkey /notify merchantwnd MW_Buy_Button leftmouseup
            /delay 1s ${FindItemCount[${ItemToBuy}]}>=${QTY}
            /echo ${FindItemCount[${ItemToBuy}]} ${ItemToBuy} in inventory
            /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]} 
            /delay 3
            /if (${QTY}<=0) /return
            /goto :BuyLoop
        }
        /if (${QTY}>0 && ${QTY}<20) {
            /for i 1 to ${QTY} 
                /Ctrlkey /notify merchantwnd MW_Buy_Button leftmouseup
                /delay 1s ${FindItemCount[${ItemToBuy}]}>=${Math.Calc[${FindItemCount[${ItemToBuy}]}+${i}]}
                /echo Buying ${ItemToBuy} ${i} of ${QTY}
                /if (${i}>=${QTY}) {
                    /echo ${FindItemCount[${ItemToBuy}]} ${ItemToBuy} in inventory
                    /return
                }
            /next i
            /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]}
            
        }
    }
/return

Wizard solo:

Rich (BB code):

| tradin.mac, by amml
| modified by tms
| full automation added by fuzzymelon
| Buy function courtesy of RedGuides.com
| modified by Pepekeao for SOLO Wizard use! Made it to level 95 in days unattended!

Sub Main

	| *** Increase the destroydelay ONE by ONE until every item on your cursor gets destroyed.
	/declare destroydelay int local 1
	
	/declare chips int local
	/declare done int local 0

	:top
	
	/echo Opening Bags
	/keypress OPEN_INV_BAGS
	/delay 5

	/target clear
	/target Gunlok Jure
	/delay 5
	/face fast
	
	:Loop
	/if (!${FindItem[=Bone Chips].InvSlot}) {
	  /echo backpacks empty go get more stuff
	  /goto :EmptyBags
	}
	
	/if (!${FindItem[=Bone Chips].InvSlot}) /goto :EmptyBags
	
	/echo Handing in Chips.
	/for chips 1 to 4
	/shift /itemnotify ${FindItem[=Bone Chips].InvSlot} leftmouseup
	/delay 5
	/click left target
	/click left target
	/delay 5
	/next chips
	
	/delay 8
	/notify GiveWnd GVW_Give_Button leftmouseup
	/delay 2s
	
	/echo Clearing Cursor
	:cursorclear
	/if (${Cursor.ID} && ${Cursor.ID} != 13073) {
	    /destroy
	    /delay ${destroydelay}
	    /goto :cursorclear
	}
	
	/if (!${FindItem[=Bone Chips].InvSlot}) /goto :EmptyBags
	
	/goto :Loop
	
	:EmptyBags
	
	/if (!${done}) { 
	    /varset done 1
	    /goto :cursorclear
	}
	
	/echo Clearing up your bags, this will take a moment.
	
	/delay 8
	/while (${FindItem[=Rusty Axe].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Axe].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Broad Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Broad Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Mace].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Mace].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Short Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Short Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Two Handed Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Two Handed Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Small Lantern].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Lantern].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	    
	/while (${FindItem[=Small Tattered Gloves].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Tattered Gloves].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	    
	/while (${FindItem[=Torch].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Torch].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Tunic].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Tunic].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Tattered Skullcap].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Tattered Skullcap].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Sleeves].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Sleeves].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Pants].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Pants].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	:Done
	/delay 8 
	/notify GiveWnd GVW_Give_Button leftmouseup
	/delay 8
	/echo Closing Bags
	/keypress CLOSE_INV_BAGS
	/echo Done .. Have fun.. 
        /goto :port
	} else {
            /delay 2s
	    /goto :top
	}
	
	:port
	    /target clear
        /delay 5s
        /casting "Brell's Rest Portal" -maxtries|5
        /delay 45s
        /goto :buy    
	    } else {
                /delay 2s
	        /goto :port
	    }
	
	:buy
	    /target clear
	    /target "Marie Fay"
	    /if (${Target.Type.Equal[npc]}) {
		    /delay 2s
	        /navigate target
	        /delay 30s
                /face fast
                /delay 3s
                /call npc "Marie Fay"
	        /call Buy "bone chips" 32000
	        /goto :bind
	    } else {
                /delay 2s
	        /goto :buy
	    }
	
	:bind
	     /target clear
		 /if (${Merchant.Open}) {
         /notify MerchantWnd MW_Done_Button leftmouseup
         /delay 1s !${Merchant.Open}
		 /delay 5s
         /casting "Gate" -maxtries|5
	         /delay 45s
	         /goto :top
	    } else {
                /delay 2s
	        /goto :bind
	    }

/goto :top

/return

Sub NPC(NPCName)
    /target npc ${NPCName}
    /delay 1s
    /if (!${Select[${Target.Type},npc,pet]} || !${Target.ID} || ${Target.Type.Equal[pet]} && !${Target.CleanName.Find[familiar]}) {
        /echo Please target a vendor or guildbanker
        /return
    }
    /echo Doing business with ${NPCName}
    /target id ${Spawn[${NPCName}].ID}
    /delay 3s ${Target.ID}==${Spawn[${NPCName}].ID}
    /if (${Target.Distance}>15) {
        /moveto id  ${Spawn[${NPCName}].ID}
        /delay 250 ${MoveTo.Stopped}
    }
    /face nolook
    /delay 1s
    /echo Opening merchant/guildbank window
    /nomodkey /click right target
    /echo Waiting 5s for merchant/guildbank window to populate
    /delay 5s
/return

Sub Buy(string ItemToBuy, int amount)
    /declare i int local
    | /echo Buying ${ItemToBuy}!
    /declare QTY int local
    /declare ListItem int local
    /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]}
    /delay 1s
    /if (${FindItemCount[${ItemToBuy}]}>= ${amount}) {
        /echo I have enough ${ItemToBuy}.
        /return
    }   
    /varset ListItem ${Window[MerchantWnd].Child[ItemList].List[=${ItemToBuy},2]}
    /if (!${ListItem}) {
        /echo couldn't find ${ItemToBuy}
        /return
    } else {
        /notify MerchantWnd ItemList listselect ${ListItem}
        /delay 1s       
    } 
    /echo Buying ${ItemToBuy} Till I get ${amount} 
    :BuyLoop
    /doevents
    /if (${InventoryFull}) /return
    /if (${QTY}>0) {
        /if (${QTY}>19) {
            /Shiftkey /notify merchantwnd MW_Buy_Button leftmouseup
            /delay 1s ${FindItemCount[${ItemToBuy}]}>=${QTY}
            /echo ${FindItemCount[${ItemToBuy}]} ${ItemToBuy} in inventory
            /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]} 
            /delay 2
            /if (${QTY}<=0) /return
            /goto :BuyLoop
        }
        /if (${QTY}>0 && ${QTY}<20) {
            /for i 1 to ${QTY} 
                /Ctrlkey /notify merchantwnd MW_Buy_Button leftmouseup
                /delay 1s ${FindItemCount[${ItemToBuy}]}>=${Math.Calc[${FindItemCount[${ItemToBuy}]}+${i}]}
                /echo Buying ${ItemToBuy} ${i} of ${QTY}
                /if (${i}>=${QTY}) {
                    /echo ${FindItemCount[${ItemToBuy}]} ${ItemToBuy} in inventory
                    /return
                }
            /next i
            /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]}
            
        }
    }
/return

And finally, Druid solo, with AA gate:

Rich (BB code):

| tradin.mac, by amml
| modified by tms
| full automation added by fuzzymelon
| Buy function courtesy of RedGuides.com
| modified by Pepekeao for SOLO Wizard use! Made it to level 95 in days unattended!

Sub Main

	| *** Increase the destroydelay ONE by ONE until every item on your cursor gets destroyed.
	/declare destroydelay int local 1
	
	/declare chips int local
	/declare done int local 0

	:top
	
	/echo Opening Bags
	/keypress OPEN_INV_BAGS
	/delay 5

	/target clear
	/target Gunlok Jure
	/delay 5
	/face fast
	
	:Loop
	/if (!${FindItem[=Bone Chips].InvSlot}) {
	  /echo backpacks empty go get more stuff
	  /goto :EmptyBags
	}
	
	/if (!${FindItem[=Bone Chips].InvSlot}) /goto :EmptyBags
	
	/echo Handing in Chips.
	/for chips 1 to 4
	/shift /itemnotify ${FindItem[=Bone Chips].InvSlot} leftmouseup
	/delay 5
	/click left target
	/click left target
	/delay 5
	/next chips
	
	/delay 8
	/notify GiveWnd GVW_Give_Button leftmouseup
	/delay 2s
	
	/echo Clearing Cursor
	:cursorclear
	/if (${Cursor.ID} && ${Cursor.ID} != 13073) {
	    /destroy
	    /delay ${destroydelay}
	    /goto :cursorclear
	}
	
	/if (!${FindItem[=Bone Chips].InvSlot}) /goto :EmptyBags
	
	/goto :Loop
	
	:EmptyBags
	
	/if (!${done}) { 
	    /varset done 1
	    /goto :cursorclear
	}
	
	/echo Clearing up your bags, this will take a moment.
	
	/delay 8
	/while (${FindItem[=Rusty Axe].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Axe].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Broad Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Broad Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Mace].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Mace].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Short Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Short Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Rusty Two Handed Sword].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Rusty Two Handed Sword].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	/while (${FindItem[=Small Lantern].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Lantern].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	    
	/while (${FindItem[=Small Tattered Gloves].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Tattered Gloves].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	    
	/while (${FindItem[=Torch].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Torch].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Tunic].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Tunic].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Tattered Skullcap].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Tattered Skullcap].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Sleeves].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Sleeves].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	
	/while (${FindItem[=Small Patchwork Pants].InvSlot}) {
	    /shift /itemnotify ${FindItem[=Small Patchwork Pants].InvSlot} leftmouseup
	    /delay 5
	    /if (${Cursor.ID} && ${Cursor.ID} != 13073) /destroy
	    /delay ${destroydelay}
	}
	
	:Done
	/delay 8 
	/notify GiveWnd GVW_Give_Button leftmouseup
	/delay 8
	/echo Closing Bags
	/keypress CLOSE_INV_BAGS
	/echo Done .. Have fun.. 
        /goto :port
	} else {
            /delay 2s
	    /goto :top
	}
	
	:port
	    /target clear
        /delay 5s
        /casting "Ring of Brell's Rest" -maxtries|5
        /delay 45s
        /goto :buy    
	    } else {
                /delay 2s
	        /goto :port
	    }
	
	:buy
	    /target clear
	    /target "Marie Fay"
	    /if (${Target.Type.Equal[npc]}) {
		    /delay 2s
	        /navigate target
	        /delay 30s
                /face fast
                /delay 3s
                /call npc "Marie Fay"
	        /call Buy "bone chips" 28800
	        /goto :bind
	    } else {
                /delay 2s
	        /goto :buy
	    }
	
	:bind
	     /target clear
		 /if (${Merchant.Open}) {
         /notify MerchantWnd MW_Done_Button leftmouseup
         /delay 1s !${Merchant.Open}
		 /delay 5s
         /casting "Gate" -maxtries|5
	         /delay 45s
	         /goto :top
	    } else {
                /delay 2s
	        /goto :bind
	    }

/goto :top

/return

Sub NPC(NPCName)
    /target npc ${NPCName}
    /delay 1s
    /if (!${Select[${Target.Type},npc,pet]} || !${Target.ID} || ${Target.Type.Equal[pet]} && !${Target.CleanName.Find[familiar]}) {
        /echo Please target a vendor or guildbanker
        /return
    }
    /echo Doing business with ${NPCName}
    /target id ${Spawn[${NPCName}].ID}
    /delay 3s ${Target.ID}==${Spawn[${NPCName}].ID}
    /if (${Target.Distance}>15) {
        /moveto id  ${Spawn[${NPCName}].ID}
        /delay 250 ${MoveTo.Stopped}
    }
    /face nolook
    /delay 1s
    /echo Opening merchant/guildbank window
    /nomodkey /click right target
    /echo Waiting 5s for merchant/guildbank window to populate
    /delay 5s
/return

Sub Buy(string ItemToBuy, int amount)
    /declare i int local
    | /echo Buying ${ItemToBuy}!
    /declare QTY int local
    /declare ListItem int local
    /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]}
    /delay 1s
    /if (${FindItemCount[${ItemToBuy}]}>= ${amount}) {
        /echo I have enough ${ItemToBuy}.
        /return
    }   
    /varset ListItem ${Window[MerchantWnd].Child[ItemList].List[=${ItemToBuy},2]}
    /if (!${ListItem}) {
        /echo couldn't find ${ItemToBuy}
        /return
    } else {
        /notify MerchantWnd ItemList listselect ${ListItem}
        /delay 1s       
    } 
    /echo Buying ${ItemToBuy} Till I get ${amount} 
    :BuyLoop
    /doevents
    /if (${InventoryFull}) /return
    /if (${QTY}>0) {
        /if (${QTY}>19) {
            /Shiftkey /notify merchantwnd MW_Buy_Button leftmouseup
            /delay 1s ${FindItemCount[${ItemToBuy}]}>=${QTY}
            /echo ${FindItemCount[${ItemToBuy}]} ${ItemToBuy} in inventory
            /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]} 
            /delay 2
            /if (${QTY}<=0) /return
            /goto :BuyLoop
        }
        /if (${QTY}>0 && ${QTY}<20) {
            /for i 1 to ${QTY} 
                /Ctrlkey /notify merchantwnd MW_Buy_Button leftmouseup
                /delay 1s ${FindItemCount[${ItemToBuy}]}>=${Math.Calc[${FindItemCount[${ItemToBuy}]}+${i}]}
                /echo Buying ${ItemToBuy} ${i} of ${QTY}
                /if (${i}>=${QTY}) {
                    /echo ${FindItemCount[${ItemToBuy}]} ${ItemToBuy} in inventory
                    /return
                }
            /next i
            /varcalc QTY ${amount}-${FindItemCount[${ItemToBuy}]}
            
        }
    }
/return

It was a minor edit, but it seems to be running much smoother now.

eqgeek · Nov 19, 2014

I tried to use this today and...

1 - my noob-gnome got jumped by the guards in Kaladim. I thought they only hated DE? (Fixed by adding an illusion cast to the mac and/or as a downflag)

2 - my noob and my wiz get jumped by "a hungry predator" at Brells zone in (Fixed by wiz casting group invis)

3 - my noob-gnome gets jumped by "a hungry predator" running back to the wiz in Brells (Fixed by casting invis spell or potion on self)

Anyone else seeing these changes?

Khuri · Nov 19, 2014

Thanks for the heads up. I'll run it later tonight and see what I find. What class is your noob? I think doing the crushbone belts may help with the guards.

eqgeek · Nov 19, 2014

I made it a gnome enchanter. I just made a downflag to keep the dwarf illusion on mine, but this might not work. And some classes won't get invis for a while so there are issues there. Even if you use the illusion potions and invis potions, you'll have to reset the number of bone chips to buy in the mac.

Randyleo · Nov 19, 2014

Try changing this line

/call Buy "bone chips" 32000

to

/call BuyChips

and paste this sub in at the bottom of the macro. This will use all available free slots. You can change the number of free slots it leaves by changing the highlighted number. I can't take credit for that, EqMule posted that in another thread.

Rich (BB code):

Sub BuyChips	

        /notify MerchantWnd ItemList listselect ${Window[MerchantWnd].Child[ItemList].List[=Bone Chips,2]}
	/delay 2s
:goagain
	/if (${Me.FreeInventory}>5) {
		/Shiftkey /notify merchantwnd MW_Buy_Button leftmouseup
	:waitforit
		/if (${Window[MerchantWnd].Child[MW_Buy_Button].Enabled}==FALSE) {
			/echo button is false
			/delay 2
			/goto :waitforit
		}
		/goto :goagain
	}
		/echo Closing Bags
	/keypress CLOSE_INV_BAGS
	/delay 2s
/return

I'm working on rewriting all of the bone chip macros with more checks in them. I was also thinking of writing them so MQ2Navigation is not required. Would anyone be interested in that? On mine I have gone to MoveUtils for movement, that way they don't make the big loop in Brell's Rest. They cut across with one turn.

eqgeek · Nov 20, 2014

I would like to test that actually. I couldn't leave my noob running because if invis failed he would get killed by the newly placed mobs. Maybe running them a different path would be better.

Khuri · Nov 20, 2014

I ran it for a while last night but didnt run into any mobs in Brell's. Id like to try out the MoveUtils also.

eqgeek · Nov 20, 2014

Khuri said:
I ran it for a while last night but didnt run into any mobs in Brell's. Id like to try out the MoveUtils also.

Can you check your map to see if you have a hungry predator hanging out? Maybe this is just on Test right now?

Here is a map.

The red are the hungry predators which are KOS.
The green are braxies that are indifferent.
The yellow is Marie Faye where you buy bone chips.

scotsbiker · Nov 20, 2014

been running it nonestop for 14 hours now and no problems

eqgeek · Nov 20, 2014

scotsbiker said:
been running it nonestop for 14 hours now and no problems

Do you see these mobs? The predators and braxi?

scotsbiker · Nov 20, 2014

havent looked around, but normally only mob apart from quest/merchant npcs i see is the odd roaming dorf

eqgeek · Nov 20, 2014

My noob just got killed again. lol I think I'm going to make a change that has the wiz move with the noob and ports from Marie Fay rather than running back...

Randyleo · Nov 20, 2014

Here are the changes to make:

Comment out the nav statement and add the call for move to Marie, like this.

Rich (BB code):

|/nav ${Math.Calc[${Target.X}+9]} ${Math.Calc[${Target.Y}+4]} ${Target.Z}
/call MoveToMarie

The paste this sub into the macro, it doesn't matter where, but I put it near the bottom, not within the main macro.

Rich (BB code):

Sub MoveToMarie
		/echo Moving to Marie
		:recheck
		/moveto loc -614.09 119.25
			/delay 30
		/if (!${Me.Moving}) {
			/delay 5
		/moveto loc -664.26 76.11
		} else {
		/goto :recheck
				/delay 5
		}
			/delay 5s
/return

For the one for the Fellowship I put the campfire over in the weeds west of Marie, on flat ground. That way they don't have to run around that corner.

Khuri · Nov 20, 2014

Thanks ill give it a shot later. Ill also check my map for those mobs.

Alex01 · Nov 26, 2014

Randyleo said:
Here are the changes to make:

Comment out the nav statement and add the call for move to Marie, like this.

Rich (BB code):

|/nav ${Math.Calc[${Target.X}+9]} ${Math.Calc[${Target.Y}+4]} ${Target.Z} /call MoveToMarie

The paste this sub into the macro, it doesn't matter where, but I put it near the bottom, not within the main macro.

Rich (BB code):

Sub MoveToMarie /echo Moving to Marie :recheck /moveto loc -614.09 119.25 /delay 30 /if (!${Me.Moving}) { /delay 5 /moveto loc -664.26 76.11 } else { /goto :recheck /delay 5 } /delay 5s /return

For the one for the Fellowship I put the campfire over in the weeds west of Marie, on flat ground. That way they don't have to run around that corner.

Awesome!!! job i took the /nav out and put that in man saved me a huge headache, bot kept running into wall and screwing macro up. works like a charm now.. thanks and redcented

Clicker · Jan 26, 2015

Hello everyone, just started back playing EQ and found MQ2. Loving this macro, I followed PallyDPS steps and everything is working great. Except one thing, I have to manually hit the follow key to get my PL toon in the group, the group will disband just fine. Any help would be great. Thanks!!!!

Randyleo · Jan 26, 2015

Do you have the autoaccept plugin loaded? It won't click yes unless you do.

geEQ · Jan 26, 2015

Do a

Rich (BB code):

/plugin list

and check for mq2autoaccept. If it is not loaded, you will need to

Rich (BB code):

/plugin mq2autoaccept load

for /autoaccept on to work.

Clicker · Jan 26, 2015

That did it. Thanks for such a quick reply. Still trying to learn what everything does.

Oh one other question. If my PL toon has his merc out, will the autoaccept still work.

Bone chips - full auto

New member

Single-handedly keeping Daybreak in business

New member

Single-handedly keeping Daybreak in business

New member

New member

New member

Single-handedly keeping Daybreak in business

New member

New member

Member

old and salty

Member

old and salty

Member

New member

Member

New member

Users who are viewing this thread

Cart