Tracking.mac (A Training program for the tracking skill)

[aChallenged1]

Took a bit here and there from all over to get the data needed to make this work.

Code: Select all

|**   Created by aChallenged1 with help.
      Date: Original 08:00 16Jan05.
      Update from 1.0b to 1.0c 15:00 17Jan05.

      Macro: tracking.mac
      Version: 1.0c
      ToProve: figure out if it works properly at and above lvl 51.

      This is purely a macro for Rangers, Druids, and Bards to work up their  tracking skills. Enjoy.
      Line 37 may be uncommented so that you can quickly end simply by targeting yourself.
**|




#turbo

Sub Main

    /declare maxSkill int outer 0
    /declare RV_RandomWait int outer 0

    /if ( ${My.Level} < 40 )  /varset maxSkill ${Math.Calc[${Me.Level}*5+5]}
    /if ( ${My.Level} >= 40 ) /varset maxSkill 200
    /if ( ${My.Level} >= 51 ) /varset maxSkill 205
    /if ( ${My.Level} >= 52 ) /varset maxSkill 210
    /if ( ${My.Level} >= 53 ) /varset maxSkill 215
    /if ( ${My.Level} >= 54 ) /varset maxSkill 220
    /if ( ${My.Level} >= 55 ) /varset maxSkill 225
    /if ( ${My.Level} >= 56 ) /varset maxSkill 230
    /if ( ${My.Level} >= 57 ) /varset maxSkill 235

    /echo maxSkill = ${maxSkill}: the skill level you SHOULD see the macro end at.

|basic loop to do the actual work of /doability "Tracking"
 :loop
|       /if (${Target.ID}==${Me.ID}) /goto :end

	/if (${Me.AbilityReady["Tracking"]}) {
  	       /delay ${Math.Rand[50]}
	       /doability "Tracking"
	       /delay 2
	       /notify TrackingWnd DoneButton leftmouseup
	}

|The following
|** This section checks to see if we have reached our goal. As of yet, I have not implimented 
    the ability for this to properly deal with characters above lvl 40, eventually I hope to.
    In the mean time, you can manually edit it so that ${Math.Calc[${Me.Level}*5+5].Int} is
    the actual max you can get at levels above 51.
**|
        /if (${Me.Skill[Tracking]} == ${maxSkill}) {
	/goto :end
	}  else {
	/goto :loop
	}

/return


:end
/popup Ending macro Tracking at ${Me.Skill["Tracking"]}
/echo Ending macro Tracking at ${Me.Skill["Tracking"]}
/endmacro

/return

Thank you to Wassup and ieatacid for helping point out problems with the test version.
Thanks to Blueninja for giving me an answer I just figured out, thus helping me to be
more sure of the answer I found.

[aChallenged1]

This space left blank on purpose

[ieatacid]

This section is commented out and not in Sub Main

Code: Select all

|** Attempting here to set up a variable dependant on lvl.
    This is not working properly, thus it is commented out, for now.
    /declare maxSkill int outer ${Math.Calc[${Me.Level}*5+5].Int}
    /varset maxSkill ${Math.Calc[${Me.Level}*5+5].int}
    /if ( ${My.Level} >= 40 ) /varset maxSkill 200
    /if ( ${My.Level} >= 51 ) /varset maxSkill 235
**|

along with #turbo

[aChallenged1]

#turbo was put in automatically when I created the basic file using ALT + F New Macro. I guess I should move it to the proper place.

As for the other section, it's purposely commented out since I haven't gotten the hang of how to do the /declare and /varset

What I would like to do is to be able to add the following

Code: Select all

    /declare maxSkill int outer ${Math.Calc[${Me.Level}*5+5].Int} 
    /varset maxSkill ${Math.Calc[${Me.Level}*5+5].int}
    /if ( ${My.Level} >= 40 ) /varset maxSkill 200
    /if ( ${My.Level} >= 51 ) /varset maxSkill 205
    /if ( ${My.Level} >= 52 ) /varset maxSkill 210
    /if ( ${My.Level} >= 53 ) /varset maxSkill 215
    /if ( ${My.Level} >= 54 ) /varset maxSkill 220
    /if ( ${My.Level} >= 55 ) /varset maxSkill 225
    /if ( ${My.Level} >= 56 ) /varset maxSkill 230
    /if ( ${My.Level} >= 57 ) /varset maxSkill 235

properly and then have it use the variable "maxSkill" in place of "Tracking" in the line /if (${Me.Skill[Tracking]} == ${Math.Calc[${Me.Level}*5+5].Int}).

Getting that done will pretty much complete this the way I want it.

[blueninja]

Code: Select all

/if (${Me.Skill[Tracking]} >= ${maxSkill})

[aChallenged1]

Blueninja, thanks for the reply, strangely enough, I figured out that exact bit before I read your post. I'm glad to see that it is the same as what I figured.

Updating code.

[aChallenged1]

Well crap, I broke my macro. Putting old version back up.

[aChallenged1]

Ok, the macro here now seems to be working properly.

Things that it does

1) runs until you stop it, or it reaches max for your level in tracking.
2) has the ability to /endmac by targeting self, IF you uncomment line 37.
3) closes the tracking window 2miliseconds after it opens.
4) has a random counter delay to make it more "human" for those, like me, who are a little paranoid.
5) tells you what skill you should max out at when started up and tells you that you have reached that skill as it ends upon reaching that skill level.

I hope those who have use for this enjoy it.

[Clueless_Coder]

Thx AC1. This rocks :)

[aChallenged1]

It was "fun" in a hair pulling way. LOL

I learned, and that's always a good thing.

Glad you like it.

[FearTheJourney]

Sorry to bump an old post but I was wondering if this macro should still be working. Just tells me what my max skill would be and does not do anything else. I am a lvl 40 ranger with a track skill of 10 hehe dang map filter, who needs to track. But I have been working on maxing some of my less used skills just for the fun of it. Thank you for your time.

[wakkedup]

Clean up the code a little, and it will work.

Code: Select all

Sub Main
	/declare maxSkill int outer

	/varset	maxSkill ${Skill[Tracking].SkillCap}

	/echo maxSkill = ${maxSkill}: the skill level you SHOULD see the macro end at.

	:loop
	/if (${Me.AbilityReady["Tracking"]}) {
		/delay ${Math.Rand[50]}
		/doability "Tracking"
		/delay 2
		/notify	TrackingWnd DoneButton leftmouseup
	}

	/if (${Me.Skill[Tracking]} == ${maxSkill}) {
		/goto :end
	} else {
		/goto :loop
	}

	:end
	/popup Ending macro Tracking at ${Me.Skill["Tracking"]}
	/echo Ending macro Tracking at ${Me.Skill["Tracking"]}
	
/return

Untested, but from the looks of it, it should work.

[mekaniak]

if yer gonna run a tracking skill up macro afk over night or while you're gone, you don't need to worry about closing the window. I had a macro that just kept using the ability whenever it refreshed and it worked like a charm.

[dogmai]

The above macros were causing me to crash "You have been disconnected" while using a custom ui. I believe it may have just been a conflict with the CloseWnd coding. So I whipped up a fast mac that doesnt close the tracking window. The only issue I have with it is that it echoes a max skill of "0" when you start it instead of the actual cap sometimes. Not every time, but one out of 10 times that i started it up it did so.

Code: Select all

|tracker.mac
|
|Simple Tracking Skillup Macro


||||||||||||||||||||
| Main
||||||||||||||||||||
sub Main

  /declare maxSkill int outer 

   /varset   maxSkill ${Skill[Tracking].SkillCap} 

   /echo maxSkill = ${maxSkill}: the skill level you SHOULD see the macro end at. 

   | Verify that we have the ability to track.
   /if (${Me.Skill[Tracking]}==0) {
      /echo You cannot track, silly person!
      /goto :Exit
   }

   :Track

   /delay 1s

   | If we can track then do so.
   /if (${Me.AbilityReady[Tracking]}) {
      /doability tracking
   }

   /goto :Track

:Exit
/return

[dogmai]

Alright, after messing with it some I found that the disconnections were because of having the delay AFTER the skill use. What was happening is it was pinging the server with skill use attempts so fast that it would d/c me because the server couldn't handle the number of requests. So with the delay posted BEFORE the skill use it limits the amount of skill use attempts and prevents that from occurring. I'll play around with it some more and put up a second version that auto-closes the window, but I only use it for afk-skillups in the guildhall tbh.