anchor.diff:      if FCount < FMaxFunctions then
       begin
         FunctionNames[FCount]:=lowercase(Extractfilename(Name));
  +      {$IFDEF CPUX86}
         GenerateProc86(@FMemory[FCount * ProcSize], FCount, @logcall, nil);
  +      {$ELSE}
  +      GenerateProc64(@FMemory[FCount * ProcSize], FCount, @logcall, nil);
  +      {$ENDIF}
         try
           p := InterceptCreate(Proc, @FMemory[FCount * ProcSize]);
  +        {$IFDEF CPUX86}
           GenerateProc86(@FMemory[FCount * ProcSize], FCount, @logcall, p);
  +        {$ELSE}
  +        p:=GenerateProc64(@FMemory[FCount * ProcSize], FCount, @logcall, p);
  +        {$ENDIF}
           Inc(FCount);
           result := True;
         except
  
positive.code:     inc(Ofs);
    end;
  
    result:=@Target[0];
  end;
  
  
negative.code:       end;
      end else
      begin
        LOG('Maximum number of functions have been hooked!');
        result := False;
      end;
    finally
      FCS.Leave;
    end;
  end;
  
  
  initialization
  finale := False;
  