Check
function TActor.Move (step: integer): Boolean;
var
prv, curstep, maxstep: integer;
fastmove, normmove: Boolean;
begin
Result := FALSE;
fastmove := FALSE;
If you look at that method, you will see a variable called fastmove this deals with instant running.
Edit: this is...