Thread View: comp.sys.dec.micro
2 messages
2 total messages
Started by alan i. vymetalik
Sat, 02 Jan 1988 22:40
RBDEMO3 V1.4C - A High-Speed Video/Keyboard Scanning Demo Program
Author: alan i. vymetalik
Date: Sat, 02 Jan 1988 22:40
Date: Sat, 02 Jan 1988 22:40
496 lines
30701 bytes
30701 bytes
Hello Net-landers:
A while back, I promised to post a demo program since several people
asked for (or e-mailed me about) a set of routines to that could be
used for figuring out the current screen width, accessing the high-speed
video option, and getting key codes back from the keyboard.
Well, here it is! The holidays really messed up my posting this earlier.
A note to Rainbow programmers: The demo program which follows is
intended for those programmers who have a background using Turbo Pascal
or another high-level language as well as some basic understanding of
the Rainbow's architecture. Advanced programmers may already be aware
of these routines and programming tricks. However, I am posting them
here as a way of getting more people interested in using their Rainbows
to the fullest.
The UUENCODEd file which follows contains an archive (RBDEMO3.ARC) which
was compressed using PKARC. Extract the encoded file to a disk file and
used UUDECODE to produce the .ARC file. Download the RBDEMO3.ARC file
to your Rainbow (remember to put the communications program in 'binary'
transfer mode) and unarchive the file using PKXARC V3.5.
After you extract the files, scan the READ.ME file for some quick info
and then run the demo program. Afterwards, scan through and tear the
source to ribbons, if you like.
Enjoy,
Alan
Alan I. Vymetalik @ {allegra,seismo}!rochester!ritcv!iav1917
Prism Software Designs
44 Arborwood Crescent
Rochester, New York, 14615-3807
1-716-458-4932
DISCLAIMER: The above statements and opinions belong to the author.
Any resemblence to statements found in actual reality is purely coin-
cidental. And, as always, the above opinions have absolutely nothing
to do with the little, fat man putting $100 bills in my pocket.
=========================== CUT HERE CUT HERE ============================
begin 600 rbdemo3.arc
M&@A20D1%34\S+D5810`E"1@``"(0`8@_($`>```,3;0``0`!0"0`)@`TJ]`L
M5J,!W/X!`.`%P40.$P'\R`@EXY>,>3).RO@MX[F,[S+2RX@@P,0&+@%\B,DB
M9HR82V)"B7DF)IN8C&*.BHDJ)K*8S6*^BTDO9@8!$SU`!:!E:INIG*:^FFI@
MP$0'7@%8"+LA+)&P4L)J"2LF[)FPD`"$W15V'%L"$^/@!=!GKZ"]D_9ZVCMJ
M[ZV]R?9:VXMN;[V]^O9&*#`1$64`HBZKNBSK\JW+TBYKNRSN\KG+&@Q,%*$:
M@(K6+UI+:0VF-:/6N5J'L0B`$.]$O./R%L6;%>]>O(OQ;L9;&F\$"29NB`Y@
M!/4<U(=0=T*="W4UU`M15T3]$_54U%U1'T:]&75IU,]1CT=='_5_U!LHF"AD
M/P`L_HGAWQG^V;#`1#X<"$`4"F:A8!@*3J+@)@JZHJ`M"OJB(#P*XJ.@"@Q,
M)$.(`!1!8A,D5D%B)"2&0F(J)/)"(C$D7D/B-R3V0R(S$1(\`;`$D&$"J
M`20=0/H!)")`]@*D2^,`@$\`45:12#F#L"/`,4;XX](_72YB!`&Y['=/.CMT
M60<\B;#3A3!065G.,:T!\`Z=4[GS"S88>'`%+H4```4L($"A"0\-1/E+%QGX
M":B@L#!@**)1&F,`GP!8RB@`FNQ@0)1M=C&,G'069!$L&$#Q"UY^:E(!`-P`
M$.JH5Y8*P'ZHJLKJ%:["*JN;M&+)3@"A0*6J"0\<8((B!2!BQ#^*/#LK!47(
M(<<;<H"0AAL@S#&&'&64P6T;;Y!1Q@!;_#"#G%F"$"T!4#3B!S@6\)H(`5'"
M`H6AF.`+`"R$\.NO)@T4$&4=&?QBR@9^_D(+``Y<$0,PABK!0)2:H+)`E.MT
MH3##5\"R`103&\K.Q@#\D@S$$E.LB<48:QSENS"0TT-'=5SPL9^PL$&RRR?'
MC/(Z&O1`"`!U5+!SR&C\;#+*&:,<*IP`R!D(.X(`0(P?!!APA;S^U(N+2X:V
MXR\L@C;BBQ__U`NVV&1K\L7`!1],`-KK"`!+`)@,&D"\?GCBMA]A_QGWW!C7
M#0`==P.0]]Z81`/.H`(`[LO@A8\MJ-QT&[QXXX_SG0M4TTP.RP"`>X,YW)LC
MSJGBC..MM^A>E;Z6,+??[BRTTKHI#%[LLA/"UEU_S3;K9?LK[S>#MVUXZ_ZB
M(P"TT$2+0,V+X(-()8Q.K5KP(A#OM;S.:YY\E/*J;GSYAT</C#_.^J.(%?(;
MH0#VVG.?@3_V1ZN`#D9`@!W.,36+!&\$Q1(4S<B!!,D5@!X.R)ZR%E&`1'0)
M':+HA[/Z$2T#`*X;]=+$O?*UN7[EJW*:,.'K/$>'$R00"HL@W`&\MD!='.T>
MXLA>((Y!B7_X*5K]J)FA,I`H`'3P@R$<X;]*>+:_I;!S46IA*"8"0QG2<$PU
MLR$`<*C#8]!C`3\T0A#),<0B3@UX5\I2`"8V"HL,P@>\J<,/;*6:7*T*`*UZ
M5:S>:)$`U&$$=+*(1`(!1P!()&FV@HH==]6K6*UC'.O012CP$@-IY`(``;A'
M/"2QNTD"(!<6F08ZB&<"RT3K'V<$@`2,$`8ZA($-(*C6M>2@`Q`,X0ULZ`$(
M$@`";(%`"F^X@RX[H*TY]+(.=)A#&LP%`CJ@H0S=^E:XN,6&-+0A#71P@=78
M40RM<6U\OMA#^8YFJ$,(8&;VBY<OMN`\$381"N@``3\,E0LH+BX$UE/G#MJI
MQ+T-*E6:J&?B/%<'+"SM%PX@0,1*]K*+&=%^-:ND%*!@/DU4PZ&_"(%"6U8Q
MAUHOHM*8:$4OJJ@5;)2A,./4(U"6CD4`0&WBK->>^O0G<FK"G.AD`"8*\]#K
MD6,1U8,H.4`)@-(-0!BC4`TH^"1$=(!A'S73P@J$`53_U6P'PO##!*Q*1G0<
M`:KDD"I2+;(.!"P5`S5K(P!L10$`X()10!C%?G#!I[@Z``",P,8H0K1(//)*
MC[]ZTWZ"YZX``HY>]CH;$T\HL(%&<0'Y/"(Z(,!!P\H+L>XD86/_Y405$HR%
MD#6L9,'!#_X9H(,`)(`=*N&]JEWI:B`(0#XOFT3%;M:?3W3LXEZ@-G`4KH-9
MO&$.\;'#+SK*IIH8@*(8==S-X;2G?H/"$=5FR'H!EQQ:Y")Q>>C#FFXNN5%"
M!R[Z85K4CND.`TC'&U#IN^^E<5ATV@L,[MBJB<3*DT05Y2*PX<E*7C*3F\P%
M&;88C@$,HY*+0,8BM"$F`F1B!]/@@P+^0(`=!$,.H)O=[DXY-:AXH`E3:`$1
MGC`%$+2A#G.@`PC$`$TKR,`%,*A!+[.%AC2<X9ER$'$1AO#+,&Q+#,$$`1'*
M0"X0C&`&*\Y#H>20ACFT`013>(,9Z'"',(!+R&50YAG<,(<6@``2+9`!%6IL
M3#A<ZPQR",.3S44N+M,AS73(<C.?"8(:W[@%<X!#N,@``CLLLPQO`$$8W$"&
M&:RA#'D`LI7)@.<Q#-H-VSJ#H,60AFK2(0UREO*<H4F$'??XQT&.`0Q@X((8
M0`%<<S#FH)5\:"7[LM4M&,,;VD!I-[0R#6_@5JXW#8)6*UH.9'`!"4Z=96,Z
M$YI%P$(2J-!K1#<ST'&H`S;GW&00L/D-#!@"&JP<AC'$.5NZA``(0!"$*0PA
M"4GH\ROK`$U=\A($1F!#&"2M2TU,!%3EN!H`!("+9@@*'37P!P*`40</'+0?
M!EBHRU*JB95&:6*:F`>5`(`.1MR#NNS;'!2*^`MW-(I7I3A`E$;!C@R`HN2'
MK6V^]I7;?P6LY9^-X@'>Z/'%&8!.**?X'^Z!MNCF"AV>X,?),P!/:O#\;T-/
M>6+#BX=\^!,6%%!Z9CF[671T(1^_X,`!(O8+?7P<%S9]+FV73G58M(">_OK%
M'S3@*!!LSFP/!\8HY)$!7+1@<[7P7%SI#@JZ*UWM;/^3VPWENI@CC03R`H5,
MU]YVZ*'/#\!0.:<"05"'0'[Q@<?%X#GW>,PJ41.4CV(.Y`4(S#>>\,KS@^+)
MWG>BPSP)G@/\Z34!=[=F#9[JJ$?/0U'RLP,@$Z/;8CX&8`"Z%^`!D)(4QNNU
M"!_071&%\+JA$*%<B@M`'_**_!5D+WC'OW1>D@<]"]-;#W_P/@.^!SY4[I&/
M`A1D[AF@$STR$"(ZV2,#+J$3/O"_5@/`@_\``1,^\+]6`\"#_P"P`$`!)2_#
M0'H&?^G+X.$*.D_Y<`D2B,Y)O8`#"QY,J.2``X>$\H6RER&`@8*A\)4T@!`4
M-@PPR"V"%HI=AA90`!1X`F"%L!TG,_0Q<,P`R7__!ODH*&!H49(!`"A%>,$/
M40,JD4[-T/2JRJC_#,#+$,C'6&0`Z`Q(%^<?K``#;4)IY`><A2N:$A$8!^`M
M%$V8]@)`)^0>K`]08+F86_=N7L%^`4,>\#<P7W0?#`NL>3-GIEP"`-S+5^"!
M0%@(H/S"X]%A,7Q^0<FE:Q>O7KZ1+0\N9\\OK`B,:S_<R;LK&!POKO=DF
M3@"?0X\N?3J!ZE6MT:&!#5>V0=J.;_<MKAL=(N90.#^/+IJTZ<0*5'_+[H)[
MW.^-;4,F+[AB[P6).1!<>)`)4-E^!UZV`GKJ>09:>P58<)H%JD6`P$?H1'//
M+^(PY!`&]X@R3@:^03&@?I>]<U$#)PXW7H*#57*1!XF!T*)XN?7'RT4J)+;"
MC0@FATXH]8`R8DPQ2",%%+@,(-`OY'C8I$"::'$`7Z!TB*223(:F&CI2.OF7
ME7P!XL.(#]1Q@)D=!D!'&1@U"-V#TTEPV@-S^0*`/W?]8L.%>+4A`%^-Z/G/
M748:I`DB`_"EB3Z#`O#+$(`^&BF4'EK*UR]45`KIIF`VI.E@O-AC)IIJI1..
M/VR6E.HU_L!B(CHFS(.1;QA`@0X5^*"3C#R)L!,#,)K,$P!?`%212#FPA``%
M,589<(4#Z!@`0+!=*$-`LAXLPHXB1C#@@BA``%",'0CPTPH4K2R"3;O(M`M-
MN^BLVRX^]CH"S`=>8-$,`)Q(6X6WT$+`SRJ+#(-P,`@+LPH6"!OS\"J,8#,Q
MQ!]D:RTD">CB2P".:,.(`:9PL`@Q!4P`0"P$3(,.(](,(,PHJG`PBBL<F!!*
M:"T``,$HLG!0E"T<=`,`(P[@(K0!NG`@SM$.\,*!,09PPX$`,P`S"BHVLV(S
M+#;38C,Q-AMC<S<<X`)`#<V$D(@'R'`PLC)I"\"VVQXP([<!SJ0]PMUO0[.W
M-&F3`+@'U.QM3=IU'([-WMIPX($#'^B23@!JE]"V+O!@/H+F(>CR"^8D@/X!
M+J9H0".-N'`#@(#43N`1.G\<@/H&JS/I.NSHA$4M'`<L`T#6RH2&NNI04.N+
M[:;@GCPZM1S@03$6Q)UYVQ],;X'>N`A@NO:"X_(Y]MHGCDOIY%/_."YUF!X*
M,!PL8(`P'-"1PBZG!(`."0"$X@L'Z&`!`'9A"_UAH'_T0X<.^J(#=/#D?0!\
MP0!WH;^H+,,%BCB``H!!!P.@`P<`&,(ZYC&,6)`!'0=8F0+0$9IU$$`&Y+!'
M/`@``UUY``!84`0QA@$%':(C*EB``LND@0YT.`D+)'@`#7F@`SD(@``'4`0T
M:&&`M@U#"G5P`QW2T(8R@*`,<I##&^0``@"`(`QT**,+&J```.QC$,0P`!8"
M<8X/`"`0Q[`$``#!CQS,80"_0,H5:$&%MGD+$$ZP0`"PL(4L:,$+7^C"!P[P
M#%R@)0M;6(?M_C&\9,Q@&QX#F386$8T%3(,.!UB!!THVB'5`P!$DRYF9"@"`
M8="A`2:`I81,,,M:UJ$`)OB'!ZPUBO\EP@'P>QO]B.&!IC$"&`NPY02R-HJF
MC4)JHT`;+F0@``$98`K+@&7)>.D#6@ZC#@LP`=5H"8!@NL!:_N,`+9C0-GXL
M@AN,T(8-B/$'!-B@&'<@`"M4H0ADR*`=\R!%R+0%`'OB4Y\`5<`^_V``&RSB
M"0+503#L(`!%!(.@!D6H0K6AC#;><Z($,($B"@!#ACHTGQ-EP#_O@`!%O)`<
M%GV"`1:0C#\,(!=1&4`\5A`,.4P`"#DE`$_[@+5D[&"C!EA$,-:!-6"H8A'(
M2.A"$=#0>\*4G_X$:$H5T8"#LL($.ID#`M19@']XU![0&$`^CE!0K9)T6P[U
MP$S]R4\"*((!!U5I!61@CQ5$0PX8P$54>$J'"0C!"$>(@A6N,`]3?,$+6>@@
M$)10AWAD[0/*X.I+(4I3E)Y5$26@*S)TP`R.*H(9"DA&!P]:V3H(0`?$V&I7
MN3%1`[Q%%390Q!$(H(KB[?:K?Y`H0"NZB.%>-:LC58:U!L:.0+`#``(H%``.
M=05H*4!:BA7((HQ@`"0\KQS^@)8#I$6M#OQ#NWSJKA^^>X5_V,$`N.#D\XSA
M#VH-X!_>E99]+X0.0OAC$>7(%@.2Y2WK8G<05@&`'X:@7>X&^`KAA<)X$6!>
M:BW"'_"]RX4W/`#R,DF_U(I#?]'ABO3.%[PH1H<+#IS@T!Y7G_Q4[AV8^P6_
M/N.@,@#&/`BZC(3&`@0J6(8*GC'DA5K+H2C-!02&)^15+..D_*RH</V*#1G\
M(Q8#F,8Z"@J(<!S@+=(`APD0$`#C8KF?P3V"EJ]``!5`0PX?\(<P%-'E+X=Y
MS,@H\YD#D.8U!P`:P!C$-/:DC#K0PZ5>):U$LVS1'BOBQ^T0JB**'%V3\K:O
M<:YIG\$L9C*;&<UJ)D2;GQSIB88UH%(&0"L64(!5B$,?"\5KJ\$Z4P+$NA7W
M@,8(:BT.?.3ZQJ[N]:^';6M<WQ79O!9KK.=Q"MV.-MG2GO*L"_`*VQ9;M^A8
M`I5/NH@>+V`;=""`).XQ#TD8%QTU`,`D<`$(`.2BC/8P!B#JH(!HC",:TO`'
M,L0QCR`#PAQ_6`8Z#K@)%WS#`";9Q#8,0+9-9",<%N_')KJ1C4TL(QS_"`79
M%N$!LV'5!?<P00X,$(UPM+SE`DC'`*(19G_[.\P"F$<L"C"-<>2\`%$9A#0`
M,`JR)<("9AM&`0A!"Q:T[9A&1SH'EG$%>V)C`=+H0P/N,8U[2&,0PPB`T/O2
M`E7X0A,&B$4"7+`#*@A`#@>X@[AVP($Y'&`0QB"`/Y)1!W;X(QBP>($_@.&"
M%7#`!1MP^QSJX8(!''X";L<[<?=>!YD\XPLK>,8P`*`,3>P``.&H1P$`80E,
M```(0C`-*`P1%0B<``"#<1(`R`![`+01]E&!?=9F((T9V&,<6>!E#U:`2N&W
MX)>03<(XD"!\$M"!""KM`"#6H0-`#$,!<T#!/80!`'C4(093B`8X`+XD\0/<
M_-+8P@"&L84)3&,+7E[_V/$@@2.(HQE.X'>PO0YTJ0P='P`!=["]#G2I#!T?
M`,/R#3N29)P^$XHZ`-H71LX`0.M`0-0!:)@".0L@7JAH8`ZTB@IN$8@&+IHT
M.=3\/:MC3\%`<='6Z:JRB-T@=B`6&7&PR`J$1G[`63B`3IL_#XON6?A`S`^"
MG@9T,M@AS(^`1<)V*+.Z2-F.8'VN!N.G:D4P.@BB+$(&"\0\55GFD?JPJ%P7
M90P`T&375`'"!C+:'1F7P`2@'B#J##@B[AZZ`?_D"""\Z-D*)PIF`)LAK:D!
M$XD:W$4`8!$W#S:(_4%@H]@=`OPTK\(%Z]IL0`!6R5ZUJE$1.JL8`9NM#T%P
M9+J!Y7(`8-XJ5CR>V!$`ZXDB9('ER@"FZH,RTJ93_U%@8]$1`J"+$"A_Y'.B
M(@S8(TCO0'/Z^>\5*%,`0%>L:^L@H(LL``Z@RRS7A*<:>HL4(4`/_]$A00\$
MTM%`#[59>(P!W7!@!@#KA"`%.FL`H(5]B50AP'WI*;`+!`"@PP4`='QVC(.U
M*4-`:=R(1P`Z'P"@&#HQ`*`CCSZBPUP=":##`@`FW$C=-4>:$$A8$3I@95@5
M&K!AAV<`,,PN%$!YI0`5'C`,.O'\LPL'`!APA9PF_)/!`L#0,<`H'7ZAIFFH
M%?,'`3,D$QHN`/1P9H0-P"+`/P6<B2`=`M#"`R!]P$!C`HU4`4,S(<BQ1"(%
MX')-`KM(D\"BU]!APB(=($H$J+C`H,`BV-@C#"!U0"#I-4.6```N![BHJI0$
MOD<!(TU8D$@7&#"KP8T<4*$`LQYHYMV.G!4**RX""`%J"[@-H@T`<Q"ZF31=
M+0+-MP"(&T(CE>"6"VZPTO(#J',(H-D,V^R`#1T2W0N`!GH.L8X\BTRS`C2Y
M_///M^&"ZFT'M``!ZC":'0FHCR844P4#KS;!(,;[A@I!B_;=2!H`VT)Y(W\@
MNO/Q@B&/7/)\^6H<Z@%FZ8E+&3(7\7+,-P^:,\F+-,$SQCY+UK+1`,#L<8\X
MPSK(/@3800`M/E@,3)6LUI'!(#YT*"0&7GA`YR)=\%R%7\3TP<`_YGS)`1IB
M[J`-'04@%``^PT3A@16.>.%/4P<]BP"=_W1!`9YZ\LD!XZ_&_>K<)M3-@!<?
M9.%W'<O`HH%`7OCY`6AQX[TEFL">G3:<=;#M]A69RXV>YWCKG8:8)B`2P!!^
MTQ%`X8<GOK@?C<<-N>24[]DAYG#KWKG=H&<Q3.H'K.XXWGMYA@X(_]1Q`3I#
M_,,#P@T,P4,#=="#S@WJ*U#'\.BP$;F"2I=-`=IJJX,"GH<!/-7!`$?"!=\L
MMXYZA,\/!D"'$,K7J`:@8PS_@(4"T.&%?Z`C$OO#6O^X!*S_S4Y(`\1=Y`H(
MC`,F\'<,=&!-Q`<)`/BC#@M`QRS\(0?\J<,?72B=!M:ACP=NL!PWM,`BG&"`
M)/CA`&U!!P#^(8Y\*,(("$`'/OR!CA5$[D@/9``ZHG##$A3##@@H%#K>X(_W
MT<$!ZZ.#`H80!",@@@`[8&(=UK&">"!"C),`HC(,`("FS,<8!0#1/,*(CD.4
M\8Q/82(_6"$#<JP`&7Y(`!2BF`E_5!$+:QG'`2:)CD9X,A_H\(4@"7D3$#S0
M!.@(1S_J,(09V`,=`F@CPC3``Q#<80`*DP<ZZ-&/7MJ!`4,8A#]`0(=Y($((
M`C#".MJQ"&>@@P/^&$<&@"*`H:"#`/J00P(6D(PZ%*`+@R`&"):A-S4`X%_2
M6,<[6KD7G:"@)RK@IC>_D(^FL``=ZYAE"'1B`K/X80%J80L(<'G*+#1B.DLA
M93WZ445TF`"(Z03!('G$"&VTY@[D48T!RO,$V.S@'G,XP`#B,8!\..$)_9"+
M([2Q'R2IAC6+>,)(%7$>?KSE.WJIB6:@L@!IZ`D=&2BD4SS@"`^8@@-DB81<
M/G`7`;Q3&K@$P"26X0@#//47N/E+8(X`,,(8!C&_9,P]DF+6PX#`#HMIS"*.
ML0)CT($`0U!"';PQ#`!`P@`:"5)"1$5-3S,N4$%3`"5',0``(A`!B**8KG4`
M`'L:*`!!4$J9-F_LE`%!!\U",V_8L'ES)XV;,R#&.!RS9@Z(,&[(9'S3!DX:
M-F7D@""31DZ9,732*/28Q@R(/&_JG'`ID"`(.77<N+&(,2B9E""HU)$CY@T(
M*&'FC`G#!H25&2Y@@$!!!<J,%"#>J"P31@Z;-"E=$&1"5B%#AW/*]"0XAJ1)
ME"KKNJ$C)R)-FSCK?'0)HLX<HDF7-GT:=6I5*S2R;NU*(X4+@7T$"MQ#0DJ+
M/CY![`$QI0R=GR#/+-3X<@WB)T:,@,BL@+.0SZ%'ES[=-")9-R-+HJ2SL(P=
MJG7"Q'P#'+9LVIRGX/:IVS2(.73"<,RXT?5%$,YG;R:19#K!T4KE`$_RX@GW
MUJ]CBZ]-PHEYT4D=$D[CT8U3-W6TD5(:8XS4`AQ]C5'&''.(]=%Q)X4A!DKS
M<=8$"#;44`,,,+`0@PTSX$`#"QG6,(,-,(`V&A%EF!%&'6R<AIUV:WP4$@@.
MA0''?)O-5<2-;]A$&0@*R7$8<RNU]%),,V&F66U/^B2%$$04T<036$$1Q!1S
M@=##EV"&*>:89)9IYIEH@ADE052D00=*.H0FIYQ3!-$$%$P4`4*50X`@11!)
M."'$$U>`$`.'(""1Q!%(M#`%%$440815253YQ`M+%)'%H$%(0427<X8::J!4
M%"&%$4$,$>@1?CY1!16!%L&E`EU:D=*1;L0IJD^V&ID&DC&X0,,0:R9:%AEW
ME+6007'4H209NO+I9Q@6-76'H1P&\8(0+ZSP0@PY:"5&5`1>EP=V![&`(0U+
MK."GG<5.$20=R1+&K+,N05L0M6Y8"T(3TA'QQ!16W?HK<#)D54-8*B4<0PQ;
M7>7"H>K6!.JN&`>&8QANN>G"QRFHF]YB4$E%E54):]6"59'!4"R+"DT$1QDB
M,:>KG%+PZ^^A,'@[0PQ-B&$NNFV\`'`+`A-LA<,QO#"R4R6W<#'&HCK&<E9J
M^1F@6#0SY!0:'"\D1AEE`$<<NB(9A=314U,]9](@8'5HL5?(X29QP(F1Q\US
M!L$&2"`DH985>0B8W5EKM.UV:%#8/4<;I,U;[T(L'G:&&W,HOCA!--``0A!,
MB77'&V^(-(1+4I5-A^:;2_$&:^C*H:X395R;A5AKJ!L##3;$4$,+(<)P`^N+
MW_!A"S34@`/R.<P@P\O*E<$WU5:4]:MAZMYA-QUX@S`VO60#!RX.OX\_/*T#
ML8D&?S^5@5)4TH>J!$C)R9$'"#+HG@,..!`4PPTZX%"\<B('!9$F.W0PS/2>
M4H<)E8L().%7L4(CA#J<80[JFH,%58.=@V$0!&DH25\4(J"]?!`D-6L(4M)P
ME*AD!'!C`T$;J(42D=#A#6U3X4>:XI8PD($,J/.(@\K0@AF>I&LWE.']#%,V
MZ_@0B`N:PV70YY,@U*$A8CF!1YSP!N+H8((^H8)^%@(VMXRM;"``D(#Z8ICV
M-6M!=/`(1%32(`%=)PS"68CAT%`Z.8JE;=I1$(,0HT-IY:Q:%-$BCM)P!C2T
M8`XSZYH=6%@&I[`$DG^[WQS.19PV3#%48GQ(1"92D>\\C3$FJPJ"7D>SI2QH
M,&(K`V)<\KZXB,0B251AVZ#0P+,4"()&-)M3J"620_:+(H6)BY&R%LJX_"0G
M,7'#*\L8R[*UC8FW!,X,W7"_("D1!*LD0QU@0A.S.02<43F-1<(B31#,$7(.
M`DD7]?/).24!1V^8V4URXDZ+V-`AD&.B&6#$3+@L1%GNI)99-!E".%"(C=%<
M$"!OE(03N(4O:+&A4V:XAH6H$'(N#$I=A$.@Z(G$A7!XPR`G5(:LW9.);5-C
M2G+BD>/833D>9.=;%B0V<A7HHZ]$81HI,L:5..6>,R).#L%V&A4Z$Z$Z1`AV
M0-`B,Q`(+7MYYA4MLJ"LH>!V@ID*<-10!S*HQIU_3)^<`F,D]\W$,F`D2!)L
M`A*<M#-9)O3:=<BVTY$<!:UY80Y?1DG(<W8T#TTYEA;;!I&E@"!/1/`("N:8
MJ(B(9`IC<`D:&\+&1H+@"M2B`UC\68:9A41U;.BF3=;'/:(LU:/G'$(0H$`P
M)CQA"$L`P6'599HQJ,NA9'$F$8U8%3N&P8UU@.,4=UG+AY"M*F;0K%[UDAV8
MR'`A-=FG8*AIH_N]L8/,D6)<0[,ROX&D6&E*KWK7NUXGH2\@:IU"$NZ4)Q`<
MP;9""`(30#"$)SAA"E0(@A.H0#`!3XH(00AP4K(`J5GYA+T0CG"$W2N0*L3%
M([L:S0DLO*`3@%"(;D@M8!,3.E1:#3*2X0H4*C,?@D!P#CMX$A7R,+,GP9=7
M+)P"`E^YLDD>Q9+\<6@8-+GCS*DU"-R3PVY\LC+E8%0,5WPE98\+A[+$9`PP
M*@MWRJ(=XJ@DI8=9CANZ-`2PR2$&SF/R=6XHAS"<E0XT7@@*VF"1-J+D(@WQ
M7AZ(`Q;*2D6SP`FAFQ<RA[`9V2<Z/G.:U8P=L0R:(7$>L3]EPL+D5(4X>#C-
M6:0IV8KDN0X[2B*:GZ=6MXUZ)&P($.;`DL087E+(>:`9A=5JA1P7V4M;$<(\
M68#D)S\AQ'E@09G+\NO4IB#&5"1(KY5L'8+T@#36>8)-4&"0(L6%!;IF`QE8
M8(2_S0$-+*C":<W"U6,7:]B*EL&#/R>'-M]O"\&:F/.Z$!:;H!O974KTJ=>=
M:*+`>][XAI):Q<@^]NEP1B$Y%HE)UIB3N>0,_/$RI/4YY3$(\C#?.5K2Z@D"
M<8^TA*<1*A/?PCZ;ID%"%(*S/K,;F)TLQ#"(Z8I59L`P[[6(:QPWB(#:,#:5
M)#$JE@..0<X`%8ZH:VRD5%<NU^<1,BCGN"K'+N:(X\-Z=\GE$(_='$ZP7+4:
M9`Q%KQ&NORX6,A!O3D.`7^#V4@;5J$3:9Q>55N*$@L]A`=MW'\+=B7!W(4"!
M!?)E`1&2(/@IL$!6W/[;!4$0IR2PW>T@,'>I-^<_QF_E<TS@-1*PG7DA;'X(
MF2="Z)%@>2'L>2&2ISQ!?D0&9--&(-63@XVO?H6R>YA]QQU2U+,V[(MXU"DG
M<#QQW.YARG:%Y@[22&H6<IQ42U2M/Q_)U$%"ARF^_LC.F4(1J,""+E$A^]NW
M?.WET/K9#WS%EL=ZQ&_E812XI"[DKW?[LNYE/ZJ$5%)``5A,\*\I)$W_+R01
M<Y`"LR8E;1=VH1$G0[=^1A)P-Z9LUT$4%/)GX8-.9^5-RM=F,($40N5D=@-E
MQ&$5E.04?W(AC=9FJM%UB)99%5AH,[$Q%^44,81ROX=/VE88H>84414&>!!"
M`2)_,N`Y?7$'AT80>F,H:587J=8&F"-_&=AEMV(C_[0:8H$Z*142B.&!:0""
M8G-Z13AB9*$16Z:!$@=F;G(P60-6+P0<98`',V,W(`<"GH8&).<15$%*KJ56
M"$$8#0$XS+$057:!-N%CE90DF#1D>N6"72-4=?%7QP517.4U73('GB:&WW,'
M%?A1*J@^"Z$]9_@=D,AI-D=*X/0W!M00[.-TV9$D[_<F]X-+.GA.5E`I1?`$
M73)XC\($09`%("`$51`;IO(6G46'.C1RWJ1#5B4';3`Y(,1V[09J<?0137<0
MS"$U:H4=;48<V=17=>,F9<`$D;A*"B).+J$N0N4$3T`%>B:'VX,8+-&*(G9#
M75*"6]&'=*!(_G$:[T<2)704(H%Q!N0F:S@2SP@'375.JGA<V#A."<03:H5-
MTR58?7%I"!EDF22%,L0?+1`3=J1#A`ADAW@_U#61UN@3>`%7R18XIY$L-.$1
M>J$00Z$ZB<AFL"5U+.%CE@8"F_9*+E%UT442.U4KM'@I"48%4I`$OE@J[W(A
M$_(Z'=&,'S&&4*@29>%N*Y%<>J5#;J`<KF1UT'=.5V(%>B*.K4080J5#"0F5
M)6A]\<*"94,%;4@'W1=?;ND&RV9YH.-N\/8Q04AO&&AFH^:`WA>7B8:1R[:%
MA8E0$'D&$S$N$G$_272"-2E]>!.-Q^@0DXA1W]&!2;:%429$-O&'.AF)QQB7
M!54&]X-0@11%LO:5P\B-V_.-7*4NNW&88F".-[(;.>-[MND19$F."W)T5]0E
M8O41;-`@-B=#I5,3&?41(<=-'-E2G-@^48$DE(6*'A$7=-`"H/9A73(V4S%R
M.M2-Q`&.[?2;KF2.'N&)W%,VZN(2S:(D'G%PFKEX\JA6,;1.:/ET>W4&<7B9
M@-@79]!FGD00L7=R8@9B=0A"+;2&W[D09/"';)F2<)EIB3:75=298E"8<8*-
M@6E^/G$"2X":.A8]MS>?Y^02#2E-(G%8:\:5-84<#]$7D&,0/C2BB/4&QU)0
M_-$ES8>5Q1E#$)E$1^%E=-9..A1U\N>B#G)8V/@&'?46RB&'4=$E$'D'#F%.
MJV%F4TFE?F044*E#%@$'5^0]=6`&9I`6!'$"!D$'Z':B7:)#79:33[B!/L=4
M7FJ(=5$D7:.?YS2F90IE:*JF*BF')\$&#\I."P&@4FFG<D2C?65,UO)(V9%P
M\=<$,!)-.,4<5$%F7&JGT%9]!*&&%2$1,%B#K+$=(DJB.^9A1&H:*7&DV&43
M;M(EN#=_6:826Z(J]U2G7F:.US$S8W!R5>&K*:$N\>1.(B5FNH6:$]HE.%JB
M(1@GID<<R&:`;FIF!!$G]P:B!-$$_*$@$@$2E=1&)D>#]M=7P;0GU`A.`DJ@
M!4@0>("-&$H0G*02<=)O%[$%,]`%.R`JH_&2!H,DV$@4'G%]/G$%ZZ,135`Z
M95"O?O6PMIH&$(L'$!MLMNH&8V"Q&3L&]]-XCY<2_YIA&2D5:C$1^40DUH.N
M&%D705%_/*)6Z82O!Y1N(TNRXM0&;0"9<;EF=O,="$L0#()A^6H=WE2M97"S
MU+&@VOEAR81$3B&9?66&"1IWJN>$GPJS5-&39'`_"()+?:JE5JMZ^50V[FB1
MB!A=>+00U]<C:E4$3C`IL&%?^*5?!*-]0P`K_M4E$M:W?FLFL^:V"1M:?/NW
MAFNXQ1($1)(2#)5''P$'J]2#,\2LC,HB%XF>A/&3D'-\66.Y0]8E24`P'$-#
M-%@8XY84*Y8U2$`1QG&L('0:;1AQY708?Z5#0R`%ZA@4`HE"5HIQ&&&/IBN0
MRN=[*.I1L6H1)V.LCG-EH!FI.D,1''=/+$$&;G`"*TE]B6A:4\@0(=2)[;B9
MU%D5GGL_H2B=G\--)4D0HLE=QS5#&A&)C;@0Y2NE*XD['O$]$M>'P-$5BG04
MF?0#Q8('(+`R<@JY?2&YT9-&`=)S\D=G$L$?+\$<9-"\_HN(\(DOK7E]C<-*
MP/E9H75Y`@RRPX<4D@=[96&KEB=\;2>R3R($;;=.HP%:`AFT(,1XSQ8#UUH0
MI446JS-Y:S<&*)`&J4<0XA8359$&N'8H*H`'`<=Z_QK#']RV`N<3CG>&5)$&
M>B`7:G6X7-RWQ4)P'C&_$?I*=;00JB%-;585?,1$'55:67@CVLF=.R).,=%5
MG-@EKW:1F"8C]:FR-\523MNT/V>J$P(23SF'47EG9Y!GW@0#'.<W#:)TYZ2%
M7.BSB,$^",)3*^DF='B'X*129QA>>]543B$"+-$&/CJ"(K")(,!%RGB'P=97
M3*028"L'+B)(AIIG!U>7#-&SG/ED49:9/VN?:/":XQF;YGE0N6D:NZD:O8F1
MM:FA7XBY=EQ9F%@DDHR:U['&-QA#31L&.5(S-A&=>G5<:^`?=S!FU[AC&*E"
M@:9.'M&=2_=RRJ17'$5H7:E#U*4ZH!FG!F7)%V&'A''.%)$W-T<83/2L"K#!
MX]B551P35YS%`>?"$`<<H_'0Q(K%;%LL#Q@:H816$D$1A#0Z?GQR+"70"Q&?
MVV%5>/!*@TR*V+D2U#@U2004P*$V*D$96>/*,_28V9R:A*$7"!=''$?#00!^
MZJ@#ST8"16`$'**T&#,:06(&3<NHMAEE2^D]$[$=M!%&2&W#(,#41?#4FR/5
M:%K5XWQ.I8(%ZDB/3<G58WNUYP$"1:`==/C6->)-],@^[`*5BIQG-&P$AXIN
M7$&8?.$A,S`#+.`\QS8GU7$:%4H'A=EJ?^,&3]G5!"'8$D'8MGFA:*;8,2`#
MC;VT2];9?*%7ITPD(QBS8638*K&MSW8")P#54=T^3?O7:'"P76+:^!K;LUTL
MNQFA=";13^+$^('1$;W1Z".X!#$$2]$@<O!KA=O%U*U>7\QTZ-02\E>^+?FT
M&D556PG(#G))I9ND/8ME1B(6'/?1>U0Z>U($?:(1*B5*@;47$[EIOWM.Z`W=
M3AN7+B$@(H:-R\=Q\J(N4^81VP29W>L1&K.B]9;6J_'<8J$N&M,&AM%42R&V
M:K7?#H(DP)O@W"L@Z2J0-4T6D$L6*N'A%1F2K,R[*>G<Z1W=:#K=U5WC@(L^
M&IP@9;D0,`[=TF8&$_W"%LU?$B[C-D'#0Q=V+C!X8$T"'`(#.!!P5&S?*!"$
M+)#D-%+""F#<H]'C8O'C,2L0#+WC1![COQ;D%8T?7A[=P('D!T@C2WY/2AW6
M3QX$4BY75&[E6,X16L[E9>[C;?XDS%WF+K$7F`5H5\!"#4'C-M[H87)N2U'H
MDEV7B4X&>68R37A<9\$]*-$"!)W.>A:"?KH0:ZV.'[F4D]AV<8BE*4%HG'00
M)<VR""699'":Z"0'5Y:K*NM\WJE6LJ1"*H$#6N$@IW84VHL8*DYHO*R=T70&
M/-K=(SE*K>D31UC`J_2U";P@4Z%/<?%&&AM4TVA5+!JFYR2IR&1F9)"^5$H8
MVY239WE.$!'2I801Y4N;IG'HX=.P1Z'01K"L!T/HJH/O95/I>4:MIX?F,`SP
MAD[IBDZ'-`SCDB[P;D#P=#CG37`06_!]L:%]5*`#3FX$,F`#75#<(?'$"C_I
MB-[P83[%!+$;$J_O6OQ@CC[S:D*AV'T8CDO-HUR\TX)(=]"_:`N93O'K^@$"
MPKXR:>43H]8"2JAJRKGO<J6/U/B"GDS)6,WL!HN1%F'%9Y'%7WAPDH-0*57+
MZ>J1JYW'0Z9(F]91Z7X64[60,.%*DQB+4VK.Z`P<IYY4V&6'[]NZ(C$V<Z1'
M()$&9/HWS1Z4:H7V><#*+E^7,&]4KY2/B1($8JE7,>08-?2O>[@:RC)0JO2N
M>'2D9V"K_4$V_@A"@,%/$3I4H@H":EB<["F_T,15\PF2L!861=(E6#JE[(/>
MDBYBBM\UR7X=O/SN[HF#2!*[AZ]+:E7OMDV3?46!:)3)PQH7`4[WIY&/Z[.9
M)UX6M=\EW-6Z*G%&P&'361,$;(@'>`1<3DME^23'AAH2R)002*&58M'3\_B\
MUP(WTN\&K(P0?Z7'R"BJTBQ.1A(A>DA!V-6<4:/0QEP':WR`!N;5'0"X$`Q>
M"-)R%,TB%(NYTLJZR)QQ6%!I"P@[Q"8#N@!8""7J;$Z0IS*``DY`$6@W#F*=
M]+^G5P9.``%Z6\<IYLF)#*C.-,<*1`$:00Y4N1L0,D[`%O@!,\`&YK!0D7:<
M"04$#V;@["C`./$#3P`;4(+$X]10P=C4`M&`#=0<K">NA$'TX<0$'<OC+\S!
M#M@F1D?S;%RQZ'<:BUD-@31HF]K'BK)#-"$:_:B#TJ@D#G7A%X5%![JKLC7^
M!%*5:4_J0?[L/N)0)&19/;-^2V(1V2$-=?5,@[IK=H\**!4C9=("CH*XZQIN
MCP[$B0TS;G;2"5`7)Z#;1`4OB`JS#1DXA5+HZE2;6[$0:LV/<0$>)C_TOJRU
M0HI7H,$<*4$;D;N#8L#RR4U1*FJ%:OV[4>><@%D(*EC?`3D!+U;WSIS6!7L6
MP*K*R(%+2"!TG?+Z9&'FWY6JJN!J@E[70&1H:4$\BV9H-]0=%V)E8$Q9Q<%_
M-T/N!\JJ$65L$?JLY6.FU,GU8A`R+>A(PH_0)5P$=E`71TK0L`&F!P+G5Q(1
M6+@N*LVR%E`V`D1*,"D31^K\G.]D")U,2@`.QN\71A_E=9K,$F&8)T@A69P+
MU(9#OA)_@(?P;I2(M.]P%/X,X6-6E&4B^)!`N">PP/QA0-N,(A2O+E%VD`)E
M"4.=C!*&(#'@)KY(2I(3*Z`%2,6H.!6E8@N@BE?1*F+%K:@5%0<?``$^\2N&
M1;`(`L1B622+9C$MHD4Y001(S\-A0(J#*U;%N9@5Z:)<O(J:XPOHQ;W(%_NB
M7_R+>S&NB0H^(!A#!6'T89L#@E2OTY!V'%)<U(J0T2Y&QKI(&5>`5UR+8S$S
MGD6:\Q75S5>$&%]1*WS%T"!Z?F+L>(R2,356QLEH&1$C00",?Y$@C,:S*!M]
MPF%4/;-Q3LS&W6@;OX"?*`)B20IHG[B6&^4$;ZR-<T)E=,!75A4@QLJ8A6V%
M..Z*XU@6^V(O>@),X%.XQL$X'6TCU5".KE#I#;`.>!I<X=E1C-:+OR`4[R@;
M86,O8@*!8@D41NZX.<#CVJL\*X.+]**U-Q\-(VSDBQTG;ID*^.@$BD!_E&NA
M03F*FZ-`;J3)@420^'&H=)Q2R%7HQOI(.><$"_2OLM%%^"!Z9(RSCIVA``1(
ME0Q%S1$7`JD>VIPND<GBPEX(&:_+:9VQB_B80,`9(!TB894,J-!'2)Q"%NL+
M4\O*=,._(7OPD\>X;MC#G4`J.<5#%H+G8(HRPC1@0MUA`\#A80!D5N\9%AGB
M!$,.2M]3""+A*-JU/H@4E"&2&'Z*K\5)L_%85X(#4]Q*E`O"/:UM6!'7"$;<
M@WA0IGU"L[,=0\,Z.0$>2#N=@%D#!V'"OYN#;D`-:JC+0\D\0IP(E-8!+,2)
M#(3P@(.:HX.+\N%ARB<#ULJ,$$0!3X#\H``N0@=0P(),"3MI[;##+32`P,(4
M0`-5(522`5-)(:5)"@`+K1%";@59.2H]H"K\-G+"\:Q*,=`J20.L!`^B\E>B
M@5L)%0\DJ!25I!(%A,=@"1*E&;-\E;%25+I"9MDL^R35>):S$CHZ$WM2+9],
MJ[R!`L'/(4I%R2FE6$>+9D^&#;;!ZE8L'*`K\0CP\@-!,V:V?)[9'4(FU^F<
MX#SV!VI4D;I#=G(R2Q*:/C:ETJ%-'!LY$I0Q*W28HHA(E_@NPA#K7016!@<P
M#'DADU]&8OZ[$J<@9,)D4IBCK-EUB4;))KF)FT1><=(1I@2**%.RD22147G2
M$W(5/KDX_B2DO$?%PL7E&W[)FZ29O)R77:Q8C!&(!>P6`D%8&:1D9F(D4/.&
M6D!3,`JUKZ^T&=^#M;@,J#*3F"/NA(%!M8'^'F2:9$J1T$A)HL!Q6&:3<9DC
MY4UN*N#`J"9BG;R(PA!/2B,]N3/CCL],,H)RUMA+PI`OM]#EZ9ASP@(FK0?)
M,A\EX(R4E1(_%$ZA8=0T5*+9`AV3WLRY=6F;4$"C1)=;KN3-M<FY\G2>;NJ7
MTJSN+,T'*2>:ID]0G$M05_J$QLD.FY:6BSW$*5%:GFZ%/GB@Y"2:SFQ-TK`Q
MH#LWYZ;\0)[36MXY/['#E$-<X6U;8(QHSF=#/.U`[,1S0&R,C#:2-23FU\K@
M,#BBU8&UHN(N($;2DYUSHJC,.0UB<5"`]H1*F:P%#`D:5L1.0O@D##Y@ISC&
MT-EZ?B<=:&9EX)FYRWP3-B*;;4IF1Q-I'JYZJ>,>8`&-2P<T'&42.^1.:L=U
MV4.0R6YPA*P92)9"]$@M74)%V8W6U5=\GTR:@8JOZ3R=K&%ZT,D@^0[,L"8^
MBTG$,1##$P2"O-!(U!R%"6)$C(-H"@T!1O8_=4%.^$*<"@,=14'1IV&VZ[`2
M"I!G3N'4-#TF-(#D#_`:0O+G(^&QH,?*L!2!H$,K0X2B!;=`(H?E9R*B.?2#
M_-!Y$D*1R=,,B.LP598XC$)"-5=?.76*3W`VT*XT!1YHIHF@TJ3N>%$Q%"=L
MH;1:$-<3?1($++JM>M'IB3P!!W>NLX@HPE:8'*!M<VU&X#K$D"K5"`/;.6+!
M'KZ.N=EBZ`(E:J1("Y/FAHP0Z4XH+ZL(EL[AM3`A)SG]*!T`I,JM2Z`'[.88
ML(SA6X8TH22(A4K5^I+`:6`B%!22O`1BU407)M?@F7Y22R6%GF4+"Q$]B@O^
M228-4CI4$S/+%G)I^JV59A4>.!0NPL5@5&N/9K2`4.BS&%)7VJ:4:2+Q/&F2
M:483DI)!@I`@!+]:YV*80WH<7F?%380`UB:T^,)IL'@'X0YD/*3F\6!`4Z,!
M*Z#*J0#W0Q%:0`RXE?Z*.)W23BE.45[XH'C+DP/"4V&Y!71-0Q`V9J;8Y`%Z
M@P*G1L-2""C@XK6!A;KQMH\.P$9TH`L`GKH4V;;`$-*I8X`2:3DJ9A-&*G`H
MJ;O&-JE4EIJE7"K]BZD8[ZC5U(Z'4W6JQ%LV/I4B`%6A2O+ZIVZPI;ATY76T
M0LFL;!09P%&)A?PD4`7ZMX`;63BKJ"FMWA(*ZA*$C(*(0\9',4"-AG,%/8++
M\2$H8`V(@6VC$8[-H%0K`V4>,H=GIU4BBM.2H9<#:@4@BK0L])\B24;+2%G$
M*:>@&O@8C&I&[X24VE$=<ECD:CMS"BHJP_65.=6I-EP.!6]>AF8PUG&8G!P"
M&X`#GB\K\1%G`G-,"?H1*HTE)/BS*<6U`NM@'2W]P2E,!-]#1ZCF,)6MUTV4
MR#M.&G$"HC<=&SS/Y-`4$*`*,<(A15%3RJSB*'>HH^)/<4JMZL$I*@ZM,!ZC
MYC:<"LY$>2D.B#$>$ZNA1!*'17&HF_'X;6K"=I*OKI'F\-?U80:VDWUE5OG5
M-7J.\1CM%B*`%14+@\%*I(C0`@[LOTNPHJ)*2EC[1F'[:X%E>CE4<=R`-]I@
M'PF!-;#^#K^B)L71/]JK4P*Q7M/+*(X<\$:WVAJHL"D6..7$HWJB'W4XV
M%L:2H930-AZ&CSVQZ_3%6E@5FP>*['Y=&24VR#Y8'BM@H>R$78A!=LGJV!6+
M&'<'B;VR)M:_)EF.(&2G4I&-L%:6PR[$'SMF;ZR6;59-UN:QC_DEU(BIB$%9
M'3.#B)5RFM\60FDMKQ$S(LZ1CD42W-$*E2NTZC1<DCT5A1120Z$03FJP1"F!
MA%[#IEH)(0*")7S0^T$QMU2,)50<$!FUA,Q*&.KJ,`6O/6QV/I;6M1#5#0IP
M$&_VL(`%E@1;6]VVZ2ML(6:T`'4CJ-)4D?0)8"-KQI"#8)":DS?Q9&D)\'$-
MJM*##E^G!9DK\T:XJ*1B&+K.]2&K_TZ\QE5`>WEBCSM1/([2D5[`W6EF(N=H
MT+8Y2N'0L"[7'49,KG4?%A4$H%5NBR@;!(5P/&3J-+@YH@/G]`Y8@P&J-%2,
MAJU'RD#`"?`/<':1W*-2^EDNY+)X<QS!!?C;9Z,5(,C4X(&LDVJ,AF0AD"B+
MBS)V0>3?8;90L>?60)P#:S8@X(X&P::,F)$**TCZ5G,('R&HYR#N&ABJY^%B
ME%R)ZQ,K[1Q0KY.'0]"A[()PO^'HBA"`;&5@(LI49Q8"GLU#<@(&Q("A"^'V
M@T<X`V5A7`14:?IN6ZV9&E2_-C3$!F*DWUYKP1$Z-I?G=@D:9D]LPLZ=N"82
M!0K<ST&'P,9`-0(YX48HKW+25T:N(M6X<%:N*I*NNVN_KJ]5"WY75&#<E#0:
M5JVN53?S5N'46]^P=O(M05T<;]<GSCD2$!MNUFAH6I3E!.Q=J$1X>>V9\K4>
MANU2#85U1)@GOXVX<)?SR@:+ZRU#Q>+5E3N7R<TY&9!(*<_,K7(CHN3>0+EF
MW,J:C;0.H_=EV4\5D@=<CG&J"C>RG:C>4#$&IT899+QV4+7JL]<J5/ZLPJ&V
M<@3<7EYT:UHW9S&C-FDW"/A$?8<_:H`-P+G?ULTXRF>S<]6OL0QV7=7DD5]N
M.T#5RN!<""L0@6XQMEKCKALFVZ-6-RK555-T$&12P%1V@*8%L"?$D%(VZ9F,
M@@-'KY8,QZ!(5F#-"<#`@9I)$3SW$7Y(*',#ZN((=)$W@`6R@/XA?<8).3W:
M!LQVLLG2F;.S3YJP,L4U(],8LUU_%(*R]%:,$(`C$>[Q(_+NY\:5TUDTS24*
MB`$L8`1N@::@;4S@\IR=W`0;@;43$`]O5:HL3?7TGJA(YB!BN$MD,EK?[K?Y
ML"(<2$TJN('"4+BN8*,A%AK8,`M$-RK50W0(&=`AY#!?@+\)"YEQ%6FY:WR'
MA\@?7!B[W:K-UP+$PCJ-(AE!==A:>UH#X>]'4Z9=`^ON3"4)E(;P@FIO<]4X
M295CVB_<QQBE0<S$?A"GY02^!B:%P+/R!V(DD2!$B9L7X#AZ>D-+,M%]VKMX
M(L)Q.O$'!&,D%7Q#6O`@;&BHXS2AX(]08)%"(SJ8W^'@K*W&&HD\L1U^3S0C
MZ$6_:4R+=U(_VW`.*PWQ$]H:%_B@"F!]!((L`+)SS!+`;ME0$%UT8=&A\5BD
MCI<HRBYE=(E>,F$+H<RA2)A#9\=!S"%HXJZ,P_68`P'.B:1-R6)'2>?YQ!A,
M.'B:RU5<%=3,%`W!#/@_R4EHB!%0`!XX$"*3.0S?1>I&WR@6M:LT^#0P*HZ\
M%?(`2`Z'(CEC:>'QJ(^C,3XU1+!&MG(BD[@0:N9V!<7?V&U$J,+R$M4'^VA#
M0)C0\!$B%"1?*$8XM@!M]-5>6/19!'$[04[!)#O(0))`:$)(A-@>G):3(3ZW
M(8RI6=:8`A;A%*6H'-R335_6+,=CF6JPY+3$#$UH5DE+V!3D9+,7M1T2TMFQ
M<%,EAB`$,-F,H@]C>@..*2I/AC:4:"R#L@&),>(CA@%UMRN81"?*"=VL!C6M
MR#;98M'"W,7J,%_$PMKKSB9K5?9&R2R7K;'34&6<<O3K8\GN[,R(B*M'.5A7
MLL."5!Y;'D-:9'KOYIB#;`!BR377<2U0Z<$[D!9!"W<HOG!J,"`MC6%6.9>J
ME8XF5X0IKL->*:$OY(7NP#8_AKY://LT+%P1VC69['*J#0TS\&I:*K3@D@!'
M>'(F5<`)0`$I("F20-X*`D*@OJ"B@*97P,:)$R87`RU9I&YRIUP=T=@*B&,A
MY`%#QA-K&5`P2*#))EPGTG$QEBM&@*>T]3TK:`(R-#J)7I$FBZA]]`8Z$`)&
M\N7E@-%2":G*O21Q.ZK$HW@F$%E.C6B)14EJO.E+)["I^K#;*RI6(!MP`RW0
M"#R=JO`"M3.WB@BQC04H(1T`A3V,@R#.25HP#B$FS0).E'B.(Y0D^O&RLT!G
MJ@\6W(Y%H-E:WY+WQ5P;6$O.?&%Y)KH\4W+W1$N<$XM7<]C?.<<KM^GV=!NC
M03D"4320<1&D<S2C9P,\`)L^+=?4#91-HX):Q$Q?GR`$-.^S00'`V5A6!1R`
M*Y_)'5"EGQ?Z:=+#=Y$QTA`BU%=KJY%2BQ!:F=6B1K1HL"KD3X@7\!A>+!V/
M;`'/H('"9J'^<'ZP)K77WVY.%^VJ\XR5151@.@>>'5W];&+U(IO5G/D/8]+1
ML)1E2)O,Q4&%,"Q=%\D2S&GM_;MS8IZIMA]C>%/"#[B\;T/./1L^''"-+\LE
MM0OAY3[HF/L4V:*CAH)S``7PMDJ-P^;NILY":1,<GF#AC*T7QQQP#3L">L(`
M>G.J28.XAM>T6K+9ZO*I<E_4)OT.WQ!L\NM^+9<!]C2MU7)@"PQL<+T#H0!8
M(P*E`2/HRDR];(D`?PK9<2@(_)`@PK'I&IE.2;^WYK[>FRL[1\/J$Z@QR\_9
M8;%*0!4"JUYX@&:M$F`)8X##&%N^(R](GW74;5V(9J`=394CP%++8N5:(=5*
MU!Y"":-8P%-Z#*N4$>U#?52%D]4_@=G'#,Y-5D3_F),%9)4PD,N4"^*)\,<*
M23!\[0R?CT\80E"XC=Z!)ZN36-<VG)HG;ANJ9W&F-?FA-QE"_!AI9[`G\7])
M0]CXV1ZU;.3F+[J;;4WT@#&@NB!0A+Q]K54/<=ZOBA.2SM(T]U5]-J\&-..W
M>?:PJ2%2=3-)=<,HE=@`&Z:*1I:6&"6AYKF7U=-4F7A#0Q]5"`940R4S%+!-
MK]SF!L2HVJB"`*1Z4I7J[+[5EG(TW.Z+$D[;C4S20BNC=R,:L"J\!W'Q)LX7
M=62-ADK&N^.*XP%BX!MT^H3Z617`-PC(GY\[_]92TVV]@78%ZK\&2#))/*$]
MM"%,T:;&[03W;*6)<"/;B+;^W64`<DL\EQ)RDG!4BI^IC*8$N+#QCWA9JPE0
M/*4&ZQ0!'9*<4R*+'CZG>\5CRLVUC=37QL=BNT`K9K.=G%`'34K;BZ[V"F1.
M1I#U615:$%>H6F,$'JJW.??=I@A\V[V^S;01N*UFWB7<.F1K"B)+G;A=^#.M
MS<CXX4HF!<[+)C<A%4%DX+OZYK^+MR=VO\;:QOD"FEOF.<5/]_UVJS/#>;;K
MP%%47?=1A=W..[70[A0H*G@;6+NJ22:KWH$8D%'7.&XNWE"XBTN\GHJWK;#Y
MUE@4=8^K;R*V%^PGWG[?EIK4I$O1>6[A"->@XJ@;?S>W[I`T>@6NX-_]N[W(
M68\`-D*"/;P;#^5H#P<&QT\^G1S"4];FWWD3N-&C-EQ'%3$VC<_J%+;2H0^"
MK;M@<$22#*Q`XYN`SK0C"-IZ?@F5,M,:.ODPS[[J@8+VAO=1_A9$IHH31JD*
M&,A+*R=S=RQ'$NS#!SR;9%X&,*8P]Q7,05V@"B:@?<("L%-W%2$NL+(XT`@)
M&$(*S><<5U@^*E02E,5WDU-Q[V1\<SHN*BIMUZAV?\H9K6L`;KX^VA[L;P7P
MTKSI77$"^'`-N#TV0>,,C(*!SA&&PK"&Y3RYH`U^EV/Y"R<?&)[\W]4=>HX4
M*BGDD92]B'10\S'.S#F",T]O@2XEU=]W30)FP)-;@@#CQ:#?F0U_:_H:N.GZ
M?,ZA@*&NY.PO^Y4![C<%J`">4:F9.IRSOZ\RV(&%_,G2B^0D]ZHFO9FC]&?>
M?V^1E;!%`SB4+]!1+M,0PB#<D9#CVPC%![=:FR1#7T]B^;B8'-.@6N)4STJA
M60,<<3H(]3HLXEX8U4U'-/DI3&9EK"AFND8$Q(#$KZM$:)R"QJ"M9M@I)(O:
M5<QR@F<12&S%^ID!5O8CU,`;6'RSQG>NB':U;J<&!+$1_0=I;/2!_AXXPMK=
M@#:!5(9UFS[6.WJ5@P$U($?C:C@MY'P@,@/2)T"C$PS`S!MJ8<I8&`YB?322
ME/"E=P42H`IT()%>7UW*NH>"7-(MAZJ$%KD,$C:('^HFU?=O;N*F?V0=NE,>
M52LT#+EUO<7)>%W[#L-"WV'XS3)%`@GO*]VD*T8/!C#$)40W5<+2N\A3XR@@
M!'-DJL(S1T9P%RXY3;5O5@RQ70C"(WDWCDR-&-JN<@D2/2ADX#@<=J[)J#Q?
M5>A_MSTE-1\4`!4(5*)YPB&#]3(LAZ6D'18=YH"]LE3*>#3P^$CJ"!PU)A`L
M.`@@"`)Y0/Z$`<*=H"<L>?SXYIRP6YYK[L<M3P2.R<,'(3ZI4#@(P5\(F.\<
M%@K8\3`/_E)G%Z.-`4<M@R/(SK2<K0[^@-OZ1+^\$3F`IDXH#.9I_!8PY/$%
M>,IY)YSE.\04MBQX?F4JY]AF2/0?NW+K(X#F'*'&P1\@A[PHL,RH<C`2S*&&
M?<+0@FW+.]XDCS[N$P38ZZ2XR],@I/'5[<-$/0_3'"&,_J(0DH`"D@>]3J3L
M>RL(,&$YM,!"J-P*E_[9W'GDS<:O`T`T\LM[CFN.2[\^`>+*V`)XH(]/#1E6
M*M$,DD^DN!EVQ[6E7N<#8(`'"S<)?U1J`58^:X`7WQ6A[=N+BIF%[`.]6HGU
MN3[8+\\QGQ0^?%]Q\'W,CDH(^H>1!C-V"3F91:4,11\V`]?)<3D!4(`YG($3
ML$[30)1""&(&&\^,!Y;?T51?H1F"B*:M.%A3U`)8`GK47Y[)@\"5(>RPO4S0
M]B"@?*;<+G$_/KVAX+T=*]4;BB68EC_6#6/Y2`S3XS`T?NK]>'2^\N`FKG&L
MSFVOQ'VHF%F\GMD_89].ARFV8\L([X,JJ<37S$1[=[3?-3K?Y\\)C,7S#:[1
M5SU?NKL#,8N5EO%`T<>>*"#8M/RO?_7G6JJJ$35YX/NFD`P2A6O51Y^HPSJ(
M*8WUW_C9X[IVQ]!BOGW9J:A9MTT08/F3VFO\H]`".OX*N`$YH`48ZX:0L!MS
MDM<<71^L6=0KC*H%&`_`']`;\FLLE3_SUS@'O!_Y4P;0G):Z'5N^Y._\?O\F
M@(#+KVY(_ZXP_7,.]?NP\QW$A-CRC/5I`(F-ZZ=F!JF#:]?&29PLJ)*E`&86
M55I+13,-OL<+/=^;GC`+J/8/"ZE683H<YYO_SV`!O(,%2/]M<RH;9!DP]X$8
M-0]B:7^M!?\7?7P<'\DG"3L`\KN]U"<(..#]&]QXJ",)E)N?.C:3YTEW1X*)
M1<*I0R%9/\__3]3)YY__X(_^KA#/(QKF/^<]Q`W0_JXPW-3*[P]_G_Y)C3OF
M?\9;^XZ__MN_H?#V<2<'R/\3X'W)SR/9LUF(*6XZ]NS8*0=\ZWG'Y%KP#%RX
MY9G_G'_^@S_ZNT(\'_[+T_B'^N4_XY__C7_MUW_[-Q3>/NY0C+@#\%EVFV12
M*N&P,$2>`S-EN33UON0'%VYYYC_GG__@C_ZN$,\C&N8_Y^'PB-@"RA+;`'KX
M^_1/:MPQ_S/>VG?\]=_^\4?^B#LR('_$'8#/LG5($<`"24`=N:@D$I\.$O)'
M"%G?ZZCN\=*FT`U8V[_'`@5$JQVCY=I&]9_S4=C/6V'C*\C^PS!9R"T[5'5.
M-*/]J3`9L,)R[?-:A_U_%AK)X:,LVKOZITZ?OMCRQY^?_@U;&^8Z(JFO$Q3#
M]=W,/W72@/Q!`Q3;GY_^E+_E\05PB7ZS55E(`3I`L<TK96U\B8`_UM(@8=QI
M[Q<?K7:,#L@?]^I.&U^C>R/,@.(!K4YA4:-H#P@NT6^V*@M@X88%=XR$`J(5
M.[MAS-+U[XJG?U+[H_F?\=:^XZ__]F\HXG]_-,3]\02@FRX5VT(^\\Q66L9=
MY,)=E03NR4./;2&_/\ZKT^8N<F%WQ34>QEW<*_@;Z\$E^LU690$LW+#@?KY$
M`@J(5NSLAHTVZ:VZ39<12[C/A@>$:3>1/VD8ER\;$K#CAWI+[A*JO.2&W5F^
M,D#Y(G?FNJI:6.UNO0]H`!H(4D5!1"Y-10`E)24E)<H$```B$`&(S,CG!P``
M#`T4@!@(14J2*4U`3'EBA,J5(%**@"!29$J2(TZF!!P(H@<D(ALAR:!!`T00
M.6+>R+GSY@T9$$/DE)DSIHP;.B%12'DS!LU,.F7DL`#AI,P=$%E4KAD:@X:-
M:S,`!XT;('"ANQ+"1H@6-&CB\YI@A(Z!9@0.5A'%3)XR</"!D,,V!`\?9
MC0.IO#')ALW$(D-`2`F3QDW*HU7F!)VCXRQ'*4(H-GDRPP64(%-`K'T)63)E
M%T6P2$0Q)4@3*$PD4@PL)4@2)T*>7`$1`P8,$$@N(FDQ!4J1(D1`6$E"\<D+
MO""6%,D2&V+PUU2*2#$29,CK(X*?5*'RNN)0*](M/G%"VP6-(2DTRP0AIDSA
M,R#@L`E3\V5A.GOI^$0.I8X8-FF,,=$;;1#F!@CX:9;&2ZL)9N!AM-D&0AV*
MR3&'9F/4-,>%<Q!8!@AOF(&@3R"T\<8<.*$%PGU!_?0>"&:4$08==<AT88@C
MNB<'"'/D@6(9;>@P4!IT7+A&&7FDY-9+-*WEQHMAB)$&@'2D,1-RFX&`1AIG
MH-'"''"44<9+=BQ8QEYDI`'F?'FXX%A>)(Y!(!Q3CBE89$5,-D-\<KQQAAQA
MM+'BA86-P48=9-AIADHCGOAAF&_(]^$=:*"YEQMOI,@1&F'8\2$5-:8$`A1A
M-.F7%32X<-NB.^JG(X\^`M6&"P,E(6(>;]0!PAUJHH'@7C+)V0:=;'SH*G*)
MFCBA&XGN**,<``8%@J<6IO&&&S>*""I*>Y%JZE!M%,9H3VN=,=.N4_K%J:>_
M(M=>B6$D^FN./.8J1TT@R"DO&748FQ^)</3Y9Z`3SO%BAVU\B*.K(+AA5%#(
MQ3ACC><N3.)\;IS1EKFTCEILJ1_*%&.K_WYH1IUW>E;999EMAAS#'=:(K[`)
MWS2'FPH@EY2N8ZRUHAMVO'%DRGE2QAY<!@_+!EPV`27'BPQW5O2>U])+Q!.9
MT>RRB@`ZK!FS6A)99<8@\!`1%55(X80/'3\A%`BX\NQSO"_Y'&F5UX;A%QQN
M!5J&T]/JW2]R.+KGZHY4@;AC#&3MNF5/Z/:5;Q@4&DMBLGL%[">@@B8H1QT'
M%@:"X3[)@1Q5+2A.&UDMR'EH&P>:*"^K],I9HV(@BL@PYAU+K6?D?MGX]\M[
MH>YZ';"7Z-*',])KTTL6?\C[FTCE"GS#8M;-(QV;+?D7:P^^<51MMS6QO%]!
MJ&Y^HGX)H=F%=Y0A>:G(-3%%"U=G)H.J-:C^IXR`\QSH1J0F$/"N5G385:D,
M6`9/L2%2=LH24'X$/3=@Z7L.*@R$R+<"=.E',R"8P0R:X#Y.R>$E:9K#&D#P
M.3<\B6SVPQ_6XN*"&,2@!3'`&7*$4(<SS&$H<^BAN5!D+6P-)0W#ZI.G:E:D
MH60I4Z5;4:(6V+,#O:M`=7I)@HZEHBB]@5UTL]&-G-4"+!9+BWMI`UPJY[`$
MAG$F-Z,>%;9T(=<5:PQX.Q".3E8L^"W0+3U)@Z=>0J$706%+?EG"C/3PM9=`
M80D/B<A0DN"&,;C@!'/@SQ(@$A@^?DA8`8-C$2=4)2JU*2^AZE:I>N:7`H8!
M08!*EEM6B",AJ`1C9&`!<BCI-#?,J(AZTZ&*BN`&-;PA#[K,F8J"@#$0)(%6
-5LA#PK@'H#6<10,:`&`!
`
end
=========================== CUT HERE CUT HERE ============================
Re: RBDEMO3 - Bug Note!
Author: alan i. vymetalik
Date: Wed, 06 Jan 1988 03:50
Date: Wed, 06 Jan 1988 03:50
31 lines
2103 bytes
2103 bytes
Ok, folks...
I am sorry. I goofed. For all the Rainbow V2.05 users out there,
I apologize! Before shipping the code for the demo I wrote, I
made some last minute changes. One of them, however, won't let
you run the demo on V2.05 systems! The reason: look at the return
value for the CheckDOSVersion function. You'll notice (expression)
> qver. The > should have been >=. Obviously! Thanks to Chris
Harting for e-mailing me with the bug. For those of you who don't
have Turbo Pascal V4.0 or the desire to convert it to V3.0, you
can patch the RBDEMO3.EXE program and change one byte to make it
work. At offset 0949hex, change the value 72hex to 76hex. This
will correct this minor, offensive bug.
I will now go prostrate myself in a pool of honey. Release the
African army ants!
Alan
Alan I. Vymetalik @ {allegra,seismo}!rochester!ritcv!iav1917
--------------------------------------------------------------------
Prism Software Designs, 44 Arborwood Crescent, Rochester, New York,
14615-3807, 1-716-458-4932 (leave message).
---------------------------------------------------------------------
DISCLAIMER: The above statements and opinions belong to the author.
Any resemblence to statements found in actual reality is purely coin-
cidental. And, as always, the above opinions have absolutely nothing
to do with the little, fat man putting $100 bills in my pocket.
---------------------------------------------------------------------
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads