function?install（varargin）
%?INSTALL???Install?script?for?CRP?Toolbox.
%????INSTALL?creates?the?CRP?Toolbox?folder?and?（optionally）?
%????the?needed?entries?in?the?startup.m?file.
%?
%????INSTALL?PATH?creates?the?CRP?Toolbox?folder?
%????in?the?specified?PATH.
%????
%????This?installation?script?was?generated?by?using?
%????the?MAKEINSTALL?tool.?For?further?information
%????visit?http://matlab.pucicu.de

%?Copyright?（c）?2008-2009
%?Norbert?Marwan?Potsdam?Institute?for?Climate?Impact?Research?Germany
%?http://www.pik-potsdam.de
%
%?Copyright?（c）?2001-2008
%?Norbert?Marwan?Potsdam?University?Germany
%?http://www.agnld.uni-potsdam.de
%
%?THIS?IS?A?GENERATED?INSTALL-FILE?DO?NOT?EDIT!
%?Generation?date:?15-Jan-2010?13:17:29
%?$Date:?2009/06/12?07:50:23?$
%?$Revision:?3.19?$

install_file=‘‘;install_path=‘‘;installfile_info.date=‘‘;installfile_info.bytes=[];
time_stamp=‘‘;checksum=‘‘;checksum_file=‘‘;?instpaths?=?‘‘;
errcode=0;

try
??warning（‘off‘）
??if?nargin
????install_path?=?varargin{1};
??end

??if?exist（‘install.log‘‘file‘）?==?2?delete（‘install.log‘）?end
??%rehash
??disp（‘----------------------------‘）
??disp（‘??INSTALLATION?CRP?Toolbox‘）;
??disp（‘----------------------------‘）
??install_file=[mfilename‘.m‘];
??currentpath=pwd;?time_stamp=‘time_stamp?not?yet?obtained‘;?checksum=‘checksum?not?yet?obtained‘;
??
%%%%%%%?read?the?archive
%%%%%%%?and?look?for?checksum?and?date?in?archive
??errcode=90;
??disp（‘??Reading?the?archiv?‘）
??fid=fopen（install_file‘r‘）;?
??fseek（fid0‘eof‘）;?eofbyte=ftell（fid）;
??fseek（fid23848‘bof‘）;?%?location?where?the?container?starts
??while?1
?????temp=fgetl（fid）;
?????startbyte=ftell（fid）;
?????if?length（temp）>1
???????if?strcmpi（temp‘%<--?Header?begins?here?-->‘）
??????????errcode=90.1;
??????????checksum=fgetl（fid）;
??????????temp1=fgetl（fid）;
??????????temp2=fgetl（fid）;
???????end
???????if?strcmpi（temp‘%<--?Header?ends?here?-->‘）
??????????startbyte=ftell（fid）;
??????????break
???????end
?????end
??end
??checksum（1:2）=[];
??fseek（fidstartbyte‘bof‘）;
??errcode=90.2;
??A=fread（fideofbyte）;
??errcode=90.3;
??checksum_file=dec2hex（sum（（1:length（A））‘.*A））;
??if?~strcmpi（checksum_filechecksum）
????error（[‘The?installation?file?is?corrupt!‘10‘Ensure?that?the?archive?container?was?‘...
???????????‘not?modified?（check?FTP/?‘10‘proxy/?firewall?settings?anti-virus?scanner?for?emails?etc.）!‘]）
??else
????disp（[‘??Checksum?test?passed?（‘?checksum‘）‘]）
??end
??fclose（fid）;

??disp（[‘??CRP?Toolbox?version?‘?temp2（3:end）‘‘]）
??time_stamp=temp1（3:end）;?disp（[‘??CRP?Toolbox?time?stamp?‘?time_stamp‘‘]）;?
??
??errcode=91;
??if?isunix
????toolboxpath=‘CRPtool‘;
??else
????toolboxpath=‘crptool‘;
??end
??
??
%%%%%%%?check?for?older?versions
??
??p=path;?i1=0;
??rem_old?=?‘‘;
??
??while?any（[findstr（[lower（toolboxpath）‘demo‘]lower（p））?findstr（lower（toolboxpath）lower（p））?findstr（‘crpdemo‘lower（p））?findstr（‘crp-tb‘lower（p））?findstr（‘crp-tool‘lower（p））?findstr（‘crp‘lower（p））?findstr（‘crpplugin‘lower（p）

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????2188048??2010-06-01?09:36??install.m

-----------?---------??----------?-----??----

??????????????2188048????????????????????1