MacroQuest64

Posted: **Thu Apr 29, 2004 4:24 pm**

Mana Robe Macro

|ManaRobe.Mac by Yalp
|Useage: This Macro requires Wand if Impenetrable Force from time, 
|but is easily adaptable to work with wizard epic 
| 
|Thanks to Smash for the help converting it. 

#Turbo 
Sub Main 
   :loop
     /if (${Me.PctMana}==100) /endmacro
     /if ( ${Bool[${Me.Buff["Force Shield"]}]}==FALSE ) /cast item "Wand of Impenetrable Force" 
  :runewait 
     /if (${Me.Casting.ID}) /goto :runewait  
     /cast item "Mana Robe" 
  :robewait 
     /if (${Me.Casting.ID}) /goto :robewait 
     /goto :loop 
/return

Very simple nuke macro. Objective: Nuke, concussion, cconcussion repeat
Does not deal with fizzles or interuptions. Must have elemental wizard legs for this system to work, will not work with out them.

Code: Select all

|Nuke.Mac by Yalp 
| 
|Useage: Requires elemental wizard leggings, Put the nuke you want to use 
|in the first slot. Nukes then casts concussion twice then nukes again. 
|Note: Very Crude macro, does not deal with fizzles or interuptions. 
| 
|Thanks to Smash for the help converting it.

#turbo
Sub Main
   :Start
      /if ( ${String[${Target.ID}].Equal[NULL]} ) /endmacro
      /cast 1
   :wait1 
      /if ( ${String[${Target.ID}].Equal[NULL]} ) /endmacro
      /delay 5
      /if (${Me.Casting.ID}) /goto :wait1
      /cast item "Maelin's Leggings of Lore"
  :wait2
      /if ( ${String[${Target.ID}].Equal[NULL]} ) /endmacro
      /delay 5
      /if (${Me.Casting.ID}) /goto :wait2
    /cast item "Maelin's Leggings of Lore"
  :wait3
      /if ( ${String[${Target.ID}].Equal[NULL]} ) /endmacro
      /delay 5
      /if (${Me.Casting.ID}) /goto :wait3
      /goto :start
/return

Both have been tested numerous times, and do exactly what i want them to do :) hope others can find a use for them,

Posted: **Sat May 01, 2004 11:35 am**

Great basic Macro, Yalp, changed it a little to add a few more features, hope you don't mind me posting it here :)

Just comment out which Rune you want to use (haven't got the Wand yet), put in code so that you Harvest and HoD when able too to speed up your mana regen.

Code: Select all

| ManaRegen.Mac
| Based from the code by Yalp
| v1.1

#turbo 10
#include SpellCast.inc

#event NoAbility "You can use the ability " 

Sub Main 
   /declare NoHoD int outer 0

   /echo Reclaiming mana...
   /if (!${Me.Mount.ID}) /call Cast "White Chain Bridle" item
   :loop 
     /doevents
     /if (${Me.PctMana}>97) /goto :end
|     /echo ${Me.PctMana}
     /if (${Me.PctHPs}<25) /goto :end 
     /if (${Bool[${Me.Buff["Force Shield"]}]}==FALSE) /call Cast "Force Shield"
|     /if (${Bool[${Me.Buff["Barrier of Force"]}]}==FALSE) /call Cast "Staff of the Four" item
     /if (${Me.SpellReady["Harvest"]}) /call Cast "Harvest"
     /if (!${NoHoD}) /call Cast "172" activate 
     /call Cast "Mana Robe" item 
     /goto :loop 
   :end
   /deletevar NoHoD
   /echo Full mana, ending...
/return

Sub Event_NoAbility 
   /varset NoHoD 1
/return

Changed the Nuke one so that it can be used more in a group environment (just tested it for 4 hrs in PoE today) :)

Code: Select all

| Nuke.Mac  
| Based from the code by Yalp
| v1.1

#turbo 10
#include SpellCast.inc

Sub Main
   /if ( ${String[${Target.ID}].Equal[NULL]} ) /endmacro 
   /call Cast "Staff of Temperate Flux" item
   /call Cast "Staff of Temperate Flux" item
   /call Cast "Staff of Temperate Flux" item
   :Start
      /if ( ${String[${Target.ID}].Equal[NULL]} ) /endmacro 
      /call Cast "Maelin's Leggings of Lore" item
      /if ( ${Target.CurrentHPs}<15 ) /endmacro 
      /if ( ${Target.CurrentHPs}>95 ) /goto :start 
      /call Cast "Strike of Solusek" 
      /if ( ${String[${Target.ID}].Equal[NULL]} ) /endmacro 
      /call Cast "Maelin's Leggings of Lore" item
      /if ( ${String[${Target.ID}].Equal[NULL]} ) /endmacro 
      /if ( ${Target.CurrentHPs}<15 ) /endmacro 
      /call Cast "Maelin's Leggings of Lore" item
      /goto :start 
/return

Posted: **Tue May 04, 2004 9:52 pm**

yea those are nice :) i might use em, i designed mine to be very simple and do exactly what i wanted em to do and they work =P

and anyways, i'm not a "pro" macro writer and never was :)

Posted: **Thu May 06, 2004 5:37 am**

Sounds like you and I are on the same wavelength Yalp

I like simple!

Made a few changes to my code, just waiting for things to settle down after the patch to make sure everything is working fine then will edit the code.

Found that parameterising the Nuke is very handy, too many nasty mobs in Time who have variable resists or FD the MA

Posted: **Sat May 08, 2004 2:34 am**

Played with the macro(s) a bit and made one for my wizzy twink. Uses the epic and a manastone; of course you have to be in an old world zone for this to work.

Let me know if there is anything i missed or if I can do something to improve it.

Code: Select all

|Manastone.Mac by Anonymoose
|based off of ManaRobe.Mac by Yalp / ManaRegen.Mac by Article22
|Useage: This Macro requires Wizard Epic - Staff of the Four and a manastone
|or it can be used with the Wand if Impenetrable Force from time.
|Currently it will cast the 800hp rune and the manastone effect 13 time (so you
| do not damage yourself)

#turbo 10
#include SpellCast.inc

Sub Main

|   /if (!${Me.Mount.ID}) /call Cast "White Chain Bridle" item

    :loop

      /call Cast "Staff of the Four" item
      /if (${Me.PctMana}>98) /goto :end
      /if (${Me.PctHPs}<25) /goto :end
      /call manastone
      /goto :loop

    :end

/endmacro

Sub manastone
  /declare i int local
  /For i 1 To 13
    /call Cast "Manastone" item
  /next i 
/return

MacroQuest64

My Wizard Macros [MQ2Data]

My Wizard Macros [MQ2Data]