106 lines
23 KiB
HTML
106 lines
23 KiB
HTML
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
|
<html xmlns="http://www.w3.org/1999/xhtml">
|
|
<head>
|
|
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
|
|
<meta http-equiv="X-UA-Compatible" content="IE=9"/>
|
|
<meta name="generator" content="Doxygen 1.8.13"/>
|
|
<meta name="viewport" content="width=device-width, initial-scale=1"/>
|
|
<title>PEARL Procedures: pearl-scienta-countrate.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>
|
|
<script type="text/javascript">
|
|
$(document).ready(initResizable);
|
|
</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 style="height: 56px;">
|
|
<td id="projectalign" style="padding-left: 0.5em;">
|
|
<div id="projectname">PEARL Procedures
|
|
 <span id="projectnumber">rev-distro-2.1.1-1-gf419e92-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.8.13 -->
|
|
<script type="text/javascript">
|
|
var searchBox = new SearchBox("searchBox", "search",false,'Search');
|
|
</script>
|
|
<script type="text/javascript" src="menudata.js"></script>
|
|
<script type="text/javascript" src="menu.js"></script>
|
|
<script type="text/javascript">
|
|
$(function() {
|
|
initMenu('',true,false,'search.php','Search');
|
|
$(document).ready(function() { init_search(); });
|
|
});
|
|
</script>
|
|
<div id="main-nav"></div>
|
|
</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">
|
|
$(document).ready(function(){initNavTree('pearl-scienta-countrate_8ipf_source.html','');});
|
|
</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">
|
|
<iframe src="javascript:void(0)" frameborder="0"
|
|
name="MSearchResults" id="MSearchResults">
|
|
</iframe>
|
|
</div>
|
|
|
|
<div class="header">
|
|
<div class="headertitle">
|
|
<div class="title">pearl-scienta-countrate.ipf</div> </div>
|
|
</div><!--header-->
|
|
<div class="contents">
|
|
<a href="pearl-scienta-countrate_8ipf.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno"> 1</span> <span class="preprocessor">#pragma rtGlobals=3 // Use modern global access method and strict wave access.</span></div><div class="line"><a name="l00002"></a><span class="lineno"> 2</span> <span class="preprocessor">#pragma IgorVersion = 6.35</span></div><div class="line"><a name="l00003"></a><span class="lineno"> 3</span> <span class="preprocessor">#pragma ModuleName = PearlScientaCountrate</span></div><div class="line"><a name="l00004"></a><span class="lineno"> 4</span> <span class="preprocessor">#include "pearl-area-display"</span></div><div class="line"><a name="l00005"></a><span class="lineno"> 5</span> </div><div class="line"><a name="l00006"></a><span class="lineno"> 6</span> <span class="comment">// Copyright (c) 2019 Paul Scherrer Institut</span></div><div class="line"><a name="l00007"></a><span class="lineno"> 7</span> <span class="comment">//</span></div><div class="line"><a name="l00008"></a><span class="lineno"> 8</span> <span class="comment">// Licensed under the Apache License, Version 2.0 (the "License");</span></div><div class="line"><a name="l00009"></a><span class="lineno"> 9</span> <span class="comment">// you may not use this file except in compliance with the License.</span></div><div class="line"><a name="l00010"></a><span class="lineno"> 10</span> <span class="comment">// You may obtain a copy of the License at</span></div><div class="line"><a name="l00011"></a><span class="lineno"> 11</span> <span class="comment">// http://www.apache.org/licenses/LICENSE-2.0</span></div><div class="line"><a name="l00012"></a><span class="lineno"> 12</span> </div><div class="line"><a name="l00026"></a><span class="lineno"> 26</span> </div><div class="line"><a name="l00031"></a><span class="lineno"> 31</span> </div><div class="line"><a name="l00043"></a><span class="lineno"><a class="line" href="pearl-scienta-countrate_8ipf.html#a55886895329455b36b64d52ed6a4e228"> 43</a></span> <span class="keyword">function</span> <a class="code" href="pearl-scienta-countrate_8ipf.html#a55886895329455b36b64d52ed6a4e228">ScientaLiveDisplay</a>(epicsname, nickname, wbRGB)</div><div class="line"><a name="l00044"></a><span class="lineno"> 44</span>  <span class="keywordtype">string</span> epicsname</div><div class="line"><a name="l00045"></a><span class="lineno"> 45</span>  <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l00046"></a><span class="lineno"> 46</span>  <span class="keywordtype">string</span> wbRGB</div><div class="line"><a name="l00047"></a><span class="lineno"> 47</span>  </div><div class="line"><a name="l00048"></a><span class="lineno"> 48</span>  ad_connect(epicsname, nickname)</div><div class="line"><a name="l00049"></a><span class="lineno"> 49</span>  <span class="keywordtype">string</span> df_name</div><div class="line"><a name="l00050"></a><span class="lineno"> 50</span>  sprintf df_name, <span class="stringliteral">"ad_display_profiles(root:pearl_epics:%s)"</span>, nickname</div><div class="line"><a name="l00051"></a><span class="lineno"> 51</span>  dfref df = $df_name</div><div class="line"><a name="l00052"></a><span class="lineno"> 52</span>  wave /sdfr=df img = image</div><div class="line"><a name="l00053"></a><span class="lineno"> 53</span>  <span class="keywordtype">string</span> graphname = <a class="code" href="pearl-area-display_8ipf.html#ae2b11295d2715e9af019513923c64570">ad_display</a>(img)</div><div class="line"><a name="l00054"></a><span class="lineno"> 54</span>  wbRGB = replacestring(<span class="stringliteral">"("</span>, wbRGB, <span class="stringliteral">""</span>)</div><div class="line"><a name="l00055"></a><span class="lineno"> 55</span>  wbRGB = replacestring(")", wbRGB, "")</div><div class="line"><a name="l00056"></a><span class="lineno"> 56</span>  variable rr = str2num(StringFromList(0, wbRGB, ","))</div><div class="line"><a name="l00057"></a><span class="lineno"> 57</span>  variable gg = str2num(StringFromList(1, wbRGB, ","))</div><div class="line"><a name="l00058"></a><span class="lineno"> 58</span>  variable bb = str2num(StringFromList(2, wbRGB, ","))</div><div class="line"><a name="l00059"></a><span class="lineno"> 59</span>  ModifyGraph /w=$graphname wbRGB=(rr,gg,bb)</div><div class="line"><a name="l00060"></a><span class="lineno"> 60</span>  add_roi_controls()</div><div class="line"><a name="l00061"></a><span class="lineno"> 61</span>  <a class="code" href="pearl-area-display_8ipf.html#af9bd125ed4fb4ada10b78bca2607b44d">ad_add_overlay</a>(img)</div><div class="line"><a name="l00062"></a><span class="lineno"> 62</span> end</div><div class="line"><a name="l00063"></a><span class="lineno"> 63</span> </div><div class="line"><a name="l00064"></a><span class="lineno"> 64</span> <span class="preprocessor">#if igorVersion() >= 8</span></div><div class="line"><a name="l00065"></a><span class="lineno"> 65</span> <span class="keyword">function</span> check_exposure(image, outmask, dwelltime)</div><div class="line"><a name="l00088"></a><span class="lineno"> 88</span>  wave image</div><div class="line"><a name="l00089"></a><span class="lineno"> 89</span>  wave outmask</div><div class="line"><a name="l00090"></a><span class="lineno"> 90</span>  variable dwelltime</div><div class="line"><a name="l00091"></a><span class="lineno"> 91</span>  </div><div class="line"><a name="l00092"></a><span class="lineno"> 92</span>  variable xbin = 1</div><div class="line"><a name="l00093"></a><span class="lineno"> 93</span>  variable ybin = 902 / dimsize(image, 1)</div><div class="line"><a name="l00094"></a><span class="lineno"> 94</span>  variable thresh = 1e5 / 900 / 900</div><div class="line"><a name="l00095"></a><span class="lineno"> 95</span>  </div><div class="line"><a name="l00096"></a><span class="lineno"> 96</span>  duplicate /free image, filt</div><div class="line"><a name="l00097"></a><span class="lineno"> 97</span>  setscale /p x -dimsize(image, 0)/2, 1, "", filt <span class="comment">// energy</span></div><div class="line"><a name="l00098"></a><span class="lineno"> 98</span>  setscale /p y -dimsize(image, 1)/2, 1, "", filt <span class="comment">// angle</span></div><div class="line"><a name="l00099"></a><span class="lineno"> 99</span>  variable wx = sqrt(500) / xbin</div><div class="line"><a name="l00100"></a><span class="lineno"> 100</span>  variable wy = sqrt(500) / ybin</div><div class="line"><a name="l00101"></a><span class="lineno"> 101</span>  filt = exp(-((x/wx)^2 + (y/wy)^2))</div><div class="line"><a name="l00102"></a><span class="lineno"> 102</span>  variable nfilt = sum(filt)</div><div class="line"><a name="l00103"></a><span class="lineno"> 103</span>  filt /= nfilt</div><div class="line"><a name="l00104"></a><span class="lineno"> 104</span>  fft /free /dest=filt_fft filt</div><div class="line"><a name="l00105"></a><span class="lineno"> 105</span> </div><div class="line"><a name="l00106"></a><span class="lineno"> 106</span>  duplicate /free image, img</div><div class="line"><a name="l00107"></a><span class="lineno"> 107</span>  img /= dwelltime</div><div class="line"><a name="l00108"></a><span class="lineno"> 108</span>  setscale /p x -dimsize(image, 0)/2, 1, "", img</div><div class="line"><a name="l00109"></a><span class="lineno"> 109</span>  setscale /p y -dimsize(image, 1)/2, 1, "", img</div><div class="line"><a name="l00110"></a><span class="lineno"> 110</span>  fft /free /dest=img_fft img</div><div class="line"><a name="l00111"></a><span class="lineno"> 111</span>  img_fft *= filt_fft</div><div class="line"><a name="l00112"></a><span class="lineno"> 112</span>  ifft /free /dest=img_ifft img_fft</div><div class="line"><a name="l00113"></a><span class="lineno"> 113</span>  imagetransform swap img_ifft</div><div class="line"><a name="l00114"></a><span class="lineno"> 114</span>  </div><div class="line"><a name="l00115"></a><span class="lineno"> 115</span>  outmask = (img_ifft < thresh) * 64</div><div class="line"><a name="l00116"></a><span class="lineno"> 116</span> end</div><div class="line"><a name="l00117"></a><span class="lineno"> 117</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00118"></a><span class="lineno"> 118</span> </div><div class="line"><a name="l00150"></a><span class="lineno"><a class="line" href="pearl-scienta-countrate_8ipf.html#af2879284b1d1397447a31733fddd6273"> 150</a></span> <span class="keyword">function</span> <a class="code" href="pearl-scienta-countrate_8ipf.html#af2879284b1d1397447a31733fddd6273">check_exposure_opt</a>(image, outmask, dwelltime, [calc_df])</div><div class="line"><a name="l00151"></a><span class="lineno"> 151</span>  wave image</div><div class="line"><a name="l00152"></a><span class="lineno"> 152</span>  wave outmask</div><div class="line"><a name="l00153"></a><span class="lineno"> 153</span>  variable dwelltime</div><div class="line"><a name="l00154"></a><span class="lineno"> 154</span>  dfref calc_df</div><div class="line"><a name="l00155"></a><span class="lineno"> 155</span>  </div><div class="line"><a name="l00156"></a><span class="lineno"> 156</span>  variable xbin = 1</div><div class="line"><a name="l00157"></a><span class="lineno"> 157</span>  variable ybin = 902 / dimsize(image, 1)</div><div class="line"><a name="l00158"></a><span class="lineno"> 158</span>  variable thresh = 1e5 / 900 / 900</div><div class="line"><a name="l00159"></a><span class="lineno"> 159</span>  </div><div class="line"><a name="l00160"></a><span class="lineno"> 160</span>  dfref save_df = GetDataFolderDFR()</div><div class="line"><a name="l00161"></a><span class="lineno"> 161</span>  if (ParamIsDefault(calc_df))</div><div class="line"><a name="l00162"></a><span class="lineno"> 162</span>  dfref source_df = GetWavesDataFolderDFR(image)</div><div class="line"><a name="l00163"></a><span class="lineno"> 163</span>  <span class="keywordtype">string</span> calc_df_name = <a class="code" href="pearl-compat_8ipf.html#aa1f59acc532c7eee75c83b70ee1feaa9">PearlCleanupName</a>("psc_" + NameOfWave(image))</div><div class="line"><a name="l00164"></a><span class="lineno"> 164</span>  dfref calc_df = source_df:$calc_df_name</div><div class="line"><a name="l00165"></a><span class="lineno"> 165</span>  endif</div><div class="line"><a name="l00166"></a><span class="lineno"> 166</span>  NewDataFolder /o /s calc_df</div><div class="line"><a name="l00167"></a><span class="lineno"> 167</span>  </div><div class="line"><a name="l00168"></a><span class="lineno"> 168</span>  wave /z co_filt</div><div class="line"><a name="l00169"></a><span class="lineno"> 169</span>  wave /z /c co_filt_fft</div><div class="line"><a name="l00170"></a><span class="lineno"> 170</span>  wave /z co_img</div><div class="line"><a name="l00171"></a><span class="lineno"> 171</span>  wave /z /c co_img_fft</div><div class="line"><a name="l00172"></a><span class="lineno"> 172</span>  wave /z co_img_ifft</div><div class="line"><a name="l00173"></a><span class="lineno"> 173</span>  nvar /z co_img_size_x</div><div class="line"><a name="l00174"></a><span class="lineno"> 174</span>  nvar /z co_img_size_y</div><div class="line"><a name="l00175"></a><span class="lineno"> 175</span>  </div><div class="line"><a name="l00176"></a><span class="lineno"> 176</span>  variable cache = 0</div><div class="line"><a name="l00177"></a><span class="lineno"> 177</span>  if (waveexists(co_filt))</div><div class="line"><a name="l00178"></a><span class="lineno"> 178</span>  cache = (dimsize(image, 0) == co_img_size_x) && (dimsize(image, 1) == co_img_size_y)</div><div class="line"><a name="l00179"></a><span class="lineno"> 179</span>  if (!cache)</div><div class="line"><a name="l00180"></a><span class="lineno"> 180</span>  redimension /n=(dimsize(image, 0), dimsize(image, 1)) co_filt, co_filt_fft, co_img, co_img_fft, co_img_ifft</div><div class="line"><a name="l00181"></a><span class="lineno"> 181</span>  endif</div><div class="line"><a name="l00182"></a><span class="lineno"> 182</span>  else</div><div class="line"><a name="l00183"></a><span class="lineno"> 183</span>  duplicate /o image, co_filt, co_img, co_img_ifft</div><div class="line"><a name="l00184"></a><span class="lineno"> 184</span>  make /n=(dimsize(image, 0), dimsize(image, 1)) /c co_filt_fft, co_img_fft</div><div class="line"><a name="l00185"></a><span class="lineno"> 185</span>  variable /g co_img_size_x</div><div class="line"><a name="l00186"></a><span class="lineno"> 186</span>  variable /g co_img_size_y</div><div class="line"><a name="l00187"></a><span class="lineno"> 187</span>  endif</div><div class="line"><a name="l00188"></a><span class="lineno"> 188</span>  </div><div class="line"><a name="l00189"></a><span class="lineno"> 189</span>  co_img_size_x = dimsize(image, 0)</div><div class="line"><a name="l00190"></a><span class="lineno"> 190</span>  co_img_size_y = dimsize(image, 1)</div><div class="line"><a name="l00191"></a><span class="lineno"> 191</span>  setscale /p x -co_img_size_x/2, 1, "", co_filt, co_filt_fft, co_img, co_img_fft, co_img_ifft</div><div class="line"><a name="l00192"></a><span class="lineno"> 192</span>  setscale /p y -co_img_size_y/2, 1, "", co_filt, co_filt_fft, co_img, co_img_fft, co_img_ifft</div><div class="line"><a name="l00193"></a><span class="lineno"> 193</span>  </div><div class="line"><a name="l00194"></a><span class="lineno"> 194</span>  if (!cache)</div><div class="line"><a name="l00195"></a><span class="lineno"> 195</span>  variable wx = sqrt(500) / xbin</div><div class="line"><a name="l00196"></a><span class="lineno"> 196</span>  variable wy = sqrt(500) / ybin</div><div class="line"><a name="l00197"></a><span class="lineno"> 197</span>  co_filt = exp(-((x/wx)^2 + (y/wy)^2))</div><div class="line"><a name="l00198"></a><span class="lineno"> 198</span>  variable nfilt = sum(co_filt)</div><div class="line"><a name="l00199"></a><span class="lineno"> 199</span>  co_filt /= nfilt</div><div class="line"><a name="l00200"></a><span class="lineno"> 200</span>  fft /dest=co_filt_fft co_filt</div><div class="line"><a name="l00201"></a><span class="lineno"> 201</span>  endif</div><div class="line"><a name="l00202"></a><span class="lineno"> 202</span> </div><div class="line"><a name="l00203"></a><span class="lineno"> 203</span>  co_img /= dwelltime</div><div class="line"><a name="l00204"></a><span class="lineno"> 204</span>  fft /dest=co_img_fft co_img</div><div class="line"><a name="l00205"></a><span class="lineno"> 205</span>  co_img_fft *= co_filt_fft</div><div class="line"><a name="l00206"></a><span class="lineno"> 206</span>  ifft /dest=co_img_ifft co_img_fft</div><div class="line"><a name="l00207"></a><span class="lineno"> 207</span>  imagetransform swap co_img_ifft</div><div class="line"><a name="l00208"></a><span class="lineno"> 208</span>  </div><div class="line"><a name="l00209"></a><span class="lineno"> 209</span>  redimension /n=(dimsize(co_img_ifft, 0), dimsize(co_img_ifft, 1)) outmask</div><div class="line"><a name="l00210"></a><span class="lineno"> 210</span>  outmask = (co_img_ifft < thresh) * 64</div><div class="line"><a name="l00211"></a><span class="lineno"> 211</span>  </div><div class="line"><a name="l00212"></a><span class="lineno"> 212</span>  SetDataFolder save_df</div><div class="line"><a name="l00213"></a><span class="lineno"> 213</span> end</div><div class="ttc" id="pearl-scienta-countrate_8ipf_html_af2879284b1d1397447a31733fddd6273"><div class="ttname"><a href="pearl-scienta-countrate_8ipf.html#af2879284b1d1397447a31733fddd6273">check_exposure_opt</a></div><div class="ttdeci">variable check_exposure_opt(wave image, wave outmask, variable dwelltime, dfref calc_df=defaultValue)</div><div class="ttdoc">optimized check exposure and calculate overexposure indicator mask </div><div class="ttdef"><b>Definition:</b> <a href="pearl-scienta-countrate_8ipf_source.html#l00150">pearl-scienta-countrate.ipf:150</a></div></div>
|
|
<div class="ttc" id="pearl-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#l00047">pearl-compat.ipf:47</a></div></div>
|
|
<div class="ttc" id="pearl-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#l00085">pearl-area-display.ipf:85</a></div></div>
|
|
<div class="ttc" id="pearl-area-display_8ipf_html_af9bd125ed4fb4ada10b78bca2607b44d"><div class="ttname"><a href="pearl-area-display_8ipf.html#af9bd125ed4fb4ada10b78bca2607b44d">ad_add_overlay</a></div><div class="ttdeci">wave ad_add_overlay(wave image, string rgba=defaultValue)</div><div class="ttdoc">add an overlay on top of the displayed image </div><div class="ttdef"><b>Definition:</b> <a href="pearl-area-display_8ipf_source.html#l00329">pearl-area-display.ipf:329</a></div></div>
|
|
<div class="ttc" id="pearl-scienta-countrate_8ipf_html_a55886895329455b36b64d52ed6a4e228"><div class="ttname"><a href="pearl-scienta-countrate_8ipf.html#a55886895329455b36b64d52ed6a4e228">ScientaLiveDisplay</a></div><div class="ttdeci">variable ScientaLiveDisplay(string epicsname, string nickname, string wbRGB)</div><div class="ttdoc">open live display of most recent scienta measurement </div><div class="ttdef"><b>Definition:</b> <a href="pearl-scienta-countrate_8ipf_source.html#l00043">pearl-scienta-countrate.ipf:43</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-scienta-countrate_8ipf.html">pearl-scienta-countrate.ipf</a></li>
|
|
<li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
|
|
<a href="http://www.doxygen.org/index.html">
|
|
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
|
|
</ul>
|
|
</div>
|
|
</body>
|
|
</html>
|