#Event NeedInvite "#1# tells you, 'Invite (#2#)'"
#Event NeedTime "#1# tells you, 'Time (#2#)'"
#Event GroupTime "#1# tells the group, 'Time'"
#Event ForceBegin "#1# tells you, 'Force (#2#)'"
#Event LockoutTimer "#*#task because you must wait 0d:0h:#1#m before you can#*#"
#Event Death "You have been Slain#*#"
#Event Zoned "You have entered #1#."
#Event NeedPlayers "You can not be assigned this shared task because your party does not contain the minimum required number of players."
#Event NoLoS "You cannot see your target."
#Event CannotLoot "#*#You cannot loot while a hostile creature is aware of your presence#*#"
#Event Looted "#*#You have looted#*#"
#Event MagicalPresence "#*#strange magical presence prevents you from entering#*#"
#Event SomeoneGotTask "You may not request a shared task because someone in your group, #1#, already has one."
#Event FarsothDied "You have slain Farsoth Mal!"
#Event FarsothDied "Farsoth Mal died."
#turbo 10
#include SpellCast.inc
Sub Main
|--The Password to be auto-invited-----------------------------------------|
/declare InvitePassword string outer password
/declare MinutesToStart int outer 45
/declare ZID int outer 18
/declare StartHP int outer 0
/declare NeedPlayer int outer 0
/declare Looted bool outer ${Bool[FALSE]}
/declare CannotLoot bool outer ${Bool[FALSE]}
/declare Loot bool outer ${Bool[FALSE]}
/declare GSay bool outer ${Bool[FALSE]}
/declare ZonedToInstance bool outer ${Bool[FALSE]}
/declare Presence bool outer ${Bool[FALSE]}
/declare FarsothDead bool outer ${Bool[FALSE]}
/declare LockoutTime timer outer 0
/declare CountDown timer outer 0
/if (${Defined[Param0]}) {
/if (${Param0.Upper.Equal[LOOT]}) {
/varset Loot ${Bool[TRUE]}
} else /if (${Param0.Upper.Equal[GSAY]}) {
/varset GSay ${Bool[TRUE]}
}
}
/if (${Defined[Param1]}) {
/if (${Param1.Upper.Equal[LOOT]}) {
/varset Loot ${Bool[TRUE]}
} else /if (${Param1.Upper.Equal[GSAY]}) {
/varset GSay ${Bool[TRUE]}
}
}
:loop
/if (${Zone.ID} == ${ZID}) /goto :Ready
/call Reset
/if (${Zone.ID} != ${ZID}) /endmacro
:Ready
/call WaitTime
/call JailArea
/call PullLevers
/call SpawnFarsoth
/call KillFarsoth
/if (${Bool[${Loot}]}) /call DoLoot
/call Leave
/goto :loop
/return
Sub Reset
/declare i int local 0
/declare g int local 0
/for i 0 to ${Group.Members}
/varcalc g ${Group.Members}-${i}
/taskremove ${Group.Member[${g}]}
/next i
/delay 2s
:GettingPlayers
/doevents
/delay 1s (${Group.Members} > 1)
/if (${Group.Members} < 2) /goto :GettingPlayers
:GetTask
/cleanup
/target zealot
/delay 1s
/say ${If[${Math.Rand[2]},b,B]}rave
/delay 2s
/varset NeedPlayer 0
/doevents
/if (${NeedPlayer} > 0) /goto :GettingPlayers
:WaitLoop
/doevents
/if (${Window[TaskTemplateSelectWnd].Open}) {
/notify TaskTemplateSelectWnd TaskTemplateSelectAcceptButton leftmouseup
/delay 5s
/goto :GotTask
}
/delay 1s
/goto :WaitLoop
:GotTask
/doevents
/varset ZonedToInstance ${Bool[FALSE]}
/cleanup
/delay 1s
/target zealot
/delay 10s
/say ${If[${Math.Rand[2]},v,V]}enture
/doevents
/if (${Bool[${Presence}]}) {
/varset Presence ${Bool[FALSE]}
/delay 10s
/goto :GotTask
}
/delay 1m (${Bool[${ZonedToInstance}]})
:LoadAAs
/doevents
/if (!${Window[AAWindow].Open}) /keypress V
/notify AAWindow AAW_LoadButton Leftmouseup
/delay 15s (${Bool[${Me.AltAbility[Warlord's Tenacity].ID}]})
/if (!${Bool[${Me.AltAbility[Warlord's Tenacity].ID}]}) /goto :LoadAAs
/cleanup
/return
Sub WaitTime
/declare Announcer timer local 1m
/varset CountDown ${MinutesToStart}m
/call Warper ${Bool[FALSE]} "370.97 270.81 15.02"
/echo Idleing ${MinutesToStart} minutes before starting..
/if (${Bool[${GSay}]}) /gsay Idleing ${MinutesToStart} minutes before starting..
:loop
/doevents
/delay 1s
/if (!${Bool[${Announcer}]}) {
/if (${Math.Calc[${CountDown}/600]} > 10) {
/echo ${Math.Calc[${CountDown}/600].Int} minutes ${Math.Calc[${Math.Calc[${CountDown}%600].Int}/10].Int} seconds, before starting..
/if (${Bool[${GSay}]}) /gsay ${Math.Calc[${CountDown}/600].Int} minutes ${Math.Calc[${Math.Calc[${CountDown}%600].Int}/10].Int} seconds, before starting..
/varset Announcer 10m
} else /if (${Math.Calc[${CountDown}/600]} > 1) {
/echo ${Math.Calc[${CountDown}/600].Int} minutes ${Math.Calc[${Math.Calc[${CountDown}%600].Int}/10].Int} seconds, before starting..
/if (${Bool[${GSay}]}) /gsay ${Math.Calc[${CountDown}/600].Int} minutes ${Math.Calc[${Math.Calc[${CountDown}%600].Int}/10].Int} seconds before starting..
/varset Announcer 1m
} else {
/echo ${Math.Calc[${CountDown}/10].Int} seconds, before starting..
/if (${Bool[${GSay}]}) /gsay ${Math.Calc[${CountDown}/10].Int} seconds, before starting..
}
}
/if (${Bool[${CountDown}]}) /goto :loop
/return
Sub JailArea
/call Warper ${Bool[FALSE]} "536.00 205.00 14.00"
/delay 2s
/squelch /warp succor
/delay 2s
/doevents
/return
Sub PullLevers
/switch 53
/delay 2s
/switch 52
/delay 2s
/switch 51
/delay 2s
/doevents
/return
Sub SpawnFarsoth
/call Warper ${Bool[FALSE]} "982.00 32.00 3.00"
/delay 2s
/call Warper ${Bool[FALSE]} "succor"
/delay 2s
/doevents
/return
Sub KillFarsoth
/squelch /target clear
:AcquireTarget
/doevents
/delay 2s
/target Farsoth
/if (${SpawnCount[Farsoth NPC]} == 0) /return
/if (!${Me.Combat}) /attack on
/squelch /warp target
/delay 2s
/stick 10 moveback
:KillTarget
/doevents
/if (!${Bool[${Target.Name.Find[Farsoth]}]}) /goto :AcquireTarget
/if (${Me.AltAbilityReady[Mighty Strike]}) /call cast "Mighty Strike" Activate
/if (${Me.AltAbilityReady[Armor Cleave]}) /call cast "Armor Cleave" Activate
/if (${Me.AltAbilityReady[Feral Rage]}) /call cast "Feral Rage" Activate
/if (${Me.AltAbilityReady[Savage Onslaught]}) /call cast "Savage Onslaught" Activate
/if (${Me.AltAbilityReady[Cyclone Blade]}) /call cast "Cyclone Blade" Activate
/if (${Me.AltAbilityReady[Stunning Blow]}) /call cast "Stunning Blow" Activate
/if (${Me.PctHPs} < 50) /if (${Me.AltAbilityReady[Warlord's Tenacity]}) /call cast "Warlord's Tenacity" Activate
/if (${SpawnCount[Farsoth NPC]} == 1) /goto :KillTarget
/return
Sub DoLoot
/varset StartHP ${Me.CurrentHPs}
/varset Looted ${Bool[FALSE]}
/target Ornate
/squelch /warp target
/delay 1s
/open
/delay 5s
/if (${Me.CurrentHPs} < ${StartHP}) /call Warper ${Bool[TRUE]} "succor"
:loot
/if (${SpawnCount[Ornate Corpse]} == 0) /return
/doevents
/varset StartHP ${Me.CurrentHPs}
/target Ornate
/squelch /warp target
/delay 1s
/if (${Me.CurrentHPs} < ${StartHP}) /call Warper ${Bool[FALSE]} "succor"
/if (!${Bool[${Target.Name.Find[Ornate]}]}) /goto :loot
/loot
/doevents
/delay 1s
/if (${Bool[${CannotLoot}]}) {
/call Warper ${Bool[TRUE]} succor
/varset CannotLoot ${Bool[FALSE]}
}
/if (${Window[LootWnd].Open}) {
/lootnodrop never
/itemnotify loot1 rightmouseup
/notify LootWnd DoneButton leftmouseup
/lootnodrop always
}
/doevents
/if (${Bool[${Looted}]}) /return
/goto :loot
/return
sub Warper(bool Fade, string WarpLoc)
/attack off
/if (${Bool[${WarpLoc}]}) {
/if (${WarpLoc.Upper.Equal[SUCCOR]}) {
/squelch /warp succor
} else {
/squelch /warp loc ${WarpLoc}
}
} else {
/squelch /warp loc ${SafeSpotY} ${SafeSpotX} ${SafeSpotZ}
}
/if (${Defined[Fade]} && ${Bool[${Fade}]}) /squelch /fade
/delay 5s
/return
Sub Leave
/declare LeaveTimer timer local 1m
/doevents
:loop
/doevents
/target Gillamina
/delay 1s
/squelch /warp target
/delay 1s
/say Leave
/if ((!${Bool[${LeaveTimer}]}) && (${Zone.ID} == ${ZID})) /zone southkarana zealot
/delay 45s
/if (${Zone.ID} == ${ZID}) /goto :loop
/target zealot
/face fast
/delay 2s
/hail
/delay 15s
/return
Sub Event_LockoutTimer(string Line, int WaitTime)
/declare Announcer timer local 1m
/varcalc WaitTime ${WaitTime}+1+${Math.Rand[5]}
/varset LockoutTime ${WaitTime}m
/echo Delaying ${WaitTime} minutes..
/if (${Bool[${GSay}]}) /gsay Delaying ${WaitTime} minutes..
/if (${Me.Standing}) /sit
:loop
/doevents
/delay 1s
/if (!${Bool[${Announcer}]}) {
/if (${Math.Calc[${LockoutTime}/600]} > 10) {
/echo ${Math.Calc[${LockoutTime}/600].Int} minutes ${Math.Calc[${Math.Calc[${LockoutTime}%600].Int}/10].Int} seconds, before requesting mission..
/if (${Bool[${GSay}]}) /gsay ${Math.Calc[${LockoutTime}/600].Int} minutes ${Math.Calc[${Math.Calc[${LockoutTime}%600].Int}/10].Int} seconds, before requesting mission..
/varset Announcer 10m
} else /if (${Math.Calc[${LockoutTime}/600]} > 1) {
/echo ${Math.Calc[${LockoutTime}/600].Int} minutes ${Math.Calc[${Math.Calc[${LockoutTime}%600].Int}/10].Int} seconds, before requesting mission..
/if (${Bool[${GSay}]}) /gsay ${Math.Calc[${LockoutTime}/600].Int} minutes ${Math.Calc[${Math.Calc[${LockoutTime}%600].Int}/10].Int} seconds, before requesting mission..
/varset Announcer 1m
} else {
/echo ${Math.Calc[${LockoutTime}/10].Int} seconds, before requesting mission..
/if (${Bool[${GSay}]}) /gsay ${Math.Calc[${LockoutTime}/10].Int} seconds, before requesting mission..
}
}
/if (${Bool[${LockoutTime}]}) /goto :loop
/if (!${Me.Standing}) /stand
/cleanup
/target zealot
/delay 2s
/say ${If[${Math.Rand[2]},b,B]}rave
/delay 2s
/doevents
/return
Sub Event_Death
/delay 1m
/return
Sub Event_NeedPlayers
/varcalc NeedPlayer 3-${Group.Members}-1
/return
Sub Event_NoLoS
/keypress BACK
/delay 1s
/return
Sub Event_Zoned(string Line, string ZoneName)
/if (${Zone.ID} == ${ZID}) {
/varset ZonedToInstance ${Bool[TRUE]}
/return
}
/varset ZonedToInstance ${Bool[FALSE]}
/return
Sub Event_NeedInvite(string Line, string ToonName, string Password)
/echo ${ToonName} asked invite with ${Password}
/if ((!${Defined[Password]}) || (${Password.NotEqual[${InvitePassword}]}) || (${Group.Members} > 4)) /return
/invite ${ToonName}
/taskadd ${ToonName}
/delay 1s
/return
Sub Event_NeedTime(string Line, string ToonName, string Password)
/echo ${ToonName} asked time with ${Password}
/if ((!${Defined[Password]}) || (${Password.NotEqual[${InvitePassword}]})) /return
/if (${Bool[${LockoutTime}]}) {
/if (${Math.Calc[${LockoutTime}/10]} > 59) {
/tell ${ToonName} ${Math.Calc[${LockoutTime}/600].Int} minutes ${Math.Calc[${Math.Calc[${LockoutTime}%600].Int}/10].Int} seconds, before requesting mission..
} else {
/tell ${ToonName} ${Math.Calc[${LockoutTime}/10].Int} seconds, before requesting mission..
}
} else /if (${Bool[${CountDown}]}) {
/if (${Math.Calc[${CountDown}/10]} > 59) {
/tell ${ToonName} Idleing another ${Math.Calc[${CountDown}/600].Int} minutes ${Math.Calc[${Math.Calc[${CountDown}%600].Int}/10].Int} seconds, before starting..
} else {
/tell ${ToonName} Idleing another ${Math.Calc[${CountDown}/10].Int} seconds, before starting..
}
} else {
/tell ${ToonName} Sorry. Seems like I don't have any time for you. I'm probably already doing the mission..
}
/delay 1s
/return
Sub Event_GroupTime(string Line, string ToonName)
/echo ${ToonName} asked for time in group
/if (!${Bool[${GSay}]}) /return
/if (${Bool[${LockoutTime}]}) {
/if (${Math.Calc[${LockoutTime}/10]} > 59) {
/gsay ${Math.Calc[${LockoutTime}/600].Int} minutes ${Math.Calc[${Math.Calc[${LockoutTime}%600].Int}/10].Int} seconds before requesting mission..
} else {
/gsay ${Math.Calc[${LockoutTime}/10].Int} seconds before requesting mission..
}
} else /if (${Bool[${CountDown}]}) {
/if (${Math.Calc[${CountDown}/10]} > 59) {
/gsay Idleing another ${Math.Calc[${CountDown}/600].Int} minutes ${Math.Calc[${Math.Calc[${CountDown}%600].Int}/10].Int} seconds before starting..
} else {
/gsay Idleing another ${Math.Calc[${CountDown}/10].Int} seconds before starting..
}
} else {
/gsay Sorry. Seems like I don't have any time for you. I'm probably already doing the mission..
}
/delay 1s
/return
Sub Event_ForceBegin(string Line, string ToonName, string Password)
/echo ${ToonName} asked Force begin with ${Password}
/if ((!${Defined[Password]}) || (${Password.NotEqual[${InvitePassword}]}) || (!${Bool[${CountDown}]})) /return
/tell ${ToonName} Okay. Starting right away.
/varset CountDown 0
/delay 1s
/return
Sub Event_MagicalPresence
/echo Event_MagicalPresence
/varset Presence ${Bool[TRUE]}
/return
Sub Event_Looted
/if (${Bool[${Loot}]}) /varset Looted ${Bool[TRUE]}
/return
Sub Event_CannotLoot
/varset CannotLoot ${Bool[TRUE]}
/return
Sub Event_SomeoneGotTask(string ToonNam)
/echo ${ToonName} already got a task.
/return
Sub Event_CannotLoot
/varset FarsothDead ${Bool[TRUE]}
/return
BTW I tried the fix you posted above, still a no go.