In your walk back procedure here.
Procedure WalkBack;
Begin
If (MiningInVarrok) And (FindSymbol(x,y,'Water')) Or (InChat('you are dead')) Then
Begin
MakeCompass('N');
HighestAngle;
RadialRoadWalk(RoadColor, 85, 99, 60, Xmod, Ymod)
RadialRoadWalk(RoadColor, 76, 79, 67, Xmod, Ymod)
RadialRoadWalk(RoadColor, 40, 43, 66, Xmod, Ymod)
RadialRoadWalk(RoadColor, 331, 340, 62, Xmod, Ymod)
RadialRoadWalk(RoadColor, 0, 3, 65, Xmod, Ymod)
RadialRoadWalk(RoadColor, 326, 331, 60, Xmod, Ymod)
RadialRoadWalk(RoadColor, 355, 360, 65, Xmod, Ymod)
RadialRoadWalk(RoadColor, 32, 37, 66, Xmod, Ymod)
RadialRoadWalk(RoadColor, 50, 53, 66, Xmod, Ymod)
RadialRoadWalk(RoadColor, 32, 37, 66, Xmod, Ymod)
RadialRoadWalk(RoadColor, 50, 53, 66, Xmod, Ymod)
RadialRoadWalk(RoadColor, 70, 75, 65, Xmod, Ymod)
RadialRoadWalk(RoadColor, 93, 100, 64, Xmod, Ymod)
RadialRoadWalk(RoadColor, 49, 54, 68, Xmod, Ymod)
RadialRoadWalk(RoadColor, 0, 3, 65, Xmod, Ymod) If
(FindSymbol(x,y,'Mineing')) Then
Mouse(x,y,2,2,True)
FindRandoms;
If Not (FindSymbol(x,y,'Mineing')) Then LogOut;
Writeln('Walkback Failed')
Players[CurrentPlayer].Active: = False;
End;
End;
You spelt
Mining wrong, so it will say not a valid symbol and either sit there or logout im not sure.
These are the only valid symbols for
mining.
mining site, mining spot
Besides that everything looks pretty good.