anchor.diff:  				mnuWireSquare: TMenuItem;
   				mnuSorted1faze: TMenuItem;
   				mnuMain: TMainMenu;
  +				PROCEDURE mnuWireSquareClick(Sender: TObject);
           PRIVATE
                   { private declarations }
           PUBLIC
  
positive.code: INTERFACE
  
  USES
          Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, Menus;
  
  TYPE
  
  
negative.code: 
  {$R *.lfm}
  
  { TwinMain }
  
  PROCEDURE TwinMain.mnuWireSquareClick(Sender: TObject);
  BEGIN
        winSize.Show;
  end;
  
  END.
  
  