Lookin for a Macro

[Zeroburn]

Was wonderin if it was possible to find a ranger macro that will also work with the Forgotten Halls macro for a bard. So that they could group together and help kill and also leech exp?

 

[smokinghot]

I should have this by tommorow will let ya know trying to do something else atm

 

[Zeroburn]

Ok thnx for lookin out man

 

[smokinghot]

Hey Np at all, If i could only figure out why I cant connect to RGchat lol

 

[smokinghot]

Alright I got it running just doing test runs now just a few more hours will Post it when Im done

 

[smokinghot]

Alright u ask and You shall receive lol here is the mac to run on Your bard in place of the other one you use. . .added were some delays, /invite, /dzinvite so when you start it give it alil time especialy when you zone into FH it has a delay to wait for the other toon to zone in so not to cause lag if u are running both on the same machine. . .

Make sure u change and put leachers name where LEACHER is in the mac

#turbo
#event dead "#*#You have been knocked unconscious!#*#"
#event exp "#*#experience!#*#"
#event ping "You have gained an ability point!#*#"
#event stats "#*#YETi STATS#*#"
#event reset "#*#RESET#*#"

Sub Main
	/declare Kill_Count	          int outer 0
	/declare Ping_Count         int outer 0
	/declare Exp                float outer
	/declare AAExp                float outer

	/varset Exp                 ${Me.PctExp}
	/varset AAExp                 ${Me.PctAAExp}

	/echo
	/echo ~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~
	/echo
	/echo  
	/echo	Forgotten Halls FHxpnowarp1.Mac
	/echo
	/echo ~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~
	/echo

	/if (${Zone.ShortName.Equal[Nedaria]}) /call Expedition
        /tell LEACHER
        /delay 1s    
        /plugin mq2exactspeed
        /delay 1s
        /docrack nostun2 on
        /delay 1s
        /docrack noencumberance on
        /delay 1s
        /invite LEACHER
        /delay 2s
        /dzadd LEACHER
	/stoptwist
        /delay 40s
	/speed 70
	/plugin mq2moveutils unload
	/delay 1s
	/plugin mq2moveutils
        /play mob
        /delay 30s
        /speed 5
        /delay 1s
        /moveto loc -575 158 2.13
        /delay 4s
	/face heading 270
        /speed 250
	/delay 3s    
        /circle on 20
	/tar NPC radius 220 rat
	/call Loop
/return

Sub Loop
	/stoptwist
	/squelch /twist 3 4 5 6 7
	:loop
	/doevents
	/if (${Target.ID}==FALSE) /tar NPC radius 220 rat
	/if (${Me.PctHPs}<=60) /potionbelt activate 1
	/if (${Me.PctHPs}<=55) /call healtwist
	/if (${Zone.ShortName.Equal[Nedaria]}) /call Main
	/if (${Zone.ShortName.Equal[GuildLobby]}) /q
	/goto :loop
/return

Sub Expedition
	/twist off
        /disband
        /delay 1s
        /plugin mq2exactspeed
        /target clear
        /delay 1s
        /speed 240
        /target clear
        /target clear
	/delay 2s	
        /play chiba slow
	/delay 45s        
        /target Eldros Danmor
	/delay 2s
        /face
        /delay 1s
	/say interested in visiting
	/delay 3s
        /cleanup
        /face loc 1540, -675
        /target clear
        /delay 2s
	
        /play bear slow
	/delay 45s
        /target Nideno Eliagy
	/delay 2s
        /face
        /delay 1s
	/say Forgotten halls
	/delay 2s
        /cleanup
        /speed 50
        /face loc 1540, -675
        /delay 3s
	/play door4 slow
	/face loc 1540, -675
	/look 0
	/doortarget
	/delay 10s
	/click left
	/delay 2s 
	/click left 
	/keypress u 
	
	
	/delay 30s
	
        /plugin mq2exactspeed
	/stoptwist
        /delay 1s
        /invite LEACHER
        /delay 2s
        /dzadd LEACHER
        /delay 30s
	/speed 70
	/plugin mq2moveutils unload
	/delay 1s
	/plugin mq2moveutils
        /delay 1s
        /docrack noencumber on
	/delay 2s
        /docrack nostun2 on
        /delay 1s
        /play mob
        /delay 30s
        /speed 5
        /delay 1s
        /moveto loc -575 158 2.13
        /delay 4s
	/face heading 270
        /speed 250
	/delay 3s    
        /circle on 20
	/tar NPC radius 220 rat
	/squelch /twist 3 4 5 6 7
	/call Loop
/return

Sub healtwist
	/stoptwist
	/delay 1s
	/squelch /twist 2 3 4 5 6
	:loopheal
	/doevents
	/if (${Me.PctHPs}>=90) /call Loop
	/if (${Target.ID}==FALSE) /tar NPC radius 220
	/if (${Me.PctHPs}<=40) /potionbelt activate 1
	/if (${Zone.ShortName.Equal[Nedaria]}) /call Main
	/if (${Zone.ShortName.Equal[GuildLobby]}) /call dead
	/goto :loopheal
/return





Sub event_dead
	/delay 5s
        /dzremove LEACHER
	/stoptwist
/return

 Sub event_exp
	/varcalc Kill_Count (${Kill_Count}+1)
	/varset AAExp ${Math.Calc[${Me.PctAAExp}-${AAExp}]}
	/varset Exp ${Math.Calc[${Me.PctExp}-${Exp}]}
	/echo EXP: ${Exp} - AAXP: ${AAExp} - 

${Math.Calc[${Macro.RunTime}/60]} minutes
	/echo Kill Count - ${Kill_Count}
	/echo Ping Count - ${Ping_Count}
	/varset Exp ${Me.PctExp}
	/varset AAExp ${Me.PctAAExp}

/return	

Sub event_ping
	/echo PING!
	/varcalc Ping_Count (${Ping_Count}+1)
/return

Sub event_stats
	/echo               Yeti Statistics
	/echo ~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~
	/echo Kill Count - ${Kill_Count}
	/echo Ping Count - ${Ping_Count}
	/echo Running Time - ${Math.Calc[${Macro.RunTime}/60]} 

minutes
	/echo ~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~
/return

run in to any issues at all let me know

 

[smokinghot]

And Now for the Leacher Mac which I have Called Tagfhhelper.mac

Start this mac right outside of the instanced near that female NPC AND MAKE SURE YOU HAVE THE TOON YOU WANT TO ASSIST TARGETED UPON STARTING if you dont it wont assist your toon. . .

Change NAME to bards name

/echo    TagFhhelper.mac
/echo    
/echo    Start Mac right outside FH near the rock
/echo      Also make sure u have the toon u are 
/echo  going to assist targeted before you start this mac



#turbo
#event dzadd "#*#" NAME tells you"#*#"
#event invite "#*#NAME invites you to join a group#*#"
#event group "#*#You have joined#*#"
#event PoK "#*#You have entered Guild Lobby#*#"
#event task "#*#You Have entered Nedaria's Landing.#*#"


 
Sub Main
/declare MainAssist	       string outer ${Target.CleanName}
/assist off
/echo You are-Assisting ${MainAssist}.
:waitforit
/doevents
/doevents
/goto :waitforit
/return

Sub Loop
:targetloop
/doevents
/assist ${MainAssist}
/if ((${Target.Type.Equal["NPC"]}) && (${Target.PctHPs}<=60) && (${Target.Distance}<=150)) /call Attack
/goto :targetloop
/return

Sub Attack
/face 
/autofire
/assist ${MainAssist}
/delay 2s 
/call loop
/return

Sub event_group
:Loop1
/if (!${Window[ConfirmationDialogBox]}) /goto :Loop1
/if (${Window[ConfirmationDialogBox].Open}) {
	/notify ConfirmationDialogBox Yes_Button leftmouseup 
	}

/echo Mission accepted.

/plugin mq2exactspeed
/delay 2s
/cleanup
/delay 1s
/speed 40
/delay 3s
/play door4 slow
/delay 7s
/face heading 240
/doortarget
/keypress u
/delay 10s
/click left
/delay 2s 
/keypress u 
/click left 	

/delay 45s
/if (${Zone.ShortName.Equal[Fhalls_264]}) /call task
/delay 1s
/return 
 
Sub event_invite 
/invite
/return

Sub task
/delay 10s
/speed 70
/play leach slow
/delay 30s
/call loop
/return

Sub event_dzadd 
/delay 5s
/if (${Window[ConfirmationDialogBox].Open}) {
	/notify ConfirmationDialogBox Yes_Button leftmouseup 
	}
/return
 


Sub Event_PoK 
/echo sorry i don't know how or why but you died.
		
		/delay 45s
/sit on
/camp desktop 
		/q
 
/return

Almost forgot Add this To Your Fhalls.ini In your MQ2advpath folder

[leach]
1=-841.55 -72.36 -11.25 
2=-837.75 -60.80 -11.25 
3=-835.40 -55.00 -11.25 
4=-822.45 -33.35 -11.25 
5=-819.03 -27.78 -11.25 
6=-816.35 -22.82 -11.25 
7=-809.43 3.75 -11.25 
8=-808.23 8.90 -11.25 
9=-806.61 14.01 -11.25 
10=-799.83 23.60 -11.25 
11=-795.64 27.86 -11.25 
12=-790.93 31.77 -11.25 
13=-785.26 34.99 -11.25 
14=-779.28 37.82 -11.25 
15=-761.62 42.17 -11.25 
16=-756.43 43.01 -11.25 
17=-740.76 44.01 -11.25 
18=-730.38 43.73 -11.25 
19=-725.38 43.40 -11.25 
20=-715.21 43.05 -11.25 
21=-674.50 42.49 -9.78 
22=-649.62 43.89 -0.76 
23=-644.59 44.25 0.75 
24=-612.31 45.16 3.75 
25=-605.86 45.33 3.75 
26=-599.97 45.79 3.75 
27=-597.84 50.44 3.75 
28=-597.42 55.88 3.75 
29=-597.05 66.18 3.75 
30=-597.85 144.71 1.75 
31=-597.83 150.98 1.75 
32=-593.17 168.66 1.75 
33=-591.12 174.16 1.75 
34=-586.09 184.59 3.75 
35=-581.48 194.94 3.75 
36=-577.64 205.35 3.75 
37=-575.84 210.67 3.75

Once again let me know of any problems

 

[Roguish]

Did I mention smokinghot is the sizzle fo' shizzle.

 

[Zeroburn]

Sweet... Thanks. I'll let you know if i run into any problems...