{$i evedit.pas}


const
      RegHistory: procedure(a1:string;a2:integer) = pointer($59BC44);

      sub_4CBA7C: procedure(a1,a2:pointer) = pointer($4CBA7C);
      sub_4CBC48: procedure(a1:pointer;a2:integer) = pointer($4CBC48);
      sub_5CE040: procedure(a1:pointer) = pointer($5CE040);
      sub_5CE1AC: procedure(a1:pointer) = pointer($5CE1AC);
      sub_4CB8B8: function(a1:pointer;a2:integer):integer = pointer($4CB8B8);
      sub_53E0C8: function(a1,a2:integer):integer = pointer($53E0C8);
      sub_5CDFF0: procedure(a1:pointer;a2:integer) = pointer($5CDFF0);
      sub_536E1C: function(a1:pointer):integer = pointer($536E1C);

var
 EE : ^TEventEditor;// = pointer ($5D1008);
 FLvars : ^TFLVars;