Open and close packs

A forum for macro code snippets to be used in writing other macros. Post routines or .inc files here only, completed macros go to the Macro Depot. MQ2Data format only!

Moderator: MacroQuest Developers

User avatar
FreQuency
a hill giant
a hill giant
Posts: 215
Joined: Tue Sep 23, 2003 6:03 pm

Open and close packs

Post by FreQuency » Fri Apr 30, 2004 1:23 am

Code: Select all

| ********************************************************
| OpenPacks
| ********************************************************

Sub OpenPacks
	/declare bag int local 0

	/newif (!${Window[InventoryWindow].Open}) /keypress inventory
	/delay 1
	/for bag 1 to 8 step 1
		/newif (!${Window[pack${bag}].Open}) /itemnotify pack${bag} rightmouseup
	/next bag
	/delay 1
/return

| ********************************************************
| ********************************************************

Sub ClosePacks
	/declare bag int local 0
	/newif (!${Window[InventoryWindow].Open}} /keypress inventory
	/delay 1
	/for bag 1 to 8 step 1
		/newif (${Window[pack${bag}].Open}) /itemnotify pack${bag} rightmouseup
	/next bag
	/delay 1
/return
Frequency
[quote="Lax"] "And before you whine about how we treat our short bus users..."[/quote]
[quote="skyler"]"I come for the comradery, I stay for the positive atmosphere."[/quote]
[quote="dont_know_at_all"]"i rather you not get VIP so i won't feel bad about banning your ass when you keep asking stupid questions"[/quote]