|
| My Rog v0.1a, written to the tune of Dream Theater's The Glass Prison
|
| $HeadURL: http://devote.digitalspork.com/repos/macros/myrog.mac $
| $Revision: 24 $
| $Author: rob $
| $Date: 2009-01-27 20:15:00 -0800 (Tue, 27 Jan 2009) $
| $Id: myrog.mac 24 2009-01-28 04:15:00Z rob $
|
| Should have at a bare minimum:
|
| MQ2Eqbc
| MQ2Netbots
| MQ2Melee
| MQ2Cast
| MQ2MoveUtils
| MQ2AdvPath
| MQ2Melee
|
| How to use:
|
| have your puller do /bc assist with the target you want dead. After 5 seconds or so, the rogue will engage and stab, hard.
#event EQBC "<#1#> #2#"
#event Exp "You gain experience!!"
#event Exp "You gain party experience!!"
#event Exp "You gain raid experience!!"
#event RELOAD "#*#did not recieve expected ping from#*#"
#event RELOAD "#*#Could not connect.#*#"
#event RELOAD "#*#You are not connected. Please use#*#"
Sub Main
/declare IN_COMBAT int outer 0
/declare TargetID float outer
/declare Exper float outer 0
/declare AAExp float outer
/varset AAExp ${Math.Calc[${Me.PctAAExp}-${AAExp}]}
/varset Exper ${Math.Calc[${Me.PctExp}-${Exper}]}
/if (!${EQBC.Connected}) {
/echo You are not connected to EQBC.
/echo What you've just said is one of the most insanely idiotic things I have ever heard. At no point in your rambling, incoherent response were you even close to anything that could be considered a rational thought. Everyone in this room is now dumber for having listened to it. I award you no points, and may God have mercy on your soul
/endmac
}
/if (!${NetBots.Enable} || !${NetBots.Listen} || !${NetBots.Output}) {
/echo Netbots is not loaded or running properly (try /netbots on send=on grab=on)
/endmac
}
/squelch /melee sneak=1 hide=1 strike=1 pickpocket=0
/echo I looked around, felt a chill in the air; Took my will and turned it over
:mainloop
/if (${Me.PctHPs} <= 40) {
/bc heal
/delay 2s
}
/doevents
/goto :mainloop
/echo if you see this, something went terribly wrong (think Ghostbusters crossing the streams)
/return
|BlockBegin Event_EQBC
Sub Event_EQBC(EQBCSay,EQBCSender,EQBCCommand)
/if (${EQBCCommand.Left[1].Equal[/]}) {
/docommand ${EQBCCommand}
/return
}
/if (${EQBCCommand.Equal[assist]}) {
/echo Call to attack ${NetBots[${EQBCSender}].TargetID}
/target ID ${NetBots[${EQBCSender}].TargetID}
/varset TargetID ${NetBots[${EQBCSender}].TargetID}
/face fast nolook
/delay 5s
/killthis
/varset IN_COMBAT 1
/varset TargetID 1
}
/return
|BlockEnd Event_EQBC
|BlockBegin Event_Exp
Sub Event_Exp
/varset AAExp ${Math.Calc[${Me.PctAAExp}-${AAExp}]}
/varset Exper ${Math.Calc[${Me.PctExp}-${Exper}]}
/echo EXP: ${Exper} (${Me.PctExp}%) - AAXP: ${AAExp} (${Me.PctAAExp}%)
/popup ${Exper} (${Me.PctExp}%) - AAXP: ${AAExp} (${Me.PctAAExp}%)
/varset Exper ${Me.PctExp}
/varset AAExp ${Me.PctAAExp}
/varset IN_COMBAT 0
/varset TargetID 0
/return
|BlockEnd Event_Exp