shadowman33
Member
- Joined
- Jan 26, 2005
- RedCents
- 70¢
The macro that I have always used for my foraging is the yafm.mac
It is a great macro that has never given me any problems at all. What I am trying to do is find out a way to build into it, the ability to check to see if I am camo'd (druid) and if not, recast "Improved Superior Camouflage" in order to keep me invis. I use this macro alot to sit in Broodlands to forage scale ore while I box on an alt. All attempts so far to do this by me has just mutilated the macro LOL being the horrible (understatement) coder that I am. I am still trying to figure it out, but if anyone has maybe already done this let me know plz. This is not the original code, it has been altered to sit you back down and check for combat, but works great.
It is a great macro that has never given me any problems at all. What I am trying to do is find out a way to build into it, the ability to check to see if I am camo'd (druid) and if not, recast "Improved Superior Camouflage" in order to keep me invis. I use this macro alot to sit in Broodlands to forage scale ore while I box on an alt. All attempts so far to do this by me has just mutilated the macro LOL being the horrible (understatement) coder that I am. I am still trying to figure it out, but if anyone has maybe already done this let me know plz. This is not the original code, it has been altered to sit you back down and check for combat, but works great.
Rich (BB code):
yafm.mac
Yet Another Forage Macro
Ini File: yafm.ini
0 = destroy
1 = keep
Idea borrowed from bootyjuice, twisted and warped by steggo to fill his
needs. Beware if you are an iksar monk and fiegn, then your forage skill
resets while you're down... you will stand up, then sit back down, likely
getting beat on the whole time.
You've been warned, easy to fix, just no point as a ranger.
**|
#event Success "You have scrounged #*#"
#event Camp "It will take about #*#"
||||||||||||||||||||
| Main
||||||||||||||||||||
sub Main
/declare Forage int outer
/varset Forage 1
| Verify that we have the ability to forage.
/if (${Me.Skill[Forage]}==0) {
/echo You cannot forage, silly person!
/goto :Exit
}
:Forage
| If we can forage then prepare to do so and return to previous state--
| sitting or attacking so far.
/if ( ${Forage}==1 && ${Me.AbilityReady[Forage]}) {
/if ( ${Window[BigBankWnd].Open}) {
/goto :Forage
}
/if ( ${Window[SpellBookWnd].Open}) {
/goto :Forage
}
/if ( ${Me.Casting.ID}) {
/goto :Forage
}
/if (${Me.State.NotEqual[STAND]}) {
/stand
/delay 1s
/doability forage
/sit
} else /if (${Me.Combat}) {
/attack off
/delay 1s
/doability forage
/delay 1s
/attack on
} else {
/doability forage
}
}
/doevents
/goto :Forage
:Exit
/return
||||||||||||||||||||
| Success
||||||||||||||||||||
sub Event_Success
/if (${Cursor.ID}) {
/call HandleItem
}
/return
||||||||||||||||||||
| Camp
||||||||||||||||||||
sub Event_Camp
/echo "Camping, macro ended."
/endmacro
/return
||||||||||||||||||||
| HandleItem
||||||||||||||||||||
sub HandleItem
/declare ItemSetting int local
/declare NotFound int local
/varset NotFound -1
| Look up this item in yafm.ini
/varset ItemSetting ${Ini[yafm.ini,ForageList,${Cursor.Name},${NotFound}]}
/delay 5
| If the item isn't in the .ini file then add it.
/if (${ItemSetting}==${NotFound}) {
/ini "yafm.ini" "ForageList" "${Cursor.Name}" "1"
/varset ItemSetting 1
}
| If we're keeping this item then stash it in our bags.
| Otherwise, just destroy it.
/if (${ItemSetting}==1) {
:LootIt
/autoinventory
/delay 5
/if (${Cursor.ID}) /goto :LootIt
} else {
/destroy
}
/return