@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@W1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G% }H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L }  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}} |||DDOS DOSDOS SYS }}}}CDOS SYS} 0`BDELV !B }`LVUQ   ]   TU J ]L!T  #      TU  } L ? .  t`GBJ V~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI   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;DELV䌚 !B y`@ʆ 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 V (` 9 V⪍ ઍ  -'}LLu DEHILV 9 .l 9 .l  `` s$B VBH(}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL)}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e*}1i1232435ޥ<<8} CE: vC y@y@`A# *` :105L; 0L>! * 0` * : ;` 1 *` 1 *` Disk Drive Sp,}eed:XXX RPM~~~Drive # X PRESS:C > check drive speedL > list error sectorsP > print error sectorsW > write al-}l zeroesto error sectorsM > return to main menui0k ^ 1 :ɛL 800 퍍L5 RETRY ERROR 5 TIME(S)؆莟.}R'S  `=D;EHI 1 1! @ :ɛ8A0.) ȅ 1 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU!L; .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # O 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED004 FREE SECTORS COPYING---D1:VIDE4}OART.002# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}/$/CHu ξL/L DRIVE TO WRITE DOS & DUP TO?WRITING NEW DOS & DUPTYPE "Y" TO WRITE DOS/DUP:DISK 1.?}D1:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DIA}SK 1 IS WRITE-PROTECTED !!TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `CԭC ؠȱC)CȩC`߅C ذ ٥ԍCՍC`800  `0  0`C}i7``ߍDCEHIB 10H``TRʠĩ`D` +CDCC /,D} 8 l0浥CޥC` b,`8` g+  CRC S0NCC S09CE}ե ݩԩ (۰ ٰ ؠ)`i iAC :L., :0 C :`i F}iAC`CC X*C>> ` 0>>  D, q; ,`COPY SECTORS`RLS ; , ,>  , ,G}ۢ>  ,?  , ,`= `=L :ɛ`hL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A.= ` <0 0 .@L# .BJ 1  DEHIB V L1 = g <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 = ` <0,0Lf- B VJ},A#P= ` <0 0L#L ߢ) 1* 1 ~0YjC8C}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `INVALID DESTINATIL}ON:DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1H$IHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 10˛ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4CT} $;CC $;C $;CC 8C Z: *DCC ,=  , lɀL +U}CCC.LE4 k:泭C0iiCLg3CL<3 Z: *DCC ,=  , /,C0 8V} l0N S0G :CC# k:浭C0iiCЪL<3 ,٢=  * q;L8 D, q; $; ,WC W} L 4C>  :A>810CC ,/> 1C1>  :Z>810CC ,C> 1CCC , 1= 1 :YhX}hL `=CCЍCCCCCCCCC ; ; ; , 4L3 ,\> 1 * 鈹CɛሢCɛ )CC0Y}CC ~* 5CCCC Co> 1 * Cɛ ~* 5ܭCCCC C˭CCLE5CCLE5`C`Z}`C`~, , E5C 4L3? , E5CC 4C $;D浭CC 8CCCBC[} lɀYC :L6 : lC񠀈Ѱиi iACCC k:LX6CCCCC q\};L8= ; , ,p  , ,  ,1@  :ɛL 15))C q+L 7= , ,V@  ,u@  :ɛL H 7 ]}7Lj7 7Lj7D 8 7L7 7L7բ@ `ߢC ` ,@  * ECɛ>0$C *00C0C *0" CCL^}7`C X*`8` ,@  *0\X TCɛM ~*HC)JJJJ *6CȽC) *(CC0CC_}C`8`=8W=Wy 8W=PyL5 ON ,C` ; *nDEǍHI 1C L!9 :C `}q+L8L 9 q;L8P 9 q;L8W +L8ML 15))C g+L8 ,C&D?E BHCCC /,C\a}XCC X*C-?0  -?C0L8:8鉍C mC mCE?1?C V0*CCC LW9C? b}`CL09PC B VB DAEJNK V0 09 ,ʢ? PC D,P B V`CC mC mC?1?L9c}CC`i`i`i`i`i`P Bd} VBDAEJ VBHIL1HI B} V@`HS S ShH )Lc;Lj;h` 0)¢e})  q; ,` M;hL$; b,hL$; ,>  , ,L,=L1 :HOh:` ; 0L>!}DISK UTILITIES (c)1983 Atari Vf}er 2.6f MODIFIED FOR ATARI 800 USEA. DISK DIRECTORY K. BINARY SAVEB. RUN CARTRIDGE L. BINARY LOADC. COPY FILE g}M. RUN AT ADDRESSD. DELETE FILE N. CREATE MEM.SAVE. RENAME FILE O. DUPLICATE FILEF. LOCK FILE P. COPY SECTORSGh}. UNLOCK FILE Q. CHECK SECTORSH. WRITE DOS/DUP R. RADIX CONVERTI. FORMAT DISK S. DRIVE SPEEDJ. DUPLICATE DISK T. WRi}ITE VERIFY:ON 9!&x#!7&p))'&5./)L''-66C76u8COPY DISK Insert source disk and Λ Insert DESTINATION j}disk and Λ IT'S DONE !'Y' to execute or for menuSource drive # ?DESTINATION drive # ?Source drive is # 1Desk}tination drive is # 1Enter first sectorEnter last sectorCHECK DRIVE # X >>>>ERROR # 144<<<##  CAN'T RUN PROGRAM!H-@APR} \ A`f"@"6-P:C:,'AV,pARC:,&$AVz AS 6-?:C:hLu,, D:TAIGM}ENU-. FILECATALOGHSECFLAGCOUNLOLOO@@"  4H\@@AG\FILECATALOGHSECFLAGDFILECFILEKEYCOUNLOLOOAL@" 4H }\^z  @  @' de } +@#@eDESIGNED BY GREG HOWELL, MODIFYED BY GREG HOWELL & THE ATARIAN.nc0@@ }70@@Q0@@@cAR@x9@'@@99- }// 'Į堠Ӯ// '̮堠:00 (Ү堠 }堠// 'ծ堠ѮΠŠ-@@!M@ |.@ }@5 |G@@8M | 00 ']];@ ,;A, };@ ,;@ ,;@,;@(,;@(,;@,467@,. %67A,. 467@,.'6- }@6-@'6-&&@@D:*.*##@@K:6-%@6 }.:2@)7@<@,4*26./7@,4 FREE SECTORS%6./ A0""@7A` },F6.7@,F67+&@,$@ %@,.7@<@,6 -%@ @  J T@ }A`^'6-@ 6-&@' A`h%%6-F:@,%F:@,$AVr-@|((%%A` }F:%%A`,%A(  @)7@,0 FREE SECTORS) A-@@# } -@ @#  SELECTION? -6-6--AdAU F:Ad,"AUA }-@3@#.)@."AU*"AP"@ A55"@h)"@v })"@)"@A "@A!!"AU*!A"A&AP"@h. }&/6-&@H/ )!@ A0)!6-$@)6-@: 6-% @  D }N!!"* @AX67A,. b$+&@,  $ APlBB6.7+&@,$@ %@ }<+&@,$@ %@,v 6.D:-@@7<,0  %%67@,.7@<&@, }6.7@ ,4 A067@,4 ,6.7@<@,6 A0+7@,4 +6.7@ }<@,67B:,%@,..67B:,%@,.-@#// &  }-@#  LOADING  $$7B:,&@,4.COMA` A%  A }@@%(}7-@@_(#Program not in LOAD form, trying tob((load program using ENTER.%(PLEAS }E STANDBY.(&* B-@@#4##  CAN'T LOAD PROGRAM!>-@AH M%F: }@,"@% AR AP\"@"6-P:C:,'AV,fARC:,&$AVp AS 6-?: }C:hLu,,S-@#-O(' S -;"@h };('ŠŠŠàϠŠ;"@v;('ˠԠŠϠˠ;"@;( }'ŠŠĠŬנŠ;"@;('ˠԠŠϠˠM-@A( }'M6-d-@@:( Enter Name - L-@@ }PW4Zd A--B:,%@@()67<,. - @ A (-@B:,,6-%@<67<, }.7<,@ ?67@<@,.D567@<@,.:? A P>"@h4@3@ }> A @>"@v4@5@> A @>"@4@2@ }> A @>"@4@6@> A @ B A?-@@?(% } a-@@<(ERROR - F:A, , TRY AGAIN.P-@AT Wa } Ap (}@@--@@X(&LEAVING ATARI DISK MENU, ARE YOU SUREl(ENTER (Y/N) - p }0Y A*((LEAVING MENU...'(>:AS,* D:MENUUTL.V15@" 4H SJ!"Li3!3Afg$++O:&,,$+O:&,,,(}2@@ , 1 +@$'0@1@ @' D:BOXDEMOu(z_ PCDTITLEERNURAV@@w &mmĠϠ,}ŠŠŠ ٠͠ŠƠɠ ЧӠӠˠBAR GRAPH::Written by ,} Clark Peterson>>5931 Clydesdale Ave San Jose, Ca 95123XXEnter as many set,}s of titles and yearly data as desired in DATA Statements.99Press any key to go from one chart to the next.,};@,;@8, A #A ""@@K +@ 0@@ @,} ++ # J F M A M J J A S O N D++ # A E A P A U U U E C O E++ # N B R R Y N L G P T ,} V CAR@"  *0@@@*BACKGROUND('0@@@,}'@,K,@@`',@@`9,AW@`K,AX@`-',@@@',AX@@,}.',@@ ',AX@ /',@',AX2-@AD@7"<%%6-+,}@y&+$@y'A,,F,@yG /H,%@@yI/%@_ '0@@,}'@-@AD@"%%6-+@y&+$@y'A,,,%@@y/%@,},%@@y/%@,%@@y/%@ "3 F:Ad,"AUA3,}WAIT FOR ANY KEY'AdAU+ @ERROR TRAP!6-F:A,!ERROR NUMBER6%6-AV$F:A,,}%F:A,6RETURN ADDRESS="@#A# A=OUT OF DATA, START OVER ( & A C H,} A R T 1**100,75,50,25,95,35,65,75,58,65,50,75**100,80,50,70,20,30,40,50,60,55,53,77XC H A R T 2b))95,75,85,},65,95,35,65,75,58,65,50,75l))95,75,85,65,95,35,65,75,58,65,50,75C H A R T 3))80,90,100,20,45,56,5,75,58,65,50,,}75))95,75,85,65,95,35,65,75,58,65,50,75D:BARGRAPH.DEM@w &mmĠϠ,B I@@V$@@1A!U7AV$@B@"s  +     Vista   1}     2044 Radcliffe Ct. Martinez, Ca. 94553 (415) 228-3936  Random Diatonic D7ths1} X is hertz, Y is time M001R0 ATARI 800  You are welcome to copy  this program providing   1}that you retain my ! address.  (-A0 d @n -@6@x +@1}0@@ -@G6@0@6-A1 $H:@, @`A1}6-A@$H:@,D56-@$ A52@@J56-@0 A52@@1}@P56-@6 A52@@@V56-@B A52@@@/1}'@ '@ -6@    A''6-BH`'+$+'@H,,%?I1}$ D:DIATONIC@@V$@@1A!U7AV$@B@"s  +     Vista   0TU iABMNXNCDALSLELSIPNCLRNLNPPPOQQQQQQQQQSPEE5 }AtA@ @ @ @ @@5 } !@"5 }#$AR%B2y&@'@(@)@*@ ɠŠĠΠ5 }٠ʠ͠Ӡ(Ԯ2Πٮ<k6-AR6-B2y'6-@5}36-?6-@G6-%S6-@_6-@k6-@F+00@PW (}-@ -(A5}TARI MESSAGE BOARD?-@ @W(___________________Z--@-(** A MOVING WORD DISPLAYd4-@4( 5}** UP TO 10,000 CHARACTERS LONGn+-@+(** LARGE BLOCK LETTERSx3-@3(** 4 POSSIBLE CHARACTER COLOR5}S 5-@ 5(!PRESS TO SEE THE COLOR KEYF:,@APF:,"@A` (}5} A;A, @9 (}0@( 6-6-66-@"6-(5 -5}5(YOUR MESSAGE IS  SPACES LONG.--@-((begin typing when ready)K:- 6-%6-%5}"@@%6--6-%U"@ 6-%6-#(})-U(YOUR MESSAGE IS  SPACES LONG.< -)5}""A&*6-&26-&< AP5 "-5((press to end) PAGE # "-@(  5}, -(>:,6"AU A@@67<,.>:,J APT +@ A^6-@ 65}-6-h6-@ 6-6-r0@|0@0@ @0@ 0 5}6-&*(@}-*(@7<, A  B:,6-% "6-6-%"AP 5} A  - $ 00--@@-(**** COLOR KEY ****--@@-(5}===================/-@/(UPPER CASE = GOLD&/-@ /(Š = BLUE00-@5}0(lower case = GREEN:.-@.( = redD7-@7(#PRESS TO SEE A 5}DEMONSTRATIONN<-@<((PRESS TO BEGIN TYPING YOUR MESSAGEXF:,"@AbF:,"@A5}lF:,"@Av A$#"66-@9#6-& ) A67<,.  -)(5}7<,-@( & !@K:! Ap - DEMONSTRATION SUBROUTINE;A,ww67<5}@,.bTHIS IS A DEMONSRTATION OF THE ATARI MESSAGE BOARD.....IT CAN DISPLAY A MESSAGE IN 4 COLORS.......zz67@<5 }A,._UPPER CASE IS GOLD...REVERSE VIDEO IS ...LOWER CASE IS green...REVERSE LOWER CASE IS ... +@65!}-@ 6-6-6-@ 6-6-0@ 0@0@ @ 0@*5"} 04 6-&>*(@}-*(@7<,H AR  B:,6-%\ "6-6-%f "5#}6. App A  D:MESSAGEYx'6-P:'AV,$6-&AV$'$x** LINE(P) TO LNx(-5$}@$%F:%,( x6-8@,x$BEBOQQQQQQQQQSPEE4H ABCDEFAAAA A(AI@)@ @2 @9&} @1 @p @ @@@@AL@@mmĠϠŠ9'}Š ͠ŠƠɠЧӠ ӠŠˠd KINETIC STRING ART DISPLAYn!!F9(}OR THE ATARI - BASED ON ANx""ARTICLE BY LOUIS CESA IN THENOV 1980 ISSUE OF BYTE##BY JOHN TRENHOLME - 13 NO9)}V 80 +@#119AP,9AP,9AP,9AP,9@,9@,W6-@y6-@G9*}'6-@y36-@G?6-K6-W6-Z-@AP&68,-268,-8,>68,-8,J9+}68,-8,N Z6-@-@@ 68,-P:@$H:,,((68,-@$P:@$H:,,9,} ", ,8,8,6/8,8,@^!Ah%%6-@%P:@$H:,,r//6-@9-}$+@%P:@$H:,,,|!A%%6-P:@ $H:,,&@%%6-P:@ $H:9.},,&@%%6-P:@ $H:,,&@%%6-P:@ $H:,,&@//6-@$+@%P:@$H9/}:,,,!A9%6-@%P:@$H:,,9"@A**6-8,%P:@$H:90},,&@ 6-@!@6-&226-8,%@$P:@$H:,,&@091} 6-@:!@6-@D0&@N 68,-68,-X//6-@$+@%P:@$H:92},,,b 6-%* )!AY 6-6*6-%% 6-%* )!@ 6-6*6-%% 93} 6-%* )!AY 6-6*6-%% 6-%* )!@ 6-6*6-%%  * ,94}4 />' 68,-68,-68,-'68,-HR//2@0%@0$@@\//2@@0%@95} $@@f//2@@0%@0$@@p//2@@0%@ $@@z96}6-&@6-&@6-&@6-%@!AP6-@ A D:STRINGAR8|0AB(A@ooŧӠɠҠέ Ӡ͠=8}Š ӠΠҠs (} (p(_THIS PROGRAM DEMONSTRATES AN ABILITY TO READ THE CONTENTS OF=9} AN ENTIRE SCREEN AT ONE TIME.s(ur(jWHEN THE ? APPEARS, ENTER ANYTHING YOU WANT ON THE SCREEN, EVEN USING THE =:}CONTROL UP AND DOWN ARROWSu(ro(gWHEN YOU ARE FINISHED, PRESS RETURN, AND THE PROGRAM WILL READ AND REWRITE THE CONTENTS=;} OF THE SCREEN.r(vO(GUSE THIS TECHNIQUE IN YOUR OWN PRO- GRAMS TO ALLOW FULL-SCREEN ENTRY.R(v(Ġ٠͠=<}͠Ơ -@A@  ;A,;@@, 6.##@@ E:<-==}@#F-@P@Z67B:,%@,._ 67B:,%@,.>:AU,d n }x=>}-@A  7@0Y*0NE O @ Q0@@@70@@@Q0@AC}@@]];@5,;A,;@U,;@U,;@,;@,;@,;@5, @2AD}@ ( (( DRIVE # "(1 6.D67@,.=:,167@,.:*.*2* @0*@@AE}3 B7##@@E::]0@@@70@@@Q0@@AF}@]6-;6-%@<$ @f@$ B>0067@$+&@,%@<$@,.AG}@ @YB6-4N@tC,-@!&@"', @sD?&6.7@$+&@,%@,AH}?6.7@$%@,F##7@,/7@,@rGi6-%@>67@$+&@,%@<@$,.i6AI}7@$%@<@$%@,.H I@fJY6-&@*-@P:'@,U 7@$AJ}+&@,%@<$@,Y L67@$+,,. $$Z^@@ '-@ /-Z 7@$+&@AK},%@<$@,^ \'@@'@@9^0 @6(@%(@0(@_^(@AL}^(@BENTER TO RUN D:PGM, TO RERUN MENU TO PRINT MENU QUITc' @!@' @AM}dAAA nx- A-@@P:z[!(WHAT DISK IDENTIFICATION$(M($___AN}________________________________W A$[{J-B:,6@*7<,4_F6.7@:@4,D=:,: 6.D67@,.=:,.67@,.:=67@AU},.OAR@a-@@"(@ LOADING  A@% BB-@@"8(AV}@ CANNOT RUN B @%Xe A+-B:,6@87<,4_E67<,. a6.7@AW} g6-@:7A',,%+@:7A&,,&P:@:7A&,,'@Ir},$@,$AVk(: ADNXbW(}٠ Sector /(  StarIs}tW(#Status # Filename Secs Secl,,($ v-@@6-+&@It},$@8 7%@<%@,3.( 8 A8 7%@<%@,3.(Active 8 AIu}( 6-@:7%@,,<6-&P:'@d,$@d*@22(* < A ( A%6-+&AaIv},$@%&@.( : @A( 88(7%@<%@,.7%@<%@,B-@(%@Iw}B(@:7%@,,%AV$@:7%@,,B-@4%@B(@:7%@,,%AV$@:7%@,,(  (Ix}(6-%@ A D:EXAMINEDSEPUUTSEBUFFERZSELSEAiApArAsAxAyH/h$y$AZXTLYLXSA`Aa-  A @Mz} kk͠ŠΠϠҠ РŠٮԠ M{}ӠϠŠӠΠԮ $$******************************$$******************************$$*** Ԯ M|} ***($$*** BY ***2$$*** ٠ ***<$$*** MARCH 1981 ***F$$****M}}**************************P$$******************************d##THIS PROGRAM IS DEVELOPED FORn!!USE WITH THE 825 PRINTM~}ER TOxPLOT DATA ON HIGH QUALITY GRAPHS SUITABLE FOR USE IN PAPERS.##*****************************!!THEM} FOLLOWING VARIABLES AREUSED IN THE PROGRAM:ԤӠŠś ٤=̠ҠŠ٠ӛ ؤ=̠ҠM}Šؠӛà=ΠΠŠŠҠĩ =ҠƠӠΠŠؠӛ͠=M}ƠӠΠŠ٠ӛĠ=ԠŠ٩ɠ=ҠҠӛŠ=ŠƠŠ٠ӛM}ŽŠũڤ=٠ԠϠś נ=РҠҠ ˛ɩԠśӨɩM}Ԡϛ بɩӠŠؠӠӛ##*****************************##*****************************##I AM NOW WM}ORKING ON A SIMILAR##PROGRAM USING EACH SPACE AS A!!POTENTIAL DATA POINT RATHER THAN THE TAB POINTS. THIS##M}WILL ALLOW FROM 2 TO 100 DATAPOINTS ON A FULL PAGE.####M}##ffA SPECIAL NOTE!!! I HAVE BEEN USING X AXIS TO MEAN HOM}RIZONTAL AND YbbAXIS TO MEAN VERTICAL. AS I THINK BACK I AM NOT SURE THAT THIS IS THE;;CORRECTM} CONVENTION.CHANGE IT IF YOU LIKE.######M}""ĠƠΠή,RR9@,;@,9@,;@E,;M}@,;@,9@,6H-@@&68,-568,-D68,-H 7 A A M}8CC(;ŠŠҠĠ ŠĠΡ9%(%( PRESSΠTO CONTINUE:@ +IM}##JSET PRINTER TO 16.7 CPIK##T 3 A`h##M}i##jPROMPTED INPUTSk##l##M}mK( ( (G(6Ԡ to be printed at top of graph.K|Q%(INPUT FOM}R AXIS)M(INPUT FOR AXISQ Abb(ZIN A WHOLE PAGE YOU GET UP TO 50 LINES ON THEM} Y AXIS AND YOU GET 12 PERIODS ON THE X AXIS.P&(DO YOU WANT THE GRAPH TO FILL::( 1. WHOLE PAGEP(2. HALF OF PAGEM}>( 3. LEFT 1/4(( 4. RIGHT 1/4>(5. CENTERED 1/43"@)"@)6-@3 A6-@M}%"@6-@@% A@6-@  A5 A@&&(٠ҭRE-ENTER DATA AM}5##(INPUT THE DATA AS REQUESTED!))(! HORIZ. AXIS DATA"( PERIOD#,-@(M}((,: !6-? 68,-68,- Nd?(7DO YOU WISH TO PLOT ANOTHER DATA SET ON THE SAME GRAPH?M}Cd7@<@,4YA#X A%##>>DRAW AND LABEL X AXIS-LEFT M} SIDE (C=1 OR 2)##-"@A`-ˠƠӮ3@@3M}>:@',>:@0, + + + + + + II3 8@, 8@, 8@M}, RR3>:@,>:@ ,8@, 8@, 8@,4 3H AϠM}ӛR##̮ԠؠӠӮ\3 p883 ++++++++++++HH3M} 8@, 8@, 8@,ii3>:@,>:@,8@, 8@M}, 8@, 8@,nn3 8@, 8@ , 8@, M}8@, 8@, 3% A%ϠԠś.Ԡś8<8(0DO YOU WANT ANOM}THER COPY OF THE SAME PLOT?(YorN)<L4YA%t6'(DO YOU WANT TO MAKE MORE PLOTS?+34Y6%""M}""ǠԪ""""M}Z99DRAW AND LABEL X AXIS RIGHT SIDE (C=4)[!!d3M}xGG3>:@',>:@0, + + + + + +PP3 8@, M} 8@, 8@,``3>:@',>:@, 8@, 8@, M}8@,3 A]""^<<DRAW AND LABEL X AXIS IN IN CEM}NTER (C=5)_""h3|DD3>:@',>:@0, + + + + M} + +MM3 8@, 8@, 8@,]]3>:@',>:@, M}8@, 8@, 8@,3 A""33PLOTSM} ON LEFT SIDE 6 OR 12 COLUMN."" 3* $ 3* $ 3*$ 3M}*$0 3*$D3*$X3*$l3*$3*$3*$3M}*$3*$3*$""""PLOTS ON RIGHT SIDE 6 COLUM}MN""3*$3*$ 3*$ 3*$43M}*$H3*$\3*$e""fPLOTS IN CENTER 6 COLUMNgM}""p 3*$ 3*$3*$3*$3*$3M}*$3*$""SECOND DATA SET""M} A#  (} SECOND DATA SET 1-@1( PERIOD 8, DATA   !6-$  68,- M} "" PRINT DATA TO CHECK "" (}ˠM} (ؠ &-@"(8,8,8,&  A%P (IS DATA CORRECT? $$7@<M}@,4YA'@ A@ "" PLOTTING ROUTINES ""M} A'P 6-P:@$,6-P:', BB(:ŠŠҠŠ ĠΡ '#(PRESS M} TO START PLOT ' "@A1E "@A0 "" LEFT SIDE 6 COLUMM}N C=3 "" TITLES AND HEADERS "" 3"@!3M})3 3 A(@ 33  "" 66SETUP LINES AS COUNTERS ON Y M} AXIS "" -@6! """ DRAW AND LABEL M}Y AXIS# "", $ 3+$3>:@',>:@,5 ""6 BBCHECK DATM}A AGAINST LINE VALUE GOTO PLOT SUBROUTINES7 GGPLOT SUBROUTINES DEFINED BY I WHICH CORRESPONDS TO X(I)s8 M}""@ -@T W)8,*8, +%,)8,*8, +%,? +A`%@ $,W3>:@',M}>:@,h  q ""r eeLPRINT ADVANCES PAPER ONE THE CHR$(27)&(10) IN LINE M} 2900 HAD KEPT PRINTs 11ON THE SAME LINE TO THIS POINTt ""| 3  ""M} 88GOTO SUBROUTINE TO DRAW AND LABEL X AXIS "" M}"@A@ A` "" RIGHT SIDE (C=4) "" )M}3)3  -@6 .3 +.3>:@',>:@, -@ W)M}8,*8, +%,)8,*8, +%,? +A %@ $,W3>:@',>:@,  0 3 D AH ""M}I CENTER (C=5)J ""N 3"@&333 XM} -@6l (3+(3>:@',>:@, -@ W)8,*8, +%,)8,*8, +%,? +A!`M}%@ $,W3>:@',>:@,   3  "@A@ D:PLOT825 @L_z TRUFALSQQTIMEAqArAsAtAuAvAw@ Q} @qq Q}%%宛qq Q} qqĠŠ Q} %%Šţ%%ĠqqQ} ӠҠ ٠ppQ} ĠϠŠŠŠ ͠ŠԠ٠Р W6-Aq6-Ar'6-As36-Q}At?6-AuK6-AvW6-Aw##@@K:9@`,+(*-Q}@`&68,-* 22-@@`%6-%A.68,-2 F"@`BK6-%@P%%6-Q}P:@`$H:,,%@Z 8,n  68,-@ @p  68,-@ @p6  68,-@Q} @p  68,-@ @p  68,-@ @pb  68,-@ @p  68,-@Q} @p*  68,-@ @p  68,-@ @p  68,-@ @pV  68,-Q}@ @p  68,-@ @p  68,-@ @p  68,-@ @p  68Q},-@ @pJ  68,-@ @p  68,-@ @p  68,-@ @pv  6Q}8,-@ @p  68,-@ @p>  68,-@ @p  68,-@ @p  Q}68,-@ @pj  68,-@ @p  68,-@ @p2  68,-@ @p Q} 68,-@ @p  68,-@ @p^  68,-@ @p  68,-@ @pQ}&  68,-@ @p  68,-@ @p  68,-@ @pR  68,-@ @pQ}  68,-@ @p  68,-@ @p~  68,-@ @p  68,-@ @Q}pF  68,-@ @p  68,-@ @p  68,-@ @pr  68,-@ Q} @p  68,-@ @p:  68,-@ @p  68,-@ @p  68,-@Q} @pf  68,-@ @p  68,-@ @p.  68,-@ @p  68,-@Q} @p  68,-@ @pZ  68,-@ @p  68,-@ @p"  68,-Q}@ @p  68,-@ @p  68,-@ @pN  68,-@ @p  68Q},-@ @p  68,-@ @pz  68,-@ @pĠ)(A; TRUE(B; FALSQ}E))@,"@e(GOOD()6-%@,$(WRONG($ ½Ġ!)(A; TRUE(B; FALSE))Q}@","@f(GOOD()6-%@,$#(WRONG($Ġ)@,"@e GOOQ}D()6-%@,$(WRONG$½Ġ)@,"@f GOOD()6-%@,$(WRONQ}G$LýĠM)@N,"@g GOOD()6-%@,$O(WRONG$ĽĠ)@Q},"@h GOOD()6-%@,$(WRONG$ŽĠ)@,"@i GOOD()6-%Q}@,$(WRONG$'46-P:'@`$A,4(PERCENT CORRECT= *@ D:QUESTION PsCUMRTA) ##MORE READ TIME CLOCK-IN BASICBY WALTER SNELLSAN DIEGO ACE( U}@2-@A<"F%A5P Z(}MRTC UTILTY 1.0_(HH:MM:SSd A6-?:A6U},i++162,0,32,199,6,24,42,42,42,42,141,255n++6,32,199,6,24,109,255,6,157,240,6,232s,,224,3,240,11,169,58,141,251,2U},32,208,6x))76,2,6,173,49,2,133,205,173,48,2,24}//105,63,133,204,144,2,230,205,169,0,141,14,,212,169,79,141,36,2,16U}9,6,141,37,2,169..64,141,14,212,76,0,160,162,0,202,208,253,,248,14,162,0,173,243,6,105,1,141,243,6--201,96,144,96U},142,243,6,173,242,6,105,0//141,242,6,201,96,144,35,142,242,6,173,241--6,105,0,141,241,6,201,96,144,20,142,241,,6U},173,240,6,105,0,141,240,6,201,18,144++5,169,1,141,240,6,173,221,6,208,41,24))162,2,160,8,189,240,6,72,41,15,9,160U}0145,204,104,136,106,106,106,106,41,15,9,1633145,204,136,169,26,145,204,136,202,16,225,200..169,0,145,204,76,98,228,U}142,254,6,32,226..246,174,254,6,142,254,6,32,170,246,41,15$$234,174,254,6,96,0,0,0,0,0,0,0 D:TIMECLOK T{*+XYASPARCSIARCCOMCA@@@AAY} @p @ @ @# @@dY} +n$($( ** MATH FUNCTIONS #2 **x'('( 1. AREA OF IRREGULAR SPACE"("( 2. PARTS OF TRIANGLES$Y}($( 3. BINOMIAL PROBABILITY(( 4. DAY OF THE WEEK"("( 5. METRIC CONVERSIONS//AAPY}A PAA A 0 +(0( AREA OF IRREGULAR POLYGON9@%,9@%,*&( NUY}MBER OF VERTICES (0 ENDS)*"A -@!@A"-#( COORDINATES OF VERTEX Y}- A , A 6##( VERTEX @ 68,-68,-J T68%@,-8@,Y}^68%@,-8@,h6-r-@|116-%+8,%8%@,,$+8,&8%@,,  ( Y} AREA =O:,'@ (AdAU4F:Ad,AU*AdAU4 A  A AY}* +(*( PARTS OF A TRIANGLE9@,9@,6-@p(( PROBLEM TYPES:( Y} 1. ASA( 2. SAS( 3. AAS( 4. SSA( 5. SSS( 6. EXIT!@AY}77A APAAAPA ASA V!( ENTER ANGLE,SIDE,ANGLE )868@,-GY}68@,-V68@,-0068@,-A&+8@,%8@,,7768@,-8@,$G:8@,,'G:8@Y},,7768@,-8@,$G:8@,,'G:8@,,! A& SAS+U ( ENTER SIDE,ANGLE,SIDE (7Y}68@,-F68@,-U68@,-0oo68@,-M:+8@,$8@,,%+8@,$8@,,&@$8@Y},$8@,$E:8@,,,54468@,-G:8@,,'8@,$8@,:776-D:8@,'M:68@,$8@Y},%@,,<68@,-?0068@,-A&+8@,%8@,,B AD AASIV!( ENTER ANGLE,ANGLY}E,SIDE )868@,-G68@,-V68@,-N0068@,-A&+8@,%8@,,S A5b Y} SSAgU ( ENTER SIDE,SIDE,ANGLE (768@,-F68@,-U68@,-l 6-8@,$G:8@,,qY}&8@, A&NO ANSWERv1168@,-M:+8@,$8@,,&+$,,{8@,Ae((6-M:+8@Y},$8@,,&+$,,68@,-8@,% Ae SSST( ENTER SIDE,SIDE,SIDE '668@Y},-E68@,-T68@,-xx68@,-++8@,$8@,,%+8@,$8@,,&+8@,$8@,,,Z}'@'8@,'8@,@@6-6D:8@,'M:68@,$8@,%@,,%@68@,- AeZ}ANSWERS HERE-@@( SIDE  8, -@@,,68,-P:+8,$B%Z}@,'B,( ANGLE  8, AdAU4F:Ad,AU*AdAU4 AP Z} Au ( NO ANSWER:* ApBINOMIAL DISTRIBUTION +(9@,%%( ** Z}BINOMIAL DISTRIBUTION **&(&( ENTER 0 TO RETURN TO MENU!(( HOW MANY TRIALS!"A$(Z} ( HOW MANY SUCCESSES$(($( PROBABILITY OF SUCCESS(268@,-!68@,-268@,-&Z}-@@ 8@,"A$6-@.-@8,8 6-$B G68,-K:,L Z}VEE6-J:8@,&8@,&8@,%$K:,%+&,$K:@&,,`;(;( PROB. OF  SUCCESSES IN  TRIALS IS Z}jAdAUt4F:Ad,"AU*AdAU4 A~4F:Ad,AU*AdAU4 A PZ } A@DAY-OF-THE-WEEK +(!( ** DAY OF THE WEEK **!(( ENTER 0,0,0 TO END%(%(Z } ENTER MONTH, DAY, YEAR "A!@A0!@1A0!@AZ }6-%@6-&@ [[6-%@$%P:?`$+%@,,%%P:'@,&P:'A,%P:'A,%@Z }336-P:+'@&P:'@,,$@%?P,#( THAT'S ON # A %((SATURDAY A0)(SUNZ }DAY  A0*(MONDAY  A0+(TUESDAY  A0,( WEDNESDAY A0-( THURSDAY  A0.Z}(FRIDAY  A0xANGLO TO METRIC CONV.z!9@,;@,!#{-@@|"68,-}Z} ;;2.54,30.48,.3048,.9144,1.609,4.929,14.788,.2366,.473277.9463,3.785,35.24,8.809,28.3495,.4536,907.2,.62141 +Z}(.( ** METRIC CONVERSIONS **1(,,($1. IN. TO CENT. 10. QT. TO LITERS--(%2. FT. TO CENT. 11. GAL. TO LIZ}TERS,,($3. FT. TO METERS 12. BUSH. TO LIT.,,($4. YDS. TO METERS 13. PECKS TO LIT.,,($5. MILES TO KILO. 14. OUZ}NCE TO GRAM--(%6. TEASP. TO CC 15. LBS. TO KILOG.--(%7. TBLSP. TO CC 16. TONS TO KILOG.--(%8. CUPS TO LITERZ}S 17. FAREN. TO CENT(9. PTS. TO LITERS"0(,( WHICH CONV.? +50 REVERSES,0 ENDS0,"A6 Z}@A8##!@g)+ @Q,A@%(VALUE TO BE CONVERTED"%(E"@A`F"@gZ}ApJZ!@P6-&@P(6-'8,.6-46-:6-D A ZREVERSE AFTER CALC.O6-$8,T A0Z}%V(Y\"(" Ap_(%( INCHES =  CENTIMETERS($`&#( FEET =  CENTIMETERSZ}&$a!( FEET =  METERS!$b"( YARDS =  METERS"$c&#( MILES =  KILOMETERS&$d%"( TSP. = Z} CUB. CENT.%$e&#( TBSP. =  CUB. CENT.&$f!( CUPS =  LITERS!$g"( PINTS =  LITERS"$Z}h# ( QUARTS =  LITERS#$i$!( GALLONS =  LITERS$$j$!( BUSHELS =  LITERS$$k"( PECKS = Z} LITERS"$l"( OUNCES =  GRAMS"$m&#( POUNDS =  KILOGRAMS&$n$!( TONS =  KILOGRAMS$$oZ}# ( DEG. F =  DEG. C#$|%%6-+&@2,$+@'@ ,H6-$B6-%@06-P:'@,>6-'Z}AH A A#6-+@ '@,$%@2/6-@56-;6-A6-H6-$B6-%@06-P:'@Z},>6-'AH A D:MATH2MCA@@@AAX-~ INDOOPANBs@B@s@@'A@ A ^} A A ooŧӠɠҠέ Ӡ͠Š ӠȠ̠^ }a+@%@'-@@?(@ MATH DRILLS-@A W a+h (}(ENTER OPERATIO^!}N -3( 1. ADDITIONJ( 2. SUBTRACTIONd( 3. MULTIPLICATIONh'(#(ENTER LEVEL (0, 1, OR 2)';@^"},6.+-X"@6-@"@6-A --6-@%F:AA,%AV$F:AB,(+-^#}@@((SCORE: +-%@%@'@+ 16-P:A$H:@,,1 @@0#^$}%"6-@% @P(+6-P:$H:@,,+"@@230@@ @/-@@^%}3(<-@)@(7<,F @@P( AZ ( d-@ @(---n#-@(^&}@ A#p''AAAAr 6-% A t 6-& A v 6-$x^'}AP0-@!@"(RIGHT!!!06-%@%-@A % @-@!@(WRONG^(}5-@(@( +6-5 A D:MATHDRILs@@'A@ A \GZ[11AANACCZNNNIZDDMBBVHKEABAABVSIXZZNLMXAXMED@x@  @b*}A>D xAA @ @ B(3 A  @ @dA@@b+}@@@@@@@3@UA A A  @!b,}"@'#$%&@'(@)*M 3<+,-B1./0&b-}&@@K: @  2@@Z-@'@ ?2b.}S-@@W Z$ + A( A 20(0($Would you like instructions (Y/Nb/}) ? <)@6.>:,F4NAP0Y@`Z A%d +n0-@@0(*** Wb0}ould you like to:x%(%(1) Play a song in memory?(2) Create a new song?""(3) Play a song from media(b1}4) Quit?$-@@$( Number-> )@/6-&@H/ @)!@A`#"@b2} A@# A%"@6-@% A0"@ A`! +  Okay ... Bye!BGGb3};A ,9@a,;A ,9@!,;@,;@`,D&&9@,9@,9@,FP" -@Bb4}:,@66-@:7<,,&@HB!@P6-&@H^36-$@%@:7%@<%@,,&@HP7%@:, L! #B!-@`V/"68,-B:,%@/67B:b6},%@,.`! !68@a,-B:,%@t68,-6@/68@,-6@D68@,-Y68@b7},-n68@,-@68@,-@68@,-@68@,-@v68@,-@-68@b8} ,-B68@,-@W68@,-@l68@,-@68@,-@68@,-~6b9}8@,-@-68@,-@B68@,-W68@,-@l68@,-68@ ,-@b:}68@!,-@$9 +@AR@90@M-@@) @MELODY4b;} @M @ FOR I=1 TO 500:NEXT I %%  By G. Cage & R. BouchardS%6-F:A`,%F:Aab<},$AVS6-F:%@,%F:%@,$AV%A z*-@8@,&@@@6-A:7<%@,,^6-b=}A:7%@<%@,,z2@@*A6-?:C:,<<'@, A24b>}-@A > +$ A) -@A  QQ(I Imagine if you will, that there are 60 b?}cards stored somewhere in Atari, GG(?each containing portions of music stolen from Scott Joplin. X(X(L Now what b@}if you were to jumble up those cards in a random order and play MM(Ethem on an instrument. Would they sound as goodbA} as the originals? T(T(IProbably not. But them again, who knows? At any rate, you would have ZZ(Ryourself an oribB}ginal composition inspired by one of the greats in music. T(T(IAnd if you didn't like it, you could mix up thbC}e cards once more and have ''(something completely different.  7-@@#7(< Press to continue >bD} A(( A)2 UU L Can't play an instrument or read music? Well, that's where Atari comes4 SS(Kin. bE}You will be shown a pair of dice.Press the space bar to stop them from< ll(dspinning, and the numbers on your throw wilbF}l be displayed. This is done for a total of 5 tries.F V(V(K Each number of the die corresponds to a particular card inbG} memory depen-H II(Ading on the time it was thrown (1st try, 2nd try, etc.). AtariP jj(bassembles these together and ybH}ou are asked if you want to hear the final product, or try again.Z Q(Q(F If you wish to have it played, the music wibI}ll be accompanied by its\ $$(musical notation (of sorts).d A(n A)x SS(KAfter listening to your composibJ}tion, you will be asked if you wish to savez 99(1it on disk, try again, or quit altogether. %(%(That's all thbK}ere is to it. A( $ )@ AUA( $T 4 ++( Ӡ.(1bL}(4$  +AR@ W-@@#-1(>:A`,E-%@@S(>:A`,W  bM}W-@#-@1(>:A`,E-@&@%S(>:A`,W  ` -@@6@,-@bN}:(>:A`,N-@%@\(>:A`,`  ` -@6@,-@:(>:A`,N-@bO}@%\(>:A`,`  o6-@6-@ !-/(>:A`,=-%@K(>:A`,a-%@%@obP}(>:A`, '-%@%@'(>:A`, A3` A40 _6-16-P:H:,$@,%@bQ}S6-P:H:,$@,%@_6- A4p& A50 6-@6-@: O6-6-bR}OA1A2A20A2PA2pA2D O6-@6-@OA1A2A20A2PA2pbS}A2N X A6b 1@#-@A' 1 A8l A1v $-%@%%@%$(@bT} $ E-%%@%&@$(@>-%@%%@%E(@ $ H-@@=-%%%@bU}%%&@D(@H  $ A3 $ . A3'-%@%%@%.(@ $ O A3'-%%bV}@%%@.(@H-%@%%%@O(@ $ f-%%@%&@$(@>-%@%%&@bW}E(@_-%@%%@%f(@ '-%%@%@%$(@'$ Q-@@@+-@ bX}6( F-@ %%Q(    $ * "-@#"(Š4 W-@@-(You are gbY}iven five?-@@W(tries at the dice.> W-@@-(Press to?-@@W(stop bZ}them spinningH %-@(@%( > Try # <R \ $f p -@@  (DIE A:z -@@" (b[}DIE B: $ 6-%@ -@6@( $ ?6-@6-@!-% ;-%@%@? b\} A50 $ &6-F:Ad,&"@3A5` G%6-P:H:@,$@,%@G6-P:H:@,$@,%@b]} ' A5 A30 GAdAU)-%@ @ .(B-%@ @"G( 6-%@b^}$##6-$%+@&,$+&@, 68,-$--6-+$%+@&,$+&@,,%@0. 68,-868,-8,Bb_}6-%@L$i +-@@@(--> Do you wish to play thisR-@@i(song or try again?b`}C-@@&( Type lay or8-@#@ C(gain.-@%@(--> )@6.>:,ba}! 4A6-@! A0 0PA80 A@-@A (. +.(Play the same songbb} again ? 2)@< 6.>:,4NAPF0YA8P A8`# + AE#6-bc}-@@ AC -@@ AC 6-@ AC"@bd}AA 36-@#-@@/68,-8,3  A@-@@"68,-8,, 6-be}@@@ ACJ 6-@T AC^$//-88,,88,%@,&@@6-A:7bf}<%@,,!!6-A:7%@<%@,,+!@+2@@ AI $_ +@$bg}@96-F:A`,%F:Aa,$AV_6-F:%@,%F:%@,$AV6-@6-@;-@bh}Ap@9;-@ @ ,%/%A%   6-@6-@ -bi}Ap@9* ,%/%%@(4 *****> R'6-6-@'6-@'\$$9"@/6bj}-?:C:,<<'@&@,9 AI0&r/6-P:8'@p&@,$@%%?P,r6-?:C:,<%+%%@,$@@%P:bk}'@,<'@&@,8?"@W',&@%%@?/%@%%@B;%2bl}36-%@;6-%VSAU6-),%@7/%@$E6-%@S6-%@`5!@bm}6-@'6-@'56-%@9j$ +H-@@H(-Would you like to save this song (Y/N) bn}?)@6.>:,4NA0YAP 2-@@2(On tape or disk (T/D) ?)@bo}6.>:,4TAR`0DAP`6---@@-(>:AS,Name ->0bp}!67@<@,.D:067@,.  @@F-@@P @bq}8,Z @8,d @8,n x@ A) +)( * Store to tape *F-@br}@F(,1. Make sure your tape is ready to record.p(p(e2. Start recording and then push 'Return'. Atarbs}i will return you to the program when finishedP(P(E3. If you get an error message, set uptape again and type 'GOTO 52bt}60'##@@C: AQp +z4-@@4(From tape or disk (T/D) ?)@bu}6.>:,4TAb0DA` 6-@--@@-(>:AS,Name ->0bv}!67@<@,.D:067@,. @@-@@@bw}68,-@68,-@68,- $@. + A@8 + Abx}B, +,( * Recall from tape *L\-@@\(B1. Make sure your tape is set up and ready at your mby}usic program.V?(?(42. Start recorder on play and then push 'Return'.`@(@(53. If all goes well, Atari will returnbz}to the program.jG(G(<4. If you get an error message, re-runprogram and try again.t##@@C:~ b{} Aa0@ll686885CC6885CB18A000A97E91CB986928A8A97E91CB986928A8A97E91CB986928A8A97E91CB6868A8A514C514F0FC88D0F760'BB14b|}4064096064144064114064096128153064096064153064128064096255'UU068032064064068032064064068032064032,064032064064068032064032b}}064032057032064032$'[[076032081032076032064064096032076032064032,064032064064073032076032081032076032064032.'OO0640640680b~}32064064068032064064,0640320570320640320760320720320860640760328'CC064032076032064032057064064064096032,0760640860320960960b}86064B'II096032086032076032128064076032086032096032,076160123032096032076032L'II076064086032096064064032076032096032,0760b}64064032076064081032076064V'UU086064064032086064064032086064,001032086032057032072032064032057032064032072032`'[[07203207b}2064076032072032072032076032086032,072032057064064032072032076032072032064032j'CC072064072032072064072032086064,06409606803b}2064032057032064064t'II064160076032072032068032,064064102032096032086032076032072032064032~'064255,064255'7706409606b}8032064128,064064064032064032064064064064'++096128096064001064,076064086064096128'77096064001064096064001064,0960640010b}64096064001064'CC096064001064128032114032102032096040001064,096064128064096128'II102064102032128064102032128064,1020321b}71032138032114064128032114064'UU102032108032102032128064128032108032102032,001032128032076032086065076032086064'aa00103b}2128032076032102032086032076032086032102032,102032102064114032128032136032128032102032'CC128032102032086032064032064064086b}064,103032171032128032102160'OO128032102064096032086064064032086032,076032086064076032086032076032086064'OO128032102032b}076032086096086064,086032086064096032102032108032102032086032'CC096032068064096064068032096064,096064114064076032086064096b}032'II096064086032096064102032096064,096064114032096064114032096032114032([[0010320860320680320860320760320680320760320b}86032,096032114032102032096064076032086064 (II114032114064121032114064108064,096032096064076032086032096032086064(OO0960b}32096064102032096032096032102032114032,121032114064102032076064096064(11096128086032086064096032,086128086064096064((771b}02064001064128064001064,1021600860320760320860322(==102064064032064032064064064064,102064001064128064001064<(++1021920640b}64,102064102064086064064064 D:MELODICEDMBBVHKEABAABVSIXZZNLMXAXMED@x@  @`.  URXY?U?y50EdA!r$gA`V! AY@@Šԛ f}A +@%@ 6-AY6-@0@ @.6-.6-H:@f},$@%?-@6?6-A $G:,%#6-@p$E:$,%( ,/P d%%2f}n%%2@-@A 0@f}%%2 @ +@0@@ @0@@0f}@@ @0@@@0@@@-@(@ atari 1f}6k-@@$ (@>> <<.-@@8 (@^^^^^^^^^^^^^^^<AR@f}L-@@UV6-P:H:,$@,`%%6-P:H:,$@,%@j -t(@*~f}-@@  $ D:SPACE16A`V! AY@@Šԛ d5/0gxCHOICXYXYRNUTOAMACNTO@@@j} @ ?P A @@@j}__ĠҠŠŠŠ ٠٠ŠŠ ɠРZ;@j},d +n%( (%( x+(+( . GREATEST COMMON DENOMINATOR}*(*( . PRIME FACTOj}RS OF INTERGERS$($( . LINEAR INTERPOLATION(( . QUADRATIC ROOTS&(&( . SIMULTANEOUS EQUATIONS+j}(+( . PERMUTATIONS & COMBINATIONS#(( ENTER YOUR CHOICE#"@A"@Aj}"@AP"@A"@A"@A APCHOICE UNKNOWNGREj}ATEST COMMON DENOM.2 +(2( ԠΠ&(&( ENTER 0,0 TO EXIT ROUTINE%(( ENTERj} TWO NUMBERS%"AEXIT 6-O:,6-O:,6-&$P:',"Ap 6- j}6-  A@%("( GR. COMM. DENOM. = %( A , PRIME FACTORS OF INTERGERS61 +(1( j}ŠӠƠ@(( ENTER 0 TO EXITJ#(( INPUT YOUR NUMBER#O"AP&6-j}6-&SAVE FOR TOTALT( N:,U 6-N:,Y 6-O:,[6-P:M:,%?,%@^-@@`6-j}%@c6-h'P:',Ar 6-'|6-%@ A`"A ("@j}  6-( A    6-P:?%#, 6-$"' A0'"@6-%@j}' AR  (  A0LINEAR INTERPOLATION+ +(+( Ҡ,(&(j} ENTER X,Y OF FIRST POINT,-('( ENTER X,Y OF SECOND POINT->(( FIND X OR Y>7@<@j},4XAp#(( : X = #6-%+&,'+&,$+&,/(/( Y = P:$A%?P,'Aj}+('( MORE POINTS ON THIS LINE+$$7@<@,4YA)(%( INTERPOLATE A NEW LINE)&$$j}7@<@,4YAp0 A:#(( : Y = #D6-%+&,'+&,$+&,N/(/( X = j}P:$A%?P,'AS A XQUADRATIC ROOTS]& +(&( àb%(%( ENTER COEFFIj}CIENTS A,B,Cl v6-+$,&+@$$,6-M:O:,, AE(E( REAL ROOTS: +6&,'+@j}$,, +6%,'+@$,(( ANY MORE DATA$$7@<@,4YA AH(H( j}COMPLEX ROOTS: 6'+@$, + OR -'+@$, I ApSIMULTANEOUS EQUATIONS0 +((0( j} Ӡ9@ <@,(($( # EQUATIONS? (LIMIT 9)(" A ( (j} COEFFICIENT MATRIX:-@( EQUATION -@%@"%@A!!( COEj}FFICIENT  =   A( CONSTANT =  68<,-* 4 >-@H -R8