@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu } 3E:}DISK OPERATING SYSTEM II VERSION 2.5 COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.5s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED377 FREE SECTORS COPYING---D2:JT.PICCOMl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 144ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8u8K8P?@     Y`  Y0 l `8LRS:H` B V`BDT}EhK)I JLVUVT`H 2` BHIhLV }}~ɛ  ;} 2 ` GR.0:RUN"D:MENU" U}  \`bb D:MENU" j xTFILEFILE1SELDPAGFLG@@Q"%@@@ W} n Axp-@"D ٠ΠŠ V-@ @ p(NEW DRIVE # X} |-@$@  ( * A0<-@$@ NAdAURh @)!@r A| Y}A0 B$e +@-@@< @DISK # NOTN-@@e(@ ON SYSTEM Z}8 A A`#6-@- Ap8@ B Ab-@"C((͠ [}ӠˠM BX@b A`m A-@@P:?-@"m ( \}ҠΠŠ6@ Ap" A`, B6 A l-@"C ( ]}ҠԠΠŠM AW A`b@l Bn A@.@@R1:@- ^}@"n((ӭ̠ӠΠŠ,@ Ap" A`, APW-@"C( _}(ӭ̠ӠԠΠŠM AW A`" B@" A-@A  `}$b%2@@@9-@@P= _2b$b%2@U@ a}@9-@@P= _2b$"z1;@,;@,;@,;@,C b}@U@ea6-@m6-@z6.D :*.*, +AR@90@ c}S0@] Bw67@<@,.=:, AP@@6^2(*}Š d}ŠˠŠD-@H(Z-@8^(@A@!6-5-@@4 e}? A`L@V Bb @v-@%(0J7 @*!@ --@% f}7(T1!@+-@ @%&@1(^ h F:A,A6ArM @- g}"( .-@A( FREE SECTORS M6-@|m!@+-@ @%&@2( N-@%@%&@ h}a( FREE SECTORS m6-@M B-@"M((ίЩŠĩŠөӠ>-@ i}@ $( SELECTION >0@@ @] Ap-@$@ +( =-@$@ OAdAU j}Y A]S27@<@,4P*+"@)"@,=@I6-@S AL7@<@,4 k}P(6-@B0@L AG7@<@,4D(6-@2 A =@G A$$ l}7@<@,4SA: 6-A:,& @)!&@&0 A: A_ B(}@;@ m}@G6-S"@_6-@4$-@% @$ +67@<@,.7@ n}<@,S67@<@,.7@<@,l67@<@,..67@<@,.7@<@,Y 6 o}.-@@,6-@:7<,,B"@F)"@XY67B:,%@,.>:,H1+!@G* @X,)+!@d* @ p},H67B:,%@,.>:,G @@+@e@=ARG Apr +@-@ q}@4(@LOADINGF-@@d(@7@<@,n A@r%a A(@4(@ r}FILE NOT FOUNDT(@OR NOT A LOAD FILE^ A`a%D:MENUn A@r%a A(@4(@ L Q7f7CAPDYPXC t} @6-B6-u};@`,6-A2 Au/-+%@,$AV+%@,$AV5JAF:@ ,N v}ZB2XfB2Yi#u@w |+AR@(.AY@B:BByLB2w@^B2Hw}AvpB2IAv|A B2V@'B2W@9B2P@pKB2Q@xm6-F:A`x},%AV$F:Aa,@@B2vQAA2'A@f3A?AM-Ay}Q A2@@@A2@@A@@S-@@+-@p@w/"K+z}%'@,$AV%O S  V 2$-@6?P@2@@@D R-AV (S-{}@@+-@g@w/"K+%'@,$AV%O S 2//28,60,115,98,96,112,60,28,0,0,0,0,2,3,0,0<|}NN5,5,5,5,5,5,13,13,57,241,193,160,160,160,160,160,160,176,176,156,143,131FW-@? /2AC@;}}!@W2@AB@JpAA 6-@6?R-@@@h%~}B7`%A`l p P-A dm -@2@6@,-@3(. Q2@@&@@}_-Ac g m(}n[-@?`-A%AAA%AW2A@[ p\}-@6?@.A%ABA%AX2A@\ s'A@'A@}x-A }c-@'(OF COURSE YOU KNOW,5-A9 E-@c(THIS MEANS WAR! -}-A (})-A- L-@@1#-@*( *B2$@@F L(}]-}AU@/2@@DAF:B7p,YAF:A,] 1AA2'A@f}12-A g -@2@%6@,-@3(. Q2@@&@@_-A}c g (-@@((SLOW,ISN'T HE?g -@$@6@,-@3(. Q2@@&@@}_-Ac g (-@@(( g -@@6@,-@3(. Q2@@}&@@_-Ac g M-@@#( 1( | |?( | |M( Y}%2@@@@G2@@@@U-@pY L-@@( 2-A}@H2@@L Q-@@(o7-AA@M2@@Q W 2}-@@-( ;( | |I( | |W( M-A %2@52@};(}I-AM d-@@2#-@)(-F-A@6@\2@@`} d  -@2@6@,-@2( NB2H@D%$@jB2I@D%$@-AU}AP6@s2@@ ! 8-@6?P[2AP%@$H:,@_ s-@}@  /-@@( +-@/  /-@@( +-@/ T-@@(}:-@@6@P2AU@T xB2H@'B2I@9-@@A( }^-@ @6@t2AU@x rB2H@'B2I@9-@@A( X-}@6@n2AU@r !-@@( ! t-@0 '-@@0(}L-@Av@t2AP@+Av&,$?AB2HB2I %(}/2=-A}A ,(6-@16-6@(6-@1 -( X    )6-&@16-%?6-%?p]2$@}@@q6-@#@!@A3u (}-@.(A LITTLE HIGHER NOW!82F-A}J V6-@1c6-6@o6-@u(}5 -( X    )6-&@16-%?6-%?]2$@}@@q6-@#@!A 6u (}-@@.(NOT THAT HIGH!82F-AJ V}6-@1c6-6@o6-@u(}; -( X   %6-&@-6-%;6-%?pY2$@@@}m6-@#@!@A@Y-@'-@%@&/(U2$@%@@@}Y B2A@!(*=2A@@E(a2@P@@i(o2@0}@@EO-@'-@%@&/( 3 =2K-AO ^-@@(#-}@.( :-@E(  a2AP@@2@$@&@@@c-@ }  hl-@0@l(R      mO%}2@@@@@3-@ 7 IA@O(}r-AU@52@@@}N6-@&P:'@,ZAfA rA~A (}|? 22@+-A}/ ?2@tA @'AA29A@fP-@P6@f2@@}j t2N-@)@$( MISSED ME!2-A6 <(}J-AN L-@@"(OH YEAH}?0-A4 :(}H-AL lA 6-,-@6@:6-%?0X-@&P:,@}%P:,^-d(h l A @6-@6-@% A +6-76-@%A A M6-@}Y6-@c A m2s(}-A !6-@p6->!6-2@)2@@}16-%?6-%?M6-$@Y!Ag6-$?p}2@@6-&? A!6}-@6-?!6-K2@!6-%?)6-%76-$@K APA0i@@)!}-@)-6-A7( A( K A U( _( i A F( ( $ A 0( }MX<( F A l( ( % A 2(>( H A U(b(}l A /((/@@ (}B2H!B2I3AAPA-@E }a2A@@2@AP@@KAA8#-@' 9A@vG-}@K -AAU-2@@I2@@@e2@@@~6-@}%@$H:,AA -@6? -6-%@$H:,9AEAYB7a%}A(mB7c%AB7e%A`= AA--A1 =6-AHe-@@}?P12%A@?6-&?PKB2HWB2I[ e2B-A%A$H:," .A}B!AvAeo-A 2-@1@6@>-@E( k2A0&$@@}@o b-@@0#-@*( ^2+A&$@,$+ @ ,@@b d (}-}A@/2@>6-F:B7p,JAVAZ d2'AA2'A@f}-A gg31,1,0,15,29,0,1,5,30,-1,0,5,28,0,-1,8,30,-1,0,12,28,0,-1,8,31,1,0,12,29,0,1,6,31,1,0,7,28,0,-1,5b}b31,1,0,10,29,0,1,12,30,-1,0,4,28,0,-1,4,31,1,0,4,160,0,1,4,160,-1,0,4,160,0,-1,4,160,1,0,4,0&% #A06-@%6-}@+""Ap0: "-@-*(>:,26-%:6-%5B-@6@02A}@4 8 B AU:s-A #-@/AE2@ @I O(}a@@1s}-@1@?G (( !( +( 5(G@@DN-@6@&A}<2@ @@ N-AI` -@*(WHAT'S THE MATTER?8-A< H-@`( } N/6-@#@#@#@#@A-@%@T(I'M LOCKED UP!b-Af x-@%}@( Xw-A 12A@@S2@@p@@e@@1}s-Aw ]6-@b6-&@(APg' (}-@1@' A%&l? (( }!( +(5(? AEmQ (-@1@)(3( =(G(Q AEn}? ((!( +(5( ? A@o? ( (!( +(5( ? A@p}O-@1@(1-@1@;(E(O A@v#+%@,$AV%@tI+%@},$AV%@s@`o+%@P,$AV%@s@B2v@H AE{-@@16-+%'}@,$AVN-@s@p6@c%F:%&@,g {-@t@w4%F:%%@,  4}"@A0))+%@P,$AV%@s@-AP  AA@@2/2@}=-AA f-@6@&A @2$@%@D N2T(}fA @}-A |AR@)-@@;-@4@B(V-@@pZ `(~t}-@@px | ~6-@4,-@@6@2-;( R-@6@h2@@}l p ~6-%@b -@4@6@&--( D-@6@Z2@@^ b }AR('6.LOG(X)*.0234+SIN(X)' A06,6." > 3.14159265356 A096.S}QR(134.5^3+ATN(X!)' A09AR@;-@"@.6.THIS WILL TAKE YOU8 A0;(7(ANSWER:7(}"X > 3.372871983402362071*10^2093131-@"@'6. A LONG TIME1 A0-A @ (} -@}6?P,A<2@@  f-@@&#-@+( L2@@@$H:,P }f2@@*F-@'@*( 3+242B-AF 416-A6-@'6-@}1 A1616-A6-@'6-@1 A1716-A46-@'6-@1 A1816-AT}6-@'6-@ 1 A1916-@6-@'6-@1 A1>O-A6@62@}@@O6-Ar%@$H:,CB2HB2I HQ (}B2H!B2I-@?A}@M-@Q R-AU@/2A@S2@'@@@l6-@&P:}'@,xA!@A \C -($-@@5-@8P$H:,;(.? C fP-@}6?42AP&$@P2@A@kJ -(2-P:H:,$+'@,%?,8"}< @ J Ap"-@8P$H:,(. " z3-@0-(+-@/ 3 AY@42}-AA06@H2@@L ^B2Y@pB2X@B2P@bp -A @}`6@62@@: LB2Y@^B2X@pB2P@FV-@P6@02}@@4 >2JB2PVB2Qe-@ 6@1-A6@A2@E }I S2a-Ae -A+@#6. 567@,.=:,]67@<@,.7@<@,}v67@<@,.,AA-@@5(@ONE COMMIE DOWN...A6-ACM6-@W A2}[ f(@(@ ABOUT  TO GO36-@`6-@% A236-&@%6-@r6-@}% A29 22@+-A/ 9 @q +@!-B2HB2R'+ =-@}@R(@TO KILLq(@ A COMMODORE: A%AA"9@E,%$1-@}@1(@ <%6-F:A`,%AV$F:Aa,<-AE6@M-%@%@}7@$P:H:,$@,; MA@hM-%@%@7@$P:H:,$@,; MAA}M-%@%@7@$P:H:,$@,; MAA2]2@@52@@}@Y2@%@@@] _ 22@-2@?-@@_(@} $u -A@6@2&W2%+",$+F:B7p,'@,@@[ i6-&@}uA $Z2@@52@@@C6-%@%O-@(W(Z$FA}A216-@$@$@CAA6F$ s 6--@B:,&B2y0(7<,D6-@#@}U6-O:&@,iAU%@m p(s$ Y-@B:,+-A6@%A2@@E O(7<,}S V(Y$ AF:A,$A:2AP@V2@A@d-@P6-Av&}'@%$H:,%H:,! "B2HB2I "$ R -@@6@02@N2@%@@}R  -AA$  $ D:COMMIE2.BAStttttttttttt6@02@N2@%@@M,- PMBASPBBSKBBX@@$@ARBh }Bhd  PENCILSBY GREGG TAVARES (c) 1985, ANTIC PUBLISHING(,AF:A@},"+@, A@2.6-F:A@,&@.A&@<$6-F:A,$AV$ AF9 +@'0@}@9AY@bP[BBy-6-$AV%A$%@2A-APW%&@3}[ Z'A#@'B2w@d[B2H@@/B2I@@%@AB2PA[B2QA}%@n'B2V@'B2W@xKA@'AAP9A@KA@6}k-@!#A05-@?"Q%$@%k%AV%$@%?%$@%%}A7%$@%%Ah; ?  A-@# @,@/@5 }A@6-?:A6, F:B2y,"@A  0,0,0,00,1,231,300,3,231,310,7},231,310,15,231,310,31,231,31"0,63,231,31,1,63,231,3163,63,231,31@1,63,231,31J0,63,231,3}1T0,31,231,31^0,15,231,31h0,7,231,31r0,3,231,31|0,1,231,30+6-+-A@} #A-@??%%P:'@,%@+P:'@,%@,$@%II%%+@&P:'@},,%@+P:'@,%@,$@% "%%%A%%%AW%@%%%A}i%@H%%%A% %%@@   $ 0,0,0,0 0,0,0,0 2,2,0,2 4,4,0},4& 6,6,0,60 8,8,0,8:10,10,4,10D10,12,6,10N10,12,4,10X10,12,0,10b10,10,0,10l 8,8,0,8v } 6,6,0,6 4,4,0,4 2,2,0,2 0,0,0,0 0,0,0,0)AG)AH'AV1AP1}AQ'AV%@1Ab1Ac'AV%@1Ah1Ai'AV%@}1At1Au'AV%@$ #A-@@Q"A5%  55}@$AV%@%@@%@55@$AV%@%@@$@ 55@$AV%@}%@@%@*55@$AV%@%@@$@455@$AV%@2%@@}%@>55@$AV%@2%@@$@H55@$AV%@2%@ @%@R55@}$AV%@2%@@$@\55@$AV%@%@@%@f55@$AV%@%}@@$@p$z]]104,165,204,205,11,212,208,251,162,0,189,0,33,188,0,32,141,10,212,141,26,208,140,19,208}\\189,0,31,141,18,208,189,0,34,141,20,208,189,0,35,141,21,208,232,224,192,208,218,76,1,6D1:PENCILS.BAS@@}189,0,31,141,18,208,189,0,34,141,20,208,189,0,35,141,21,208,232,224,192,208,218,76,1,6D1:PENCILS.BAS@@9:INITEXPLMAINCOORD1COORD2TODELAFRFRTUTUEXP)))FccYYYYBf@w}GeB3@VvWG @  ************************** * GRAPHIC VIO}LENCE DEMO * * A.N.A.L.O.G. COMPUTING *( * BY TOM HUDSON *2 **************************<F88*** }INITIALIZE THE GRAPHIC VIOLENCE SUBROUTINE ***P BZd##*****************************n##** YOUR PROGRAM GOE}S HERE! **x##*****************************!!***************************!!* GRAPHIC VIOLENCE DEMO *!!* } NUMBER 2 *!!***************************??*** SET UP GRAPHICS 7 FULL SCREEN AND EXPLOSION COLOR ***/}+@%@/0@@@*** DRAW THE 'GROUND' ***= @!-@@-,9/A}Y= 22*** TRAP ANY ERRORS TO 'THE END' ROUTINE *** A 66*** RANDOMIZE START POINT FOR DROPPING BOMBS *}**9"6-@%H:,$AI96-H:,$@***** ADVANCE THE BOMB AS IT DROPS ***! ,!6-}%@99*** IF THE BOMB HITS COLOR 1, SET OFF EXPLOSION ***"1 1"@'6-?:C:,<<,1 AP,##*** }NO HIT, CONTINUE DROP ***65 @,'-@@+ 5 Ap@*** 'THE END' ***J9+@%@/0}@@@9@T*** PLOT 'THE END' ***^; #A!-@@"+"1,7/; h++}*** SET OFF 300 RANDOM EXPLOSIONS ***ru-@AY6-?:C:,<@@%H:,$@u<@ %H:,$@U },m-@@@q u |66*** LET EXPLOSIONS DIE, THEN RE-RUN THE DEMO ***%-@A % A }*** 'THE END' DATA ***gg50,25,67,25,59,25,59,45,72,25,72,45,72,35,88,35,88,25,88,45,93,25,93,45,93,25,109,25,93,35,109, }35ff93,45,109,45,50,50,50,70,50,50,67,50,50,60,67,60,50,70,67,70,72,70,72,50,72,50,88,70,88,70,88,50UU93,50,93,70,93, }50,102,50,102,50,109,56,109,56,109,64,109,64,102,70,102,70,93,70'''*** INITIALIZATION SUBROUTINE ***'F<;@A,;@) },;AU,;@,;@,F#B$'_6-#-@@'"/6-%=67<,.>:,A MA}\( COORD1 ERR_.'_6-#-@@'"/6-%=67<,.>:,A MA\( COORD2 ERR_8']6-}#-@@A'"/6-%=67<,.>:,A MAB7Z(INIT ERR]B']6-#-@@)'"/6-}%=67<,.>:,A MA!Z(EXPL ERR]L']6-#-@AU'"/6-%=67<,.>:,A MBf}Z(MAIN ERR]V'*** SET UP PLOT BITS ***`'KAhA'Ai@H9Ap@KAq@j'}<<*** INITIALIZE GRAPHIC VIOLENCE ROUTINE AND RETURN ***t'..6-?:C:,>42,133,208,165,207,10,133,207,1"}65,208,42,133,208,165,207L;7724,109,9,6,133,207,165,208,109,8,6,133,208,165,88V;::24,101,207,133,207,165,89,101,208,133,2#}08,173,6,6,41`;223,168,190,32,6,142,10,6,173,6,6,74,74,24,101j;99207,133,207,165,208,105,0,133,208,160,0,173,4,6,208t;77$}11,173,10,6,81,207,145,207,169,0,240,132,173,10,6~;))73,255,49,207,145,207,169,0,240,241D1:VIOLENTD.EMO6,208t;77s DESTTCRTADDMDDDSCDCK &} SHUFFLE.BASBY CHET WALTERS (c) 1986, AN'}TIC PUBLISHING+F:,@w+%D:DECKLOAD.BAS :" $ :1,2,4,7,10,20,1920,100008 6-%(}#6-?:A6<6-B Z2"6-%  $"( 2 @d %ii643,643,643,637,637,637,-643,-643,-643,-6,}37,-637,-637,3,3,4,760,760,760,760,800,-4,-4,-4,-4,-4,-760jj-760,-760,-760,-800,643,643,643,643,643,645,-4,-4,-4,-4,-4,-6-}37,-637,-637,-637,-637,-637,-4,-4,-4,-6mm0,20,3840,-20,-3840,3840,-3840,20,3820,-3840,3860,-3840,3820,-3820,-20,3860,-20,.}-3820,-20,3840,-3840,20ll3820,-3840,3860,-3840,3820,-3820,-20,3860,-20,-3820,-20,3840,-3840,20,3820,-3840,3860,-3840,3820/},-3820FF-20,3840,20,-3840,303,3200,14,-3200,309,2560,8,-2560,316,1920,-1==640,-3845,640,-3845,640,-3845,640,-3845,6400},0,-638,0,-1'T6-P:I:,',;$,/AF:A@,DAF:AA,L!%T6-%'KAA#1}-<67%,.>:F:Aw%,,@ K$'C -)&% >6-?:AI<&<>104,145,96,150,96,150,88,155,88,155,80,158,80,158,72,160VV144,76,142.5,94,142.5,94,140,108,140,108,135,122,135,1!<}22,126,137,126,137,120,145LL120,145,114,151,114,151,108,155.5,108,155.5,100,158.5,100,158.5,88,160XX156,88,153.5,112,!=}153.5,112,150,128,150,128,144,144,143,144,136,156,136,156,124,168BB124,168,112,176,112,176,102,179,102,179,96,180,96,180,!>}88,180VV194,84,194,92,194,92,198,112,198,112,208,130.5,208,130.5,216,141,216,141,224,148%%224,148,232,152,232,152,240!?},154HH184,84,186,104,186,104,189.5,120,189.5,120,196,136,196,136,204,14855204,148,216,160,216,160,228,168,228,168,240!@},172UU182,122,184,132,184,132,188,140,188,140,196,152,196,152,208,164,208,164,220,172 @h@0"@h!A}A6@ FILLJ6-' ",-'6-%@Ae@++@@!B}S:dd144,13,144,76,144,76,142.5,94,142.5,94,140,108,140,108,135,122,135,122,126,137,126,137,120,145!C}ZZ120,145,114,151,114,151,108,155.5,108,155.5,100,158.5,100,158.5,88,160,88,160,88,180""160,16,160,176,184,21,184,84!D}HH184,84,186,104,186,104,189.5,120,189.5,120,196,136,196,136,204,14855204,148,216,160,216,160,228,168,228,168,239,171!E} @ A"@ A(  *** MACHINE LANGUAGE ***  -AY@4)-@A!F}-  %-AdAs"!%  ((232,142,10,212,142,24,208,76,128,6 (?:Ad,$ $D1:FANCY!G}ATR.LGOd* A @PA@AA ******   <XYTIM !!GRAPHICS 9 GTIA DEMO (OVAL) +@ 5I}(#6-#0@2-@9<-@F76-@9&6-@&7P:M:$%$5J},'@P,P ,Z,@y&d,A&n,@y&A&x  )6-%@!@)65K}-0@-@A  A@D1:GTIA9GRP.DEMEMO (OVAL) +@ 4`  JX@@A@'@@i@@rWWfrom ANTIC, the ATARI RESOURCE, 9M}600 18 ST., SAN FRANCISCO 94107 from V. 2, #177DEMO PROGRAM TO SHOW GTIA MODES WITH TEXT WINDOWS66THE PROGRAM DRA9N}WS RECTANGLES IN THE 3 GTIA MODES..AND PRINTS MODE/COUNT IN THE TEXT WINDOW((OPTION = ADVANCE TO NEXT GTIA MODE9O}SELECT = CLEAR SCREENSTART = FREEZE OR RESTART BB@d+@33F:A`,%AV$F:Aa,%Af9P}AC%-AhA"!% ('AA2'A@23BBA'@@ 9Q}36-@<KA'A@&9A@TKA@FKAA'A A09R}9AAKAAP]=A@%A"$+"@,%@$+"@,QA#@d$]6-9S}Z66+@%@$+@,,$H:,%@dG%6-P:@r$H:,,%@G6-P:@r$H:,,%@9T}nG%6-P:AD$H:,,%@G6-P:AD$H:,,%@x;,%@/%@-/%@;/9U}%@ ,///B6-%@#AR@B  MODE=%@ #&6-F:B2y,&"9V}@@W@w! @+ AM6-%@&@$+"@,W @/ @ A9W}%6-/ @1  **** FREEZE ****--@A1  F:B2y,@A7@w9X})-@@P- 7 @4 @>:A%,--@A1 4$72,141,15,212,141,10,212&&179Y}3,192,2,69,79,37,78,141,26,208169,0,141,27,208,104,64D1:GTIAMODE.DEMrWWfrom ANTIC, the ATARI RESOURCE, 8S./~YTOYSTARDLMEMTOHIGLOCNADRADRSADRSXBhdBhdBcRBcQABABh$A[}AD @ Ad REFLECTBY DAVID PLOTKIN, (c) 1985, ANTIC PUBLISHING AF:A@,A\}9+@%@'A 9AL*6-F:A,$AV&@$A$06->6-&AL6-&@A]}\6-P:'AV,$6-&$AV0AA<ABHA\%@Ah%@A+%A^}@@y<6-P:'AV,L6-&$AVZ%@h%@W@@/-@A=A_}%@A W6-%@$@@@-AA@06-P:'AV,@6-&$AV1%@y!%A`}%@1%%@$6-&@@ .T%A@e(6-P:'AV,86-&$AVF%AT%AAa}8?A`Aa-A A?BBr@4B @>:A%,L)-@A@Ab})@V;-A@+,@7/; `M )-A@=,&@@Ac}I/M j  AD1:REFLECTG.RAPBhdBhdBcRBcQABABh$@>  5DXYDELA@@@ !!*** SNOWFLAKE GENERATOR ***BY TOM HUDSONEe}(2""SET UP GRAPHICS MODE, COLORS<F9+@%@/0@9@PZ$$SET UP DEGRF}IJ(CIOBFCFIAMVTITLDECSCBDCBYTETYPDRIVN@%g} %q}B%DOS SYSB*)DUP SYSBSAUTORUN SYSBVMENU BpsCOMKILL BASBPENCILS BASB)BOMBDEMOBASB%SHUFFLE BASB4FANCYATRLGOBfDECKLOADBASBTITLE PICBROYAL DCKB(aMATHART1BASBHGTIA9GRPDEMBLGTIAMODEDEMB)MATHART2BASB ZREFLECTGRAPBdSNOW BSWIRL BASBTICFLIPGRAPDECKLOAD.BASBY CHET WALTERS (c) 1986, ANTIC PUBLISHING A@w A) BA;A,;%r}AP,Q6. D:TITLE.PIC @0"(;(LOADING 7@,E BQ6-@l A(+(DURING SHUFFLE,%s} PRESS:.(K(٠ TO PAUSE DISPLAYl( FOR MAX DELAY ON/OFF(k)(! FOR VARIABLE DELAY ON/OFFD( %t} TO RETURN HEREP"k(ŮàԠ2D6-@6--6. DECK FILES:0(4(7(D6.D?:*.*7%u}O @@267@<@,.=:,O@@<u@+7@<@,4DCK=@%v}@7W( 7@<@ ,i@@9u6-@F @`P< @@$"26-%%w}@< @UUe@"(5( NOT ON THIS DISKW(INSERT PROPER DISK-HIT [e @0Ze( %x}(.( PRESS FOR ANOTHER DISK ORJ(ENTER CHOICE OF DECK ASa(IT APPEARS ABOVE-e_B:, @@Pd %y}@567@<@,.7@<@,D67@,.]67B:,%@,..DCKi6-@@%z}@ B n#AY# B0xVAY@4#AP&6.:-@@>"R6%{}7B:,%@,.V g67B:,%@,.+67B:,%@,.?6. D:SHUFFLE.BAS\@@g@%|}($6-?:C:,NDDhhhhׅՅhPhh٩ %} ɀ)ѩқHNDD  LQ եؑ`&צ` ("RNEE ׆ eԅ˥i%}ЯL%م`ͅ˥΅`RR!!LOAD PIC INTO BUFFER STRINGRi@6-Av&6-0#BM%}@@i255,128,201,199,26,0,1,14RN-@@$)@7C:,%&@;"AD'N %}B@Rt )@(-@@5)@9 M-@Z)@c68,-g t)@&R%}N-@@$)@( 46-8N6-$AV%AU0R>*6-?:C:,<@<@"%}B`:Rb68@,-%)@468@,-H-@U)@^68,-b DR@%}$UUSET UP DISPLAY LISTU F:@,"@B UC +@$C6-?:C:)h0˭1ȱA`8N%},,V9%6-F:@,%AV$F:@,($9SCREEN IS HEREYYDUMP PICTURE TO SCREENY,-@(%}A%8,, Y*'6-?:A6<<&@UPQTNذ A+ àUPTQTKA/UQP@QTM)EP-} 0U@QTNA>0*U@UQTH(@ : @UQTAQE¥@UQTKDp0PUUQTL ! >*TUUQT@"Q@c$:D -}UUQT@(A*UUUQTBc&*2UUQT@QHɌ**TB 4s `2`TBUɌ`AT@U@c&G4UAT-}BUUP>UUATAUUTc& :2ceLATAQUUɌ`aQ,ATAQTU4sC2c$T\ATAMP@ɌUATA8TU@c& G4%UUATA!UU-}P``UATA0URPc& 2c%EATA"UETɌUATA3UT4s@2cQUATA4QXTɌ``U ATAUDRTc& G4UUHATAUUXT-}U,ATA@UTc&2cTqATA5TɌUEATA8ET4sI 2cUUEATA1PYPɌ0UUATA UUc&G4UUTA2UPɀ-}UTTA#T& 2c URT@ 0TJs@2c!EJTEUUZɀ@bTEUUUZ& 4DA(TEUUPVΪET-}EUU@&2`H1TEUUj JTEUTZ2@QEATEUTV0(!TEUTU A4TETUT 0QhqTEP-}EU+AKTE@@U 0A'TE@UJEJ 4TE{BA{TE߫B(CKTE@EB'TE@@-}hPTEPGR{1TETWDUSUATEUTUʨ)USUQTEUTUJ"UPUUQTEUTU{UBQ(UUUUQTEUUUUURUU-}UUUQTEUU@UUUPUUUUUQTEUUPUUUUTJ%UUUUUQTUUUUUUUUUUUUU@TTUUUUUUUUUUUUUUUU@TU@PUUUUUUUUUUUUUT-}UUUUUUUUUUUUUUTUEUUUUUUUUUUUUUPUUUUUUUUUUUUUUPU@PUUUUUUUUUUUUU@UUUUUUUUUUUUUUUUUU-}UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUiZU@UUUUUUUUUUUUUUZUPUUUUUUUUU-}UUUUVUeUPUUUUUUUUUUUUUUUUTUUUUUUUUUUUUUUiZVUTUUUUUUUUUUUUUUUU@TTUAQT(*UUUUUU@TEU@T *UUU-}UQTEUEQD("UUUZQTEU@ UUUjQTEUE@( *UUUQTEU@T**UUVQTEUO(UUZQTE]UUjQT-}EWUPUUQTEU@AUU@*!UUjQTEU@AUUUUUZQTEUEUUU**!UUVQTEUEUUT"UUUQTEUEUUPUUUjQTAUE-}UU@"UUUZQTLUEUP** (UUUUQTOEUUUUUUUQTJEP**UUUUUUQTOE@@"UUUUUUQTNPUUUUUUATJ^UP"-}UUUUUU1TNPU** (UUUUUTTOTUUUUSTJF@U**UUUJTOU@"UU>TNPTJ^UP2-}TNP>* @UTTTOEU? QUUTJFUQ*EEQĊTOUUUSDUQXDTNEEPAUPĵTJ^`DCEUTT-}NUFQTO%VDD`TJFEQ?E@TOUETEUTTNTE3?|UVATTJ^TAU=TQTNU-}Q3QUTOQ@?DEQTJFT ?XTOEVDUPľTNUDQ TTDTJ^UPOAQQľTN%EU-}UUUTOEQQC@EUTTTJFUUE@*@UQTTOUPDDTTN@*DU@TJ^TTTTTNUUPDU-}PTOUUU@"UTTJUUUU@** T@TOUUUUU(@UTTLUUUUUU**@UTTAUUUUUU"PT>TEUUUUUU@DQJT-}EUUUUUU"PDQPTEUUUUUU** @UDQTTEVUUUU(UDQU1TEZUUU *UUDQUATEjUUUUUDQUQTEUUU UUDQUQTE-}UUHUUUDQUQTEUU@* UUUAUQTEjUUHUUAUQTEZUUBUQTEjUUR _uQTEUUP"(UQTEUUP -} PUQTEUUUP(QUQTEjUUUT*@UQTEZUUUT(EQUQTEVUUUUT @UQTUUUUUUT( EAU@T-}TUUUUUUUUUUUUUUUU@TUiUUUUUUUUUUUUUUTUfUUUUUUUUUUUUUUUTUYUjUUUUUUUUUUUUUPUUUUUUUUUUUUUUUPUiUUUUUUUUUUUUUU@-}UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU-}UUUUUUUUUTPU@UUUUUUUUUUUUUDPUPUUUUUUUUUUUUU@UEUPUUUUUUUUUUUUUDUUTUUUUUUUUUUUUUTPTUTUUUUUUUUUUUUUUUU@T-}TUUUUUUWUUUUU@TETUUUUUUWUUUUQTEQ@UTUUQTETUUUUUUWUPUUQTEUUUUUUWU@UQTEU@UU@-}UQTEUUUUUUTTU@UQTEUUUUUU#U@QTEUUUUUVEP@QTEUUUUU^ATQTEUUUUUn@QTEUUUUUo,U@QT-}EUUUUk눁U@QTEUUUUU@QTAUUU_ިUATQT@UUU].!UEP@QTLUU_ޫUU@QT@UUPUU@UQTOUU-}@興UU@UQTL+3/.,UU@UATD UUPUU1TL+303.UUTUTTOUUUST@G33".,0UUU@TO -}UU(1TL+3033""3TD81TL+P13>". @UTTTOEU?QUUT@GUQ"0EEQTOUUU0UQ-}XD1TL+EEP3/0UPTD`1UT1TL+U30ƕQTO%V`T@GEQ3?CE@TOUETEUT1T-}L+TE3?|UVATTDTAU=TQ1TL+UQ3@QUTOQ? EQT@GT 3?3XTOEV UP1TL+-}UL3 TTDTDUP QQ1TL+%EU3/ UUUTOEQQ ËEUTTT@GUUE@2"@UQTTOUPLT1TL+@"-}.,3TD 1TL(UUP"30TOUUU@ 8T@UPUU@"".3TOU@UU 1TLUUUU""0-}30TAUTUU81TEUTUU""+UU@TEUTUU UUPTETUU""UUT1TEPQUHwuUUUTE@@AUB"*UUUAT-}E@US_UUUUQTEUB"_UUUUQTEU8UUUUUQTE@T"".UUUUUQTE@@ATUUUUUQTEPQP"UUUUUQTET-}UPȮUUUUUUQTEUTUPCUUUUUUQTEUTUPUSUQTEUTUUUUUUTUQTEUUUUUUUUUQTEUU@UCEQTEUUPUUDDC-}UUUUUUQTUUUUUDDCUUUUUTU@TTUUUUUUUUUUUUUUUU@TUPUUUUUUUUUUUUUTUDUUUUUUUUUUUUUUTUQUUUUUUUUUU-}UUUUPUUUUUUUUUUUUUUPUPUUUUUUUUUUUUU@UUUUUUUUUUUUUUUUUU-}UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUiVUU@UUUUUUUUUUUUUUYVUPUUUUUUUUUUUUUVZUPUUUUUUUUUUUUUUVUTUUUU-}UUUUUUUUUUiUVUTUUUUUUUUUUUUUUUU@TTW*UUUUUUU@TEW UUUUQTEWʪUUUZQTEUʪ-}UUjQTEUUUQTEUUVQTEUWUUUBUZQTEU_UUUJUjQTEUUUU EUQTEUUUT*a Uj-}QTEUUUT@.UZQTEUUUP(?VQTEUUUB/UQTEU_UUJ3roUjQTAUUU_[UZQTHUU}UW#27[UUQT-}JUUUW ʌVUUUUQTJUUU_3*EVUUUUQTJaUUU([UUUUQTI_2[UUUUATF? roUUUU!TI?<*3̡oUUUTTJh?-}(7![UUURTJ??#2UUUITJj0 ʣpUUUU*aTI?3((UTUTTF? 4UQ@*aTI02rUQETJh? 3-}̠PTJ0 (7(AP)TJj?#2EaTI0  ʣpDQ0TF?3*P0*aTI04UTLTJh?25-}UDTJ? =U)TJj? 0=WUTaTI??W_TF?37t*aTIU|* 0TJhWU| ?T-}JUT\2?)TJj1U4? aTI TT3*?TF E ʣp0 *aTIQ#2?TJhAT(7(0 TJ4-}@ 3̠?)TJjQEU2r? aTITEUT40?TFUUT3((?*aTIUUUUT ʣp? TJaUUUV2?TJUUUZH-}7(?)TJUUUoJ3̨tEQTEUUUV ϧA@QTEUUUj*.}31@QTEUUV E@QTEUUZ&r0U@QTEUUh *A@QTEUU3*EQTEUVʅUUQTJwN03 U.}UQT@ ¨U@UQTA#T&34TUUQTA2UP̨*UUUUQTA UUc.3C UPUUQTA1PYPɼUSUQTA8ETtw@r42SUAT. }A5T ʸ*P1TA@UTo&C.JP??TAUUXTC?TAUDRTc0240TA4QXTɼʸ*1TA3UTtwF#.CJcUUT@A UUaT@*Bc*40sGtUUATL E ØUUATL4pC"oUUEATCQA  TEAT. }@0*C 42r>cPqATL0 @8ȐT,ATOEC.(GtUUHATCU ATL*F42(oQUATL< ʸȑUATL.}SC.r>c%EATO  UATO*24#Gt%UUATOJʸØUATLR.C0ro$T\ATAUT+Q,ATEUTU*43.}>ceLATEUUUJ̸ЛUUATEUUUURC3*3GtUATEUUT˃ATEUPU*3r`TEU@UJ TEUUR3">.}UQTETQR UUQTEPAT30sD)UUQTE@U* UUQTEQ;30*UUQTE@LǪUUUQTEPA0*UUUQT.}ETQ;?UQTEUUUQTEU@UL_WUQTEUPUQ{(UQTEUUUUUJWUVUQTEUTUjϰ^[ZQTAUU[OjQTLV+uQTOZ>;檪QTOjuQTO.}OjQTOP<[ZQTO< />UVUQTL*D+ϺUUUUQTCQUUUjUQTLE˼UUZUQTL< QM><UU.}VUUQT@*O»ϼUUUUUQTCQE9UUUUUQTOQ4pϸUUUUQTL E>蘁UUUUQT@*QBo亻D UUUQT@E*.*UUUQT.}BQ@o; UUUQTJ*>UUQTJ twb@TJUBaTJUAo{sGt*UaTJUUPD> UUaTIUUT.}oϷoeLaTIQUUQ,aTIQVUtwK{ro$T\aTIMYDUaTI8VU@oʻGt%UUaTI!UUPʮUaTI0URPoʫ.}{ro%EaTI"UETUaTI3UTtwKoQUaTI4QXT꣛U aTIUDRTo˻GtUUHaTIUUXTU,aTI@UTo˻o.}VeqaTI5T>UEaTI8ETtwKϲoUUEaTI1PYPUUaTI UUo˻GtUUTI2UP3AUVTI#T ˻oUZT.}@@D TEUUT*wBoJTEUUUEjTEUUUPʻtQTEUUUTETEUUUUB&+>oQJ1TEUUU.}UP.> EjTEUUUUU;ϺlQETEUUUUUP/>RTEUUUUPQj1TEUZUUUϰETEUjUUU.}J1TEUUKj. }P31TEZSϰUSUATEVV USUQTEUUK*UPUUQTEUjUUUUBUUUUQTEUZUUUURUUUUUQTEUVUUUUP UUUUUQT.!}EUUUUUUT*UUUUUQTUUUUUUUTUUUUU@TTUUUUUUUUUUUUUUUU@TUjYUUUUUUUUUUUUUUTUjUUUUUUUUUUUUUUTUe."}UUUUUUUUUUUUUPUjUUUUUUUUUUUUUUPUjYUUUUUUUUUUUUUU@UUUUUUUUUUUUUUUUUU.#}UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUPU@UUUUUUUUUUUUUQPUPUUUUUUUUUUUUUPUEUPUUUUUUUUUUUUUQ.$}UUTUUUUUUUUUUUUUUPTUTUUUUUUUUUUUUUUUU@TTUUUUUUWUUUUU@TETUUUUUUWUTUUQTEQ@U@UQT.%}ETUUUUUUWUUQTEUUUUUUWUUQTEU@UEQTEUUUUUUTTA@QTEUUUUUUR+@QTEUUUUUUR@QTEUUU.&}UUUR">"@QTEUUUUUUHA@QTEUUUUUUB*""UEQTEUUUUUUJUUUQTAUUUUUUB"""UUUQTLUUUUUUUU@UQTOUUUUP*.'}""UUTUUQTJUUUTUUUUUUQTOUUUPD"""UUUUUUQTO0UUU@A3UUUUUUQTMB""UUUUUUQTO<1UUUUUATOUA4" UU.(}UUU1TJUUPp@UUUUTTOEUTA" DUUUSTO<%PTDUUUCTMTT" TO<QEUCuD+qTOEQ@= p@P}UUD ́UUrUQTEZUU2UUUQTEjUTE UUϾUQTEP*UUUQTEjUEP UUU|=UQTEZUPUUU_TEUVA(Q)ó̿1TL EÅÿ.H} TVÒó?TJ1UÚTJUT^@(?TJTU~(UFi̼TK>U~iDj(1TL?(T.I}K><ó̳TJ?ÁUÿ3TJÔDUBóTJ3?Æ?>(T_1TL?(iTUTTK>3.J}iUJ(UTJ3(jUDTJ??ÔUTLTJ?ÀÕP0TK><3ÐJRÔDQ01TL3ÄhBETK>?.K}(APTJ3?(@iPTJ3>UTUTTL?3ÄUUUUUUUQTL.V}쨪UUUQT@)Q캻*UUQT@*iC*画*UUQTBA+ UUQTBC.*TI> TJiUC.W}ӫaTIUA˺{s<*UaTJUPD UUaTJUUT˪eLaTIQUUQ,aTIQZU>ʪ{r$T\aTIM^Dӫ.X}UaTI8ZU@ʪ>%UUaTI!UUPʪUaTI0URPʪ{r%EaTI"UETϼUaTI3UT>ǷQUaTI4QXTU aT.Y}IUDRT{>UUHaTIUUXTުU,aTI@UTǷVqaTI5TϼUEaTI8ET?ǷUUEaTI1PYPުUUTI UU.Z}{>UVTI2UP<AUVaTI#T ǷUiT@ϼDaTJ*ªTEUUJAFbTEUURʪ.[}/>iTEUUT;Ϊ;EhTEUUU**;.R1TEUUU@>EbTEUUUU*;QTEUUUUJ/hTEUUUUP;1J.\}?1TEUUUUU(.fbTEVUUUJ+ETEZUUR Ph1TEjUUT J??TEUUUB)TEUURhCT.]}EUUPBC?1TEjUUTbS?TEZUUT*)P1TEjUUU*PjUSUATEUUU BuSUQTEUUUJcPUUQTE.^}UUUUB)UUUQTEjUUUURUUQTEZUUUUPUUUQTEVUUUUUTbUUUQTUUUUUUUT uUUU@TTUUUUUUUU._}UUUUUUUU@TUjiUUUUUUUUUUUUUUTUUUUUUUUUUUUUUUTUejUUUUUUUUUUUUUPUUUUUUUUUUUUUUUPUjiUUUUUUUUUUUUUU@UUUUUUUUUUUUUU.`}UUUUUUURTJUUUUUi?UUUCTJUUUUVBT:@4,/ 6-C:,+22h}[AR@#( }PRINTER:&(0(pson@( tar/GeminiI(oneL([( Choose One4AdAU5.F:Ad,2i}"@B$6-@$. @X6.F:Ad,"@b$6-@. @X7.F:Ad,"@5$6-. @X82j} @S:5AdAU!6-@+ @`5+@;6-@<# B+%@# APF @2k}P-A@Z>"@46-?:<<<AY<<@,> A_,/AYd2l} n&&DETERMINE AN AXIS FOR SINE CURVEx+%@H AP}6-P:A$H:@,,**DETERMINE AN AMPLITUDE F2m}OR SINE WAVE&&KEEP IT WITHIN SCREEN BOUNDARIES6-A&  6-  6-+6-P:$H:@,,+ 2n}@A%%%DETERMINE PERIOD FOR SINE CURVE%%6-P:A$H:@,%@,DETERMINE A PHASE SHIFT62o}-@($H:@,DETERMINE COLOR6-P:H:,$@, DETERMINE A SPACING FACTOR%%6-P:@$H:@2p},,%@PLOT PICTURE",-AY66-$+G:'&,,%@,"@"6-?:<<<<<,, A2q}@J ,/T ^''WAIT FOR USER'S CHOICE OF OPTIONScD+%@2 AP'( }ontinue1(rint:(a2r}veD(uithAdAUr?F:Ad,"@*AdAU4 A ?CONTINUE|>F:Ad,"@G*A2s}dAU4+7>QUITKF:Ad,"@b*AdAU4 A KSAVE AS MICROPAINTER<F:Ad,"2t}@*AdAU4 A<PRINT Ap&&SCREEN DUMP FROM ANTIC, JAN 19847"-(}NO PRINTER2u} SELECTED!7 AUj@.@@P:j(@>:@',>:@d,>:@',>:@Q,2v}>:,+%@H AP$$SET LINE SPACING AND MAKE LOOP #A`--@@")67<,.>:,- 2w}27,76,192,3?6.>:,*67A d,.>:,967@,.?6.167@<@,.167@<@2x},. 6-C:,6-C:,M%6-F:A`,%F:Aa,$AVM6-F:%@,%+F:%@,,$AV/-@92y}/6-A$@@%%26-?:A6<<<,% @2 @ @ AU #Ap&%-A2z}6AF"!% 0$:33104,104,133,204,104,133,203,104,141,192,6,104D//141,191,6,104,141,194,6,104,141,193,2{}6,169N111,133,207,169,191,133,208,160,0,177,203,141X00190,6,165,207,240,28,169,0,133,207,173,193b,,6,24,105,4,141,192|}3,6,133,205,173,194,6l++105,0,141,194,6,133,206,76,95,6,169,1v..133,207,173,191,6,24,105,4,141,191,6,133..205,173,12}}92,6,105,0,141,192,6,133,206,32))137,6,32,146,6,32,160,6,32,137,6,32//169,6,32,160,6,165,207,240,177,56,165,203222~}233,40,176,2,198,204,133,203,198,208,165,208--201,255,208,151,96,173,190,6,41,3,10,1000170,96,160,0,189,195,6,145,2052},232,200,192,,4,208,245,96,173,190,6,74,74,141,190,6++96,160,0,189,195,6,10,10,10,10,24,11344205,145,205,232,200,2}192,4,208,238,96,0,0,0,0,0,,0,0,0,0,10,5,10,5,10,0,5,0,15,15,15,15K"@K6-?:C:/h0Э1ѠNР2}ON͐W`,,]A@'A A9AA6KA@V]AR@4YYMOVE P2}LOT & DRAWTO ROUTINES INTO RAM, DELETE BOUNDS CHECKING (COURTESY DAVID SMALL)>CC6-?:C:3h|}K~}&2}~ʎA~}}}`,,H$-AR)(}SAVE FILENAME-B:, @A 0]]+7@<@,4D2}*+7@<@,4:)7@<@,4:,,)4C:A @! 6.D:67@,.!6.;+%@H AP;62}-F:A`,%F:Aa,$AV5 A @5@@%%6-F:A`,%F:Aa,$AV}2}6-AH#%@@<%@F:%@,U%@F:%@,i%@}%@ @02}6-?:C:hhhLV,<@,A*@F:A,--AA=*@F:,A "@ B" AU2}D1:MATHART1.BAS0,,0,0,0,0,10,5,10,5,10,0,5,0,15,15,15,15K"@K6-?:C:/h0Э1ѠNР0EES, X AND Y TABLESdn))9@,9@,9@,xRANDOMIZE SHAPEr-@@&6F}8,-@68,-H:,$@\68,-H:,$$@` r@wECHO AND ROTATE SHAPEF}t,A`@)-@@t/A`%+8,$E:8,,%8,$G:8,,,@%+68,$G:8,,%8,$E:8,,,86F}8,-8,%@` 88@, A`A*-@@&68,-* t,A`@)-@F}@t/A`%+8,$E:8,,&8,$G:8,,,@%+68,$G:8,,&8,$E:8,,,868,-8,%@` 88@, AF}`A  LEAVE IT ON SCREEN A WHILE-@AP %D1:SNOWBY TOM HUDSONDg  ]XY@@@PA@`A)q"0RVF @ 86-6J}-@50@@@8%6-@6-@P%+@# ,(-@A@2)6-%J}@!@P)6-@<6-'@6-F6-$E:,6-$G:,P% A@Z ,%%d$$J}0|PR1PR2HDADRAMODLINAXIMAMAMPEPHHUFDGFACTJNMIPRPRDSCPICSTMG1DIG>} >} ''ARTISTIC MATHEMATICS, LI>}STING TWO""BY MARIAN LORENZ/ALLAN MOOSE (c) 1986, ANTIC PUBLISHING(w +@AAH*(@5(@>}@(@Z(@ ARTISTICw(@ MATHEMATICS)'(@'(@ part ii**(BY LOREN>}Z/MOOSE*AR@+)()( (c) 1986, ANTIC PUBLISHING, A@-11;A d,;A d,;@,;@B>},.T46.*h`h\h[hhZhVhUhhThh!L|T67@9<@9,.>:@4,/ 6-C:,+2[AR@>}#( }PRINTER:&(0(pson@( tar/GeminiI(oneL([( Choose One4'AdAU'A5.F:A>}d,"@B$6-@$. @X6.F:Ad,"@b$6-@. @X7.F:Ad,"@5$6-. @X>}8 @S:5AdAU!6-@+ @`5+@;6-@<# B+%@# APF >}@P-A@Z>"@46-?:<<<AY<<@,> A_,/AY>}d n&&DETERMINE AN AXIS FOR SINE CURVEs++%@2 AP+ARx0,(#}WHERE DO YOU WANT THE AXIS >}(0-191)0z# 6-!@#6-A&**DETERMINE AN AMPLITUDE FOR SINE WAVE&&KEEP IT WITHIN SCREEN BOUNDARI>}ES@.(}WHAT AMPLITUDE DO YOU WANT (0-)2@!AP%%DETERMINE PERIOD FOR SINE CURVE-( }WHAT PERIOD>}- @ApDETERMINE A PHASE SHIFT( }WHAT PHASEDETERMINE COLOR( }WHAT COLOR>}6-@($H:@, DETERMINE A SPACING FACTOR( }WHAT SPACING @A@PLOT PICTURE">}+%@H AP,-AY66-$+G:'&,,%; @Y@,"@"6-?:<<<<<,, A@>}J ,/T ^''WAIT FOR USER'S CHOICE OF OPTIONScD+%@2 AP'( }ontinue1(rint:(aveD>}(uithAdAUr?F:Ad,"@*AdAU4 A?CONTINUE|PF:Ad,"@G*Ad>}AU<@@F+IPQUITKF:Ad,"@b*AdAU4 A KSAVE AS MICROPAINTER>}<F:Ad,"@*AdAU4 A<PRINT Ap&&SCREEN DUMP FROM ANTIC, JAN 19847"->}(}NO PRINTER SELECTED!7 AUj@.@@P:j(@>:@',>:@d,>:@'>},>:@Q,>:,+%@H AP$$SET LINE SPACING AND MAKE LOOP #A`--@@")67>}<,.>:,- 27,76,192,3?6.>:,*67A d,.>:,967@,.?6.167@<@,.167>}@<@,. 6-C:,6-C:,M%6-F:A`,%F:Aa,$AVM6-F:%@,%+F:%@,,$AV/->}@9/6-A$@@%%26-?:A6<<<,% @2 @ @ AU #Ap>}&%-A6AF"!% 0$:33104,104,133,204,104,133,203,104,141,192,6,104D//141,191,6,104,141,194,>}6,104,141,193,6,169N111,133,207,169,191,133,208,160,0,177,203,141X00190,6,165,207,240,28,169,0,133,207,173,193b,,6,2>}4,105,4,141,193,6,133,205,173,194,6l++105,0,141,194,6,133,206,76,95,6,169,1v..133,207,173,191,6,24,105,4,141,191,6,133>}..205,173,192,6,105,0,141,192,6,133,206,32))137,6,32,146,6,32,160,6,32,137,6,32//169,6,32,160,6,165,207,240,177,56>},165,20322233,40,176,2,198,204,133,203,198,208,165,208--201,255,208,151,96,173,190,6,41,3,10,1000170,96,160,0,189>},195,6,145,205,232,200,192,,4,208,245,96,173,190,6,74,74,141,190,6++96,160,0,189,195,6,10,10,10,10,24,11344205,14>}5,205,232,200,192,4,208,238,96,0,0,0,0,0,,0,0,0,0,10,5,10,5,10,0,5,0,15,15,15,15K"@K6-?:C:/h0Э1ѠN>}РON͐W`,,oA@'A A9AA6KA@V]AR@>}o@@4YYMOVE PLOT & DRAWTO ROUTINES INTO RAM, DELETE BOUNDS CHECKING (COURTESY DAVID SMALL)>CC6-?:C:3h>}|}K~}&~ʎA~}}}`,,H$-AR)(}SAVE FILENAME-B:, @A 0>}]]+7@<@,4D*+7@<@,4:)7@<@,4:,,)4C:A @! 6.D:67@,.!>}6.;+%@H AP;6-F:A`,%F:Aa,$AV5 A @5@@%%6-F>}:A`,%F:Aa,$AV}6-AH#%@@<%@F:%@,U%@F:%@,i%@>}}%@ @06-?:C:hhhLV,<@,A*@F:A,--AA=*@F:,A >}"@ B" AUD2:MATHART2.BAS0,24,11344205,14<i6-+%,'@$E:%%@,n$$6-+%,'@$G:%%@,x /%% 70@@@70@J}@@'0@@' A70@@70@@@'0@J}@@' A70@@@70@@'0@@@' A J}A@-@@ $ D1:SWIRL.BASA@`A)q"0RVF @ 86-6H:56HH1DELATLFRIBOTOXVDN} TIC-TOC-FLIPBY GENE LEVINE (c) 1985, AN}NTIC PUBLISHING "AF:A@," A ANIMATION LOOP]-@@-Aa&7 @@N}; ]2@%@@e-@q@5Aa%@%? @@C e2@3@N}@@w @ 'SPEED SET & ESC(R%23-@HF:AdN}, @)R @P-   $2C"F:Ad,"@* @p06-%?0C'-' TO SLOW DOWN7B"F:Ad,"@*N}!06-&? B'+' TO SPEED UP<. F:Ad,"@(A.ESC TO STOPAAdAU$cSCREEN DRN}AW SETUPdA&#+@%@5AY@4JAF:B7p,V6-@b6-@cn6-@Gz6-N}6-%@DRAW BOXM-@@+-@@/5,;/A/G/M/S6-&@N}6-%@'6-%/6-&3 7 E6-%?2S6-&?2+DRAW TICK-TOCKER,I @,@8%/@AN}1/@A=/@8I/@81S,@9&@+/@@&@?,@9%@S/@@%@6"N}6-%@6-%@"$D.L. HIGH BYTESJ A@),@9;/@@J6-F:Aa,N}%-@@! A% @ @,@9@G1/@@@G@6-F:Aa,!!SET COLORS & TURN N}ON SCREENgA'AAF9A @fKAA]AY@4g @ INITIALN}IZE VARIABLES|6-F:Aa,!6-F:A,-6-96-@E6-@R6-6?`f6-@%?`r6-@N}| A' EXIT'DAaA%+DRESET DL HIGH BYTE & MEM TOPD1:TICFLIPG.RAPq@N}@6HH1DELATLFRIBOTOXVDL