nP`DVSc@cdd8L`p````D\` `P`l``(``P`HH``HH`m`(I`1`````0`L`h```````8`T`p``CTDIV!IO1LXAPPQPWaRLqRTLTRAPSMWSIDSEMPMLPATHxI```X\``"""BD`\`t```I``D`````t```' ` +=Tl`P [`` ,BBH N,@  `\``" `8`]`$```.hJ``"P4`5``&``%?t``UQP``(dd==(==<<<g$#$#%$"P$eg: Wgi=Wf|:v:3f>:Wfw:Wfu:moW%G`L,W$La2LWofg>:Wfy:t=`W!ya ``y: wa$Wa!wfgx:Wgw:V x`V Wag:t=!V "Wg}:r=g:#Wfq:$V WfgPegswgsW,G W&V`'Va(W)W`*V +Wa`#Wag,We= Wf>:>!-W!c= W fgjgegP $#egsw{: Wgsq{gsw{:1Wgsq{gsw{:*V -Wgsq{gsq2W2Wg$#$#)#&"#%'#&"###egy: ~:ut:4W^ (# #%'egs`#Wa W{:tgs6V7W{gs`!8Wa9W{gs`!Wa:W{gs;V;F%$#$#%$ #"##)#$#.E #21&2% #$"")$"3$"'$$##$&%.T&"##"$SHARPAPL #%$#.D"#$#.O "$"#" $$#" " "# #'" " "$.F%$#"&"$APL2000D)APL#SHARPAPL%$$"$#.P #$#"$'$# &%A)#&((P#&"#& P#$&%#$&"$' $'$"((#P("&#$# P##"$#$# P## # P#"$%"#$#%# P"$%"#$###$ P #&%# "$$&)P##$#$#" P&"$%"#$&%# $ &""# #DB1998(-`!`P#",-`d&`H-`()`&`\`4`D` `8`0`#T<`,`r,-`=`|;`H`(`\`p`"$~r2cm|gp:lqmrsdtgDB19980824### -egs:>3*!sgt:p:sbdW>cg9`n=Wa%W fp:Wq:`pW*p:Wqa@q:!W!qfgq:W%Gp2qgp:`t!Wabsbd>c#qc4&`&`&`w>"$^q%?qgp:qrg2000&$egr:`p-p:Wra$r^)#$#$#egp:n=`WW$ra%r^APL2#$)$"$#egp:W"&`'`'`w>(`)`()`D```\```p`@;`0`89`l*`P1#$(`,-` P"$q4u~ gp:qrd>gDB19980824&")P#%$&"SAPL=eg>:p:Wg9`W ra Wg9`V ra%W^21"") eg9`W W3!ra%W^1#$#$"2$"(eg9``WaW3!ra%Wgp:W, W$ 3W%!r^3$"( e(`\)`D)`w>,-`8``()`81`D`)`\` `p`````"$r=i#8gp:lqmrsd>dtg1999#$&%" (eg>:Wfp:`vsaW q fq:`BWqa@q:`t-t:Wqa%q:!qfgg=p Wgi= Wf>: Wfgs:W3!sfp:W@t:sbdWc,2q^#$)#e$fgp:pW,W$t@sbdWc^%'#"$eg Wg=p Wgp: W3!tAs fq: Wf$*`*`*`w>,`<`,`<``D```9`()`,`-`,-`x``H-`d-`D`\` ````a`a`R0H-`4`.`P `0;`d-`0`P( p`;`"8,`'`P0=`,`=`P#"$r?_gp:lqmrsd>g1999 S" egP")# $$"PP.A'$:eg##$$'"$(eg>:Wg$ eg9`W,n=Wa Wgp:qxsg9Wgp:xsD,`-`-`w>"$r=m+9gp:lqmrpd>dsgDB19980824( %$#"P,eg#$"&#"##(28eg9`W,/=qa W fp:```vpa,qaAwparpf9Wfg>:Wgq:`s:s W*s:q, Wa@q:! W!qgi= Wf>: Wfq: W%G`q Wa2qfgs:` W3!pabdWc,qgp: V WsAG!p#t,`.`.`w>20`0`0`0`1`1`81`D`\```` ``` ```p``()` 9`0`8d-`3`PT` 1``#|;`" p<`"$tr[0Oo -gp:lqmrpdsd>dtdudvg$1999$#%$# # 9eg>:Wfs:W3!pft:`sbdWc, Va@sbdWcfg%$$# # "eg9`n= Wa W fq:tf9 W! Wfg $%#$)"$"$"$egv:Wq:`vW*v:Wqa@q:!W!0qg#%"#" egi=Wf>:Wfg=`W,`q:W%Gv2qa,ta Wfg&.$1)1eg9` qa%Wft:`u:sbdWc#W$qa3sbdWcfv:$qfq:W%qfgi=vfp=t=tft:r=vfx=vfgsbudWc:2tg9 WgpbWdWc:2s40`l1`T1`w> $5``3` #$11`8`3`#$<`9`$4`"``P`P4`$#$#]``|4`,-`,`4`()`x``H-`d-`D`\` `````p``8p`7`P#%?@@`5`J`\5`#$"`9`5`$=`7`5` .$#$ ?`3`5`"$r;j 2ESgp:lqmrsd>gDB19980824#$$#"P+eg#$"&#"##(28eg9`W,/=qa W fp:```vsa,qaAwsarsf9Wfg>:Wfq:`p:p W*p:q, Wa@q:! W!qfp: Wfgi= Wf>: Wfq: W%G`q Wa2qfgp:` W3!sabdWc,qgWg=`` qa@pa@Wgp:V WpAG!s4`,6`6`w>5``P#1`8<`&``;``"(`K`&K0<`9`B`P}~d&``&``&`<`N<`a`O$#$ `84`<`"$^q(Kctgp:qrd>gDB1997" ) " "egp:#>:Wf9`tra%Wfgi=Wf>:Wfgp:V Wf9`W, r:!` W3!rabdWca Wfp:3rf@9`=`<`w>$ T`5`=`0\;`0`(`P#ID"$^r-J[gp:lqmrsd>dtg1999" #egi=Wf>:Wfg>:Wft:W qfp:`q:W3!qabdWc,`s:W3!sabdWc fq:pAqfgp: V t!2s"q(:`0>`>`w> $ .&$ .8`5`>`"$"$r/e =gu%1`n~gp:lqmrsdtdudvdwdxgDB#%$ #.F"$# ID $##&%#Degp: Wft: Wfg9` Wn= Wa W fp:~qfgANY#$"'egp:V t`V `qWaWsaf9 Wfg)#&"#.EVLEVEL2"2)2egp:V Wf9` W,sWa%W fgx:>3(?fi=Wf>:Wfgs:!W!3sgu:uW*u:Ws fu:Ws:u@s fgv:Wfw:W%Gu2s fg#) "('$# ,eg$)"$'%#$&"$/egs:`# pap#p:`v-Gv:qWa$Gq:wfw:s@pfgp:W!3W$Gwgv:Wu:!3n=Gq:`2x!Wa!Gs@qgv:vpgubp@# qc:W ^#"##2eg##0$-1&"#&%#-egqbv@# v: Wuc:2Wfu:uvf9` p:v@# v:u,Va%Wfgqbpc:/Gv@qg9` p:v@# v:u,Va%W^# ## #egqbpc:r=Gqbpcgp:w!u!b> Wcqgp:V `2ta!2p:`\?`D?`w> r BRp{-l&Jegp:lqmrsdtdudvg1999 S" egg=`wsa%Wgi= Wf>: Wfgs:3sb W>d>cf9`n= Wa% W fv: W>f9`W, W$W qa Wfg$"##"###$ ""$"4egq:3qfv:Wfgv:Wq:`v W*v:qWa@q:!W!qgq: W%Gv2qgv:W,q,sbd>c fu:Wfgug=v Wgv:>^"# "#egs:`sbdvc,qaAs^)$$egegu:>3(?ft:/u!Wfg9`>Wa%W^ "$$& egv:!3tGsbd>cgp:3`Wva@sbd>cf9W s:`WvaAs^$ $e'fg^)##$1#$"#$+egt:/u!WftGsbd>cfg9` v:`sbd W>c,Va@sbd W>ca%W^$# #egt:/u!Wfv:tGvfgWg=` W,W3/=Gva@Wg$$&"#eg9` W,v: Wsbd W>ca%Wfs:vAsfgs:`sbd>c,W3W3W3 WaAsgsbd>c:`2u!!Wa!Gsbd>c^NS eg$"#%#'""D)$egv:W!sbd W>cg/`"W!!0sbd>ca!#W8` C`,?`w>p````81````|;`8`T`()`p````` `(`D```|``3`` 4`\`D`84`````d4`4```)`D5``l5`5``5`5` ``;`d-`7`7`-`,8`H-`X8`8`p`9`9`P`:`;``<`=``l`$``?```<`D`4` `(````H``\``2D`H`I`g>:W ;:W!0rDB2002.T"#"'#&"#,8`^`H`@b`@&"#0PH`tH`P7 DB2003.V"%#%$$#.S#"#@DOC# (`J`I``=`J`J`,J`7``TJ`0p`x`J`"D`J`J`$` `J` K`J`\:`@b`@^`$b`D`0K`[`\`` "#`J`]`|K`8`D`&%8\K`l``%$@a`\K``z`PARSE%$$).K)'"#USERCOMMANDSARGUMENTSSWITCHESVERSION1.0T#%$'"$%"$ "#"%$##$""%$$USERCOMMAND.I$'##$#"## "'#'$.T%"#$'$$###"$'%#"#$"%$'#'$&"'#$$"$$"$# $*"""#'$#.A"%$#'$&"$# #$.A#'$$"#$&%"$.A"%$#"# "$)# #.S'$#" ")$".T)$$$($#'$"$$#$".S'$#)#$ "#$"$&%.E( MYCOMMAND1STARG2NDARGMEBBE3RDSWITCH1SWITCH2H" 1STARG  2NDARG  MEBBE3RD "$"%$#. SWITCH1  SWITCH2 "#'$#')$&%" MYCOMMAND . SWITCH1 # "#$ SWITCH2 #$) "#$%$#$&%.T`PARSE%$'"$%"$##$#$" 1STARG2NDARGMEBBE3RD #$$&"# `SWITCH1 $1 `SWITCH2 $  .T#$""$"#( .I "$$%$#%"$%"$"'$$""$)"#%#TCDEL.E( CMDMYCOMMANDARG`SWITCH1`SWITCH2`SW3`SW4DELIMITER1THISCOMMANDWILLSHOWTHEARGUMENTSASPARSEDBY`PARSE2DELIMITER ARG SWITCH1SWITCH2SW3SW4 `PARSEARG3ͩDELIMITERARG ARGUMENTSENTERED 4 VALUEOF`SWITCH1 `SWITCH15 VALUEOF`SWITCH2 `SWITCH26 VALUEOF`SW3 `SW37 VALUEOF`SW4 `SW4T#') $4"$#'$#SWITCH1SWITCH2SW3SW4.SWITCH1SW3) "WITHOUT)&%##$$.I#$$&"#`SWITCH1`SW3'$$&%1$$&%0".SWITCH2) "WITH&%##$$.I#$$'$$#$"##$"'#$&%0.SW4#%%###'$%$&%$##$$$%"#"1##'$$ "$"$##$$$#$"($$$NOT "#$$###$%"#"*"0.T ##$$ %#") .P"#'$"%$#"#'$)%#$$# #"#'$$"#.T#"%&$)%#!%$#"%$"%$#.`PARSE'"# $)#$"##$"#'$!%$#'%#$%.A$") $$( FNSEARCHLABEL MYCODE  I MHEREEH S1S2ETC...L$$##'$#)$$$"#'$"( SWSWITCH' $'"F$%"#$"%$$")%#$$#'$# MYSWITCH2M1 `PARSE   '"$%"  $1#$"$""$&"#$$$#'$&%#)&"$) ` ##$$ "$%"&%E( CMDXARG`1` X@ ARG S `PARSEARGG X@S $##'$2...$# ""&%#)# # MYSWITCH `PARSEARG'"$&%##$'$$#'$'#$  $#%"$##%#$".NOTE$##ONLY#%#$".I$$$'#$#%")$&%#$)$4'"#$"$'#  ' $.F$$##$ "%$.I$##$ #&$ "#$"%$.YOU%#$)%"'"$".A$#$%$ESP $...DB"$F1993(P` L`` "#@DOCP`Y@Y@185656 ODISPD# ` CDANBMILINTAWEBDYALOGUTILS\`b`\`~V>"$|b`\b`\K`@b`$K``$b`b`a`a`a`a`|a``a`@a`$a`@K`K`a`\`J` `J```p````K`L`J`t``8``H`hJ``````D`_`dgDB"$1993PARSE#'$#"#$"%$.V"#D)2.22KegT#&"#""$#$$$)""$# #.LegS #"%#$$"%$#. $##'$#.>egQ%$#%#$%# #" ..egS'$#(#$'$"'$%$ ##)%$&%?eg".N$#'$#""%#.5egS"$"" $%$ MUST%#$#% )&%#.CegI$%$#'$&"#&$# ") ` Eeg"$$#$) ` .(egE(  egCMDARG SAABSCCD123EDEF `PARSECMDARGBegeg>:Wf:BWs:W!s f{:B}:sv:W^T($ALL#'$#e&fgWg=`W$a@:WgoWn=:Wg.oW3`W3h=a!Wg:gog|:`W%xaW%x:x@# x:`{@}a!Wfp:`{a@sf~:{@sfz:v!Wfgt=WWf:W3?f:`W3(?a! W!fgeg"# #'$$"%$# $"9eg9`@w:w:!W%"V!w:q6Jza%f:@qfqbx@# x:Bwc:Wfg#'$##$'#'$#$0"$#$$"Fegjy:`@Bq,W!va%qgj9`%W, ya@ fw:y#vf{:`wWa$y f/!`t{a!'W f9! y:w%y fgeg "##S'$# "$)"$$"P#$;egj9`%W, ~a@ fw:W$|f{:w$~f~:w%~fg`)W!W%ag=`W@w:q6J:t{a@gy:W%`Bwa@q fz:ty:`Wy#va$yf|:W%|fgPAT##'$#" $"$PAT$"N#"%$9egu:*W,W$` za%yf9u%fyby#*Wc:W fgj:Wf9`@x:!W*y6J,Wa%f9`W,{:W%{a%!fgj9`@x:y,Wa@g`1W!yag=`W,{a@f9fgj`2W!{ag=`W,{a@gj:`w:{#Wa%{f{bwc:Wf9`WDa@ f9`WDy:`x#Wa%ya@fgx:`u@,yau@`W!y!Wa6JW!!Wg`3W!`wWa${ag=x@gD" $"# #"&#%""%!%$#0egj9`@{:Wa%f:`{-{a% fgjw:@{:W f/!z!5W!`w@6Wa!7Wf9fgegD$$$"%$"$%"$$=egT''#$#"  " ")-egj{:p,Wf:Bz:p,W fw:zW*zf:zW*z^T1#$QUOTE efgx:{^D$"## #$!%$#"1#$!%$.egC "##")%!%$"#$!%$$"%.Fegpbx@# xc:W$ fp:``wzW*zaxW*xa@pfgDB199403251747e (`r,-`K`K`\`D`K` `"$l`l`l`9X>nq*\hugp:pqrg%$CHARACTERSTRING"BY&%IFIT0.eg9`pWa Wg9`pWa%u fp:rf9Wfguj^"IS$SCALAR0"1IF&%ISNUMERIC.eg9`W,W$W ra@Wfp:>3*^=p f`#&P