|----------------------------- AUTOTASK2.MAC -----------------------------------|
|- AUTOTASK, By Alatyami, Edited by Smieyjoe72
|- Last Modified: November 3, 2005
|- Usage: /mac autotask2
|- Requirements: AutoTask2.ini, Exp_Tracking.inc
|------------------------------------------------------------------------------|
#turbo 10
#include move.inc
#include Exp_Tracking.inc
#Event finished "#*#You gain #*#"
#Event Zoned "You have entered#*#"
sub main
/ini "AutoTask2.ini" "${Zone}" "${MyTasks}"
/declare CurrentTask1 string outer
/declare CurrentTask2 string outer
/declare CurrentTask3 string outer
/declare TaskSetting int outer 0
/declare ValidTask string outer
/declare Zn int outer
/declare TaskNPC string outer Marana
/declare StandardWait string outer 3s
/declare ZoneWait string outer 45s
/declare WarpWait string outer 3s
/declare SuccessWait string outer 0m
/call ExpPrep
:asktaskmaster
/varset TaskSetting 0
/call GMCheck
/delay 1s
/target Marana
/delay 3
/say Do you have any Tasks?
/delay 2s
|- Select the task window to set varaibles
/notify TaskSelectWnd TaskList leftmouseup
/varset CurrentTask1 ${Window[TaskSelectWnd].Child[TaskList].List[1]}
/varset CurrentTask2 ${Window[TaskSelectWnd].Child[TaskList].List[2]}
/varset CurrentTask3 ${Window[TaskSelectWnd].Child[TaskList].List[3]}
/if (${TaskSetting}==0) {
|- Check the first available task listselect
/notify TaskSelectWnd TaskList listselect ${Window[TaskSelectWnd].Child[TaskList].List[=${CurrentTask1}]}
/notify TaskSelectWnd TaskList leftmouse ${Window[TaskSelectWnd].Child[TaskList].List[=${CurrentTask1}]}
/varset TaskSetting ${Ini[AutoTask2.ini,${Zone},${Window[TaskSelectWnd].Child[TaskList].List[1]},${notFound}]}
/echo INI Check: ${Window[TaskSelectWnd].Child[TaskList].List[1,1]} = ${TaskSetting}
/delay 1s
/if (${TaskSetting}==1) {
/notify TaskSelectWnd AcceptButton leftmouseup
/varset ValidTask ${CurrentTask1}
/call LoadTask
}
/delay 5
}
/if (${TaskSetting}==0) {
|- Check the Second available task listselect
/notify TaskSelectWnd TaskList listselect ${Window[TaskSelectWnd].Child[TaskList].List[=${CurrentTask2}]}
/notify TaskSelectWnd TaskList leftmouse ${Window[TaskSelectWnd].Child[TaskList].List[=${CurrentTask2}]}
/varset TaskSetting ${Ini[AutoTask2.ini,${Zone},${Window[TaskSelectWnd].Child[TaskList].List[2]},${notFound}]}
/echo INI Check: ${Window[TaskSelectWnd].Child[TaskList].List[2,1]} = ${TaskSetting}
/delay 1s
/if (${TaskSetting}==1) {
/notify TaskSelectWnd AcceptButton leftmouseup
/varset ValidTask ${CurrentTask2}
/call LoadTask
}
/delay 5
}
/if (${TaskSetting}==0) {
|- Check the first available task listselect
/notify TaskSelectWnd TaskList listselect ${Window[TaskSelectWnd].Child[TaskList].List[=${CurrentTask3}]}
/notify TaskSelectWnd TaskList leftmouse ${Window[TaskSelectWnd].Child[TaskList].List[=${CurrentTask3}]}
/varset TaskSetting ${Ini[AutoTask2.ini,${Zone},${Window[TaskSelectWnd].Child[TaskList].List[3]},${notFound}]}
/echo INI Check: ${Window[TaskSelectWnd].Child[TaskList].List[3,1]} = ${TaskSetting}
/delay 1s
/if (${TaskSetting}==1) {
/notify TaskSelectWnd AcceptButton leftmouseup
/varset ValidTask ${CurrentTask3}
/call LoadTask
}
/delay 5
}
/notify TaskSelectWnd DeclineButton leftmouseup
/delay 12s
/goto :asktaskmaster
/return
sub LoadTask
/echo Loading: ${ValidTask}
/if (${ValidTask.Equal[Dreaded Giants]}) /call Event_Task1
/if (${ValidTask.Equal[Lands of Dread]}) /call Event_Task2
/if (${ValidTask.Equal[To the Castle!]}) /call Event_Task3
/if (${ValidTask.Equal[Lookout Below]}) /call Event_Task4
/if (${ValidTask.Equal[Giant Expedition]}) /call Event_Task5
/if (${ValidTask.Equal[Mystic Ring]}) /call Event_Task6
/if (${ValidTask.Equal[Scary Caves]}) /call Event_Task7
/return
sub Zoner
/delay 60
:loop
/doevents
/if (${Zn}!=1) /goto :loop
/varset Zn 0
/delay 5
/return
sub Event_Zoned
/call GMCheck
/varset Zn 1
/return
sub Event_finished
/return
sub GMCheck
/if (${Bool[${Spawn[gm].ID}]}) {
/echo A GM or Guide has been detected. Waiting for five minutes to check again ...
/delay 300s
/call GMCheck
}
/return
|- SubFunctions containing task details -|
|-------Dreaded Giants----------------------------|
Sub Event_Task1
/doevents flush
/zone karnor
/call Zoner
/warp loc 198.00 -235.00 46.00
/delay 2s
/zone dreadlands
/call Zoner
/warp loc 1782.00 950.00 92.00
/Delay 2s
/zone firiona
/call Zoner
/Target Telligron
/Delay 1s
/hail
/delay 1s
/call ExpTrack
/zone dreadlands
/call Zoner
/warp loc 806.00 -2040.00 27.00
/return
|-----Lands of Dread----------------------------|
Sub Event_Task2
/doevents flush
/zone karnor
/call Zoner
/warp loc -53.78 -547.10 33.00
/Delay 2s
/zone dreadlands
/call Zoner
/warp loc -1533.88 -4944.30 53.00
/Delay 2s
/zone frontiermtns
/call Zoner
/Target Grenndo
/Delay 1s
/hail
/delay 1s
/call ExpTrack
/zone dreadlands
/call Zoner
/warp loc 806.00 -2040.00 27.00
/return
|-------To the Castle!----------------------------|
Sub Event_Task3
/doevents flush
/zone karnor
/call Zoner
/warp loc -155.77 -225.65 46.00
/Delay 2s
/zone dreadlands
/call Zoner
/warp loc -467.43 3351.36 414.25
/Delay 2s
/zone firiona
/call Zoner
/Target Jithan
/Delay 1s
/hail
/delay 1s
/call ExpTrack
/zone dreadlands
/call Zoner
/warp loc 806.00 -2040.00 27.00
/return
|--------Giant Expedition----------------------------|
Sub Event_Task4
/doevents flush
/zone karnor
/call Zoner
/warp loc 170.49, -261.95, 46.00
/Delay 2s
/zone dreadlands
/call Zoner
/warp loc -430, 1970, 325
/Delay 2s
/zone frontiermtns
/call Zoner
/Target Shilur
/Delay 1s
/Hail
/delay 1s
/call ExpTrack
/zone dreadlands
/call Zoner
/warp loc 806.00 -2040.00 27.00
/return
|--------Lookout Below------------------------------|
Sub Event_Task5
/doevents flush
/zone karnor
/call Zoner
/warp loc 119.52 -32.67 32.19
/Delay 2s
/zone dreadlands
/call Zoner
/warp loc 3069 9659 1047
/Delay 2s
/zone firiona
/call Zoner
/Target Telligron
/Delay 1s
/hail
/delay 1s
/call ExpTrack
/zone dreadlands
/call Zoner
/warp loc 806.00 -2040.00 27.00
/return
|---------Mystic Ring--------------------------------|
Sub Event_Task6
/doevents flush
/zone karnor
/call Zoner
/warp loc 108.11, -446.86, 2.75
/Delay 2s
/zone dreadlands
/call Zoner
/warp loc 2480.67, 7751.34, 1049.22
/Delay 2s
/zone Firiona
/call Zoner
/Target Socaldoor
/delay 1s
/Hail
/delay 1s
/call ExpTrack
/zone dreadlands
/call Zoner
/warp loc 806.00 -2040.00 27.00
/return
|--------Scary Caves-------------------------------|
Sub Event_Task7
/doevents flush
/zone karnor
/call Zoner
/warp loc -48.92 -277.16 2.19
/Delay 2s
/zone dreadlands
/call Zoner
/warp loc -2514 3498 712
/Delay 2s
/zone frontiermtns
/call Zoner
/Target npc Shilur
/Hail
/delay 1s
/call ExpTrack
/zone dreadlands
/call Zoner
/warp loc 806.00 -2040.00 27.00
/return