function hlp_opn

% function hlp_opn
%
% This function is used in conjunction with FD3.  It opens the help window
% and changes the first Window menu item from "Open Help" to "Close Help."
% When it opens the help window, it starts with General Help.
%
% ACP

% Last update:  July 7, 1993
% Author:       Adrian C. Penisson

global FD3MENUS FD3FIGURE FD3HELPFIG FD3HELPAXES FD3HELPMENU FD3HELPSLIDER

% Change "Open Help" on the main FD3 window "Window" menu to "Close Help"

child=get(FD3MENUS(6),'Children');
set(child(3),'Label','Close Help','Call','hlp_cls')

% Make new window

pos=get(FD3FIGURE,'Position');
FD3HELPFIG=figure('Position',pos);

FD3HELPAXES=axes('Position',[0 0 1 1],'Visible','off');

% Make menus for help window

FD3HELPMENU=uimenu('Label','Help');
uimenu(FD3HELPMENU,'Label','General','Visible','off','Call','hlp_shw(8)')
uimenu(FD3HELPMENU,'Label','File','Call','hlp_shw(7)')
uimenu(FD3HELPMENU,'Label','Edit','Call','hlp_shw(6)')
uimenu(FD3HELPMENU,'Label','Modules','Call','hlp_shw(5)')
uimenu(FD3HELPMENU,'Label','Streams','Call','hlp_shw(4)')
uimenu(FD3HELPMENU,'Label','Misc','Call','hlp_shw(3)')
uimenu(FD3HELPMENU,'Label','Window','Call','hlp_shw(2)')
uimenu(FD3HELPMENU,'Label','Close Help','Sep','on','Call','hlp_cls')

if get(0,'ScreenDepth')==1
   child=get(FD3HELPMENU,'Children');
   set(child,'Fore',[1 1 1],'Back',[0 0 0])
end

FD3HELPSLIDER=[];

% Start with general help

hlp_shw(8)

