=Ypmxvw(/G
Skڱ>}9ִ}{bf :X p?01|9&BT d|Q[.CڐO| r6Qwq]n]V϶gÊn t
:h:jT"LK@\Ϫkkk(* wG k
Q?7|a꫶c۶PwM:+JA x\gOmWyjnkv6l7d_x!tr-F}+k=.}8@3߷ '>x4q)-ggѶYgY]wmq9f@S-rrFTf\@Rq^*Xۭ\ $
;|qV 2Q/gLnsdZ#Иː!6[SZaqe碛o = ӳ=Am\/E;𩝨[k-OF ]`kӿ:ou?q^krwKO@73.(BGO*"뺰\s-rA\BzK~;od U?Su:L[YrV@ SY]VpSԊ ?ye~i51 TDo]|\`{_azw˯tݐN&s=.| $]`˜96?4s]3kuCNˣեs^ J72?0ٯ(&[#Wuukn^D_̻YuyOPX .\Z-{ Ҁ#^{eJY^jq֩ns+ú!Y??q@@\s~`./K}D/G>9mI9eSOY}>{hg ~? @CO<1e< 6n\. ꢩ-|nz->iI@So :昢)gƗ_؞S)E MO"w0FVƌI-rGEg(P5@tL$5}>^=Ǐ~AZ2ͽjof, LmkJey]VG h
h4ֵ`.!r-r*H:SSxM@SkHWU?rke э׳
W
Ǽw3gf֟zH
DA h*2Q,ՇAp啭xJk]z==Jl"HkS7WVM? I(6Lu[0 6ݵJRkTF s}?5
DQ?,e(ʮ ͕#Gڮ]g3.M/ &I 5WER"ݜw]=g L 8^S#WlIPm
$ջF jL\7PztKm
pkw=*8 Oo4^@}*2پ[Wny>{kc
֡(Kw#>R9<V?dя7[ |VXSc\Ki˼!RPO<갓On1ZAA1gj+ yĆpBj1^*u֚|5hW[
|v7ӾuwHA)~unhj4RR1G r⬟z/}\{Qc.<5{
vϘ( ϢfnPჹF~N7-s[^()uYccе)8弣 Vt 80jn֣[/o-@ յ 2^ +ǝnuDI@\ׅ^s>@>עV̓?ޖygzb|˿ț~ f?7.~Y?'|;MsTSNp s[|=@v@ ou 嫣 PKp(J]R(?݇T
/rjm{r=;+c]>Ey_IO@ׅk~:Ks>5 ]>X4x⬟~W]eC;\~[S9>/M-|YE v M{ᅌ'D>̤+q,pOIf(K@] Ŧx3H_sv4i=ZP@E-(뺰uO_d&\--m|6Y4⪟q E {lr#[$R@ :h0S߾^4#P+]W
/>tDҟy@1Ok]|K0a
hX:k.yt Nz ?Lj9^#uu2 o|>QWg^~9Ml
U?KC*Ar a֭<8 @ /yq徰Un6-c w
P%#q7~oE!вZK%ON S
nӿ}#@-Yf!CevN$:^>Y' 8 7vIgiN[7l n~ A $~.,>m @U̫Vg\@ zL,@I
N3
Ǎ]_W ҄ϻְU7y9]\iǦ?BZyn["Mhh˖eG,DLp˼y { 1-ƌש ?/g,} 0nr\`U
/nZ@E l?pjmLmWXV;cFjFa)r
7Zߥkt݊thpw/Xtcow%,8)uap]GjsOcf|?38Co)1\ns5YN=3O s$OImyɷ~tkGe :ztQU?tҡKfsEI֬QN_#6m@ Yv[յ}V 4Q :zڵ MxϚ±y`spIG *2lvwa :w}0x!o Q_zsOo:4EQ3߅x}|7 og{VḭM^|F}.l]%WX3_ewe.'j5Mw|+cj?ӽA lpW(`\j JA@Ū?iT-_t6KZz
\>,XҶW q]6\gvݻha9y'l 2w}Kd(r+'[|STæq^ZpvxE قZu̾J exkaf*F~_nķ鍼F9g'D. @[gjXTTΘ|ŬlK ׯ\Coպn;VG &gm n^6{ [JOXrE{o°a|Zx+|<qxΖ@O=W` Ώ⊝ xH@E Zb%W\nM0i@ ضjm].sCֵ=Uv1 :?lbW/ /7WHoƍnoqǠ=ԥ_+dz-^R<ޗ@ 3W1ot,rת;r⮣fقo557z{`v%ɻZW!8،meeh~ 6= >quv=H]wl]Ķ|܃O.n*t^[ Fu](-?CZUU?+K-T ~=tU .Y$Pĥ@p}v)9m++ x3CO<ц~SY9?4n ں* ;l1PyQ?sYY'?U0YG@h淾Rr!+bɓ3R~ۚ= ntAW]E d|~cSr xޚwuޤ]zϰ.}Qge oɿ:B24!Bx!Qp^ҍ+\qxϚ@OPZ`Vru
#\jǙtڐ㎳).WvV]5e.E9e+[{tk@j\h c `פ=fu7
(f̅/V `=w=Y]GUrI]E'\yȻOd]ωkq~Bk:Z']?-ت |*@c
$wT8 |@3kj \Rq⨣(\}uVS]9Q@?Cl42o~ӂ?Z-r)\Na;4a2ig1v0
@\b\7-n)&P:C&U}^I;2&7j=|MwRŪL@5БZxTT/^ A?>BJ\ׅjX25/װ jؾr +W{j\zi;t=˥q"@oZ- -XV NS:zt^յ3xWmG*ijüV@[gkXMugb]ncfL wNm30͵tqwq܋/$W@[g~yA͉\c X!'`=כ
@.8%yq]$o߰!k}e-Ą~$UrV?1~S[˰aA! n͋"kW+g rHjRKLlo6XtRphQ-uTiF6 O KƲmgC~!Z g _\ T-B =4+mAF}gV9{ޓn5`R% hp|hK [Y ~f0!BFi2}_,kV>bB
BYڎm26(뺰y
/ͽW`QjX^qJI 28zq,) P>?[]Һ >&zW֬jYg >e깴>s7,^ma[;sfduy9 hA:nD N#kٚ}d-Ą R?+ }4cSnA(g7dʷ~ 2~) @SD6r'3>J_ φulї#k ԩ-n@:Ɯtر9oKOgPEط/Ə} YGղ=?.ʭ}%I_s)Z~Cm;`%)u/KԒ3Xcn#2<⬟)QG)g\ ɁJHdUU3tїO%}{`wsOOۆ^JQ(ˆrJNYv=Y ~xNP H m3{@;Bb?[H'~{9DlrkǦN2 *w~2~o?.c/0'Moiˌe;@8(⪟Cb} Yr[~oϾrws*zZ=KL7Ӫ:d~Jh6njޫ@<2cZ v}ۊ;Wq! oʫ/71
,=ת{
Ns
JLi`QRq;ۘ .]HjgͲa'l}/+`4s*8,oh |.C8gpuu6_ %I vӵ=:ʰ.uo~Ӧָyw?;km?nܿ`+n?lߚkt]DH^㪟 "TQ LS Fo7ho} 4\)!iz3uN{b)ǖ[? ,U&|WZ<}mj~.
+ I6
{2JG|3Y3<J~Jpmي _0QHe}(:K)HRB TzV wgf1 ⮟oԣ$XFjraExE w p8 @^פ
| :uu9բSeLw{Myۿ:$glQ9g}wzթ2oQ'Y,I@~Յ]1tWHх8wk=
Y=c uVZStS4ZZ,[Js
7'ȐܫkrJpwCN8!`~jvA#f sQGy^U+p|),MK'߱gOC1t⬟ͩlNGY? ~V^⌓)JWyj;Ϫ ru <ض.^l!]{;u w/҈J|KJGaLǢƺI}8 8 (ލEs_/P
uǤI'+5aw52 gԠY}@-][2tw]uP-X;u}KQKeR{J⬟骻ЭjƆi%{zs_bׯoPT{
@[~ JCIٶrKZ*VGT?@Ө
@@cc S
@REE @= @c(X@fc]@ =@, "@ '@=g@fc]@/ށ3@[He @UW[?? o_.ZlI?kٌ@Y_' o_?pA @CJ @ %@J{/LMi ? ]4@Fc_@|5 @7d^뽾S? Zd;@%B@1? @8 6|[U4@ 8 \?q
-@+=* |[UN$CΆl?5;N@ TStZӼV}bݿS
?ec]\ @BBXA`(\ Ac?$;H.@BBXA`(\ Ac?$;H.@ {Ҩ
a }a }- SD - ? ? ? ? H[?X?c 7?!S-3V? a?Voz?$/!&?0gr@5ň
@ĸv.@ R?7" O&??=lإ?)m}G3@P @Q
_? D?g?yvt@i{ @34?"ȽЮ?|?\2 o?fL?0YƑ?>:?XG ?S%?WV?CE?J?hl?LF?#v? {T?]Q}J?EԽ=?(~?5Nf? {T?]Q}J?EԽ=?(~?5Nf? g Lw b
}G~, Hardware0 , ? ? ? ? All_Open_53_3_RowAll_Open_53_3_RowAll_Open_53_3_RowAll_Open_53_3_RowAll_Open_53_3_RowMach_S1_27Mach_S1_27Mach_S1_27Mach_S1_27Mach_S1_27Mach_S2_27Mach_S2_27Mach_S2_27Mach_S2_27Mach_S2_27Mach_S3_27Mach_S3_27Mach_S3_27Mach_S3_27Mach_S3_27Standard_R1Standard_R1Standard_R1Standard_R1Standard_R1Standard_R2Standard_R2Standard_R2Standard_R2Standard_R2Standard_R3_reinstallStandard_R3_reinstallStandard_R3_reinstallStandard_R3_reinstallStandard_R3_reinstallS0615_NoShelfS0615_NoShelfS0615_NoShelfS0615_NoShelfS0615_NoShelfS0631_NoShelfS0631_NoShelfS0631_NoShelfS0631_NoShelf " 3 D U _ i s } " - 8 C N Y n * 7 ] qG~G~, Range0 , ? ? ? ? >@@cc S
@REE @= @c(X@fc]@ =@, "@ '@=g@fc]@/ށ3@[He @U:?XG ?S%?WV?CE?J?hl?LF?#v? {T?]Q}J?EԽ=?(~?5Nf? {T?]Q}J?EԽ=?(~? 4 + Z [~ץ[~- Hardware_Key - ? ? ? ? 0 + [ [~׳[~, Hardware0_Key , ? ? ? ? Parser ! S c $
[~׳[~ Label_Name ? ? ? ? All_Open_53_3_RowMach_S1_27Mach_S2_27Mach_S3_27Standard_R1Standard_R2Standard_R3_reinstallS0615_NoShelfS0631_NoShelf % / : E Z g t T d [~׳[~ Label_Marker ? ? ? ? 4B @ @@ @ @A ,B .R ~׳[~ ExtractWaves ? ? ? ? Hardware0Range0SD0 ̅L [~׳[~ ExtractWavesKey ? ? ? ? ?
Extracted ! 5
* // Platform=Macintosh, IGORVersion=8.010, architecture=Intel, systemTextEncoding="MacRoman", historyTextEncoding="UTF-8", procwinTextEncoding="UTF-8", recreationTextEncoding="UTF-8", build=32123
#pragma TextEncoding = "UTF-8"
Silent 101 // use | as bitwise or -- not comment.
DefaultFont "Helvetica"
MoveWindow/C 2,622,1278,798
MoveWindow/P 455,45,1155,500
MarkerPanel()
KillStrings/Z root:gWMSetNextTextFilesTextEncoding
Window MarkerPanel() : Panel
PauseUpdate; Silent 1 // building window...
NewPanel /W=(520,45,1222,567) as "Make Markers"
ModifyPanel frameStyle=2
SetDrawLayer UserBack
DrawPICT 0,0,1,1,Markers_png
PopupMenu KeyWave,pos={370.00,11.00},size={147.00,23.00},proc=PickNameWave,title="Name Wave"
PopupMenu KeyWave,mode=2,popvalue="Hardware0",value= #"Wavelist(\"!*_key\",\";\",\"text:1\")"
Button MakeMarkersButton,pos={429.00,254.00},size={150.00,20.00},proc=MakeMarkerWave,title="Make Marker Wave"
ListBox list0,pos={371.00,316.00},size={266.00,102.00}
ListBox list0,listWave=root:Parser:ExtractWaves
ListBox list0,selWave=root:Parser:ExtractWavesKey,mode= 4
Button ExtractButton,pos={429.00,440.00},size={150.00,20.00},proc=DoExtractionButton,title="Extract"
String fldrSav0= GetDataFolder(1)
SetDataFolder root:Parser:
Edit/W=(364,47,650,226)/HOST=# Label_Name,Label_Marker
ModifyTable format(Point)=1,width(Label_Name)=124,width(Label_Marker)=128
ModifyTable showParts=0xe3
SetDataFolder fldrSav0
RenameWindow #,T0
SetActiveSubwindow ##
EndMacro
i #pragma TextEncoding = "UTF-8"
#pragma rtGlobals=3 // Use modern global access method and strict wave access.
Function PickNameWave(pa) : PopupMenuControl
STRUCT WMPopupAction &pa
switch( pa.eventCode )
case 2: // mouse up
Variable popNum = pa.popNum
String popStr = pa.popStr
Wave/T thenames =$popstr
Findduplicates /rt=$("root:parser:label_Name") thenames
Make/O /N=(numpnts($("root:parser:label_Name"))) $("root:parser:Label_Marker")
Make/O /N=(numpnts(thenames)) $(popStr+"_Key")
getsamelength(numpnts(thenames))
break
case -1: // control being killed
break
endswitch
return 0
End
Function MakeMarkerWave(ba) : ButtonControl
STRUCT WMButtonAction &ba
switch( ba.eventCode )
case 2: // mouse up
// click code here
setmarkers()
break
case -1: // control being killed
break
endswitch
return 0
End
function setmarkers()
controlInfo KeyWave
Wave/T thenamewave= $(S_Value)
Wave MarkerKey = $(S_Value+"_Key")
Wave/T Label_Name = root:parser:Label_Name
Wave Label_Marker = root:parser:Label_Marker
MarkerKey =Nan //null it out
variable index,maxindex
maxindex = numpnts(label_Name)
for(index=0;index