anchor.diff:    fStates := TKMScriptStates.Create(fIDCache);
     fActions := TKMScriptActions.Create(fIDCache);
   
  -  fOnShowScriptError := aOnShowScriptError;
  +  fOnScriptError := aOnScriptError;
     gScriptEvents.OnScriptError := HandleScriptError;
     fStates.OnScriptError := HandleScriptError;
     fActions.OnScriptError := HandleScriptError;
  
positive.code: 
      fHasErrorOccured: Boolean; //Has runtime error occurred? (only display first error)
      fScriptLogFile: UnicodeString;
      fOnShowScriptError: TUnicodeStringEvent;
  
      fStates: TKMScriptStates;
      fActions: TKMScriptActions;
  
negative.code:     procedure SaveVar(SaveStream: TKMemoryStream; Src: Pointer; aType: TPSTypeRec);
      procedure LoadVar(LoadStream: TKMemoryStream; Src: Pointer; aType: TPSTypeRec);
    public
      constructor Create(aOnScriptError: TUnicodeStringEvent);
      destructor Destroy; override;
  
      property ErrorString: UnicodeString read fErrorString;
  