WNGZWZSS0110rqql? Geneva :Cd AUTOSAVE.WKZ$+(+-4)d)R& o4 x l  @dd@%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~%@PeakAbs@MeasAbs@MeasIo@MeasI@DeltaI@ StrayLight@+f/%1%@420@f$@2%4@ @1@,  0-Y@.@e@.@\(\?0%1@,  0-Y@.@ 1@ 1@ 1@ /@7f+r@%1%@42-Y@.@1@1@Y@ 0 0@\(\?0%1@+f/%1%@420@\(\?0%1@+f/%1%@420@1@1@1@7f+r@%1%@42-Y@.@7f+r@%1%@42-Y@.@1@\(\?0%1@+f/%1%@420@7f+r@%1%@42-Y@.@1@ \(\?0%1@+!f/%1%@420@("f+r@%1%@42@#@@ 0 0@$f0 @  Geneva @  Geneva @  Geneva @  Geneva @  Geneva @  Geneva @  Geneva @  Geneva @  Geneva @  Geneva @  Geneva @  Geneva @B  Actual Peak A Measured A0@ @P ? .s? e N1? @   Wavelength Absorption width Source width Absorber conc. % stray light bT? Xp? @   r@  9@  6@  0@  {Gz? .s? )? @G  9? P0? @   Width Ratio Peak Absorbance Meas. Absorbance Measured I-zero  Measured I Detector SNR  Photon SNR bT? $-M? @ 5 )\(?5  .s?5 T϶@?5 3@5 &rb%@5 pq@5 #.@ S8? ֛ _? @V  .s? T϶@? @V  f!G? =? @V  9? mHD? @V  `~:? \Ù? @V  bT? d? @V  Hؕ? _0j? @V  S8? H? @V  ɪ? 7[8!? @V  .s? {? @V  K}aJ? ;nR? @V  f!G? mcQ? @V  Oq? r71? @V  9? }~Ī{? @.  M"-}T? }, S? @.  `~:? lfS(? @.  gzɪ? y-u z? @.  bT? B'? @.  c ? KuZ? @.  Hؕ? Q#X? @.  L/Yu? NyN? @.  S8? ? @.  )6b02? .,[? @.  ɪ? ed2P? @X "Tom O'Haver, Version 2, June, 2008 jb? ? @.  .s? '1? @.  ޫ? pQ5f? @.!  K}aJ? u? @."  hF? c? @Y# source transmitted f!G? ^? @$  wavelength absorbance transmissionsource intensitytransmitted intensity ,-%? z`m? @t% i@%!Pe>%}?%"uG>%$XG> Oq? N? @t& %@i@%!?t>%[X?%"*b*$>%$Ѽ$*$> l`d)? MN0S? @t' %i@%!ȴN>%ƻO?%"_ 7>%$W7> 9? Xz;I? @P(%i@%!XnZ>%R?%" -UmPI>%$PUlPI> @P)%j@%!Z>ן>%x?%"YGL[>%$eEL[> @P*%@j@%!ӵ>%?%"Rגbdl>%$2m`l> @P+%j@%!m0>%g?%"ʅ[5~>%$T5~> @P,%j@%!>%bGY?%"w9ȵ>%$&t> @P-%k@%!k>%83?%"N]J>%$\DfHJ> @P.%@k@%!ຸe>%D?%"9&>%$> @P/%k@%! >%?%"tV>%$/9V> @P0%k@%!rVk>%#΁Ø?%"$>%$K#> @P1%l@%! HY?%eW?%"\9>%$B> @P2%@l@%!Ӧ ?%/t?%" 3/>%$`"> @P3%l@%!樧?%m6NL?%"|ĹP0c>%$qa> @P4%l@%!k@f"?%Q?%"6?%$= E? @P5%m@%!dd=,?%2?%"4?%$Cy? @P6%@m@%!Ǿ+W}>6?%j?%"aT&%, ?%$-) ? @P7%m@%!j!@?%$gL?%"+?%$F +? @P8%m@%!;I?%j|?%"F|SSK7?%$_@7? @P9%n@%!O}/R?%ӈ?%"!Ř]IHC?%$ _;C? @P:%@n@%!ze/1[?%z~?%";JfO?%$fGO? @P;%n@%!@`c?%j?%"Y4%Y?%$T7/Y? @P<%n@%!F50k?%"?%"lNc?%$|c? @P=%o@%!\s?%|?%";_5n?%$$&W\n? @P>%@o@%!YtM{?%WQ3?%"3dw?%$W w? @P?%o@%!kd?%:¦W?%"M\?%$Zl,? @P@%o@%!?"%b ?%<6<?%"40L܉?%$ZT$? @PA%p@%!?%T$?%"×?%$n@f{? @PF%p@%!K? s?%co?%".z~?%$Е,? @PG%p@%!Nj?%i:?%"pEܾ?%$;A? @PH%p@%!x?% ߈QG?%"L `?%$sv_? @PI%q@%!]?%[k>?%"ϸ_U?%$tv? @PJ% q@%!W?%Tjҳ#?%"O>?%$ x? @PK%@q@%!-2c?%pӸ?%"$w?%$y=p? @PL%`q@%!2oq"N?%.q?%"7,6V?%$i0t ? @PM%q@%!!9^?% r?%"4N?%$&? @PN%q@%! C]e?%`:?%";hWb?%$+"? @PO%q@%!fi0?%m?%"< ?%$9? @PP%q@%!lU?%0^m?%"6X?%$#@? @PQ%r@%!ݑlZ?%o?%"^n'?%$3? @PR% r@%!H?% "k?%"F2?%$VΟ+? @PS%@r@%!?%| $7?%"zS S ?%$98Iky? @PT%`r@%!H ?%2?%"qɴ?%$ U? @PU%r@%!1G?%Pqu?%"O ?%$OڋՈ? @PV%r@%!k?%]a/?%"i?%$B'? @PW%r@%! .s?%Ъ>?%"?%$Ъ>? @PX%r@%!k?%]a/?%"i?%$B'? @PY%s@%!1G?%Pqu?%"O ?%$OڋՈ? @PZ% s@%!H ?%2?%"qɴ?%$ U? @P[%@s@%!?%| $7?%"zS S ?%$98Iky? @P\%`s@%!H?% "k?%"F2?%$VΟ+? @P]%s@%!ݑlZ?%o?%"^n'?%$3? @P^%s@%!lU?%0^m?%"6X?%$#@? @P_%s@%!fi0?%m?%"< ?%$9? @P`%s@%! C]e?%`:?%";hWb?%$+"? @Pa%t@%!!9^?% r?%"4N?%$&? @Pb% t@%!2oq"N?%.q?%"7,6V?%$i0t ? @Pc%@t@%!-2c?%pӸ?%"$w?%$y=p? @Pd%`t@%!W?%Tjҳ#?%"O>?%$ x? @Pe%t@%!]?%[k>?%"ϸ_U?%$tv? @Pf%t@%!x?% ߈QG?%"L `?%$sv_? @Pg%t@%!Nj?%i:?%"pEܾ?%$;A? @Ph%t@%!K? s?%co?%".z~?%$Е,? @Pi%u@%!$ v>?%T$?%"×?%$n@f{? @Pj% u@%!]W?%N ݫWw?%"s?%$o-ݧ? @Pk%@u@%!ڏ?%Et ?%"vƢ?%$vEC? @Pl%`u@%!7IX?%ut?%"3V2š?%$.w? @Pm%u@%!6?%j?%"aT&%, ?%$-) ? @Py%w@%!dd=,?%2?%"4?%$Cy? @Pz% w@%!k@f"?%Q?%"6?%$= E? @P{%@w@%!樧?%m6NL?%"|ĹP0c>%$qa> @P|%`w@%!Ӧ ?%/t?%" 3/>%$`"> @P}%w@%! HY?%eW?%"\9>%$B> @P~%w@%!rVk>%#΁Ø?%"$>%$K#> @P%w@%! >%?%"tV>%$/9V> @P%w@%!ຸe>%D?%"9&>%$> @P%x@%!k>%83?%"N]J>%$\DfHJ> @P% x@%!>%bGY?%"w9ȵ>%$&t> @P%@x@%!m0>%g?%"ʅ[5~>%$T5~> @P%`x@%!ӵ>%?%"Rגbdl>%$2m`l> @P%x@%!Z>ן>%x?%"YGL[>%$eEL[> @P%x@%!XnZ>%R?%" -UmPI>%$PUlPI> @P%x@%!ȴN>%ƻO?%"_ 7>%$W7> @P%x@%!?t>%[X?%"*b*$>%$Ѽ$*$> @P%y@%!Pe>%}?%"uG>%$XG> @P% y@%!?CV>%:̮?%">=%$ v>= @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ [ System Helv00@Click on the number wheels to change the values. Helv(( numberwheel:)////-" numberwheel-Y@put ctvalue("numberwheel",0)/100 into f4 Chicago Chicago?Y@? wavelength"C$%%%%# wavelengthput ctvalue("wavelength",0) into b4 System Systemr@i@y@?  numberwheel;%&&&&$ numberwheelput ctvalue("numberwheel",0) into e4 Chicago Chicago0@Y@?  numberwheel";%&&&&$ numberwheelput ctvalue("numberwheel",0) into d4 Chicago Chicago6@Y@? numberwheelD>$%%%%# wavelengthput ctvalue("wavelength",0) into c4 Chicago Chicago9@Y@?2$Ȳ\ ChicagoGeneva++@, Spectroscopic Deviations from Beer's Law GenevaGeneva(( Plot and fit Fi  Plot"   1t R1C1..R5C15 $R1$C2..$R5$C35  best fit line=R2C3*$R2$C5+$R1$C5R2C4..R5C45 R1C1..R5C45K12 O@b@o@R1C1..R5C45  oA( oA       1 datarangenumrows{ INSTRUCTIONS: Put data to be fit into two adjacent columns, the x-axis data } { (i.e. independent variable) in the first column and the y-axis data (i.e. } { (the dependent variable) in the second column. The first row of each column } { should contain column labels. Select the data range and run this script. } { The script creates a new sheet containing a copy of the data values, the best } { fit data, an ANOVA table, and an XY plot of the data and best fit lines. } { Print page 2 of this new sheet to get report contain ANOVA table and plot. } repaint off column numbers Define datarange,numrows select range R1C10..R20C11 Copy unselect New Worksheet "" window size (12780, 7540) paste values Select last cell numrows=row() select range "R1C1..R"&numrows&"C1" Copy select range R1C3 Paste datarange="$R1$C2..$R"&numrows&"$C3" Select range datarange select more range R1C5 select more range R1C6 column letters Regress column numbers select range R1C4 Put "best fit line" Into R1C4 select range R2C4 Put "=R2C3*$R2$C5+$R1$C5" Into R2C4 select range "R2C4..R"&numrows&"C4" Copy Down select range "R1C1..R"&numrows&"C4" Unselect Add Chart Range frac(R25C6..R51C11,0,62,149,252) Using "R1C1..R"&numrows&"C4" select object 1 XY Legend Bottom select chart 1 series 1 symbol color 0 symbol width 20 symbol type 3 symbol size 7 points line fg 0 line bg 16777215 line pattern 0 line width 40 select chart 1 series 2 line fg 0 line bg 16777215 line pattern 1 line width 20 select range R1C2 select more chart 1 axis 3 axis title range select range R1C1 select more chart 1 axis 1 axis title range column letters column width range E1 to 2780 select range F8..J22 precision 4 select range A1 hide headings hide tool box hide entry bar hide cell grid repaint on select more chart 1 axis 1 select range L50 6 Chicago GenevaP Analyt. curve [I  Analyt. curve ! @D@?D@?.# J5 K5@D@?D@?.I,@ J5 K5  standardcolumn letters define standard Put E4 into L1 for standard=2 to 40 put "" into "J"&standard put "" into "K"&standard end for for standard=2 to 40 put standard*2 into E4 put B7 into "J"&standard put C7 into "K"&standard end for put L1 into E4 6 ChicagoChicagoAIr q q  f)RY?i@y@$@$@e?$@ $@ <22@2<%<%<%@$7M(|88XZx,, ~ b yg(,, d'D@234