Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
|Velium.mac modified from bonechips.mac
|bonechips.mac - 20 DEC 2004
|Originally by kkmonte. Updated by Redbot for use on Redguides.com
|USAGE: /macro velium.mac
|Edited/fixed by: raistlin8989
|Ignore the "Invalid item slot 'null'" echo in the mq2 window as it doesn't affe ct the way the macro runs(ran it for a few hours)
Sub Main
/declare l0 int local
/declare hi int local
/declare ax int local
:Loop
/if (${FindItemCount[=small piece of velium]}<1) /goto :Done
/target npc Normon Stonetooth
/warp target
/say I will do a favor
/delay 1
/target npc Hakon Brightsteel
/warp target
/for l0 0 to 4
/ctrlkey /itemnotify ${FindItem[=Normon's axe].InvSlot} leftmouseup
/delay 20 ${Cursor.ID}
/delay 1
/if (${l0}==0) {
/click left target
/delay 10 ${Window[GiveWnd].Open}
/delay 1
} else {
/notify GiveWnd GVW_MyItemSlot${lo} leftmouseup
/delay 10 !${Cursor.ID}
/delay 1
}
/notify GiveWnd GVW_Give_Button leftmouseup
/delay 20 !${Window[GiveWnd].Open}
/delay 1
:cursorclear1
/autoinv
/delay 1
/if (${Cursor.ID}) /goto :cursorclear1
/target npc Hakon Brightsteel
/for hi 0 to 4
/ctrlkey /itemnotify ${FindItem[=small piece of velium].InvSlot} leftmouseup
/delay 20 ${Cursor.ID}
/delay 1
/if (${hi}==0) {
/click left target
/delay 10 ${Window[GiveWnd].Open}
/delay 1
} else {
/notify GiveWnd GVW_MyItemSlot${hi} leftmouseup
/delay 10 !${Cursor.ID}
/delay 1
}
/if (!${FindItemCount[=small piece of velium]}) /goto :Done
/notify GiveWnd GVW_Give_Button leftmouseup
/delay 10 !${Window[GiveWnd].Open}
/delay 1
:cursorclear2
/autoinv
/delay 1
/if (${Cursor.ID}) /goto :cursorclear2
/target npc Normon Stonetooth
/warp target
/for ax 0 to 4
/ctrlkey /itemnotify ${FindItem[=Normon's axe].InvSlot} leftmouseup
/delay 20 ${Cursor.ID}
/delay 1
/if (${ax}==0) {
/click left target
/delay 10 ${Window[EQUI_GiveWnd].Open}
/delay 1
} else {
/notify GiveWnd GVW_MyItemSlot${ax} leftmouseup
/delay 10 !${Cursor.ID}
/delay 1
}
/notify GiveWnd GVW_Give_Button leftmouseup
/delay 10 !${Window[GiveWnd].Open}
/delay 1
:cursorclear3
/autoinv
/delay 1
/if (${Cursor.ID}) /goto :cursorclear3
/goto :Loop
:Done
/echo YOU ARE OUT OF "Small Piece of Velium"
/delay 1
/notify GiveWnd GVW_Give_Button leftmouseup
/warp succor
/endmacro