function [stat,post] = blkunknown(path,prop,bstr,bint,bflt,blkType)
%BLKUNKNOWN 
%

% Initial coding by A S Bozin, 5-27-97
% Copyright 1997-2000 The MathWorks, Inc.
% $Revision: 1.6 $ $Date: 2000/06/14 16:11:34 $

   stat = 0;					   % Error flag
   %
   % Create a new subsystem
   %
   bh = add_block('built-in/SubSystem',path,...
		  'ForegroundColor',prop.fgColor,...
		  'BackgroundColor',prop.bgColor,...
		  'Orientation',prop.orientation,...
		  'DropShadow',prop.border,...
		  'Position',prop.position);
   %
   % Mask it
   %
   set_param(bh,'ShowPortLabels','off',...
		'MaskType',blkType,...
		'Tag','Unknown',...
		'MaskDescription','Unknown or not yet implemented SystemBuild block',...
		'MaskHelp','Please send your file to the MathWorks and ask for solution.',...
		'MaskInitialization','[x,y] = sblibico(''superBlock'');',...
		'MaskDisplay','plot(0,0,1,1,x,y);',...
		'MaskIconUnits','autoscale',...
		'Location',[80 80 280 180]);
   %
   % Add input/output ports
   %
   nInputs = bint(5);
   nOutputs = bint(6);
   if (nInputs > 0 | nOutputs > 0)
      rect = [40 0 60 10];
      for (k = 1:nInputs)
	 rect([2 4]) = rect([2 4])+30;
	 ph = add_block('built-in/Inport',sprintf('%s/input-%d',path,k),...
			'Position',rect,...
			'FontSize',10);
      end
      rect = [140 0 160 10];
      for (k = 1:nOutputs)
	 rect([2 4]) = rect([2 4])+30;
	 ph = add_block('built-in/Outport',sprintf('%s/output-%d',path,k),...
			'Position',rect,...
			'FontSize',10);
      end
   end
   post = blkio('init',ones(1,nInputs));
   return					   % Last card of BLKUNKNOWN
