Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!utgpu!utcsri!buchanan From: buchanan@utcsri.UUCP Newsgroups: comp.sys.atari.st Subject: pascalii.prg version 2.01 Message-ID: <5373@utcsri.UUCP> Date: Wed, 9-Sep-87 14:22:07 EDT Article-I.D.: utcsri.5373 Posted: Wed Sep 9 14:22:07 1987 Date-Received: Thu, 10-Sep-87 05:54:29 EDT Reply-To: buchanan@utcsri.UUCP (John Buchanan) Distribution: world Organization: CSRI, University of Toronto Lines: 162 M$I`!89`0!A`%RU#2*?8%-/`!=@``8&``J$,#'V`#'T`72B`$:D``OI0!2C`$ M:X`!9V`!M#`$94``-#``8.``EB`$4S`$6A(&%P$-4;`,CS0%0K`&"B`!&1`& M%R$,4:`,)9UB7V`'```&!(`Z-O`!6T@&"C`$#H<)IT`'!``&"#`$#H<)HD`' M!:`$0W`&&+`&%D`+0U`&!$`#`P`&#F`)0C`%0Z`E87#34;`,CS0%0B`!&1`& M=A`%RB#[T/!`3-!>A%0%1<`^7V`#'[`&`F`&`F`'!"`#7T`>##`$G3L&(D`# M`Y`%0F`'!``&&H`Z-O`!:R``9B``=M#H7T`>##`$*34&!D`#`Q`%0F`'"#`% M0K`&V!X&*!`%RJ!+4S`$Y<#8"6`.J2``00``#^!!,,``"I$#8R``7A``8:`` M2C``9T``63`$8"`.K8,$^8#7%Y$)-"`"'4(`$Q`$`#!7HIH:F4`(3)`/>'T1 MF4`#LU."4"`$:V,*2H`"H?P"##`$Z```KB`!*)`0#*`0`G`&!L``"I$`9D`# MY$$#*+`02'`.(``,>/$"K8("*:470'!%WF`1#,`$WS``!,#2:^`&#``()4@` M9V`&TP`,E-#2U#`[-(`""S$%0G`A&1`&!A`%RE#2=0`!*)`0(23=G6L&%(`$ MYP`"2L,6!WA%^\($WS``/%4'T@T`!6`&#(`$YP`"2L,6MN)QY"#=`'``9L`` M2'`.(*`T;&$K!``&TB#=*64&-5L'1:,)=P`&"E`TFK`HMC(`(,`$3N!PB"`- M3G8%K%=4("`'91`'=9`&0`"9E`';-".0K`VIJ`$J!-L(G`% MGL0`X9<09H`!X`<`KH`$YP`(X/#[G$`/3/`-!Q``-("?(GD.```.O\\)],`$ MWW``0A&$K@`&Y"`$:V,*2H`Z(G`%2K`VG``+9H`#2@!*!6`&",``X9<09L`! MX&A``8"``S"<$:V,*2H`ZP28"5^!)Y&$' M$'D.M``.5;4VN@`Q*0$#,G!U`*`+S_((3/`-!]`"#*`0+6`&"*`$`V`&7K#A M8$`##*`0(&`&!J`$`W`&*@`&3G""&T,T#*`0"2`&0D`-@I`&7(`"`H`-A)`& M5H`-A(`WU$`(:>`$`I!-N_,`U!`(4C`$2@!*`V`&(,``"@$"9V`)#!!^"6$& MCB`!H.0*#*`0,%`&",``"I$#8Y`2?J`$`W`&)J`$`'`&`D`$@J`$!6`&#&`# M`H`$PV`+@F`&"$`#@M`Z)"`(K5,TG%`-,%!^8*``1<,)M0`#MM*'#H<(TB`$ M:V,*2H`ZP=8:(G`%Y,$`H#0`"7$&2F`"2B`%BZ`$H#0`9D`#2'`.H#"R"5`T MN@`Q`.`/@'9U`*`+S_((3/`-#U``#!!^"7$&!J`$H#0`9J``4B`$L"`$9:`, M%A`,8&`,L"`$94``%"`(8"``%("?T&`""`$`NK"AYQ`7+[``%J`TME*S0:"? M1<,)LJ`7HAH$^LD$WU``];$!%``,G[8&!D`!VX!8,S`F%\$)L("'`-``"I!G M84`&($`&:7`&:4`'()`&;@`";E`';2`&9:`E9>`&8_`&=>`&=%`&`&9P`"3A8$1``";V`&(.`&==`&8E`&*R$$:V,* M2H`"H?P"##`$Z```KL``*.!!`7`&",``*%`E"6$&>*`$*```!1`;U4T>-(`" M"T$"28`$YP`"X(`7+]`J*)!2>O$#5^0-%L$`3/`-!T``++T&+'`&*C`-P$`) M+:T-2@`!9^`!#"`!YF0&GJL$8$`,#"`!9GL&$,``$@``#7`%Z&`R9D``%(`2 M(#`[2@`!9P`!2H`")F,&"@`%Z&`R%(`2(#`[(8`0!5$03%,'-(`""S$%0A`& M0*`$*```!6`&.*`$$'`&+B#=YF0&"*`$*```!8"R9V`.*R'=`-``5Q`,,1`$ M`"``9R``-"'=9FL&"G`%P1`#00```A`#0="Y$@`,4:`,_R`,LP,!*)`09V`% M2H`"`%``9D`$TFTR9F`"2'!II&\K1!0[CR#=`-``9G"QMG).`,`T0;`O<-`` M3/`-!_"H=2#="V$&O'III&\K)Q,[C\`$WW``CUH'1>,)46,K`0`&"E`TGB`$ M,'"`(,`$3N!PB"`-4E`&N`$#H<(Z$`' M`0`&`D`>J$,7K8$`=WT&`M`8L(`0"E`&+G`$#@<*4D`"4R`""G`&:``+E$4` M92`&8M#4,'Q'<0:)3#`8`DWP"0`'812MIT*:P(93#P`@),V(>??D[489)` MHOBBDD`MO7"!$`'EQ\H+J%G(5H+U'7"`0/KQ]X%:__ACA@3]9;B+(!,``Z(@ M<`0`AF1?*`&$&@3,!T$&=5DXDP0:T!``-6D)(948H%0@Q#__4,.33P90D,U0 M10U8H(<@$L)A/A]\D&52-'PPA1#;_4,'#A_(\`$)7_RH`2U!?/4/&4V1:"** M3JG(HHOYP2@CC3;BJ&,&-@!@31"V$"&&5#94,`231\@#0P!)R`-!`#VMX0`U MPEQ`0BW,E*&/E%3R8R677N:GI8+Y'/#`EU^$N9T__*@Y11"STM/?%X/:$(`U M0M@"Q*+^B%-$/#``4$D*3$H3#"0`#)&I`1)H4^JIKF:YY0>OJIJ4FFRZ62<0 M)9Z8XHLMOACCC$L%FB,`.TKBDP>9:F`'`"8H04(24@Q!`P`H+)&+`E8H4]09 M"DBQ2!3)_,..$&>`(<`/`YS*K;:L9NMMK!_,:H2MN`+@CP_CEHNG"'JFV^>Z M@-[X[HZ^`BLLL1#TN`LK%`CC[)@_D6JPJ02VVBV"=4Q!AQS?G='<&@AN%'54+ROQ`HL9V(`@M^%'&9W=&DM#)QUU\,E'7SX!_%`X+DGI(?4' M9PB!(Q&`2%&$"!><@[,X,!]@<(8!SE=\$;7O'`@#SAR0(09$"`$@QP M!BF@0$9$,`,"\!"`$9Z!!V`@`AX`,`4BP((08H"`+'#(`$$`PX4"N%[U($(' M`'QP#`:0@@"@`0@PV&.&'RP#`20!B`(00QR(N(+!Z`'$$XJC">@CA`L((;'Z MW6^!#=1?A4RAA`0E90:$FQL2CB($N;$Q05N801>V,!8:[!$$01##&^30GBY$ MZPUPR`/2SH"&]O0"!#'(`0YLP`(0#&$(1`!!&-Q`!A`\80I3J&02W#"&QI$% M)`((0`!2"1)5IA(2!1B+`O`#D@'$L@"Q!(`K00*!`ZP2))"8)5E82=!+"8":QC0`074I`":-I0`.,(`!7*!1'5#``!HP@@I(0`$'0,(`$)"` M1B6@TBAI]*,NC:D$4OI2C4*``U1```-@J0`'E%0"%.BI!IA@``E4IRH"#5B``D!`*0U4@%(%($"E/54!!2"0T9Y*E0$:*&UI$>`! MFIK6LS,%[6ICVUC8NG:VMY7J9^U*5=E^5JN>=0$KHF0!"TA@K%/]K$^M@%() MJ!8!Q>5M9*6[VZ_.U+K4O2Y5]6!8Q"HV2A#P0&T1D%K=2L"M%&!N4&F*4L;V M-JD.*&Y8J)I7!2R5`?&U`%^5BE4%,$"\9Z6`&`QKT[D2&*4&#FJ!>6```BC` MP1!^L(0)P.`(6WC"#`ZO!.*J80Y[8,.'_;"'0=SA$&^8!VS5`!(X8%\LX!4" M(`"2!UX<8PW,^+`UOC&,94QC'N/8QSO6@!,4P`,;:R"OI:4`(QIZJ!'@`!WY@,P`H`"\%5.""\^)`I<<4@P(, MG58+*`$4X0T`#2I)`2]PEJA$R&BNX6L`.5@`KS(``1%(L%R#=I'>`&#\C`"QJ@)!NT2@48X(#%%A`!')2@!C)< ML^,!,`$)/,!L&I!%!!;0`09H@`$98(`%&H"!!SQ@`@R0``,J.+L&.``#"#1[ M[![@`B`XX`)5J)T(6-``#T1``A^P@`0X^#@;5,"&`%#"W&C@@@8"0``-,(,% M&&@[$=).!1N3C`4X2#.T3,`"(VC`!3HPPC&/&W<@T,`-&OBX#V0``]J[@0@? M=X$(C#!X%U""[VX'@MM)8'82J(`/9">!"=I.@JU[H*D@H`#).7`02A`UHQPX MKU0Y@(";XU7>$O!`6'``!",@X.0.(``LK:$!(C@BL#)00&IKSH#,4\`#*%#` M,3V@:NZ;X*7==U\^P`$&<$P$\&9V95G44H#[1FOGY0`0@`"1%H&>M52EA52> MY0'2A`<8H`''Y`0V(` M8`1(%8-20`$Q&(,,H%(4D'^@`%"D%$QR%=8Y0%6`%6& M\(8``!H(4$%30T%,24DN4E-#`%L(```=#V!>J5=P$P``#```*"""`$W!@@`@ M#2"!$,`$+@#"`"@`($)"!!/@@"!29LX:$`!`&$G#I@Q($$_@T$GSQLVNQY->O6KC+`2A5;M>PS(DK(A&SG=NO=J+U*CU$GC&'*4VF17VC&I$$40Y%+J MN)%M`(44Y)4O9Y:#4B5+ESQ!BR[#/>7*EB\52F5,?&OW\^#5@YT29OG[[^DI M_O;-'WC=-R#$-)-L!*!`!')4`#4&&M2A0`5O^T68VFLRF804'0QN!@5R')5$ MATEAB)296A*6*-44)96A48AWH#$B2%!L!=]+;Y@!`H9IO`2''&^<(4<8;8`0 MAAPFC?$&''G(D<89:-"1T``UHC3%%$*Z008(0Q!!Q)-5S%'&E7<0QR`"3.ZY`>".-1+GPI-6@""#"S'`\"04//H( MI*/N'5%$$P!\`0D*M=X*`!:ZVHJKK[OJ^L02``QQ*%9-Y?JKKKPNZVRPSP+; M;$!S+K6G>#.5YQUZ3P9!1F/?U8FMHYG-H0.U25F+I668E:3MC`"PVN./07+* MG:RT(E6'ET*:\2%WY/$HQQS%HA%&;)*"P$9HV0)`11F7;35D5SD1.8:D7)T+ MK+2Z$=@8(1\YXKA%UZ`D"&65\#$(;.)4!@!2'GE$DGF.L(3(`4]`1 M1LX@+%A&SCL/4=*0(-@Q9!IAB%$2P<,6>VR>`6W,;*]8XSHM>QB#`*JK02+: MALQ1#Q&$$T,4P00`7+MG!AMAG$%PV]SE*"0(^'K=*KUL-^:>SS.]-(370P)9 MQK\$*R2`'0$)T$GCGDP$@`$`"!`!(`']\P\`)P`00..?-.Y*XZ](3KGE3_[C M#P`/>-XX+(T7T[@QIE=^>>;]`%"!ZY4STS@XC8<#P`"3!W0[`*H#$-7GE8L3 MT``$/$\11:(H#`FT@"(H@_Y%&0?P6004`*L(41$H*#UOO@"%LQPM%-A!@HG*#K+#!" MV4V$=A/I1@SSY[H+!,0`/OCA&7X(B>?=[W8*^5P"`7"`W3$QB$P<(O$*R,,E M'J"(`3E`+K+HO"E*L(H(/.#G!IB!A#0`"@`HXP`%4#GE)<0`%H&$`:`@@,]] MCGCO*R,D$L!&A9!@`)\CP#\@$3T^'8`$"2F``0`YD4$6,B$'6$'Q%++(SQG` MD2&!I`@9\*0$,/(`F#3D`G='248*()20'`(`-M!)1BID@[C2HP(8B<8)`$`" M`JF(&Q_S#XNT42%1&>`",,D!2-+J,!+EDIF`;@)0(>]+ M9@<<`H!B1H67OG3F`%JG`.5UDQZ);-WG*E!-`P0@>M%4*``LT-``_',`;)3H M!:HY@`%Z#I$*B9Y$,5!1&LB3=:[+0$6WI!"*2%0#'/5H`*C03)1^;@,5G=\K M;=K/BCH)GSR50$5/J!#B270$`/```+#WSP+T,B`.>)(M*?*!BE(BD;;\'`@J MBHHG?2ZK``A!17GQ)#:"5005A08X^?FY#L0T(`$@ASG9"@!<(;)S37TJ`'RH M$(M$KP05Q8=7=?DY$S14``7-ID4^=X*W5JZ8124L`$9PV%$]9K$`&&#Z))E7 M7^ZSK_93P6&!D$C,KL"Q`I!"626+`F;RB0`"T"DC%RO&S.YR`!"PG202B=0& M5`Z3-%1(]Q!"/.(I]8[`?=)P3UA0D;I.D(21T2V?*@DI@&-L M$P`+L*TEDRO<@""`K,3['"X_!\KH!G<`P\6&Y`;(RC&2%[[F1>@`-TA#YB7W M)`%)0&XQX+H!!J"VX;UH;E$GQQ;P\Y31A>PB)?FYW$IT`)A4JC,)D``6M)$B MZ6,C=*.GX81P&`EM?%^(L1N]\KV/D`2(@>X`D-LU3@Z3Y:,(C$WZ`1K;EHWM M;3$`2!L]!\;/(@LN<(9M2\@$S(^-&UQQ/:-;XB9CCHWA7;$"EKSA!'"BC;Y= M\3"C^UD#)``7N5PH[S"YS]`,`OOV< M#Y$;X3<6P![?->IS,1D5(B//E\2C"!L_Y]1"R]$`E'L?1=9[X^@VVH&/#D@Q M)>VZ(/?SC08H(TA-3FE$G,9`[#PWZ:;>.676V`+1(OO)P>\SF' M#&J]$L^WDU9F0PW@N_?Y5J+4]#2QHZ?78B+;==SD-3AU,1*FW*\+H:8?ZU*U+ME!YK8],MDZB$\!QN@EY@()&U2(VIH"^=4R` M`_BVF`!O(_*R"P`P@)J)4>DQ\29=VX+:F<$&&-6"N6QB!7"2C6Q<'QLQ3.5: M*P!7;*2