I realize that when running in shiverpeaks, when Bot encounters a Giant worm that spawns from the ground, bot crashes. I am unsure if this is a known bug or if someone has a fix before I spend (more)hours trying to figure out why it is happening? I recall this happening in the past using things like early versions of TexMod as well. Thanks.
Here is a snippet of what I am up to in my hours of boredom...
Code:
Func EXIT_YaksBend()
If GetMapID() = $Yaks_Bend Then
Out("Exiting Yak's Bend.")
Else
Return
EndIf
;SetDisplayedTitle(0x29) ; Displays your Title.
LoadSkillTemplate($SkillBarTemplate)
MoveTo(-1, 2)
MoveTo(-3, 4)
Move(-50, 50)
WaitMapLoading($Travelers_Vale)
EndFunc
#EndRegion ExitOutpost
#Region DestinationStation
Func RUN_LocationDestination()
If $taxi = True Then
Do
If GetMapID() <> $DESTINATIONID Then
If $DESTINATION = "Ascalon City" Then
$DESTINATIONID = $Ascalon_City_Outpost
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
ElseIf $DESTINATION = "Beetletun" Then
$DESTINATIONID = $Beetletun
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
ElseIf $DESTINATION = "Bergen Hot Springs" Then
$DESTINATIONID = $Bergen_Hot_Springs
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
ElseIf $DESTINATION = "Boreal Station" Then
$DESTINATIONID = $Boreal_Station
; If GetMapID() <> $Boreal_Station Then
; TravelTo($Boreal_Station)
; WaitMapLoading($Boreal_Station)
; EndIf
; If GetMapID() <> $Boreal_Station Then
; ;Check if level 10()
; If ... Then
; QUEST_WhatLiesBeneath()
; ElseIf ... Then
; QUEST_IFeeltheEarthMoveUnderCanthasFeet()
; ElseIf ... Then
; QUEST_HoleofIstan
; EndIf
; EndIf
ElseIf $DESTINATION = ("Eye of the North" Or "Gunnar's Hold" Or "Longeye's Ledge" Or "Olafstead" Or "Sifhalla" Or "Umbral Grotto") Then
If $DESTINATION = "Eye of the North" Then $DESTINATIONID = $Eye_of_the_North_Outpost
If $DESTINATION = "Gunnar's Hold" Then $DESTINATIONID = $Gunnars_Hold
If $DESTINATION = "Longeye's Ledge" Then $DESTINATIONID = $Longeyes_Ledge
If $DESTINATION = "Olafstead" Then $DESTINATIONID = $Olafstead
If $DESTINATION = "Sifhalla" Then $DESTINATIONID = $Sifhalla
If $DESTINATION = "Umbral Grotto" Then $DESTINATIONID = $Umbral_Grotto
; If GetMapID() = ($ Or $) Then RUN_
; If GetMapID() = ($ Or $) Then RUN_
; If GetMapID() = ($ Or $) Then RUN_
ElseIf $DESTINATION = ("Beacon's Perch" Or "Camp Rankor" Or "Copperhammer Mines" Or "Deldrimor War Camp" Or "Droknar's Forge" Or "The Granite Citadel" Or "Ice Caves of Sorrow" Or "Iron Mines of Moladune" Or "Marhan's Grotto" Or "Thunderhead Keep") Then
If $DESTINATION = "Beacon's Perch" Then $DESTINATIONID = $Beacons_Perch
If $DESTINATION = "Camp Rankor" Then $DESTINATIONID = $Camp_Rankor
If $DESTINATION = "Copperhammer Mines" Then $DESTINATIONID = $Copperhammer_Mines
If $DESTINATION = "Deldrimor War Camp" Then $DESTINATIONID = $Deldrimor_War_Camp
If $DESTINATION = "Droknar's Forge" Then $DESTINATIONID = $Droknars_Forge
If $DESTINATION = "The Granite Citadel" Then $DESTINATIONID = $The_Granite_Citadel
If $DESTINATION = "Ice Caves of Sorrow" Then $DESTINATIONID = $Ice_Caves_of_Sorrow_Outpost
If $DESTINATION = "Iron Mines of Moladune" Then $DESTINATIONID = $Iron_Mines_of_Moladune_Outpost
If $DESTINATION = "Marhan's Grotto" Then $DESTINATIONID = $Marhans_Grotto
If $DESTINATION = "Thunderhead Keep" Then $DESTINATIONID = $Thunderhead_Keep_Outpost
; If GetMapID() = ($Ascalon_City_Outpost Or $Old_Ascalon Or $The_Breach Or $Diessa_Lowlands) Then RUN_AscalonCity_GrendichCourthouse()
; If GetMapID() = ($Grendich_Courthouse Or $Ascalon_Foothills Or $Travelers_Vale) Then RUN_GrendichCourthouse_YaksBend()
; If GetMapID() = ($Yaks_Bend Or $Travelers_Vale Or $Iron_Horse_Mine Or $Anvil_Rock) Then RUN_YaksBend_IceToothCave()
; If GetMapID() = ($Ice_Tooth_Cave Or $Deldrimor_Bowl) Then RUN_IceToothCave_BeaconsPerch()
; If GetMapID() = ($Lions_Arch Or $North_Kryta_Province Or $Scoundrels_Rise) Then RUN_LionsArch_GatesofKryta()
; If GetMapID() = ($Gates_of_Kryta_Outpost Or $Griffons_Mouth) Then RUN_GatesofKryta_BeaconsPerch()
If GetMapID() = ($Beacons_Perch Or $Lornars_Pass Or $Dreadnoughts_Drift) Then RUN_BeaconsPerch_SnakeDance()
If GetMapID() = $Snake_Dance Then RUN_SnakeDance_CampRankor()
If $DESTINATION = ("Deldrimor War Camp" Or "The Granite Citadel" Or "Copperhammer Mines" Or "Iron Mines of Moladune") Then
If GetMapID() = ($Camp_Rankor Or $Snake_Dance Or $Grenths_Footprint) Then RUN_CampRankor_DeldrimorWarCamp()
If GetMapID() = ($Deldrimor_War_Camp Or $Grenths_Footprint Or $Spearhead_Peak) Then RUN_DeldrimorWarCamp_TheGraniteCitadel()
If GetMapID() = ($The_Granite_Citadel Or $Spearhead_Peak) And $DESTINATION <> "The Granite Citadel" Then RUN_TheGraniteCitadel_CopperhammerMines()
If GetMapID() = ($Copperhammer_Mines Or $Frozen_Forest) And $DESTINATION = "Iron_Mines_of_Moladune_Outpost" Then RUN_CopperhammerMines_IronMinesofMoladune()
EndIf
If GetMapID() = ($Camp_Rankor Or $Talus_Chute) Then RUN_CampRankor_DroknarsForge()
If $DESTINATION = "Ice Caves of Sorrow" And GetMapID() = $Droknars_Forge Then RUN_DroknarsForge_IceCavesofSorrow()
If GetMapID() = ($Droknars_Forge Or $Ice_Caves_of_Sorrow_Outpost Or $Talus_Chute Or $Icedome Or $Frozen_Forest Or $Ice_Floe) Then RUN_DroknarsForge_ThunderheadKeep()
If GetMapID() = ($Thunderhead_Keep_Outpost Or $Ice_Floe) Then RUN_ThunderheadKeep_IceFloe()
ElseIf $DESTINATION = "Gates of Kryta" Then
$DESTINATIONID = $Gates_of_Kryta_Outpost
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
ElseIf $DESTINATION = "Grendich Courthouse" Then
$DESTINATIONID = $Grendich_Courthouse
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
ElseIf $DESTINATION = "Ice Tooth Cave" Then
$DESTINATIONID = $Ice_Tooth_Cave
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
ElseIf $DESTINATION = "Lion's Arch" Then
$DESTINATIONID = $Lions_Arch
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
ElseIf $DESTINATION = "Temple of the Ages" Then
$DESTINATIONID = $Temple_of_the_Ages
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
ElseIf $DESTINATION = "Yak's Bend" Then
$DESTINATIONID = $Yaks_Bend
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
; If GetMapID() = $ Then RUN_
EndIf
EndIf
Until GetMapID() = $DESTINATIONID Or $taxi = False
If GetMapID() = $DESTINATIONID Then $RunCount += 1
$taxi = False
EndIf
EndFunc
#EndRegion DestinationStation
Func MovetoWaypoints($aWaypoints)
For $i = GetNearestWaypointIndex($aWaypoints) To UBound($aWaypoints) - 1 Step 1
$NearestWaypoint = GetNearestWaypointIndex($aWaypoints)
If GetMapLoading() == 2 Then Disconnected()
If Wipe() = 1 Then ; wipe intercept - wait until rezz and redirect to best waypoint, check for GetIsDead first to avoid checking fo wipe all the time..
GUI_SetWipes(GUI_GetWipes() + 1)
$LastWaypoint = $i
Out("We wiped at " & $aWaypoints[$LastWaypoint][3] & ", waiting for rezz")
CancelAll() ; in case we were pulling enemie
Do
Sleep(3000)
Out("☠☠☠ YOU ARE DEAD ☠☠☠")
If GetPartyDefeated() Then
Out(" you tripped and fell...")
$FailCount += 1
GUICtrlSetData($FailsLabel, " : " & $FailCount)
Return ResignAndReturn($OUTPOSTID, $Language)
EndIf
Until GetPartyHealth() > 0.5
Out("You are no longer dead.")
If GetMorale() < -15 And (GUICtrlRead($UsePcons_Moral) == $GUI_Checked) Then CheckAndUse_MoralCons()
$NearestWaypoint = GetNearestWaypointIndex($aWaypoints)
$i = WipeManagement($aWaypoints, $NearestWaypoint, $LastWaypoint) ; converts nearest waypoint to the desired waypoint based on last or nearest waypoint
Out("Restarting at: " & $aWaypoints[$i][3])
EndIf
Out("Moving to Nearest coord: " & $aWaypoints[$NearestWaypoint][3])
; Out("Moving to: " & $aWaypoints[$i][3])
Switch ($aWaypoints[$i][0])
Case 1
MoveRun($aWaypoints[$i][1], $aWaypoints[$i][2])
Case 2
If $knockdownzone = False Then
$knockdownzone = True
Else
$knockdownzone = False
EndIf
MoveRun($aWaypoints[$i][1], $aWaypoints[$i][2])
Case Else
If GetMapLoading() = 1 Then MoveRun($aWaypoints[$i][0], $aWaypoints[$i][1], $aWaypoints[$i][2])
If GetMapLoading() = 0 Then MoveTo($aWaypoints[$i][0], $aWaypoints[$i][1])
EndSwitch
Next
EndFunc ;==>MovetoWaypoints
#Region Tyria
Func RUN_BeaconsPerch_SnakeDance()
If GetMapID() = $Beacons_Perch Then
$OUTPOSTID = $Beacons_Perch
ExitOutpost()
EndIf
If GetMapID() = $Lornars_Pass Then
Dim $LornarsPass[49][4] = [[-8740, 32238, 1, "1"], [-9592, 31054, 1, "2"], [-10217, 28338, 1, "3"],
I use Notepad++.