Upgrading old macro to new standards

Need some help with that macro you're working on or aren't quite sure how to get your macro to do something? Ask here!

Moderator: MacroQuest Developers

]\[E()
a lesser mummy
a lesser mummy
Posts: 48
Joined: Mon Sep 30, 2002 10:13 pm
Location: Flint Michigan
Contact:

Upgrading old macro to new standards

Post by ]\[E() » Tue Jan 13, 2004 8:46 pm

Credit goes to L124RD

Could anyone help me get this working with MQ2?

Code: Select all


| bag.mac -- Bags and unBags. do dah... 

sub main 
/if "$p0"=="bag" { 
/call bagit 
} else /if "$p0"=="equip" { 
/call equipit 
} else { 
/echo Usage: /macro bag.mac <bag|equip> 
} 
/return 

sub bagit 

/cleanup 

| First Bag 
/click right inv 6 
/click left equip ear1 
/click left pack 6 0 
/click left equip ear2 
/click left pack 6 1 
/click left equip neck 
/click left pack 6 2 
/click left equip face 
/click left pack 6 3 
/click left equip head 
/click left pack 6 4 
/click left equip finger1 
/click left pack 6 5 
/click left equip finger2 
/click left pack 6 6 
/click left equip chest 
/click left pack 6 7 
/click right inv 6 

|Second Bag 
/click right inv 7 
/click left equip wrist1 
/click left pack 7 0 
/click left equip wrist2 
/click left pack 7 1 
/click left equip arms 
/click left pack 7 2 
/click left equip shoulder 
/click left pack 7 3 
/click left equip back 
/click left pack 7 4 
/click left equip waist 
/click left pack 7 5 
/click left equip legs 
/click left pack 7 6 
/click left equip feet 
/click left pack 7 7 
/click right inv 7 

|Last Bag 
/click right inv 5 
/click left equip hands 
/click left pack 5 0 
/click left equip range 
/click left pack 5 1 
/click left equip ammo 
/click left pack 5 2 
/click right inv 5 

/return 

sub equipit 

/cleanup 

| First Bag 
/click right inv 6 
/click left pack 6 0 
/click left equip ear1 
/click left pack 6 1 
/click left equip ear2 
/click left pack 6 2 
/click left equip neck 
/click left pack 6 3 
/click left equip face 
/click left pack 6 4 
/click left equip head 
/click left pack 6 5 
/click left equip finger1 
/click left pack 6 6 
/click left equip finger2 
/click left pack 6 7 
/click left equip chest 
/click right inv 6 

|Second Bag 
/click right inv 7 
/click left pack 7 0 
/click left equip wrist1 
/click left pack 7 1 
/click left equip wrist2 
/click left pack 7 2 
/click left equip arms 
/click left pack 7 3 
/click left equip shoulder 
/click left pack 7 4 
/click left equip back 
/click left pack 7 5 
/click left equip waist 
/click left pack 7 6 
/click left equip legs 
/click left pack 7 7 
/click left equip feet 
/click right inv 7 

|Last Bag 
/click right inv 5 
/click left pack 5 0 
/click left equip hands 
/click left pack 5 1 
/click left equip range 
/click left pack 5 2 
/click left equip ammo 
/click right inv 5 

/return 

[/quote]

Raebis
a ghoul
a ghoul
Posts: 81
Joined: Fri Dec 12, 2003 6:23 am

Post by Raebis » Tue Jan 13, 2004 11:47 pm

ok neo hopefull this works... wasn't too hard to convert

Code: Select all

| bag.mac -- Bags and unBags. do dah... 

Sub Main(Arg)
/if "@Arg"=="bag" { 
/call bagit 
/return
}

/if "@Arg"=="equip" { 
/call equipit 
/return
}
/echo Usage: /macro bag.mac <bag|equip>
 
/return 

Sub bagit 

/cleanup 
/press i
| First Bag 
/click right inv 6 
/click left lear 
/click left pack 6 0 
/click left rear 
/click left pack 6 1 
/click left neck 
/click left pack 6 2 
/click left face 
/click left pack 6 3 
/click left head 
/click left pack 6 4 
/click left lfinger 
/click left pack 6 5 
/click left rfinger 
/click left pack 6 6 
/click left chest 
/click left pack 6 7 
/click right inv 6 

|Second Bag 
/click right inv 7 
/click left lwrist 
/click left pack 7 0 
/click left rwrist 
/click left pack 7 1 
/click left arms 
/click left pack 7 2 
/click left shoulders
/click left pack 7 3 
/click left back 
/click left pack 7 4 
/click left waist 
/click left pack 7 5 
/click left legs 
/click left pack 7 6 
/click left feet 
/click left pack 7 7 
/click right inv 7 

|Last Bag 
/click right inv 5 
/click left hands 
/click left pack 5 0 
/click left range 
/click left pack 5 1 
/click left ammo 
/click left pack 5 2 
/click right inv 5 

/return 

Sub equipit 

/cleanup 
/press i
| First Bag 
/click right inv 6 
/click left pack 6 0 
/click left lear 
/click left pack 6 1 
/click left rear 
/click left pack 6 2 
/click left neck 
/click left pack 6 3 
/click left face 
/click left pack 6 4 
/click left head 
/click left pack 6 5 
/click left lfinger
/click left pack 6 6 
/click left rfinger 
/click left pack 6 7 
/click left chest 
/click right inv 6 

|Second Bag 
/click right inv 7 
/click left pack 7 0 
/click left lwrist 
/click left pack 7 1 
/click left rwrist 
/click left pack 7 2 
/click left arms 
/click left pack 7 3 
/click left shoulders
/click left pack 7 4 
/click left back 
/click left pack 7 5 
/click left waist 
/click left pack 7 6 
/click left legs 
/click left pack 7 7 
/click left feet 
/click right inv 7 

|Last Bag 
/click right inv 5 
/click left pack 5 0 
/click left hands 
/click left pack 5 1 
/click left range 
/click left pack 5 2 
/click left ammo 
/click right inv 5 

/return 
Last edited by Raebis on Wed Jan 14, 2004 12:06 am, edited 2 times in total.
Always say what you want to say. Because those who mind, don't matter. And those who matter, don't mind.

ml2517
a grimling bloodguard
a grimling bloodguard
Posts: 1216
Joined: Wed Nov 12, 2003 1:12 am

Post by ml2517 » Tue Jan 13, 2004 11:58 pm

If I were you I would definately be checking the status of each of those slots in your bags before running this. You could use the $item command to verify the slot is empty etc before doing it. Have it abort if you go through and any of the slots is full and/or just have it drop it in a random slot. $freeinv might be useful as well.

]\[E()
a lesser mummy
a lesser mummy
Posts: 48
Joined: Mon Sep 30, 2002 10:13 pm
Location: Flint Michigan
Contact:

Post by ]\[E() » Tue Dec 21, 2004 6:05 pm

Can someone update this macro again please? it keeps calling /If Conditions (command)