soultaker
Member
- Joined
- Feb 2, 2005
- RedCents
- 60¢
If this works it will get one Dain faction and exp
Note the Faction is very small and at 65 it takes about 20 or turn in for 1
blue AA exp. But here it is.
For those who have screwed up Dain faction and need to repair it this is a
good alternative in down time and in lower levels its easy exp.
**NOTE** This will work great if someone can write a macro for easy velium
farming say in CC from the Orc miners or orcs in General in EW
**NOTE 2** This is my first try at a macro so if you coding saveys out there
see problems feel free to correct it or PM me so I can edit it. THANKS
Usage You talk to NPC Normon Stonetooth in the mines say you will help him. he gives you an axe. you take that to Harkon Brightsteel with a small piece of velium and he sharpens the axe and gives it back. Here you get the Dain faction. Then you take the axe back to Normon and you get exp. You will also get a no drop lore item called the Velium Focus. Dont worry since it is lore your bags wont get filled with them. To be ready for this all you need are stacks of small velium pieces on you and be sure no one is paying attention in the zone.
Note the Faction is very small and at 65 it takes about 20 or turn in for 1
blue AA exp. But here it is.
For those who have screwed up Dain faction and need to repair it this is a
good alternative in down time and in lower levels its easy exp.
**NOTE** This will work great if someone can write a macro for easy velium
farming say in CC from the Orc miners or orcs in General in EW
**NOTE 2** This is my first try at a macro so if you coding saveys out there
see problems feel free to correct it or PM me so I can edit it. THANKS
Usage You talk to NPC Normon Stonetooth in the mines say you will help him. he gives you an axe. you take that to Harkon Brightsteel with a small piece of velium and he sharpens the axe and gives it back. Here you get the Dain faction. Then you take the axe back to Normon and you get exp. You will also get a no drop lore item called the Velium Focus. Dont worry since it is lore your bags wont get filled with them. To be ready for this all you need are stacks of small velium pieces on you and be sure no one is paying attention in the zone.
Rich (BB code):
|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
Sub Main
/declare l0 int local
/declare hi int local
/declare ax int local
:Loop
/if (${FindItemCount[=a small piece of velium]}<1) /goto :Done
/target npc Normon Stonetooth
/warp target
/say I will do a favor
/delay 1
/target npc Harkon Brightsteel
/warp target
/for l0 0
/ctrlkey /itemnotify ${FindItem[=Normon's axe].InvSlot} leftmouseup
/delay 20 ${Cursor.ID}
/delay 1
/if (${l0}==0) {
/click left target
/delay 20 ${Window[GiveWnd].Open}
/delay 1
} else {
/notify GiveWnd GVW_MyItemSlot${l0} leftmouseup
/delay 20 !${Cursor.ID}
/delay 1
}
/if (!${FindItemCount[=Normon's axe]}) /goto :Done
/notify GiveWnd GVW_Give_Button leftmouseup
/delay 20 !${Window[GiveWnd].Open}
/delay 1
:cursorclear1
/autoinv
/delay 1
/if (${Cursor.ID}) /goto :cursorclear1
/target npc Harkon Brightsteel
/for hi 0
/ctrlkey /itemnotify ${FindItem[=a small piece of velium].InvSlot}leftmouseup
/delay 20 ${Cursor.ID}
/delay 1
/if (${hi}==0) {
/click left target
/delay 20 ${Window[GiveWnd].Open}
/delay 1
} else {
/notify GiveWnd GVW_MyItemSlot${hi} leftmouseup
/delay 20 !${Cursor.ID}
/delay 1
}
/if (!${FindItemCount[=a small piece of velium]}) /goto :Done
/notify GiveWnd GVW_Give_Button leftmouseup
/delay 20 !${Window[GiveWnd].Open}
/delay 1
:cursorclear2
/autoinv
/delay 1
/if (${Cursor.ID}) /goto :cursorclear2
/target npc Normon Stonetooth
/warp target
/for ax 0
/ctrlkey /itemnotify ${FindItem[=Normon's axe].InvSlot} leftmouseup
/delay 20 ${Cursor.ID}
/delay 1
/if (${ax}==0) {
/click left target
/delay 20 ${Window[GiveWnd].Open}
/delay 1
} else {
/notify GiveWnd GVW_MyItemSlot${ax} leftmouseup
/delay 20 !${Cursor.ID}
/delay 1
}
/notify GiveWnd GVW_Give_Button leftmouseup
/delay 20 !${Window[GiveWnd].Open}
/delay 1
:cursorclear3
/autoinv
/delay 1
/if (${Cursor.ID}) /goto :cursorclear3
/goto :Loop
:Done
/delay 1
/notify GiveWnd GVW_Give_Button leftmouseup
/endmacro
Last edited:
