matthias muntwiler
70207096d5
Some checks failed
build and deploy documentation / build-and-deploy (push) Failing after 0s
1760 lines
226 KiB
HTML
1760 lines
226 KiB
HTML
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "https://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
|
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US">
|
|
<head>
|
|
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
|
|
<meta http-equiv="X-UA-Compatible" content="IE=11"/>
|
|
<meta name="generator" content="Doxygen 1.9.8"/>
|
|
<meta name="viewport" content="width=device-width, initial-scale=1"/>
|
|
<title>PEARL Procedures: pearl-area-display.ipf Source File</title>
|
|
<link href="tabs.css" rel="stylesheet" type="text/css"/>
|
|
<script type="text/javascript" src="jquery.js"></script>
|
|
<script type="text/javascript" src="dynsections.js"></script>
|
|
<link href="navtree.css" rel="stylesheet" type="text/css"/>
|
|
<script type="text/javascript" src="resize.js"></script>
|
|
<script type="text/javascript" src="navtreedata.js"></script>
|
|
<script type="text/javascript" src="navtree.js"></script>
|
|
<link href="search/search.css" rel="stylesheet" type="text/css"/>
|
|
<script type="text/javascript" src="search/searchdata.js"></script>
|
|
<script type="text/javascript" src="search/search.js"></script>
|
|
<link href="doxygen.css" rel="stylesheet" type="text/css" />
|
|
</head>
|
|
<body>
|
|
<div id="top"><!-- do not remove this div, it is closed by doxygen! -->
|
|
<div id="titlearea">
|
|
<table cellspacing="0" cellpadding="0">
|
|
<tbody>
|
|
<tr id="projectrow">
|
|
<td id="projectalign">
|
|
<div id="projectname">PEARL Procedures<span id="projectnumber"> rev-distro-3.1.0-0-gea838b3-dirty</span>
|
|
</div>
|
|
<div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
|
|
</td>
|
|
</tr>
|
|
</tbody>
|
|
</table>
|
|
</div>
|
|
<!-- end header part -->
|
|
<!-- Generated by Doxygen 1.9.8 -->
|
|
<script type="text/javascript">
|
|
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&dn=expat.txt MIT */
|
|
var searchBox = new SearchBox("searchBox", "search/",'.html');
|
|
/* @license-end */
|
|
</script>
|
|
<script type="text/javascript" src="menudata.js"></script>
|
|
<script type="text/javascript" src="menu.js"></script>
|
|
<script type="text/javascript">
|
|
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&dn=expat.txt MIT */
|
|
$(function() {
|
|
initMenu('',true,false,'search.php','Search');
|
|
$(document).ready(function() { init_search(); });
|
|
});
|
|
/* @license-end */
|
|
</script>
|
|
<div id="main-nav"></div>
|
|
<script type="text/javascript">
|
|
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&dn=expat.txt MIT */
|
|
$(document).ready(function() { init_codefold(0); });
|
|
/* @license-end */
|
|
</script>
|
|
</div><!-- top -->
|
|
<div id="side-nav" class="ui-resizable side-nav-resizable">
|
|
<div id="nav-tree">
|
|
<div id="nav-tree-contents">
|
|
<div id="nav-sync" class="sync"></div>
|
|
</div>
|
|
</div>
|
|
<div id="splitbar" style="-moz-user-select:none;"
|
|
class="ui-resizable-handle">
|
|
</div>
|
|
</div>
|
|
<script type="text/javascript">
|
|
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&dn=expat.txt MIT */
|
|
$(document).ready(function(){initNavTree('pearl-area-display_8ipf_source.html',''); initResizable(); });
|
|
/* @license-end */
|
|
</script>
|
|
<div id="doc-content">
|
|
<!-- window showing the filter options -->
|
|
<div id="MSearchSelectWindow"
|
|
onmouseover="return searchBox.OnSearchSelectShow()"
|
|
onmouseout="return searchBox.OnSearchSelectHide()"
|
|
onkeydown="return searchBox.OnSearchSelectKey(event)">
|
|
</div>
|
|
|
|
<!-- iframe showing the search results (closed by default) -->
|
|
<div id="MSearchResultsWindow">
|
|
<div id="MSearchResults">
|
|
<div class="SRPage">
|
|
<div id="SRIndex">
|
|
<div id="SRResults"></div>
|
|
<div class="SRStatus" id="Loading">Loading...</div>
|
|
<div class="SRStatus" id="Searching">Searching...</div>
|
|
<div class="SRStatus" id="NoMatches">No Matches</div>
|
|
</div>
|
|
</div>
|
|
</div>
|
|
</div>
|
|
|
|
<div class="header">
|
|
<div class="headertitle"><div class="title">pearl-area-display.ipf</div></div>
|
|
</div><!--header-->
|
|
<div class="contents">
|
|
<a href="pearl-area-display_8ipf.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a id="l00001" name="l00001"></a><span class="lineno"> 1</span><span class="preprocessor">#pragma TextEncoding = "UTF-8"</span></div>
|
|
<div class="line"><a id="l00002" name="l00002"></a><span class="lineno"> 2</span><span class="preprocessor">#pragma rtGlobals=3 </span><span class="comment">// Use modern global access method and strict wave access.</span></div>
|
|
<div class="line"><a id="l00003" name="l00003"></a><span class="lineno"> 3</span><span class="preprocessor">#pragma IgorVersion = 7.0</span></div>
|
|
<div class="line"><a id="l00004" name="l00004"></a><span class="lineno"> 4</span><span class="preprocessor">#pragma ModuleName = PearlAreaDisplay</span></div>
|
|
<div class="line"><a id="l00005" name="l00005"></a><span class="lineno"> 5</span><span class="preprocessor">#pragma version = 1.05</span></div>
|
|
<div class="line"><a id="l00006" name="l00006"></a><span class="lineno"> 6</span><span class="preprocessor">#include "pearl-compat"</span></div>
|
|
<div class="line"><a id="l00007" name="l00007"></a><span class="lineno"> 7</span><span class="preprocessor">#include "pearl-area-profiles"</span></div>
|
|
<div class="line"><a id="l00008" name="l00008"></a><span class="lineno"> 8</span> </div>
|
|
<div class="line"><a id="l00022" name="l00022"></a><span class="lineno"> 22</span><span class="comment">// 3D data is handled by 3 windows. they don't have to be visible all at the same time.</span></div>
|
|
<div class="line"><a id="l00051" name="l00051"></a><span class="lineno"> 51</span> </div>
|
|
<div class="line"><a id="l00057" name="l00057"></a><span class="lineno"> 57</span> </div>
|
|
<div class="foldopen" id="foldopen00059" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00059" name="l00059"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a195b12857685c4e535a840c5db324b4a"> 59</a></span><span class="keyword">static</span> function /s <a class="code hl_function" href="pearl-area-display_8ipf.html#a195b12857685c4e535a840c5db324b4a">graphname_from_dfref</a>(df, prefix)</div>
|
|
<div class="line"><a id="l00060" name="l00060"></a><span class="lineno"> 60</span> dfref df</div>
|
|
<div class="line"><a id="l00061" name="l00061"></a><span class="lineno"> 61</span> <span class="keywordtype">string</span> prefix</div>
|
|
<div class="line"><a id="l00062" name="l00062"></a><span class="lineno"> 62</span> </div>
|
|
<div class="line"><a id="l00063" name="l00063"></a><span class="lineno"> 63</span> <span class="keywordtype">string</span> name</div>
|
|
<div class="line"><a id="l00064" name="l00064"></a><span class="lineno"> 64</span> </div>
|
|
<div class="line"><a id="l00065" name="l00065"></a><span class="lineno"> 65</span> name = GetDataFolder(1, df)</div>
|
|
<div class="line"><a id="l00066" name="l00066"></a><span class="lineno"> 66</span> name = ReplaceString(<span class="stringliteral">"root:"</span>, name, <span class="stringliteral">""</span>)</div>
|
|
<div class="line"><a id="l00067" name="l00067"></a><span class="lineno"> 67</span> name = name[0, strlen(name) - 2]</div>
|
|
<div class="line"><a id="l00068" name="l00068"></a><span class="lineno"> 68</span> name = ReplaceString(" ", name, "")</div>
|
|
<div class="line"><a id="l00069" name="l00069"></a><span class="lineno"> 69</span> name = <a class="code hl_function" href="pearl-compat_8ipf.html#aa1f59acc532c7eee75c83b70ee1feaa9">PearlCleanupName</a>(prefix + name)</div>
|
|
<div class="line"><a id="l00070" name="l00070"></a><span class="lineno"> 70</span> if (CheckName(name, 6))</div>
|
|
<div class="line"><a id="l00071" name="l00071"></a><span class="lineno"> 71</span> name = UniqueName(name, 6, 0)</div>
|
|
<div class="line"><a id="l00072" name="l00072"></a><span class="lineno"> 72</span> endif</div>
|
|
<div class="line"><a id="l00073" name="l00073"></a><span class="lineno"> 73</span> </div>
|
|
<div class="line"><a id="l00074" name="l00074"></a><span class="lineno"> 74</span> return name</div>
|
|
<div class="line"><a id="l00075" name="l00075"></a><span class="lineno"> 75</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00076" name="l00076"></a><span class="lineno"> 76</span> </div>
|
|
<div class="foldopen" id="foldopen00087" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00087" name="l00087"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#ae2b11295d2715e9af019513923c64570"> 87</a></span>function /s <a class="code hl_function" href="pearl-area-display_8ipf.html#ae2b11295d2715e9af019513923c64570">ad_display</a>(image)</div>
|
|
<div class="line"><a id="l00088" name="l00088"></a><span class="lineno"> 88</span> wave image <span class="comment">// wave which contains the image data from the detector</span></div>
|
|
<div class="line"><a id="l00089" name="l00089"></a><span class="lineno"> 89</span> <span class="comment">// returns the name of the graph window</span></div>
|
|
<div class="line"><a id="l00090" name="l00090"></a><span class="lineno"> 90</span> </div>
|
|
<div class="line"><a id="l00091" name="l00091"></a><span class="lineno"> 91</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00092" name="l00092"></a><span class="lineno"> 92</span> dfref imagedf = GetWavesDataFolderDFR(image)</div>
|
|
<div class="line"><a id="l00093" name="l00093"></a><span class="lineno"> 93</span> setdatafolder imagedf</div>
|
|
<div class="line"><a id="l00094" name="l00094"></a><span class="lineno"> 94</span> </div>
|
|
<div class="line"><a id="l00095" name="l00095"></a><span class="lineno"> 95</span> <span class="keywordtype">string</span> dfname = ReplaceString("root:", GetDataFolder(1, imagedf), "")</div>
|
|
<div class="line"><a id="l00096" name="l00096"></a><span class="lineno"> 96</span> <span class="keywordtype">string</span> graphtitle = dfname + " View"</div>
|
|
<div class="line"><a id="l00097" name="l00097"></a><span class="lineno"> 97</span> <span class="keywordtype">string</span> /g view_graphname = <a class="code hl_function" href="pearl-area-display_8ipf.html#a195b12857685c4e535a840c5db324b4a">graphname_from_dfref</a>(imagedf, "view_")</div>
|
|
<div class="line"><a id="l00098" name="l00098"></a><span class="lineno"> 98</span> svar graphname = view_graphname</div>
|
|
<div class="line"><a id="l00099" name="l00099"></a><span class="lineno"> 99</span> display /k=1/n=$graphname as graphtitle</div>
|
|
<div class="line"><a id="l00100" name="l00100"></a><span class="lineno"> 100</span> graphname = s_name</div>
|
|
<div class="line"><a id="l00101" name="l00101"></a><span class="lineno"> 101</span> appendimage /w=$graphname image</div>
|
|
<div class="line"><a id="l00102" name="l00102"></a><span class="lineno"> 102</span> </div>
|
|
<div class="line"><a id="l00103" name="l00103"></a><span class="lineno"> 103</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l00104" name="l00104"></a><span class="lineno"> 104</span> return graphname</div>
|
|
<div class="line"><a id="l00105" name="l00105"></a><span class="lineno"> 105</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00106" name="l00106"></a><span class="lineno"> 106</span> </div>
|
|
<div class="foldopen" id="foldopen00117" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00117" name="l00117"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a8cc3ea3bea4e851e4144140a2da42a03"> 117</a></span>function /s <a class="code hl_function" href="pearl-area-display_8ipf.html#a8cc3ea3bea4e851e4144140a2da42a03">ad_display_histogram</a>(image)</div>
|
|
<div class="line"><a id="l00118" name="l00118"></a><span class="lineno"> 118</span> wave image</div>
|
|
<div class="line"><a id="l00119" name="l00119"></a><span class="lineno"> 119</span> </div>
|
|
<div class="line"><a id="l00120" name="l00120"></a><span class="lineno"> 120</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00121" name="l00121"></a><span class="lineno"> 121</span> dfref imagedf = GetWavesDataFolderDFR(image)</div>
|
|
<div class="line"><a id="l00122" name="l00122"></a><span class="lineno"> 122</span> <span class="keywordtype">string</span> s_imagedf = GetDataFolder(1, imagedf)</div>
|
|
<div class="line"><a id="l00123" name="l00123"></a><span class="lineno"> 123</span> setdatafolder imagedf</div>
|
|
<div class="line"><a id="l00124" name="l00124"></a><span class="lineno"> 124</span> </div>
|
|
<div class="line"><a id="l00125" name="l00125"></a><span class="lineno"> 125</span> make /n=(1)/o hist <span class="comment">// histogram</span></div>
|
|
<div class="line"><a id="l00126" name="l00126"></a><span class="lineno"> 126</span> </div>
|
|
<div class="line"><a id="l00127" name="l00127"></a><span class="lineno"> 127</span> <span class="keywordtype">string</span> dfname = ReplaceString("root:", GetDataFolder(1, imagedf), "")</div>
|
|
<div class="line"><a id="l00128" name="l00128"></a><span class="lineno"> 128</span> <span class="keywordtype">string</span> graphtitle = dfname + " Histogram"</div>
|
|
<div class="line"><a id="l00129" name="l00129"></a><span class="lineno"> 129</span> <span class="keywordtype">string</span> /g hist_graphname = <a class="code hl_function" href="pearl-area-display_8ipf.html#a195b12857685c4e535a840c5db324b4a">graphname_from_dfref</a>(imagedf, "hist_")</div>
|
|
<div class="line"><a id="l00130" name="l00130"></a><span class="lineno"> 130</span> svar graphname = hist_graphname</div>
|
|
<div class="line"><a id="l00131" name="l00131"></a><span class="lineno"> 131</span> display /k=1/n=$graphname as graphtitle</div>
|
|
<div class="line"><a id="l00132" name="l00132"></a><span class="lineno"> 132</span> graphname = s_name</div>
|
|
<div class="line"><a id="l00133" name="l00133"></a><span class="lineno"> 133</span> appendtograph /w=$graphname hist</div>
|
|
<div class="line"><a id="l00134" name="l00134"></a><span class="lineno"> 134</span> </div>
|
|
<div class="line"><a id="l00135" name="l00135"></a><span class="lineno"> 135</span> ModifyGraph /w=$graphname rgb(hist)=(39168,0,0)</div>
|
|
<div class="line"><a id="l00136" name="l00136"></a><span class="lineno"> 136</span> ModifyGraph /w=$graphname mode=6</div>
|
|
<div class="line"><a id="l00137" name="l00137"></a><span class="lineno"> 137</span> ModifyGraph /w=$graphname mirror=1</div>
|
|
<div class="line"><a id="l00138" name="l00138"></a><span class="lineno"> 138</span> ModifyGraph /w=$graphname minor=1</div>
|
|
<div class="line"><a id="l00139" name="l00139"></a><span class="lineno"> 139</span> ModifyGraph /w=$graphname axThick=0.5</div>
|
|
<div class="line"><a id="l00140" name="l00140"></a><span class="lineno"> 140</span> ModifyGraph /w=$graphname lblPosMode=1,lblPos=30,lblMargin=0</div>
|
|
<div class="line"><a id="l00141" name="l00141"></a><span class="lineno"> 141</span> ModifyGraph /w=$graphname btLen=4</div>
|
|
<div class="line"><a id="l00142" name="l00142"></a><span class="lineno"> 142</span> ModifyGraph /w=$graphname margin(left)=45,margin(bottom)=35,margin(top)=10,margin(right)=10</div>
|
|
<div class="line"><a id="l00143" name="l00143"></a><span class="lineno"> 143</span> ModifyGraph /w=$graphname gfSize=10</div>
|
|
<div class="line"><a id="l00144" name="l00144"></a><span class="lineno"> 144</span> Label /w=$graphname bottom "value"</div>
|
|
<div class="line"><a id="l00145" name="l00145"></a><span class="lineno"> 145</span> Label /w=$graphname left "<span class="preprocessor"># pixels"</span></div>
|
|
<div class="line"><a id="l00146" name="l00146"></a><span class="lineno"> 146</span><span class="preprocessor"> </span></div>
|
|
<div class="line"><a id="l00147" name="l00147"></a><span class="lineno"> 147</span><span class="preprocessor"> ad_calc_histogram(image)</span></div>
|
|
<div class="line"><a id="l00148" name="l00148"></a><span class="lineno"> 148</span><span class="preprocessor"></span> </div>
|
|
<div class="line"><a id="l00149" name="l00149"></a><span class="lineno"> 149</span><span class="preprocessor"> setdatafolder savedf</span></div>
|
|
<div class="line"><a id="l00150" name="l00150"></a><span class="lineno"> 150</span><span class="preprocessor"> return graphname</span></div>
|
|
<div class="line"><a id="l00151" name="l00151"></a><span class="lineno"> 151</span><span class="preprocessor">end</span></div>
|
|
</div>
|
|
<div class="line"><a id="l00152" name="l00152"></a><span class="lineno"> 152</span><span class="preprocessor"></span> </div>
|
|
<div class="foldopen" id="foldopen00168" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00168" name="l00168"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a8fad5aebaca72887d5898b4c421bcdae"> 168</a></span>function /s ad_display_profiles(image, [filter])</div>
|
|
<div class="line"><a id="l00169" name="l00169"></a><span class="lineno"> 169</span> wave image</div>
|
|
<div class="line"><a id="l00170" name="l00170"></a><span class="lineno"> 170</span> string filter</div>
|
|
<div class="line"><a id="l00171" name="l00171"></a><span class="lineno"> 171</span> variable show_legend = 0 // currently not supported</div>
|
|
<div class="line"><a id="l00172" name="l00172"></a><span class="lineno"> 172</span> </div>
|
|
<div class="line"><a id="l00173" name="l00173"></a><span class="lineno"> 173</span> if (WaveDims(image) != 2)</div>
|
|
<div class="line"><a id="l00174" name="l00174"></a><span class="lineno"> 174</span> abort "ad_display_profiles: image wave must be two-dimensional."</div>
|
|
<div class="line"><a id="l00175" name="l00175"></a><span class="lineno"> 175</span> endif</div>
|
|
<div class="line"><a id="l00176" name="l00176"></a><span class="lineno"> 176</span> if (ParamIsDefault(filter))</div>
|
|
<div class="line"><a id="l00177" name="l00177"></a><span class="lineno"> 177</span> filter = "ad_box_filter"</div>
|
|
<div class="line"><a id="l00178" name="l00178"></a><span class="lineno"> 178</span> endif</div>
|
|
<div class="line"><a id="l00179" name="l00179"></a><span class="lineno"> 179</span> </div>
|
|
<div class="line"><a id="l00180" name="l00180"></a><span class="lineno"> 180</span> // data folders and references</div>
|
|
<div class="line"><a id="l00181" name="l00181"></a><span class="lineno"> 181</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00182" name="l00182"></a><span class="lineno"> 182</span> dfref imagedf = GetWavesDataFolderDFR(image)</div>
|
|
<div class="line"><a id="l00183" name="l00183"></a><span class="lineno"> 183</span> string s_imagedf = GetDataFolder(1, imagedf)</div>
|
|
<div class="line"><a id="l00184" name="l00184"></a><span class="lineno"> 184</span> setdatafolder imagedf</div>
|
|
<div class="line"><a id="l00185" name="l00185"></a><span class="lineno"> 185</span> string s_viewdf = PearlCleanupName("view_" + NameOfWave(image))</div>
|
|
<div class="line"><a id="l00186" name="l00186"></a><span class="lineno"> 186</span> newdatafolder /o/s $s_viewdf</div>
|
|
<div class="line"><a id="l00187" name="l00187"></a><span class="lineno"> 187</span> dfref viewdf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00188" name="l00188"></a><span class="lineno"> 188</span> s_viewdf = GetDataFolder(1, viewdf)</div>
|
|
<div class="line"><a id="l00189" name="l00189"></a><span class="lineno"> 189</span> </div>
|
|
<div class="line"><a id="l00190" name="l00190"></a><span class="lineno"> 190</span> // data structures</div>
|
|
<div class="line"><a id="l00191" name="l00191"></a><span class="lineno"> 191</span> string /g sourcepath = GetWavesDataFolder(image, 2)</div>
|
|
<div class="line"><a id="l00192" name="l00192"></a><span class="lineno"> 192</span> string viewname = "view_image"</div>
|
|
<div class="line"><a id="l00193" name="l00193"></a><span class="lineno"> 193</span> duplicate /o image, $viewname /wave=view</div>
|
|
<div class="line"><a id="l00194" name="l00194"></a><span class="lineno"> 194</span> make /n=(3,3)/o xprofiles // NX x 3 wave with 3 one-dimensional profiles along Y dimension</div>
|
|
<div class="line"><a id="l00195" name="l00195"></a><span class="lineno"> 195</span> make /n=(3,3)/o yprofiles // NY x 3 wave with 3 one-dimensional profiles along X dimension</div>
|
|
<div class="line"><a id="l00196" name="l00196"></a><span class="lineno"> 196</span> string /g view_filter</div>
|
|
<div class="line"><a id="l00197" name="l00197"></a><span class="lineno"> 197</span> string /g view_filter_options</div>
|
|
<div class="line"><a id="l00198" name="l00198"></a><span class="lineno"> 198</span> view_filter = filter</div>
|
|
<div class="line"><a id="l00199" name="l00199"></a><span class="lineno"> 199</span> view_filter_options = ""</div>
|
|
<div class="line"><a id="l00200" name="l00200"></a><span class="lineno"> 200</span> variable /g view_filter_smoothing_x = 1</div>
|
|
<div class="line"><a id="l00201" name="l00201"></a><span class="lineno"> 201</span> variable /g view_filter_smoothing_y = 1</div>
|
|
<div class="line"><a id="l00202" name="l00202"></a><span class="lineno"> 202</span> variable /g view_cursor_mode = 0</div>
|
|
<div class="line"><a id="l00203" name="l00203"></a><span class="lineno"> 203</span> string dfname = ReplaceString("root:", GetDataFolder(1, imagedf), "")</div>
|
|
<div class="line"><a id="l00204" name="l00204"></a><span class="lineno"> 204</span> string graphtitle = dfname + NameOfWave(image) + " Profiles"</div>
|
|
<div class="line"><a id="l00205" name="l00205"></a><span class="lineno"> 205</span> string /g prof_graphname = graphname_from_dfref(imagedf, "prof_")</div>
|
|
<div class="line"><a id="l00206" name="l00206"></a><span class="lineno"> 206</span> svar graphname = prof_graphname</div>
|
|
<div class="line"><a id="l00207" name="l00207"></a><span class="lineno"> 207</span> variable /g graph_avg // average value in ROI (ROI is defined by the crosshairs A and B)</div>
|
|
<div class="line"><a id="l00208" name="l00208"></a><span class="lineno"> 208</span> variable /g graph_min // minimum value in ROI</div>
|
|
<div class="line"><a id="l00209" name="l00209"></a><span class="lineno"> 209</span> variable /g graph_max // maximum value in ROI</div>
|
|
<div class="line"><a id="l00210" name="l00210"></a><span class="lineno"> 210</span> variable /g graph_sum // sum of all values in ROI</div>
|
|
<div class="line"><a id="l00211" name="l00211"></a><span class="lineno"> 211</span> variable /g graph_sdev // standard deviation of all values in ROI</div>
|
|
<div class="line"><a id="l00212" name="l00212"></a><span class="lineno"> 212</span> </div>
|
|
<div class="line"><a id="l00213" name="l00213"></a><span class="lineno"> 213</span> // graph setup</div>
|
|
<div class="line"><a id="l00214" name="l00214"></a><span class="lineno"> 214</span> display /k=1 /n=$graphname /w=(100,100,500,400) as graphtitle</div>
|
|
<div class="line"><a id="l00215" name="l00215"></a><span class="lineno"> 215</span> graphname = s_name</div>
|
|
<div class="line"><a id="l00216" name="l00216"></a><span class="lineno"> 216</span> AppendToGraph /w=$graphname /L=xprofiles xprofiles[*][0],xprofiles[*][1],xprofiles[*][2]</div>
|
|
<div class="line"><a id="l00217" name="l00217"></a><span class="lineno"> 217</span> AppendToGraph /w=$graphname /VERT/B=yprofiles yprofiles[*][0],yprofiles[*][1],yprofiles[*][2]</div>
|
|
<div class="line"><a id="l00218" name="l00218"></a><span class="lineno"> 218</span> AppendImage /w=$graphname view</div>
|
|
<div class="line"><a id="l00219" name="l00219"></a><span class="lineno"> 219</span> string imgname = StringFromList(0, ImageNameList(graphname, ";"))</div>
|
|
<div class="line"><a id="l00220" name="l00220"></a><span class="lineno"> 220</span> ModifyImage /w=$graphname $imgname ctab= {*,*,BlueGreenOrange,0}</div>
|
|
<div class="line"><a id="l00221" name="l00221"></a><span class="lineno"> 221</span> ModifyGraph /w=$graphname rgb(xprofiles)=(39168,0,0),rgb(yprofiles)=(39168,0,0)</div>
|
|
<div class="line"><a id="l00222" name="l00222"></a><span class="lineno"> 222</span> ModifyGraph /w=$graphname rgb(xprofiles#1)=(0,26112,0),rgb(yprofiles#1)=(0,26112,0)</div>
|
|
<div class="line"><a id="l00223" name="l00223"></a><span class="lineno"> 223</span> ModifyGraph /w=$graphname rgb(xprofiles#2)=(0,9472,39168),rgb(yprofiles#2)=(0,9472,39168)</div>
|
|
<div class="line"><a id="l00224" name="l00224"></a><span class="lineno"> 224</span> ModifyGraph /w=$graphname mirror(xprofiles)=2,mirror(bottom)=3,mirror(yprofiles)=2,mirror(left)=3</div>
|
|
<div class="line"><a id="l00225" name="l00225"></a><span class="lineno"> 225</span> ModifyGraph /w=$graphname nticks=3</div>
|
|
<div class="line"><a id="l00226" name="l00226"></a><span class="lineno"> 226</span> ModifyGraph /w=$graphname minor=1</div>
|
|
<div class="line"><a id="l00227" name="l00227"></a><span class="lineno"> 227</span> ModifyGraph /w=$graphname axThick=0.5</div>
|
|
<div class="line"><a id="l00228" name="l00228"></a><span class="lineno"> 228</span> ModifyGraph /w=$graphname lblPosMode=1,lblPos=30,lblMargin=0</div>
|
|
<div class="line"><a id="l00229" name="l00229"></a><span class="lineno"> 229</span> ModifyGraph /w=$graphname btLen=4</div>
|
|
<div class="line"><a id="l00230" name="l00230"></a><span class="lineno"> 230</span> ModifyGraph /w=$graphname freePos(xprofiles)=0</div>
|
|
<div class="line"><a id="l00231" name="l00231"></a><span class="lineno"> 231</span> ModifyGraph /w=$graphname freePos(yprofiles)=0</div>
|
|
<div class="line"><a id="l00232" name="l00232"></a><span class="lineno"> 232</span> ModifyGraph /w=$graphname axisEnab(xprofiles)={0.64,1}</div>
|
|
<div class="line"><a id="l00233" name="l00233"></a><span class="lineno"> 233</span> ModifyGraph /w=$graphname axisEnab(bottom)={0,0.6}</div>
|
|
<div class="line"><a id="l00234" name="l00234"></a><span class="lineno"> 234</span> ModifyGraph /w=$graphname axisEnab(yprofiles)={0.64,1}</div>
|
|
<div class="line"><a id="l00235" name="l00235"></a><span class="lineno"> 235</span> ModifyGraph /w=$graphname axisEnab(left)={0,0.6}</div>
|
|
<div class="line"><a id="l00236" name="l00236"></a><span class="lineno"> 236</span> ModifyGraph /w=$graphname zero(left)=8</div>
|
|
<div class="line"><a id="l00237" name="l00237"></a><span class="lineno"> 237</span> ModifyGraph /w=$graphname margin(left)=40,margin(bottom)=30,margin(top)=20,margin(right)=40</div>
|
|
<div class="line"><a id="l00238" name="l00238"></a><span class="lineno"> 238</span> ModifyGraph /w=$graphname gfSize=10</div>
|
|
<div class="line"><a id="l00239" name="l00239"></a><span class="lineno"> 239</span> </div>
|
|
<div class="line"><a id="l00240" name="l00240"></a><span class="lineno"> 240</span> // axis labels </div>
|
|
<div class="line"><a id="l00241" name="l00241"></a><span class="lineno"> 241</span> string labels = note(image)</div>
|
|
<div class="line"><a id="l00242" name="l00242"></a><span class="lineno"> 242</span> string lab</div>
|
|
<div class="line"><a id="l00243" name="l00243"></a><span class="lineno"> 243</span> lab = StringByKey("AxisLabelX", labels, "=", "\r")</div>
|
|
<div class="line"><a id="l00244" name="l00244"></a><span class="lineno"> 244</span> if (!strlen(lab))</div>
|
|
<div class="line"><a id="l00245" name="l00245"></a><span class="lineno"> 245</span> lab = "X"</div>
|
|
<div class="line"><a id="l00246" name="l00246"></a><span class="lineno"> 246</span> endif</div>
|
|
<div class="line"><a id="l00247" name="l00247"></a><span class="lineno"> 247</span> Label /w=$graphname bottom lab + " (\\U)"</div>
|
|
<div class="line"><a id="l00248" name="l00248"></a><span class="lineno"> 248</span> lab = StringByKey("AxisLabelY", labels, "=", "\r")</div>
|
|
<div class="line"><a id="l00249" name="l00249"></a><span class="lineno"> 249</span> if (!strlen(lab))</div>
|
|
<div class="line"><a id="l00250" name="l00250"></a><span class="lineno"> 250</span> lab = "Y"</div>
|
|
<div class="line"><a id="l00251" name="l00251"></a><span class="lineno"> 251</span> endif</div>
|
|
<div class="line"><a id="l00252" name="l00252"></a><span class="lineno"> 252</span> Label /w=$graphname left lab + " (\\U)"</div>
|
|
<div class="line"><a id="l00253" name="l00253"></a><span class="lineno"> 253</span> lab = StringByKey("AxisLabelD", labels, "=", "\r")</div>
|
|
<div class="line"><a id="l00254" name="l00254"></a><span class="lineno"> 254</span> if (!strlen(lab))</div>
|
|
<div class="line"><a id="l00255" name="l00255"></a><span class="lineno"> 255</span> lab = "value"</div>
|
|
<div class="line"><a id="l00256" name="l00256"></a><span class="lineno"> 256</span> endif</div>
|
|
<div class="line"><a id="l00257" name="l00257"></a><span class="lineno"> 257</span> Label /w=$graphname xprofiles lab + " (\\U)"</div>
|
|
<div class="line"><a id="l00258" name="l00258"></a><span class="lineno"> 258</span> Label /w=$graphname yprofiles lab + " (\\U)"</div>
|
|
<div class="line"><a id="l00259" name="l00259"></a><span class="lineno"> 259</span> </div>
|
|
<div class="line"><a id="l00260" name="l00260"></a><span class="lineno"> 260</span> // legend</div>
|
|
<div class="line"><a id="l00261" name="l00261"></a><span class="lineno"> 261</span> if (show_legend)</div>
|
|
<div class="line"><a id="l00262" name="l00262"></a><span class="lineno"> 262</span> Legend /w=$graphname/C/N=text0/J/F=2/D=0.5/T={28}/A=RT/X=0.00/Y=0.00 "\\s(xprofiles)\tprofile A"</div>
|
|
<div class="line"><a id="l00263" name="l00263"></a><span class="lineno"> 263</span> AppendText /w=$graphname "\\s(xprofiles#1)\tprofile B"</div>
|
|
<div class="line"><a id="l00264" name="l00264"></a><span class="lineno"> 264</span> AppendText /w=$graphname "\\s(xprofiles#2)\tROI average"</div>
|
|
<div class="line"><a id="l00265" name="l00265"></a><span class="lineno"> 265</span> AppendText /w=$graphname "min\t\\{" + s_viewdf + "graph_min}"</div>
|
|
<div class="line"><a id="l00266" name="l00266"></a><span class="lineno"> 266</span> AppendText /w=$graphname "max\t\\{" + s_viewdf + "graph_max}"</div>
|
|
<div class="line"><a id="l00267" name="l00267"></a><span class="lineno"> 267</span> AppendText /w=$graphname "sum\t\\{" + s_viewdf + "graph_sum}"</div>
|
|
<div class="line"><a id="l00268" name="l00268"></a><span class="lineno"> 268</span> AppendText /w=$graphname "avg\t\\{" + s_viewdf + "graph_avg}"</div>
|
|
<div class="line"><a id="l00269" name="l00269"></a><span class="lineno"> 269</span> AppendText /w=$graphname "sdev\t\\{" + s_viewdf + "graph_sdev}"</div>
|
|
<div class="line"><a id="l00270" name="l00270"></a><span class="lineno"> 270</span> else</div>
|
|
<div class="line"><a id="l00271" name="l00271"></a><span class="lineno"> 271</span> TextBox /w=$graphname /C/N=text0 /F=0 /B=1 /X=1.00 /Y=1.00</div>
|
|
<div class="line"><a id="l00272" name="l00272"></a><span class="lineno"> 272</span> lab = StringByKey("Dataset", labels, "=", "\r")</div>
|
|
<div class="line"><a id="l00273" name="l00273"></a><span class="lineno"> 273</span> if (strlen(lab))</div>
|
|
<div class="line"><a id="l00274" name="l00274"></a><span class="lineno"> 274</span> AppendText /w=$graphname lab</div>
|
|
<div class="line"><a id="l00275" name="l00275"></a><span class="lineno"> 275</span> endif</div>
|
|
<div class="line"><a id="l00276" name="l00276"></a><span class="lineno"> 276</span> AppendText /w=$graphname "sum\t\\{" + s_viewdf + "graph_sum}"</div>
|
|
<div class="line"><a id="l00277" name="l00277"></a><span class="lineno"> 277</span> AppendText /w=$graphname "avg\t\\{" + s_viewdf + "graph_avg}"</div>
|
|
<div class="line"><a id="l00278" name="l00278"></a><span class="lineno"> 278</span> AppendText /w=$graphname "sdev\t\\{" + s_viewdf + "graph_sdev}"</div>
|
|
<div class="line"><a id="l00279" name="l00279"></a><span class="lineno"> 279</span> endif</div>
|
|
<div class="line"><a id="l00280" name="l00280"></a><span class="lineno"> 280</span> </div>
|
|
<div class="line"><a id="l00281" name="l00281"></a><span class="lineno"> 281</span> // interactive elements</div>
|
|
<div class="line"><a id="l00282" name="l00282"></a><span class="lineno"> 282</span> Cursor /w=$graphname /A=1 /P /I /S=2 /H=1 /L=1 A $imgname 0,0</div>
|
|
<div class="line"><a id="l00283" name="l00283"></a><span class="lineno"> 283</span> Cursor /w=$graphname /A=1 /P /I /S=2 /H=1 /L=1 B $imgname DimSize(view, 0)-1, DimSize(view, 1)-1</div>
|
|
<div class="line"><a id="l00284" name="l00284"></a><span class="lineno"> 284</span> variable pcurs</div>
|
|
<div class="line"><a id="l00285" name="l00285"></a><span class="lineno"> 285</span> pcurs = floor(DimSize(xprofiles, 0) / 3)</div>
|
|
<div class="line"><a id="l00286" name="l00286"></a><span class="lineno"> 286</span> Cursor /w=$graphname /A=0 /P /S=1 /H=0 C xprofiles#2 pcurs</div>
|
|
<div class="line"><a id="l00287" name="l00287"></a><span class="lineno"> 287</span> pcurs = floor(DimSize(xprofiles, 0) * 2 / 3)</div>
|
|
<div class="line"><a id="l00288" name="l00288"></a><span class="lineno"> 288</span> Cursor /w=$graphname /A=0 /P /S=1 /H=0 D xprofiles#2 pcurs</div>
|
|
<div class="line"><a id="l00289" name="l00289"></a><span class="lineno"> 289</span> pcurs = floor(DimSize(yprofiles, 0) / 3)</div>
|
|
<div class="line"><a id="l00290" name="l00290"></a><span class="lineno"> 290</span> Cursor /w=$graphname /A=0 /P /S=1 /H=0 E yprofiles#2 pcurs</div>
|
|
<div class="line"><a id="l00291" name="l00291"></a><span class="lineno"> 291</span> pcurs = floor(DimSize(yprofiles, 0) * 2 / 3)</div>
|
|
<div class="line"><a id="l00292" name="l00292"></a><span class="lineno"> 292</span> Cursor /w=$graphname /A=0 /P /S=1 /H=0 F yprofiles#2 pcurs</div>
|
|
<div class="line"><a id="l00293" name="l00293"></a><span class="lineno"> 293</span> ShowInfo /w=$graphname /CP=0</div>
|
|
<div class="line"><a id="l00294" name="l00294"></a><span class="lineno"> 294</span> </div>
|
|
<div class="line"><a id="l00295" name="l00295"></a><span class="lineno"> 295</span> SetWindow $graphname, hook(ad_profiles_hook)=ad_profiles_hook</div>
|
|
<div class="line"><a id="l00296" name="l00296"></a><span class="lineno"> 296</span> ControlBar /w=$graphname 21</div>
|
|
<div class="line"><a id="l00297" name="l00297"></a><span class="lineno"> 297</span> Button b_reset_cursors win=$graphname, title="reset cursors",pos={0,0},size={70,20},proc=PearlAreaDisplay#bp_reset_cursors</div>
|
|
<div class="line"><a id="l00298" name="l00298"></a><span class="lineno"> 298</span> Button b_reset_cursors win=$graphname, fColor=(65535,65535,65535),fSize=10</div>
|
|
<div class="line"><a id="l00299" name="l00299"></a><span class="lineno"> 299</span> </div>
|
|
<div class="line"><a id="l00300" name="l00300"></a><span class="lineno"> 300</span> SetVariable sv_smoothing_x win=$graphname, title="X smoothing",pos={130,2},bodyWidth=40</div>
|
|
<div class="line"><a id="l00301" name="l00301"></a><span class="lineno"> 301</span> SetVariable sv_smoothing_x win=$graphname, value=view_filter_smoothing_x,limits={1,100,1}</div>
|
|
<div class="line"><a id="l00302" name="l00302"></a><span class="lineno"> 302</span> SetVariable sv_smoothing_x win=$graphname, proc=PearlAreaDisplay#svp_smoothing</div>
|
|
<div class="line"><a id="l00303" name="l00303"></a><span class="lineno"> 303</span> SetVariable sv_smooting_y win=$graphname, title="Y smoothing",pos={240,2},bodyWidth=40</div>
|
|
<div class="line"><a id="l00304" name="l00304"></a><span class="lineno"> 304</span> SetVariable sv_smooting_y win=$graphname, value=view_filter_smoothing_y,limits={1,100,1}</div>
|
|
<div class="line"><a id="l00305" name="l00305"></a><span class="lineno"> 305</span> SetVariable sv_smooting_y win=$graphname, proc=PearlAreaDisplay#svp_smoothing</div>
|
|
<div class="line"><a id="l00306" name="l00306"></a><span class="lineno"> 306</span> </div>
|
|
<div class="line"><a id="l00307" name="l00307"></a><span class="lineno"> 307</span> PopupMenu pm_export win=$graphname, mode=0,title="Export"</div>
|
|
<div class="line"><a id="l00308" name="l00308"></a><span class="lineno"> 308</span> PopupMenu pm_export win=$graphname, value="X profile;Y profile;X profile (collate);Y profile (collate)"</div>
|
|
<div class="line"><a id="l00309" name="l00309"></a><span class="lineno"> 309</span> PopupMenu pm_export win=$graphname, pos={308,0},bodyWidth=60,proc=PearlAreaDisplay#pmp_export</div>
|
|
<div class="line"><a id="l00310" name="l00310"></a><span class="lineno"> 310</span> PopupMenu pm_export win=$graphname, help={"Export profile of selected area and display in graph. Collate mode = display all profiles in same graph."}</div>
|
|
<div class="line"><a id="l00311" name="l00311"></a><span class="lineno"> 311</span> </div>
|
|
<div class="line"><a id="l00312" name="l00312"></a><span class="lineno"> 312</span> // data processing</div>
|
|
<div class="line"><a id="l00313" name="l00313"></a><span class="lineno"> 313</span> ad_update_profiles(image)</div>
|
|
<div class="line"><a id="l00314" name="l00314"></a><span class="lineno"> 314</span> </div>
|
|
<div class="line"><a id="l00315" name="l00315"></a><span class="lineno"> 315</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l00316" name="l00316"></a><span class="lineno"> 316</span> return graphname</div>
|
|
<div class="line"><a id="l00317" name="l00317"></a><span class="lineno"> 317</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00318" name="l00318"></a><span class="lineno"> 318</span> </div>
|
|
<div class="foldopen" id="foldopen00331" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00331" name="l00331"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#af9bd125ed4fb4ada10b78bca2607b44d"> 331</a></span>function /wave ad_add_overlay(image, [rgba])</div>
|
|
<div class="line"><a id="l00332" name="l00332"></a><span class="lineno"> 332</span> wave image</div>
|
|
<div class="line"><a id="l00333" name="l00333"></a><span class="lineno"> 333</span> string rgba</div>
|
|
<div class="line"><a id="l00334" name="l00334"></a><span class="lineno"> 334</span> </div>
|
|
<div class="line"><a id="l00335" name="l00335"></a><span class="lineno"> 335</span> if (ParamIsDefault(rgba))</div>
|
|
<div class="line"><a id="l00336" name="l00336"></a><span class="lineno"> 336</span> rgba = "65535,65532,16385,32767"</div>
|
|
<div class="line"><a id="l00337" name="l00337"></a><span class="lineno"> 337</span> elseif (ItemsInList(rgba, ",") == 3)</div>
|
|
<div class="line"><a id="l00338" name="l00338"></a><span class="lineno"> 338</span> rgba += ",32767"</div>
|
|
<div class="line"><a id="l00339" name="l00339"></a><span class="lineno"> 339</span> endif</div>
|
|
<div class="line"><a id="l00340" name="l00340"></a><span class="lineno"> 340</span> </div>
|
|
<div class="line"><a id="l00341" name="l00341"></a><span class="lineno"> 341</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00342" name="l00342"></a><span class="lineno"> 342</span> wave view_image = get_view_image(image)</div>
|
|
<div class="line"><a id="l00343" name="l00343"></a><span class="lineno"> 343</span> dfref viewdf = GetWavesDataFolderDFR(view_image)</div>
|
|
<div class="line"><a id="l00344" name="l00344"></a><span class="lineno"> 344</span> svar /sdfr=viewdf graphname = prof_graphname</div>
|
|
<div class="line"><a id="l00345" name="l00345"></a><span class="lineno"> 345</span> setdatafolder viewdf</div>
|
|
<div class="line"><a id="l00346" name="l00346"></a><span class="lineno"> 346</span> </div>
|
|
<div class="line"><a id="l00347" name="l00347"></a><span class="lineno"> 347</span> string overlayname = "view_overlay"</div>
|
|
<div class="line"><a id="l00348" name="l00348"></a><span class="lineno"> 348</span> duplicate /o image, $overlayname /wave=overlay</div>
|
|
<div class="line"><a id="l00349" name="l00349"></a><span class="lineno"> 349</span> redimension /b/u overlay</div>
|
|
<div class="line"><a id="l00350" name="l00350"></a><span class="lineno"> 350</span> overlay = 64</div>
|
|
<div class="line"><a id="l00351" name="l00351"></a><span class="lineno"> 351</span> </div>
|
|
<div class="line"><a id="l00352" name="l00352"></a><span class="lineno"> 352</span> string imagenames = ImageNameList(graphname, ";")</div>
|
|
<div class="line"><a id="l00353" name="l00353"></a><span class="lineno"> 353</span> if (whichlistItem(overlayname, imagenames, ";") < 0)</div>
|
|
<div class="line"><a id="l00354" name="l00354"></a><span class="lineno"> 354</span> AppendImage /w=$graphname $overlayname</div>
|
|
<div class="line"><a id="l00355" name="l00355"></a><span class="lineno"> 355</span> rgba = replacestring("(", rgba, "")</div>
|
|
<div class="line"><a id="l00356" name="l00356"></a><span class="lineno"> 356</span> rgba = replacestring(")", rgba, "")</div>
|
|
<div class="line"><a id="l00357" name="l00357"></a><span class="lineno"> 357</span> variable rr = str2num(StringFromList(0, rgba, ","))</div>
|
|
<div class="line"><a id="l00358" name="l00358"></a><span class="lineno"> 358</span> variable gg = str2num(StringFromList(1, rgba, ","))</div>
|
|
<div class="line"><a id="l00359" name="l00359"></a><span class="lineno"> 359</span> variable bb = str2num(StringFromList(2, rgba, ","))</div>
|
|
<div class="line"><a id="l00360" name="l00360"></a><span class="lineno"> 360</span> variable aa = str2num(StringFromList(3, rgba, ","))</div>
|
|
<div class="line"><a id="l00361" name="l00361"></a><span class="lineno"> 361</span>#if IgorVersion() >= 8</div>
|
|
<div class="line"><a id="l00362" name="l00362"></a><span class="lineno"> 362</span> ModifyImage /w=$graphname $overlayname explicit=1,eval={0,rr,gg,bb,aa},eval={255,-1,-1,-1}</div>
|
|
<div class="line"><a id="l00363" name="l00363"></a><span class="lineno"> 363</span>#else</div>
|
|
<div class="line"><a id="l00364" name="l00364"></a><span class="lineno"> 364</span> ModifyImage /w=$graphname $overlayname explicit=1,eval={0,rr,gg,bb},eval={255,-1,-1,-1}</div>
|
|
<div class="line"><a id="l00365" name="l00365"></a><span class="lineno"> 365</span>#endif</div>
|
|
<div class="line"><a id="l00366" name="l00366"></a><span class="lineno"> 366</span> endif</div>
|
|
<div class="line"><a id="l00367" name="l00367"></a><span class="lineno"> 367</span> </div>
|
|
<div class="line"><a id="l00368" name="l00368"></a><span class="lineno"> 368</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l00369" name="l00369"></a><span class="lineno"> 369</span> return overlay</div>
|
|
<div class="line"><a id="l00370" name="l00370"></a><span class="lineno"> 370</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00371" name="l00371"></a><span class="lineno"> 371</span> </div>
|
|
<div class="foldopen" id="foldopen00377" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00377" name="l00377"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#afa2546f9cb03dfa8bf0cc9966f0b7a45"> 377</a></span>function ad_update_profiles(image)</div>
|
|
<div class="line"><a id="l00378" name="l00378"></a><span class="lineno"> 378</span> wave image</div>
|
|
<div class="line"><a id="l00379" name="l00379"></a><span class="lineno"> 379</span> </div>
|
|
<div class="line"><a id="l00380" name="l00380"></a><span class="lineno"> 380</span> // data folders and references</div>
|
|
<div class="line"><a id="l00381" name="l00381"></a><span class="lineno"> 381</span> dfref viewdf = get_view_folder(image)</div>
|
|
<div class="line"><a id="l00382" name="l00382"></a><span class="lineno"> 382</span> if (DataFolderRefStatus(viewdf) == 0)</div>
|
|
<div class="line"><a id="l00383" name="l00383"></a><span class="lineno"> 383</span> return -1 // data folder not found</div>
|
|
<div class="line"><a id="l00384" name="l00384"></a><span class="lineno"> 384</span> endif</div>
|
|
<div class="line"><a id="l00385" name="l00385"></a><span class="lineno"> 385</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00386" name="l00386"></a><span class="lineno"> 386</span> setdatafolder viewdf</div>
|
|
<div class="line"><a id="l00387" name="l00387"></a><span class="lineno"> 387</span> </div>
|
|
<div class="line"><a id="l00388" name="l00388"></a><span class="lineno"> 388</span> // data structures</div>
|
|
<div class="line"><a id="l00389" name="l00389"></a><span class="lineno"> 389</span> string viewname = "view_image"</div>
|
|
<div class="line"><a id="l00390" name="l00390"></a><span class="lineno"> 390</span> duplicate /o image, $viewname /wave=view</div>
|
|
<div class="line"><a id="l00391" name="l00391"></a><span class="lineno"> 391</span> string overlayname = "view_overlay"</div>
|
|
<div class="line"><a id="l00392" name="l00392"></a><span class="lineno"> 392</span> wave /z overlay = $overlayname</div>
|
|
<div class="line"><a id="l00393" name="l00393"></a><span class="lineno"> 393</span> if (waveexists(overlay))</div>
|
|
<div class="line"><a id="l00394" name="l00394"></a><span class="lineno"> 394</span> redimension /n=(dimsize(view,0), dimsize(view,1)) overlay</div>
|
|
<div class="line"><a id="l00395" name="l00395"></a><span class="lineno"> 395</span> endif</div>
|
|
<div class="line"><a id="l00396" name="l00396"></a><span class="lineno"> 396</span> </div>
|
|
<div class="line"><a id="l00397" name="l00397"></a><span class="lineno"> 397</span> // data processing</div>
|
|
<div class="line"><a id="l00398" name="l00398"></a><span class="lineno"> 398</span> svar view_filter</div>
|
|
<div class="line"><a id="l00399" name="l00399"></a><span class="lineno"> 399</span> svar view_filter_options</div>
|
|
<div class="line"><a id="l00400" name="l00400"></a><span class="lineno"> 400</span> nvar smoothing_x = view_filter_smoothing_x</div>
|
|
<div class="line"><a id="l00401" name="l00401"></a><span class="lineno"> 401</span> nvar smoothing_y = view_filter_smoothing_y</div>
|
|
<div class="line"><a id="l00402" name="l00402"></a><span class="lineno"> 402</span> funcref ad_default_image_filter filterfunc = $view_filter</div>
|
|
<div class="line"><a id="l00403" name="l00403"></a><span class="lineno"> 403</span> view_filter_options = ReplaceNumberByKey("SmoothingX", view_filter_options, smoothing_x, "=", ";")</div>
|
|
<div class="line"><a id="l00404" name="l00404"></a><span class="lineno"> 404</span> view_filter_options = ReplaceNumberByKey("SmoothingY", view_filter_options, smoothing_y, "=", ";")</div>
|
|
<div class="line"><a id="l00405" name="l00405"></a><span class="lineno"> 405</span> filterfunc(view, view_filter_options)</div>
|
|
<div class="line"><a id="l00406" name="l00406"></a><span class="lineno"> 406</span> </div>
|
|
<div class="line"><a id="l00407" name="l00407"></a><span class="lineno"> 407</span> ad_calc_cursor_profiles(view)</div>
|
|
<div class="line"><a id="l00408" name="l00408"></a><span class="lineno"> 408</span> </div>
|
|
<div class="line"><a id="l00409" name="l00409"></a><span class="lineno"> 409</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l00410" name="l00410"></a><span class="lineno"> 410</span> return 0</div>
|
|
<div class="line"><a id="l00411" name="l00411"></a><span class="lineno"> 411</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00412" name="l00412"></a><span class="lineno"> 412</span> </div>
|
|
<div class="foldopen" id="foldopen00429" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00429" name="l00429"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a5657fc4dcd395aef637c19e8df57a418"> 429</a></span>function ad_profiles_cursor_mode(image, mode)</div>
|
|
<div class="line"><a id="l00430" name="l00430"></a><span class="lineno"> 430</span> wave image</div>
|
|
<div class="line"><a id="l00431" name="l00431"></a><span class="lineno"> 431</span> variable mode</div>
|
|
<div class="line"><a id="l00432" name="l00432"></a><span class="lineno"> 432</span> </div>
|
|
<div class="line"><a id="l00433" name="l00433"></a><span class="lineno"> 433</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00434" name="l00434"></a><span class="lineno"> 434</span> wave view_image = get_view_image(image)</div>
|
|
<div class="line"><a id="l00435" name="l00435"></a><span class="lineno"> 435</span> dfref viewdf = GetWavesDataFolderDFR(view_image)</div>
|
|
<div class="line"><a id="l00436" name="l00436"></a><span class="lineno"> 436</span> svar /sdfr=viewdf graphname = prof_graphname</div>
|
|
<div class="line"><a id="l00437" name="l00437"></a><span class="lineno"> 437</span> nvar /sdfr=viewdf cursor_mode = view_cursor_mode</div>
|
|
<div class="line"><a id="l00438" name="l00438"></a><span class="lineno"> 438</span> wave /sdfr=viewdf xprofiles, yprofiles</div>
|
|
<div class="line"><a id="l00439" name="l00439"></a><span class="lineno"> 439</span> </div>
|
|
<div class="line"><a id="l00440" name="l00440"></a><span class="lineno"> 440</span> variable dx = DimSize(view_image, 0)</div>
|
|
<div class="line"><a id="l00441" name="l00441"></a><span class="lineno"> 441</span> variable dy = DimSize(view_image, 1)</div>
|
|
<div class="line"><a id="l00442" name="l00442"></a><span class="lineno"> 442</span> switch(mode)</div>
|
|
<div class="line"><a id="l00443" name="l00443"></a><span class="lineno"> 443</span> case 1: // background selection</div>
|
|
<div class="line"><a id="l00444" name="l00444"></a><span class="lineno"> 444</span> Cursor /w=$graphname /A=0 /P /I /S=2 /H=1 /L=1 A view_image 0, 0</div>
|
|
<div class="line"><a id="l00445" name="l00445"></a><span class="lineno"> 445</span> Cursor /w=$graphname /A=0 /P /I /S=2 /H=1 /L=1 B view_image dx-1, dy-1</div>
|
|
<div class="line"><a id="l00446" name="l00446"></a><span class="lineno"> 446</span> Cursor /w=$graphname /A=0 /P /I /S=2 /H=2 /L=1 C view_image round(0.2 * dx) -1, 0</div>
|
|
<div class="line"><a id="l00447" name="l00447"></a><span class="lineno"> 447</span> Cursor /w=$graphname /A=0 /P /I /S=2 /H=2 /L=1 D view_image round(0.8 * dx) -1, 0</div>
|
|
<div class="line"><a id="l00448" name="l00448"></a><span class="lineno"> 448</span> Cursor /w=$graphname /A=0 /P /I /S=2 /H=2 /L=1 E view_image round(0.4 * dx) -1, 0</div>
|
|
<div class="line"><a id="l00449" name="l00449"></a><span class="lineno"> 449</span> Cursor /w=$graphname /A=0 /P /I /S=2 /H=2 /L=1 F view_image round(0.6 * dx) -1, 0</div>
|
|
<div class="line"><a id="l00450" name="l00450"></a><span class="lineno"> 450</span> </div>
|
|
<div class="line"><a id="l00451" name="l00451"></a><span class="lineno"> 451</span> ShowInfo /w=$graphname /CP=0</div>
|
|
<div class="line"><a id="l00452" name="l00452"></a><span class="lineno"> 452</span> cursor_mode = mode</div>
|
|
<div class="line"><a id="l00453" name="l00453"></a><span class="lineno"> 453</span> break</div>
|
|
<div class="line"><a id="l00454" name="l00454"></a><span class="lineno"> 454</span> default:</div>
|
|
<div class="line"><a id="l00455" name="l00455"></a><span class="lineno"> 455</span> Cursor /w=$graphname /A=1 /P /I /S=2 /H=1 /L=1 A view_image 0,0</div>
|
|
<div class="line"><a id="l00456" name="l00456"></a><span class="lineno"> 456</span> Cursor /w=$graphname /A=1 /P /I /S=2 /H=1 /L=1 B view_image dx-1, dy-1</div>
|
|
<div class="line"><a id="l00457" name="l00457"></a><span class="lineno"> 457</span> variable pcurs</div>
|
|
<div class="line"><a id="l00458" name="l00458"></a><span class="lineno"> 458</span> pcurs = floor(DimSize(xprofiles, 0) / 3)</div>
|
|
<div class="line"><a id="l00459" name="l00459"></a><span class="lineno"> 459</span> Cursor /w=$graphname /A=0 /P /S=1 /H=0 C xprofiles#2 pcurs</div>
|
|
<div class="line"><a id="l00460" name="l00460"></a><span class="lineno"> 460</span> pcurs = floor(DimSize(xprofiles, 0) * 2 / 3)</div>
|
|
<div class="line"><a id="l00461" name="l00461"></a><span class="lineno"> 461</span> Cursor /w=$graphname /A=0 /P /S=1 /H=0 D xprofiles#2 pcurs</div>
|
|
<div class="line"><a id="l00462" name="l00462"></a><span class="lineno"> 462</span> pcurs = floor(DimSize(yprofiles, 0) / 3)</div>
|
|
<div class="line"><a id="l00463" name="l00463"></a><span class="lineno"> 463</span> Cursor /w=$graphname /A=0 /P /S=1 /H=0 E yprofiles#2 pcurs</div>
|
|
<div class="line"><a id="l00464" name="l00464"></a><span class="lineno"> 464</span> pcurs = floor(DimSize(yprofiles, 0) * 2 / 3)</div>
|
|
<div class="line"><a id="l00465" name="l00465"></a><span class="lineno"> 465</span> Cursor /w=$graphname /A=0 /P /S=1 /H=0 F yprofiles#2 pcurs</div>
|
|
<div class="line"><a id="l00466" name="l00466"></a><span class="lineno"> 466</span> ShowInfo /w=$graphname /CP=0</div>
|
|
<div class="line"><a id="l00467" name="l00467"></a><span class="lineno"> 467</span> cursor_mode = 0</div>
|
|
<div class="line"><a id="l00468" name="l00468"></a><span class="lineno"> 468</span> endswitch</div>
|
|
<div class="line"><a id="l00469" name="l00469"></a><span class="lineno"> 469</span> </div>
|
|
<div class="line"><a id="l00470" name="l00470"></a><span class="lineno"> 470</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l00471" name="l00471"></a><span class="lineno"> 471</span> return 0</div>
|
|
<div class="line"><a id="l00472" name="l00472"></a><span class="lineno"> 472</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00473" name="l00473"></a><span class="lineno"> 473</span> </div>
|
|
<div class="foldopen" id="foldopen00490" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00490" name="l00490"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#ad2a84495ddac89bc8f4203fca56babfd"> 490</a></span>function ad_profiles_set_cursor(image, cursorname, xa, ya, [pscale])</div>
|
|
<div class="line"><a id="l00491" name="l00491"></a><span class="lineno"> 491</span> wave image</div>
|
|
<div class="line"><a id="l00492" name="l00492"></a><span class="lineno"> 492</span> string cursorname</div>
|
|
<div class="line"><a id="l00493" name="l00493"></a><span class="lineno"> 493</span> variable xa, ya</div>
|
|
<div class="line"><a id="l00494" name="l00494"></a><span class="lineno"> 494</span> variable pscale</div>
|
|
<div class="line"><a id="l00495" name="l00495"></a><span class="lineno"> 495</span> </div>
|
|
<div class="line"><a id="l00496" name="l00496"></a><span class="lineno"> 496</span> if (ParamIsDefault(pscale))</div>
|
|
<div class="line"><a id="l00497" name="l00497"></a><span class="lineno"> 497</span> pscale = 0</div>
|
|
<div class="line"><a id="l00498" name="l00498"></a><span class="lineno"> 498</span> endif</div>
|
|
<div class="line"><a id="l00499" name="l00499"></a><span class="lineno"> 499</span> </div>
|
|
<div class="line"><a id="l00500" name="l00500"></a><span class="lineno"> 500</span> // data folders and references</div>
|
|
<div class="line"><a id="l00501" name="l00501"></a><span class="lineno"> 501</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00502" name="l00502"></a><span class="lineno"> 502</span> wave view_image = get_view_image(image)</div>
|
|
<div class="line"><a id="l00503" name="l00503"></a><span class="lineno"> 503</span> dfref viewdf = GetWavesDataFolderDFR(view_image)</div>
|
|
<div class="line"><a id="l00504" name="l00504"></a><span class="lineno"> 504</span> svar /sdfr=viewdf graphname = prof_graphname</div>
|
|
<div class="line"><a id="l00505" name="l00505"></a><span class="lineno"> 505</span> </div>
|
|
<div class="line"><a id="l00506" name="l00506"></a><span class="lineno"> 506</span> variable pa, qa</div>
|
|
<div class="line"><a id="l00507" name="l00507"></a><span class="lineno"> 507</span> if (pscale)</div>
|
|
<div class="line"><a id="l00508" name="l00508"></a><span class="lineno"> 508</span> pa = xa</div>
|
|
<div class="line"><a id="l00509" name="l00509"></a><span class="lineno"> 509</span> qa = ya</div>
|
|
<div class="line"><a id="l00510" name="l00510"></a><span class="lineno"> 510</span> else</div>
|
|
<div class="line"><a id="l00511" name="l00511"></a><span class="lineno"> 511</span> pa = round((xa - DimOffset(view_image, 0)) / DimDelta(view_image, 0))</div>
|
|
<div class="line"><a id="l00512" name="l00512"></a><span class="lineno"> 512</span> qa = round((ya - DimOffset(view_image, 1)) / DimDelta(view_image, 1))</div>
|
|
<div class="line"><a id="l00513" name="l00513"></a><span class="lineno"> 513</span> endif</div>
|
|
<div class="line"><a id="l00514" name="l00514"></a><span class="lineno"> 514</span> </div>
|
|
<div class="line"><a id="l00515" name="l00515"></a><span class="lineno"> 515</span> pa = min(pa, DimSize(view_image, 0) - 1)</div>
|
|
<div class="line"><a id="l00516" name="l00516"></a><span class="lineno"> 516</span> pa = max(pa, 0)</div>
|
|
<div class="line"><a id="l00517" name="l00517"></a><span class="lineno"> 517</span> qa = min(qa, DimSize(view_image, 1) - 1)</div>
|
|
<div class="line"><a id="l00518" name="l00518"></a><span class="lineno"> 518</span> qa = max(qa, 0)</div>
|
|
<div class="line"><a id="l00519" name="l00519"></a><span class="lineno"> 519</span> Cursor /i /p /w=$graphname $cursorname view_image pa, qa</div>
|
|
<div class="line"><a id="l00520" name="l00520"></a><span class="lineno"> 520</span> </div>
|
|
<div class="line"><a id="l00521" name="l00521"></a><span class="lineno"> 521</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l00522" name="l00522"></a><span class="lineno"> 522</span> return 0</div>
|
|
<div class="line"><a id="l00523" name="l00523"></a><span class="lineno"> 523</span>End</div>
|
|
</div>
|
|
<div class="line"><a id="l00524" name="l00524"></a><span class="lineno"> 524</span> </div>
|
|
<div class="line"><a id="l00535" name="l00535"></a><span class="lineno"> 535</span>// the lines can be removed manually using the draw toolbox, or by calling this function with @c clean=1.</div>
|
|
<div class="foldopen" id="foldopen00542" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00542" name="l00542"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a6d20a8c6bf5ed143d375dee71fb3a6d5"> 542</a></span>function ad_profiles_crosshairs(image, [clear])</div>
|
|
<div class="line"><a id="l00543" name="l00543"></a><span class="lineno"> 543</span> wave image</div>
|
|
<div class="line"><a id="l00544" name="l00544"></a><span class="lineno"> 544</span> variable clear</div>
|
|
<div class="line"><a id="l00545" name="l00545"></a><span class="lineno"> 545</span> </div>
|
|
<div class="line"><a id="l00546" name="l00546"></a><span class="lineno"> 546</span> if (ParamIsDefault(clear))</div>
|
|
<div class="line"><a id="l00547" name="l00547"></a><span class="lineno"> 547</span> clear = 0</div>
|
|
<div class="line"><a id="l00548" name="l00548"></a><span class="lineno"> 548</span> endif</div>
|
|
<div class="line"><a id="l00549" name="l00549"></a><span class="lineno"> 549</span> </div>
|
|
<div class="line"><a id="l00550" name="l00550"></a><span class="lineno"> 550</span> // data folders and references</div>
|
|
<div class="line"><a id="l00551" name="l00551"></a><span class="lineno"> 551</span> wave view_image = get_view_image(image)</div>
|
|
<div class="line"><a id="l00552" name="l00552"></a><span class="lineno"> 552</span> dfref viewdf = GetWavesDataFolderDFR(view_image)</div>
|
|
<div class="line"><a id="l00553" name="l00553"></a><span class="lineno"> 553</span> svar /sdfr=viewdf graphname = prof_graphname</div>
|
|
<div class="line"><a id="l00554" name="l00554"></a><span class="lineno"> 554</span> </div>
|
|
<div class="line"><a id="l00555" name="l00555"></a><span class="lineno"> 555</span> string cursors = "A;B"</div>
|
|
<div class="line"><a id="l00556" name="l00556"></a><span class="lineno"> 556</span> string colors = "39168,0,0;0,26112,0"</div>
|
|
<div class="line"><a id="l00557" name="l00557"></a><span class="lineno"> 557</span> string color</div>
|
|
<div class="line"><a id="l00558" name="l00558"></a><span class="lineno"> 558</span> variable ncursors</div>
|
|
<div class="line"><a id="l00559" name="l00559"></a><span class="lineno"> 559</span> variable icursor</div>
|
|
<div class="line"><a id="l00560" name="l00560"></a><span class="lineno"> 560</span> string cursorname</div>
|
|
<div class="line"><a id="l00561" name="l00561"></a><span class="lineno"> 561</span> string groupname = "crosshairs"</div>
|
|
<div class="line"><a id="l00562" name="l00562"></a><span class="lineno"> 562</span> variable xx, yy</div>
|
|
<div class="line"><a id="l00563" name="l00563"></a><span class="lineno"> 563</span> struct RGBColor rgb</div>
|
|
<div class="line"><a id="l00564" name="l00564"></a><span class="lineno"> 564</span> </div>
|
|
<div class="line"><a id="l00565" name="l00565"></a><span class="lineno"> 565</span> if (clear == 0)</div>
|
|
<div class="line"><a id="l00566" name="l00566"></a><span class="lineno"> 566</span> SetDrawEnv /W=$graphname push</div>
|
|
<div class="line"><a id="l00567" name="l00567"></a><span class="lineno"> 567</span> DrawAction /w=$graphname getgroup=$groupname, delete, begininsert</div>
|
|
<div class="line"><a id="l00568" name="l00568"></a><span class="lineno"> 568</span> SetDrawEnv /w=$graphname gstart, gname=$groupname</div>
|
|
<div class="line"><a id="l00569" name="l00569"></a><span class="lineno"> 569</span> </div>
|
|
<div class="line"><a id="l00570" name="l00570"></a><span class="lineno"> 570</span> SetDrawEnv /W=$graphname dash=4</div>
|
|
<div class="line"><a id="l00571" name="l00571"></a><span class="lineno"> 571</span> SetDrawEnv /W=$graphname linethick=0.5</div>
|
|
<div class="line"><a id="l00572" name="l00572"></a><span class="lineno"> 572</span> </div>
|
|
<div class="line"><a id="l00573" name="l00573"></a><span class="lineno"> 573</span> ncursors = ItemsInList(cursors, ";")</div>
|
|
<div class="line"><a id="l00574" name="l00574"></a><span class="lineno"> 574</span> for (icursor=0; icursor < ncursors; icursor += 1)</div>
|
|
<div class="line"><a id="l00575" name="l00575"></a><span class="lineno"> 575</span> cursorname = StringFromList(icursor, cursors, ";")</div>
|
|
<div class="line"><a id="l00576" name="l00576"></a><span class="lineno"> 576</span> color = StringFromList(icursor, colors, ";")</div>
|
|
<div class="line"><a id="l00577" name="l00577"></a><span class="lineno"> 577</span> rgb.red = str2num(StringFromList(0, color, ","))</div>
|
|
<div class="line"><a id="l00578" name="l00578"></a><span class="lineno"> 578</span> rgb.green = str2num(StringFromList(1, color, ","))</div>
|
|
<div class="line"><a id="l00579" name="l00579"></a><span class="lineno"> 579</span> rgb.blue = str2num(StringFromList(2, color, ","))</div>
|
|
<div class="line"><a id="l00580" name="l00580"></a><span class="lineno"> 580</span> if (strlen(CsrInfo($cursorname, graphname)) > 0)</div>
|
|
<div class="line"><a id="l00581" name="l00581"></a><span class="lineno"> 581</span> xx = hcsr($cursorname, graphname)</div>
|
|
<div class="line"><a id="l00582" name="l00582"></a><span class="lineno"> 582</span> yy = vcsr($cursorname, graphname)</div>
|
|
<div class="line"><a id="l00583" name="l00583"></a><span class="lineno"> 583</span> SetDrawEnv /W=$graphname linefgc=(rgb.red, rgb.green, rgb.blue)</div>
|
|
<div class="line"><a id="l00584" name="l00584"></a><span class="lineno"> 584</span> SetDrawEnv /W=$graphname save</div>
|
|
<div class="line"><a id="l00585" name="l00585"></a><span class="lineno"> 585</span> SetDrawEnv /W=$graphname xcoord=bottom, ycoord=prel</div>
|
|
<div class="line"><a id="l00586" name="l00586"></a><span class="lineno"> 586</span> DrawLine /W=$graphname xx, 0, xx, 1</div>
|
|
<div class="line"><a id="l00587" name="l00587"></a><span class="lineno"> 587</span> SetDrawEnv /W=$graphname xcoord=prel, ycoord=left</div>
|
|
<div class="line"><a id="l00588" name="l00588"></a><span class="lineno"> 588</span> DrawLine /W=$graphname 0, yy, 1, yy</div>
|
|
<div class="line"><a id="l00589" name="l00589"></a><span class="lineno"> 589</span> endif</div>
|
|
<div class="line"><a id="l00590" name="l00590"></a><span class="lineno"> 590</span> endfor</div>
|
|
<div class="line"><a id="l00591" name="l00591"></a><span class="lineno"> 591</span> </div>
|
|
<div class="line"><a id="l00592" name="l00592"></a><span class="lineno"> 592</span> SetDrawEnv /w=$graphname gstop</div>
|
|
<div class="line"><a id="l00593" name="l00593"></a><span class="lineno"> 593</span> DrawAction /w=$graphname endinsert</div>
|
|
<div class="line"><a id="l00594" name="l00594"></a><span class="lineno"> 594</span> SetDrawEnv /W=$graphname pop</div>
|
|
<div class="line"><a id="l00595" name="l00595"></a><span class="lineno"> 595</span> SetDrawEnv /W=$graphname save</div>
|
|
<div class="line"><a id="l00596" name="l00596"></a><span class="lineno"> 596</span> else</div>
|
|
<div class="line"><a id="l00597" name="l00597"></a><span class="lineno"> 597</span> DrawAction /w=$graphname getgroup=$groupname, delete</div>
|
|
<div class="line"><a id="l00598" name="l00598"></a><span class="lineno"> 598</span> endif</div>
|
|
<div class="line"><a id="l00599" name="l00599"></a><span class="lineno"> 599</span> </div>
|
|
<div class="line"><a id="l00600" name="l00600"></a><span class="lineno"> 600</span> return 0</div>
|
|
<div class="line"><a id="l00601" name="l00601"></a><span class="lineno"> 601</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00602" name="l00602"></a><span class="lineno"> 602</span> </div>
|
|
<div class="foldopen" id="foldopen00608" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00608" name="l00608"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a4b76a98582f5997d3810f969dbb6c4ed"> 608</a></span>static function /wave get_source_image(view)</div>
|
|
<div class="line"><a id="l00609" name="l00609"></a><span class="lineno"> 609</span> wave view // image wave displayed in a profiles window</div>
|
|
<div class="line"><a id="l00610" name="l00610"></a><span class="lineno"> 610</span> </div>
|
|
<div class="line"><a id="l00611" name="l00611"></a><span class="lineno"> 611</span> dfref viewdf = GetWavesDataFolderDFR(view)</div>
|
|
<div class="line"><a id="l00612" name="l00612"></a><span class="lineno"> 612</span> svar /z /sdfr=viewdf sourcepath</div>
|
|
<div class="line"><a id="l00613" name="l00613"></a><span class="lineno"> 613</span> if (svar_exists(sourcepath))</div>
|
|
<div class="line"><a id="l00614" name="l00614"></a><span class="lineno"> 614</span> wave /z img = $sourcepath</div>
|
|
<div class="line"><a id="l00615" name="l00615"></a><span class="lineno"> 615</span> else</div>
|
|
<div class="line"><a id="l00616" name="l00616"></a><span class="lineno"> 616</span> wave /z img = $""</div>
|
|
<div class="line"><a id="l00617" name="l00617"></a><span class="lineno"> 617</span> endif</div>
|
|
<div class="line"><a id="l00618" name="l00618"></a><span class="lineno"> 618</span> return img</div>
|
|
<div class="line"><a id="l00619" name="l00619"></a><span class="lineno"> 619</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00620" name="l00620"></a><span class="lineno"> 620</span> </div>
|
|
<div class="foldopen" id="foldopen00622" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00622" name="l00622"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a2b183a27ec795b0ec1f8efabe3068369"> 622</a></span>static function /df make_view_folder(source)</div>
|
|
<div class="line"><a id="l00623" name="l00623"></a><span class="lineno"> 623</span> wave source // wave which contains the raw data from the detector.</div>
|
|
<div class="line"><a id="l00624" name="l00624"></a><span class="lineno"> 624</span> </div>
|
|
<div class="line"><a id="l00625" name="l00625"></a><span class="lineno"> 625</span> // data folders and references</div>
|
|
<div class="line"><a id="l00626" name="l00626"></a><span class="lineno"> 626</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00627" name="l00627"></a><span class="lineno"> 627</span> dfref imagedf = GetWavesDataFolderDFR(source)</div>
|
|
<div class="line"><a id="l00628" name="l00628"></a><span class="lineno"> 628</span> string s_imagedf = GetDataFolder(1, imagedf)</div>
|
|
<div class="line"><a id="l00629" name="l00629"></a><span class="lineno"> 629</span> setdatafolder imagedf</div>
|
|
<div class="line"><a id="l00630" name="l00630"></a><span class="lineno"> 630</span> string s_viewdf = PearlCleanupName("view_" + NameOfWave(source))</div>
|
|
<div class="line"><a id="l00631" name="l00631"></a><span class="lineno"> 631</span> newdatafolder /o/s $s_viewdf</div>
|
|
<div class="line"><a id="l00632" name="l00632"></a><span class="lineno"> 632</span> dfref viewdf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00633" name="l00633"></a><span class="lineno"> 633</span> </div>
|
|
<div class="line"><a id="l00634" name="l00634"></a><span class="lineno"> 634</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l00635" name="l00635"></a><span class="lineno"> 635</span> return viewdf</div>
|
|
<div class="line"><a id="l00636" name="l00636"></a><span class="lineno"> 636</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00637" name="l00637"></a><span class="lineno"> 637</span> </div>
|
|
<div class="foldopen" id="foldopen00646" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00646" name="l00646"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a1bf20e37ed3e9c76be8ebe448c68a048"> 646</a></span>static function /df get_view_folder(source)</div>
|
|
<div class="line"><a id="l00647" name="l00647"></a><span class="lineno"> 647</span> wave source</div>
|
|
<div class="line"><a id="l00648" name="l00648"></a><span class="lineno"> 648</span> </div>
|
|
<div class="line"><a id="l00649" name="l00649"></a><span class="lineno"> 649</span> // data folders and references</div>
|
|
<div class="line"><a id="l00650" name="l00650"></a><span class="lineno"> 650</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00651" name="l00651"></a><span class="lineno"> 651</span> dfref imagedf = GetWavesDataFolderDFR(source)</div>
|
|
<div class="line"><a id="l00652" name="l00652"></a><span class="lineno"> 652</span> dfref viewdf</div>
|
|
<div class="line"><a id="l00653" name="l00653"></a><span class="lineno"> 653</span> setdatafolder imagedf</div>
|
|
<div class="line"><a id="l00654" name="l00654"></a><span class="lineno"> 654</span> string s_viewdf = PearlCleanupName("view_" + NameOfWave(source))</div>
|
|
<div class="line"><a id="l00655" name="l00655"></a><span class="lineno"> 655</span> if (DataFolderExists(s_viewdf))</div>
|
|
<div class="line"><a id="l00656" name="l00656"></a><span class="lineno"> 656</span> setdatafolder $s_viewdf</div>
|
|
<div class="line"><a id="l00657" name="l00657"></a><span class="lineno"> 657</span> viewdf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00658" name="l00658"></a><span class="lineno"> 658</span> endif</div>
|
|
<div class="line"><a id="l00659" name="l00659"></a><span class="lineno"> 659</span> </div>
|
|
<div class="line"><a id="l00660" name="l00660"></a><span class="lineno"> 660</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l00661" name="l00661"></a><span class="lineno"> 661</span> return viewdf</div>
|
|
<div class="line"><a id="l00662" name="l00662"></a><span class="lineno"> 662</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00663" name="l00663"></a><span class="lineno"> 663</span> </div>
|
|
<div class="foldopen" id="foldopen00669" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00669" name="l00669"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a6cc0970b41ca197fa47263556fa2686a"> 669</a></span>static function /wave get_view_image(source)</div>
|
|
<div class="line"><a id="l00670" name="l00670"></a><span class="lineno"> 670</span> wave source</div>
|
|
<div class="line"><a id="l00671" name="l00671"></a><span class="lineno"> 671</span> </div>
|
|
<div class="line"><a id="l00672" name="l00672"></a><span class="lineno"> 672</span> dfref viewdf = get_view_folder(source)</div>
|
|
<div class="line"><a id="l00673" name="l00673"></a><span class="lineno"> 673</span> string viewname = "view_image"</div>
|
|
<div class="line"><a id="l00674" name="l00674"></a><span class="lineno"> 674</span> wave /sdfr=viewdf view = $viewname</div>
|
|
<div class="line"><a id="l00675" name="l00675"></a><span class="lineno"> 675</span> </div>
|
|
<div class="line"><a id="l00676" name="l00676"></a><span class="lineno"> 676</span> return view</div>
|
|
<div class="line"><a id="l00677" name="l00677"></a><span class="lineno"> 677</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00678" name="l00678"></a><span class="lineno"> 678</span> </div>
|
|
<div class="foldopen" id="foldopen00679" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00679" name="l00679"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a24b17f99fafd8043ed3e4502000da316"> 679</a></span>static function bp_reset_cursors(ba) : ButtonControl</div>
|
|
<div class="line"><a id="l00680" name="l00680"></a><span class="lineno"> 680</span> STRUCT WMButtonAction &ba</div>
|
|
<div class="line"><a id="l00681" name="l00681"></a><span class="lineno"> 681</span> </div>
|
|
<div class="line"><a id="l00682" name="l00682"></a><span class="lineno"> 682</span> switch( ba.eventCode )</div>
|
|
<div class="line"><a id="l00683" name="l00683"></a><span class="lineno"> 683</span> case 2: // mouse up</div>
|
|
<div class="line"><a id="l00684" name="l00684"></a><span class="lineno"> 684</span> string imgname = StringFromList(0, ImageNameList(ba.win, ";"))</div>
|
|
<div class="line"><a id="l00685" name="l00685"></a><span class="lineno"> 685</span> wave /z image = ImageNameToWaveRef(ba.win, imgname)</div>
|
|
<div class="line"><a id="l00686" name="l00686"></a><span class="lineno"> 686</span> if (waveexists(image))</div>
|
|
<div class="line"><a id="l00687" name="l00687"></a><span class="lineno"> 687</span> Cursor /i/p A $imgname 0,0</div>
|
|
<div class="line"><a id="l00688" name="l00688"></a><span class="lineno"> 688</span> Cursor /i/p B $imgname DimSize(image, 0)-1, DimSize(image, 1)-1</div>
|
|
<div class="line"><a id="l00689" name="l00689"></a><span class="lineno"> 689</span> endif</div>
|
|
<div class="line"><a id="l00690" name="l00690"></a><span class="lineno"> 690</span> break</div>
|
|
<div class="line"><a id="l00691" name="l00691"></a><span class="lineno"> 691</span> case -1: // control being killed</div>
|
|
<div class="line"><a id="l00692" name="l00692"></a><span class="lineno"> 692</span> break</div>
|
|
<div class="line"><a id="l00693" name="l00693"></a><span class="lineno"> 693</span> endswitch</div>
|
|
<div class="line"><a id="l00694" name="l00694"></a><span class="lineno"> 694</span> </div>
|
|
<div class="line"><a id="l00695" name="l00695"></a><span class="lineno"> 695</span> return 0</div>
|
|
<div class="line"><a id="l00696" name="l00696"></a><span class="lineno"> 696</span>End</div>
|
|
</div>
|
|
<div class="line"><a id="l00697" name="l00697"></a><span class="lineno"> 697</span> </div>
|
|
<div class="foldopen" id="foldopen00698" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00698" name="l00698"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#ab10a0d94991b9cd958557dbc48d70624"> 698</a></span>static function svp_smoothing(sva) : SetVariableControl</div>
|
|
<div class="line"><a id="l00699" name="l00699"></a><span class="lineno"> 699</span> STRUCT WMSetVariableAction &sva</div>
|
|
<div class="line"><a id="l00700" name="l00700"></a><span class="lineno"> 700</span> </div>
|
|
<div class="line"><a id="l00701" name="l00701"></a><span class="lineno"> 701</span> string imglist</div>
|
|
<div class="line"><a id="l00702" name="l00702"></a><span class="lineno"> 702</span> </div>
|
|
<div class="line"><a id="l00703" name="l00703"></a><span class="lineno"> 703</span> switch( sva.eventCode )</div>
|
|
<div class="line"><a id="l00704" name="l00704"></a><span class="lineno"> 704</span> case 1: // mouse up</div>
|
|
<div class="line"><a id="l00705" name="l00705"></a><span class="lineno"> 705</span> case 2: // Enter key</div>
|
|
<div class="line"><a id="l00706" name="l00706"></a><span class="lineno"> 706</span> case 3: // Live update</div>
|
|
<div class="line"><a id="l00707" name="l00707"></a><span class="lineno"> 707</span> imglist = ImageNameList(sva.win, ";")</div>
|
|
<div class="line"><a id="l00708" name="l00708"></a><span class="lineno"> 708</span> wave /z img = ImageNameToWaveRef(sva.win, StringFromList(0, imglist))</div>
|
|
<div class="line"><a id="l00709" name="l00709"></a><span class="lineno"> 709</span> if (WaveExists(img))</div>
|
|
<div class="line"><a id="l00710" name="l00710"></a><span class="lineno"> 710</span> wave source = get_source_image(img)</div>
|
|
<div class="line"><a id="l00711" name="l00711"></a><span class="lineno"> 711</span> if (WaveExists(source))</div>
|
|
<div class="line"><a id="l00712" name="l00712"></a><span class="lineno"> 712</span> ad_update_profiles(source)</div>
|
|
<div class="line"><a id="l00713" name="l00713"></a><span class="lineno"> 713</span> endif</div>
|
|
<div class="line"><a id="l00714" name="l00714"></a><span class="lineno"> 714</span> endif</div>
|
|
<div class="line"><a id="l00715" name="l00715"></a><span class="lineno"> 715</span> break</div>
|
|
<div class="line"><a id="l00716" name="l00716"></a><span class="lineno"> 716</span> case -1: // control being killed</div>
|
|
<div class="line"><a id="l00717" name="l00717"></a><span class="lineno"> 717</span> break</div>
|
|
<div class="line"><a id="l00718" name="l00718"></a><span class="lineno"> 718</span> endswitch</div>
|
|
<div class="line"><a id="l00719" name="l00719"></a><span class="lineno"> 719</span> </div>
|
|
<div class="line"><a id="l00720" name="l00720"></a><span class="lineno"> 720</span> return 0</div>
|
|
<div class="line"><a id="l00721" name="l00721"></a><span class="lineno"> 721</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00722" name="l00722"></a><span class="lineno"> 722</span> </div>
|
|
<div class="foldopen" id="foldopen00723" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00723" name="l00723"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#ac5c7a25e9a8c0b001a429bae23639da9"> 723</a></span>static function pmp_export(pa) : PopupMenuControl</div>
|
|
<div class="line"><a id="l00724" name="l00724"></a><span class="lineno"> 724</span> STRUCT WMPopupAction &pa</div>
|
|
<div class="line"><a id="l00725" name="l00725"></a><span class="lineno"> 725</span> </div>
|
|
<div class="line"><a id="l00726" name="l00726"></a><span class="lineno"> 726</span> switch( pa.eventCode )</div>
|
|
<div class="line"><a id="l00727" name="l00727"></a><span class="lineno"> 727</span> case 2: // mouse up</div>
|
|
<div class="line"><a id="l00728" name="l00728"></a><span class="lineno"> 728</span> variable popNum = pa.popNum</div>
|
|
<div class="line"><a id="l00729" name="l00729"></a><span class="lineno"> 729</span> </div>
|
|
<div class="line"><a id="l00730" name="l00730"></a><span class="lineno"> 730</span> string imgname = StringFromList(0, ImageNameList(pa.win, ";"))</div>
|
|
<div class="line"><a id="l00731" name="l00731"></a><span class="lineno"> 731</span> wave /z image = ImageNameToWaveRef(pa.win, imgname)</div>
|
|
<div class="line"><a id="l00732" name="l00732"></a><span class="lineno"> 732</span> if (waveexists(image) && (popNum >= 1) && (popNum <= 2))</div>
|
|
<div class="line"><a id="l00733" name="l00733"></a><span class="lineno"> 733</span> ad_export_profile(image, popNum - 1, show=1)</div>
|
|
<div class="line"><a id="l00734" name="l00734"></a><span class="lineno"> 734</span> elseif (waveexists(image) && (popNum >= 3) && (popNum <= 4))</div>
|
|
<div class="line"><a id="l00735" name="l00735"></a><span class="lineno"> 735</span> ad_export_profile(image, popNum - 3, show=2)</div>
|
|
<div class="line"><a id="l00736" name="l00736"></a><span class="lineno"> 736</span> endif</div>
|
|
<div class="line"><a id="l00737" name="l00737"></a><span class="lineno"> 737</span> </div>
|
|
<div class="line"><a id="l00738" name="l00738"></a><span class="lineno"> 738</span> break</div>
|
|
<div class="line"><a id="l00739" name="l00739"></a><span class="lineno"> 739</span> case -1: // control being killed</div>
|
|
<div class="line"><a id="l00740" name="l00740"></a><span class="lineno"> 740</span> break</div>
|
|
<div class="line"><a id="l00741" name="l00741"></a><span class="lineno"> 741</span> endswitch</div>
|
|
<div class="line"><a id="l00742" name="l00742"></a><span class="lineno"> 742</span> </div>
|
|
<div class="line"><a id="l00743" name="l00743"></a><span class="lineno"> 743</span> return 0</div>
|
|
<div class="line"><a id="l00744" name="l00744"></a><span class="lineno"> 744</span>End</div>
|
|
</div>
|
|
<div class="line"><a id="l00745" name="l00745"></a><span class="lineno"> 745</span> </div>
|
|
<div class="foldopen" id="foldopen00747" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00747" name="l00747"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a89a5e3e29a0cd09951dcdf13aa28d941"> 747</a></span>function ad_profiles_hook(s)</div>
|
|
<div class="line"><a id="l00748" name="l00748"></a><span class="lineno"> 748</span> struct WMWinHookStruct &s</div>
|
|
<div class="line"><a id="l00749" name="l00749"></a><span class="lineno"> 749</span> variable hookresult = 0</div>
|
|
<div class="line"><a id="l00750" name="l00750"></a><span class="lineno"> 750</span> string imglist</div>
|
|
<div class="line"><a id="l00751" name="l00751"></a><span class="lineno"> 751</span> string cmd</div>
|
|
<div class="line"><a id="l00752" name="l00752"></a><span class="lineno"> 752</span> dfref viewdf</div>
|
|
<div class="line"><a id="l00753" name="l00753"></a><span class="lineno"> 753</span> </div>
|
|
<div class="line"><a id="l00754" name="l00754"></a><span class="lineno"> 754</span> switch(s.eventCode)</div>
|
|
<div class="line"><a id="l00755" name="l00755"></a><span class="lineno"> 755</span> case 2: // delete data folder after window is killed</div>
|
|
<div class="line"><a id="l00756" name="l00756"></a><span class="lineno"> 756</span> imglist = ImageNameList(s.winName, ";")</div>
|
|
<div class="line"><a id="l00757" name="l00757"></a><span class="lineno"> 757</span> wave /z img = ImageNameToWaveRef(s.winName, StringFromList(0, imglist))</div>
|
|
<div class="line"><a id="l00758" name="l00758"></a><span class="lineno"> 758</span> if (WaveExists(img))</div>
|
|
<div class="line"><a id="l00759" name="l00759"></a><span class="lineno"> 759</span> viewdf = GetWavesDataFolderDFR(img)</div>
|
|
<div class="line"><a id="l00760" name="l00760"></a><span class="lineno"> 760</span> cmd = "killdatafolder /z " + GetDataFolder(1, viewdf)</div>
|
|
<div class="line"><a id="l00761" name="l00761"></a><span class="lineno"> 761</span> Execute /P/Q/Z cmd</div>
|
|
<div class="line"><a id="l00762" name="l00762"></a><span class="lineno"> 762</span> endif</div>
|
|
<div class="line"><a id="l00763" name="l00763"></a><span class="lineno"> 763</span> break</div>
|
|
<div class="line"><a id="l00764" name="l00764"></a><span class="lineno"> 764</span> case 7: // update profiles when cursor is moved</div>
|
|
<div class="line"><a id="l00765" name="l00765"></a><span class="lineno"> 765</span> imglist = ImageNameList(s.winName, ";")</div>
|
|
<div class="line"><a id="l00766" name="l00766"></a><span class="lineno"> 766</span> wave /z img = ImageNameToWaveRef(s.winName, StringFromList(0, imglist))</div>
|
|
<div class="line"><a id="l00767" name="l00767"></a><span class="lineno"> 767</span> if (WaveExists(img))</div>
|
|
<div class="line"><a id="l00768" name="l00768"></a><span class="lineno"> 768</span> ad_calc_cursor_profiles(img)</div>
|
|
<div class="line"><a id="l00769" name="l00769"></a><span class="lineno"> 769</span> hookresult = 1</div>
|
|
<div class="line"><a id="l00770" name="l00770"></a><span class="lineno"> 770</span> else</div>
|
|
<div class="line"><a id="l00771" name="l00771"></a><span class="lineno"> 771</span> hookresult = 0</div>
|
|
<div class="line"><a id="l00772" name="l00772"></a><span class="lineno"> 772</span> endif</div>
|
|
<div class="line"><a id="l00773" name="l00773"></a><span class="lineno"> 773</span> break</div>
|
|
<div class="line"><a id="l00774" name="l00774"></a><span class="lineno"> 774</span> endswitch</div>
|
|
<div class="line"><a id="l00775" name="l00775"></a><span class="lineno"> 775</span> </div>
|
|
<div class="line"><a id="l00776" name="l00776"></a><span class="lineno"> 776</span> return hookresult</div>
|
|
<div class="line"><a id="l00777" name="l00777"></a><span class="lineno"> 777</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00778" name="l00778"></a><span class="lineno"> 778</span> </div>
|
|
<div class="foldopen" id="foldopen00787" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00787" name="l00787"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a72b57037abd27f65986034c0b4cc191e"> 787</a></span>function ad_calc_cursor_profiles(image)</div>
|
|
<div class="line"><a id="l00788" name="l00788"></a><span class="lineno"> 788</span> wave image</div>
|
|
<div class="line"><a id="l00789" name="l00789"></a><span class="lineno"> 789</span> </div>
|
|
<div class="line"><a id="l00790" name="l00790"></a><span class="lineno"> 790</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00791" name="l00791"></a><span class="lineno"> 791</span> dfref imagedf = GetWavesDataFolderDFR(image)</div>
|
|
<div class="line"><a id="l00792" name="l00792"></a><span class="lineno"> 792</span> setdatafolder imagedf</div>
|
|
<div class="line"><a id="l00793" name="l00793"></a><span class="lineno"> 793</span> </div>
|
|
<div class="line"><a id="l00794" name="l00794"></a><span class="lineno"> 794</span> svar graphname = prof_graphname</div>
|
|
<div class="line"><a id="l00795" name="l00795"></a><span class="lineno"> 795</span> </div>
|
|
<div class="line"><a id="l00796" name="l00796"></a><span class="lineno"> 796</span> variable pa, qa // point coordinates cursor A</div>
|
|
<div class="line"><a id="l00797" name="l00797"></a><span class="lineno"> 797</span> if (strlen(CsrInfo(A, graphname)) > 0)</div>
|
|
<div class="line"><a id="l00798" name="l00798"></a><span class="lineno"> 798</span> pa = pcsr(A, graphname)</div>
|
|
<div class="line"><a id="l00799" name="l00799"></a><span class="lineno"> 799</span> qa = qcsr(A, graphname)</div>
|
|
<div class="line"><a id="l00800" name="l00800"></a><span class="lineno"> 800</span> else</div>
|
|
<div class="line"><a id="l00801" name="l00801"></a><span class="lineno"> 801</span> pa = 0</div>
|
|
<div class="line"><a id="l00802" name="l00802"></a><span class="lineno"> 802</span> qa = 0</div>
|
|
<div class="line"><a id="l00803" name="l00803"></a><span class="lineno"> 803</span> endif</div>
|
|
<div class="line"><a id="l00804" name="l00804"></a><span class="lineno"> 804</span> </div>
|
|
<div class="line"><a id="l00805" name="l00805"></a><span class="lineno"> 805</span> variable pb, qb // point coordinates cursor B</div>
|
|
<div class="line"><a id="l00806" name="l00806"></a><span class="lineno"> 806</span> if (strlen(CsrInfo(B, graphname)) > 0)</div>
|
|
<div class="line"><a id="l00807" name="l00807"></a><span class="lineno"> 807</span> pb = pcsr(B, graphname)</div>
|
|
<div class="line"><a id="l00808" name="l00808"></a><span class="lineno"> 808</span> qb = qcsr(B, graphname)</div>
|
|
<div class="line"><a id="l00809" name="l00809"></a><span class="lineno"> 809</span> else</div>
|
|
<div class="line"><a id="l00810" name="l00810"></a><span class="lineno"> 810</span> pb = DimSize(image, 0) - 1</div>
|
|
<div class="line"><a id="l00811" name="l00811"></a><span class="lineno"> 811</span> qb = DimSize(image, 1) - 1</div>
|
|
<div class="line"><a id="l00812" name="l00812"></a><span class="lineno"> 812</span> endif</div>
|
|
<div class="line"><a id="l00813" name="l00813"></a><span class="lineno"> 813</span> </div>
|
|
<div class="line"><a id="l00814" name="l00814"></a><span class="lineno"> 814</span> ad_calc_profiles(image, pa, qa, pb, qb) </div>
|
|
<div class="line"><a id="l00815" name="l00815"></a><span class="lineno"> 815</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l00816" name="l00816"></a><span class="lineno"> 816</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00817" name="l00817"></a><span class="lineno"> 817</span> </div>
|
|
<div class="foldopen" id="foldopen00834" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00834" name="l00834"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a48044f9ee518d47770e33ee9f381f204"> 834</a></span>function ad_calc_profiles(image, pa, qa, pb, qb)</div>
|
|
<div class="line"><a id="l00835" name="l00835"></a><span class="lineno"> 835</span> wave image</div>
|
|
<div class="line"><a id="l00836" name="l00836"></a><span class="lineno"> 836</span> variable pa, qa</div>
|
|
<div class="line"><a id="l00837" name="l00837"></a><span class="lineno"> 837</span> variable pb, qb</div>
|
|
<div class="line"><a id="l00838" name="l00838"></a><span class="lineno"> 838</span> </div>
|
|
<div class="line"><a id="l00839" name="l00839"></a><span class="lineno"> 839</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00840" name="l00840"></a><span class="lineno"> 840</span> dfref imagedf = GetWavesDataFolderDFR(image)</div>
|
|
<div class="line"><a id="l00841" name="l00841"></a><span class="lineno"> 841</span> setdatafolder imagedf</div>
|
|
<div class="line"><a id="l00842" name="l00842"></a><span class="lineno"> 842</span> </div>
|
|
<div class="line"><a id="l00843" name="l00843"></a><span class="lineno"> 843</span> wave xprofiles</div>
|
|
<div class="line"><a id="l00844" name="l00844"></a><span class="lineno"> 844</span> wave yprofiles</div>
|
|
<div class="line"><a id="l00845" name="l00845"></a><span class="lineno"> 845</span> nvar graph_avg</div>
|
|
<div class="line"><a id="l00846" name="l00846"></a><span class="lineno"> 846</span> nvar graph_min</div>
|
|
<div class="line"><a id="l00847" name="l00847"></a><span class="lineno"> 847</span> nvar graph_max</div>
|
|
<div class="line"><a id="l00848" name="l00848"></a><span class="lineno"> 848</span> nvar graph_sum</div>
|
|
<div class="line"><a id="l00849" name="l00849"></a><span class="lineno"> 849</span> nvar graph_sdev</div>
|
|
<div class="line"><a id="l00850" name="l00850"></a><span class="lineno"> 850</span> </div>
|
|
<div class="line"><a id="l00851" name="l00851"></a><span class="lineno"> 851</span> // horizontal profiles at crosshairs</div>
|
|
<div class="line"><a id="l00852" name="l00852"></a><span class="lineno"> 852</span> redimension /n=(dimsize(image,0), 3) xprofiles</div>
|
|
<div class="line"><a id="l00853" name="l00853"></a><span class="lineno"> 853</span> setscale /p x dimoffset(image,0), dimdelta(image,0), WaveUnits(image,0), xprofiles</div>
|
|
<div class="line"><a id="l00854" name="l00854"></a><span class="lineno"> 854</span> setscale d 0, 0, waveunits(image,-1), xprofiles</div>
|
|
<div class="line"><a id="l00855" name="l00855"></a><span class="lineno"> 855</span> xprofiles[][0] = image[p][qa]</div>
|
|
<div class="line"><a id="l00856" name="l00856"></a><span class="lineno"> 856</span> xprofiles[][1] = image[p][qb]</div>
|
|
<div class="line"><a id="l00857" name="l00857"></a><span class="lineno"> 857</span> </div>
|
|
<div class="line"><a id="l00858" name="l00858"></a><span class="lineno"> 858</span> note /k xprofiles</div>
|
|
<div class="line"><a id="l00859" name="l00859"></a><span class="lineno"> 859</span> note xprofiles, "SourceWave=" + nameofwave(image)</div>
|
|
<div class="line"><a id="l00860" name="l00860"></a><span class="lineno"> 860</span> note xprofiles, "SourceDimension=0"</div>
|
|
<div class="line"><a id="l00861" name="l00861"></a><span class="lineno"> 861</span> note xprofiles, "SourceIndex0=" + num2str(qa)</div>
|
|
<div class="line"><a id="l00862" name="l00862"></a><span class="lineno"> 862</span> note xprofiles, "SourceIndex1=" + num2str(qb)</div>
|
|
<div class="line"><a id="l00863" name="l00863"></a><span class="lineno"> 863</span> </div>
|
|
<div class="line"><a id="l00864" name="l00864"></a><span class="lineno"> 864</span> // average horizontal profile between crosshairs</div>
|
|
<div class="line"><a id="l00865" name="l00865"></a><span class="lineno"> 865</span> variable qq, q0, q1</div>
|
|
<div class="line"><a id="l00866" name="l00866"></a><span class="lineno"> 866</span> q0 = min(qa, qb)</div>
|
|
<div class="line"><a id="l00867" name="l00867"></a><span class="lineno"> 867</span> q1 = max(qa, qb)</div>
|
|
<div class="line"><a id="l00868" name="l00868"></a><span class="lineno"> 868</span> xprofiles[][2] = 0</div>
|
|
<div class="line"><a id="l00869" name="l00869"></a><span class="lineno"> 869</span> for (qq = q0; qq <= q1; qq += 1)</div>
|
|
<div class="line"><a id="l00870" name="l00870"></a><span class="lineno"> 870</span> xprofiles[][2] += image[p][qq]</div>
|
|
<div class="line"><a id="l00871" name="l00871"></a><span class="lineno"> 871</span> endfor</div>
|
|
<div class="line"><a id="l00872" name="l00872"></a><span class="lineno"> 872</span> xprofiles[][2] /= q1 - q0 + 1</div>
|
|
<div class="line"><a id="l00873" name="l00873"></a><span class="lineno"> 873</span> </div>
|
|
<div class="line"><a id="l00874" name="l00874"></a><span class="lineno"> 874</span> // vertical profiles at crosshairs</div>
|
|
<div class="line"><a id="l00875" name="l00875"></a><span class="lineno"> 875</span> redimension /n=(dimsize(image,1), 3) yprofiles</div>
|
|
<div class="line"><a id="l00876" name="l00876"></a><span class="lineno"> 876</span> setscale /p x dimoffset(image,1), dimdelta(image,1), WaveUnits(image,1), yprofiles</div>
|
|
<div class="line"><a id="l00877" name="l00877"></a><span class="lineno"> 877</span> setscale d 0, 0, waveunits(image,-1), yprofiles</div>
|
|
<div class="line"><a id="l00878" name="l00878"></a><span class="lineno"> 878</span> yprofiles[][0] = image[pa][p]</div>
|
|
<div class="line"><a id="l00879" name="l00879"></a><span class="lineno"> 879</span> yprofiles[][1] = image[pb][p]</div>
|
|
<div class="line"><a id="l00880" name="l00880"></a><span class="lineno"> 880</span> </div>
|
|
<div class="line"><a id="l00881" name="l00881"></a><span class="lineno"> 881</span> note /k yprofiles</div>
|
|
<div class="line"><a id="l00882" name="l00882"></a><span class="lineno"> 882</span> note yprofiles, "SourceWave=" + nameofwave(image)</div>
|
|
<div class="line"><a id="l00883" name="l00883"></a><span class="lineno"> 883</span> note yprofiles, "SourceDimension=1"</div>
|
|
<div class="line"><a id="l00884" name="l00884"></a><span class="lineno"> 884</span> note yprofiles, "SourceIndex0=" + num2str(pa)</div>
|
|
<div class="line"><a id="l00885" name="l00885"></a><span class="lineno"> 885</span> note yprofiles, "SourceIndex1=" + num2str(pb)</div>
|
|
<div class="line"><a id="l00886" name="l00886"></a><span class="lineno"> 886</span> </div>
|
|
<div class="line"><a id="l00887" name="l00887"></a><span class="lineno"> 887</span> // average vertical profile between crosshairs</div>
|
|
<div class="line"><a id="l00888" name="l00888"></a><span class="lineno"> 888</span> variable pp, p0, p1</div>
|
|
<div class="line"><a id="l00889" name="l00889"></a><span class="lineno"> 889</span> p0 = min(pa, pb)</div>
|
|
<div class="line"><a id="l00890" name="l00890"></a><span class="lineno"> 890</span> p1 = max(pa, pb)</div>
|
|
<div class="line"><a id="l00891" name="l00891"></a><span class="lineno"> 891</span> yprofiles[][2] = 0</div>
|
|
<div class="line"><a id="l00892" name="l00892"></a><span class="lineno"> 892</span> for (pp = p0; pp <= p1; pp += 1)</div>
|
|
<div class="line"><a id="l00893" name="l00893"></a><span class="lineno"> 893</span> yprofiles[][2] += image[pp][p]</div>
|
|
<div class="line"><a id="l00894" name="l00894"></a><span class="lineno"> 894</span> endfor</div>
|
|
<div class="line"><a id="l00895" name="l00895"></a><span class="lineno"> 895</span> yprofiles[][2] /= p1 - p0 + 1</div>
|
|
<div class="line"><a id="l00896" name="l00896"></a><span class="lineno"> 896</span> </div>
|
|
<div class="line"><a id="l00897" name="l00897"></a><span class="lineno"> 897</span> // statistics between crosshairs</div>
|
|
<div class="line"><a id="l00898" name="l00898"></a><span class="lineno"> 898</span> Duplicate /r=[p0,p1][q0,q1]/o image, roi_image</div>
|
|
<div class="line"><a id="l00899" name="l00899"></a><span class="lineno"> 899</span> WaveStats /Q roi_image</div>
|
|
<div class="line"><a id="l00900" name="l00900"></a><span class="lineno"> 900</span> graph_avg = v_avg</div>
|
|
<div class="line"><a id="l00901" name="l00901"></a><span class="lineno"> 901</span> graph_min = v_min</div>
|
|
<div class="line"><a id="l00902" name="l00902"></a><span class="lineno"> 902</span> graph_max = v_max</div>
|
|
<div class="line"><a id="l00903" name="l00903"></a><span class="lineno"> 903</span> graph_sum = v_avg * v_npnts</div>
|
|
<div class="line"><a id="l00904" name="l00904"></a><span class="lineno"> 904</span> graph_sdev = v_sdev</div>
|
|
<div class="line"><a id="l00905" name="l00905"></a><span class="lineno"> 905</span> </div>
|
|
<div class="line"><a id="l00906" name="l00906"></a><span class="lineno"> 906</span> // histogram</div>
|
|
<div class="line"><a id="l00907" name="l00907"></a><span class="lineno"> 907</span> wave /z hist</div>
|
|
<div class="line"><a id="l00908" name="l00908"></a><span class="lineno"> 908</span> if (waveexists(hist))</div>
|
|
<div class="line"><a id="l00909" name="l00909"></a><span class="lineno"> 909</span> Histogram /B=3 roi_image, hist</div>
|
|
<div class="line"><a id="l00910" name="l00910"></a><span class="lineno"> 910</span> endif</div>
|
|
<div class="line"><a id="l00911" name="l00911"></a><span class="lineno"> 911</span> </div>
|
|
<div class="line"><a id="l00912" name="l00912"></a><span class="lineno"> 912</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l00913" name="l00913"></a><span class="lineno"> 913</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00914" name="l00914"></a><span class="lineno"> 914</span> </div>
|
|
<div class="foldopen" id="foldopen00936" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00936" name="l00936"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#ad3e190d1ec1b82ebef00c9f9ac44b50a"> 936</a></span>function ad_export_profile(view_image, dim, [trace, show, overwrite])</div>
|
|
<div class="line"><a id="l00937" name="l00937"></a><span class="lineno"> 937</span> wave view_image</div>
|
|
<div class="line"><a id="l00938" name="l00938"></a><span class="lineno"> 938</span> variable dim</div>
|
|
<div class="line"><a id="l00939" name="l00939"></a><span class="lineno"> 939</span> variable trace</div>
|
|
<div class="line"><a id="l00940" name="l00940"></a><span class="lineno"> 940</span> variable show</div>
|
|
<div class="line"><a id="l00941" name="l00941"></a><span class="lineno"> 941</span> variable overwrite</div>
|
|
<div class="line"><a id="l00942" name="l00942"></a><span class="lineno"> 942</span> </div>
|
|
<div class="line"><a id="l00943" name="l00943"></a><span class="lineno"> 943</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00944" name="l00944"></a><span class="lineno"> 944</span> </div>
|
|
<div class="line"><a id="l00945" name="l00945"></a><span class="lineno"> 945</span> if (ParamIsDefault(trace))</div>
|
|
<div class="line"><a id="l00946" name="l00946"></a><span class="lineno"> 946</span> trace = 2</div>
|
|
<div class="line"><a id="l00947" name="l00947"></a><span class="lineno"> 947</span> endif</div>
|
|
<div class="line"><a id="l00948" name="l00948"></a><span class="lineno"> 948</span> if (ParamIsDefault(show))</div>
|
|
<div class="line"><a id="l00949" name="l00949"></a><span class="lineno"> 949</span> show = 0</div>
|
|
<div class="line"><a id="l00950" name="l00950"></a><span class="lineno"> 950</span> endif</div>
|
|
<div class="line"><a id="l00951" name="l00951"></a><span class="lineno"> 951</span> if (ParamIsDefault(overwrite))</div>
|
|
<div class="line"><a id="l00952" name="l00952"></a><span class="lineno"> 952</span> overwrite = 0</div>
|
|
<div class="line"><a id="l00953" name="l00953"></a><span class="lineno"> 953</span> endif</div>
|
|
<div class="line"><a id="l00954" name="l00954"></a><span class="lineno"> 954</span> </div>
|
|
<div class="line"><a id="l00955" name="l00955"></a><span class="lineno"> 955</span> // view folder</div>
|
|
<div class="line"><a id="l00956" name="l00956"></a><span class="lineno"> 956</span> dfref imagedf = GetWavesDataFolderDFR(view_image)</div>
|
|
<div class="line"><a id="l00957" name="l00957"></a><span class="lineno"> 957</span> string dim_label</div>
|
|
<div class="line"><a id="l00958" name="l00958"></a><span class="lineno"> 958</span> switch(dim)</div>
|
|
<div class="line"><a id="l00959" name="l00959"></a><span class="lineno"> 959</span> case 0:</div>
|
|
<div class="line"><a id="l00960" name="l00960"></a><span class="lineno"> 960</span> wave /sdfr=imagedf profiles=xprofiles</div>
|
|
<div class="line"><a id="l00961" name="l00961"></a><span class="lineno"> 961</span> dim_label = "x"</div>
|
|
<div class="line"><a id="l00962" name="l00962"></a><span class="lineno"> 962</span> break</div>
|
|
<div class="line"><a id="l00963" name="l00963"></a><span class="lineno"> 963</span> case 1:</div>
|
|
<div class="line"><a id="l00964" name="l00964"></a><span class="lineno"> 964</span> wave /sdfr=imagedf profiles=yprofiles</div>
|
|
<div class="line"><a id="l00965" name="l00965"></a><span class="lineno"> 965</span> dim_label = "y"</div>
|
|
<div class="line"><a id="l00966" name="l00966"></a><span class="lineno"> 966</span> break</div>
|
|
<div class="line"><a id="l00967" name="l00967"></a><span class="lineno"> 967</span> default:</div>
|
|
<div class="line"><a id="l00968" name="l00968"></a><span class="lineno"> 968</span> return -1 // invalid argument</div>
|
|
<div class="line"><a id="l00969" name="l00969"></a><span class="lineno"> 969</span> endswitch</div>
|
|
<div class="line"><a id="l00970" name="l00970"></a><span class="lineno"> 970</span> string graphname_string = "export_graph_" + dim_label</div>
|
|
<div class="line"><a id="l00971" name="l00971"></a><span class="lineno"> 971</span> svar /z /sdfr=imagedf linked_graphname = $graphname_string</div>
|
|
<div class="line"><a id="l00972" name="l00972"></a><span class="lineno"> 972</span> </div>
|
|
<div class="line"><a id="l00973" name="l00973"></a><span class="lineno"> 973</span> // source folder</div>
|
|
<div class="line"><a id="l00974" name="l00974"></a><span class="lineno"> 974</span> wave /z source_image = get_source_image(view_image)</div>
|
|
<div class="line"><a id="l00975" name="l00975"></a><span class="lineno"> 975</span> if (WaveExists(source_image))</div>
|
|
<div class="line"><a id="l00976" name="l00976"></a><span class="lineno"> 976</span> dfref sourcedf = GetWavesDataFolderDFR(source_image)</div>
|
|
<div class="line"><a id="l00977" name="l00977"></a><span class="lineno"> 977</span> setdatafolder sourcedf</div>
|
|
<div class="line"><a id="l00978" name="l00978"></a><span class="lineno"> 978</span> else</div>
|
|
<div class="line"><a id="l00979" name="l00979"></a><span class="lineno"> 979</span> return -2 // invalid source data folder</div>
|
|
<div class="line"><a id="l00980" name="l00980"></a><span class="lineno"> 980</span> endif</div>
|
|
<div class="line"><a id="l00981" name="l00981"></a><span class="lineno"> 981</span> </div>
|
|
<div class="line"><a id="l00982" name="l00982"></a><span class="lineno"> 982</span> // format dest wave name</div>
|
|
<div class="line"><a id="l00983" name="l00983"></a><span class="lineno"> 983</span> string profile_note = note(profiles)</div>
|
|
<div class="line"><a id="l00984" name="l00984"></a><span class="lineno"> 984</span> string name_base</div>
|
|
<div class="line"><a id="l00985" name="l00985"></a><span class="lineno"> 985</span> string name_dim</div>
|
|
<div class="line"><a id="l00986" name="l00986"></a><span class="lineno"> 986</span> string name_index</div>
|
|
<div class="line"><a id="l00987" name="l00987"></a><span class="lineno"> 987</span> string profile_name</div>
|
|
<div class="line"><a id="l00988" name="l00988"></a><span class="lineno"> 988</span> variable index_width = ceil(log(DimSize(view_image, 1 - dim)))</div>
|
|
<div class="line"><a id="l00989" name="l00989"></a><span class="lineno"> 989</span> variable index0 = NumberByKey("SourceIndex0", profile_note, "=", "\r")</div>
|
|
<div class="line"><a id="l00990" name="l00990"></a><span class="lineno"> 990</span> variable index1 = NumberByKey("SourceIndex1", profile_note, "=", "\r")</div>
|
|
<div class="line"><a id="l00991" name="l00991"></a><span class="lineno"> 991</span> name_dim = "_" + dim_label</div>
|
|
<div class="line"><a id="l00992" name="l00992"></a><span class="lineno"> 992</span> sprintf name_index, "%0*u_%0*u", index_width, index0, index_width, index1</div>
|
|
<div class="line"><a id="l00993" name="l00993"></a><span class="lineno"> 993</span> name_base = NameOfWave(source_image)</div>
|
|
<div class="line"><a id="l00994" name="l00994"></a><span class="lineno"> 994</span> name_base = name_base[0, min(strlen(name_base), 31 - strlen(name_index) - strlen(name_dim) - 1)]</div>
|
|
<div class="line"><a id="l00995" name="l00995"></a><span class="lineno"> 995</span> profile_name = name_base + name_dim + name_index</div>
|
|
<div class="line"><a id="l00996" name="l00996"></a><span class="lineno"> 996</span> if ((overwrite == 0) && (CheckName(profile_name, 1)))</div>
|
|
<div class="line"><a id="l00997" name="l00997"></a><span class="lineno"> 997</span> profile_name = UniqueName(profile_name + "_", 1, 0)</div>
|
|
<div class="line"><a id="l00998" name="l00998"></a><span class="lineno"> 998</span> endif</div>
|
|
<div class="line"><a id="l00999" name="l00999"></a><span class="lineno"> 999</span> </div>
|
|
<div class="line"><a id="l01000" name="l01000"></a><span class="lineno"> 1000</span> // create dest wave</div>
|
|
<div class="line"><a id="l01001" name="l01001"></a><span class="lineno"> 1001</span> duplicate /o /r=[][trace] profiles, $profile_name /wave=dest_profile</div>
|
|
<div class="line"><a id="l01002" name="l01002"></a><span class="lineno"> 1002</span> redimension /n=(dimsize(profiles, 0)) dest_profile</div>
|
|
<div class="line"><a id="l01003" name="l01003"></a><span class="lineno"> 1003</span> profile_note = ReplaceStringByKey("SourceWave", profile_note, NameOfWave(source_image), "=", "\r")</div>
|
|
<div class="line"><a id="l01004" name="l01004"></a><span class="lineno"> 1004</span> note /k dest_profile</div>
|
|
<div class="line"><a id="l01005" name="l01005"></a><span class="lineno"> 1005</span> note dest_profile, profile_note</div>
|
|
<div class="line"><a id="l01006" name="l01006"></a><span class="lineno"> 1006</span> print "created", GetWavesDataFolder(dest_profile, 2)</div>
|
|
<div class="line"><a id="l01007" name="l01007"></a><span class="lineno"> 1007</span> </div>
|
|
<div class="line"><a id="l01008" name="l01008"></a><span class="lineno"> 1008</span> if (show)</div>
|
|
<div class="line"><a id="l01009" name="l01009"></a><span class="lineno"> 1009</span> string graphname</div>
|
|
<div class="line"><a id="l01010" name="l01010"></a><span class="lineno"> 1010</span> string graphtitle</div>
|
|
<div class="line"><a id="l01011" name="l01011"></a><span class="lineno"> 1011</span> if (show == 2)</div>
|
|
<div class="line"><a id="l01012" name="l01012"></a><span class="lineno"> 1012</span> // common graph for all profiles of a dimension</div>
|
|
<div class="line"><a id="l01013" name="l01013"></a><span class="lineno"> 1013</span> graphname = "export_profiles_" + dim_label</div>
|
|
<div class="line"><a id="l01014" name="l01014"></a><span class="lineno"> 1014</span> graphtitle = UpperStr(dim_label) + " Profiles"</div>
|
|
<div class="line"><a id="l01015" name="l01015"></a><span class="lineno"> 1015</span> else</div>
|
|
<div class="line"><a id="l01016" name="l01016"></a><span class="lineno"> 1016</span> // one graph per source image</div>
|
|
<div class="line"><a id="l01017" name="l01017"></a><span class="lineno"> 1017</span> if (svar_exists(linked_graphname) && (ItemsInList(WinList(linked_graphname, ";", "WIN:1"), ";") >= 1))</div>
|
|
<div class="line"><a id="l01018" name="l01018"></a><span class="lineno"> 1018</span> graphname = linked_graphname</div>
|
|
<div class="line"><a id="l01019" name="l01019"></a><span class="lineno"> 1019</span> else</div>
|
|
<div class="line"><a id="l01020" name="l01020"></a><span class="lineno"> 1020</span> graphname = GetWavesDataFolder(source_image, 0) + name_dim</div>
|
|
<div class="line"><a id="l01021" name="l01021"></a><span class="lineno"> 1021</span> endif</div>
|
|
<div class="line"><a id="l01022" name="l01022"></a><span class="lineno"> 1022</span> graphtitle = UpperStr(dim_label) + " Profiles: " + GetWavesDataFolder(source_image, 2)</div>
|
|
<div class="line"><a id="l01023" name="l01023"></a><span class="lineno"> 1023</span> endif</div>
|
|
<div class="line"><a id="l01024" name="l01024"></a><span class="lineno"> 1024</span> </div>
|
|
<div class="line"><a id="l01025" name="l01025"></a><span class="lineno"> 1025</span> if ((ItemsInList(WinList(graphname, ";", "WIN:1"), ";") >= 1))</div>
|
|
<div class="line"><a id="l01026" name="l01026"></a><span class="lineno"> 1026</span> appendtograph /w=$graphname dest_profile</div>
|
|
<div class="line"><a id="l01027" name="l01027"></a><span class="lineno"> 1027</span> else</div>
|
|
<div class="line"><a id="l01028" name="l01028"></a><span class="lineno"> 1028</span> setdatafolder imagedf</div>
|
|
<div class="line"><a id="l01029" name="l01029"></a><span class="lineno"> 1029</span> display /k=1 /n=$graphname dest_profile as graphtitle</div>
|
|
<div class="line"><a id="l01030" name="l01030"></a><span class="lineno"> 1030</span> graphname = s_name</div>
|
|
<div class="line"><a id="l01031" name="l01031"></a><span class="lineno"> 1031</span> ModifyGraph /w=$graphname mirror=1,nticks=3,minor=1</div>
|
|
<div class="line"><a id="l01032" name="l01032"></a><span class="lineno"> 1032</span> ModifyGraph /w=$graphname axThick=0.5,btLen=4</div>
|
|
<div class="line"><a id="l01033" name="l01033"></a><span class="lineno"> 1033</span> ModifyGraph /w=$graphname gfSize=10</div>
|
|
<div class="line"><a id="l01034" name="l01034"></a><span class="lineno"> 1034</span> ModifyGraph /w=$graphname grid=2,gridHair=0,gridRGB=(52224,52224,52224)</div>
|
|
<div class="line"><a id="l01035" name="l01035"></a><span class="lineno"> 1035</span> Legend /w=$graphname /C/N=legend0/F=0/B=1/A=LT/X=0.00/Y=0.00</div>
|
|
<div class="line"><a id="l01036" name="l01036"></a><span class="lineno"> 1036</span> </div>
|
|
<div class="line"><a id="l01037" name="l01037"></a><span class="lineno"> 1037</span> if (show != 2)</div>
|
|
<div class="line"><a id="l01038" name="l01038"></a><span class="lineno"> 1038</span> string /g $graphname_string = graphname</div>
|
|
<div class="line"><a id="l01039" name="l01039"></a><span class="lineno"> 1039</span> endif</div>
|
|
<div class="line"><a id="l01040" name="l01040"></a><span class="lineno"> 1040</span> endif</div>
|
|
<div class="line"><a id="l01041" name="l01041"></a><span class="lineno"> 1041</span> endif</div>
|
|
<div class="line"><a id="l01042" name="l01042"></a><span class="lineno"> 1042</span> </div>
|
|
<div class="line"><a id="l01043" name="l01043"></a><span class="lineno"> 1043</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l01044" name="l01044"></a><span class="lineno"> 1044</span> return 0</div>
|
|
<div class="line"><a id="l01045" name="l01045"></a><span class="lineno"> 1045</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l01046" name="l01046"></a><span class="lineno"> 1046</span> </div>
|
|
<div class="foldopen" id="foldopen01047" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01047" name="l01047"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#abafc4f012b04592724109f4757cbe271"> 1047</a></span>static function set_trace_colors(graphname)</div>
|
|
<div class="line"><a id="l01048" name="l01048"></a><span class="lineno"> 1048</span> string graphname</div>
|
|
<div class="line"><a id="l01049" name="l01049"></a><span class="lineno"> 1049</span> </div>
|
|
<div class="line"><a id="l01050" name="l01050"></a><span class="lineno"> 1050</span> ModifyGraph /w=$graphname /z rgb[0]=(0, 0, 0)</div>
|
|
<div class="line"><a id="l01051" name="l01051"></a><span class="lineno"> 1051</span> ModifyGraph /w=$graphname /z rgb[1]=(65535, 16385, 16385)</div>
|
|
<div class="line"><a id="l01052" name="l01052"></a><span class="lineno"> 1052</span> ModifyGraph /w=$graphname /z rgb[2]=(2, 39321, 1)</div>
|
|
<div class="line"><a id="l01053" name="l01053"></a><span class="lineno"> 1053</span> ModifyGraph /w=$graphname /z rgb[3]=(0, 0, 65535)</div>
|
|
<div class="line"><a id="l01054" name="l01054"></a><span class="lineno"> 1054</span> ModifyGraph /w=$graphname /z rgb[4]=(39321, 1, 31457)</div>
|
|
<div class="line"><a id="l01055" name="l01055"></a><span class="lineno"> 1055</span> ModifyGraph /w=$graphname /z rgb[5]=(48059, 48059, 48059)</div>
|
|
<div class="line"><a id="l01056" name="l01056"></a><span class="lineno"> 1056</span> ModifyGraph /w=$graphname /z rgb[6]=(65535, 32768, 32768)</div>
|
|
<div class="line"><a id="l01057" name="l01057"></a><span class="lineno"> 1057</span> ModifyGraph /w=$graphname /z rgb[7]=(0, 65535, 0)</div>
|
|
<div class="line"><a id="l01058" name="l01058"></a><span class="lineno"> 1058</span> ModifyGraph /w=$graphname /z rgb[8]=(16385,65535,65535)</div>
|
|
<div class="line"><a id="l01059" name="l01059"></a><span class="lineno"> 1059</span> ModifyGraph /w=$graphname /z rgb[9]=(65535, 32768, 58981)</div>
|
|
<div class="line"><a id="l01060" name="l01060"></a><span class="lineno"> 1060</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l01061" name="l01061"></a><span class="lineno"> 1061</span> </div>
|
|
<div class="foldopen" id="foldopen01068" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01068" name="l01068"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a48b08ab53729d9d0477deaceedef2769"> 1068</a></span>function ad_calc_histogram(image)</div>
|
|
<div class="line"><a id="l01069" name="l01069"></a><span class="lineno"> 1069</span> wave image</div>
|
|
<div class="line"><a id="l01070" name="l01070"></a><span class="lineno"> 1070</span> </div>
|
|
<div class="line"><a id="l01071" name="l01071"></a><span class="lineno"> 1071</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01072" name="l01072"></a><span class="lineno"> 1072</span> dfref imagedf = GetWavesDataFolderDFR(image)</div>
|
|
<div class="line"><a id="l01073" name="l01073"></a><span class="lineno"> 1073</span> setdatafolder imagedf</div>
|
|
<div class="line"><a id="l01074" name="l01074"></a><span class="lineno"> 1074</span> </div>
|
|
<div class="line"><a id="l01075" name="l01075"></a><span class="lineno"> 1075</span> wave hist</div>
|
|
<div class="line"><a id="l01076" name="l01076"></a><span class="lineno"> 1076</span> Histogram /B=3 image, hist</div>
|
|
<div class="line"><a id="l01077" name="l01077"></a><span class="lineno"> 1077</span> </div>
|
|
<div class="line"><a id="l01078" name="l01078"></a><span class="lineno"> 1078</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l01079" name="l01079"></a><span class="lineno"> 1079</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l01080" name="l01080"></a><span class="lineno"> 1080</span> </div>
|
|
<div class="foldopen" id="foldopen01091" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01091" name="l01091"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a6418a1b2d18b82cb71c0fecbd513a934"> 1091</a></span>function ad_default_image_filter(image, options)</div>
|
|
<div class="line"><a id="l01092" name="l01092"></a><span class="lineno"> 1092</span> wave image</div>
|
|
<div class="line"><a id="l01093" name="l01093"></a><span class="lineno"> 1093</span> string options</div>
|
|
<div class="line"><a id="l01094" name="l01094"></a><span class="lineno"> 1094</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l01095" name="l01095"></a><span class="lineno"> 1095</span> </div>
|
|
<div class="foldopen" id="foldopen01105" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01105" name="l01105"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a27f0957d61f3c2d30a4854911b460c36"> 1105</a></span>function ad_box_filter(image, options)</div>
|
|
<div class="line"><a id="l01106" name="l01106"></a><span class="lineno"> 1106</span> wave image</div>
|
|
<div class="line"><a id="l01107" name="l01107"></a><span class="lineno"> 1107</span> string options</div>
|
|
<div class="line"><a id="l01108" name="l01108"></a><span class="lineno"> 1108</span> </div>
|
|
<div class="line"><a id="l01109" name="l01109"></a><span class="lineno"> 1109</span> variable xsmoothing = NumberByKey("SmoothingX", options, "=", ";")</div>
|
|
<div class="line"><a id="l01110" name="l01110"></a><span class="lineno"> 1110</span> variable ysmoothing = NumberByKey("SmoothingY", options, "=", ";")</div>
|
|
<div class="line"><a id="l01111" name="l01111"></a><span class="lineno"> 1111</span> </div>
|
|
<div class="line"><a id="l01112" name="l01112"></a><span class="lineno"> 1112</span> if ((NumType(xsmoothing) == 0) && (xsmoothing >= 2))</div>
|
|
<div class="line"><a id="l01113" name="l01113"></a><span class="lineno"> 1113</span> Smooth /B /DIM=0 /E=3 xsmoothing, image</div>
|
|
<div class="line"><a id="l01114" name="l01114"></a><span class="lineno"> 1114</span> endif</div>
|
|
<div class="line"><a id="l01115" name="l01115"></a><span class="lineno"> 1115</span> if ((NumType(ysmoothing) == 0) && (ysmoothing >= 2))</div>
|
|
<div class="line"><a id="l01116" name="l01116"></a><span class="lineno"> 1116</span> Smooth /B /DIM=1 /E=3 ysmoothing, image</div>
|
|
<div class="line"><a id="l01117" name="l01117"></a><span class="lineno"> 1117</span> endif</div>
|
|
<div class="line"><a id="l01118" name="l01118"></a><span class="lineno"> 1118</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l01119" name="l01119"></a><span class="lineno"> 1119</span> </div>
|
|
<div class="foldopen" id="foldopen01127" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01127" name="l01127"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a8411f0cfec3515f1ae4f0140efc14318"> 1127</a></span>function ad_transpose_filter(image, options)</div>
|
|
<div class="line"><a id="l01128" name="l01128"></a><span class="lineno"> 1128</span> wave image</div>
|
|
<div class="line"><a id="l01129" name="l01129"></a><span class="lineno"> 1129</span> string options</div>
|
|
<div class="line"><a id="l01130" name="l01130"></a><span class="lineno"> 1130</span> </div>
|
|
<div class="line"><a id="l01131" name="l01131"></a><span class="lineno"> 1131</span> MatrixTranspose image </div>
|
|
<div class="line"><a id="l01132" name="l01132"></a><span class="lineno"> 1132</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l01133" name="l01133"></a><span class="lineno"> 1133</span> </div>
|
|
<div class="line"><a id="l01134" name="l01134"></a><span class="lineno"> 1134</span> </div>
|
|
<div class="line"><a id="l01135" name="l01135"></a><span class="lineno"> 1135</span>// ################### 3D DATA ##################</div>
|
|
<div class="line"><a id="l01136" name="l01136"></a><span class="lineno"> 1136</span> </div>
|
|
<div class="foldopen" id="foldopen01143" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01143" name="l01143"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a65b07e355df20cfb692dfb32f472b478"> 1143</a></span>function /s ad_display_brick(data)</div>
|
|
<div class="line"><a id="l01144" name="l01144"></a><span class="lineno"> 1144</span> wave data</div>
|
|
<div class="line"><a id="l01145" name="l01145"></a><span class="lineno"> 1145</span> </div>
|
|
<div class="line"><a id="l01146" name="l01146"></a><span class="lineno"> 1146</span> if(exists("NewGizmo") != 4)</div>
|
|
<div class="line"><a id="l01147" name="l01147"></a><span class="lineno"> 1147</span> abort "Gizmo XOP must be installed."</div>
|
|
<div class="line"><a id="l01148" name="l01148"></a><span class="lineno"> 1148</span> endif</div>
|
|
<div class="line"><a id="l01149" name="l01149"></a><span class="lineno"> 1149</span> if (WaveDims(data) != 3)</div>
|
|
<div class="line"><a id="l01150" name="l01150"></a><span class="lineno"> 1150</span> abort "ad_display_brick: data must be three-dimensional."</div>
|
|
<div class="line"><a id="l01151" name="l01151"></a><span class="lineno"> 1151</span> endif</div>
|
|
<div class="line"><a id="l01152" name="l01152"></a><span class="lineno"> 1152</span> </div>
|
|
<div class="line"><a id="l01153" name="l01153"></a><span class="lineno"> 1153</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01154" name="l01154"></a><span class="lineno"> 1154</span> dfref datadf = GetWavesDataFolderDFR(data)</div>
|
|
<div class="line"><a id="l01155" name="l01155"></a><span class="lineno"> 1155</span> string s_datadf = GetDataFolder(1, datadf)</div>
|
|
<div class="line"><a id="l01156" name="l01156"></a><span class="lineno"> 1156</span> dfref viewdf = make_view_folder(data)</div>
|
|
<div class="line"><a id="l01157" name="l01157"></a><span class="lineno"> 1157</span> </div>
|
|
<div class="line"><a id="l01158" name="l01158"></a><span class="lineno"> 1158</span> setdatafolder viewdf</div>
|
|
<div class="line"><a id="l01159" name="l01159"></a><span class="lineno"> 1159</span> string dfname = ReplaceString("root:", s_datadf, "")</div>
|
|
<div class="line"><a id="l01160" name="l01160"></a><span class="lineno"> 1160</span> string graphtitle = dfname + " Gizmo"</div>
|
|
<div class="line"><a id="l01161" name="l01161"></a><span class="lineno"> 1161</span> string /g gizmo_graphname = graphname_from_dfref(datadf, "giz_")</div>
|
|
<div class="line"><a id="l01162" name="l01162"></a><span class="lineno"> 1162</span> svar graphname = gizmo_graphname</div>
|
|
<div class="line"><a id="l01163" name="l01163"></a><span class="lineno"> 1163</span> </div>
|
|
<div class="line"><a id="l01164" name="l01164"></a><span class="lineno"> 1164</span> if ((strlen(graphname) > 0) && (wintype(graphname) == 17))</div>
|
|
<div class="line"><a id="l01165" name="l01165"></a><span class="lineno"> 1165</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l01166" name="l01166"></a><span class="lineno"> 1166</span> return graphname // gizmo window exists</div>
|
|
<div class="line"><a id="l01167" name="l01167"></a><span class="lineno"> 1167</span> endif</div>
|
|
<div class="line"><a id="l01168" name="l01168"></a><span class="lineno"> 1168</span> </div>
|
|
<div class="line"><a id="l01169" name="l01169"></a><span class="lineno"> 1169</span> variable nx = dimsize(data, 0)</div>
|
|
<div class="line"><a id="l01170" name="l01170"></a><span class="lineno"> 1170</span> variable ny = dimsize(data, 1)</div>
|
|
<div class="line"><a id="l01171" name="l01171"></a><span class="lineno"> 1171</span> variable nz = dimsize(data, 2)</div>
|
|
<div class="line"><a id="l01172" name="l01172"></a><span class="lineno"> 1172</span> </div>
|
|
<div class="line"><a id="l01173" name="l01173"></a><span class="lineno"> 1173</span> variable pp</div>
|
|
<div class="line"><a id="l01174" name="l01174"></a><span class="lineno"> 1174</span> string obj</div>
|
|
<div class="line"><a id="l01175" name="l01175"></a><span class="lineno"> 1175</span> string cmd</div>
|
|
<div class="line"><a id="l01176" name="l01176"></a><span class="lineno"> 1176</span> </div>
|
|
<div class="line"><a id="l01177" name="l01177"></a><span class="lineno"> 1177</span> // igor does not allow calling gizmo functions directly</div>
|
|
<div class="line"><a id="l01178" name="l01178"></a><span class="lineno"> 1178</span> setdatafolder datadf</div>
|
|
<div class="line"><a id="l01179" name="l01179"></a><span class="lineno"> 1179</span> sprintf cmd, "NewGizmo /k=1 /n=%s /w=(100,100,500,400) /t=\"%s\"", graphname, graphtitle</div>
|
|
<div class="line"><a id="l01180" name="l01180"></a><span class="lineno"> 1180</span> execute /q cmd</div>
|
|
<div class="line"><a id="l01181" name="l01181"></a><span class="lineno"> 1181</span> cmd = <span class="stringliteral">"AppendToGizmo /D Axes=BoxAxes, name=axes0"</span></div>
|
|
<div class="line"><a id="l01182" name="l01182"></a><span class="lineno"> 1182</span> execute /q cmd</div>
|
|
<div class="line"><a id="l01183" name="l01183"></a><span class="lineno"> 1183</span> </div>
|
|
<div class="line"><a id="l01184" name="l01184"></a><span class="lineno"> 1184</span> obj = <span class="stringliteral">"surface_xmid"</span></div>
|
|
<div class="line"><a id="l01185" name="l01185"></a><span class="lineno"> 1185</span> pp = round(nx / 2 - 1)</div>
|
|
<div class="line"><a id="l01186" name="l01186"></a><span class="lineno"> 1186</span> sprintf cmd, "AppendToGizmo /D surface=%s, name=%s", nameofwave(data), obj</div>
|
|
<div class="line"><a id="l01187" name="l01187"></a><span class="lineno"> 1187</span> execute /q cmd</div>
|
|
<div class="line"><a id="l01188" name="l01188"></a><span class="lineno"> 1188</span> sprintf cmd, "ModifyGizmo modifyObject=%s, property={srcMode, 128}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01189" name="l01189"></a><span class="lineno"> 1189</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01190" name="l01190"></a><span class="lineno"> 1190</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo ModifyObject=%s, <span class="keyword">property</span>={plane, %d}<span class="stringliteral">", obj, pp</span></div>
|
|
<div class="line"><a id="l01191" name="l01191"></a><span class="lineno"> 1191</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01192" name="l01192"></a><span class="lineno"> 1192</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo modifyObject=%s, <span class="keyword">property</span>={surfaceCtab, BlueGreenOrange}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01193" name="l01193"></a><span class="lineno"> 1193</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01194" name="l01194"></a><span class="lineno"> 1194</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo ModifyObject=%s, <span class="keyword">property</span>={SurfaceCTABScaling,128}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01195" name="l01195"></a><span class="lineno"> 1195</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01196" name="l01196"></a><span class="lineno"> 1196</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo modifyObject=%s, <span class="keyword">property</span>={surfaceCTABAlpha, 1.0}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01197" name="l01197"></a><span class="lineno"> 1197</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01198" name="l01198"></a><span class="lineno"> 1198</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01199" name="l01199"></a><span class="lineno"> 1199</span><span class="stringliteral"> obj = "</span>surface_ymid<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01200" name="l01200"></a><span class="lineno"> 1200</span><span class="stringliteral"> pp = round(ny / 2 - 1)</span></div>
|
|
<div class="line"><a id="l01201" name="l01201"></a><span class="lineno"> 1201</span><span class="stringliteral"> sprintf cmd, "</span>AppendToGizmo /D surface=%s, name=%s<span class="stringliteral">", nameofwave(data), obj</span></div>
|
|
<div class="line"><a id="l01202" name="l01202"></a><span class="lineno"> 1202</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01203" name="l01203"></a><span class="lineno"> 1203</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo modifyObject=%s, <span class="keyword">property</span>={srcMode, 64}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01204" name="l01204"></a><span class="lineno"> 1204</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01205" name="l01205"></a><span class="lineno"> 1205</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo ModifyObject=%s, <span class="keyword">property</span>={plane, %d}<span class="stringliteral">", obj, pp</span></div>
|
|
<div class="line"><a id="l01206" name="l01206"></a><span class="lineno"> 1206</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01207" name="l01207"></a><span class="lineno"> 1207</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo modifyObject=%s, <span class="keyword">property</span>={surfaceCtab, BlueGreenOrange}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01208" name="l01208"></a><span class="lineno"> 1208</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01209" name="l01209"></a><span class="lineno"> 1209</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo ModifyObject=%s, <span class="keyword">property</span>={SurfaceCTABScaling,128}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01210" name="l01210"></a><span class="lineno"> 1210</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01211" name="l01211"></a><span class="lineno"> 1211</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo modifyObject=%s, <span class="keyword">property</span>={surfaceCTABAlpha, 1.0}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01212" name="l01212"></a><span class="lineno"> 1212</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01213" name="l01213"></a><span class="lineno"> 1213</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01214" name="l01214"></a><span class="lineno"> 1214</span><span class="stringliteral"> obj = "</span>surface_zmid<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01215" name="l01215"></a><span class="lineno"> 1215</span><span class="stringliteral"> pp = round(nz / 2 - 1)</span></div>
|
|
<div class="line"><a id="l01216" name="l01216"></a><span class="lineno"> 1216</span><span class="stringliteral"> sprintf cmd, "</span>AppendToGizmo /D surface=%s, name=%s<span class="stringliteral">", nameofwave(data), obj</span></div>
|
|
<div class="line"><a id="l01217" name="l01217"></a><span class="lineno"> 1217</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01218" name="l01218"></a><span class="lineno"> 1218</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo modifyObject=%s, <span class="keyword">property</span>={srcMode, 32}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01219" name="l01219"></a><span class="lineno"> 1219</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01220" name="l01220"></a><span class="lineno"> 1220</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo ModifyObject=%s, <span class="keyword">property</span>={plane, %d}<span class="stringliteral">", obj, pp</span></div>
|
|
<div class="line"><a id="l01221" name="l01221"></a><span class="lineno"> 1221</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01222" name="l01222"></a><span class="lineno"> 1222</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo modifyObject=%s, <span class="keyword">property</span>={surfaceCtab, BlueGreenOrange}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01223" name="l01223"></a><span class="lineno"> 1223</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01224" name="l01224"></a><span class="lineno"> 1224</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo ModifyObject=%s, <span class="keyword">property</span>={SurfaceCTABScaling,128}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01225" name="l01225"></a><span class="lineno"> 1225</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01226" name="l01226"></a><span class="lineno"> 1226</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo modifyObject=%s, <span class="keyword">property</span>={surfaceCTABAlpha, 1.0}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01227" name="l01227"></a><span class="lineno"> 1227</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01228" name="l01228"></a><span class="lineno"> 1228</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01229" name="l01229"></a><span class="lineno"> 1229</span><span class="stringliteral"> obj = "</span>axes0<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01230" name="l01230"></a><span class="lineno"> 1230</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo ModifyObject=%s,<span class="keyword">property</span>={-1,axisScalingMode,1}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01231" name="l01231"></a><span class="lineno"> 1231</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01232" name="l01232"></a><span class="lineno"> 1232</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo ModifyObject=%s,<span class="keyword">property</span>={-1,axisColor,0,0,0,1}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01233" name="l01233"></a><span class="lineno"> 1233</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01234" name="l01234"></a><span class="lineno"> 1234</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo ModifyObject=%s,<span class="keyword">property</span>={0,ticks,3}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01235" name="l01235"></a><span class="lineno"> 1235</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01236" name="l01236"></a><span class="lineno"> 1236</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo ModifyObject=%s,<span class="keyword">property</span>={1,ticks,3}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01237" name="l01237"></a><span class="lineno"> 1237</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01238" name="l01238"></a><span class="lineno"> 1238</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo ModifyObject=%s,<span class="keyword">property</span>={2,ticks,3}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01239" name="l01239"></a><span class="lineno"> 1239</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01240" name="l01240"></a><span class="lineno"> 1240</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo modifyObject=%s <span class="keyword">property</span>={Clipped,0}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01241" name="l01241"></a><span class="lineno"> 1241</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01242" name="l01242"></a><span class="lineno"> 1242</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo modifyObject=%s <span class="keyword">property</span>={-1,fontScaleFactor,2}<span class="stringliteral">", obj</span></div>
|
|
<div class="line"><a id="l01243" name="l01243"></a><span class="lineno"> 1243</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01244" name="l01244"></a><span class="lineno"> 1244</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01245" name="l01245"></a><span class="lineno"> 1245</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo showAxisCue=1<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01246" name="l01246"></a><span class="lineno"> 1246</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01247" name="l01247"></a><span class="lineno"> 1247</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01248" name="l01248"></a><span class="lineno"> 1248</span><span class="stringliteral"> setdatafolder savedf</span></div>
|
|
<div class="line"><a id="l01249" name="l01249"></a><span class="lineno"> 1249</span><span class="stringliteral"> return graphname</span></div>
|
|
<div class="line"><a id="l01250" name="l01250"></a><span class="lineno"> 1250</span><span class="stringliteral">end</span></div>
|
|
</div>
|
|
<div class="line"><a id="l01251" name="l01251"></a><span class="lineno"> 1251</span><span class="stringliteral"></span> </div>
|
|
<div class="foldopen" id="foldopen01258" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01258" name="l01258"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#ae3b4756cdc12a4a4b15a770ba0069823"> 1258</a></span>function ad_brick_slicer(data)</div>
|
|
<div class="line"><a id="l01259" name="l01259"></a><span class="lineno"> 1259</span> wave data</div>
|
|
<div class="line"><a id="l01260" name="l01260"></a><span class="lineno"> 1260</span> </div>
|
|
<div class="line"><a id="l01261" name="l01261"></a><span class="lineno"> 1261</span> // data folders and references</div>
|
|
<div class="line"><a id="l01262" name="l01262"></a><span class="lineno"> 1262</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01263" name="l01263"></a><span class="lineno"> 1263</span> dfref datadf = GetWavesDataFolderDFR(data)</div>
|
|
<div class="line"><a id="l01264" name="l01264"></a><span class="lineno"> 1264</span> string s_datadf = GetDataFolder(1, datadf)</div>
|
|
<div class="line"><a id="l01265" name="l01265"></a><span class="lineno"> 1265</span> dfref viewdf = make_view_folder(data)</div>
|
|
<div class="line"><a id="l01266" name="l01266"></a><span class="lineno"> 1266</span> </div>
|
|
<div class="line"><a id="l01267" name="l01267"></a><span class="lineno"> 1267</span> setdatafolder viewdf</div>
|
|
<div class="line"><a id="l01268" name="l01268"></a><span class="lineno"> 1268</span> svar /z ex_panel = slicer_panelname</div>
|
|
<div class="line"><a id="l01269" name="l01269"></a><span class="lineno"> 1269</span> if (svar_exists(ex_panel))</div>
|
|
<div class="line"><a id="l01270" name="l01270"></a><span class="lineno"> 1270</span> string panels = WinList("SlicerPanel*<span class="stringliteral">", "</span>;<span class="stringliteral">", "</span>WIN:64<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01271" name="l01271"></a><span class="lineno"> 1271</span><span class="stringliteral"> if (WhichListItem(ex_panel, panels, "</span>;<span class="stringliteral">") >= 0)</span></div>
|
|
<div class="line"><a id="l01272" name="l01272"></a><span class="lineno"> 1272</span><span class="stringliteral"> dowindow /f $(StringFromList(0, panels, "</span>;<span class="stringliteral">"))</span></div>
|
|
<div class="line"><a id="l01273" name="l01273"></a><span class="lineno"> 1273</span><span class="stringliteral"> return 0</span></div>
|
|
<div class="line"><a id="l01274" name="l01274"></a><span class="lineno"> 1274</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01275" name="l01275"></a><span class="lineno"> 1275</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01276" name="l01276"></a><span class="lineno"> 1276</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01277" name="l01277"></a><span class="lineno"> 1277</span><span class="stringliteral"> variable /g x_slice_pos</span></div>
|
|
<div class="line"><a id="l01278" name="l01278"></a><span class="lineno"> 1278</span><span class="stringliteral"> variable /g y_slice_pos</span></div>
|
|
<div class="line"><a id="l01279" name="l01279"></a><span class="lineno"> 1279</span><span class="stringliteral"> variable /g z_slice_pos</span></div>
|
|
<div class="line"><a id="l01280" name="l01280"></a><span class="lineno"> 1280</span><span class="stringliteral"> variable /g slab_thickness</span></div>
|
|
<div class="line"><a id="l01281" name="l01281"></a><span class="lineno"> 1281</span><span class="stringliteral"> string /g brick_path = getwavesdatafolder(data, 2)</span></div>
|
|
<div class="line"><a id="l01282" name="l01282"></a><span class="lineno"> 1282</span><span class="stringliteral"> variable /g x_autoinc = 0</span></div>
|
|
<div class="line"><a id="l01283" name="l01283"></a><span class="lineno"> 1283</span><span class="stringliteral"> variable /g y_autoinc = 0</span></div>
|
|
<div class="line"><a id="l01284" name="l01284"></a><span class="lineno"> 1284</span><span class="stringliteral"> variable /g z_autoinc = 0</span></div>
|
|
<div class="line"><a id="l01285" name="l01285"></a><span class="lineno"> 1285</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01286" name="l01286"></a><span class="lineno"> 1286</span><span class="stringliteral"> // axis labels </span></div>
|
|
<div class="line"><a id="l01287" name="l01287"></a><span class="lineno"> 1287</span><span class="stringliteral"> string labels = note(data)</span></div>
|
|
<div class="line"><a id="l01288" name="l01288"></a><span class="lineno"> 1288</span><span class="stringliteral"> string xlabel = StringByKey("</span>AxisLabelX<span class="stringliteral">", labels, "</span>=<span class="stringliteral">", "</span>\r<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01289" name="l01289"></a><span class="lineno"> 1289</span><span class="stringliteral"> if (!strlen(xlabel))</span></div>
|
|
<div class="line"><a id="l01290" name="l01290"></a><span class="lineno"> 1290</span><span class="stringliteral"> xlabel = "</span>X<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01291" name="l01291"></a><span class="lineno"> 1291</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01292" name="l01292"></a><span class="lineno"> 1292</span><span class="stringliteral"> string ylabel = StringByKey("</span>AxisLabelY<span class="stringliteral">", labels, "</span>=<span class="stringliteral">", "</span>\r<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01293" name="l01293"></a><span class="lineno"> 1293</span><span class="stringliteral"> if (!strlen(ylabel))</span></div>
|
|
<div class="line"><a id="l01294" name="l01294"></a><span class="lineno"> 1294</span><span class="stringliteral"> ylabel = "</span>Y<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01295" name="l01295"></a><span class="lineno"> 1295</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01296" name="l01296"></a><span class="lineno"> 1296</span><span class="stringliteral"> string zlabel = StringByKey("</span>AxisLabelZ<span class="stringliteral">", labels, "</span>=<span class="stringliteral">", "</span>\r<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01297" name="l01297"></a><span class="lineno"> 1297</span><span class="stringliteral"> if (!strlen(zlabel))</span></div>
|
|
<div class="line"><a id="l01298" name="l01298"></a><span class="lineno"> 1298</span><span class="stringliteral"> zlabel = "</span>Z<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01299" name="l01299"></a><span class="lineno"> 1299</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01300" name="l01300"></a><span class="lineno"> 1300</span><span class="stringliteral"> string dlabel = StringByKey("</span>Dataset<span class="stringliteral">", labels, "</span>=<span class="stringliteral">", "</span>\r<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01301" name="l01301"></a><span class="lineno"> 1301</span><span class="stringliteral"> if (!strlen(dlabel))</span></div>
|
|
<div class="line"><a id="l01302" name="l01302"></a><span class="lineno"> 1302</span><span class="stringliteral"> dlabel = NameOfWave(data)</span></div>
|
|
<div class="line"><a id="l01303" name="l01303"></a><span class="lineno"> 1303</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01304" name="l01304"></a><span class="lineno"> 1304</span><span class="stringliteral"> </span></div>
|
|
<div class="line"><a id="l01305" name="l01305"></a><span class="lineno"> 1305</span><span class="stringliteral"> // this section copied from slicer panel </span></div>
|
|
<div class="line"><a id="l01306" name="l01306"></a><span class="lineno"> 1306</span><span class="stringliteral"> NewPanel /k=1 /W=(500,600,890,940) /N=SlicerPanel as "</span>Brick Slicer<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01307" name="l01307"></a><span class="lineno"> 1307</span><span class="stringliteral"> string /g slicer_panelname = S_name</span></div>
|
|
<div class="line"><a id="l01308" name="l01308"></a><span class="lineno"> 1308</span><span class="stringliteral"> string panel = s_name</span></div>
|
|
<div class="line"><a id="l01309" name="l01309"></a><span class="lineno"> 1309</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01310" name="l01310"></a><span class="lineno"> 1310</span><span class="stringliteral"> GroupBox g_xslice win=$panel,pos={8,8},size={376,96},title=xlabel</span></div>
|
|
<div class="line"><a id="l01311" name="l01311"></a><span class="lineno"> 1311</span><span class="stringliteral"> Slider sl_xslice_position win=$panel,pos={16,32},size={240,56},proc=PearlAreaDisplay#slp_slice_position</span></div>
|
|
<div class="line"><a id="l01312" name="l01312"></a><span class="lineno"> 1312</span><span class="stringliteral"> Slider sl_xslice_position win=$panel,limits={0,100,1},variable=x_slice_pos,vert= 0</span></div>
|
|
<div class="line"><a id="l01313" name="l01313"></a><span class="lineno"> 1313</span><span class="stringliteral"> SetVariable sv_xslice_position win=$panel,pos={20,80},size={92,16},proc=PearlAreaDisplay#svp_slice_position,title="</span>X<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01314" name="l01314"></a><span class="lineno"> 1314</span><span class="stringliteral"> SetVariable sv_xslice_position win=$panel,limits={0,100,1},value=x_slice_pos</span></div>
|
|
<div class="line"><a id="l01315" name="l01315"></a><span class="lineno"> 1315</span><span class="stringliteral"> Button b_xslice_center win=$panel,pos={122,80},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W618<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01316" name="l01316"></a><span class="lineno"> 1316</span><span class="stringliteral"> Button b_xslice_center win=$panel,help={"</span>reset to center position<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01317" name="l01317"></a><span class="lineno"> 1317</span><span class="stringliteral"> Button b_xslice_extract win=$panel,pos={288,80},size={68,20},proc=PearlAreaDisplay#bp_extract_slice,title="</span>extract slice<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01318" name="l01318"></a><span class="lineno"> 1318</span><span class="stringliteral"> Button b_xslice_extract win=$panel,help={"</span>extract <span class="keyword">this</span> slice to a separate wave<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01319" name="l01319"></a><span class="lineno"> 1319</span><span class="stringliteral"> //CheckBox cb_xslab_active win=$panel,pos={288,80},size={80,16},title="</span>Display X Slab<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01320" name="l01320"></a><span class="lineno"> 1320</span><span class="stringliteral"> //CheckBox cb_xslab_active win=$panel,value= 0</span></div>
|
|
<div class="line"><a id="l01321" name="l01321"></a><span class="lineno"> 1321</span><span class="stringliteral"> TitleBox tb_xslice_animation win=$panel,pos={288,32},size={356,16},title="</span>animation<span class="stringliteral">",frame=0</span></div>
|
|
<div class="line"><a id="l01322" name="l01322"></a><span class="lineno"> 1322</span><span class="stringliteral"> TitleBox tb_xslice_animation win=$panel,anchor= MC</span></div>
|
|
<div class="line"><a id="l01323" name="l01323"></a><span class="lineno"> 1323</span><span class="stringliteral"> Button b_xslice_back win=$panel,pos={288,48},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W646<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01324" name="l01324"></a><span class="lineno"> 1324</span><span class="stringliteral"> Button b_xslice_back win=$panel,help={"</span>animate backwards<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01325" name="l01325"></a><span class="lineno"> 1325</span><span class="stringliteral"> Button b_xslice_forward win=$panel,pos={312,48},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W649<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01326" name="l01326"></a><span class="lineno"> 1326</span><span class="stringliteral"> Button b_xslice_forward win=$panel,help={"</span>animate forward<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01327" name="l01327"></a><span class="lineno"> 1327</span><span class="stringliteral"> Button b_xslice_stop win=$panel,pos={336,48},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W616<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01328" name="l01328"></a><span class="lineno"> 1328</span><span class="stringliteral"> Button b_xslice_stop win=$panel,help={"</span>stop animation<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01329" name="l01329"></a><span class="lineno"> 1329</span><span class="stringliteral"> </span></div>
|
|
<div class="line"><a id="l01330" name="l01330"></a><span class="lineno"> 1330</span><span class="stringliteral"> GroupBox g_yslice win=$panel,pos={8,108},size={376,96},title=ylabel</span></div>
|
|
<div class="line"><a id="l01331" name="l01331"></a><span class="lineno"> 1331</span><span class="stringliteral"> Slider sl_yslice_position win=$panel,pos={16,132},size={240,56},proc=PearlAreaDisplay#slp_slice_position</span></div>
|
|
<div class="line"><a id="l01332" name="l01332"></a><span class="lineno"> 1332</span><span class="stringliteral"> Slider sl_yslice_position win=$panel,limits={0,100,1},variable=y_slice_pos,vert= 0</span></div>
|
|
<div class="line"><a id="l01333" name="l01333"></a><span class="lineno"> 1333</span><span class="stringliteral"> SetVariable sv_yslice_position win=$panel,pos={20,180},size={92,16},proc=PearlAreaDisplay#svp_slice_position,title="</span>Y<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01334" name="l01334"></a><span class="lineno"> 1334</span><span class="stringliteral"> SetVariable sv_yslice_position win=$panel,limits={0,100,1},value=y_slice_pos</span></div>
|
|
<div class="line"><a id="l01335" name="l01335"></a><span class="lineno"> 1335</span><span class="stringliteral"> Button b_yslice_center win=$panel,pos={122,180},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W618<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01336" name="l01336"></a><span class="lineno"> 1336</span><span class="stringliteral"> Button b_yslice_center win=$panel,help={"</span>reset to center position<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01337" name="l01337"></a><span class="lineno"> 1337</span><span class="stringliteral"> Button b_yslice_extract win=$panel,pos={288,180},size={68,20},proc=PearlAreaDisplay#bp_extract_slice,title="</span>extract slice<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01338" name="l01338"></a><span class="lineno"> 1338</span><span class="stringliteral"> Button b_yslice_extract win=$panel,help={"</span>extract <span class="keyword">this</span> slice to a separate wave<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01339" name="l01339"></a><span class="lineno"> 1339</span><span class="stringliteral"> //CheckBox cb_yslab_active win=$panel,pos={288,180},size={80,16},title="</span>Display Y Slab<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01340" name="l01340"></a><span class="lineno"> 1340</span><span class="stringliteral"> //CheckBox cb_yslab_active win=$panel,value= 0</span></div>
|
|
<div class="line"><a id="l01341" name="l01341"></a><span class="lineno"> 1341</span><span class="stringliteral"> TitleBox tb_yslice_animation win=$panel,pos={288,132},size={356,16},title="</span>animation<span class="stringliteral">",frame=0</span></div>
|
|
<div class="line"><a id="l01342" name="l01342"></a><span class="lineno"> 1342</span><span class="stringliteral"> TitleBox tb_yslice_animation win=$panel,anchor= MC</span></div>
|
|
<div class="line"><a id="l01343" name="l01343"></a><span class="lineno"> 1343</span><span class="stringliteral"> Button b_yslice_back win=$panel,pos={288,148},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W646<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01344" name="l01344"></a><span class="lineno"> 1344</span><span class="stringliteral"> Button b_yslice_back win=$panel,help={"</span>animate backwards<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01345" name="l01345"></a><span class="lineno"> 1345</span><span class="stringliteral"> Button b_yslice_forward win=$panel,pos={312,148},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W649<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01346" name="l01346"></a><span class="lineno"> 1346</span><span class="stringliteral"> Button b_yslice_forward win=$panel,help={"</span>animate forward<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01347" name="l01347"></a><span class="lineno"> 1347</span><span class="stringliteral"> Button b_yslice_stop win=$panel,pos={336,148},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W616<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01348" name="l01348"></a><span class="lineno"> 1348</span><span class="stringliteral"> Button b_yslice_stop win=$panel,help={"</span>stop animation<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01349" name="l01349"></a><span class="lineno"> 1349</span><span class="stringliteral"> </span></div>
|
|
<div class="line"><a id="l01350" name="l01350"></a><span class="lineno"> 1350</span><span class="stringliteral"> GroupBox g_zslice win=$panel,pos={8,208},size={376,96},title=zlabel</span></div>
|
|
<div class="line"><a id="l01351" name="l01351"></a><span class="lineno"> 1351</span><span class="stringliteral"> Slider sl_zslice_position win=$panel,pos={16,232},size={240,56},proc=PearlAreaDisplay#slp_slice_position</span></div>
|
|
<div class="line"><a id="l01352" name="l01352"></a><span class="lineno"> 1352</span><span class="stringliteral"> Slider sl_zslice_position win=$panel,limits={0,100,1},variable=z_slice_pos,vert= 0</span></div>
|
|
<div class="line"><a id="l01353" name="l01353"></a><span class="lineno"> 1353</span><span class="stringliteral"> SetVariable sv_zslice_position win=$panel,pos={20,280},size={92,16},proc=PearlAreaDisplay#svp_slice_position,title="</span>Z<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01354" name="l01354"></a><span class="lineno"> 1354</span><span class="stringliteral"> SetVariable sv_zslice_position win=$panel,limits={0,100,1},value=z_slice_pos</span></div>
|
|
<div class="line"><a id="l01355" name="l01355"></a><span class="lineno"> 1355</span><span class="stringliteral"> Button b_zslice_center win=$panel,pos={122,280},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W618<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01356" name="l01356"></a><span class="lineno"> 1356</span><span class="stringliteral"> Button b_zslice_center win=$panel,help={"</span>reset to center position<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01357" name="l01357"></a><span class="lineno"> 1357</span><span class="stringliteral"> Button b_zslice_extract win=$panel,pos={288,280},size={68,20},proc=PearlAreaDisplay#bp_extract_slice,title="</span>extract slice<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01358" name="l01358"></a><span class="lineno"> 1358</span><span class="stringliteral"> Button b_zslice_extract win=$panel,help={"</span>extract <span class="keyword">this</span> slice to a separate wave<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01359" name="l01359"></a><span class="lineno"> 1359</span><span class="stringliteral"> //CheckBox cb_zslab_active win=$panel,pos={288,280},size={80,16},title="</span>Display Z Slab<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01360" name="l01360"></a><span class="lineno"> 1360</span><span class="stringliteral"> //CheckBox cb_zslab_active win=$panel,value= 0</span></div>
|
|
<div class="line"><a id="l01361" name="l01361"></a><span class="lineno"> 1361</span><span class="stringliteral"> TitleBox tb_zslice_animation win=$panel,pos={288,232},size={356,16},title="</span>animation<span class="stringliteral">",frame=0</span></div>
|
|
<div class="line"><a id="l01362" name="l01362"></a><span class="lineno"> 1362</span><span class="stringliteral"> TitleBox tb_zslice_animation win=$panel,anchor= MC</span></div>
|
|
<div class="line"><a id="l01363" name="l01363"></a><span class="lineno"> 1363</span><span class="stringliteral"> Button b_zslice_back win=$panel,pos={288,248},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W646<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01364" name="l01364"></a><span class="lineno"> 1364</span><span class="stringliteral"> Button b_zslice_back win=$panel,help={"</span>animate backwards<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01365" name="l01365"></a><span class="lineno"> 1365</span><span class="stringliteral"> Button b_zslice_forward win=$panel,pos={312,248},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W649<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01366" name="l01366"></a><span class="lineno"> 1366</span><span class="stringliteral"> Button b_zslice_forward win=$panel,help={"</span>animate forward<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01367" name="l01367"></a><span class="lineno"> 1367</span><span class="stringliteral"> Button b_zslice_stop win=$panel,pos={336,248},size={20,20},proc=PearlAreaDisplay#bp_move_slice,title="</span>\\W616<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01368" name="l01368"></a><span class="lineno"> 1368</span><span class="stringliteral"> Button b_zslice_stop win=$panel,help={"</span>stop animation<span class="stringliteral">"}</span></div>
|
|
<div class="line"><a id="l01369" name="l01369"></a><span class="lineno"> 1369</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01370" name="l01370"></a><span class="lineno"> 1370</span><span class="stringliteral"> TitleBox t_slicerpath win=$panel,pos={8,316},size={128,20},disable=2,title=dlabel</span></div>
|
|
<div class="line"><a id="l01371" name="l01371"></a><span class="lineno"> 1371</span><span class="stringliteral"> //SetVariable setvar0 win=$panel,pos={240,316},size={120,16},title="</span>slab thickness<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01372" name="l01372"></a><span class="lineno"> 1372</span><span class="stringliteral"> //SetVariable setvar0 win=$panel,limits={1,inf,1},value=slab_thickness</span></div>
|
|
<div class="line"><a id="l01373" name="l01373"></a><span class="lineno"> 1373</span><span class="stringliteral"> </span></div>
|
|
<div class="line"><a id="l01374" name="l01374"></a><span class="lineno"> 1374</span><span class="stringliteral"> // update control limits and move slicing planes to the center</span></div>
|
|
<div class="line"><a id="l01375" name="l01375"></a><span class="lineno"> 1375</span><span class="stringliteral"> setwindow $panel, userdata(control_datafolder) = GetDataFolder(1, viewdf)</span></div>
|
|
<div class="line"><a id="l01376" name="l01376"></a><span class="lineno"> 1376</span><span class="stringliteral"> setwindow $panel, userdata(brick_path) = brick_path</span></div>
|
|
<div class="line"><a id="l01377" name="l01377"></a><span class="lineno"> 1377</span><span class="stringliteral"> update_slice_info()</span></div>
|
|
<div class="line"><a id="l01378" name="l01378"></a><span class="lineno"> 1378</span><span class="stringliteral"> x_slice_pos = dimoffset(data, 0) + dimsize(data, 0) * dimdelta(data, 0) / 2</span></div>
|
|
<div class="line"><a id="l01379" name="l01379"></a><span class="lineno"> 1379</span><span class="stringliteral"> y_slice_pos = dimoffset(data, 1) + dimsize(data, 1) * dimdelta(data, 1) / 2</span></div>
|
|
<div class="line"><a id="l01380" name="l01380"></a><span class="lineno"> 1380</span><span class="stringliteral"> z_slice_pos = dimoffset(data, 2) + dimsize(data, 2) * dimdelta(data, 2) / 2</span></div>
|
|
<div class="line"><a id="l01381" name="l01381"></a><span class="lineno"> 1381</span><span class="stringliteral"> </span></div>
|
|
<div class="line"><a id="l01382" name="l01382"></a><span class="lineno"> 1382</span><span class="stringliteral"> svar /z /sdfr=viewdf gizmo_graphname</span></div>
|
|
<div class="line"><a id="l01383" name="l01383"></a><span class="lineno"> 1383</span><span class="stringliteral"> if (svar_exists(gizmo_graphname) && (strlen(gizmo_graphname) > 0) && (wintype(gizmo_graphname) == 17))</span></div>
|
|
<div class="line"><a id="l01384" name="l01384"></a><span class="lineno"> 1384</span><span class="stringliteral"> ad_gizmo_set_plane(data, 0, x_slice_pos)</span></div>
|
|
<div class="line"><a id="l01385" name="l01385"></a><span class="lineno"> 1385</span><span class="stringliteral"> ad_gizmo_set_plane(data, 1, y_slice_pos)</span></div>
|
|
<div class="line"><a id="l01386" name="l01386"></a><span class="lineno"> 1386</span><span class="stringliteral"> ad_gizmo_set_plane(data, 2, z_slice_pos)</span></div>
|
|
<div class="line"><a id="l01387" name="l01387"></a><span class="lineno"> 1387</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01388" name="l01388"></a><span class="lineno"> 1388</span><span class="stringliteral"> svar /z /sdfr=viewdf slice_graphname</span></div>
|
|
<div class="line"><a id="l01389" name="l01389"></a><span class="lineno"> 1389</span><span class="stringliteral"> if (svar_exists(slice_graphname) && (strlen(slice_graphname) > 0) && (wintype(slice_graphname) == 1))</span></div>
|
|
<div class="line"><a id="l01390" name="l01390"></a><span class="lineno"> 1390</span><span class="stringliteral"> ad_profiles_set_slice(data, 2, z_slice_pos)</span></div>
|
|
<div class="line"><a id="l01391" name="l01391"></a><span class="lineno"> 1391</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01392" name="l01392"></a><span class="lineno"> 1392</span><span class="stringliteral"> </span></div>
|
|
<div class="line"><a id="l01393" name="l01393"></a><span class="lineno"> 1393</span><span class="stringliteral"> ad_slicer_init_bg()</span></div>
|
|
<div class="line"><a id="l01394" name="l01394"></a><span class="lineno"> 1394</span><span class="stringliteral"> setdatafolder savedf</span></div>
|
|
<div class="line"><a id="l01395" name="l01395"></a><span class="lineno"> 1395</span><span class="stringliteral">end</span></div>
|
|
</div>
|
|
<div class="line"><a id="l01396" name="l01396"></a><span class="lineno"> 1396</span><span class="stringliteral"></span> </div>
|
|
<div class="foldopen" id="foldopen01406" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01406" name="l01406"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#af8d5e003fcff1f750685ed6f94717730"> 1406</a></span>function /s ad_display_slice(data)</div>
|
|
<div class="line"><a id="l01407" name="l01407"></a><span class="lineno"> 1407</span> wave data</div>
|
|
<div class="line"><a id="l01408" name="l01408"></a><span class="lineno"> 1408</span> </div>
|
|
<div class="line"><a id="l01409" name="l01409"></a><span class="lineno"> 1409</span> if (WaveDims(data) != 3)</div>
|
|
<div class="line"><a id="l01410" name="l01410"></a><span class="lineno"> 1410</span> abort "<a class="code hl_function" href="pearl-area-display_8ipf.html#af8d5e003fcff1f750685ed6f94717730">ad_display_slice</a>: data must be three-dimensional.<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01411" name="l01411"></a><span class="lineno"> 1411</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01412" name="l01412"></a><span class="lineno"> 1412</span><span class="stringliteral"> </span></div>
|
|
<div class="line"><a id="l01413" name="l01413"></a><span class="lineno"> 1413</span><span class="stringliteral"> dfref savedf = GetDataFolderDFR()</span></div>
|
|
<div class="line"><a id="l01414" name="l01414"></a><span class="lineno"> 1414</span><span class="stringliteral"> dfref datadf = GetWavesDataFolderDFR(data)</span></div>
|
|
<div class="line"><a id="l01415" name="l01415"></a><span class="lineno"> 1415</span><span class="stringliteral"> string s_datadf = GetDataFolder(1, datadf)</span></div>
|
|
<div class="line"><a id="l01416" name="l01416"></a><span class="lineno"> 1416</span><span class="stringliteral"> dfref viewdf = make_view_folder(data)</span></div>
|
|
<div class="line"><a id="l01417" name="l01417"></a><span class="lineno"> 1417</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01418" name="l01418"></a><span class="lineno"> 1418</span><span class="stringliteral"> setdatafolder viewdf</span></div>
|
|
<div class="line"><a id="l01419" name="l01419"></a><span class="lineno"> 1419</span><span class="stringliteral"> string dfname = ReplaceString("</span>root:<span class="stringliteral">", s_datadf, "</span><span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01420" name="l01420"></a><span class="lineno"> 1420</span><span class="stringliteral"> dfname = dfname[0, strlen(dfname) - 2]</span></div>
|
|
<div class="line"><a id="l01421" name="l01421"></a><span class="lineno"> 1421</span><span class="stringliteral"> string graphtitle = dfname + "</span> Slice<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01422" name="l01422"></a><span class="lineno"> 1422</span><span class="stringliteral"> </span></div>
|
|
<div class="line"><a id="l01423" name="l01423"></a><span class="lineno"> 1423</span><span class="stringliteral"> if (exists("</span>slice_graphname<span class="stringliteral">") != 2)</span></div>
|
|
<div class="line"><a id="l01424" name="l01424"></a><span class="lineno"> 1424</span><span class="stringliteral"> string /g slice_graphname = "</span><span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01425" name="l01425"></a><span class="lineno"> 1425</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01426" name="l01426"></a><span class="lineno"> 1426</span><span class="stringliteral"> string /g slice_wavename = PearlCleanupName("</span>slice_<span class="stringliteral">" + NameOfWave(data))</span></div>
|
|
<div class="line"><a id="l01427" name="l01427"></a><span class="lineno"> 1427</span><span class="stringliteral"> svar graphname = slice_graphname</span></div>
|
|
<div class="line"><a id="l01428" name="l01428"></a><span class="lineno"> 1428</span><span class="stringliteral"> svar slicename = slice_wavename</span></div>
|
|
<div class="line"><a id="l01429" name="l01429"></a><span class="lineno"> 1429</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01430" name="l01430"></a><span class="lineno"> 1430</span><span class="stringliteral"> make /n=(1,1)/o $slicename</span></div>
|
|
<div class="line"><a id="l01431" name="l01431"></a><span class="lineno"> 1431</span><span class="stringliteral"> wave slice = $slicename</span></div>
|
|
<div class="line"><a id="l01432" name="l01432"></a><span class="lineno"> 1432</span><span class="stringliteral"> if ((strlen(graphname) == 0) || (wintype(graphname) != 1))</span></div>
|
|
<div class="line"><a id="l01433" name="l01433"></a><span class="lineno"> 1433</span><span class="stringliteral"> graphname = ad_display_profiles(slice)</span></div>
|
|
<div class="line"><a id="l01434" name="l01434"></a><span class="lineno"> 1434</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01435" name="l01435"></a><span class="lineno"> 1435</span><span class="stringliteral"> variable z_slice_pos = dimoffset(data, 2) + dimsize(data, 2) * dimdelta(data, 2) / 2</span></div>
|
|
<div class="line"><a id="l01436" name="l01436"></a><span class="lineno"> 1436</span><span class="stringliteral"> ad_profiles_set_slice(data, 2, z_slice_pos)</span></div>
|
|
<div class="line"><a id="l01437" name="l01437"></a><span class="lineno"> 1437</span><span class="stringliteral"> ad_profiles_set_cursor(slice, "</span>A<span class="stringliteral">", -inf, -inf, pscale=1)</span></div>
|
|
<div class="line"><a id="l01438" name="l01438"></a><span class="lineno"> 1438</span><span class="stringliteral"> ad_profiles_set_cursor(slice, "</span>B<span class="stringliteral">", +inf, +inf, pscale=1)</span></div>
|
|
<div class="line"><a id="l01439" name="l01439"></a><span class="lineno"> 1439</span><span class="stringliteral"> </span></div>
|
|
<div class="line"><a id="l01440" name="l01440"></a><span class="lineno"> 1440</span><span class="stringliteral"> setdatafolder savedf</span></div>
|
|
<div class="line"><a id="l01441" name="l01441"></a><span class="lineno"> 1441</span><span class="stringliteral"> return graphname</span></div>
|
|
<div class="line"><a id="l01442" name="l01442"></a><span class="lineno"> 1442</span><span class="stringliteral">end</span></div>
|
|
</div>
|
|
<div class="line"><a id="l01443" name="l01443"></a><span class="lineno"> 1443</span><span class="stringliteral"></span> </div>
|
|
<div class="foldopen" id="foldopen01447" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01447" name="l01447"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a2442bc044aaa12ab817a5f9fa300d1f8"> 1447</a></span>static function update_slice_info()</div>
|
|
<div class="line"><a id="l01448" name="l01448"></a><span class="lineno"> 1448</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01449" name="l01449"></a><span class="lineno"> 1449</span> </div>
|
|
<div class="line"><a id="l01450" name="l01450"></a><span class="lineno"> 1450</span> svar brick_path</div>
|
|
<div class="line"><a id="l01451" name="l01451"></a><span class="lineno"> 1451</span> //svar slicer_panelname</div>
|
|
<div class="line"><a id="l01452" name="l01452"></a><span class="lineno"> 1452</span> wave brick = $brick_path</div>
|
|
<div class="line"><a id="l01453" name="l01453"></a><span class="lineno"> 1453</span> </div>
|
|
<div class="line"><a id="l01454" name="l01454"></a><span class="lineno"> 1454</span> //dowindow /F $slicer_panelname</div>
|
|
<div class="line"><a id="l01455" name="l01455"></a><span class="lineno"> 1455</span> variable lo, hi, inc</div>
|
|
<div class="line"><a id="l01456" name="l01456"></a><span class="lineno"> 1456</span> lo = dimoffset(brick, 0)</div>
|
|
<div class="line"><a id="l01457" name="l01457"></a><span class="lineno"> 1457</span> inc = dimdelta(brick, 0)</div>
|
|
<div class="line"><a id="l01458" name="l01458"></a><span class="lineno"> 1458</span> hi = lo + inc * (dimsize(brick, 0) - 1)</div>
|
|
<div class="line"><a id="l01459" name="l01459"></a><span class="lineno"> 1459</span> Slider sl_xslice_position,limits={lo,hi,inc}</div>
|
|
<div class="line"><a id="l01460" name="l01460"></a><span class="lineno"> 1460</span> SetVariable sv_xslice_position,limits={lo,hi,inc}</div>
|
|
<div class="line"><a id="l01461" name="l01461"></a><span class="lineno"> 1461</span> lo = dimoffset(brick, 1)</div>
|
|
<div class="line"><a id="l01462" name="l01462"></a><span class="lineno"> 1462</span> inc = dimdelta(brick, 1)</div>
|
|
<div class="line"><a id="l01463" name="l01463"></a><span class="lineno"> 1463</span> hi = lo + inc * (dimsize(brick, 1) - 1)</div>
|
|
<div class="line"><a id="l01464" name="l01464"></a><span class="lineno"> 1464</span> Slider sl_yslice_position,limits={lo,hi,inc}</div>
|
|
<div class="line"><a id="l01465" name="l01465"></a><span class="lineno"> 1465</span> SetVariable sv_yslice_position,limits={lo,hi,inc}</div>
|
|
<div class="line"><a id="l01466" name="l01466"></a><span class="lineno"> 1466</span> lo = dimoffset(brick, 2)</div>
|
|
<div class="line"><a id="l01467" name="l01467"></a><span class="lineno"> 1467</span> inc = dimdelta(brick, 2)</div>
|
|
<div class="line"><a id="l01468" name="l01468"></a><span class="lineno"> 1468</span> hi = lo + inc * (dimsize(brick, 2) - 1)</div>
|
|
<div class="line"><a id="l01469" name="l01469"></a><span class="lineno"> 1469</span> Slider sl_zslice_position,limits={lo,hi,inc}</div>
|
|
<div class="line"><a id="l01470" name="l01470"></a><span class="lineno"> 1470</span> SetVariable sv_zslice_position,limits={lo,hi,inc}</div>
|
|
<div class="line"><a id="l01471" name="l01471"></a><span class="lineno"> 1471</span> </div>
|
|
<div class="line"><a id="l01472" name="l01472"></a><span class="lineno"> 1472</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l01473" name="l01473"></a><span class="lineno"> 1473</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l01474" name="l01474"></a><span class="lineno"> 1474</span> </div>
|
|
<div class="foldopen" id="foldopen01483" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01483" name="l01483"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#aee051acfe6a3c8214118b78dfe4854fd"> 1483</a></span>function ad_gizmo_set_plane(brick, dim, value)</div>
|
|
<div class="line"><a id="l01484" name="l01484"></a><span class="lineno"> 1484</span> wave brick</div>
|
|
<div class="line"><a id="l01485" name="l01485"></a><span class="lineno"> 1485</span> variable dim</div>
|
|
<div class="line"><a id="l01486" name="l01486"></a><span class="lineno"> 1486</span> variable value</div>
|
|
<div class="line"><a id="l01487" name="l01487"></a><span class="lineno"> 1487</span> </div>
|
|
<div class="line"><a id="l01488" name="l01488"></a><span class="lineno"> 1488</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01489" name="l01489"></a><span class="lineno"> 1489</span> dfref datadf = GetWavesDataFolderDFR(brick)</div>
|
|
<div class="line"><a id="l01490" name="l01490"></a><span class="lineno"> 1490</span> dfref viewdf = get_view_folder(brick)</div>
|
|
<div class="line"><a id="l01491" name="l01491"></a><span class="lineno"> 1491</span> svar /z /sdfr=viewdf graphname=gizmo_graphname</div>
|
|
<div class="line"><a id="l01492" name="l01492"></a><span class="lineno"> 1492</span> </div>
|
|
<div class="line"><a id="l01493" name="l01493"></a><span class="lineno"> 1493</span> variable pp = round((value - dimoffset(brick, dim)) / dimdelta(brick, dim))</div>
|
|
<div class="line"><a id="l01494" name="l01494"></a><span class="lineno"> 1494</span> if ((pp < 0) || (pp >= dimsize(brick, dim)))</div>
|
|
<div class="line"><a id="l01495" name="l01495"></a><span class="lineno"> 1495</span> return -1 // requested value out of range</div>
|
|
<div class="line"><a id="l01496" name="l01496"></a><span class="lineno"> 1496</span> endif</div>
|
|
<div class="line"><a id="l01497" name="l01497"></a><span class="lineno"> 1497</span> </div>
|
|
<div class="line"><a id="l01498" name="l01498"></a><span class="lineno"> 1498</span> if (svar_exists(graphname) && (strlen(graphname) > 0) && (wintype(graphname) == 17))</div>
|
|
<div class="line"><a id="l01499" name="l01499"></a><span class="lineno"> 1499</span> string axes = "xyz<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01500" name="l01500"></a><span class="lineno"> 1500</span><span class="stringliteral"> string obj = "</span>surface_<span class="stringliteral">" + axes[dim] + "</span>mid<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01501" name="l01501"></a><span class="lineno"> 1501</span><span class="stringliteral"> string cmd</span></div>
|
|
<div class="line"><a id="l01502" name="l01502"></a><span class="lineno"> 1502</span><span class="stringliteral"> sprintf cmd, "</span>ModifyGizmo /N=%s ModifyObject=%s, <span class="keyword">property</span>={plane, %d}<span class="stringliteral">", graphname, obj, pp</span></div>
|
|
<div class="line"><a id="l01503" name="l01503"></a><span class="lineno"> 1503</span><span class="stringliteral"> execute /q cmd</span></div>
|
|
<div class="line"><a id="l01504" name="l01504"></a><span class="lineno"> 1504</span><span class="stringliteral"> else</span></div>
|
|
<div class="line"><a id="l01505" name="l01505"></a><span class="lineno"> 1505</span><span class="stringliteral"> return -2 // gizmo window not found</span></div>
|
|
<div class="line"><a id="l01506" name="l01506"></a><span class="lineno"> 1506</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01507" name="l01507"></a><span class="lineno"> 1507</span><span class="stringliteral"> </span></div>
|
|
<div class="line"><a id="l01508" name="l01508"></a><span class="lineno"> 1508</span><span class="stringliteral"> return 0</span></div>
|
|
<div class="line"><a id="l01509" name="l01509"></a><span class="lineno"> 1509</span><span class="stringliteral">end</span></div>
|
|
</div>
|
|
<div class="line"><a id="l01510" name="l01510"></a><span class="lineno"> 1510</span><span class="stringliteral"></span> </div>
|
|
<div class="foldopen" id="foldopen01519" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01519" name="l01519"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#abaf229d75d9d579a559295795a6bc2e1"> 1519</a></span>function ad_profiles_set_slice(brick, dim, value)</div>
|
|
<div class="line"><a id="l01520" name="l01520"></a><span class="lineno"> 1520</span> wave brick</div>
|
|
<div class="line"><a id="l01521" name="l01521"></a><span class="lineno"> 1521</span> variable dim</div>
|
|
<div class="line"><a id="l01522" name="l01522"></a><span class="lineno"> 1522</span> variable value</div>
|
|
<div class="line"><a id="l01523" name="l01523"></a><span class="lineno"> 1523</span> </div>
|
|
<div class="line"><a id="l01524" name="l01524"></a><span class="lineno"> 1524</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01525" name="l01525"></a><span class="lineno"> 1525</span> dfref datadf = GetWavesDataFolderDFR(brick)</div>
|
|
<div class="line"><a id="l01526" name="l01526"></a><span class="lineno"> 1526</span> dfref viewdf = get_view_folder(brick)</div>
|
|
<div class="line"><a id="l01527" name="l01527"></a><span class="lineno"> 1527</span> svar /z /sdfr=viewdf graphname = slice_graphname</div>
|
|
<div class="line"><a id="l01528" name="l01528"></a><span class="lineno"> 1528</span> svar /z /sdfr=viewdf slicename = slice_wavename</div>
|
|
<div class="line"><a id="l01529" name="l01529"></a><span class="lineno"> 1529</span> </div>
|
|
<div class="line"><a id="l01530" name="l01530"></a><span class="lineno"> 1530</span> variable pp = round((value - dimoffset(brick, dim)) / dimdelta(brick, dim))</div>
|
|
<div class="line"><a id="l01531" name="l01531"></a><span class="lineno"> 1531</span> if ((pp < 0) || (pp >= dimsize(brick, dim)))</div>
|
|
<div class="line"><a id="l01532" name="l01532"></a><span class="lineno"> 1532</span> return -1 // requested value out of range</div>
|
|
<div class="line"><a id="l01533" name="l01533"></a><span class="lineno"> 1533</span> endif</div>
|
|
<div class="line"><a id="l01534" name="l01534"></a><span class="lineno"> 1534</span> </div>
|
|
<div class="line"><a id="l01535" name="l01535"></a><span class="lineno"> 1535</span> if (svar_exists(graphname) && (strlen(graphname) > 0) && (wintype(graphname) == 1))</div>
|
|
<div class="line"><a id="l01536" name="l01536"></a><span class="lineno"> 1536</span> setdatafolder viewdf</div>
|
|
<div class="line"><a id="l01537" name="l01537"></a><span class="lineno"> 1537</span> switch(dim)</div>
|
|
<div class="line"><a id="l01538" name="l01538"></a><span class="lineno"> 1538</span> case 0: // X</div>
|
|
<div class="line"><a id="l01539" name="l01539"></a><span class="lineno"> 1539</span> wave wdest = ad_extract_slab_x(brick, pp, pp, slicename)</div>
|
|
<div class="line"><a id="l01540" name="l01540"></a><span class="lineno"> 1540</span> ad_update_profiles(wdest)</div>
|
|
<div class="line"><a id="l01541" name="l01541"></a><span class="lineno"> 1541</span> break</div>
|
|
<div class="line"><a id="l01542" name="l01542"></a><span class="lineno"> 1542</span> case 1: // Y</div>
|
|
<div class="line"><a id="l01543" name="l01543"></a><span class="lineno"> 1543</span> wave wdest = ad_extract_slab_y(brick, pp, pp, slicename)</div>
|
|
<div class="line"><a id="l01544" name="l01544"></a><span class="lineno"> 1544</span> ad_update_profiles(wdest)</div>
|
|
<div class="line"><a id="l01545" name="l01545"></a><span class="lineno"> 1545</span> break</div>
|
|
<div class="line"><a id="l01546" name="l01546"></a><span class="lineno"> 1546</span> case 2: // Z</div>
|
|
<div class="line"><a id="l01547" name="l01547"></a><span class="lineno"> 1547</span> wave wdest = ad_extract_slab_z(brick, pp, pp, slicename)</div>
|
|
<div class="line"><a id="l01548" name="l01548"></a><span class="lineno"> 1548</span> ad_update_profiles(wdest)</div>
|
|
<div class="line"><a id="l01549" name="l01549"></a><span class="lineno"> 1549</span> break</div>
|
|
<div class="line"><a id="l01550" name="l01550"></a><span class="lineno"> 1550</span> endswitch</div>
|
|
<div class="line"><a id="l01551" name="l01551"></a><span class="lineno"> 1551</span> else</div>
|
|
<div class="line"><a id="l01552" name="l01552"></a><span class="lineno"> 1552</span> return -2 // graph window not found</div>
|
|
<div class="line"><a id="l01553" name="l01553"></a><span class="lineno"> 1553</span> endif</div>
|
|
<div class="line"><a id="l01554" name="l01554"></a><span class="lineno"> 1554</span> </div>
|
|
<div class="line"><a id="l01555" name="l01555"></a><span class="lineno"> 1555</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l01556" name="l01556"></a><span class="lineno"> 1556</span> return 0</div>
|
|
<div class="line"><a id="l01557" name="l01557"></a><span class="lineno"> 1557</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l01558" name="l01558"></a><span class="lineno"> 1558</span> </div>
|
|
<div class="foldopen" id="foldopen01560" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01560" name="l01560"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#ace169e0824e6bddbd646972946edccbe"> 1560</a></span>static function slp_slice_position(sa) : SliderControl</div>
|
|
<div class="line"><a id="l01561" name="l01561"></a><span class="lineno"> 1561</span> STRUCT WMSliderAction &sa</div>
|
|
<div class="line"><a id="l01562" name="l01562"></a><span class="lineno"> 1562</span> </div>
|
|
<div class="line"><a id="l01563" name="l01563"></a><span class="lineno"> 1563</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01564" name="l01564"></a><span class="lineno"> 1564</span> </div>
|
|
<div class="line"><a id="l01565" name="l01565"></a><span class="lineno"> 1565</span> switch( sa.eventCode )</div>
|
|
<div class="line"><a id="l01566" name="l01566"></a><span class="lineno"> 1566</span> case -1: // control being killed</div>
|
|
<div class="line"><a id="l01567" name="l01567"></a><span class="lineno"> 1567</span> break</div>
|
|
<div class="line"><a id="l01568" name="l01568"></a><span class="lineno"> 1568</span> default:</div>
|
|
<div class="line"><a id="l01569" name="l01569"></a><span class="lineno"> 1569</span> if( sa.eventCode & 1 ) // value set</div>
|
|
<div class="line"><a id="l01570" name="l01570"></a><span class="lineno"> 1570</span> string control_datafolder = GetUserData(sa.win, "<span class="stringliteral">", "</span>control_datafolder<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01571" name="l01571"></a><span class="lineno"> 1571</span><span class="stringliteral"> setdatafolder control_datafolder</span></div>
|
|
<div class="line"><a id="l01572" name="l01572"></a><span class="lineno"> 1572</span><span class="stringliteral"> string brick_path = GetUserData(sa.win, "</span><span class="stringliteral">", "</span>brick_path<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01573" name="l01573"></a><span class="lineno"> 1573</span><span class="stringliteral"> string axis = StringFromList(1, sa.ctrlName, "</span>_<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01574" name="l01574"></a><span class="lineno"> 1574</span><span class="stringliteral"> variable dim = char2num(axis[0]) - char2num("</span>x<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01575" name="l01575"></a><span class="lineno"> 1575</span><span class="stringliteral"> </span></div>
|
|
<div class="line"><a id="l01576" name="l01576"></a><span class="lineno"> 1576</span><span class="stringliteral"> wave /z brick = $brick_path</span></div>
|
|
<div class="line"><a id="l01577" name="l01577"></a><span class="lineno"> 1577</span><span class="stringliteral"> if (WaveExists(brick))</span></div>
|
|
<div class="line"><a id="l01578" name="l01578"></a><span class="lineno"> 1578</span><span class="stringliteral"> ad_gizmo_set_plane(brick, dim, sa.curval)</span></div>
|
|
<div class="line"><a id="l01579" name="l01579"></a><span class="lineno"> 1579</span><span class="stringliteral"> ad_profiles_set_slice(brick, dim, sa.curval)</span></div>
|
|
<div class="line"><a id="l01580" name="l01580"></a><span class="lineno"> 1580</span><span class="stringliteral"> else</span></div>
|
|
<div class="line"><a id="l01581" name="l01581"></a><span class="lineno"> 1581</span><span class="stringliteral"> Abort "</span>can<span class="stringliteral">'t find original wave " + brick_path</span></div>
|
|
<div class="line"><a id="l01582" name="l01582"></a><span class="lineno"> 1582</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01583" name="l01583"></a><span class="lineno"> 1583</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01584" name="l01584"></a><span class="lineno"> 1584</span><span class="stringliteral"> break</span></div>
|
|
<div class="line"><a id="l01585" name="l01585"></a><span class="lineno"> 1585</span><span class="stringliteral"> endswitch</span></div>
|
|
<div class="line"><a id="l01586" name="l01586"></a><span class="lineno"> 1586</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01587" name="l01587"></a><span class="lineno"> 1587</span><span class="stringliteral"> setdatafolder savedf</span></div>
|
|
<div class="line"><a id="l01588" name="l01588"></a><span class="lineno"> 1588</span><span class="stringliteral"> return 0</span></div>
|
|
<div class="line"><a id="l01589" name="l01589"></a><span class="lineno"> 1589</span><span class="stringliteral">End</span></div>
|
|
</div>
|
|
<div class="line"><a id="l01590" name="l01590"></a><span class="lineno"> 1590</span><span class="stringliteral"></span> </div>
|
|
<div class="foldopen" id="foldopen01592" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01592" name="l01592"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a174177742fdce7f37027de8fa832b3bd"> 1592</a></span>static function svp_slice_position(sva) : SetVariableControl</div>
|
|
<div class="line"><a id="l01593" name="l01593"></a><span class="lineno"> 1593</span> STRUCT WMSetVariableAction &sva</div>
|
|
<div class="line"><a id="l01594" name="l01594"></a><span class="lineno"> 1594</span> </div>
|
|
<div class="line"><a id="l01595" name="l01595"></a><span class="lineno"> 1595</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01596" name="l01596"></a><span class="lineno"> 1596</span> </div>
|
|
<div class="line"><a id="l01597" name="l01597"></a><span class="lineno"> 1597</span> switch( sva.eventCode )</div>
|
|
<div class="line"><a id="l01598" name="l01598"></a><span class="lineno"> 1598</span> case 1: // mouse up</div>
|
|
<div class="line"><a id="l01599" name="l01599"></a><span class="lineno"> 1599</span> case 2: // Enter key</div>
|
|
<div class="line"><a id="l01600" name="l01600"></a><span class="lineno"> 1600</span> case 3: // Live update</div>
|
|
<div class="line"><a id="l01601" name="l01601"></a><span class="lineno"> 1601</span> string control_datafolder = GetUserData(sva.win, "", "control_datafolder")</div>
|
|
<div class="line"><a id="l01602" name="l01602"></a><span class="lineno"> 1602</span> setdatafolder control_datafolder</div>
|
|
<div class="line"><a id="l01603" name="l01603"></a><span class="lineno"> 1603</span> string brick_path = GetUserData(sva.win, "", "brick_path")</div>
|
|
<div class="line"><a id="l01604" name="l01604"></a><span class="lineno"> 1604</span> string axis = StringFromList(1, sva.ctrlName, "_")</div>
|
|
<div class="line"><a id="l01605" name="l01605"></a><span class="lineno"> 1605</span> variable dim = char2num(axis[0]) - char2num("x")</div>
|
|
<div class="line"><a id="l01606" name="l01606"></a><span class="lineno"> 1606</span> </div>
|
|
<div class="line"><a id="l01607" name="l01607"></a><span class="lineno"> 1607</span> wave /z brick = $brick_path</div>
|
|
<div class="line"><a id="l01608" name="l01608"></a><span class="lineno"> 1608</span> if (WaveExists(brick))</div>
|
|
<div class="line"><a id="l01609" name="l01609"></a><span class="lineno"> 1609</span> ad_gizmo_set_plane(brick, dim, sva.dval)</div>
|
|
<div class="line"><a id="l01610" name="l01610"></a><span class="lineno"> 1610</span> ad_profiles_set_slice(brick, dim, sva.dval)</div>
|
|
<div class="line"><a id="l01611" name="l01611"></a><span class="lineno"> 1611</span> else</div>
|
|
<div class="line"><a id="l01612" name="l01612"></a><span class="lineno"> 1612</span> Abort "can't find original wave <span class="stringliteral">" + brick_path</span></div>
|
|
<div class="line"><a id="l01613" name="l01613"></a><span class="lineno"> 1613</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01614" name="l01614"></a><span class="lineno"> 1614</span><span class="stringliteral"> break</span></div>
|
|
<div class="line"><a id="l01615" name="l01615"></a><span class="lineno"> 1615</span><span class="stringliteral"> case -1: // control being killed</span></div>
|
|
<div class="line"><a id="l01616" name="l01616"></a><span class="lineno"> 1616</span><span class="stringliteral"> break</span></div>
|
|
<div class="line"><a id="l01617" name="l01617"></a><span class="lineno"> 1617</span><span class="stringliteral"> endswitch</span></div>
|
|
<div class="line"><a id="l01618" name="l01618"></a><span class="lineno"> 1618</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01619" name="l01619"></a><span class="lineno"> 1619</span><span class="stringliteral"> setdatafolder savedf</span></div>
|
|
<div class="line"><a id="l01620" name="l01620"></a><span class="lineno"> 1620</span><span class="stringliteral"> return 0</span></div>
|
|
<div class="line"><a id="l01621" name="l01621"></a><span class="lineno"> 1621</span><span class="stringliteral">End</span></div>
|
|
</div>
|
|
<div class="line"><a id="l01622" name="l01622"></a><span class="lineno"> 1622</span><span class="stringliteral"></span> </div>
|
|
<div class="foldopen" id="foldopen01624" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01624" name="l01624"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#ab8c9979c6f3ab95f983c2a525a69c035"> 1624</a></span>static function bp_move_slice(ba) : ButtonControl</div>
|
|
<div class="line"><a id="l01625" name="l01625"></a><span class="lineno"> 1625</span> STRUCT WMButtonAction &ba</div>
|
|
<div class="line"><a id="l01626" name="l01626"></a><span class="lineno"> 1626</span> </div>
|
|
<div class="line"><a id="l01627" name="l01627"></a><span class="lineno"> 1627</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01628" name="l01628"></a><span class="lineno"> 1628</span> </div>
|
|
<div class="line"><a id="l01629" name="l01629"></a><span class="lineno"> 1629</span> switch( ba.eventCode )</div>
|
|
<div class="line"><a id="l01630" name="l01630"></a><span class="lineno"> 1630</span> case 2: // mouse up</div>
|
|
<div class="line"><a id="l01631" name="l01631"></a><span class="lineno"> 1631</span> string control_datafolder = GetUserData(ba.win, "<span class="stringliteral">", "</span>control_datafolder<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01632" name="l01632"></a><span class="lineno"> 1632</span><span class="stringliteral"> setdatafolder control_datafolder</span></div>
|
|
<div class="line"><a id="l01633" name="l01633"></a><span class="lineno"> 1633</span><span class="stringliteral"> string brick_path = GetUserData(ba.win, "</span><span class="stringliteral">", "</span>brick_path<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01634" name="l01634"></a><span class="lineno"> 1634</span><span class="stringliteral"> string axis = StringFromList(1, ba.ctrlName, "</span>_<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01635" name="l01635"></a><span class="lineno"> 1635</span><span class="stringliteral"> string cmd = StringFromList(2, ba.ctrlName, "</span>_<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01636" name="l01636"></a><span class="lineno"> 1636</span><span class="stringliteral"> variable dim = char2num(axis[0]) - char2num("</span>x<span class="stringliteral">")</span></div>
|
|
<div class="line"><a id="l01637" name="l01637"></a><span class="lineno"> 1637</span><span class="stringliteral"> string posvariable = getdatafolder(1) + axis[0] + "</span>_slice_pos<span class="stringliteral">"</span></div>
|
|
<div class="line"><a id="l01638" name="l01638"></a><span class="lineno"> 1638</span><span class="stringliteral"> nvar pos = $(posvariable)</span></div>
|
|
<div class="line"><a id="l01639" name="l01639"></a><span class="lineno"> 1639</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01640" name="l01640"></a><span class="lineno"> 1640</span><span class="stringliteral"> wave /z brick = $brick_path</span></div>
|
|
<div class="line"><a id="l01641" name="l01641"></a><span class="lineno"> 1641</span><span class="stringliteral"> if (WaveExists(brick))</span></div>
|
|
<div class="line"><a id="l01642" name="l01642"></a><span class="lineno"> 1642</span><span class="stringliteral"> strswitch (cmd)</span></div>
|
|
<div class="line"><a id="l01643" name="l01643"></a><span class="lineno"> 1643</span><span class="stringliteral"> case "</span>forward<span class="stringliteral">":</span></div>
|
|
<div class="line"><a id="l01644" name="l01644"></a><span class="lineno"> 1644</span><span class="stringliteral"> ad_slicer_start_bg(brick, dim, posvariable, dimdelta(brick, dim))</span></div>
|
|
<div class="line"><a id="l01645" name="l01645"></a><span class="lineno"> 1645</span><span class="stringliteral"> break</span></div>
|
|
<div class="line"><a id="l01646" name="l01646"></a><span class="lineno"> 1646</span><span class="stringliteral"> case "</span>back<span class="stringliteral">":</span></div>
|
|
<div class="line"><a id="l01647" name="l01647"></a><span class="lineno"> 1647</span><span class="stringliteral"> ad_slicer_start_bg(brick, dim, posvariable, -dimdelta(brick, dim))</span></div>
|
|
<div class="line"><a id="l01648" name="l01648"></a><span class="lineno"> 1648</span><span class="stringliteral"> break</span></div>
|
|
<div class="line"><a id="l01649" name="l01649"></a><span class="lineno"> 1649</span><span class="stringliteral"> case "</span>center<span class="stringliteral">":</span></div>
|
|
<div class="line"><a id="l01650" name="l01650"></a><span class="lineno"> 1650</span><span class="stringliteral"> ad_slicer_stop_bg(posvariable)</span></div>
|
|
<div class="line"><a id="l01651" name="l01651"></a><span class="lineno"> 1651</span><span class="stringliteral"> bp_move_slice_center(brick, dim, posvariable)</span></div>
|
|
<div class="line"><a id="l01652" name="l01652"></a><span class="lineno"> 1652</span><span class="stringliteral"> break</span></div>
|
|
<div class="line"><a id="l01653" name="l01653"></a><span class="lineno"> 1653</span><span class="stringliteral"> case "</span>stop<span class="stringliteral">":</span></div>
|
|
<div class="line"><a id="l01654" name="l01654"></a><span class="lineno"> 1654</span><span class="stringliteral"> ad_slicer_stop_bg(posvariable)</span></div>
|
|
<div class="line"><a id="l01655" name="l01655"></a><span class="lineno"> 1655</span><span class="stringliteral"> break</span></div>
|
|
<div class="line"><a id="l01656" name="l01656"></a><span class="lineno"> 1656</span><span class="stringliteral"> endswitch</span></div>
|
|
<div class="line"><a id="l01657" name="l01657"></a><span class="lineno"> 1657</span><span class="stringliteral"> else</span></div>
|
|
<div class="line"><a id="l01658" name="l01658"></a><span class="lineno"> 1658</span><span class="stringliteral"> ad_slicer_stop_bg(posvariable)</span></div>
|
|
<div class="line"><a id="l01659" name="l01659"></a><span class="lineno"> 1659</span><span class="stringliteral"> Abort "</span>can<span class="stringliteral">'t find original wave " + brick_path</span></div>
|
|
<div class="line"><a id="l01660" name="l01660"></a><span class="lineno"> 1660</span><span class="stringliteral"> endif</span></div>
|
|
<div class="line"><a id="l01661" name="l01661"></a><span class="lineno"> 1661</span><span class="stringliteral"> break</span></div>
|
|
<div class="line"><a id="l01662" name="l01662"></a><span class="lineno"> 1662</span><span class="stringliteral"> case -1: // control being killed</span></div>
|
|
<div class="line"><a id="l01663" name="l01663"></a><span class="lineno"> 1663</span><span class="stringliteral"> break</span></div>
|
|
<div class="line"><a id="l01664" name="l01664"></a><span class="lineno"> 1664</span><span class="stringliteral"> endswitch</span></div>
|
|
<div class="line"><a id="l01665" name="l01665"></a><span class="lineno"> 1665</span><span class="stringliteral"></span> </div>
|
|
<div class="line"><a id="l01666" name="l01666"></a><span class="lineno"> 1666</span><span class="stringliteral"> setdatafolder savedf</span></div>
|
|
<div class="line"><a id="l01667" name="l01667"></a><span class="lineno"> 1667</span><span class="stringliteral"> return 0</span></div>
|
|
<div class="line"><a id="l01668" name="l01668"></a><span class="lineno"> 1668</span><span class="stringliteral">End</span></div>
|
|
</div>
|
|
<div class="line"><a id="l01669" name="l01669"></a><span class="lineno"> 1669</span><span class="stringliteral"></span> </div>
|
|
<div class="foldopen" id="foldopen01673" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01673" name="l01673"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a31461b664ec651a39442e9a46ffd88c9"> 1673</a></span>static function bp_extract_slice(ba) : ButtonControl</div>
|
|
<div class="line"><a id="l01674" name="l01674"></a><span class="lineno"> 1674</span> STRUCT WMButtonAction &ba</div>
|
|
<div class="line"><a id="l01675" name="l01675"></a><span class="lineno"> 1675</span> </div>
|
|
<div class="line"><a id="l01676" name="l01676"></a><span class="lineno"> 1676</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01677" name="l01677"></a><span class="lineno"> 1677</span> </div>
|
|
<div class="line"><a id="l01678" name="l01678"></a><span class="lineno"> 1678</span> switch( ba.eventCode )</div>
|
|
<div class="line"><a id="l01679" name="l01679"></a><span class="lineno"> 1679</span> case 2: // mouse up</div>
|
|
<div class="line"><a id="l01680" name="l01680"></a><span class="lineno"> 1680</span> string control_datafolder = GetUserData(ba.win, "", "control_datafolder")</div>
|
|
<div class="line"><a id="l01681" name="l01681"></a><span class="lineno"> 1681</span> setdatafolder control_datafolder</div>
|
|
<div class="line"><a id="l01682" name="l01682"></a><span class="lineno"> 1682</span> string brick_path = GetUserData(ba.win, "", "brick_path")</div>
|
|
<div class="line"><a id="l01683" name="l01683"></a><span class="lineno"> 1683</span> wave brick = $brick_path</div>
|
|
<div class="line"><a id="l01684" name="l01684"></a><span class="lineno"> 1684</span> dfref brickdf = GetWavesDataFolderDFR(brick)</div>
|
|
<div class="line"><a id="l01685" name="l01685"></a><span class="lineno"> 1685</span> </div>
|
|
<div class="line"><a id="l01686" name="l01686"></a><span class="lineno"> 1686</span> string axis = StringFromList(1, ba.ctrlName, "_")</div>
|
|
<div class="line"><a id="l01687" name="l01687"></a><span class="lineno"> 1687</span> string cmd = StringFromList(2, ba.ctrlName, "_")</div>
|
|
<div class="line"><a id="l01688" name="l01688"></a><span class="lineno"> 1688</span> variable dim = char2num(axis[0]) - char2num("x")</div>
|
|
<div class="line"><a id="l01689" name="l01689"></a><span class="lineno"> 1689</span> string posvariable = getdatafolder(1) + axis[0] + "_slice_pos"</div>
|
|
<div class="line"><a id="l01690" name="l01690"></a><span class="lineno"> 1690</span> </div>
|
|
<div class="line"><a id="l01691" name="l01691"></a><span class="lineno"> 1691</span> nvar pos = $(posvariable)</div>
|
|
<div class="line"><a id="l01692" name="l01692"></a><span class="lineno"> 1692</span> variable pp = round((pos - dimoffset(brick, dim)) / dimdelta(brick, dim))</div>
|
|
<div class="line"><a id="l01693" name="l01693"></a><span class="lineno"> 1693</span> if ((pp < 0) || (pp >= dimsize(brick, dim)))</div>
|
|
<div class="line"><a id="l01694" name="l01694"></a><span class="lineno"> 1694</span> return -1 // requested value out of range</div>
|
|
<div class="line"><a id="l01695" name="l01695"></a><span class="lineno"> 1695</span> endif</div>
|
|
<div class="line"><a id="l01696" name="l01696"></a><span class="lineno"> 1696</span> </div>
|
|
<div class="line"><a id="l01697" name="l01697"></a><span class="lineno"> 1697</span> variable dig = ceil(log(dimsize(brick, dim)))</div>
|
|
<div class="line"><a id="l01698" name="l01698"></a><span class="lineno"> 1698</span> string slicename</div>
|
|
<div class="line"><a id="l01699" name="l01699"></a><span class="lineno"> 1699</span> sprintf slicename, "%s_%s%0*u", NameOfWave(brick), axis[0], dig, pp</div>
|
|
<div class="line"><a id="l01700" name="l01700"></a><span class="lineno"> 1700</span> setdatafolder brickdf</div>
|
|
<div class="line"><a id="l01701" name="l01701"></a><span class="lineno"> 1701</span> switch(dim)</div>
|
|
<div class="line"><a id="l01702" name="l01702"></a><span class="lineno"> 1702</span> case 0: // X</div>
|
|
<div class="line"><a id="l01703" name="l01703"></a><span class="lineno"> 1703</span> wave wdest = ad_extract_slab_x(brick, pp, pp, slicename)</div>
|
|
<div class="line"><a id="l01704" name="l01704"></a><span class="lineno"> 1704</span> break</div>
|
|
<div class="line"><a id="l01705" name="l01705"></a><span class="lineno"> 1705</span> case 1: // Y</div>
|
|
<div class="line"><a id="l01706" name="l01706"></a><span class="lineno"> 1706</span> wave wdest = ad_extract_slab_y(brick, pp, pp, slicename)</div>
|
|
<div class="line"><a id="l01707" name="l01707"></a><span class="lineno"> 1707</span> break</div>
|
|
<div class="line"><a id="l01708" name="l01708"></a><span class="lineno"> 1708</span> case 2: // Z</div>
|
|
<div class="line"><a id="l01709" name="l01709"></a><span class="lineno"> 1709</span> wave wdest = ad_extract_slab_z(brick, pp, pp, slicename)</div>
|
|
<div class="line"><a id="l01710" name="l01710"></a><span class="lineno"> 1710</span> break</div>
|
|
<div class="line"><a id="l01711" name="l01711"></a><span class="lineno"> 1711</span> endswitch</div>
|
|
<div class="line"><a id="l01712" name="l01712"></a><span class="lineno"> 1712</span> </div>
|
|
<div class="line"><a id="l01713" name="l01713"></a><span class="lineno"> 1713</span> string msg</div>
|
|
<div class="line"><a id="l01714" name="l01714"></a><span class="lineno"> 1714</span> sprintf msg, "%s=%g", axis[0], pos</div>
|
|
<div class="line"><a id="l01715" name="l01715"></a><span class="lineno"> 1715</span> note wdest, msg</div>
|
|
<div class="line"><a id="l01716" name="l01716"></a><span class="lineno"> 1716</span> </div>
|
|
<div class="line"><a id="l01717" name="l01717"></a><span class="lineno"> 1717</span> break</div>
|
|
<div class="line"><a id="l01718" name="l01718"></a><span class="lineno"> 1718</span> case -1: // control being killed</div>
|
|
<div class="line"><a id="l01719" name="l01719"></a><span class="lineno"> 1719</span> break</div>
|
|
<div class="line"><a id="l01720" name="l01720"></a><span class="lineno"> 1720</span> endswitch</div>
|
|
<div class="line"><a id="l01721" name="l01721"></a><span class="lineno"> 1721</span> </div>
|
|
<div class="line"><a id="l01722" name="l01722"></a><span class="lineno"> 1722</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l01723" name="l01723"></a><span class="lineno"> 1723</span> return 0</div>
|
|
<div class="line"><a id="l01724" name="l01724"></a><span class="lineno"> 1724</span>End</div>
|
|
</div>
|
|
<div class="line"><a id="l01725" name="l01725"></a><span class="lineno"> 1725</span> </div>
|
|
<div class="foldopen" id="foldopen01727" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01727" name="l01727"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#abe702d40071e3c5e662eb8d47dd6d885"> 1727</a></span>static function bp_move_slice_center(brick, dim, posvariable)</div>
|
|
<div class="line"><a id="l01728" name="l01728"></a><span class="lineno"> 1728</span> wave brick</div>
|
|
<div class="line"><a id="l01729" name="l01729"></a><span class="lineno"> 1729</span> variable dim</div>
|
|
<div class="line"><a id="l01730" name="l01730"></a><span class="lineno"> 1730</span> string posvariable</div>
|
|
<div class="line"><a id="l01731" name="l01731"></a><span class="lineno"> 1731</span> </div>
|
|
<div class="line"><a id="l01732" name="l01732"></a><span class="lineno"> 1732</span> nvar pos = $posvariable</div>
|
|
<div class="line"><a id="l01733" name="l01733"></a><span class="lineno"> 1733</span> pos = dimoffset(brick, dim) + dimdelta(brick, dim) * dimsize(brick, dim) / 2</div>
|
|
<div class="line"><a id="l01734" name="l01734"></a><span class="lineno"> 1734</span> ad_gizmo_set_plane(brick, dim, pos)</div>
|
|
<div class="line"><a id="l01735" name="l01735"></a><span class="lineno"> 1735</span> ad_profiles_set_slice(brick, dim, pos)</div>
|
|
<div class="line"><a id="l01736" name="l01736"></a><span class="lineno"> 1736</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l01737" name="l01737"></a><span class="lineno"> 1737</span> </div>
|
|
<div class="foldopen" id="foldopen01739" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01739" name="l01739"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a4af98ec7af48a653c6fac716ea8fa505"> 1739</a></span>static function ad_slicer_move_bg(s)</div>
|
|
<div class="line"><a id="l01740" name="l01740"></a><span class="lineno"> 1740</span> STRUCT WMBackgroundStruct &s</div>
|
|
<div class="line"><a id="l01741" name="l01741"></a><span class="lineno"> 1741</span> </div>
|
|
<div class="line"><a id="l01742" name="l01742"></a><span class="lineno"> 1742</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01743" name="l01743"></a><span class="lineno"> 1743</span> setdatafolder root:pearl_area:slicer</div>
|
|
<div class="line"><a id="l01744" name="l01744"></a><span class="lineno"> 1744</span> wave /t bg_brickpaths</div>
|
|
<div class="line"><a id="l01745" name="l01745"></a><span class="lineno"> 1745</span> wave /t bg_graphnames</div>
|
|
<div class="line"><a id="l01746" name="l01746"></a><span class="lineno"> 1746</span> wave /t bg_variablepaths</div>
|
|
<div class="line"><a id="l01747" name="l01747"></a><span class="lineno"> 1747</span> wave bg_dimensions</div>
|
|
<div class="line"><a id="l01748" name="l01748"></a><span class="lineno"> 1748</span> wave bg_increments</div>
|
|
<div class="line"><a id="l01749" name="l01749"></a><span class="lineno"> 1749</span> </div>
|
|
<div class="line"><a id="l01750" name="l01750"></a><span class="lineno"> 1750</span> variable ii</div>
|
|
<div class="line"><a id="l01751" name="l01751"></a><span class="lineno"> 1751</span> variable nn = numpnts(bg_brickpaths)</div>
|
|
<div class="line"><a id="l01752" name="l01752"></a><span class="lineno"> 1752</span> variable dim</div>
|
|
<div class="line"><a id="l01753" name="l01753"></a><span class="lineno"> 1753</span> variable pp</div>
|
|
<div class="line"><a id="l01754" name="l01754"></a><span class="lineno"> 1754</span> </div>
|
|
<div class="line"><a id="l01755" name="l01755"></a><span class="lineno"> 1755</span> for (ii = 0; ii < nn; ii += 1)</div>
|
|
<div class="line"><a id="l01756" name="l01756"></a><span class="lineno"> 1756</span> wave /z brick = $bg_brickpaths[ii]</div>
|
|
<div class="line"><a id="l01757" name="l01757"></a><span class="lineno"> 1757</span> nvar /z pos = $bg_variablepaths[ii]</div>
|
|
<div class="line"><a id="l01758" name="l01758"></a><span class="lineno"> 1758</span> dim = bg_dimensions[0]</div>
|
|
<div class="line"><a id="l01759" name="l01759"></a><span class="lineno"> 1759</span> pos += bg_increments[ii]</div>
|
|
<div class="line"><a id="l01760" name="l01760"></a><span class="lineno"> 1760</span> // wrap around at limits</div>
|
|
<div class="line"><a id="l01761" name="l01761"></a><span class="lineno"> 1761</span> pp = round((pos - dimoffset(brick, dim)) / dimdelta(brick, dim))</div>
|
|
<div class="line"><a id="l01762" name="l01762"></a><span class="lineno"> 1762</span> if (pp <= -0.5)</div>
|
|
<div class="line"><a id="l01763" name="l01763"></a><span class="lineno"> 1763</span> pos = dimoffset(brick, dim) + dimdelta(brick, dim) * (dimsize(brick, dim) - 1)</div>
|
|
<div class="line"><a id="l01764" name="l01764"></a><span class="lineno"> 1764</span> elseif (pp >= dimsize(brick, dim) - 0.5)</div>
|
|
<div class="line"><a id="l01765" name="l01765"></a><span class="lineno"> 1765</span> pos = dimoffset(brick, dim)</div>
|
|
<div class="line"><a id="l01766" name="l01766"></a><span class="lineno"> 1766</span> endif</div>
|
|
<div class="line"><a id="l01767" name="l01767"></a><span class="lineno"> 1767</span> if (waveexists(brick))</div>
|
|
<div class="line"><a id="l01768" name="l01768"></a><span class="lineno"> 1768</span> ad_gizmo_set_plane(brick, dim, pos)</div>
|
|
<div class="line"><a id="l01769" name="l01769"></a><span class="lineno"> 1769</span> ad_profiles_set_slice(brick, dim, pos)</div>
|
|
<div class="line"><a id="l01770" name="l01770"></a><span class="lineno"> 1770</span> endif</div>
|
|
<div class="line"><a id="l01771" name="l01771"></a><span class="lineno"> 1771</span> endfor</div>
|
|
<div class="line"><a id="l01772" name="l01772"></a><span class="lineno"> 1772</span> </div>
|
|
<div class="line"><a id="l01773" name="l01773"></a><span class="lineno"> 1773</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l01774" name="l01774"></a><span class="lineno"> 1774</span> return 0</div>
|
|
<div class="line"><a id="l01775" name="l01775"></a><span class="lineno"> 1775</span>End</div>
|
|
</div>
|
|
<div class="line"><a id="l01776" name="l01776"></a><span class="lineno"> 1776</span> </div>
|
|
<div class="foldopen" id="foldopen01778" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01778" name="l01778"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a7334815c60e2c11e2754c07489a62f4b"> 1778</a></span>function ad_slicer_init_bg()</div>
|
|
<div class="line"><a id="l01779" name="l01779"></a><span class="lineno"> 1779</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01780" name="l01780"></a><span class="lineno"> 1780</span> setdatafolder root:</div>
|
|
<div class="line"><a id="l01781" name="l01781"></a><span class="lineno"> 1781</span> newdatafolder /o/s pearl_area</div>
|
|
<div class="line"><a id="l01782" name="l01782"></a><span class="lineno"> 1782</span> newdatafolder /o/s slicer</div>
|
|
<div class="line"><a id="l01783" name="l01783"></a><span class="lineno"> 1783</span> </div>
|
|
<div class="line"><a id="l01784" name="l01784"></a><span class="lineno"> 1784</span> make /n=0/o/t bg_brickpaths</div>
|
|
<div class="line"><a id="l01785" name="l01785"></a><span class="lineno"> 1785</span> make /n=0/o/t bg_variablepaths</div>
|
|
<div class="line"><a id="l01786" name="l01786"></a><span class="lineno"> 1786</span> make /n=0/o/i/u bg_dimensions</div>
|
|
<div class="line"><a id="l01787" name="l01787"></a><span class="lineno"> 1787</span> make /n=0/o bg_increments</div>
|
|
<div class="line"><a id="l01788" name="l01788"></a><span class="lineno"> 1788</span> </div>
|
|
<div class="line"><a id="l01789" name="l01789"></a><span class="lineno"> 1789</span> CtrlNamedBackground ad_slicer, period = 30, proc = PearlAreaDisplay#ad_slicer_move_bg</div>
|
|
<div class="line"><a id="l01790" name="l01790"></a><span class="lineno"> 1790</span> </div>
|
|
<div class="line"><a id="l01791" name="l01791"></a><span class="lineno"> 1791</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l01792" name="l01792"></a><span class="lineno"> 1792</span> return 0</div>
|
|
<div class="line"><a id="l01793" name="l01793"></a><span class="lineno"> 1793</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l01794" name="l01794"></a><span class="lineno"> 1794</span> </div>
|
|
<div class="foldopen" id="foldopen01802" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01802" name="l01802"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#ad79b37ab4fcf2cbdad6874813d93d4b1"> 1802</a></span>function ad_slicer_start_bg(brick, dimension, posvariable, delta)</div>
|
|
<div class="line"><a id="l01803" name="l01803"></a><span class="lineno"> 1803</span> wave brick // 3D data wave</div>
|
|
<div class="line"><a id="l01804" name="l01804"></a><span class="lineno"> 1804</span> variable dimension // dimension to animate, 0, 1, or 2</div>
|
|
<div class="line"><a id="l01805" name="l01805"></a><span class="lineno"> 1805</span> string posvariable // full path to the global position variable</div>
|
|
<div class="line"><a id="l01806" name="l01806"></a><span class="lineno"> 1806</span> variable delta // step increment, should be +/- dimdelta</div>
|
|
<div class="line"><a id="l01807" name="l01807"></a><span class="lineno"> 1807</span> </div>
|
|
<div class="line"><a id="l01808" name="l01808"></a><span class="lineno"> 1808</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01809" name="l01809"></a><span class="lineno"> 1809</span> setdatafolder root:pearl_area:slicer</div>
|
|
<div class="line"><a id="l01810" name="l01810"></a><span class="lineno"> 1810</span> wave /t bg_brickpaths</div>
|
|
<div class="line"><a id="l01811" name="l01811"></a><span class="lineno"> 1811</span> wave /t bg_variablepaths</div>
|
|
<div class="line"><a id="l01812" name="l01812"></a><span class="lineno"> 1812</span> wave bg_dimensions</div>
|
|
<div class="line"><a id="l01813" name="l01813"></a><span class="lineno"> 1813</span> wave bg_increments</div>
|
|
<div class="line"><a id="l01814" name="l01814"></a><span class="lineno"> 1814</span> </div>
|
|
<div class="line"><a id="l01815" name="l01815"></a><span class="lineno"> 1815</span> // create entry in ad_slicer background task table</div>
|
|
<div class="line"><a id="l01816" name="l01816"></a><span class="lineno"> 1816</span> variable idx</div>
|
|
<div class="line"><a id="l01817" name="l01817"></a><span class="lineno"> 1817</span> FindValue /TEXT=posvariable /TXOP=4 /Z bg_variablepaths</div>
|
|
<div class="line"><a id="l01818" name="l01818"></a><span class="lineno"> 1818</span> if (v_value >= 0)</div>
|
|
<div class="line"><a id="l01819" name="l01819"></a><span class="lineno"> 1819</span> idx = v_value</div>
|
|
<div class="line"><a id="l01820" name="l01820"></a><span class="lineno"> 1820</span> else</div>
|
|
<div class="line"><a id="l01821" name="l01821"></a><span class="lineno"> 1821</span> idx = numpnts(bg_variablepaths)</div>
|
|
<div class="line"><a id="l01822" name="l01822"></a><span class="lineno"> 1822</span> InsertPoints idx, 1, bg_brickpaths, bg_variablepaths, bg_dimensions, bg_increments</div>
|
|
<div class="line"><a id="l01823" name="l01823"></a><span class="lineno"> 1823</span> endif</div>
|
|
<div class="line"><a id="l01824" name="l01824"></a><span class="lineno"> 1824</span> </div>
|
|
<div class="line"><a id="l01825" name="l01825"></a><span class="lineno"> 1825</span> // set background task</div>
|
|
<div class="line"><a id="l01826" name="l01826"></a><span class="lineno"> 1826</span> bg_brickpaths[idx] = GetWavesDataFolder(brick, 2)</div>
|
|
<div class="line"><a id="l01827" name="l01827"></a><span class="lineno"> 1827</span> bg_variablepaths[idx] = posvariable</div>
|
|
<div class="line"><a id="l01828" name="l01828"></a><span class="lineno"> 1828</span> bg_dimensions[idx] = dimension</div>
|
|
<div class="line"><a id="l01829" name="l01829"></a><span class="lineno"> 1829</span> bg_increments[idx] = delta</div>
|
|
<div class="line"><a id="l01830" name="l01830"></a><span class="lineno"> 1830</span> </div>
|
|
<div class="line"><a id="l01831" name="l01831"></a><span class="lineno"> 1831</span> // start background task</div>
|
|
<div class="line"><a id="l01832" name="l01832"></a><span class="lineno"> 1832</span> if (numpnts(bg_variablepaths) > 0)</div>
|
|
<div class="line"><a id="l01833" name="l01833"></a><span class="lineno"> 1833</span> CtrlNamedBackground ad_slicer, start</div>
|
|
<div class="line"><a id="l01834" name="l01834"></a><span class="lineno"> 1834</span> endif</div>
|
|
<div class="line"><a id="l01835" name="l01835"></a><span class="lineno"> 1835</span> </div>
|
|
<div class="line"><a id="l01836" name="l01836"></a><span class="lineno"> 1836</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l01837" name="l01837"></a><span class="lineno"> 1837</span> return 0</div>
|
|
<div class="line"><a id="l01838" name="l01838"></a><span class="lineno"> 1838</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l01839" name="l01839"></a><span class="lineno"> 1839</span> </div>
|
|
<div class="foldopen" id="foldopen01844" data-start="{" data-end="}">
|
|
<div class="line"><a id="l01844" name="l01844"></a><span class="lineno"><a class="line" href="pearl-area-display_8ipf.html#a77a71985e716a300e0b61c233cd93f40"> 1844</a></span>function ad_slicer_stop_bg(posvariable)</div>
|
|
<div class="line"><a id="l01845" name="l01845"></a><span class="lineno"> 1845</span> string posvariable</div>
|
|
<div class="line"><a id="l01846" name="l01846"></a><span class="lineno"> 1846</span> </div>
|
|
<div class="line"><a id="l01847" name="l01847"></a><span class="lineno"> 1847</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l01848" name="l01848"></a><span class="lineno"> 1848</span> setdatafolder root:pearl_area:slicer</div>
|
|
<div class="line"><a id="l01849" name="l01849"></a><span class="lineno"> 1849</span> wave /t bg_brickpaths</div>
|
|
<div class="line"><a id="l01850" name="l01850"></a><span class="lineno"> 1850</span> wave /t bg_variablepaths</div>
|
|
<div class="line"><a id="l01851" name="l01851"></a><span class="lineno"> 1851</span> wave bg_dimensions</div>
|
|
<div class="line"><a id="l01852" name="l01852"></a><span class="lineno"> 1852</span> wave bg_increments</div>
|
|
<div class="line"><a id="l01853" name="l01853"></a><span class="lineno"> 1853</span> </div>
|
|
<div class="line"><a id="l01854" name="l01854"></a><span class="lineno"> 1854</span> // find entry in ad_slicer background task table</div>
|
|
<div class="line"><a id="l01855" name="l01855"></a><span class="lineno"> 1855</span> FindValue /TEXT=posvariable /TXOP=4 /Z bg_variablepaths</div>
|
|
<div class="line"><a id="l01856" name="l01856"></a><span class="lineno"> 1856</span> if (v_value >= 0)</div>
|
|
<div class="line"><a id="l01857" name="l01857"></a><span class="lineno"> 1857</span> DeletePoints v_value, 1, bg_brickpaths, bg_variablepaths, bg_dimensions, bg_increments</div>
|
|
<div class="line"><a id="l01858" name="l01858"></a><span class="lineno"> 1858</span> endif</div>
|
|
<div class="line"><a id="l01859" name="l01859"></a><span class="lineno"> 1859</span> </div>
|
|
<div class="line"><a id="l01860" name="l01860"></a><span class="lineno"> 1860</span> // stop background task if task table is empty</div>
|
|
<div class="line"><a id="l01861" name="l01861"></a><span class="lineno"> 1861</span> if (numpnts(bg_variablepaths) == 0)</div>
|
|
<div class="line"><a id="l01862" name="l01862"></a><span class="lineno"> 1862</span> CtrlNamedBackground ad_slicer, stop</div>
|
|
<div class="line"><a id="l01863" name="l01863"></a><span class="lineno"> 1863</span> endif</div>
|
|
<div class="line"><a id="l01864" name="l01864"></a><span class="lineno"> 1864</span> </div>
|
|
<div class="line"><a id="l01865" name="l01865"></a><span class="lineno"> 1865</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l01866" name="l01866"></a><span class="lineno"> 1866</span> return 0</div>
|
|
<div class="line"><a id="l01867" name="l01867"></a><span class="lineno"> 1867</span>end</div>
|
|
</div>
|
|
<div class="ttc" id="apearl-area-display_8ipf_html_a195b12857685c4e535a840c5db324b4a"><div class="ttname"><a href="pearl-area-display_8ipf.html#a195b12857685c4e535a840c5db324b4a">graphname_from_dfref</a></div><div class="ttdeci">static string graphname_from_dfref(dfref df, string prefix)</div><div class="ttdoc">compose a valid and unique graph name from a data folder reference</div><div class="ttdef"><b>Definition</b> <a href="pearl-area-display_8ipf_source.html#l00059">pearl-area-display.ipf:59</a></div></div>
|
|
<div class="ttc" id="apearl-area-display_8ipf_html_a8cc3ea3bea4e851e4144140a2da42a03"><div class="ttname"><a href="pearl-area-display_8ipf.html#a8cc3ea3bea4e851e4144140a2da42a03">ad_display_histogram</a></div><div class="ttdeci">string ad_display_histogram(wave image)</div><div class="ttdoc">display the histogram of a 2D image.</div><div class="ttdef"><b>Definition</b> <a href="pearl-area-display_8ipf_source.html#l00117">pearl-area-display.ipf:117</a></div></div>
|
|
<div class="ttc" id="apearl-area-display_8ipf_html_ae2b11295d2715e9af019513923c64570"><div class="ttname"><a href="pearl-area-display_8ipf.html#ae2b11295d2715e9af019513923c64570">ad_display</a></div><div class="ttdeci">string ad_display(wave image)</div><div class="ttdoc">open a new graph window with a 2D image.</div><div class="ttdef"><b>Definition</b> <a href="pearl-area-display_8ipf_source.html#l00087">pearl-area-display.ipf:87</a></div></div>
|
|
<div class="ttc" id="apearl-area-display_8ipf_html_af8d5e003fcff1f750685ed6f94717730"><div class="ttname"><a href="pearl-area-display_8ipf.html#af8d5e003fcff1f750685ed6f94717730">ad_display_slice</a></div><div class="ttdeci">string ad_display_slice(wave data)</div><div class="ttdoc">display three-dimensional data by 2D slice.</div><div class="ttdef"><b>Definition</b> <a href="pearl-area-display_8ipf_source.html#l01406">pearl-area-display.ipf:1406</a></div></div>
|
|
<div class="ttc" id="apearl-compat_8ipf_html_aa1f59acc532c7eee75c83b70ee1feaa9"><div class="ttname"><a href="pearl-compat_8ipf.html#aa1f59acc532c7eee75c83b70ee1feaa9">PearlCleanupName</a></div><div class="ttdeci">string PearlCleanupName(string name)</div><div class="ttdef"><b>Definition</b> <a href="pearl-compat_8ipf_source.html#l00048">pearl-compat.ipf:48</a></div></div>
|
|
</div><!-- fragment --></div><!-- contents -->
|
|
</div><!-- doc-content -->
|
|
<!-- start footer part -->
|
|
<div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
|
|
<ul>
|
|
<li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-area-display_8ipf.html">pearl-area-display.ipf</a></li>
|
|
<li class="footer">Generated on Mon Dec 22 2025 17:26:39 for PEARL Procedures by <a href="https://www.doxygen.org/index.html"><img class="footer" src="doxygen.svg" width="104" height="31" alt="doxygen"/></a> 1.9.8 </li>
|
|
</ul>
|
|
</div>
|
|
</body>
|
|
</html>
|