function A = scribehgobj(HGHandle)
%SCRIBEHGOBJ/SCRIBEHGOBJ

%   Copyright (c) 1984-98 by The MathWorks, Inc.
%   $Revision: 1.11 $  $Date: 1998/06/28 12:17:20 $
%   J.H. Roh & B.A. Jones 4-25-97.

if nargin==0
   A.Class = 'scribehgobj';
   A.HGHandle = [];
   A.ObjBin = {};
   A.ObjSelected = [];
   A.SavedState = {};
   A.Draggable = [];
   A.DragConstraint = [];
   A = class(A,'scribehgobj');
   return
end

if isa(HGHandle, 'scribehgobj')
   A = HGHandle;
elseif ishandle(HGHandle)

   A.Class = 'scribehgobj';   
   A.HGHandle = HGHandle;
   A.ObjBin = {};
   A.ObjSelected = 0;
   A.SavedState = {};
   A.Draggable = 1;
   A.DragConstraint = '';   
   
   A = class(A,'scribehgobj');
else
   error('scribehgobj constructor requires an HG handle');
end
