|Slipgear.mac
| Automated Slipgear macro, reworked by EvenLessSpam (ELS)
| - ysterverkie - 20060715: Added Task Timer to speed things up a bit
| Updated plugin check to check for MQ2Trek too
|
| Only thing you need to do on your own are, speak with Cartographer Slipgear in
| Corathus Creep to get ALL missions and to get reward afterward.
#Event EnteredZone "You have entered #1#."
#Event TaskUpdated "Your task '#1#' has been updated."
Sub Main
/call Init
/call Intro
:Loop
/if (${Stage} == 0) {
/varcalc Stage ${Stage}+1
/if (${Zone.ID} != 365) /squelch /zone corathus
}
| /doevents doesn't work for checking zoning
/if (${ZoneCheck} != ${Zone.ID}) {
/varset ZoneCheck ${Zone.ID}
/call Event_EnteredZone
}
/delay 3
/if (${Stage} <= 6) /goto :Loop
/return
Sub Explore
/for i1 1 to ${ArraySize[${Stage}]}
/squelch /warp loc ${Explore[${Stage},${i1}]}
/varset TaskTimer 5s
:taskloop
/doevents
/if (${TaskTimer} && !${TaskUpdated}) /goto :taskloop
/varset TaskUpdated FALSE
/next i1
/squelch /warp succor
/varcalc Stage ${Stage}+1
/return
Sub Init
/declare TaskUpdated bool outer FALSE
/declare i1 int outer 0
/declare i2 int outer 0
/declare Stage int outer 0
/declare ZoneCheck int outer 0
/declare ArraySize[5] int outer 0
/declare Explore[5,6] string outer NA
/declare TaskTimer timer outer 0
|---- Explore the Depths (corathus) ---------------------------------------|
|-- Edge of the Corathus Veins --------------------------------------------|
/varset Explore[1,1] -670.05 1139.16 -28.10
|-- Sporali Mindspore Traps -----------------------------------------------|
/varset Explore[1,2] -306.61 933.71 -55.59
|-- Crash Site of Expedition 328 ------------------------------------------|
/varset Explore[1,3] -702.77 260.47 -44.82
|-- Whisper Springs -------------------------------------------------------|
/varset Explore[1,4] 61.54 82.68 -24.07
|-- White Snake Falls -----------------------------------------------------|
/varset Explore[1,5] -143.70 1524.56 -86.23
|---- Chart the Undershore (eastkorlach) ----------------------------------|
|-- North Rim Outpost -----------------------------------------------------|
/varset Explore[2,1] -554.11 -762.87 54.37
|-- Malgrinnor: East Gate -------------------------------------------------|
/varset Explore[2,2] 182.32 -663.30 -2.99
|-- The Enclave of Jarzarrad ----------------------------------------------|
/varset Explore[2,3] -900.74 629.90 100.00
|-- Entrance to Runesmoke Cavern ------------------------------------------|
/varset Explore[2,4] 728.06 107.08 0.67
|-- Jadewater Beach -------------------------------------------------------|
/varset Explore[2,5] 1163.67 -435.02 9.24
|-- The Stone Forest ------------------------------------------------------|
/varset Explore[2,6] 838.30 586.54 135.12
|---- Brave the Ruins of Illsalin (illsalin) ------------------------------|
|-- Gallowglass Arena -----------------------------------------------------|
/varset Explore[3,1] -1374.47 -58.68 -34.29
|-- Battlemaster's Conclave -----------------------------------------------|
/varset Explore[3,2] -1933.15 295.49 67.72
|-- Infested Water Caves --------------------------------------------------|
/varset Explore[3,3] -404.73 329.07 -129.78
|-- Statue of the Deep Ray ------------------------------------------------|
/varset Explore[3,4] -923.76 -538.51 110.68
|-- Imperial Audience Chamber ---------------------------------------------|
/varset Explore[3,5] -2267.19 -464.17 111.81
|-- Wallwatcher's Citadel -------------------------------------------------|
/varset Explore[3,6] -199.08 -639.76 89.11
|---- Explore Stoneroot Falls (westkorlach) -------------------------------|
| The Living Isles --------------------------------------------------------|
/varset Explore[4,1] 198.00 -1101.00 -21.39
|-- The Deeping Way Trade Route -------------------------------------------|
/varset Explore[4,2] 454.62 -1800.23 14.05
|-- Versarin, the Fallen Outpost ------------------------------------------|
/varset Explore[4,3] -928.40 -1514.39 15.07
|-- The Ruins of Xill -----------------------------------------------------|
/varset Explore[4,4] -975.02 -30.47 54.20
|-- The Coral Bog ---------------------------------------------------------|
/varset Explore[4,5] -363.53 -1480.83 4.38
|---- Beware the Hive (drachnidhive) --------------------------------------|
|-- Warren of the Conscripts ----------------------------------------------|
/varset Explore[5,1] -250.00 1360.00 15.00
|-- Recluse Canyon --------------------------------------------------------|
/varset Explore[5,2] -1261.73 498.71 47.53
|-- The East Obelisk ------------------------------------------------------|
/varset Explore[5,3] -418.87 482.43 47.46
|-- The Living Bridges ----------------------------------------------------|
/varset Explore[5,4] 173.00 650.00 219.00
|-- Queen Senday's Shrine -------------------------------------------------|
/varset Explore[5,5] -37.73 1183.32 254.42
|-- The Reanimation Chamber -----------------------------------------------|
/varset Explore[5,6] -618.84, 678.32, -23.73
/if ((!${Plugin[mq2piggyzone].Name.Equal[mq2piggyzone]} || !${Plugin[mq2rwarp].Name.Equal[mq2rwarp]}) && !${Plugin[mq2trek].Name.Equal[mq2trek]}) {
/echo This macro requires the MQ2PiggyZone and MQ2RWarp plugins loaded, or the MQ2Trek plugin loaded.
/endmacro
}
| Count the elements in each level of the array, since .Size can't do this properly.
/for i1 1 to ${Explore.Size[1]}
/for i2 1 to ${Explore.Size[2]}
/if (${Explore[${i1},${i2}].NotEqual[NA]}) /varset ArraySize[${i1}] ${i2}
/next i2
/next i1
/return
Sub Intro
/echo Make sure you have all 5 "Explore" missions from Cartographer Slipgear in Corathus Creep.
/echo You get those missions by going to Corathus Creep ('/zone corathus'), then you go to Cartographer Slipger ('/target Slipgear' and '/warp target'). Then '/say accept the mission' untill you have accepted all 5.
/echo
/echo To check if you have all the mission press the key combination "Alt + Q", and check if the following missions are listed:
/echo Explore the Depths
/echo Chart the Undershore
/echo Explore Stoneroot Falls
/echo Brave the Ruins of Illsalin
/echo Beware the Hive
/echo
/echo Use Shroud Rogue if you have all these missions and are ready to begin, simply type '/mqpause' without the quotes.
/mqpause
/return
Sub Event_TaskUpdated
/varset TaskUpdated TRUE
/return
Sub Event_EnteredZone
/delay 5s ${Me.ID}
/if (${Stage} > 5) {
/if (${Zone.ID} == 365) {
/warp loc -299 203 -12
/target Cartographer Slipgear
/face
/hail
/endmacro
}
}
/if (${Zone.ID} == 365 && ${Stage} == 1) {
/call Explore
/squelch /zone eastkorlach
} else /if (${Zone.ID} == 362 && ${Stage} == 2) {
/call Explore
/squelch /zone illsalin
} else /if (${Zone.ID} == 347 && ${Stage} == 3) {
/call Explore
/squelch /zone westkorlach
} else /if (${Zone.ID} == 358 && ${Stage} == 4) {
/call Explore
/squelch /zone drachnidhive
} else /if (${Zone.ID} == 354 && ${Stage} == 5) {
/call Explore
/squelch /zone corathus
}
/return