i read few macro on site and try to understand..
i try to find my error with http://www.macroquest2.com/wiki/index.p ... de_Errorsl and
http://www.macroquest2.com/wiki/index.php/Macro_Error
no success.
Note: Toon1 and toon2 will bereplace by real caracter name later
here my macro..
#turbo
#include ninjaloot.inc
Sub Main
/bccmd channels ${Zone.ID}
/echo |-----------------------------
/echo | HealTank
/echo |-----------------------------
/declare index int outer
/declare loopkill outer
/varset loopkill 0
/declare Status outer
/varset Status 1
/declare CurrentZone outer
/varset CurrentZone ${Zone.ID}
/declare loop int local 0
:loopstart
/varset CurrentZone ${Zone.ID}
/if (${Me.Casting.ID}||${Me.CombatState.Equal[DEBUFFED]}||${Me.PctHPs}<5) /goto :loopstart
/if (${TellTxt.Equal[Toon1 Nuke]}) /goto :Toon1Nuke
/if (${TellTxt.Equal[Toon1 Loot]}) /goto :Toon1Loot
/if (${Me.CombatState.Equal[ACTIVE]} && ${FindItemCount[=Bridle of the corrupted Sokokar]}>0) {
/call Cast "Bridle of the corrupted Sokokar" item 3s
/delay 1
/delay 24
}
/for loop 0 to ${Group}
/if (${SpawnCount[${Group.Member[${loop}].Name} corpse radius 200]}) {
/if (${Group.Member[${loop}].Name.Equal[Toon1]}) {
/delay 5s
/squelch /bct Toon1 ress ${Group.Member[${loop}].Name}
/delay 2s
/doevents
/delay 5s
}
}
etheal/if (${Bool[${Group.Member[${loop}].Pet.Distance}]} && (${Group.Member[${loop}].Pet.Distance}<200) && (${Group.Member[${loop}].Pet.PctHPs}<95)) {
/if ((${Group.Member[${loop}].Pet.PctHPs}<97) && (${Group.Member[${loop}].Pet.Distance}<200) && (${Group.Member[${loop}].Pet.PctHPs}>81)) {
/delay 2
/target ID ${Group.Member[${loop}].Pet.ID}
/delay 2s (${Target.ID}==${Group.Member[${loop}].Pet.ID})
/if ((${Bool[${Target.Distance}]}) && (${Target.PctHPs}<100) && ${Target.Type.NotEqual[Corpse]}) {
/call cast "Promised Restoration" gem4 2s
/delay 1
/delay 24
}
/if ((${Target.PctHPs}<100) && ${Target.Type.NotEqual[Corpse]}) /goto :petheal
/varset loopkill 0
/keypress ESC
/keypress backspace
} else /if ((${Group.Member[${loop}].Pet.PctHPs}<85) && (${Group.Member[${loop}].Pet.Distance}<200)) {
/delay 2
/target ID ${Group.Member[${loop}].Pet.ID}
/delay 2s (${Target.ID}==${Group.Member[${loop}].Pet.ID})
/if ((${Bool[${Target.Distance}]}) && (${Target.PctHPs}<100) && ${Target.Type.NotEqual[Corpse]}) {
/call cast "Devout Elixir Rk. II" gem2 4s
/delay 1
/delay 24
}
/if ((${Target.PctHPs}<100) && ${Target.Type.NotEqual[Corpse]}) /goto :petheal
/varset loopkill 0
/keypress ESC
/keypress backspace
}
/if ((${Target.PctHPs}<100) && ${Target.Type.NotEqual[Corpse]}) /goto :petheal
/varset loopkill 0
/keypress ESC
/keypress backspace
} else /if ((${Group.Member[${loop}].Pet.PctHPs}<45) && (${Group.Member[${loop}].Pet.Distance}<200)) {
/delay 2
/target ID ${Group.Member[${loop}].Pet.ID}
/delay 2s (${Target.ID}==${Group.Member[${loop}].Pet.ID})
/if ((${Bool[${Target.Distance}]}) && (${Target.PctHPs}<100) && ${Target.Type.NotEqual[Corpse]}) {
/call cast "Devout Light" gem3 4s
/delay 1
/delay 24
}
/if ((${Target.PctHPs}<100) && ${Target.Type.NotEqual[Corpse]}) /goto :petheal
/varset loopkill 0
/keypress ESC
/keypress backspace
}
}
|FLAG 0 if No Heal Group Members, FLAG 1 if Heal Group Members
|/echo PC HEAL ${loop} /if ((1) && (${Bool[${Group.Member[${loop}].Distance}]}) && (${Group.Member[${loop}].Distance}<200) && (${Group.Member[${loop}].LineOfSight}) && (${Group.Member[${loop}].PctHPs}<95)) {
| /if ((1) && (${Bool[${Group.Member[${loop}].Distance}]}) && (${Group.Member[${loop}].Distance}<200) && (${Group.Member[${loop}].LineOfSight}) && (${Group.Member[${loop}].PctHPs}<95)) {
/if ((1) && (${Bool[${Group.Member[${loop}].Distance}]}) && (${Group.Member[${loop}].Distance}<200) && (${Group.Member[${loop}].PctHPs}<95) && (${Group.Member[${loop}].PctHPs}>0)) {
/if ((${Group.Member[${loop}].PctHPs}<97) && (${Group.Member[${loop}].Distance}<200) && (${Group.Member[${loop}].PctHPs}>81)) {
/delay 2
/target ID ${Group.Member[${loop}].ID}
/delay 2s (${Target.ID}==${Group.Member[${loop}].ID})
/if ((${Bool[${Target.Distance}]}) && (${Target.PctHPs}<100) && ${Target.Type.NotEqual[Corpse]}) {
/call cast "Promised Restoration" gem4 2s
/delay 1
/delay 24
}
/if ((${Target.PctHPs}<95) && ${Target.Type.NotEqual[Corpse]}) /goto :petheal
/varset loopkill 0
/keypress ESC
/keypress backspace
} else /if ((${Group.Member[${loop}].PctHPs}<81) && (${Group.Member[${loop}].PctHPs}>0) && (${Group.Member[${loop}].Distance}<200)) {
/delay 2
/target ID ${Group.Member[${loop}].ID}
/delay 2s (${Target.ID}==${Group.Member[${loop}].ID})
/if ((${Bool[${Target.Distance}]}) && (${Target.PctHPs}<100) && ${Target.Type.NotEqual[Corpse]}) {
/call cast "Devout Elixir Rk. II" gem2 4s
/delay 1
/delay 24
}
/if ((${Target.PctHPs}<95) && ${Target.Type.NotEqual[Corpse]}) /goto :petheal
/varset loopkill 0
/keypress ESC
/keypress backspace
}
/if ((${Target.PctHPs}<95) && ${Target.Type.NotEqual[Corpse]}) /goto :petheal
/varset loopkill 0
/keypress ESC
/keypress backspace
} else /if ((${Group.Member[${loop}].PctHPs}<45) && (${Group.Member[${loop}].PctHPs}>0) && (${Group.Member[${loop}].Distance}<200)) {
/delay 2
/target ID ${Group.Member[${loop}].ID}
/delay 2s (${Target.ID}==${Group.Member[${loop}].ID})
/if ((${Bool[${Target.Distance}]}) && (${Target.PctHPs}<100) && ${Target.Type.NotEqual[Corpse]}) {
/call cast "Devout Light" gem2 4s
/delay 1
/delay 24
}
}
/next loop
:Toon1Nuke
/doevents
/if (!${Target.ID}) /varset loopkill 0
/if (${loopkill.Equal[1]} && ${Target.ID} && ${Target.Type.Equal[NPC]} && ${Target.Distance}<230 && ${Target.LineOfSight} && ${Target.PctHPs}<95 && ${Me.PctMana}>35) {
/assist Toon2
/if (${Status.Equal[1]} && (${Target.Distance}<200) && ${Target.LineOfSight}) {
/varset Status 2
/call cast "Indomitable Hammer of Zeal" gem9 6.5s
/delay 1
/delay 24
} else /if (${Status.Equal[2]} && (${Target.Distance}<200) && ${Target.LineOfSight}) {
/varset Status 3
/call cast "Reprehend" gem7 8s
/delay 1
/delay 24
} else /if (${Status.Equal[3]} && (${Target.Distance}<200) && ${Target.LineOfSight}) {
/varset Status 4
/call cast "Reprehend" gem7 8s
/delay 1
/delay 24
} else /if (${Status.Equal[4]} && (${Target.Distance}<200) && ${Target.LineOfSight}) {
/varset Status 1
/call cast "Reprehend" gem7 8s
/delay 1
/delay 24
} else /if (${Status.Equal[3]} && (${Target.Distance}<200) && ${Target.LineOfSight}) {
/varset Status 4
/call cast "Reprehend" gem7 8s
/delay 1
/delay 24
} else {
}
}
:Toon1Loot
Sub Toon1Loot
/call NLPresetup
/call NLAutoloot
:Main_Loop
/call NLAutoloot
/delay 15s
/goto :Main_Loop
/return
