enable autocram at bore startup

bore/bore.af

@@ -132,10 +132,11 @@ STATE: {loot_rare} ~~ {
 ~~ }
 STATE: {Default} ~~ {
 	IF:	Always
-		DO:	DoAll
+		DO:	DoAll
-				Chat {/ub opt set VTank.PatchExpressionEngine true}
+				Chat {/ub opt set VTank.PatchExpressionEngine true}
-				ChatExpr {\/vt nav load bore_circuit+getvar[navNumber]}
+				Chat {/vt opt set autocram true}
-				Chat {/vt opt set enablenav true}
+				ChatExpr {\/vt nav load bore_circuit+getvar[navNumber]}
+				Chat {/vt opt set enablenav true}
 				Chat {/vt opt set buffprofile_prots 2}
 				Chat {/vt opt set buffprofile_banes 5}
 				Chat {/vt opt set enablelooting false}

bore/bore.met

@@ -72,33 +72,6 @@ s
 s
 death
 i
-1
-i
-9
-i
-0
-TABLE
-2
-k
-v
-n
-n
-3
-s
-s
-s
-navbore
-s
-r
-d
-3
-s
-t
-d
-600
-s
-death
-i
 7
 i
 1
@@ -266,7 +239,7 @@ n
 s
 s
 s
-navbore
+stuck
 s
 r
 d
@@ -278,6 +251,33 @@ d
 s
 hunt
 i
+1
+i
+9
+i
+0
+TABLE
+2
+k
+v
+n
+n
+3
+s
+s
+s
+really_stuck
+s
+r
+d
+3
+s
+t
+d
+600
+s
+hunt
+i
 25
 i
 1
@@ -293,7 +293,7 @@ dist
 d
 1000
 s
-navbore
+really_stuck
 s
 hunt
 i
@@ -306,7 +306,7 @@ K
 V
 n
 n
-4
+2
 i
 26
 TABLE
@@ -319,33 +319,7 @@ n
 s
 e
 s
-setvar[nearPortal, wobjectfindnearestbyobjectclass[14]]
+coordinatedistancewithz[getplayercoordinates[], wobjectgetphysicscoordinates[wobjectfindnearestbyobjectclass[14]]]<=4
-i
-26
-TABLE
-2
-k
-v
-n
-n
-1
-s
-e
-s
-istrue[getvar[nearPortal]]
-i
-26
-TABLE
-2
-k
-v
-n
-n
-1
-s
-e
-s
-coordinatedistancewithz[getplayercoordinates[], wobjectgetphysicscoordinates[getvar[nearPortal]]]<=4
 i
 21
 TABLE
@@ -367,7 +341,7 @@ n
 s
 e
 s
-wobjectgetname[getvar[nearPortal]]==Singularity Caul
+wobjectgetname[wobjectfindnearestbyobjectclass[14]]==Singularity Caul
 TABLE
 2
 K
@@ -387,7 +361,7 @@ n
 s
 e
 s
-\/me is to close to +wobjectgetname[getvar[nearPortal]]
+\/me is to close to +wobjectgetname[wobjectfindnearestbyobjectclass[14]]
 i
 8
 TABLE
@@ -574,7 +548,7 @@ K
 V
 n
 n
-13
+12
 i
 26
 TABLE
@@ -600,19 +574,6 @@ n
 s
 e
 s
-istrue[getvar[portal]]
-i
-26
-TABLE
-2
-k
-v
-n
-n
-1
-s
-e
-s
 coordinatedistancewithz[getplayercoordinates[], wobjectgetphysicscoordinates[getvar[portal]]] <= 8
 i
 21
@@ -635,7 +596,7 @@ n
 s
 e
 s
-wobjectgetname[getvar[portal]]==Singularity Caul
+wobjectgetname[wobjectfindnearestbyobjectclass[14]]==Singularity Caul
 i
 21
 TABLE
@@ -657,7 +618,7 @@ n
 s
 e
 s
-wobjectgetname[getvar[portal]]#Destroyed.*
+wobjectgetname[wobjectfindnearestbyobjectclass[14]]#Destroyed.*
 i
 26
 TABLE
@@ -845,12 +806,16 @@ K
 V
 n
 n
-12
+13
 i
 2
 s
 /ub opt set VTank.PatchExpressionEngine true
 i
+2
+s
+/vt opt set autocram true
+i
 8
 TABLE
 2
@@ -1316,6 +1281,33 @@ hunt
 s
 navbore
 i
+1
+i
+3
+i
+0
+TABLE
+2
+K
+V
+n
+n
+3
+i
+2
+s
+/vt opt set enablecombat false
+i
+1
+s
+navbore
+i
+2
+s
+/a Help me Jeebus, i'm in whirlwind of vortexes
+s
+really_stuck
+i
 7
 i
 1
@@ -1364,7 +1356,7 @@ K
 V
 n
 n
-5
+3
 i
 2
 s
@@ -1374,23 +1366,6 @@ i
 s
 /vt opt set enablebuffing false
 i
-7
-TABLE
-2
-k
-v
-n
-n
-1
-s
-e
-s
-setvar[diamondMissing, iif[getitemcountininventorybyname[`Diamond Scarab`]>=100, 0, 100-getitemcountininventorybyname[`Diamond Scarab`]]]
-i
-2
-s
-/ub mexec iif[getvar[diamondMissing]>0,chatbox[`/t Nyckelmonster has Leprosy, diamond `+cstr[getvar[diamondMissing]]],0]
-i
 2
 s
 /vt nav load ah_rarecomp
@@ -1437,7 +1412,7 @@ d
 s
 ring_fail
 i
-8
+1
 i
 3
 i
@@ -1448,44 +1423,38 @@ K
 V
 n
 n
-2
+5
 i
 2
 s
-/a I died! But I will comeback!
+/vt opt set enablenav false
 i
-1
+2
 s
-death
+/vt reverseroute
-s
-loot
 i
-1
+8
-i
-9
-i
-0
 TABLE
 2
 k
 v
 n
 n
-3
+1
 s
+e
 s
+\/vt nav load bore_circuit+getvar[navNumber]
+i
+2
 s
-navbore
+/vt opt set enablenav true
+i
+1
 s
-r
+hunt
-d
-3
 s
-t
+stuck
-d
-360
-s
-loot
 i
 1
 i
@@ -1580,7 +1549,7 @@ K
 V
 n
 n
-13
+12
 i
 26
 TABLE
@@ -1606,19 +1575,6 @@ n
 s
 e
 s
-istrue[getvar[portal]]
-i
-26
-TABLE
-2
-k
-v
-n
-n
-1
-s
-e
-s
 coordinatedistancewithz[getplayercoordinates[], wobjectgetphysicscoordinates[getvar[portal]]] <= 8
 i
 21
@@ -1641,7 +1597,7 @@ n
 s
 e
 s
-wobjectgetname[getvar[portal]]==Singularity Caul
+wobjectgetname[wobjectfindnearestbyobjectclass[14]]==Singularity Caul
 i
 21
 TABLE
@@ -1663,7 +1619,7 @@ n
 s
 e
 s
-wobjectgetname[getvar[portal]]#Destroyed.*
+wobjectgetname[wobjectfindnearestbyobjectclass[14]]#Destroyed.*
 i
 26
 TABLE