Info-Atari16@SCORE.STANFORD.EDU (Info-Atari16 Digest) (11/19/86)
Info-Atari16 Digest Tuesday, November 18, 1986 Volume 86 : Issue 16
This weeks Editor: Bill Westfield
Today's Topics:
Kaleidoscope program for mono and color systems!
Monochrome Only Graphics Demos (quix.prg)
Monochrome Only Graphics Demos (string.prg)
Monochrome Only Graphics Demos (surface.prg)
Monochrome Only Graphics Demos (monodemo.prg)
----------------------------------------------------------------------
Date: Sun, 16 Nov 86 14:03:41 est
From: Eric Terrell <terrell@ohio-state.ARPA>
Subject: Kaleidoscope program for mono and color systems!
To: info-atari16@su-score.arpa
[Also available on SCORE::<INFO-ATARI>KAL.PRG - BillW]
begin 644 kal.prg
M8!H 0T + %%X & P0"@C*2!+04P@+2T@:V%L
M96ED;W-C;W!E(%8P+C0@071A<FD@0V]R<"X@+VIW= *D\N? &+HJ;0 $
M("T #-"M !30K0 <T+P $ +P O#3\ /SP 2DY!W_P ,3KD 0:80 !
MG$(Y (N#\\ 1.3E1/,\ BV#$ 5?Y (N# Y (I%) XD SP
M"+ P.0 "*920.) ,\ BR4T SP "*Z@ "%\ $> ((7P 5X Q"
M14)&?@%">0 "*@_/ 13DY43X!\ $CP "*HP!6% .@ P!F$Z/ !A "P
M80 ##DI 9^AA )*3KD 0>0?D 1@,/P $S#\ P_ !,/P ##\ !A
M +L0F=.06$L#$$JJFT6#$%55&T24D"P>0 "*YM!I!Y (KDYU4T!J"# Y
M (KE- 3G53>0 "*AJ%%)',CP!]#0Y (MN5A,\$ BH(CD BJXYD(
M 0 >9P0*00 !" $ F<$"D$ 0@! %G! I! $CP0 "*I(04YU3G%A($1%
M81Q$1F$81$5A%,M&81!$1F$,1$5A"$1&803+1DYU3G$SQP !'@P!4HY (
MN&<"XT#0>0 "+ SP !7@R!M)Y (LC/! %>J !2CD BX9PA2>0
M!7B@ 4YU0?D AX,#P #C#\ !1R/_Z0?D 1@,/P "C#\ P_ !,/P
M ##\ !A '80?D 1@,/P 33#\ P_ %,/P ##\ !A &Z0?D 9X
M,] B60?D 1@,7P 9 ,7P ",7P "P &0?D 1X< $R/ ),,!1
MR?_\,+P F$ .!!^0 !& SZ , (ED'Y &>#/H BD,^@ @
M"*9!^0 !& Q? # Q? (Q? 9A "@0?D 1@,7P (0 ,7P
M ",7P @ &0?D 1X,7P 0 ,7P @ "87)P $/Y (F&$ 'YP 4/Y
M (GF%R< !#^0 ")YA "@< %#^0 ")AA "40?D 1@,7P P ,7P
M ",7P &8"IP $/Y (F&%N< %#^0 ")YA9$'Y $8#"\ &4Q?
M (Q? 8S^0 ")8 1L<',B/ !#1.0DYU+PE!^0 !& Q? : Q
M? (Q? " 9!^0 !'@PP##\ %APD'Y &>B)?,M@RV#+83G5!^0
M!& Q? . Q? (Q? $ 9!^0 !'@PP##9,-DPV6"*0?D 1@,7P
M!@ ,7P @ ",7P &8 #_<#\\ M.052/3G4P/ #((CP 1(3D).=: *
M3G6@ "%\ 8O (,_P 0 &+R@"4YU $8 !'@ 5X &> !W@
M 1@ (> !'@ 9X %> !W@ V+@H."@8*!@H(" @.$B(&,@@,
M"@X(!B8P" H&" 8(" H2'AX&!A@:" 8(" 8<&!8,"@P*' H(%@0(#!@.$!@0
M*A *" 0$! 0$! 0$! 0
4
end
------------------------------
Date: Sun, 16 Nov 86 19:53:04 est
From: Eric Terrell <terrell@ohio-state.ARPA>
To: info-atari16@su-score.arpa
Subject: Monochrome Only Graphics Demos (quix.prg)
[ quix, string, surface and monodemo are also collectively
filed in SCORE::<INFO-ATARI>MONODEMO.PRG - BillW ]
begin 644 quix.prg
M8!H @> !8 #-( "I/+GP U^*FT !" M S0
MK0 4T*T '-"\ ! "\ +PT_ #\\ $I.0=_\ #$ZY 2B\\ $Y!
M(B\ !# \ ,A.0DYU3E;__$ZY '%BZ\ 1Q"\\ 1Q"\\ 1Q"\\ 1
MQ$ZY 'BM_\ ##/ 1QC/\ $ !'"8!@P>0 $<+1R-'\ -FC"\
M %2>0 $<(,>0 * 1PFW>,_P @ #:XNO #Z(O/ $<8O/ #9I.
MN0 !810CT)Y /FD)Y /G#/Y /H@ #YXS^0 #Z0 ^@,_D ^>
M 62#/Y /H %DH^N0 $<)"9TZY 'S%2/818^N0 $<9.N0 !5I.
MN0 !WA.7DYU3E;^3CZY 1QDZY %,#Z\ ,_.0 $<9.N0 !/94CSZ\
M !=.N0 !^XN@&$ DI">0 $<)";OY2/7P !?_J/7P O_H/7S__/_F/7P
M __D,#D !9(2,"!_ #/4#_@# Y 62DC @?P SU _K@P.0 %DCC0$C
M@?P SU _QPP.0 %DKC0$C @?P SU _E1@ $62F[^4F="($XR>0 $<+3
MR=')/JC^5"!.,GD !'"T\G1R3\H_QP@3C)Y 1PM/)T<D_*/ZX,'D !'"
MT<@_-HB 80 "KER//KD !9*4U<O#@:7____Y#\Y 1PB\.!I?___Y480 !
MM-_\ "CZ /SD !9(4U<O#@:7____YC\Y 1PB\.!I?___\<80 !BM_\
M ##\ /SD !9*4U<O#@:7____Z#\Y 1PB\.!I?___ZX80 !8-_\
M##\ /SD !9(4U<O#@:7____ZC\Y 1PB\.!I?___^ 80 !-M_\ ##\
M80 " %R/4GD !'",#D !'"L'P ,FT,0GD !'"/7P ?Y2/KP C\\ %.
MN0 !_Y4CTJ 9P#^V"!.,GD !'"T\G1R3ZH_E0@3C)Y 1PM/)T<D_*/\<
M($XR>0 $<+3R=')/RC^N#!Y 1PM'(/S:(@&$ 8I<CS Y 1PE) 2,"!
M_ R2$ ]0/Y28$P@3C)N_E+3R=')/JC^5"!.,F[^4M/)T<D_*/\<($XR;OY2
MT\G1R3\H_K@P;OY2T<@_-HB 80 !.ER/,"[^4E) 2,"!_ R2$ ]0/Y2,"[^
M4K!Y 1PF:H3EY.=4Y6__PC[@ ( )>DY>3G5.5O_\+SP>'R\M+SD EZ
M3KD 984(_0O#898NDCP "7K O'____].7DYU3E;_]F',/4#__&'&/4#_
M^C N__Q(P('\ &1(0+!\ %!O'"!N XP$#(N__I(P8/\ 1(0=!!54 B;@ .
M,H @;@ .#% %&X*(&X #@Q0_^QL$B!N XP$$C @?P !2)N XR@"!N XP
M$#(N S2? Q2,&#_ R2$$R0=/)T^X "#(1T$$]0/_^,"[__K!N !)O%CUN
M !+__B!N XP$$1 (FX #C* 8!A*;O_^;!)";O_^(&X #C 01$ B;@ .,H P
M;@ ,T<C1[@ (,"[__C" 3EY.=4Y6__PS[@ ( 1R#/N H !'*,^X #
M$<PS[@ . 1SBZ\ 1R#\\ (_.0 $<9.N0 !@18CTY>3G5.5O_\,^X
M"@ #9HS_ @ 6*$)Y 6*C/\ $ !8N,^X " %C1.N0 !D(P.0
M#Z).7DYU3E;__#/\ , !8H0GD !8J0GD !8N,^X " %C1.N0 !D).
M7DYU3E;__#/\ &4 !8H0GD !8J0GD !8N,^X " %C1.N0 !D).7DYU
M3E;__"/N @ V&(^X $ #8X@+@ 0T+P !:(\ V2,_P 9 %BA"
M>0 %BHS_ + 6+B!N PST %C1.N0 !D(@;@ ,,+D !8T(_P V:
M -AB/\ /H@ #8XC_ $\P V2(_P !'( -BDY>3G5.5O_\(^X
M# #8HS_ & 6*#/N H !8J0GD !8N,^X " %C1.N0 !D(C_
M$<@ V*3EY.=2/\ 6* #8(B/ #8)P<TY"3G5.5O_\0D)*K@ (; 9$
MK@ (4D)*K@ ,; 9$K@ ,4D(P+@ *P.X #BU __PP+@ (P.X #C(N S"[@ *
MT$'0;O_\/4#__" N__P( @ 9P)$@$Y>3G5.5O_V,^X " %>PP+@ (T'S_
M]L'\ -(P-"\ ('BU __H]? !__Y@'B!N__H0$$B ,F[__M/)T_P !7L
M,H!2KO_Z4F[__@QN 3__FW:+KD !8B3KD ^0D P.0 %A1.7DYU3E;_
M^B/\ 5[ $:(C_ %<X !&F(_P !7T 1JB/\ 6% $:XC_
M%D !&R(_P !9, 1MB/\ 1H@ %B(^O *80#_1C/Y 6% %B9P
M 4Y>3G5.5O_\/KP $V$ _RIP 4Y>3G5.5O_\/KP 34ZY &K"!N @PN0
M%A8@;@ ,,+D !88(&X $#"Y 6&B!N !0PN0 %AQ"0# Y 6%$Y>3G5.
M5O_\,^X " %?0C[@ * 60#Z\ $Y.N0 !JQ.7DYU(]\ V63DXO.0
M#99.=2/? -EDY-+SD V63G4CWP #99.02\Y -EDYU $ @$! @$!
M $! @$! 0$! $ $ P4 !04 $! @$ $ <! @$
M 0$! @$! @$! @$! 0$" 0$! @$! 0$!!@$!
M! $! 0,! @$!! (!" $! 0$!"0$! 0$! 0$ 4!
M ! , " , !@$
M" $ " $ ! $! P$! 4 0$! 4 $! $!
M (" !0$ !0$ 0$
M 0$ @4 !@$ @$ 0$ !@4 $! $ @$ @$! 0$!
M $" P$" 0$! 0$! $! $" 0 0N'@8&!@8&# @(" H(
M"@8&!@8(!@8$!@0&! 8$!@@*!@8.!@H&# PB$! 2'A 0#A(0&A :$!H0( 8,
M%! 0$ X29A(4!@[L" @(!@H&$@@&" @&!A &!@@&$ 8&" 80"! (!@@*!@H&
M! 8$!@0&!! (" 8(!@8$"@0&9A0@& 8(#@0&! 8$!@0&! 8$!@0.!"8*"@H*
M"! ("@H(" @(" ]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
A/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
end
------------------------------
Date: Sun, 16 Nov 86 19:53:16 est
From: Eric Terrell <terrell@ohio-state.ARPA>
To: info-atari16@su-score.arpa
Subject: Monochrome Only Graphics Demos (string.prg)
begin 644 string.prg
M8!H !0L !B@ +[ "I/+GP !FV*FT !" M S0
MK0 4T*T '-"\ ! "\ +PT_ #\\ $I.0=_\ #$ZY 2B\\ $Y!
M(B\ !# \ ,A.0DYU3E;__$ZY *X"Z\ ! UB\\ ! UB\\ !%9"\\ !$
M_DZY +5-_\ ##/ ! V#/\ $ !W\8!@P>0 '?S1R-'\ 9TC"\
M %2>0 '?P,>0 * =_&W>,_P @ &>8NO &]HO/ 0-@O/ &=).
MN0 #'A0CT)Y ;TD)Y ;U#/Y ;V@ &]8S^0 &]P !O8,_D !O6
M !%7#/Y ;V 15X^N0 '?Q"9TZY +EE2//KD $#83KD NX+KP
M !6,,#D $3^XT _ $)G/SD $#83KD P,7(]A &\/KP %TZY -H"Z
M80 (ZF 7P^N0 0-A.N0 "[AA CF2,"!_ -2$ SP '?QA C42,"!
M_ -2$ SP '?ZP>0 '?QGYF$ "+I(P('\ U(0#/ ! VF$ "*A(P('\
M U(0#/ ! W+!Y ! VF?F0GD $+>8 TC Y =_,'\ JXR.0 0M[C
M04C!T('0O '@ @0#/0 =\C Y =_L'\ JXR.0 0M[C04C!T($@0")\
M > # PF #!_ H2,"!_ ! ,\ !WT,#D $#:P?P"KC(Y !"WN-!2,'0
M@="\ > "! ,] !WX,#D $#<P?P"KC(Y !"WN-!2,'0@2! (GP !X
M,#"8 ,'\ "A(P('\ $ SP '?H^N0 '?H_.0 '?@_.0 '?0_.0 '?)A
M =P7(]2>0 0MX,>0%7 !"WFT _R9">0 '?)@'D)Y =]& &4GD !WT
M#'D!] '?1M\%)Y =\@QY ^@ !WR;=@^O "/SP 4ZY -L%2/2H!G
M /YR/KD $#83KD OB3KD M"3EY.=4Y6_^8M?,D/VD+_^C \ 5=(P"\
M3KD Y(6(\M0/_J,#P!5TC +P!.N0 #DA8CR\ +R[_^G "2, O $ZY .
M2%B/+P!.N0 #V!0CR\ 3KD WP4(\M0/_V,#D $5<2,"!_ "2, O $ZY
M .2%B/+4#_\D)N__Y@ 9R,"[__DC +P!.N0 #DA8CRU _^XO+O_J+R[_
M\G "2, O $ZY .2%B/+P O+O_J3KD WP4(\O "\N_^Y.N0 #YQ0CR\
M< )(P"\ 3KD Y(6(\O $ZY /8%"/+P!.N0 #V!0CR\ 3KD WP4(\O
M $ZY .V%B//P P;O_^T<C1_ '@ PGS!N__[1R-'\ > $I0;" P;O_^
MT<@B? '@ P,)@ 1$ R;O_^T\G3_ '@ R@#!N__[1R")\ > # PF #0
M? % ,F[__M/)T_P !X ,H P/ % 2, O $ZY .2%B/+P O+O_R+R[_[B\N
M__9.N0 #V!0CR\ 3KD XL6(\O $ZY /8%"/+P!.N0 #=!0CR\ 3KD
M [86(\_ #!N__[1R-'\ > #%? JXP/ % 2, O $ZY .2%B/+P O+O_R
M+R[_[B\N__9.N0 #V!0CR\ 3KD XL6(\O $ZY /@%B/+P!.N0 #V!0
MCR\ 3KD W04(\O $ZY .V%B//P P;O_^T<C1_ '@ Q7P5<,#P!0$C
M+P!.N0 #DA8CR\ +R[_\B\N_^XO+O_V3KD ]@4(\O $ZY .$%B/+P!.
MN0 #V!0CR\ 3KD W04(\O $ZY .V%B//P P;O_^T<C1_ '@ Q7P@*
M,#P!0$C +P!.N0 #DA8CR\ +R[_\B\N_^XO+O_V3KD ]@4(\O $ZY .
M$%B/+P!.N0 #X!8CR\ 3KD ]@4(\O $ZY -T%"/+P!.N0 #MA8CS\
M,&[__M'(T?P !X ,5\*N# \ 4!(P"\ 3KD Y(6(\O "\N__(O+O_N+R[_
M]G "2, O $ZY .2%B/+P!.N0 #V!0CR\ 3KD ]@4(\O $ZY .+%B/
M+P!.N0 #V!0CR\ 3KD W04(\O $ZY .V%B//P P;O_^T<C1_ '@ Q
M7PUF,#P!0$C +P!.N0 #DA8CR\ +R[_\B\N_^XO+O_V< )(P"\ 3KD Y(
M6(\O $ZY /8%"/+P!.N0 #V!0CR\ 3KD XL6(\O $ZY /@%B/+P!.
MN0 #V!0CR\ 3KD W04(\O $ZY .V%B//P P;O_^T<C1_ '@ Q7Q 4
M,#P!0$C +P!.N0 #DA8CR\ +R[_\B\N_^XO+O_V< )(P"\ 3KD Y(6(\O
M $ZY /8%"/+P!.N0 #V!0CR\ 3KD X06(\O $ZY /8%"/+P!.N0
M#=!0CR\ 3KD [86(\_ #!N__[1R-'\ > #%?$L(P/ % 2, O $ZY .
M2%B/+P O+O_R+R[_[B\N__9P DC +P!.N0 #DA8CR\ 3KD ]@4(\O $ZY
M /8%"/+P!.N0 #A!8CR\ 3KD ^ 6(\O $ZY /8%"/+P!.N0 #=!0
MCR\ 3KD [86(\_ #!N__[1R-'\ > #%?%7 P/ % 2, O $ZY .2%B/
M+P O+O_R+R[_[B\N__9P TC +P!.N0 #DA8CR\ 3KD ]@4(\O $ZY /
M8%"/+P!.N0 #BQ8CR\ 3KD ]@4(\O $ZY -T%"/+P!.N0 #MA8CS\
M,&[__M'(T?P !X ,5\8'C \ 4!(P"\ 3KD Y(6(\O "\N__(O+O_N+R[_
M]G #2, O $ZY .2%B/+P!.N0 #V!0CR\ 3KD ]@4(\O $ZY .+%B/
M+P!.N0 #X!8CR\ 3KD ]@4(\O $ZY -T%"/+P!.N0 #MA8CS\ ,&[_
M_M'(T?P !X ,5\:S# \ 4!(P"\ 3KD Y(6(\O "\N__(O+O_N+R[_]G #
M2, O $ZY .2%B/+P!.N0 #V!0CR\ 3KD ]@4(\O $ZY .$%B/+P!.
MN0 #V!0CR\ 3KD W04(\O $ZY .V%B//P P;O_^T<C1_ '@ Q7QUZ
M,#P!0$C +P!.N0 #DA8CR\ +R[_\B\N_^XO+O_V< -(P"\ 3KD Y(6(\O
M $ZY /8%"/+P!.N0 #V!0CR\ 3KD X06(\O $ZY /@%B/+P!.N0
M#V!0CR\ 3KD W04(\O $ZY .V%B//P P;O_^T<C1_ '@ Q7R H4F[_
M_@QN 5?__FT ^8A.7DYU3E;__#/N @ $#>,^X "@ 0. S[@ , ! XC/N
M X $#D+KP $#>/SP C\Y ! V$ZY ,^%B/3EY.=4Y6__PC[@ ( 5
MB$Y>3G5.5O_\+SP>'R\M+SD !6(3KD U,4(_0O#898NDCP %8C O
M?_].7DYU3E;_]C/N @ $4 ,"X "-!\__;!_ #2,#0O %"PM0/_Z/7P
M ?_^8!X@;O_Z$!!(@#)N__[3R=/\ !% #* 4J[_^E)N__X,;@ $__YMVBZY
M !%-DZY /D) ,#D $4H3EY.=4Y6__HC_ 10 !W:(_P $3@ =
MWB/\ !%" '>(C_ 12@ !WF(_P $54 =ZB/\ !%8 '>XC_
M'=H $4V/KP "F$ _T8S^0 12@ $4Z< %.7DYU3E;__#Z\ !-A /\J< %.
M7DYU3E;__#Z\ $U.N0 "G8@;@ (,+D $4J(&X ##"Y !%+"!N ! PN0
M12X@;@ 4,+D $4P0D P.0 12A.7DYU3E;__#/N @ $4((^X "@ 150^
MO !.3KD IV3EY.=4Y6__PS_ # !%/$)Y !%/D)Y !%0C/N @ $5(
M3KD TV3EY.=4Y6__PS_ !E !%/$)Y !%/D)Y !%0C/N @ $5(3KD
M TV3EY.=4Y6__HS[@ * ! WC/N P $#@0F[__B!N X0$$B P'P _S)N
M__[3R=/\ 9TC* 4JX #E)N__Y*0&;:,_P " 13PS_ ! !%/E-N__XS
M[O_^ !%0C/N @ $5(3KD TV3EY.=4Y6__PC[@ ( 9OB/N ! !G&
M("X $-"\ 6B/ 9RC/\ &0 $4\0GD $4^,_P "P 14(@;@ ,,]
M $5(3KD TV(&X ##"Y !%2"/\ 9T@ &;XC_ &]H !G&(_P $+@
M 9RB/\ ! W@ &<).7DYU3E;__"/N P !G",_P !@ 13PS[@ * !%
M/D)Y !%0C/N @ $5(3KD TV(_P $#> 9PDY>3G4C_ 13P !FZ
M(CP !FZ<'-.0DYU3E;__$)"2JX "&P&1*X "%)"2JX #&P&1*X #%)","X
M"L#N XM0/_\,"X ",#N XR+@ ,PNX "M!!T&[__#U __P@+O_\" ( &<"
M1(!.7DYU(]\ !G.3DXO.0 &<Y.=2/? 9SDY-+SD !G.3G4CWP &<Y.
M02\Y 9SDYU3E;__$CG'P N+@ (+"X #$ZY 16" '3-\ ^$Y>3G5.5O_\
M2.<? "XN @L+@ ,3KD !).( =,WP#X3EY.=4Y6__Q(YQ\ +BX "$ZY /
MR" '3-\ ^$Y>3G5.5O_\2.<? "XN A.N0 #]H@!TS? /A.7DYU3E8 $CG
M!P!*K@ (; Y\ 2 N A$@"U A@ D)&2JX "&8$0H!@7GX88 P@+@ (XH M
M0 (4H<@+@ (P+Q_ 9NA@#" N CC@"U A3AP@N < "6?L("X ".&
M+4 "-Z\ 0" 'P+P !_@:X "$I&9P@ K@ ( "" N A*GTS? ,!.
M7DYU3E8 $CG#P @+@ (P+P !_T+S____ / !*K@ (9P1*1FP$0H!@5B N
M C O ( Z +Q\ !]O%$I%9P@@/( !@!B \?____V P+BX "."'SKP
M____G'P && $XH=21DI&;?A@!..'4T9*1F[X2D5G!B '1( N " '2I],WP#@
M3EY.=4Y6__Q(YQ\ +BX ""PN Q.N0 $L @!TS? /A.7DYU3E;__$CG'P N
M+@ (3KD !$\( =,WP#X3EY.=4Y6__Q(YQ\ +BX ""PN Q.N0 $48@!TS?
M /A.7DYU/SS__F D/SS__V 4/SP 6 8OCP N&(25(]*!TYU0F=*!VONOCP
M.&/N2.=^@"0'W@>^/ "*8U"^/ "H8PP / "3-\!?E2/3G4L/*+Y@SXN DZY
M 2P!H'RCP ?YH\ %A$!7C_0@3KK(@\ /_.A"P\R0_;0TZY 2P"P'+@).
MN0 $48D!R@\#)#]JBX"0@=* FL:E#P 1D0"M#P 'V,"?@#DK[Z$;R2>A)Z$
M8/:4/ #&1 *T/ ?8P)^ .2O1(=$A+Z$; :>A)Z$8/9Z "P\[)%B0"@\,D/V
MJ.>':P1$AD2$WH1!^0 $T9R%W3_4D(F!2@&Y*/DI$J':PR:A-R#GIA1R?_J
M8 K:A)R#WIA1R?_>,B\ '&HD4@%F,F$\+@8L!6$V9PY.N0 $DY,WP%^5(].
M=2X\____?V#P9P(L!6$8+@9*!TS? 7Y4CTYU+P5A""]& !@L'V#F* 9K#+R\
M _V(,? !.=>"$4H1F F#T3OD !.RSCP ?TYU2@=G! H' (!.=1@&9U(*
M! " :VH:!VML9@Y@/A@&:UYG/AH':UYG,IH$:S@8![H\ !AD+"8&0@/JJQX\
M (#>@V4$'@1.=>*74@1I F3T?O]3!!X$ #P DYU+@8>!$YU2@=.=;H\_^AO
M\$0%)@9"!^JO%CP @-Z#9<P>!$YU&@=KIF?6=H"W!9H$9U!K/+H\ !ADS!@'
M'@,F!D(#ZJN>@VN@&@1"!U,$OKP '__8@9(1Y@\ !#>AUO,__RY!6L&'@1G
M DYU?@!.=;H\_^AOBD0%)@<N!AX\ (!@OAH'RT0>!IZ&9^!JND2'& 5@MH[\
M !*AF8<CKS___]_2@< / "3G5(1DA'O0=@ZFOZ?@!.=1H&9]@H!V?H=H#:
M1=A$MP6W!)@%:>1"!TA'2$:^1FL&5 1ISN*?2$<: [M$XDPF!X;&.@/&QIZ#
M2$=(1C8&0@/&Q9Z#9 @F!D(#WH-3128&2$-"1X[#2$5K"#H'VH53!#X%.@?:
MO ( N!1X$9XQ.=1H'9U(8!F=HVD781': MP2W!=H$:5X8 [E%XEU(13H&
M0@="!3@%R,=(1"8'2$/&Q=B#2$8F!L;'V(-"1-D$2$1(1\[&2$9(1=Z$:@S>
MO ( >!6<:3G53!6D491)X0-Z$WH=D!.*74@4>!6<"3G5^ $YU:OJ]!XZ\
M____?TH' #P DYU&2'[5 [6,X('UMU^ _JW4P'_5;L _^JM '_]50 __ZH
M'__U ___@ '__\ ___ '__P __\ '__ __P '_\ __ '_P
M _\ '_ _P '\ _ 'P \ '>$)*AF<N:@9$AA@\ ,*\
MO ?_]B!DA&F#P $-R&6\S__$H&:@S<O 0!D!.*64@0<!$YU;6,V.#,T
M,R!F;&]A=&EN9R!P;VEN="!F:7)M=V%R92 H8RD@8V]P>7)I9VAT(#$Y.#$@
M8GD@;6]T;W)O;&$@:6YC+@ 0 " 0$" 0$ 0$" 0$! 0$
M 0 0 #!0 %!0 0$" 0 0!P$" 0 ! 0$" 0$" 0$" 0$!
M 0(! 0$ " 0$! 0$& 0$$ 0$! P$" 0$$ @$( 0$
M ! 0$) 0$! 0$! 0 !0$
M $ P ( P & 0 ( 0 ( 0 $ 0$# 0$ !0 ! 0$
M!0 0$ 0$ @(
M % 0 % 0 ! 0 ! 0 "!0 & 0 " 0 ! 0 &!0
M 0$ 0 " 0 " 0$! 0$ 0(# 0(! 0$! 0$
M 0$ 0( !4')E8V]M<'5T:6YG(&-O969F:6-I96YT<R N+BX@<&QE87-E
M('=A:70 !"X>!@8&!@8," @("@@*!@8&!@@&!@0&! 8$!@0&" @&!@8,
M!A 0!A(2!A02!@@*"@P(!@H.% 8*# @&"@X4!@8&!@P("@@(" @($ X&!AX4
M% H*#! <&@X.$ H*"@H0#A 2#A00%@H*"@H0$A8*"@H*"A 2%@H*"@H0$A8*
M"@H*"A 2' H*"@H*"A 2' H*"@H*"@H0$AP*"@H*"@H0$AP*"@H*"@H*$!(<
M"@H*"@H*$!(<"@H*"@H*"A 2' H*"@H*"A 2' H*"@H*"@H0(@@(" 8*!A(4
M!@X6%" 8!@@.! 8$!@0&! 8$!@0&! X$)@H*"@H($ @*$ 8&" 80!@8(!A (
M'!8(# @&$ @0" 8("@8*!@0&! 8$!@00" @&" 8&! H$!F (" @("!@@'!P!
M.AP@8B0*9D),
M
M
M
M
8
end
------------------------------
Date: Sun, 16 Nov 86 19:53:29 est
From: Eric Terrell <terrell@ohio-state.ARPA>
To: info-atari16@su-score.arpa
Subject: Monochrome Only Graphics Demos (surface.prg)
begin 644 surface.prg
M8!H != #A #+8 0V "I/+GP ![,*FT !" M S0
MK0 4T*T '-"\ ! "\ +PT_ #\\ $I.0=_\ #$ZY !3"\\ $Y!
M(B\ !# \ ,A.0DYU(]\ !K$3D$O.0 &L1.=4Y6__Q"0DJN AL!D2N A2
M0DJN QL!D2N Q20C N K [@ .+4#__# N C [@ .,BX #,+N K00=!N
M__P]0/_\("[__ @" !G D2 3EY.=4Y6__Y(YS\ 0D-"A2XN @L+@ ,9A@C
M_( !K((#R @?P & &AL!$2&4D-*AVP$1(=20[R';CAF!GH!
M0H=@,+Z\ $ &P*CL8Z!TA'2,=@'G@!OH9E!N.&XX1@]DJ$9PZ^AF4$BH2>
MAN*,XHY@[K9\ %F#D2'(\< !K(( 5$@& ((\< !K(( 5*GTS? /A.7DYU
M3E;])CU\ /]3#U\ !K]2BU\MC__1OU"+7RG6L1(_3XM?) $+].CU\ )#]
M.#U\ /]-CU\_Z?]-#U\ #C],BU\\ @0?TN+7R.^C,[_2I.N0 #"@NC@:7
M___]=B\.!I?___UX+PX&E____7HO#@:7___]?$ZY ,KM_\ ##U _M ]
M? "_]@]? "_]H]? !_]P]? !_]X]? !_^ ]? !_^(]? !_^0]? !
M_^8]? !_^@]? !_^H]? "_^PNC@:7___^Z"\.!I?___[0+PX&E____]A.
MN0 #R!0CSZN_M!.N0 #C8^O !/R[^T$ZY 0&%2/+KP !F</SP &3\\
M /H_+O[03KD ZT7(\NO &; _/ H/SP R#\N_M!.N0 #K1<CT)N_K)@
M #$0F[^L& )8P/ % ,B[^L.-!D$$R+OZRP_P !=!!/4#^S# \ 7*0;O[,
M,B[^LL/\ K003U _LHP+O[,T'S^P$C +P!.N0 $,I8CRU _L P/ #(D&[^
MRDC +P!.N0 $,I8CRU _KQ";O[(($XR;OZPTLG2R='),6[^S/V ,"[^RI!N
M_L@B3C1N_K#4RE)*U<K3RC- _8!2;OZP#&X 3/ZP;0#_9"Z.!I?___V /SP
M3#\N_M!.N0 #Z!8CU)N_K(,;@ ?_K)M /\V+KP !G6/SP!=S\\ 9H_+O[0
M3KD ZT7(].N0 #)P^KO[03KD XV/KP 3\N_M!.N0 $!A4CRZ\ 9
M\S\\ 5X_/ "6/R[^T$ZY .M%R//7P!0/V 0F[]@CU\ 4#]A#U\ 53]ABZ.
M!I?___V /SP C\N_M!.N0 #Z!8CSU\ +3]@#U\ 53]@CU\ >K]A#U\ ![]
MABZ.!I?___V /SP C\N_M!.N0 #Z!8CSU\ >K]@#U\ +3]A"Z.!I?___V
M/SP C\N_M!.N0 #Z!8CT)N_K)@ ( 0F[^L& =(P/ % ,B[^L.-!D$$R
M+OZRP_P !=!!/4#^S# \ 7*0;O[,,B[^LL/\ K003U _LHP+O[,D&[^RM!\
M_XA(P"\ 3KD !#*6(\M0/[ ,#P"")!N_LR0;O[*2, O $ZY 0REB/+4#^
MO"\N_KPO+OZ\3KD !'B4(\O "\N_L O+O[ 3KD !'B4(\O # \ .%(P"\
M3KD !#*6(\O $ZY 04E"/+P!.N0 $%)0CR\ ,#P!PDC +P!.N0 $,I8
MCR\ 3KD !'B4(\O "\N_KPO+OZ\3KD !'B4(\O "\N_L O+O[ 3KD !'B
M4(\O # \(RA(P"\ 3KD !#*6(\O $ZY 2 E"/+P!.N0 $@)0CR\ +R[^
MO"\N_KQ.N0 $>)0CR\ +R[^P"\N_L!.N0 $>)0CR\ ,#P(RDC +P!.N0
M$,I8CR\ 3KD !("4(\O $ZY 2 E"/+P!.N0 $>)0CR\ 3KD !!R4(\O
M $ZY 16EB//4#^R# N_LJ0;O[(/4#^RDIN_LIL!$)N_LH,;@&0_LIO!CU\
M 9#^RB!.,F[^L-+)TLG1R3%N_LS]@"!.,F[^L-+)4DG3R='),6[^ROV 4F[^
ML QN $S^L&T _B@NC@:7___]@#\\ $P_+O[03KD ^@6(]2;OZR#&X '_ZR
M;0#]^BZ\ :)3\\ 7<_/ &:/R[^T$ZY .M%R/3KD R</J[^T$ZY .
M-CZ\ $_+O[03KD ! 85(\NO &D(_/ R/SP KS\N_M!.N0 #K1<CSU\
M_\#]-B\N_3HP+OTV2, O $ZY 0REB/+P!.N0 $>)0CRU _4(O+OU"+R[]
M0DZY 1XE"/+4#]0C!N_3;0_ ! T<C1_ &)P]4/TX,"[].$1 /4#]-"\N
M_2XO+OU","[]-,'N_31(P"\ 3KD !#*6(\O $ZY 04E"/+P!.N0 $*Y8
MCR\ 3KD !'B4(\M0/T^+R[]*B\N_3Y.N0 $>)0CRZ 3KD !"2+4#]1B\N
M_48O/,S,S3\O+OTJ+R[]/C N_4Q(P"\ 3KD !#*6(\O $ZY 1XE"/+P!.
MN0 $>)0CR\ 3KD !"26(\O $ZY 1XE"/+P!.N0 $%)0CR\ ,"[],DC
M+P!.N0 $,I8CR\ 3KD !'B4(\O $ZY 16EB//4#]2CZ\ $_+O[03KD
M _>5(\P+OTTT&[]-M!\ 4 ]0/V ,#P R)!N_4K0;OTV/4#]@CUN_8#]A#UN
M_8+]ABZ.!I?___V /SP C\N_M!.N0 #Z!8CT)7/R[^T$ZY /WE2/,"[]
M@E) /4#]@C N_8;0? R/4#]ABZ.!I?___V /SP C\N_M!.N0 #Z!8CSZ\
M $_+O[03KD _>5(\P+OTVD&[]--!\ 4 ]0/V ,"[]@E- /4#]@CUN_8#]
MA#UN_8+]ABZ.!I?___V /SP C\N_M!.N0 #Z!8CT)7/R[^T$ZY /WE2/
M,"[]@E) /4#]@C N_8;0? R/4#]ABZ.!I?___V /SP C\N_M!.N0 #Z!8
MCU)N_31O /X(4F[]-C N_3:P? ! ;0#]I"Z\ :<3\\ 7<_/ $L/R[^T$ZY
M .M%R/3KD R</KP 3\N_M!.N0 #]Y4CSZ\ $_+O[03KD ! 85(\^
MKO[03KD XV0F[^VD)N_M@]? )__M8]? &/_M0];O[:_8 ];O[8_8(];O[6
M_80];O[4_89";O[28"X];O[6_80NC@:7___]@#\\ (_+O[03KD ^@6(\P
M+O[6T'S_]CU _M92;O[2#&X 0/[2;<H]? )__MI";O[8/7P"?_[6/7P!C_[4
M/6[^VOV /6[^V/V"/6[^UOV$/6[^U/V&0F[^TF N/6[^UOV$+HX&E____8 _
M/ "/R[^T$ZY /H%B/,"[^UM!\__8]0/[64F[^T@QN $#^TFW*/7P"?_[:
M/7P!C_[8/7P"?_[60F[^U#UN_MK]@#UN_MC]@CUN_M;]A#UN_M3]AD)N_M)@
M+CUN_M;]A"Z.!I?___V /SP C\N_M!.N0 #Z!8CS N_M;0?/_V/4#^UE)N
M_M(,;@! _M)MRD)N_MH]? &/_M@]? )__M9";O[4/6[^VOV /6[^V/V"/6[^
MUOV$/6[^U/V&0F[^TF N/6[^UOV$+HX&E____8 _/ "/R[^T$ZY /H%B/
M,"[^UM!\__8]0/[64F[^T@QN $#^TFW*3KD R</KP S\N_M!.N0 #?Q4
MCSZN_M!.N0 #C8]? #(_L8]? #(_L1";O[28"P^KO[$/R[^QC\\ ,<_/ %
M/R[^T$ZY .8%"/,"[^Q-!\__8]0/[$4F[^T@QN !7^TFW,/7P R/[&/7P
MR/[$0F[^TF L/J[^Q#\N_L8_/ #'/SP!0#\N_M!.N0 #F!0CS N_L;0?/_V
M/4#^QE)N_M(,;@ 5_M)MS$ZY ,G"Z\ :DS\\ 7<_/ !D/R[^T$ZY .
MM%R/3KD R<3KD R*3EY.=4Y6__8S[@ ( G&C N C0?/_VP?P TC
MT+P != +4#_^CU\ '__F >(&[_^A 02( R;O_^T\G3_ )QHR@%*N__I2
M;O_^#&X !/_^;=HNN0 )U!.N0 #Y"0# Y G0DY>3G5.5O_Z(_P "<:
M BY"/\ F_ (N@C_ )R( "+L(_P "=" B\"/\ G;@ (O0C
M_ )W8 "+X(_P "+D G4#Z\ IA /]&,_D "=" G5' !3EY.=4Y6
M__P^O 380#_*G !3EY.=4Y6__P^O 43KD N^3EY.=4Y6__P^O !-3KD
M N^(&X "#"Y G1"!N PPN0 )T8@;@ 0,+D "=((&X %#"Y G2D)
M,#D "="3EY.=3\O 0_/ !,3D%.=2/\ G5@ 'M B/ 'M!P<TY"3G4P
M+P $P< R+P &P\'2@&=6( $T/ LKP 0 909(030\ !"R? !8P920N)!
M8/3B0C8\ 'E8S0#XT)F E-",@*20[)\ %G&N)!TD,X <+!LH!B!F4(, 1.
M=30$8. V!&#<, -.=7(!,"\ !L'O 1J D1!-"\ "('"Q$)J!$1!1$(O R8
M2$/&0VH"1$/C0[9";0+0028?3G4P+P &XT#![P $@>\ "&L$4D!@ E- XD!.
M=3 O ;C0,#O 2 [P (4D#B0$YU(^\ ! )V1.=2/O 0 "=H3G4@;P $
M(+D "=H3G5.5O_\,^X "@ 'N0S_ @ G5D)Y G6#/\ $ "=<,^X
M" )V).N0 #/PP.0 (.1.7DYU3E;__#/\ , "=60GD "=80GD "=<
M,^X " )V).N0 #/Q.7DYU3E;__#/N H "+\,^X # (OXS[@ . C
M #/N ! ",",_P "P )U8S_ " G6$)Y G7#/\ 4 "=@,^X "
M)V).N0 #/Q.7DYU3E;_^C/N H "+\,^X # (OY";O_^(&X #A 02(#
M? #_,F[__M/)T_P ![D,H!2K@ .4F[__DI 9MHS_ ( G5C/\ $ "=8
M4V[__C/N__X "=<,^X " )V).N0 #/Q.7DYU3E;__"/N @ ![4(^X
M$ 'MP@+@ 0T+P !:(\ ![@,_P 9 )U9">0 )U@S_ + G7"!N
M PST )V).N0 #/P@;@ ,,+D "=B(_P ![D >U"/\ @Y 'MPC
M_ )/P ![@(_P "+\ >V$Y>3G5.5O_\(^X # 'M@S_ & G5C/N
M H "=80GD "=<,^X " )V).N0 #/PC_ (OP ![83EY.=4Y6__PS
M[@ * >Y#/\ !$ "=60GD "=8,_P 0 )UPS[@ ( G8DZY ,_# Y
M @Y$Y>3G5.5O_\,^X "@ 'N0S_ / G5D)Y G6#/\ $ "=<,^X
M" )V).N0 #/PP.0 (.1.7DYU3E;__$CG'P N+@ (+"X #$ZY 4;" '
M3-\ ^$Y>3G5.5O_\2.<? "XN @L+@ ,3KD !5B( =,WP#X3EY.=4Y6__Q(
MYQ\ +BX "$ZY 20" '3-\ ^$Y>3G5.5O_\2.<? "XN A.N0 $Z@@!TS?
M /A.7DYU3E8 $CG!P!*K@ (; Y\ 2 N A$@"U A@ D)&2JX "&8$0H!@
M7GX88 P@+@ (XH M0 (4H<@+@ (P+Q_ 9NA@#" N CC@"U A3AP@N
M < "6?L("X ".& +4 "-Z\ 0" 'P+P !_@:X "$I&9P@ K@ (
M"" N A*GTS? ,!.7DYU3E8 $CG#P @+@ (P+P !_T+S____ / !*K@ (
M9P1*1FP$0H!@5B N C O ( Z +Q\ !]O%$I%9P@@/( !@!B \?___
M_V P+BX "."'SKP ____G'P && $XH=21DI&;?A@!..'4T9*1F[X2D5G!B '
M1( N " '2I],WP#@3EY.=4Y6__Q(YQ\ +BX ""PN Q.N0 %=0@!TS? /A.
M7DYU3E;__$CG'P N+@ (+"X #$ZY 46B '3-\ ^$Y>3G4_//_^8"0_//__
M8!0_/ !8!B^/ "X8A)4CTH'3G5"9TH':^Z^/ X8^Y(YWZ ) ?>![X\ (IC
M4+X\ *AC# \ ),WP%^5(].=2P\HOF#/BX"3KD !74&@?*/ !_FCP 6$0%
M>/]"!.NLB#P _\Z$+#S)#]M#3KD !74+ <N DZY 46B0'*#P,D/VJ+@)"
M!TH":QJ4/ !&1 *T/ ?8P)^ .2OOH1O))Z$GH1@]I0\ ,9$ K0\ !]C GX
MY*]$AT2$OH1L!IZ$GH1@]GH +#SLD6) *#PR0_:HYX=K!$2&1(3>A$'Y 6
M6G(7=/]20B8%* ;DH^2D2H=K#)J$W(.>F%')_^I@"MJ$G(/>F%')_]XR+P <
M:B12 68R83PN!BP%839G#DZY 58DS? 7Y4CTYU+CS___]_8/!G BP%81@N
M!DH'3-\!?E2/3G4O!6$(+T8 &"P?8.8H!FL,O+P #_8@Q\ $YUX(12A&8"
M8/1.^0 %L;./ !_808 / "3G46!V=0:^[B"V0$4@/BC]8\ "!(0S8\ !?N
MCR@'*@<L"$'Z #0N/ " "8AYJ\ 2 & ,!\<H!=B$*@2:F)J'6\O_\EK+
M__)C E*'X8\@1DA#'@-.=0 0 " 0 " 0 " 0
M " 0 " 0 " 0 " 0 " 0 "
M 0 " 0 & 9G4@H$ (!K:AH':VQF#F ^& 9K7F<^&@=K
M7F<RF@1K.!@'NCP &&0L)@9" ^JK'CP @-Z#900>!$YUXI=2!&D"9/1^_U,$
M'@0 / "3G4N!AX$3G5*!TYUNCS_Z&_P1 4F!D('ZJ\6/ " WH-ES!X$3G4:
M!VNF9]9V@+<%F@1G4&L\NCP &&3,& <> R8&0@/JJYZ#:Z :!$('4P2^O
M?_]B!DA'F#P $-Z'6\S__+D%:P8>!&<"3G5^ $YUNCS_Z&^*1 4F!RX&'CP
M@&"^&@?+1!X&GH9GX&JZ1(<8!6"VCOP $J&9AR.O/___W]*!P \ ).=4A&
M2$>]!V#J:_I^ $YU&@9GV"@'9^AV@-I%V$2W!;<$F 5IY$('2$=(1KY&:P94
M!&G.XI](1QH#NT3B3"8'AL8Z \;&GH-(1TA&-@9" \;%GH-D""8&0@/>@U-%
M)@9(0T)'CL-(16L(.@?:A5,$/@4Z!]J\ @"X%'@1GC$YU&@=G4A@&9VC:
M1=A$=H"W!+<%V@1I7A@#N47B74A%.@9"!T(%. 7(QTA$)@=(0\;%V(-(1B8&
MQL?8@T)$V01(1$A'SL9(1DA%WH1J#-Z\ @!X%9QI.=5,%:11E$GA WH3>
MAV0$XI=2!1X%9P).=7X 3G5J^KT'CKS___]_2@< / "3G49(?M4#M8S@@?6
MW7X#^K=3 ?]5NP#_ZJT ?_U5 #__J@ ?__4 #__^ ?__P #__\ ?__ #_
M_P ?_\ #__ ?_P #_\ ?_ #_P ?\ #_ ?P #\ ?
M #P =X0DJ&9RYJ!D2&&#P PKR\ !__V(&2$:8/ 0W(9;S/_\2@9J
M#-R\ ! &0$XI92!!P$3G5M8S8X,S0S(&9L;V%T:6YG('!O:6YT(&9I<FUW
M87)E("AC*2!C;W!Y<FEG:'0@,3DX,2!B>2!M;W1O<F]L82!I;F,N ! (!
M 0(! 0 ! 0(! 0$! 0 ! ! ,% 4% ! 0(! ! ' 0(!
M $! 0(! 0(! 0(! 0$! @$! 0 (! 0$!
M 08! 00! 0$# 0(! 00" 0@! 0 $! 0D! 0$! 0$! % 0
M 0# @#
M 8! @! @! 0! 0,! 0 % $! 0 % ! 0 ! 0
M " @ 4! 4!
M $! $! (% 8! (! $! 8% ! 0 ! (! (! 0$! 0
M ! @,! @$! 0$! 0 ! 0 ! @ !D ) L #( . ] $$
M1@!* $T 40!4 %< 6@!= %\ 8@!D &8 :0!K &T ;P!P '( = !U '< >0!Z
M 'L ?0!^ '\ @ "! (, A "% (4 A@"' (@ B0"* (H BP"+ (P C0"- (T
MC@". (\ CP"/ (\ D "0 ) D "0 ) D "0 ) D "0 (\ CP"/ (\ C@".
M (T C0"- (P BP"+ (H B@") (@ AP"& (4 A0"$ (, @0" '\ ?@!] 'L
M>@!Y '< =0!T '( < !O &T :P!I &8 9 !B %\ 70!: %< 5 !1 $T 2@!&
M $$ /0 X #( + D !E!('-I;7!L92!F;&%T('!L86YE $1E;6\@0GD@0F]B
M(%)I='1E<B!A;F0@36EK92!486YC<V$N+BX 4')E<W,@86YY(&ME>2!T;R!C
M;VYT:6YU92XN+@!!('-U<F9A8V4@=VAE<F4@6B ](&9U8W1I;VXH6"US<75A
M<F5D+"!9+7-Q=6%R960I %!R97-S(&%N>2!K97D@=&\@8V]N=&EN=64N+BX
M0V]M<&QE>"!S=7)F86-E<R!A<F4@9G5N('1O(&UA:V4N+BXN06YD($9!4U0A
M(0!0<F5S<R!A;GD@:V5Y('1O(&-O;G1I;G5E+BXN+BXN+BX 4')E<W,@86YY
M(&ME>2!T;R!E>&ET(&%N9"!R971U<FX@=&\@9&5S:RUT;W N+BX %]C=')L
M7V-NI != 7V-R>7-T86RB #Y?=')A< *( 2FQD:78
MH@ "N;&UU; "B %I?;6%I;@ *( !3%]C<GES7VEFH@
M N^7V%P<&Q?:6ZB #"A?87!P;%]E>*( ,BE]E=FYT7VMEH@ R<
M7V=R869?:&&B #*Y?9W-X,0 *( ,_%]G<W@R H@ S\7VE?
M<'1R "B #=Q?:5]P='(R *( -YE]I:6]F9@ H0 ![47VEO;V9F
M "A 'MQ?;5]L<'1R,J( -\%]M=6Q?9&EVH@ VN7U--54Q?1$FB
M #7I?=F5C7VQE;J( -$E]-54Q?1$E6H@ VN7W!I;V9F "A
M'MA?<&]O9F8 *$ >X%]U;75L7V1IH@ W(7U]E>&ET "B #/!?
M=F1I *( ,_%]V<W=R7VUOH@ W\7W9?8VQR=VNB #C9?=E]E
M;&QI<*( .8%]V7V=T97ATH@ ZT7W9?;W!N=G>B #R!?=E]P;&EN
M9:( /H%]V<VQ?8V]LH@ _>7W9S;%]T>7"B $!AF<&%D9 *(
M 04E]F<&%D9 H@ !!29G!D:78 "B $')?9G!D:78 *( 0
M<G-I;@ H@ !"27W-I;@ "B $))S<7)T *( 0KE]S
M<7)T H@ !"N7V9P;'1O9@"B $,I?9G!F=&]L *( 16F9P;75L
M H@ !'B7V9P;75L "B $>)F<&UU;'0 *( 1XE]F<&UU;'0
MH@ !'B9G!S=6( "B $@)?9G!S=6( *( 2 F9F<'-I;@ H@
M !) 9F9P8V]S "B $BYF9G!T86X *( 2*&9F<'-I;F-SH@ !(B
M9F9P<W%R= "B $ZAF9G!A9&0 *( 4;&9F<'-U8@ H@ !1:9F9P
M9&EV "B %6)F9G!M=6PR *( 5U&9F<'1H971AH@ !9:9F9P=&YO
M<FVB %L9F9G!C<'ER=.) 6_%]I;G1I;@ H0 ![D7VEN=&]U= "A
M (.1?8P *$ BY%]P='-I;@ H0 "+\7W!T<V]U= "A
M)/Q?9VQO8F%L *$ F_%]C;VYT<F]LH0 "<:7VEN=%]I;@"A )R)?
M:6YT7V]U=*$ G0E]A9%]C H0 "=07V=L7V%P:62A )U1?8V]N
M=')L *$ G5E]A9&1R7VENH0 "=N7V%D9')?;W6A )W8 $+AH(
M=F8,8B9J# X($@@25!A:%A(("@X($BXP)%@<%!(2"@H2"A(2$@H*$A(2"@H*
M"@IT%A(("@X($AH*%!8H"@H*% HD"@H*"@H2"@H41 XN$#X.+B 2" X0#$YJ
M:F@@#@PL1B &$@@&$!0@& 8(#@0&! 8$!@0&! 8$!@0.!"82"@H*"@@6! ;8
M"@P." 8(" 8&$ 8&" 80" @(" @&" @&$ @<%@@," 80"! (!@@*!@H&! 8$
M!@0&!! (" 8(!@8$$ @&" @&!A (!@@(!@8:(!P< 3H@8B0*9D), 'EY>7EY
">7D&
end
------------------------------
Date: Sun, 16 Nov 86 19:53:42 est
From: Eric Terrell <terrell@ohio-state.ARPA>
To: info-atari16@su-score.arpa
Subject: Monochrome Only Graphics Demos (monodemo.prg)
begin 644 monodemo.prg
M8!H A0 X "!H %0 "I/+GP TX*FT !" M S0
MK0 4T*T '-"\ ! "\ +PT_ #\\ $I.0=_\ #$ZY !3"\\ $Y!
M(B\ !# \ ,A.0DYU(]\ DP3D$O.0 "3!.=4Y6__Q"0DJN AL!D2N A2
M0DJN QL!D2N Q20C N K [@ .+4#__# N C [@ .,BX #,+N K00=!N
M__P]0/_\("[__ @" !G D2 3EY.=4Y6__Y(YS\ 0D-"A2XN @L+@ ,9A@C
M_( DT(#R @?P & &AL!$2&4D-*AVP$1(=20[R';CAF!GH!
M0H=@,+Z\ $ &P*CL8Z!TA'2,=@'G@!OH9E!N.&XX1@]DJ$9PZ^AF4$BH2>
MAN*,XHY@[K9\ %F#D2'(\< DT( 5$@& ((\< DT( 5*GTS? /A.7DYU
M0J<_/ @3D%<3S(Y $5%-!('D 162I!G"%A(4<G_^&#^(+P *6(\@
M !$^+P _/ @3D%<3S\\ ).3E1/(\ !%",_P 0 $48S_ !0 12&$
M 7HP/ " <@!!^0 #3Q@ B#!4<C__$'Y -/# \ !\Q? $X (Q? # 0Q
M? & 8A? "- "-#\ !!1R/_@0?D T\0_D A0,#P %S%9 PQ60 .
MT/P $%'(__)!^0 #3PP/ +".@ T/P $%'(__0P/ ,@/P!A=F$ (0P
M'U'(__1!^0 #?PP/ +".@ T/P $%'(__0_/ "/SP 4Y-6$]*0&8&
M84)A4&#J80 OD*G/SP ($Y!7$\@>0 $3Y"D"\ /SP ($Y!7$]"9TY!,CP
M # \__]1R/_^4<G_]DYU4GD !$\3G4P.0 $3RP>0 $3QG^$YU1?D T\
M/CP %P@J &=6,"H M!J QM!K!\ G!M"$1J S0:@ ,,BH !-)J YM
M!K)\ 8!M"$1J [2:@ .-4 C5! 0T*@ &-CD !%(.#P #WH"(&H "")Y
M 10F$ %I%Z@ 04<__G$YU,#P?/R!Y 10G( (,%1R/_\3G5(IS -CD
M !%&4T/C0\+[,"(T ,!\ _$?/_P-CLP#.9BTD),GP ,3G4 P " $ 0!0
M * 4 "@80#_Q-+!Y4)*0&9$3OL@ F 2!@ $H8 !,& 3Q@ %"3G4
M & 4A@ %08 !6& 61@ %N8 !=& 8!@ &*8 !E& :"P? '
M;5 \/ 0G$#E0" [ %).^R "8 !DF :)@ &T8 !T& >Q.=0 8 !
M_& @Y@ (@8 "0& EQ@ )J8 "AF J1@ *X8 "U#P Y4 @.P &
M3OL@0O__ !__X /__ !__X /__ !__X /__ !__X /__ !__X
M/__ !__X /__ !__X /__ !__Y@ $&8 "DF J1@ + 8 "W$YU
M !@ +L8 "_F Q!@ ,P8 !T& TA@ -D8 #@F Y9@ )(< R
M@-+#4<S_^DYU,!C!4=+#4<S_^$YU,!%&0,!8,H#2PU',__1.=3*8TL-1S/_Z
M3G4P&$9 P5'2PU',__9.=3 8L5'2PU',__A.=3 8@5'2PU',__A.=3 8@%%&
M0#* TL-1S/_T3G4P&$9 L5'2PU',__9.=491TL-1S/_Z3G4P$49 @%@R@-+#
M4<S_]$YU,!A&0#* TL-1S/_V3G4P&$9 @5'2PU',__9.=3 8P%%&0#* TL-1
MS/_T3G5P_S* TL-1S/_Z3G5&@#( 2$#!4<-Q4 #2PU',__9.=73_-!CMNL5Q
M4 !(0L51TL-1S/_N3G4R $A =/\T&.VZLW%0 ,5Q4 !(0K&1Q9'2PU',_^A.
M=3( 2$!T_S08[;J#<5 Q7%0 $A"@5'%4=+#4<S_Z$YU= T&.VZ1H+%<5
M2$+%4=+#4<S_[$YU= T&.VZM7%0 $A"M5'2PU',_^Y.=70 -!CMNH5Q4 !(
M0H51TL-1S/_N3G4R $A = T&.VZA'%0 +-",X)0 $A"A%&Q0C*"TL-1S/_D
M3G4R $A = T&.VZM7%0 +-Q4 !(0K51L5'2PU',_^A.=3( 2$"S<5 L5'2
MPU',__9.=3( 2$!T #08[;JS<5 A7%0 $A"L5&%4=+#4<S_Z$YU,@!(0'0
M-!CMND:"@W%0 ,5Q4 !(0H%1Q5'2PU',_^9.=73_-!CMND:"A7%0 $A"A5'2
MPU',_^Q.=3( 2$!T_S08[;K%<5 LW%0 $A"Q5&Q4=+#4<S_Z$YU,@!(0(-Q
M4 "!4=+#4<S_]DYU=/\T&.RZQ5%(0L5Q4 #2PU',_^Y.=3( 2$!T_S08[+JQ
M4<512$*S<5 Q7%0 -+#4<S_Z$YU,@!(0'3_-!CLNH%1Q5%(0H-Q4 #%<5
MTL-1S/_H3G5T #08[+I&@L512$+%<5 TL-1S/_L3G5T #08[+JU44A"M7%0
M -+#4<S_[DYU= T&.RZA5%(0H5Q4 #2PU',_^Y.=3( 2$!T #08[+J$4;%"
M,H)(0H1Q4 "S0C."4 #2PU',_^1.=3( 2$!T #08[+JU4;%12$*U<5 LW%0
M -+#4<S_Z$YU,@!(0'0 -!CLNK%1A5%(0K-Q4 "%<5 TL-1S/_H3G4R $A
M= T&.RZ1H*!4<512$*#<5 Q7%0 -+#4<S_YDYU=/\T&.RZ1H*%44A"A7%0
M -+#4<S_[$YU,@!(0'3_-!CLNL51L5%(0L5Q4 "S<5 TL-1S/_H3G4 @ !
M +____^ '__O__ @ " #__@ #__@ " ( O_^__X O_^__X
M @ ! +____^ '__O__ @ " #__@ #__@ " ( O_^__X O_^
M__X'X _P']@8"!@($ @>>!-($0@($ MP!E 'H!X@&\ 8 ?@'#@P#& &0 +#
MPX?AA^&'X8?AP\- F &, P<. ?@ !@!G ..!P<. YP!^ #P / !^ .<!PX
M.!QP#F & !@&&&<8XYG!VX#_ 'X/Y__G\'X _P';@YG'&.888!@%]C<GES
M=&%LH@ ^7W1R87 "B $IL9&EV *( KFQM=6P
MH@ !:7VUA:6X "B 4QM;W9E *( "KG-P<FET7W-TH0
M T\=E]B87-?862A $4)V7W!L86YE<Z$ 11G9?;&EN7W=RH0 !%(
M8V]N8V%T "B S1B;&ET *( #;F(R,7( H@ ;X8C(R
M<@ "B !PYB,C-R *( '+F(R-'( H@ =.8C(V<@
M "B !V9B,C=R *( '?&(R.'( H@ >28C(Y<@ "B
M ![9B,D)R *( 'UF(R0W( H@ ?V8C)$<@ "B
M"!AB,D5R *( (, 0N&@AV9@PV!A@("! .'! &&BH\* @&"DX0
#&!0
end
------------------------------
End of Info-Atari16 Digest
**************************
-------