fgetYFPtag2

function fgetYFPtag2
%Version 4/3/09 The splash window to input the name of the protein tagged
%with YFP without the update. Used by fsearch when changing from program defaults.

global m5f m5b fontpics YFPtagname h_getYFPtag h_getYFPtagfig darkgreen
x = .4; y = .4; w = .2; h = .2;
h_getYFPtagfig = figure('Color', darkgreen, 'units','normalized','name','YFP tagged protein','ToolBar','none','NumberTitle','off','menubar','none','position',[ x y w h ] );
uicontrol( 'units', 'normalized', 'style', 'text', 'string', 'YFP Tag', 'position', [ .3 .75 .4 .15], 'background','black','fore','white', 'fontsize', fontpics ); 
h_getYFPtag = uicontrol( h_getYFPtagfig, 'units', 'normalized',...
                                     'style', 'edit', 'string', YFPtagname, 'position', [ 1/4 1/2 1/2 1/6 ],'fore', m5f, 'back', m5b, 'fontsize', fontpics ); 
uicontrol( 'style','pushbutton', 'units', 'normalized',  'string','Done',...
            'position',[ .35 1/12 .3 .15 ] , 'callback',@fgetYFPtag_callback, 'fontsize', fontpics);

function fgetYFPtag_callback( gcf, eventdata, handles )
global YFPtagname h_getYFPtag h_getYFPtagfig progbarcol
YFPtagname = get( h_getYFPtag, 'string' );
if(isempty(YFPtagname) == 1)
YFPtagname = 'YFP_Tagged_Protein';
end;
progbarcol = 'red';
close(h_getYFPtagfig);