darknesscrysis Posted June 30, 2017 Posted June 30, 2017 (edited) How does the moving through path option in the interface work? I want to move through different chambers whenever the bot finishes the mobs in the actual one. And if you make a path when it finishes does it go back through the same route or does it finishes in the last point? I want to know if I can configure the bot interface to move in circles. If it can't be done with the interface how would it be with a script? Is autotarget the right check? It could target a mob that is being hit by other player and I wouldn't want to count that. procedure StakatoNest; begin if not User.InRange (89701, -44683, -2136, 10000, 10000) then begin TeleportTo ('swamp of screams'); end; if User.InRange (89701, -44683, -2136, 500, 200) then begin //move to the nest end; // when in the first chamber if User.InRange (85004, -42461, -4616, 500, 200) then begin Engine.FaceControl (0, true); while Engine.Status = lsOnline do begin Engine.LoadZone (exepath + 'Zmaps\StakatoNest1st.zmap'); while Engine.AutoTarget do begin Print ('Stay in the first chamber'); Delay (15 * 1000); end; Print ('moving to second chamber'); Engine.MoveTo (79428, -46165, -5129); Engine.MoveTo (79284, -46526, -5128); Engine.MoveTo (79373, -47022, -5160); Engine.LoadZone ('chamber1'); Engine.LoadZone (exepath + 'Zmaps\StakatoNest2nd'); while Engine.AutoTarget do begin Delay (10 * 1000); end; Print ('moving to first chamber'); Engine.MoveTo (79373, -47022, -5160); Engine.MoveTo (79284, -46526, -5128); Engine.MoveTo (79428, -46165, -5129); end; end; end; BEGIN StakatoNest; END. if User.InRange (85004, -42461, -4616, 20000, 8000) then begin Print ('Inside the nest'); if (User.DistTo (79915, -48867, -5120) < User.DistTo (79915, -46316, -5120)) then chamber := 2 else chamber := 1; Engine.FaceControl (0, true); while Engine.Status = lsOnline do begin if ( chamber = 1 ) then begin Engine.LoadZone (exepath + 'Zmaps\StakatoNest1st.zmap'); thereAreMobs := true; while thereAreMobs do begin for i := 0 to NpcList.Count-1 do begin if NpcList.Items(i).Attackable then begin continue; thereAreMobs := false; end else begin Print ('Stay in the first chamber'); Delay (3 * 1000); end; end; end; Print ('moving to second chamber'); Engine.MoveTo (79428, -46165, -5129); Engine.MoveTo (79284, -46526, -5128); Engine.MoveTo (79373, -47022, -5160); end; Engine.LoadZone (exepath + 'Zmaps\StakatoNest2nd.zmap'); thereAreMobs := true; while thereAreMobs do begin for i := 0 to NpcList.Count-1 do begin if NpcList.Items(i).Attackable then begin continue; thereAreMobs := false; end else begin Print ('Stay in the first chamber'); Delay (3 * 1000); end; end; end; Print ('moving to first chamber'); Engine.MoveTo (79373, -47022, -5160); Engine.MoveTo (79284, -46526, -5128); Engine.MoveTo (79428, -46165, -5129); end; end else Print ('You aren''t in the nest'); end; Edited June 30, 2017 by darknesscrysis
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now