17.01.2014 Views

Thesis-PDF - IAP/TU Wien

Thesis-PDF - IAP/TU Wien

Thesis-PDF - IAP/TU Wien

SHOW MORE
SHOW LESS

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

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!