anchor.diff:       push ecx
        push edx
         push eax // Char
  -      mov ecx,esi
  +      lea ecx,[esi-1]
         sub ecx,dword ptr LocalInput
  -      dec ecx
         mov eax,self
         mov edx,ebx // State
         call RunStateOnByte
  
positive.code:    sub ecx,dword ptr Position
     jz @Done
     js @Done
    
     mov esi,dword ptr LocalInput
     add esi,dword ptr Position
  
  
negative.code:    end;
    end;
   end;
  {$endif}
  
   Position:=UntilExcludingPosition-1;
  
  