CHECK80.BAS (for the XEP80)
From: Michael Current (aa700@cleveland.Freenet.Edu)
Date: 12/10/92-09:55:23 AM Z
From: aa700@cleveland.Freenet.Edu (Michael Current)
Subject: CHECK80.BAS (for the XEP80)
Date: Thu Dec 10 09:55:23 1992
From: ab588@yfn.ysu.edu (joseph sabatino)
Here's that program that does flashing and some graphics with
the xep80...you have to use atari's handler, not the SDX handler.
I uuencoded it cuz there was some control characters and inverse
in it....here it is.
--------
begin 666 CHECK80.BAS
M 3@!.0'! 1$.)@Y"0<S.P41%T-A$T$]3PTQ/3]!#2$5#RT)!3*A#2$5#y
M2ZA$15"H3U-#J--!1-E"04PPL%)%5%52S@ $(#)6D !0%$ ) y
M @ T $ $02 ! 5 P !D ! '0 ( y
M A!(B0 !!"0 "P ! $$*0@ + $ 00N$ L 0!!#,8 "P ! -0$D y
M X #P 0 9 Q,12).0Y $ L$HHYy
M#D 0 "P2BSD.0! +!*,.0Y $ L%FX #0T,#D$%D !9Xy
M D)* \!?1:" 8&*!:, $9&* \^(" @(" @(" @(" @(" @(!$2$A(2$A(2y
M$A(2$A(2$A(2$A(2$A(2$A(2$A(2$A(2$A(2$A(2$A(2$A(2$@46E@!&1B@/y
M/B @(" @(" @(" @(" @("!\(" @(" @(" @(""DI*2DI*2DI*2DI*2DI*2Dy
MI*2DI*2D(" @(" @(" @("!\%J 1D8H#SX@(" @(" @(" @(" @(" @?" @y
M(" @(" @(" @I" @(" @(" @(" @(" @(" @(" @I" @(" @(" @(" @?!:Jy
M $9&* \^(" @(" @(" @(" @(" @('P@(" @(" @(" @(*2@P\C%P\O"S\_+y
MH,+!S,'.P\72H*0@(" @(" @(" @('P6M !&1B@//B @(" @(" @(" @(" @y
M("!\(" @(" @(" @(""D$1(2$A(2$A(2$A(2$A(2$A(2$@6D(" @(" @(" @y
M("!\%KX 1D8H#SX@(" @(" @(" @(" @(" @?" @(" @(" @(" @I'P@H*"@y
MH,'TX?+I]^'TX^B@H"!\I" @(" @(" @(" @?!;( $9&* \^(" @(" @(" @y
M(" @(" @('P@(" @(" @(" @(*1\(" @(" @("!B>2 @(" @(" @?*0@(" @y
M(" @(" @('P6T@!&1B@//B @(" @(" @(" @(" @("!\(" @(" @(" @(""Dy
M?" @("!J;V4@<V%B871I;F\@('RD(" @(" @(" @("!\%MP 1D8H#SX@(" @y
M(" @(" @(" @(" @?" @(" @(" @(" @I!H2$A(2$A(2$A(2$A(2$A(2$A(#y
MI" @(" @(" @(" @?!;F $9&* \^(" @(" @(" @(" @(" @('P@(" @(" @y
M(" @(*2DI*2DI*2DI*2DI*2DI*2DI*2DI*0@(" @(" @(" @('P6\ !&1B@/y
M/B @(" @(" @(" @(" @(" :$A(2$A(2$A(2$A(2$A(2$A(2$A(2$A(2$A(2y
M$A(2$A(2$A(2$A(2$A(2$A(#%OH 2P8H%$@H#ST@(" @(" @(" @(" @(" @y
M("#%[O3E\J#TZ.6@Y>[DZ>[GH.+A[.'NX^6@[^:@^>_U\J#S].'TY>WE[O2Ny
M%$LH%@0!608H%#<H#RL@(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @y
M(" @PN'LX>[CY;VD%11!#0Y! F 410* %$\,#D$%( !19# Y!!@ y
M 6#@$)"2@/ 7T6& %2!B@4"2@4#"@4#R@4$B@44B@/.R @(" @(" @(" @y
M(" @(" @(" @(" @0TA/3U-%($].12!/1B!42$4@1D],3$]724Y'($Y534)%y
M4E,N%B(!,P8H%# H#R,@(" @(" @(" @(" @(" @(" @(" @("!"04Q!3D-%y
M(#T@)!6 %#,H%BP!-C H#R@@(" @(" @(" @(" @(" @(" @(" @(" @(" @y
M(#$I($1%4$]32513%#,H%#8H%C8!.CHH#S(@(" @(" @(" @(" @(" @(" @y
M(" @(" @(" @(#(I($]55%-404Y$24Y'($-(14-+4Q9 4$&*!0)*!0W* \Hy
M(" @(" @(" @(" @(" @(" @(" @(" @(" @(" S*2!!3$P@1$].114400P.y
M005 %DH!.! I' Y @ 2@10:# Y!!2 4. >!( Y 20 Iy
M@2$.0%$ &PY! G 65 $7%P>!(@Y 4 ;#D$$( !9> 9P/y
M!X$B#D!1 !L9# Y!!9 4'R@/ 7T4,2T.0 $ $@Y $@ 4y
M;2@/-R @(" @(" @(" @(" @(" @(" @(" @1T]/1"!"644@U,^@V<_5H,'.y
MQ*#9S]72H,W/SL79H*$4<"@4<R@4=B@4>2@4A2@/!\'RY:#Y[_44CPP.0050y
M %)D,#D$& !2<%19H 0X.$1P.0 ( %G(!;@DH#P%]% PH% \Hy
M%!(H%!4H%!@H%!LH%!XH%"$H%"0H%"<H%& H#S,@(" @(" @(" @(" @(" @y
M(" @(" @(" @($5.5$52($Y534)%4B!/1B!$15!/4TE44R 5%&H-#D$#< y
M !1N H(6? %4$0B%+0Y 0 9@A1&* \O(" @(" @(" @(" @(" @(" @y
M(" @(" @(" @("!$15!/4TE4($%-3U5.5" ]("05%% -#D$#@ !14 H,6y
MA@$+"S: +8 E@Q:0 0T-# Y!!1 6F@%7!B@4.R@/+B @(" @(" @(" @y
M(" @(" @(" @(" @+BXN+BXN+BY.15<@0D%,04Y#12 ]("05@!1/"(0M#D !y
M !D.004 %%,)A!17"846I %S"2@/ 7T4#"@4#R@4$B@4%2@4&"@4y
M&R@4'B@4(2@4)"@492@/.R @(" @(" @(" @(" @(" @(" @(" @14Y415(@y
M3E5-0D52($]&($]55%-404Y$24Y'($-(14-+4R @%11O#0Y!!" 4<P*&y
M%JX!$1$(ART.0 $ &886N $\."@/+R @(" @(" @(" @(" @(" @(" @y
M(" @(" @(" @(" @($-(14-+($%-3U5.5" D%10\ H@6P@$-#0P.0040 y
M%LP!"PLV@"V )H@6U@%3-R@/+2 @(" @(" @(" @(" @(" @(" @(" @(" @y
M(" @+BXN+BXN+BY"04Q!3D-%/16 %$L(A"T.0 $ &0Y!!0 43PF$y
M%%,)AQ;@ 0T-# Y!!9 6Z@%I"2@/ 7T4&RT.0 ( $@Y $0 4y
M52@/,R @(" @(" @(" @(" @(" @(" @("#4R,G3H,G3H-G/U=*@Q<[$R<['y
MH,+!S,'.P\4@)!6 %%\,#D$%4 !1I# Y!!@ 6] $-#0H.00)P y
M%OX!HR (C2T.0) &0Y 4 :-@Y 0 4/#(. $HT2y
M#D 0 !(.0! %%@R#D ! !*-$@Y $ 2#D 0 !1Zy
M,@X 2#@ !(. $@X 4G#(.0 $ $@X y
M 2#@ !(. %* )C12C)!8( F4@"(0M#D 5 !D.y
M0 $ &C8.0 ( %#PR#@ !(.00$A $@Y $ 2A!1 y
M"8048C(. $@X 2#@ !(. %&4D%A("!@85y
M%AP",0X1' Y @ 4+A<<#D " !(.0 0 $@X 2#P)+y
M.A0Q)!8F B8+* \"_OX5%!\(A"T. &0Y!( 4(PF$%"8D%C "y
M3"0H/CH.0"< +!4^.@Y! E4 F#D 6 "P5%$P=#D @ !(<y
M#D ! !(.0!( $@Y! D0 2#P)%.A8Z D\D*#XZ#D G "P5y
M/CH.00)5 )@Y 0 L%11,'0Y ( 2' Y 0 2#D 2 y
M !(.00)% $@\"13H43R061 (F"R@/ O[^%10?"(0M#@ !D.02 y
M %",)A!0F)!9. I@D*#XZ#D G "P5/CH.00)5 )@Y ! Ly
M%11,'0Y ( 2' Y 0 2#D 2 !(.00)$ $@\"13H4;2@^y
M.@Y )P L%3XZ#D$"50 "8.0 $ +!44E1T.0" $AP.0 $ y
M $@Y $@ 2#D$"10 !(/ D4Z%)@D%E@"B!PH/CH.0"< +!4^y
M.@Y! E4 L%11$'0Y ( 2' Y 0 2#D 2 !(.00)$ y
M$@\"13H472@^.@Y )P L%3XZ#D$"50 "P5%(4=#D @ !(<#D !y
M !(.0!( $@Y! D4 2#P)%.A2()!8 @!45&0\-1#I#2$5#2S@Py
%+D)!4Q8 y
end
--
Joe Sabatino-->ab588@yfn.ysu.edu
--
Michael Current, Cleveland Free-Net 8-bit Atari SIGOp
Carleton College, Northfield, MN, USA / UUCP: ...!umn-cs!ccnfld!currentm
Internet: currentm@carleton.edu / Cleveland Free-Net: aa700
-----------------------------------------
Return to message index
