| Code: |
.
.
.
NEMOVE_RUN:
case( ev.direction )
NEMOVE_AWAY:
repeat
RunAWayFrom(ev.source);
SleepMS(3);
until ( !MoveLoopCheck(ev) );
NEMOVE_TOWARD:
repeat
szukaj_sciezki(ev.source); //advanced run
//RunToward(ev.source); // simple run
//SleepMS(3); // simple run
until ( !MoveLoopCheck(ev) );
endcase
//test
function szukaj_sciezki(cel)
if(!cel || cel.dead)
return;
endif
var sciezka := FindPath(self().x,self().y,self().z,cel.x,cel.y,cel.z,self().realm,0,25);
if(sciezka)
foreach wpis in (sciezka)
RunTowardLocation(wpis.x,wpis.y);
sleepms(3);
endforeach
endif
return 1;
endfunction
|