)@N g;$% p0*}$)$$H/ ]% hL Q , `e$$%`$%`  R@W1    *  .``fGH` L LY L , H?  0f,(h 0:; < =Ң7x 60:2344  4, +,BUFMLBYTTOTALINCHECKSUBUFFESECTO} d""****************************n""* BLACK RABBIT 2.0 MAKER *x""* BY BRIAN MORIARTY *}""* ANALOG COMPENDIUM V.1 *""****************************X;Ah,;@,2-@@6"}B67,.>:,F XAR@d67@,.%67Ah,.467@,.P(}Verifying DATA lines.d(Readi}ng Line 56-6-!6-A +#A5 AP6-%@-@@(C-@@% }%6-%@)"16-%?67<,.>:,C @%F:A,%AV$F:A,=(Line missing.@"" }A A`2AR2F:A,@A`C(DATA lines verified.C(!Insert a blank disk i }n Drive #1.$$(Press to write disk. F:B2y,@A"IAi@'Ap@3=(F }ormatting disk.I6-?:C:,,,hF:Aq,@,(}Format error!L(Remove write-protect tab or^( replace disk.h  }Ap6C(Writing data.(Ap@:AyC6-C:,@-@@JSAx&AsP:}'AV,GAr&+AV$F:As,,S6-?:C:,,T6-%A( ^(Rabbit disk okay.h#(Bad data at l}ine  #r104,76,83,228|* M/L DATA^^0,6,128,4,134,4,169,0,168,145,94,32,77,6,165,106,201,192,176,12,169,15}8,133,134,169,2582__6,32,131,6,76,157,4,162,0,142,198,2,134,129,134,131,142,68,2,232,134,128,134,130,134,5130aa9,142,}1,3,134,144,24,165,88,105,239,133,136,133,138,165,89,105,0,133,137,133,139,32,77,7734bb6,169,192,133,134,169,6,32,131,6,2}4,165,88,105,122,133,140,144,2,230,141,230,138,208,2,10584gg230,139,162,2,160,0,169,14,145,138,200,192,240,208,249,24,165},138,105,240,133,138,144,2,230,14151jj139,202,16,231,32,143,6,24,165,136,101,128,133,138,165,137,101,129,133,139,169,226,}133,134,169,17380$YY6,32,131,6,32,91,6,169,82,141,2,3,165,128,141,10,3,165,129,141,11,3,32,83,228,19320.``173,3,3,16,4,}169,31,208,15,160,127,177,132,208,7,136,16,249,169,16,208,2,169,128,133,219798dd143,160,0,132,77,145,138,230,138,208,2,230},139,230,128,208,2,230,129,165,129,201,2,208,6,25359Bcc165,128,201,209,240,31,165,143,201,128,208,181,24,173,4,3,105,128,1}41,4,3,133,132,173,5,28387Lff3,105,0,141,5,3,133,133,201,188,208,156,24,165,136,101,130,133,138,165,137,101,131,133,139,31}296VYY169,4,133,134,169,7,32,131,6,32,91,6,198,144,208,32,32,66,6,169,33,141,2,3,32,33276`\\83,228,173,3,3,201,1,240,14},169,72,133,134,169,7,32,131,6,32,91,6,240,224,32,143,35843j__6,169,87,141,2,3,165,130,141,10,3,165,131,141,11,3,160,0,132},77,177,138,133,143,201,38312tdd128,208,5,32,83,228,48,251,169,142,160,0,145,138,230,138,208,2,230,139,230,130,208,2,230,4}1796~ee131,165,131,201,2,208,6,165,130,201,209,240,30,165,143,201,128,208,193,24,173,4,3,105,128,45090XX141,4,3,173,5,}3,105,0,141,5,3,201,188,208,172,76,1,5,169,38,133,134,169,7,32,47206]]131,6,173,31,208,201,6,240,10,201,3,208,245,32,123,}6,76,119,228,32,123,6,76,160,4,49854[[169,0,141,4,3,169,4,141,5,3,96,24,165,88,105,42,133,140,165,89,105,0,133,141,96,520}15bb169,100,141,0,210,169,170,141,1,210,169,0,133,20,165,20,201,15,208,250,169,0,141,1,210,55028ff173,31,208,201,6,20}8,249,173,31,208,201,7,208,249,96,133,135,160,33,177,134,145,140,136,16,58486__249,96,169,128,133,132,141,4,3,169,7,133,1 }33,141,5,3,96,50,101,109,111,118,101,0,99,60917bb97,114,116,114,105,100,103,101,27,0,114,101,113,117,105,114,101,115,0,20!},24,43,0,50,33,62844gg45,162,236,225,227,235,128,178,225,226,226,233,244,128,146,142,144,0,98,121,0,34,114,105,97,66563"}``110,0,45,111,114,105,97,114,116,121,41,110,115,101,114,116,0,51,47,53,50,35,37,0,100,68466cc105,115,107,12,0,112,114,#}101,115,115,0,179,180,161,178,180,0,0,0,41,110,115,101,114,116,70837^^0,35,47,48,57,0,100,105,115,107,12,0,112,114,101,11$}5,115,0,179,180,161,178,180,0,0,72898aa0,0,0,179,180,161,178,180,0,116,111,0,114,101,13,114,117,110,12,0,175,176,180,169,%}175,75459ZZ174,0,116,111,0,98,111,111,116,0,0,0,50,101,112,108,97,99,101,0,98,97,100,0,35,77294 ]]47,48,57,0,100,105,1&}15,107,12,0,112,114,101,115,115,0,179,180,161,178,180,0,0,0,0,79320 D2:RABBIT.BASY)*PABCDERTFLPQSUWDPLRF(}  ##PRINTSET.BAS )} ##EPSON (RX) PRINTER CONTROL ##CODE SET-UP PROGRAM MODIFIED ##FROM EPSET BY DICK TEDESCHI ###*}IN A.N.A.L.O.G. #11. $(##REPAIRS LOGIC BUGS THAT KEPT -##GIVING LINE-FEEDS DURING SET 2##UP, AND ADDS H+}ANDLING OF RX 7##ELITE PITCH, LEFT MARGIN. 8<##TOM TEST, 8/5/84 A##2031 S. DEWEY ,} B##BARTLESVILLE, OK 74003 FG##MODIFIED FOR GEMINI 10-X H##8/18/84 T. A. TEST n@-}@sb A@&"A80+@B-@@_(@TURN ON printerbx##@.}@K:##@@P:-%(@>:@',>:@d,-RESET +00155 PO/}KE 710,254:POKE 712,138:POKE 709,2029AA0'AA09A @RR;@@,;@@0},;@@,;@@,;@@,;@@,;@@,RR;@@,;@@,;@@,;@@,;@@,;@@1},;@@,--6.#(A) subscript FONT (toggles B5:C:S)6.(B) N/72 INCH LINE%%6.(C) COMPRESSED (16.5 PITCH)2}6.(D) DOUBLE STRIKE,,6."(E) EMPHASIZED ԠCST6.(F) SKIP OVER PERF""6.(L) LEFT MARGIN PO3}SITION##6.(R) RIGHT MARGIN POSITION6.(P) PAPER-OUT ENABLE6.(Q) %%6.(S) SUBSCRIPT (4 DOTS HIGH4})6.(T) 12-PITCH (ELITE)""6.(U) UNIDIRECTIONAL PRINT"6.(W) DOUBLE WIDTH' A A)%,35}-@3(*************************63-@@3(* PRINTER OPTIONS *;3-@@3(**6}***********************@&&( (H) HELP (R) RESETJ( ((((((T( ((((((7}5-@@#5(堧ѧ䠠+-@@+(YOUR CHOICE(S): )@>:,4H8} A(}g>:,4Ag(@>:@',>:@e,>:@,>:@,>:@',>:@,>:@,f>9}:,4A(67@<@,.*5A67@<@,.*Z67@<@,.*f6-@v>:,4B -@@ :}1( >ӯ5\(@>:@',>:@e,>:,v67@<@,.*N>>:,4C%(@>:@,;}>67@<@,.*I>:,4D0(@>:@',>:@q,I67@<@,.*S>:,4E*7@<@<},0**7@<@,0**7@<@,0*u(@>:@',>:@i,67@<@,.*u>:,=}4F -@@!1( >Ơ5\(@>:@',>:@x,>:,u67@<@,.*v>:,4L ->}@@"2( >Ԡ6](@>:@',>:@w,>:,v67@<@,.* I>:,4P0(@?}>:@',>:@W,I67@<@,.*<>:,4Q(@267@<@,.*< Aw>:,4R -@}@"@"3( >Ԡ7^(@>:@',>:@,>:,w67@<@,.*T>:,4S;(@A}>:@',>:@,>:@,T67@<@,.*!T>:,4T;(@>:@',>:@f,>:@,T67B}@<@,.*&T>:,4U;(@>:@',>:@,>:@,T67@<@,.*0T>:,4W;(@C}>:@',>:@,>:@,T67@<@,.*: AD (}N0-@@0(** PRINT MD}ODE **X--@@-( ----------------b(l.7@<@,0*.( FONTm)7@<@E},4*)(7@,n)7@<@,4*)(7@,o)7@<@,4*)(7@,p)7@<@F},4*)(7@,v)7@<@,4*)(7@,87@<@,4*8(7@, (/72))7G}@<@,4*)(7@,17@<@,4*1(7@<@,57@<@,4*5(7@,H} ()57@<@,4*5(7@, ();7@<@,4*;(7@, ( LINES)5I}7@<@,4*5(7@<@ ,D)7@<@,4*)(7@,"6-@6-J}P:@f$+@',,1(1( This mode gives  lines/ 11 in.H7@<@,4*(H($ ՠ٠נK}ҠҠΠE7@<@,4*E($ ΠΠƠŠįҠE7@<@,4*E($ L}Ҡ̠ҠŠ@@ &&(} PRINTSET INSTRUCTIONS*,(,(! This is a M}program to send all4**("those CONTROL CODE combinations to>((( the Gemini 10-X printer for suchH++(#things as compreN}ssed print or 'sub-R**("script font' (try this I use it to\**("get 150+ lines on an ll inch sheetf++(#of paper!!!) oO}r Double-Width or anyp**("other things you may need (mix andz**("match).(subscript font = A C S Q )((All you nP}eed do is:(1. TURN ON PRINTER.,,($2. RUN THIS PROGRAM (RESETS PRINTER),,($3. ENTER THE LETTER OF THE OPTION(S)Q}((( YOU DESIRE (A '*' WILL APPEAR,,($ NEXT TO THE OPTION AS IT IS SENT)++(#4. WHEN DONE TYPE 'Q' (AS IN QUITR}).,,($5 YOU CAN NOW TURN OFF THE COMPUTER++(# AND/OR THE DISK DRIVE. THE EPSON&&( WILL REMEMBER THE SETTINGS}S.--@@#-(HIT TO BEGIN F:B2y,@A$ D:PRINTSETh$%uABCDEFLQSUWDCPPPF U}  ##ԮӠ##V}##حɠƯԠ####ìW}###(##ˠɠ-##2##쬠X}7##<##àӠѠ쩠A##ӠѠѭ詛FY}##n@@s A x##@@K:##@@Z}P:$$(@>:@',>:@d, +00155 POKE 710,254:POKE 712,138:POKE 709,2029A[}A0'AA09A @<<;@@,;@@,;@@,;@@,;@@,RR;@@\},;@@,;@@,;@@,;@@,;@@,;@@,--6.#(A) subscript FONT (toggles B5:C:S)6.(B)]} N/72 INCH LINE6.(C) COMPRESSED6.(D) DOUBLE STRIKE,,6."(E) EMPHASIZED Ԡ蠨éө6.(F) S^}KIP OVER PERF !!6.(L) CHARACTERS PER LINE**6. (P) PAPER-OUT ENABLE (SW.1-3 =L)6.(Q) 6. (S) SUBS_}CRIPT""6.(U) UNIDIRECTIONAL PRINT"6.(W) DOUBLE WIDTH' A A)%,3-@3(*****`}********************63-@@3(* EPSON PRINTER OPTIONS *;3-@@3(*************************@a})&( (H) HELP (R) RESET)(E(J(T(^(h(r(|((((((b}4-@@"4(堧ѧ䠠+-@@+(YOUR CHOICE(S): )@>:,4H c}A(}>:,4R%f>:,4Af(@>:@',>:@e,>:@,>:@,>:@',>:@,>:d}@,f>:,4A(67@<@,.*5A67@<@,.*Z67@<@,.*f6-@u>:,4B e}-@@1( >ӯ5[(@>:@',>:@e,>:,u67@<@,.*N=>:,4C$(@f}>:@,=67@<@,.*H>:,4D/(@>:@',>:@q,H67@<@,.*v<>:,4E*g}7@<@,0**7@<@,0*](@>:@',>:@i,v67@<@,.*t>:,4F -@h}@ 1( >Ơ5[(@>:@',>:@x,>:,t67@<@,.*t>:,4L -@@!i}1( >ү5[(@>:@',>:@,>:,t67@<@,.* H>:,4P/(@>:@',>:@j}W,H67@<@,.*<>:,4Q(@267@<@,.*< AS>:,4S:(@>:@'k},>:@,>:@,S67@<@,.*&S>:,4U:(@>:@',>:@,>:@,S67@<@l},.*0S>:,4W:(@>:@',>:@,>:@,S67@<@,.*: AD (}N0-@m}@0(** EPSON PRINT MODE **X0-@@0( ---------------- b(l.7@<@,0*.( n} FONTv)7@<@,4*)(7@,87@<@,4*8(7@, (/72))7@<@o},4*)(7@,)7@<@,4*)(7@,17@<@,4*1(7@<@,;7@p}<@,4*;(7@, ( LINES):7@<@,4*:(7@, (/LINE)57@<@q},4*5(7@<@ ,D)7@<@,4*)(7@,)7@<@,4*)(7@,)7@r}<@,4*)(7@,"6-@6-P:@f$+@',,1(1( This mode gives  ls}ines/ 11 in.H7@<@,4*(H($ ՠ٠נҠҠΠF7@<@,4*F(% Πt}ΠƠŠįҠ E7@<@,4*E($ ŠΠ̠ΠΠӠ@@u} %%(} EPSET INSTRUCTIONS*,(,(! This is a program to send all4**("those CONTROL CODE combinations v}to>((( the Epson MX-80 printer for suchH++(#things as compressed print or 'sub-R**("script font' (try this I use it w}to\**("get 150+ lines on an 11 inch sheetf++(#of paper!!!) or Double-Width or anyp**("other things you may need (mixx} andz**("match).(subscript font = A C S Q )((All you need do is:++(#1. TURN ON PRINTER & INTERFACE MOD.,,(y}$2. RUN THIS PROGRAM (RESETS PRINTER),,($3. ENTER THE LETTER OF THE OPTION(S)((( YOU DESIRE (A '*' WILL APPEARz},,($ NEXT TO THE OPTION AS IT IS SENT)++(#4. WHEN DONE TYPE 'Q' (AS IN QUIT).,,($5 YOU CAN NOW TURN OFF THE COMPU{}TER++(# AND/OR THE DISK DRIVE. THE EPSON( WILL REMEMBER!!!!!--@@#-(HIT TO BEGIN |}F:B2y,@A$!!-ERROR TRAP MODIFICATION BY!!ŠҠ`+F:A,A0*F}}:A,A81(}C-@@]( Ҡ F:A,` +@A@R1A@RCA~}U-@@s(@-@@(@!P-(% Please check }printer & interface.P( When ready, press FF:B2y,@*AU@<AU@F A P} % D:EPSET.BASLQSUWDCPPPF HI!CDNENCHANGEDFLTFDSCCDNFREENIX4IXLICURMSCONSOL }  }dҠ٠i;@,k6. DISK NAMEn% + }6-%6-s APx--6-F:A`,%F:Aa,$AV%@[&@@%@d3%@ }@G%@@[%@$@70@@ @70@@/0@@ }/AR@(super directoryWW;@@$@d,;@@,;@@,;@@$@d,;@ ,; }@, A:&@@D:*.*0 B: A41(Can't read directory. Error #F:A },4'@'B:, @AP6-%@c.67$@@&@9<$@@&@&,.c67$@@&@ }%,.  A@6.J Ap6@@ D:DESCR.DIR@ } BJ A^-@E67$@@&@"<$@@,.no description I T@^ Ag A }@(6-%@g67$@@&@9,.% 0&67$@@&@9<$@@ },.0 A"@#--@6-$@@-6-&@9$ 6.7,%-@&6.7$@@&@9 },'9+7@<@,07@<@,/ 9 A(67<,. A)%%67&@"<,.no description, } 6' 6-6-!@'6-@7T 6. 67@,. +67@,.D6-@&B:,'@T67<%B:,, }.J-@ (O--(%ԠQg @!,@@1/@8@C, }@@"U/@8@"g-@@T-@^6.7$@@&@9,hJJ( 7@<@, } 7@<@, 7@<@8,r 6-@|6-@6.7$@@&@9,36.7@<@ },D67@ ,. d67@,.7@<@,v67@,. 67@,.7@<@8,6.6-?:C:,< }C:,<@,-@( ]6-R:,!6-F:Ad,]"AU*F:B2y,"@*"@*T:,A }0%%2@ @@-@( Q5F:B2y, @)"@)T:,"GAd }AUQ A~'+"@)"@,*%@56-%@C6-%@Q!%@X(j-@@ }p(~6-&@%+"@)"@,*!@36-&@A6-&@M @_-@@f(x }-@@"(6-%@7%27AdAU A%%2 }D(}7@<@,.-@@ 2(D-@@)()(Press Ԡ to run program }.,(,(!Press Ԡ to do description. /(/($Press Π to save descriptions.,(,(!Press Π to retu }rn to menu.B2y!6-F:B2y,!6-F:Ad,&!! @)"@A0 F:@ , @0A }@: AU@&F:AU,D@  A0X'AU@'AdAU]"@A }b@APl, 6.D:,67@,.7@<@,q%-@B:,!7<,0 % sK'@:7@ },,!@2)67,..K67%@,.7@<@,t A4 D:DOS.SYS .v A@+%Y#6 }.Can't run program. Error#C67B:,%@,.=:F:A,,Y6-?:C:,( --------------------B4 A`;B:, @ ;67B:,%@ },. )B:,!@ )6.7@<@ ,&07@<@4,&6-@8&67$@@&@" }<$@@,.8AR@"(}super directory" A0? A($-@@?( } A0SAVE DESCRIPTIONS ( $ A0@,@@ D:DESCR.DIR6 B@ A }@e@6.Error#667@,.=:F:A,,L6-?:C:,:,+ $RR104,201,2,240,9,170,240,5,104,104,202,208,251,96,104,133,204,104,133,203,104H }H104,133,205,160,0,177,203,9,128,145,203,200,196,205,208,245,96,0,0 D:SUPER.DIR  Y(;0 1A 1B 1C 1D 1F 1A 1B 1B ........}}d}} *K: f4r0J)ED VL+)D)E)}H)I 5),)0yW* 5 48A0+͠)& ȅ 5iilJ* 5L)NO SUCH ITEMSELECT ITEMh*L)UNI}MPLEMENTED FUNCTIONIH*ED 5 4L)HIT ANY KEY TO EXIT}DISK FIXER 1.0A: DIRECTORY ENTRIES H: DUMP SECTORSB}: TRACE SECTOR CHAIN I: EDIT SECTORC: MODIFY DIRECTORY ENTRYD: CHECK ALLOCATION MAPE: MODIFY SECTOR LINKF: SET DRIVE }NUMBERG: EXIT TO DOS,--k.++?.0D2j.)*)э)) )+L)+ 4 6 4j.L)USE WHAT DRIVE NUMBER}?f, 4 6 4  HH 2 5HID,E 5 4,a()) 6 )) 6 )) 6) ))b(E 7h h } 54L)MODIFY LINK OF WHAT SECTOR?, 4 6E. 6i. 4η)ɢ, 5  ]3 5E.i.E.L)D# FILENAM EXT FSEC} #SEC DLFIRST,LAST DIR ENTRIES TO SHOW?- 4 6E. 4ɢ, 5  ]3 5IHȍD-E 5f(g( 4,`(e()P(}( )) 6)()( 6)()( 4f(@D g(L )(j. 54L)WHICH ENTRY TO MODIFY?.  }4 6E. 4 ]3 5η))( (  2 5)JJE. 7L)6. 5L*TRACE FROM WHAT DIR ENTRY?BAD LINKD.l SECTOR 100: F}#=00, BS=00, FP=000 E0Y(.(-(?(E.  3(L,/)@L9/((( (  7 ) )   4})) ) )JJE.E. F420300 5L,/))HN)n)N)n)N)h08j)=(( 7ЍE.E.@L. / *4))η))}(*)1))Z뭲)50 5 4YY(*) / 54L)))))(]*)-) )N)갪*)-))    .  . })   2 5) 0j 5L/0X)  h `BUILDING ALLOCATION MAP...BAD LINK IN FILE # TYPE "Y" TO REWRIT}E ALLOCATION MAPWAS MARKED IN USEWAS MARKED FREE BYTEENTER START,END(HEX) SECTORS TO DUMP78 00 00 00 00 00 00 00 00 ..}......}10 4 6 &1 6 4000 1 81Ȍ   &10000L)h00h0hhl0h0h00HHl0 &1  } 2 K1 1` 5|0 500 1 p1` &1z0 5 1`0 F400` &1 ~100(0H {.00h F400}000˩0 5 1`}ENTER HEX DISK SECTOR TO EDITTYPE "Y" TO WRITE SECTORTYPE "Y" TO EXITENTER HEX SECTOR TO WRITE B}UFFER TO1 2 &1 81 4> 2 2(֢1 5 1 &1   2 K1ȩ1 5 4Y` 22 1   54L)P( w70 0}P( w70 0`hhLm22 5 4Y̩ 2 5 2 2 4 6 4  ` 4  F4M.  F4N.O.)JJ F4U.V.)) F4\.].))}  F4c.)  F4d.e.E 7 g.F.` 3E. F4P(Q( R()(S( )( F4_(`()( F4a(b()( F4d(}e()( F4f(g()(Di() Lj(k(P(`E.JJJii)i) ) ) )  4E.) )`(j.}RL74W SL6`)JJJJ Z4)) Z4` i0`i7`@ B Vi`OP())) 4 5`BPD(E}PHILV 4L)`0BPD(EHI V`,)0`L) 4 6 5` )))L^5)))P(,8ɛ4Q(,"ɛ}:R(.Q(α)P(AD(α)P(α)D(ȩ:(ȩ)P((ɛ,/α)穝5 5Ρ)))`P()P('NAME TOO }LONG B 5` 5 5`DE BIPH 5` VL)`I H5ED 5`m)D(iE` V0`*)}@ )?77L9677 5 B6L) Rb V V`BJ V`D(EHIB V0:͠(0 ͡()D(}EH V B V0```(D(E(8(H((IHI V0L6))))P()ɛ+,' w70)}.).) ))α)өI7 5Ρ)`))`Y7TOO MANY DIGITSINVALID HEXADECIMAL PARAMETER800 0 8 00`)-)}`-)))`77 8!8,8<8Q8e88888888899H9[9o9y99999999:29=9BREAK KEY ABORTDEVICE NOT READY(?)NON EXISTE}NT DEVICEDATA ERRORINVALID COMMANDDEVICE/FILE NOT OPENINVALID IOCB NUMBERWRITE TO PROTECTED DEVICE/FILEEND OF FILECOMM}AND FRAME ERROR(?)DEVICE TIMEOUTDEVICE NAKSERIAL FRAME ERRORCURSOR OUTRAGESERIAL OVERRUNCHECKSUM ERRORDEVICE DONE ERRO}RREAD AFTER WRITE COMPARE ERROR*AC* ERROR*AD* ERRORDRIVE NUMBER ERRORTOO MANY OPEN FILESDISK FULLFATAL SYSTEM I/O ERRO}RFILE NUMBER MISMATCHFILENAME ERRORPOINT DATA LENGTHFILE LOCKEDDEVICE COMMAND INVALIDDIRECTORY FULLFILE NOT FOUNDPOIN}T INVALID}})}@R R @ ҠТ  BQD@EHI VLA}٠ŠՠҠ} Graphics Patches by Fred Deutsch  Mini-DOS v1.3w written by Glenn Botts  Written for the Happy Enhancment}  Compatible with unenhanced Disk Drives  ԽԠˠŠĮϮӮ} All Done!--Press to Repeat} }Error # -Hit Reset to rerun e)  ԍЭ  ԍЭЩ1!@1 } YLBWC   S0n nB h   S0U nB S0M BIDAE(H V ԍe}L@ii `ԩ ؠ)~A BqDAE&HI VLBVLB}4L684W4 444 4~4 41W   4 4 4 S}48 44 48`mi i  i  4ũV  Y 448 44`J`j(*` 4` }4`4 4:4!4 V Y <45 44 44`RW-LY *4 4U 5R`4hh }4` *4΢    8I4 8iI4!44 44 T 504!44 4 48 44 4`}4H < h4h` hh` 3644'  364i4i`L7L);4 V14 4} Y` EȑE` 44N 0N`  4 `<<6D6E` Lj7<44}4Z[l<meT7eU7~eQ7eR7wE7ȱF7zH7ȱI7<97t?) CI C} "  KIi EiE)}@LoK    B   B=  0/=ɛ$L1} ٠Р}ҭǮ®ƮĮ d L E> CEE } eEeCE$EpEJJJii  o EEE)  )о )@     }0 E Lz  I   }L    G H%GI 8GC (HDCDDM  G H}G 2 09 DC0 }( L l 2 0 GGHCLz & 0`lˠ   L FC  h  CF` }eGGH8C CD`:`8}0`Cd = >Ci0?`D0C8DC0 `H BhDEHILV & 0U`  ` )}  -  o } })E𾩤` r =   L1ERROR -  SEL}ECTION?Not a binary fil}eNo run addressDOS SYS} Loading 7< ˠY䍣1    }DLI AND LOMEM PATC}H BYFRED DEUTSCH MINI-DOSBY GLENN BOTTS 0˭1̠) } I }ԩ- !L H ԍЍЍh@H@ԩfЍhL }Ҡl8kB D3?B4?x'687 X {== = V=)`8 A*B)C(D'E&F%G$H#I"J!K L8L}8L9LU9L9L9L:LH:Ls:L;L`Y"Ya>Eb>Sc>GW G WL'8Na>Ob> c>GWȍ G WL'8>YY>E>S}>-HYL'8N>O> >-HYL'8>YY>E>S>HXL'8N>O> >HXL'8 {=Π? = *= >h}HXYH<jB8jBJlB)  `8 >8 hHXYjBL'8?4? 1? <3?D} m B. Rotate color during load C. Screen off after load D. Title < ATARI ARCADE } >Modify disk parameters: E. Change Drive Number <1 > F. Change density G. Format disk } H. Delete *.SYS files Options: I. Disk directory J. Write boot loader program K. Exit to D}OS} --- TITLE LINE OF MENU ---Enter up to 20 characters usingupper-case letters or numbers orany special characters} which can bedisplayed in GRAPHICS 1.} --- DISK DIRECTORY ---Insert disk into drive number 1.Then press Π.}Press Π to continue.} --- CREATE BOOT PROGRAM ---Insert disk in drive number 1.Then press ٠ to continue }orpress any other key to abort.}Insert DOS disk and press Π.Press Π to restart.Directory could not be opene }d.Directory could not be read.Disk could not be formatted.*.SYS files could not be deleted.Could not write to sector  }Drive could not be configured.D1:*.*D1:*.SYS8GHwDȄ J01|i   ʽ O0 }A)=氤  iȩȽ 8 i泥 )i A8@ŰP    C D%C  }E F CCD ECFD džI Il}?  /l @ Y0} ) ~ Э ) } `%H$H`pppGhpAJatariarcadeWYwDȄ N@   } Y0ݩ   O Y0R@ Ѝ   Y0ӭ01/:0 1l i }  ʽ O0A)=氤  iȩȽ 8 i浥 )i "/ & 8@Ű  }h i/ X X/01"/   C D%C E F CCD E}CFD džI IlQ  $/l1R  @ Y0 )  Э  }`%H$H`,oadingpppGX pA: atariarcadeE&F%G$H#I"J!K L8L[:; 4 MIROUTINRATCCOLOCURSOQQQREQCNQADDQSUQLINQLEAA@B%@@(B%H} dPMCURSORfBY JERRY WHITEhANTIC MAGAZINEn } A x##MOVE MACHINE LANGUAGE ROUTINEINTO HIGH RAM.#-A"#%2-@&@(%} 2AR TELL THE HUMAN WHAT TO DO.8-@@8(POKE 752,1 TURNS OUR CURSOR ON+(+( PO}KE 752,0 TURNS ATARI CURSOR ON8(*(ENTER CURSOR FLASH RATE (1-64)4 A8!! @)!@dA}%@U>(&(ENTER CURSOR COLOR (0-255)0 A 4> B!! )!AUA %@t}.(.(#WARNING: THIS ROUTINE USES PAGE SIX!(!(AS P/M RAM (PLAYER 2).!!TURN ON OUR VBLANK ROUTINE. 6-?:,"}""RETURN CONTROL TO THE HUMAN.,-AR@("(BASIC*(IS-6SETUP SUBROUTINE.@C +AR@}1@@C@@9JROUTINE=SAFELY UNDER THET""DISPLAY LIST OF ANY GR MODE.^$$6-+F:A,&}@3,$AVh'('(PLAYER CURSOR BY JERRY WHITEr.(.(!MACHINE LANGUAGE ROUTINE ADDRESS=|((%(STORING DATA }AT LOCATION ($DATA FOR MACHINE LANGUAGEPLAYER CURSOR ROUTINE.##104,165,212,24,105,36,133,212!!165,213,1}05,0,133,213,162,7!!160,144,177,212,157,0,6,136$$202,16,247,164,212,166,213,1697,76,92,228,173,240,2,2401}24,173,43,2,240,4,169,0240,6,173,8,6,24,105,8 141,8,6,48,104,160,255,1690,153,0,6,136,192,8,208!!248,169 },10,141,194,2,141,20 208,169,1,141,111,2,141,27 208,169,0,141,10,208,169,0 141,7,212,169,2,141,29,208169!},58,141,47,2,141,0,212&!!166,85,164,84,165,87,13,14702,240,12,173,191,2,201,4:""208,35,152,24,105,20,168,138D "}10,10,105,48,141,2,208,152N10,10,10,105,39,168,162,7X189,0,6,153,0,6,136,202b 16,246,76,98,228,169,0,141l2#},208,76,98,228v0,0,0,0,0,0,0,240DATA IN LINE 630 IS THEPLAYER CURSOR SHAPE. D:NEWCURS.BASB%Hr&' OFSADCBELLROWCRCONSOPCFIO@!%} dS +'0@@@A0@@P( S(n((( REA!&}DS A TOKENIZED BASIC PROGRAM,x++(#DELETES THE OLD VARAIBLE NAME TABLE--(%AND CREATES A NEW VARIABLE NAME TABLE''(!'}IF NECESSARY, RESTORES THE LINE**("OFFSET OF THE CURRENT STATEMENT IF,,($NECESSARY, AND REWRITES THE PROGRAM.X1;!(}@,;A2,9@,;@,@6.>:AS,L6-@X6-B2yT(( Š# A@@!)}@J BT A'((ԠΠ' A\ A0!-@@.)@!*};)@N68,-%AV$R \ B(8@,A@9-@@+8,8&@,/ 9 A@!+}/' (%(Ġà/ A@((VNTP=8@,+-@ F:,@(VNTD=8@,?(VVTP!,}=8@,(-@ F:,?(STMTAB=8@,C(STMCUR=8@,*-@ F:,@(STARP=8@,C(96!-}-8@,&8@,$;,/67,.X9 A2@2(ӠSTARTϠŠ"&@&F:,@!.}A,&( (&@@6?6-8@,&8@,.6.7@<,?6.7%@,@@:,"!/}AUA0B/+("ĠŠŠŠٯΩ/D4N)4nAJd6-6.@-@8!0}@,&8@,@N6-%@d67B:,%@,.VTR67B:,%@,.=:,&6-@:7,,2!A'H67B:,%@!1},.R Ap^/!@c%67B:,%@,./ Aph& 6-B:,&67,.>:@:7,,%A(,r |, A(!2},67B:,%@,.>:,J$6-B:,&+8@,&8@,,8-@@F68,-8,%J &(&(Š!3}ŠŠd-@@+6-P:8,'AV,E*@8,&AV$R*@V d(@G6-!4}8@,&8@,G@:7,,@")@:7%@,,Ap#6-@:7%@,,#6-ApC6-@:!5}7%,,"@ #6-96-@:7%%@,,C A@L"@"6-%@+67<,.>:,.(L(ԠԠ!6}D A'0@@ @A0@@ @D-;@,6.hhhLV-ԠɯϠ›n!7} A0Af@36-?:C:,<@2,HF:Ag,@k(>:AS,͠Ġn&$o A0!8}Af@36-?:C:,<@2,HF:Ag,@l(>:AS,͠Šo&$E 6-C:,6-P:'!9}AV,-6-&AV$9AhEAiE 6-B:,6-P:'AV,-6-&AV$9ArEAs&$!:} D:UNLOCK.BASADCBELLROWCRCONSOPCFIO@   ,P ҥ . X0ɀ7Ш` 21 4 2 [ L1 ) 000 0 0 1 c 2 [ 1<}4 c 1:` 2 < c AC E00D& 'L\䩏,0,06LVLe1i1`) 000ߍҩ1=}ҭҍ ) `H) 000ҩh `#,ҍ ҩ(ҩҩ`23`@1` >H>h1>}`1E1`   L  51ʩ  F5j4LJ 41*1*> H) 1h )1I-Ӎө15)? @1?}5,02424 2H h4 )IL/ LJ @$% C(C$$5%:% 1@}ؠ.0 $@%H%$%5f DD `=*CEDCH hC 1A}DD dFCEDF     )"   @       01B}  EFL) ` Ҭ@@@ό@(` Ҏ@ @ (` V >*g)L  *F(    * + L1C} $h) * 0 sprL (h  3L !0h% "$#& 0$ .Bh $pC1D}P ,   zj LL & fjltu`  $h)ipqL/ V ߰"g)1E}+lk 3 $/l/G@jjLL[ j08`(I")>0I(0$G%H  ] (  38(k()1F}8(ȥ)FI`$GȘklL] Vg)L+lk L G/Șlpq k L V  *L Vg)i>jl1G} IfJJ& %   $ uHtHg)hH + hh rpsq Q$hyhy  3gL>j Lf1H}*` V"X%'8  HH`7 8L[ #+) 0 >P?8@f  *!"ʎ= 4 1I} <F GȱG L+0  ^LE,=0 *   &$Eʈ1J}E ʽE7EȩE,= 0EȩE 3% %`dJ ? ` > J P[  * 1K}C$P?C[%[ ,( ^  @ C LLB,h    h ^ @tuth,  1L} 3L 0 *h + tu  E` > Lh ,C $)C  L$) ` j0@MoL1M}nj jMqLp NklL  lNnLoMLN L 6  p) 0>ikIk81N}ljmO Y  L S  f) (`I $(I0`G/IɛIL1O}I  L Q ECȱE,= CqECȊqEC  G LL SROTCES EERF $H0 C ) *,-,?, Gh1P})H<, GȽG h>, GȄI$ +d   1GI`'DC8C'D 0IGIDC`1Q}$0Z:ȩ'$. ȩ "* ?'?/ɛ '  'ÝPнP .` !%&p$&$i1R}%%h $=H*"" h0Ch h0!)C)зP?Щ !%!$"&#08.`j01S} g j 0#\ lGqfGȽpG  gLtu pqlk`8onH h<LpjЌpq8` 1T} 05lG)f'G)qȱGpȱGHih0})Hhk`L"!" pnqo`h8$ %ii`E"` )1U} dLEfE8$EF h( ,=0(`( dfEFEi (< p0`ɃL @ nH)h1V}o7Hn^oji "0 "hEEdEiEȱEiE`h`hQEEd h) hE8EȱEE` 8E QEE1W}H.8 pp*qhpp  q`  "! ! !0+&#  1X} ! !5E:F .m.  .mm@GHH`(ʎ=<`no K1Y} g $% 3L*L$./k<, +    8 vI0 `$ݯLL1Z} .(`DOS SYShChDC .C/`0.m m. }}   $%1[}Ll`c 2  ) > * l 4% l P   Tۍ# B o0N#@1\}#;  o=0 ,0~ }HH0 lhh` H hED L1]}8HIHIۍ V0,0 MLlD:AUTORUN.SYS} h V\ >E ^D5FCECECED1^}FF""I өύ@ԍ`ϩ )`  > HCEϼ%' ) Z$41_} ) *` lLz$l|DFqCqE ` KL  (`E:D1:SDUP.SYSHILV lL n`  1`}`  B L^3JBLVDE`sssdex $@D:DUMPALL.SAV*DUMPALL.SA0}H$5R&+('''',1'-_0y-[,',666666N666ppF  @  إ  ʎ0ʎt$0%b}!R%SٍHy% &3,0nPL79$ 2 @ 1ɛDLw9B8A0f$ H$I$l %c}1 l%" 1 (`H 1h":" 1NLc&*.RAM/N,8:*/N}SUPERDOS V2.9 (C) 1986 PAUL NICHOLLSA.DIRECTORY|F.LOCK FILE|K.%d}BIN. SAVE B.CARTRIDGE|G.UNLOCK |L.BIN. LOAD C.COPY FILE|H.WRITE DOS|M.GO ADDRESSD.DELETE |I.FORMAT |N.RESTOREE.RENAME %e} |J.COPY DISK|O.VERIFY=ON 2 1 40$:*.$$ >3 2 1$N U3$%f}8$L)$DL)!h??R?@@"h??Z?D@!h??R?DA@ SEDX& &5&"H 21, 1hi`h`J$K5L%g} 2  19155 1 2  10&55 &H 2I 1T$h '? 2H 1 1 1 ' 2 "%q}B#BLKRABITSAVB-'PRINTSETSAVB-TEPSET SAVB'SUPERDIRSAVB(DISKFIX3OBJB%MAKEWARPOBJBADDMENU OBJBPMCURSORSAVB$UNLOCK2 SAVB$aSDUP SYSB*RDMCARDSSAVB@FILDSORTSAVB&;DOS SYSB>PTRFONT SAVB@?GRAPHIX SAVBBANNER SAVBDOODLE SAVBAUTORUN SYSBMENU  2# 2$H 1 1hB ^3L$ 2 1 1D 2L$!N΢ B5 :15 (# B$%r} o#0V$$$0 +# 50.5 #5 0?5 2 1Э$$ ^3 L( L$ LU3 2!0?%s}2 1$$D I0L)$$$ (B $  o $0 : L$$$$$  +0"$q- + $ %t}5 $ .5Ƚ $ 5 * /5  + >3$H$H$ +$h$h$$DA )R +5 5L >3 %u}+ 1 + + / +$ {+K +$ +$ {+0 K,$p [+$ o+$$H$I V$La3 e$%v}#ɛ #,$P- *,$ ) $$ >3 A ,$0$ e+$ m+$HHIIH ^3,$P $0,$P$ L+0 * %w}L)$ $  3,$-P *L( 2<296 2<0ƌ 1,$ L$N 2! 1 ` 2!-` 2L($LU3%x}$"ɛ +$ I0 O+$ O+""L2":` A $LU3 B$$LC$L@ $$%y}`S KE` 2$ L$ 5`1:5`$1:̱5L+ӍӬ(` +U +4) 25 %z} 1! ,L$ 2B5 1( ,_ \b \ 2&L$ 2B( ) 1 3 1~~    %{}'SLz8j  L }I}P ,O&P&L$N F` 2*+, 1o-580$ 1 2*+ 1L$ 2* 1H 2%|}*#+n-  U3 hYҢ bo-$ >3H$5y11H$O1L0D1:DOS.SYS 2 / 1 /(%}}Nʎ 1 jLd3 2./ L$ 2! 1, 2H02?3 1 4$ 4$ 05 3 $ $ $ $ $ 3 %~},$ 229 1$ 1 /L$$$ 2<=, 1$E#FE$0 * /$// %}$ $5,0 s/I$+I /L. /1E y/m$m$  |  8L%}T.,$0 *,$A$ H H$$$l/p/ & 'B ^3h h E#F$ /$L+L}.L$$$8%}$( vڭ   u3 2.1ʭ`$ H (*$*$h ʩLd3" n o%}L 2467 1%~$586 2:L$$#$$$`"* ? ɛ,` 2>3?AB11O1 1%}H$ 3i 381L$1) 3 11 3 1 O1hA S3 BI%}./&5COLOCOLOUCARDCARDCARDICOUNDEALT@r@@vA@)}A A >5 @ @ AP @!A56-A 9@R, 9@R,9-@@R&6)}8,-568,-9  +@0@0@@0@)}@0@@@aa XCARD DRAWING SUBROUTINE, INSERT YOUR OWN CARD GAME BETWEEN STATEMENTS 110 AN)}D 10006-@6-@#!@`@'DRAW CARD(5 @-%@ #,1/%@)}5 * P @d!A0Ai6-%@  @@n'6-%@%6-@' @0DIAMOND)}S @#,%@%@9/%@%@O,%@%@e/%@%@{,%@%@)}/%@ %@,%@%@//%@ %@E,%@%@[/%@%@q,%@)}%@/%@%@$ CLUBSe @#,%@%@9/%@%@O,%@%@)}e/%@%@$[,%@%@//%@%@E,%@%@[/%@%@.[,%@)}%@//%@%@E,%@%@[/%@%@8E,%@%@/,%@%@)}E/%@%@B$L HEARTSV @#,%@%@9/%@ %@O,%@%@e/)}%@%@{,%@%@/%@%@`q,%@%@//%@ %@E,%@%)}@[/%@%@q,%@%@j# @#,%@%@t$~ SPADES @#,%@)}%@9/%@%@O,%@%@e/%@%@{,%@%@/%@ %@)},%@%@//%@ %@E,%@%@[/%@%@q,%@%@/%@)}%@$ KING,%@%@//%@%@E,%@%@[/%@%@q)},%@%@/%@%@$ QUEEN,%@%@//%@%@E,%@)}%@[/%@%@q,%@%@/%@%@[,%@%@//%@%@E)},%@%@[/%@%@ $ JACKS(q,%@%@//%@%@E,%@)}%@[/%@%@q,%@%@2$F TENSPZ,%@%@//%@%@)}E,%@%@[/%@%@q,%@%@/%@%@d[,%@%@//%@)}%@E,%@%@[/%@%@n$x NINES3,%@%@3/%@%@q)},%@%@/,%@%@E,%@%@[,%@%@q/%@%@^,%@)}%@/,%@%@E,%@%@[/%@%@^$ EIGHTS_,%@%@3/%)}@%@I,%@%@_,%@%@,%@%@//%@%@E,%@%@)}[/%@%@q,%@%@/%@%@2,%@%@//%@%@2$ )}SEVENSx,%@%@3/%@%@I,%@%@_/%@%@u,%@%@)}x$ SIXES,%@%@3/%@%@I,%@%@_,%@%@u,%@%@)}/%@%@"^,%@%@/,%@%@E,%@%@[/%@%@^$@ )} FIVESJu,%@%@3/%@%@I,%@%@_,%@%@u/%@%@)}Tt,%@%@//%@%@E,%@%@[,%@%@q/%@%@t$r FOUR)}S|_,%@%@3/%@%@I,%@%@_/%@%@2,%@%@//)}%@%@2$ THREESu,%@%@3/%@%@I,%@%@_,%@%@)}u/%@%@H,%@%@//%@%@E,%@%@H$ TWOSu,%@)}%@3,%@%@I/%@%@_,%@%@u/%@%@2,%@%@)}//%@%@2$ ACESu,%@%@3/%@%@I,%@%@_,%@%@)}u/%@%@^,%@%@//%@%@E,%@%@[/%@%@^$:)}$%%6-P:H:,$@R,%@ 6-8,"@A 6-AP68,-@6-%@)} 68,-4C @6-@% A36-$@P9 %C A>M @'6-@% AP=6-+&@)},$@PC %M AHM @@6-@% A=6-+&@&,$@PC %M ARA6-@ )}AP16-+&@9,$@P7 %A AD:CARDS@r@@vA@(>^__ SORTFILEFILE2DRVDR2PROGPROG2SDRV2DRECCRFIELKEORDEMPFLEFPOFNUBA-} -}S."D:-}FIELDSRT""""Ԡ""""(fixed l-}ength record sort)"""" "" -} (}@@ :(Advanced Data Base SystemsLAA(^AR@p@@dB7t@d-}@.@@K:E( for directionsH(_( for sort programo( |)@-}(>:,$"@h@$ B$"@@$ A!!@h)@@dgG;@-},;@,;@,;@,;@,;A,`6-+I:,&A,g;,i% 6. 67,. %67@-},.nm (>:A%, one moment ..* B7(>:A%,:(LAVA ^@@m( p (-} (rx@.@@K:>( O( `( t-@-}Ax sAVA$t-)@6-&@H-(Ž u%"@6-% A v%"-}@6-@% A w!!@)@Ax 6.6. 6.D6.D( -}5 @)!@+( ϠȠ5 A@3 6-B:, 67%@,.=:,367%@,.:&("(-} &5 @)!@+( ϠȠ5 Ap3 6-B:, 67%@,.=:,367%@,.:-}7 6-B:,67%@,.&6-B:,767%@,.b(!( %.6-B:,?67%@,.H6-B:-},b67%@,.7@,)()(ԠŠˠΠ ))@-}.@@K:@@@ R@@p(Ӡ٠٠Ϡ})@@(-}}1.( 7@, 1(5@ AD5@@1)@"-}AU'@1 A7 (>:, A34( (#(SORT ON WHICH FIELD '4(>:A%,?6-6--}'6-36-@?6-5 AD@5@@26-%@%6-%@$+-},2)@nF:A,"Ap8(7@, NOT ON DRIVE B BEgTAd67@,.n A-} (>:,"AQ9"@26-&@+6-%@9AU"AUAi AC-}6-%@)@ (>:,"AU*"Ai"AU*A"@2AU %-}@2*6-%6-@  AC *@6-&@*A((RECORD LENGTH IS ##(FIEL-}D TO BE SORTED ON IS (FIELD STARTS AT (FIELD LENGTH IS  A6-%@A 6-}-& AqB(6(}THERE IS NO FIELD  IN THIS RECORD.B6-@:(3-@-}A7 :%"9@;&@,+6-&@96-&@,(( 1( -} 2#"#(3$"@$(4(6+@+@-}@@ AJ 6-T6-%@^1@17@<@,4 APh67$&<$,.-}r A@%@%(&@ ( 箮&&6-?:C:,(@7$&<$,H z@ A^&(-}ٯ1@Q@@K:^)@$"@@$ AP$"@x-}@$ A !!@)@xA'('R' H(S-}@s@@K:)@$d"@'6-%+",2@8(};(Z(-}d AP.$@@$ AU_@.@@K:R(}-}ٯ_)@"@%4"@x@$+1(basic is4!!@)@x-}A 'I (}I(;Quick sort was designed to sort fixed length record files.'BB(:The records may be sorted in asce-}ndingor descending order.'EB(:Quicksort will read in one record and display that record.E($'33(+You then choose the fie-}ld on which to sort.)'p(+( The field choices are numerical.p(@The first field of the record is 1, the second is 2 and-} so on..'UU(LThe total record length will be dis- played, followed by your field choice,8'JJ(Bits starting position in -}the record and the length of the field.='''(>'AR@L'@.@-}@K:@@@!R@@b( To continuet@@"@@( -}Q'()@@((>:A%,*?@'@@<(?(*kk(cNumerical f-}ields should be padded with zeros so the field is the same length for all entries.+(+&&(100 DIM NUM$(-}6),Z$(6),REC$(35) +""(110 Z$='000000':INPUT NUM$ +GG(?120 J=LEN(NUM$):L=6:Z$(L-J+1)=NUM$:NUM$=Z$:Z$='''':REM CLEAR Z$+-}&&(130 J=LEN(REC$):REC$(J+1)=NUM$+EE(=This insures all numbers input will bethe same field length.+'((000001(-}093454'(123456H+7@@ '@@7( To continueR+xAU@'@@!9@@-}I( [AU@xF:B2y,@BW+AU@ A.& N ML SORT$N-}-@A%N"67<,.>:, *Nll216,104,56,233,3,133,217,104,133,204,104,133,203,104,133,215,104,133,214,104,1-}33,210,104,133,209,162,04Noo104,104,157,0,1,232,228,217,208,246,56,165,209,233,2,133,209,165,210,233,0,133,210,48,108,165,2-}09,133,211>Nll165,210,133,212,165,204,133,206,133,208,165,203,123,205,24,101,214,133,207,165,208,101,215,133,208,160HNll0-},185,0,1,190,2,1,134,218,190,1,1,200,200,200,132,216,168,136,177,205,209,207,240,12,165,218,208,4,144RNoo16,176,46,144,44,1-}76,10,200,202,208,234,164,216,196,217,208,210,198,211,169,255,197,211,208,6,166,212,240\Nnn11,198,212,165,208,133,206,165,2-}07,24,144,172,165,213,240,4,134,213,208,148,96,134,213,160,0,177,205,170fN==177,207,145,205,138,145,207,200,196,214,208,241-},240,203N9$9STOP :REM X=USR(ADR(SORT$),ADR(B$),35,REC,1,10,0 D:FILDSORTORDEMPFLEFPOFNUBA,TH, H  ^3yHIHI  `11⪍ w1O1ઍ w1 %}iL$ Lo 1B" ( o$`'"$$$` 1Y` 1L$`%H$H`,$L$$%}$$L\2$ 1 >3$$ $",;ɛ7","ɛ:"1"$"A"D$$"$Dȩ:ȩ"ɛ%},,(/+.$$ 2D$",ɛ$$`""hhȄDH)M4CHhCIC%}H)C4$h 4$ȩ4$ #3Dh 3DeiHH`M4H BDEI V5`m$DiE` JB V%} u3  2CL$Ԇ ؠH)5h 5`$$$$"$ɛ<,8#<800& 0 8 0.$.$ $$%}$ 2E$`$$`" ذ :4 ٰץԦ`,$0!$"D800 H :4h`$"ɛ,$`DUDIRECTORSEARC%}SPELISFILSELECITEORETURWHICDRIVTFORMA"YDISDENSIT(S,E,D,RENAMOLNAMNEUNLOCLOCNODELETSKEWE%}RESTORCOPLONINOPTIOALLOWENCARTRIDGAADDRESWRITDOINBALOASOURCSECTODESSTART,ENIF OBASIDESTROPROGRAA%}REINATIOENOUGROOINSERBOTSAV()INIRUERROINVALIPARAMATEҠGIV1139 D1:DUMPALL.SAV ?$ESTROPROGRAA$oEiͩkΩ͙kCop j`j {j`Hi͝Νh`E}L"UNEM:D"NURͩkΩ͙kCop j`j {j`Hi͝Νh`D#$|AXLPB0NZ<( ((@@d"( I} +AdAU0@@@70@@Q0@@@c@@I}u@@7{(}AR@++(#++(#|ANTIC DATABASE MNGR. & DISK UTI}IL.|++(#++(# @ -@AI} $ GG;@@,;@ ,;@@,;A,;@,;@@, "D1:MENU" &&@@I}D:*.* 6,6." 6 @0i6-%@(6.7@<@,A67@ <@ ,.J}.i67@<@,.7@<@,3 6.|67B:,%@,.367B:,%@,.G67@<@,.(--J}.DLOBYTCURBLNKFS1FS2FC1FC2MTXZIPTTTCDAFILENAMEDIRCCL1L2L3L4L5YNTOFLADDOONUL6}IMTOMSTARDLPPCC@ @ 6} 6} !"#$%&'()*6}+,-./0123n **************************p * 6} *r * By Dave Elwood *s *Sherman Oaks ca. Sept.84*v **************************A +@A6}R@A6-F:Aa,$AV%F:A`,-%@%@0"  ''66,96,159,2,2,2,2,2,2,2,2,2,26},2,2KA@R'A@R9A @KA@2-@@2(@*** PTRFONT6 } *****(" CREATE A FONT FOR GEMINI PRINTERS.(.(#  By Dave Elwood Sherman Oaks Ca ee;@,;@,;@6 },;@,;@,;@,9@<@,;@#,hh9@,;@,;@,;@,;A#6 },;@,;@,;@ ,;@,GG;@,;@,;@,;@,;@,;@,-!66 }. -6-AHD-@@+-@@<68<,-@ D g +A6 }%A7AR@C6-AO6-[6-@g6-@9 6.6. 6.'6.06}6. 96. " A" A@, - (-%@(6P6-6-R:,46-+"@,&+"@,P66}-+"@,&+"@,@(6-&+"6@,(6-%+"@,J+),AT+@+F:B2y,"@A 6}Y"F:B2y,"@" A#^T:,"@ c6-@i#@hL"6-@!-%(6}3-%@7(H68<,-@L r@6--('-%@+(<68<,-@ | 6-6-"6}@A "@A`"@A A "@ ($8&@<&@,"@6}( ($8%@<&@,"@(  Ap"@ "@*"@ U6-&+"@6},46-&+8&@<,"@,K6-&+8<,"@,U Ap"@ "@*"@ U6-6}%+"@,46-%+8%@<,"@,K6-%+8<,"@,U Ap"@ ($8&@<%@,"6}@( ($8%@<%@,"@( :5"-('-%@+(5 AD - (-%6}@(N 6-%6-%-X:8<,"@(&-%@*(66-@: b)(-%@(%6-6}) l##@@K:v0-@@0( Store this character.-@@.( Delet6}e a character)-@@)(from stored set.-@@.( Send stored set to%-@@%(6} the Printer)-@@ )( Save this Set,-@@,( Recall Saved set0-@@0( 6}Erase this Character*-@@*( Return to Edit0-@@0( Print this character+-@6}@+(in Block graphics*-@@*( Disk Directory -@"@ (WHICH?)@6-&6}@H!! )!@ A@OOAA@A@APA AeApAA#(6}>:A%,Ok!...# AP-@@ -@(  */-@@/(6}40-@@0(==>>4ApH 6.6.R/-@@/(OK!--Addin6 }g character\8-@@8(''To the current set f6-%@67<,.p-67B:,%@,.-Rede6!}fined Characterz%67B:,%@,.%No Decender11*** Ԥ ***2-@@6"}#6-268,-9-@@@96-$@%+"@,68<,-$+8<,"@,68,-6#}8,%8<, !67B:,%@,.>:8,,! ,#6-+&@,$@%@,67,.B"@8($} Set6$} is Full 'SAVE IT NOW!'B A0(}Wait... AP,,*** ***3( }Working...36%}@@P:P0(@>:@',>:@B,>:,PCopy Normal Characters to RAM$:-@6&}6@:6-+&@,$@%@8[?(@>:@',>:@B,>:@,7<%@,[Define Download C6'}haracterBO0(@>:@',>:@6,>:@,OActivate Download CharactersL V&"(}Print out the set (Y/N6(}) &` 4Y(@j%@(}Wait...% APt*** ***~7 Ap*@@6)}7(@!!-@$@@C(@7<%@,! ,@9(}Wait...C AP6*}*** ***) 6. 67A#,.)67@,.B Ap@5@@B6+}@!!-@$@@I@#67<%@,.' 2@?(}Wait...I AP,(>:6,}A%, A",AR 6.D:((Filename67@<@,.$*** 6-} *** 0 A0@@D:*.*@( A6@)(Hit to continue66.})@(AUA2(}Wait... AP<$$*** ***F.-@@*(6/}.K ( }Deleting  Wait...P 6-C:,Z-B:,@d>:F:%,,4An xL60}*( }Character '' Not in this Set>-@AB L AP/-%B:,%&@+F:%@,/ 0661}-&@&67B:,&@,.0 AP!!*** ***B:,"$5 6. 67@&,.)662}7@,.56--@B:,@%6-%@!67<,.7<,% +-@ (( Ԡ63}Ժ+$*** ԠР ***6. 6. 6. | | "6. | 64} |,6.  6)-@ @)( For Menu;--@ @-( Change color@/-@65}@(+-@@/(T-@@@^3-@@%(/-@@%3(h r66}3-@%@(/-@%@3((-@%@(% A($*** ***.67}@.@@P:C/(@>:@',>:@6,>:,CCancel dnload set7((@>:@'68},A>:@,7L/F=1/2 inchF/(@>:@',>:@,>:@,FUnidirectional Print-@@69}@-@@N8<,"@6(@>:A9,>:A9,D6-%@N Au(@6:}  (@-@@N8<,"@6(@>:A9,>:A9,D6-%@N A6;}(@   (@( ((@>:@',>:@d,@ Ap9( }Error # !(F:6<}A,9( Detected Try againA@@4(Hit to continueA)@AUA" 6=}(}Wait... APX6-H:,$AP(6-%@4A@AT-@@PX  F:B2y6>},"@$ A# D:PTRFONT.RUNMTXZIPTTTCDAFILENAMEDIRCCL1L2L3L4L5YNTOFLADDOONUL4/TUUKATEMPANSCPT6SSCHOICMSMSYFAPPCXFAXYTEMYBRTHFAMAWIDTD@:@} :A} $$***************:B}***************$$**$$*ؠ*($$**2:C}$$**<$$**F$$*Įˮ̠*P$$*************:D}*****************Z))DIMENSIONS AND CONSTANTS **********dAA9@<@,;@$@,;@,;@,n:E}E6-B EADDRESS OF LOWER CASE ALPHABET IN ROM CHARACTER SETx6-@e6-@$, A,SET UP DEF:F}AULT SCREEN VALUES26-'A2STEP SIZE, 1/100 OF THE CIRCLE +@H%6-F:@,%AV$F:@,HADDR:G}ESS OF GRAPHICS 8 SCREEN RAM,''TITLE ***************************6 +AR@@5@@'@:H}@5  ؠJ>@@'@@> by D.K. TitchenellT?@@'@@ :I}? ȠԠϠ^ F:B2y,"@APcARh. * R)ead from file or E)nter data.:J}rP 4E A$ A&) APENTER DATA AND CALCULATE PERCENTAGES| 0R A`: A( A&:K}:READ FILE, CALCULATE PERCANTAGES9 F:A,A`9FILE READ UNSUCCESSFUL''MENU ***********************:L}*****-AdAU-EMPTY KEYBOARD BUFFER+ + +  ՠ   ENTER CHOICE:  :M}( 1) PIE GRAPH(( 2) BAR GRAPH(! (3) PIE AND BAR GRAPHS (&(4) ENTER NEW DATA(0(5) LIST PERCE:N}NTAGES(2(6) READ DATA FILE(4(7) WRITE DATA FILE(:(8) EXIT(?))@:, @:1,)@:,!@:8,A:O}D 6-A:,N"@b"@ Al"@ A q"@ Av#"@ A:P}$# A&"@ A#"@ A(# A&"@ A) ALLPIE AN:Q}D BAR COMBINATION CONTROLL *************************************A +@'0@A0@@@:R}; 6-;SET RIGHT SIDE OF BAR GRAPH TO CENTER OF SCREEN?6-%'@?SET CENTER OF PIE TO RIGHT HALF OF SCREE:S}N6-@ESMALLER PIE6-$@'+ A+PRINT LABELS IN TEXT WINDOW A PLOT BAR GRAPH/ :T} A/SCREEN CHARACTERS FOR BAR GRAPH' ,/'SEPARATE GRAPHS ADRAW PIE' A'CALC:U}ULATE AND SLICE PIE/ A/SCREEN CHARACTERS FOR PIE GRAPH + A+RESET DEFAULT SCREEN VALUES: F:B2y,:V}"@A:WAIT FOR CONSOLE BUTTON$ ''PIE GRAPH CONTROLL ***************A +@'0@:W}A0@@@4+ A+PRINT LABELS IN TEXT WINDOW> ADRAW PIEH' A'CALCULATE AND S:X}LICE PIER' A'PRINT SCREEN CHARACTERS\ F:B2y,"@A`f$''BAR GRAPH CONTROL ***************:Y}A +@'0@@@A0@@@+ A+PRINT LABELS IN TEXT WINDOW A PL:Z}OT BAR GRAPH' A'PRINT SCREEN CHARACTERS F:B2y,"@A P$''SPLIT IT UP ******************:[}***  , /&6-ANGLE POINTER-@""6-%+8<@,$,'@$((6:\}8<@,-P:+G:,$$@,%,.((68<@,-P:&+E:,$$@,,888<@, 868<@,-8<@,&@:]}=88<@, 868<@,-8<@,&@B/6-%8<@,$/ADD TO ANGLE POINTERL6-+G:,$,%:^}V6-&+E:,$,j ,t /~ $''PRINT SCREEN CHARACTERS *********-@776-%+8<@:_},'@%+8<@,$@@,,-@00%+$@@,F:%++&@,$@,%,  :`}$''LABELS **************************AR@(!6-@ @!6-2 }<-@FH:a}H >:@:a,%&@,. 7+&@,$@%@<$@,P  Zu @*%@u >:@:a,%+%@:b},,. 7++%@,&@,$@%@<+%@,$@,_ @* %@ a"@*"%@:c}v >:@:a,%+%@,,. 7++%@,&@,$@%@<+%@,$@,NO LINE FEEDx  @:d},0/A0SEPARATE TEXT WINDOW FROM PLOT$''DRAW PIE ************************ @:e}""-6@@' 6-+$,6-M:@&$,$ ,&&/%& ,&%/%%" :f},$@''SET UP DEFAULT SCREEN VALUES*****J+6-@e+VERTICAL EXPANSION FACTORT16-$+@',1HORIZONTAL EXPAN:g}SION FACTOR^"6-AY"BOTTOM OF SCREENh&6-A&RIGHT SIDE OF SCREENr/6-A`/MIDDLE OF SCREEN X COORD:h}INATE|/6-@/MIDDLE OF SCREEN Y COORDINATE$''LIST PERCENTAGES ****************! }  TOTAL = :i} ! -@[X 7+&@,$@%@<$@, = 8<@, = 8<@,%[  :j}  PRESS START F:B2y,"@A`$''PLOT BAR GRAPH ******************6-A '8<@,6:k}- @6-+&@&$@,'-@6-%@%  ,/&+8<@,$,:l}  ,&!-&&+8<@,$,*Ae@+++@@S:468<@,-P:&:m},>0068<@,-P:&@&+8<@,$,,H R$` ''DATA ENTRY **********************j &AR&:n}TURN ON CURSORo <67@,. -67@$@,. <67@,.t +~ )  % ENTER NUMBER OF ITEMS :o}) A!@) @7 SORRY, MAXIMUM IS 8 ITEMSA A$0 -@   INPUT AMOUNT # 6:p}8<@,-   INPUT LABEL # GB:,!@(=(PLEASE SHORTEN TO 13 CHARACTERSG A$ EB:, @:q}+-@@&B:,A67B:,%@,. E  0067+&@,$@%@<$@,.   $( ++CALCUAL:r}TE TOTAL AND PERCENTAGES *****2 6-6-@< -@F 86-%8<@,28<@,!8<@,:s}86-P  Z -@d ++68<@,-+8<@,',$An  x $ ''READ FILE ***********************:t} A 3 } 3 "ENTER FILE SPEC ('D:NAME' OR 'C:')  A( @@ :u}@@" -@, !@!68<@,-6  @ M@#F:A,I ERRO:v}R F:A, PRESS RETURNMJ  B$T ##WRITE FILE ******************Y A^ 3 } 3 "ENT:w}ER FILE SPEC ('D:NAME' OR 'C:')h  A)r @@|  @ @ -@:x}  @8<@,   M@#F:A,I ERROR F:A, PRESS RETURNM  B:y}$ r;A,$-@@a("6A5%: \6-F:@,%F:@,$AVr6-%@@$A ;;PO:z}KE IN M/L PROGRAM AND SET UP DISPLAY MEMORY POINTER /3>:@',A>:@,/-%@9 $$SET LINE SPACING AND :{}MAKE LOOP 96.>:,*67A,.>:,967@,. B6-?:A6<:@',K>:A,>::|}, 77PASS BOTH VALUES TO M/L PROGRAM, AND PRINT STRING   ll104,104,141,21,6,104,141,20,6,104,141,27,6,104,141:}},26,6,160,193,173,255,255,136,240,35,141,255,255,238 cc26,6,240,21,173,20,6,56,233,40,141,20,6,144,4,24,76,19,6,206,21,6,7:~}6,19,6,238,27,6,76,33,6,96 D:PIE.ABSMSMSYFAPPCXFAXYTEMYBRTHFAMAWIDTD@8,=> KBCACHBITNPRTBCNAPTOCOPCDCMEINWHPBYA A7 Ams@@A >},) *, V BsD @ @@@@BwY>}@@ KK**SIGN PRINTER 1.0 DOWNLOADED FR OM ALPHA CONTROL, CHELMSFORD MA2/7/83 K. W>}ARMAN``THIS PROGRAM GENERATES BANNERS ON YOUR PRINTER USING THE ROM CHARACTER SET.FFIT WILL WORK WITH >}REDEFINED CHAR ACTER SETS (ONCE POKED IN)^^REMEMBER TO CHANGE MEM LOCATION IN LINE 1040 SO 'TOP' IS (PAGE I >} N RAM * 256) ;@, 8 +%( INSTRUCTIONS(Y/N))84@4NAb(b(W This p>}rogram prints and correctly proportions all UPPER and lower case characters.(AA(9In addition it will print and >} characters.2(((( You will need the following:<--(%1. MX-80(or 100,or equivelent)printerF""(2. The 850 I/>}F must be .P**("3. Printer must be ready to print.ZOO(G This program will print up to 300 continuous characters an>}d spaces.dTT(LIn addition you may specify the heightof the printed character(# of columns)nII(AUp to 80 columns on 8 1/>}2 in. paper or136 columns on 15 in. paperx[[(SAll characters will be printed using the letter itself except control char->}acters.==(5Control characters will be made up of character #133.( Hit ]]9@,9@,9A>}(,;@d,9@,;@ ,;A,;@,3#@@P:3(@@6->}68@,-@-68@,-@B68@,-@W68@,-@l68@,-@68@,->}@268@,-@d68@,-A(';A,;@ ,'6-BsD,-@@2(68,-%@c>}, $,-@3@(68,-&@3, .,-@A((68,-&@, 8&&(} SIGN PRIN>}TER 1.0B)((ENTER YOUR MESSAGE :%()L4AV6(DOUBLE STRIKE (Y/N) 60Y*0NA` >}4Y(@EGj* A0&(SIZE (# OF COLUMNS)*t @A0~%6-P:'@,%6-P:'@>},!@A0 -@67,.   B4-@B:,"-@067,.7<,4 >}6-A@:7<,,!A'567<,.>:@:7<,,&A(,A6-@'7<,1*7<,2 '6-@W6.7>}<,6-@:,K"@)"A#)"A%)"A&)"A'W6-@8"@-@(67,., 86>}-$$6-8@:7<,,%@,$@6-%&@ 6. APf-@@4-@@>}6@f6-A:7$@&@%<$@&@%,, #"@#67B:,%@,.#"#67B:,%@>},.4 -@"(@& -6.1 43( 2<BYTE TO BITS TRANSFERF"-@@"6->}F:%,P -@@6@Z=68,-P:'8,,#8,!.6-&8,=68,-@d/68,-8,% 8,">}@/68,-n x/-@@+68,-8@ &,/ >-@@:67+,$@&@%,>}.=:8,,>    $ D1:BANNER.SAVTOCOPCDCMEINWHPBYA A7 Ams@@A <,_`XXDYYDSCMABMICMIOOBOBMABARSCCBLNZSTARCCCCLAALDDXCAU@AB}A@yA`@@@ @ @ @ @@1A!@AB} @r@3@q@x@ @ B}!"#$%&'()*+,@- , +ARB}@"(, ApL6-F:Ad,$@w0AUBAdAUL @ T:,"AB}(C6-%8R:,,+6-%8R:,,7 C6-@y2!@y6-<!A`6-B}F 6-A`P& O:&,,,& @ Z"@A@d/"@5+6-%6-B}/ A0nE 6-6-%@6-+6-%@96-%@?!E6-x !6- A`E 6-6-%@B}6-+6-&@96-&@? E6-  6-%,8,A%/8,A P:?P$,B}P:?P$,0,8,A)/8%@,A-0$T:,@ C6-%8R:,,+6B}-%8R:,,7!@xC6-@ @6-@x @6-AY!AY6-@wB},&@&@//%@&@=,%@K/&@a,&@%@w/%@%@ AB}119@,9@,9@2,9@,A6-#-@@'"068,-4"=68,-A "GG0,B}0,0,0,0,0,0,0,1,1,1,-1,1,0,0,0,-1,1,-1,-1,-1,0,0,0,0,1,0,-1,0,0,(-@@2"$68,-( 6dd8,11,12,15,16,19B},20,23,24,27,28,31,32,35,36,39,40,43,44,47,48,51,52,55,56,59,60,63,64,67,68,71@l (>:A%, INSTRUCTIONS?@@@B}K:M)@X@l"@AJ> +:(>:A%,ENTER GRAPHICS MODE(9,10,11)>TB}s"@#(WHAT LUMINANCE'36-@?6-@1K6-@O+c0@i6-s A^"@ B}*(WHAT BACKGROUND COLOR.:6-@F6-@1R6-@V+j0@v6-@ Ah[ +B}3(!GRAPHICS 10 ALLOWS YOU TO USE ANY[(#9 OF THE 128 POSSIBLE ATARI COLORS.m@*("THE BACKGROUND IS SET BY THE FIRSTB}@(COLOR YOU CHOOSE.r-@t\-@@V(>:AV,>:AV,>:AV,COLOR # HUE,LUMINB}ANCE\v55 ) )!@)!@Arx68,-$@% |`6-@ 6-@%'6-@B}1+@E-AAV8&A,Z `6-W 6- #-8,8,@7-@E,%AB}hS/%AW 6-%@ 6-^6-@96-@%,.O:&,=,8,AT/8%@B},A^ @ X^5(>:A%," WHEN THE SCREEN IS SET UP YOU^($WILL SEE A PALETTE BAR AT THE BOTTOMb?,($B}WITH A BLINKING DOT IN THE MIDDLE OF<( THE SCREEN.?(gV-(% TO CHOOSE A COLOR PRESS THE LEFTV($OR RIGHT ARROW KEYS B}UNITL THE MARKERlg*("IS BENEATH THE COLOR YOU WANT. THES($CURSOR WILL THEN CHANGE TO THE COLORg(OF YOUR CHOICE.vW(B}0(% TO DRAW, JUST PICK THE COLOR YOUW("WANT AND MOVE THE JOYSTICK TO DRAWQ*("WITH A THICKER LINE, HOLD DOWN THEQB}("TRIGGER WHILE MOVING THE JOYSTICK.J(/($ IF YOU WANT TO START OVER, JUSTJ(PRESS 'N' AT ANY TIME./-@ B}@!/(PRESS TO STARTE#@@K:0)@;@E A0 D1:DOODLE.SAV@|@B:,:7<,4 G67<,..] 6.=:, @D67@<@,.7@<@,]67@<@J},.0$@(''7@<@,4FREE@- @ 2() <@F''7@J}<@,4FREE@K @ P(7@<@,)|U @0W'!-@6+'@,%@' |Z+J}+(#| |[ ( |  |\++(#xARJ}[@@9'-@@"C( SELECTIONM A0Q[ BP:,A00J}"@&6.7@<@,0 AELB6.7+&@,$@%@<+&@,$@%@,L B3J}7@<@,4 36.7@<@,!7@<@,4DOS!.0 6.-@B:,07<,4 AHJ}67B:,%@,.7<,   6.! 6.D1:!67B:,%@,.?AR@'-@@"?  J} LOADING ? A@@91@@5%? BK-@@"-  CANNOT RUN 7 J}@A BK A0D1:MENUABACUS .DAT5%? BK-@@"-  CANNOT RUN 7 H;QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh2}DEL8HI4 0 HI,0 0  9 .G VLO2},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI2} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI2} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO 2}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -2}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH2}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu 0} 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGF}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESF}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N'F}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx F}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECTF} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DLF}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BDD}