Thesis-PDF - IAP/TU Wien
Thesis-PDF - IAP/TU Wien
Thesis-PDF - IAP/TU Wien
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
w[i][j][laynr]=(w[i][j][3]-used_offset)*(-1)<br />
// taken from amplRETRACE if corresponding heightRETRACE is min<br />
test=1<br />
endif<br />
if (test1!=test && sep==1)<br />
w[i][j][laynr]=separationline<br />
endif<br />
test1=test<br />
endfor<br />
endfor<br />
// condition;update loop variables<br />
// execute body code until continue test is FALSE<br />
end<br />
// change LayerLabel so that the MFP-3D extension displays the new layer<br />
SetDimLabel 2, laynr, UserIn2Trace, w<br />
function NewLayer()<br />
String workwave<br />
Variable op_number<br />
Variable i<br />
SetDataFolder root:images<br />
// generate list of afm data waves<br />
String wlist = SortList(WaveList("*0*", ";", ""))<br />
Prompt workwave, "Select Wave", popup wlist<br />
Prompt op_number, "Select New Layer Content", popup "Join Height;<br />
Lateral T - R;Join Amplitude;HeightnAmp for all;Delete Layer;"<br />
DoPrompt "Make Layer and calculate!", workwave, op_number<br />
if ( V_flag )<br />
return -1 // user canceled<br />
endif<br />
switch(op_number) // numeric switch<br />
case 1: // execute if case matches expression<br />
min_htthtr($workwave)<br />
break // exit from switch<br />
case 2:<br />
LateralTR($workwave)<br />
break<br />
107