Powerleveling Setup involving 3 accounts (everquest)

[zazoot]

This works from like level 1 to whatever

If accepted I want access to the everquest section.

To start I will provide explanations of the four macros I shall provide, then the code for said macros will be listed.

First off, we have our favourite quest, the red wine quest (Lady Shae), in freeport, or neriak third gate (Lokar Tobiath).

To use do the following :
*Simply Fill up 8 backpacks with redwines
*Then open up all of the backpacks, target "Lady Shae" in freeport, or "Lokar Tobiath" in neriak third gate (depending on your faction)
*Then make sure your within melee range of them and you have a clear line of sight.
*Then type /macro redwine

This will empty all of the packs with redwines, takes about 10-15 minutes depending on your connection/pc, 2 full sets of red wine should get you to around level 8, (if you are really lazy, or just want the faction you can get to about level 15 doing this, but it slows down alot by then).

---------------

After that we are going to assume that you have either a ranger, or a druid, AND a cleric, as well as the twink account (3 accounts total)

plevler.mac assumes a ranger at level 70 (and all spells up to 70) with a mask with frost shield click, and cloak of retribution equipped, and planestriders greaves equipped (for click root) if you are using a druid, simply change the buff names, and mem the level 64? root that doesnt have the damage component. And for both rangers and druids, equip weapons in prim/sec slots that have no damage/delay component attached to them.

zpl.mac assumes a cleric with all spells up to 70

plevelee.mac assumes a toon with a melee weapon in the mainhand

Here is how this works.

The cleric AND The twink, need to be shrunk, and then the powerleveler, needs to be NOT shrunk.

The cleric and powerleveler need to be grouped.
The twink, ungrouped, or with other twinks.

The twink and cleric will stand behind the powerleveler in a "corner" ill login later and get screenshots if its not obvious what I mean, alot of zones have nice corners where you can jam yourself into them.

once you are setup. you can proceed to run the macros, starting with pleveler.mac first, then zpl.mac next, and then plevelee.mac last,

once you get the positioning perfect, its a simple matter of leaving the toons unattended for long periods of time to get free xp.

Now the question that is forming in your mind... WHERE?
well since Im never going to do this again I might as well tell you what zones are "good"

permafrost, droga, guka, gukb, sola, solb, nurga, chardok, and pretty much any zone with a massload of level 40-50 npcs with groups of 10-15 in one spot within line of sight

redwine.mac
(soandso1 being name of a toon to send a tell to when macro is finished running)

Sub Main 
/declare wine int local 

:Loop 
/if (!${FindItem[=Red Wine].InvSlot}) { 
  /tell soandso1 eet iz finished
  /endmacro 
} 

/for wine 1 to 4 
   /ctrlkey /itemnotify ${FindItem[=Red Wine].InvSlot} leftmouseup 
   /if (!${FindItem[=Red Wine].InvSlot}) /goto :Done 
      /delay 4 
   /if (${wine}==1) { 
      /click left target 
      /click left target 
      /click left target 
      /delay 1
      /click left target 
      /click left target 
      /click left target 
      /delay 1
      /click left target 
      /delay 4
     }
   /if (${wine}==2) {
      /notify GiveWnd GVW_MyItemSlot1 leftmouseup
      /delay 4
     }
   /if (${wine}==3) {
      /delay 4
      /notify GiveWnd GVW_MyItemSlot2 leftmouseup
     }
   /if (${wine}==4) {
      /delay 4
      /notify GiveWnd GVW_MyItemSlot3 leftmouseup
     }
/next wine 
/delay 4
/notify GiveWnd GVW_Give_Button leftmouseup 
/delay 4

:cursorclear 
/delay 4
/click left target 
/if (${Cursor.ID}) /goto :cursorclear 
/goto :Loop 

:Done 
  /delay 4
  /notify GiveWnd GVW_Give_Button leftmouseup 
  /endmacro

zpl.mac
(soandso1 being name of the twink being powerleveled)

sub main 
/declare evntq int outer
/varset evntq 0
:loop1
  /target pc
/if ((${Me.Buff[Aura of Devotion].Duration}<=100)) {
  /cast "Aura of Devotion"
  /delay 70
 }
/if ((${Me.Buff[Resolution].Duration}<=100)) {
  /delay 15
  /target pc
  /delay 15
  /cast "Resolution"
  /cast "Resolution"
  /cast "Resolution"
  /delay 65
  /target soandso1
  /cast "Resolution"
  /cast "Resolution"
  /cast "Resolution"
 }
/if ((${Me.Buff[Symbol of Naltron].Duration}<=100)) {
  /delay 15
  /target pc
  /delay 15
  /cast "Symbol of Naltron"
  /cast "Symbol of Naltron"
  /cast "Symbol of Naltron"
  /delay 65
  /target soandso1
  /cast "Symbol of Naltron"
  /cast "Symbol of Naltron"
  /cast "Symbol of Naltron"
 }

|/if (${Me.PctHPs}<99) {
|/cast "Divine Barrier"
|/cast "Divine Barrier"
|/cast "Divine Barrier"
|/cast "Divine Aura"
|/cast "Divine Aura"
|/cast "Divine Aura"
| }

|Remove this as needed
|/if ((${Me.Buff[Illusion: Fier`Dal].Duration}<=40)) {
|  /cast item "Crown of Deceit"
| }
|/if (${Me.Buff[Illusion: Skeleton].Duration}<=50) { |
|  /cast item "Amulet of Necropotence" 
|  /delay 10
|} 

/if ((${Me.Buff[Yaulp VII].Duration}<=1)) {
  /cast "Yaulp VII"
  /cast "Yaulp VII"
  /cast "Yaulp VII"
 }
/if ((${Me.Buff[Armor of the Pious].Duration}<=1)) {
  /cast "Armor of the Pious"
  /cast "Armor of the Pious"
  /cast "Armor of the Pious"
 }



/target pc
/call healbum
/if (${Target.PctHPs}<60) {
/cast "Pious Remedy"
/cast "Pious Remedy"
/cast "Pious Remedy"
}
/if (${Target.PctHPs}<99) {
|/cast "Pious Remedy"
/cast "Greater Healing"
/cast "Greater Healing"
/cast "Greater Healing"
}
/delay 10
/keypress PARTY1
/call healbum
/delay 10
/keypress PARTY2
/call healbum
/delay 10
/target soandso1
/if (${Target.PctHPs}<60) {
/cast "Pious Remedy"
/cast "Pious Remedy"
/cast "Pious Remedy"
}
/if (${Target.PctHPs}<99) {
|/cast "Pious Remedy"
/cast "Greater Healing"
/cast "Greater Healing"
/cast "Greater Healing"
}
/delay 10
/goto :loop1 
/return

sub healbum
/if ((${Target.PctHPs}<41)&&(${Target.PctHPs}>1)) {
/alte act 169
/alte act 169
/alte act 169
/alte act 169
/alte act 169
/cast item "Aegis of Superior Divinity"
/delay 15
/alte act 38
/alte act 38
/alte act 38
/alte act 38
/alte act 38
}
/if (${Target.PctHPs}<70) {
/cast "Pious Remedy"
/cast "Pious Remedy"
/cast "Pious Remedy"
/cast "Pious Remedy"
/cast "Pious Remedy"
 }
/return

plevelee.mac
(soandso1 being the name of the one doing the pulling, rooting, snaring, and tanking via DS of the stuff the twink is meleeing.)

sub main 
:loop1 
/assist soandso1
/call killthemob 
/delay 20
/goto :loop1 
/return

sub killthemob 
:loop2 
  /attack on 
  /assist soandso1
/if ((${Target.PctHPs}>0)&&(${Target.PctHPs}<99)&&(${Target.Distance}<50)) /face 
  /delay 30
/if (${Combatstatus}) /goto :loop2 
/return

pleveler.mac :

#chat tell 

sub main 
/declare evntq int outer
/varset evntq 0
:loop1 
/if ((${Me.Buff[Vengeful Guard].Duration.TotalSeconds}<=200)) {
    /cast item "Cloak of Retribution"
    /delay 18
  }
/if ((${Me.Buff[Frost Shield].Duration.TotalSeconds}<=200)) {
    /cast item "Cerulean Painted Veil"
    /delay 25
  }
/if ((${Me.Buff[Briarcoat].Duration.TotalSeconds}<=200)) {

    /cast "Briarcoat"
    /cast "Briarcoat"
    /cast "Briarcoat"
    /delay 35
  }
/if ((${Me.Buff[Ward of the Hunter].Duration.TotalSeconds}<=200)) {
    /cast "Ward of the Hunter"
    /cast "Ward of the Hunter"
    /cast "Ward of the Hunter"
    /delay 61
  }
/if ((${Me.Buff[Hunter's Vigor].Duration.TotalSeconds}<=200)) {
    /target pc
    /delay 15
    /cast "Hunter's Vigor"
    /cast "Hunter's Vigor"
    /cast "Hunter's Vigor"
    /delay 61
  }
/if (${Me.PctHPs}<30) { 
  /call maintainhp 
} 
/if (${Me.PctMana}<30) { 
  /call maintainmana 
} 
/attack off
/call killthemob 
/delay 1s 
/goto :loop1 
/return 

sub maintainhp 
/target pc
:loop2 
/sit off
/target pc
/cast "Sylvan Light" 
/delay 3.6s 
/if (${Me.PctHPs}>80) /goto :donehealing
/if (${Me.PctMana}>25) /goto :loop2 
/doevents
:donehealing
/return 

sub maintainmana 
/sit on 
/delay 3m 
/return 

sub killthemob 
/target npc range 0 200 
/if (${Target.Level}>39) /target npc range 0 200 next
/alt act 219
/delay 15
/if (${Target.PctHPs}<95) /attack on 
:loop3 
/doevents
/target npc range 0 200 
|/if (${Target.Level}>39) /target npc range 0 200 next
/if (${Target.PctHPs}<40) /cast item "Planestriders Greaves"
/alt act 219
/delay 15
/doability taunt 
/if (${Me.PctHPs}<50) { 
   /call maintainhp 
   /target npc range 0 200 
   /if (${Target.Level}>39) /target npc range 0 200 next
  } 
/face fast 
/if (${Combatstatus}) /goto :loop3 
/return 

Sub Event_Chat(ChatType,Sender,ChatText) 
/if (${evntq}==0) {
/if (${ChatText.Equal[mommyplease]}) { 
/varset evntq 1
/keypress duck
/delay 0.7s
/keypress duck
/delay 0.7s
/target ${Sender} 
/target ${Sender}
/target ${Sender}
/cast "Sylvan Light"
/cast "Sylvan Light"
/cast "Sylvan Light"
/target npc range 0 200 
/if (${Target.Level}>39) /target npc range 0 200 next
/varset evntq 0
 } 
}
/return

 

[zazoot]

50 views and nobodys attempted my setup for powerlevleng ? :P

 

[Running in Circles]

no need to bump, someone will get to it

in fact, bumping takes it longer for someone to respond to your thread.

 

[IamBigDaddy]

I vote yes

Your macs are fairly limited and need significant mods work with average toons. It would have been much cleaner to use spell_routines.inc for instance instead of recasts.

However it is pretty well written up and shows a little potential.

On

 

[Devlin]

Same, I vote yes.

The macro itself needs some work, but It's easy to start with little things and learn that way, and by looking at other example.

If this is your first/"learning" macro then props to you.

 

[Tonka Trucks]

I vote Yes as well. I think that anyone who shows this sort of effort towards macro development should be gladly accepted into our community.

 

[Cade]

Welcome

 

[zazoot]

yayyyy

if anyone wants modified versions of these macros, just tell me what your clicks / buffs are and i can make it happen.

(and yes ill get off my ass and learn about spell routines, i was just being lazy before and didnt want to incorporate pre made stuff ;o)

 

[Ryzon]

This is giving me ideas on porting to Bard use... For example, pull a mob, beat it to 5% health, charm, break charm with a clickie, have PLee do 1 point of damage, let mob kill itself on damage shield, rinse and repeat. Of course this would only work on mobs that don't run.

Another variation would be to pull a mob with HoS and twist maximum DS and Cantana of life. Twist Snare, DS, and Life when mob is at 25% health. Then have PLee finish him off when he runs...

Oh the possibilities... Thanks for the post.

 

[RipSki]

i could never get mac with spell Routines to work it never saves correctly plus im a dink and have limited knowledge on how to set it all up, I like simple macs where i can just /mac File =)

 

[Norrathian]

Of course this would only work on mobs that don't run.

Another variation would be to pull a mob with HoS and twist maximum DS and Cantana of life. Twist Snare, DS, and Life when mob is at 25% health. Then have PLee finish him off when he runs...

Oh the possibilities... Thanks for the post.

This is similar to what I use. The thing to keep in mind is that most mobs do run. The fix is to root the mob. Snared mobs will stand there trying to run, which is great for working up melee / archery, while rooted mobs will actually fight back till dead. This is usually how people PL melee twinks on mobs that are lvl 15-30. Just hit it for 1 point and let rooted mob die to the DS.

Good writeup.

 

[EvenLessSpam]

Those are some nice macros. I didn't know about that Red Wine quest

I took the liberty of messing with the code of that macro a bit

|**
 * Redwine.mac by zazoot
 *
 * Version: 1.0.1
 *
 * Changes:
 *  1.0.0
 *  - Initial release by zazoot
 *
 *  1.0.1
 *  - Cleaned up code
 *  - Speeded up the macro by adding delay conditions
 *
 * Description:
 *  1.  Fill up on Red Wine.
 *  2a. For "good" faction, head to West Freeport and find Lady Shae. Face and
 *      target her, make sure to be within melee range.
 *  2b. For "evil" faction, head to Neriak Third Gate and find Lokar To`Biath.
 *      Face and target him, make sure to be within melee range.
 *  3.  Run the macro by typing: "/macro Redwine".
**|
Sub Main
    /declare    i       int     local   0
    /declare    Wine    int     local   0
    :Loop
        /for i 0 to 3
            /if (!${FindItem[=Red Wine].InvSlot}) /goto :End
            /ctrlkey /itemnotify ${FindItem[=Red Wine].InvSlot} leftmouseup
            /delay 5 (${Cursor.ID})
            /if (${i} < 1) {
                :GiveTarget
                    /click left target
                    /delay 5 (!${Cursor.ID})
                /if (${Cursor.ID}) /goto :GiveTarget
                /varcalc Wine ${Wine}+1
            } else {
                /notify GiveWnd GVW_MyItemSlot${i} leftmouseup
                /delay 5 (!${Cursor.ID})
                /varcalc Wine ${Wine}+1
            }
        /next i
        /delay 5
        /notify GiveWnd GVW_Give_Button leftmouseup
        /delay 1s (!${Window[GiveWnd].Open})

        :ClearCursor
            /autoinventory
            /delay 5 (!${Cursor.ID})
        /if (${Cursor.ID}) /goto :ClearCursor
    /goto :Loop

    :End
    /delay 5
    /if (${Window[GiveWnd].Open}) {
        /notify GiveWnd GVW_Give_Button leftmouseup
        /delay 1s (!${Window[GiveWnd].Open})
    }
    /echo Done! Handed in ${Wine} bottle${If[${Wine}>0,s,]} of wine.
/return

 

[oskar]

Those are some nice macros. I didn't know about that Red Wine quest

I took the liberty of messing with the code of that macro a bit

|**
* Redwine.mac by zazoot
*
* Version: 1.0.1
*
* Changes:
*  1.0.0
*  - Initial release by zazoot
*
*  1.0.1
*  - Cleaned up code
*  - Speeded up the macro by adding delay conditions
*
* Description:
*  1.  Fill up on Red Wine.
*  2a. For "good" faction, head to West Freeport and find Lady Shae. Face and
*      target her, make sure to be within melee range.
*  2b. For "evil" faction, head to Neriak Third Gate and find Lokar To`Biath.
*      Face and target him, make sure to be within melee range.
*  3.  Run the macro by typing: "/macro Redwine".
**|
Sub Main
    /declare    i       int     local   0
    /declare    Wine    int     local   0
    :Loop
        /for i 0 to 3
            /if (!${FindItem[=Red Wine].InvSlot}) /goto :End
            /ctrlkey /itemnotify ${FindItem[=Red Wine].InvSlot} leftmouseup
            /delay 5 (${Cursor.ID})
            /if (${i} < 1) {
                :GiveTarget
                    /click left target
                    /delay 5 (!${Cursor.ID})
                /if (${Cursor.ID}) /goto :GiveTarget
                /varcalc Wine ${Wine}+1
            } else {
                /notify GiveWnd GVW_MyItemSlot${i} leftmouseup
                /delay 5 (!${Cursor.ID})
                /varcalc Wine ${Wine}+1
            }
        /next i
        /delay 5
        /notify GiveWnd GVW_Give_Button leftmouseup
        /delay 1s (!${Window[GiveWnd].Open})

        :ClearCursor
            /autoinventory
            /delay 5 (!${Cursor.ID})
        /if (${Cursor.ID}) /goto :ClearCursor
    /goto :Loop

    :End
    /delay 5
    /if (${Window[GiveWnd].Open}) {
        /notify GiveWnd GVW_Give_Button leftmouseup
        /delay 1s (!${Window[GiveWnd].Open})
    }
    /echo Done! Handed in ${Wine} bottle${If[${Wine}>0,s,]} of wine.
/return

Red wine now stacks to 1000, i handed in 42k bottles and went from 17 to 20 on a new char.

The mac didnt work if my bags was closed and it had zero tolerance for me doing anything else on the char. Other than that, flawless!

 

[aspire2008]

Red wine now stacks to 1000, i handed in 42k bottles and went from 17 to 20 on a new char.

Ouch! This is why you keep a SK handy, and level a wizard along with w/e toon you want to PL!

 

[oskar]

Just tried the mac

Those are some nice macros. I didn't know about that Red Wine quest

I took the liberty of messing with the code of that macro a bit

|**
* Redwine.mac by zazoot
*
* Version: 1.0.1
*
* Changes:
*  1.0.0
*  - Initial release by zazoot
*
*  1.0.1
*  - Cleaned up code
*  - Speeded up the macro by adding delay conditions
*
* Description:
*  1.  Fill up on Red Wine.
*  2a. For "good" faction, head to West Freeport and find Lady Shae. Face and
*      target her, make sure to be within melee range.
*  2b. For "evil" faction, head to Neriak Third Gate and find Lokar To`Biath.
*      Face and target him, make sure to be within melee range.
*  3.  Run the macro by typing: "/macro Redwine".
**|
Sub Main
    /declare    i       int     local   0
    /declare    Wine    int     local   0
    :Loop
        /for i 0 to 3
            /if (!${FindItem[=Red Wine].InvSlot}) /goto :End
            /ctrlkey /itemnotify ${FindItem[=Red Wine].InvSlot} leftmouseup
            /delay 5 (${Cursor.ID})
            /if (${i} < 1) {
                :GiveTarget
                    /click left target
                    /delay 5 (!${Cursor.ID})
                /if (${Cursor.ID}) /goto :GiveTarget
                /varcalc Wine ${Wine}+1
            } else {
                /notify GiveWnd GVW_MyItemSlot${i} leftmouseup
                /delay 5 (!${Cursor.ID})
                /varcalc Wine ${Wine}+1
            }
        /next i
        /delay 5
        /notify GiveWnd GVW_Give_Button leftmouseup
        /delay 1s (!${Window[GiveWnd].Open})

        :ClearCursor
            /autoinventory
            /delay 5 (!${Cursor.ID})
        /if (${Cursor.ID}) /goto :ClearCursor
    /goto :Loop

    :End
    /delay 5
    /if (${Window[GiveWnd].Open}) {
        /notify GiveWnd GVW_Give_Button leftmouseup
        /delay 1s (!${Window[GiveWnd].Open})
    }
    /echo Done! Handed in ${Wine} bottle${If[${Wine}>0,s,]} of wine.
/return

I Just used your mac rewrite, it works flawlessly. Then I thought... what if i just give the NPC 4 stacks of 1000 redwines. It worked.... the computer lagged for like 15 seconds, while it was giving them, but it worked. Now the thing that takes the most time is to acually buy the redwine, we need a mac for that

 

[playj]

Buying is easy,
/play pathtowinevendor
/buystuff "Red Wine" 42000

Given that you have made an include from buystuff.mac and also recorded a path to vendor.