@LX}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr ).)/7!    H(}compute'S ATARI 四Note that this disk does not containany DOS files, so you can't bootfrom it. We don't recommendwriting DOS to your original disk.Follow this procedure to read thedisk Table Of Contents: Atari 400/800 and 1200XL owners should insert the BASIC cartridge. Boot DOS 2.0S or compatible DOS (e.g. DOS 2.5, DOS XL, OS/A+). If necessary, exit from DOS to BASIC. When you see the READY prompt, enter RUN "D:MENU" Follow the instructions given to you by the menu program. ompt, enter RUN 7CXTOPLNBOTLNSTPLINEN6 +-@@0( LINE DELETER3(6(}Q(BEGINNING line number":(ENDING line number>M( IntervalsQ -V(>:A%,"-@@}&(/(CONTA-@SAB@V&AB@  D:DELETER.JAN DELETER3(6(lbvINBYTd-AdAFn " x QQ104,162,48,169,3,157,66,3,169,29,157,68},3,169,3,157,69,3,169,1,157,72,3,169OO0,157,73,3,169,4,157,74,3,169,128,157,75,3,32,86,228,48,24,169,7,157,66,3VV169,}0,157,72,3,157,73,3,32,86,228,16,238,192,136,208,2,160,1,132,195,132,212,169))0,133,213,169,12,157,66,3,76,86,228 }D:VERIFY.JANINBYTd-AdAFn " x QQ104,162,48,169,3,157,66,3,169,29,157,68  6AMLMLADD *** PROGRAM TO CREATE THE""*** MACHINE LANGUAGE }ROUTINE*** IN STRING FORM(2;@e,< 60 DIM ML$(65)F 70 ML$=>:@4,P-@@e}Z"d >:,n x >:@4, 80 ADDR=ADR(ML$) 90 HIGH=INT(ADDR/256) 100 LOW=ADDR-HIGH*256}$$ 110 POKE 12,LOW:POKE 13,HIGHPP169,46,72,169,53,72,169,50,72,169,148,141,197,2,169,0,141,68,2,169,1,133,9==173,4}8,2,133,203,173,49,2,133,204,160,4,177,203,133,20566200,177,203,133,206,162,0,160,82,104,145,205,23244200,224,3,208,2}47,169,12,141,252,2,108,250,191 D:RESET1.JAN *** PROGRAM TO CREATE THE""*** MACHINE LANGUAGE 423CODEPASSWORCHAPASSWORDPWADAADDHIGLO } <""*** ML routine goes here ***;@%,##@ }@K:' +'0@!-@@! LOGON:?@@d'B7t@ }d?DISABLE THE BREAK KEY)@&"AU)B:,!@%& A67B:,%@,.>:," A`, !}4SECRET A`6 6.@ Ah6@@d'@@!6RESET VECTORr:@A' "}B7tA:ENABLE BREAK KEY| + D:RESET2.JAN I *** PROGRAM TO CREATE AN*** AUTORUN.SYS FILE TO""*** EXECUTE LOGON ON BOOT UP$}(2..@@ D:AUTORUN.SYS<)*@AU)*@AUF)*@)*@%}@P)*@@i)*@@Z-@@pd"*@n x)*@A&)*&}@@)*@A')*@@)*@)*@@@22169,148'},141,197,2,169,0,141,68,2,169,1,133,9==173,48,2,133,203,173,49,2,133,204,160,4,177,203,133,205;;200,177,203,133,206,1(}62,0,160,82,189,58,6,145,205,23255200,224,12,208,245,169,12,141,252,2,108,250,191''50,53,46,2,36,26,44,47,39,47,46,2)} D:RESET3.JAN *** PROGRAM TO CREATE AN*** AUTORUN.SYS FILE TO""*** EXECUTE LOGON ON BOOT UP0EFfSIZBOUNDARMEMLEEL@dnTHIS PROGRAM IS USED TOxRESERVE SIZE"PAGE+}S" OFMEMORY FOR PROGRAM2.BAS(A "PAGE" IS 256 BYTESTHIS PROGRAM ALSO ENSURESTHAT THE RESER,}VED SPACE""STARTS ON THE GIVEN BOUNDARY""(TO INSURE,FOR EXAMPLE, THAT CHARACTER SETS START ON 1KBYTE BOUND-}ARIES)86-@8MUST BE AT LEAST 4 PAGES (1024 BYTES)!%6-@%ALSO GIVEN IN PAGESJF:A(,.}*A(<ACJ6-%@6-F:A),%6-P:+%&@,',$&AD0A/})%D:PROGRAM2.BASD:INSIGHT1.FEBTOxRESERVE SIZE"PAGEd@STt_uSIZMEMHBUFFEADD@AA$""JUST AS A DEMO, THIS PROGRAM##CHANGES THE CHAR SET1} POINTER,COPIES THE CHARACTER SETTO THE RESERVED MEMORY, AND THEN RANDOMLY DESTROYSTHE CHARACTERS!2}HIT RESET TO QUIT AND GETNORMAL CHARACTERS AGAIN. +16-@1SHOULD BE THE SAME AS PRO3}GRAM 1-AVF:A),&-CHBAS IS CHANGED6-F:AV,$AV")AR@ )NO MORE CURSOR,4}-%A#6((FIRST CHANGE ALL CHARS@" "TO SAME REPEATED PATTERNJ.APA@.JUST SOMETHING 5}TO SHOWT""READY TO MOVE THE CHARACTERS^-A#h%F:BsD%,r |MOVED...SLOWLY DESTROYED6}33P:H:,$A$,%P:H:,$AV, AD:PROGRAM2.BAS#@^,$AV, A7}NSIGHT2.FEBUFFEADD@AA$""JUST AS A DEMO, THIS PROGRAM##CHANGES THE CHAR SET0CDdSIZMEMHBUFFEADD@ARBA$""JUST AS A DEMO, THIS PROGRAM""CHANGES THE CHAR SET9} POINTERCOPIES THE CHARACTER SETTO THE RESERVED MEMORY, AND THEN RANDOMLY DESTROYSTHE CHARACTERS!:}HIT RESET TO QUIT AND GETNORMAL CHARACTERS AGAIN.1 +@1JUST TO CLEAR ABOUT 4K OF MEMORY! +;}OR OTHER MODE6-@66ALWAYS DO FOLLOWING AFTER THE GRAPHICS STATEMENT"0AAAU0ENSURE END-<}OF-PAGE BOUND,6-P:F:AB,',$&6%AB&@%LOWER HIMEM@"AV"CHBAS IS CHANGEDJ6-F:AV=},$AVT)AR@ )NO MORE CURSOR^.APA@.JUST SOMETHING TO SHOWh""READY TO MOVE THE CH>}ARACTERSr-A#|%F:BsD%, MOVED...SLOWLY DESTROYED33P:H:,$A$,%P:H:?},$AV, AD:INSIGHT3.FEBA#@r OR ACK9|""CHANGES THE CHAR SETdhi)DDLISTDHIGDLOMONTHYEARPF1PF2SALLFILEALLDESCRALLTYPENINPUTEMPCONSOCURRANGNPAGEPAG A}  B}.;@`, A$ A . A;@ ,; C}@ , r +@@1AY<6.pppGW67@,.>:F:@,,r67@,.>:F:@,, D}K67@,.>:@,367@,.>:@,K67@ ,.>:@,O-@@B@167,.>:A(,K6 E}7%@,.>:@,O I67,.>:@e,/67%@,.>:,I67%@,.>:@,%A@$@ F}%@7A YA@$@%@{A@$@%@A@P-@ G}B:,(Ay%@:7,,, >A`PAa@I #@4"-@#"167<,.>:,E67 H}<,.>:,I "!!6-?:A67B:,,4>:@2,46.7@ J} @E2n4-@&P:+B:,%B:,%@,'@,@>( P-@"@n(@é K}š<--(%Press to choose, to run.>(6-@(6-P:'@,%@?76-$@&@%6- L}@/+%,!76-&A2 -%.(7$@5&@4<$@5,2 BJ @-@F($ M} J CA!@A(# OF . Press for next page.EAY@4F-@ N}%@P76-@:7,,#67<,.>:,767<,.>:@,Z-@A _8B2y@$6-F:B2y O},8"@@d%67<,.>:,%67<,.>:,j"@A k@An s @p P}xR6-%&@+&6.D:R67@,.7$@&@<$@,z7<,4DAF}c(&(Refer to Q} the article in theN(#corresponding issue of COMPUTE! for`( instructions.c(~f(-("To return to the menu, press R};( and enter>(c(RUN>:@4,D:MN>:@4,f(-@A (( Now loading ... A S}7<,4B%7<,0DA`9A @'A@9A@h(>:A%,(= T}(%This program won't run from the menu.@(h(#This may be machine language sourceQ)(!code, a BASIC ENTER file, machine U}Q(#language not loadable via BASIC, orP&(a program that writes to disk.)(P("In the latter case, we suggest you=(( V} copy the program to another disk=(before using it.V(V(KBefore attempting to use this program,consult the article f W}or instructions.0 -@6? ,A 0  B AU @@76-? X}:@$A@,U!A(*A6A B @!(!(Can't load this file.?(-(!Press Y} to return to menu...?AdAU F:Ad,@A )AdAU B) @,#6-% Z}@!#6-@6-@@ @cĠŠƠӛWW;@$@d,;@5$@d [},;@d,;@5,;@,;@,+@%@/0@@@I0@@c0@ \}@}0@@@0@@@6-@+(@š6(@ ]}H"(@ atari programs=(@ on diskH(@D"(@ COPYRIGHT 1986D(@COMPU ^}TE!PUBLICATIONS-(@-(@ 􎎎05 AP5@@ D:CONTENTS:@ _}@D@-@N)@)67$@&@,.X@67,.b)@ `})67$@5&@4,.l v@ B$Q@+(>(Cannot read table of conten a}ts.A(Q( Check disk:""(* COMPUTE! disk inserted?(* Drive door closed? (* All cables connected?##(!}ꪫꪫꪯ}}ꪯꪯ}ꪫꪫ}ꪪ}ꪪ}}ꪯꪯꪪ>ꪫ}*  } **}*} *** }  *}**}*  } }**} *} <0???<:AU,367@,.>:AU,V6.ӠΠҠΠՠ+-@@"'67,.>:,+ 40}-@A`"'67,.>:,+ 46-C:,(>:A%,($)@$"AUA0 A***0} MAIN MENU ***1@+1AR@f-@@ %(>:@,) .(B-@@0}P(>:@,T f@@M@@(/(1> Retrieve a name2(J(2> Enter a new nameM(<(0}3> Delete an old name (9(4> Load address book<(R(5> Save address book(9(6> Print address book<(R(7> Disk 0}directory5@@(5(ӠҠƠŠ"O@.@@K:;)@O0}"AUA,GG&@HA0ApAApA`A PA06 A@*** RETRIEVE A NAME0} ***JJ@@'AR4(>:A%,F-@@ J(T/-@@+(Name to retrieve/0}^B:,"A h6-@r""6-?::A%,@-0}@@S(NAME NOT FOUND] A  6-6-""6-?::A%,($(7<%@0},'(G(PRESS SPACE BAR TO RETRIEVEh(NEXT OCCURRENCE OF SAME NAMEAR@(($)@$"AU0}A0'"@26-%@' Ap A0*** ENTER A NAME ***](>:A%,"AR40}@@7(](&B:, CHARACTERS FREE IN MEMORYF(&(PRESSΠAT THIS PROMPTF(WITHOUT INPUT FOR MAIN MEN0}UI(*(PRESSΠAT ANY NEXT PROMPTI(WITHOUT INPUT TO END ENTRY((NAMEB:,"A0&0}B:,"&67B:,%@,.467B:,%@,.467B:,%@,.>:AU,$( (NEXT LINE OF ADDRESS$&90}B:,"/67B:,%@,.>:AU,9 A00 A0:*** DELETE A NAME ***D;(>:A%,"AR0}4@@7(;(N5((NAME TO DELETE5B:,"A0X.6-@.6-?::A%,4-@@G(NAME NOT FOUNDJ(N(v$)@$"A0}UA0 A0 6-6-""6-?::A%,"AR@%(6(7<%@0},9(W(PRESSŠҠTO DELETE%(%(PRESSΠFOR MAIN MENU$)@$"AUA0"@20}A  A6-&%@!!67&@:A%,"AR4-@@ 8( 6-@@2(DEVICE:FILENAME TO LOAD60}B:,"A0 f A @5@@A-@M6-@2S6-\6-C:,f A*0}4@ 67,.>:AU,* B4 A04z(>:A%,"AR@4-@@O( I/O ERROR #F:A0},a-@@ e(p@z B>$)@$"AUA0H A0R*** SAVE FILE ***\80}AR"(>:A%,4-@@ 8(f6-@@2(DEVICE:FILENAME TO SAVE6pB:,"A0}0zi A @5@@A-M6-@2V6-B:,_6-C:,i A"@0} B" A0zAR@"(>:A%,4-@@O( I/O ERROR #F:A,a-@@ e(p@0}z B$)@$"AUA0 A *** PRINT FILE ***4@@'AR0}4(>:A%,$($(BE SURE PRINTER IS ONLINE#( ( (( TODAY'S DATE#B:,"A0B A0}@8@@P:B AM(>:A%,(.( I/O ERROR #F:A,8 BC@M A0} `I67@,.>:AU,367@,.>:AU,?6-@I B4 @( @UPDATED 46-@0}e667@,.>:,!!@,@6 A0""6-?::A%,%@H@@D:*.*\-@Bi)0}@q(>:,u t@( B~$)@$AUAP A0*** CIO LOAD/SAVE ***0}LLCIO LOAD/SAVE requires file#2 opened, READ=0 for save, READ=1 for loadfile#2,$2036-A46-A6'6-A0}@36-A5<6-P:'AV,$6-&$AV,%<%%@<6-P:'AV,$6-&$AV,%<0}%%@)%@&@$)6-?:C:,<,%%6-F:%,%AV$F:%%@,$*** CIO ML DATA ***0}104,104,104,170,76,86,228 D:INSTR4.FEBPHAPROMPTCIODATEBOOKMSTARINSTRECORGAREAMAXLESADTRUELEICCOICB00  ;H^ALINB" ?;@,(>:A%, (?(POKING DATA... P4}LEASE WAIT%-BB!"!% (>:A%,(G @@-@@C(WHAT LINE NUMBER TO START 4}WITHG27 @P-@@3(WHAT INCREMENT7<!!B'g)B'g@0F!!) @4}0P B(>:A%,(Z?+F:A,"@*F:A,"@56.ARE? Ad 6.IS A n--(4}%THE AUTOMATIC PROOFREADER PROGRAM ANDxAA(THE AUTONUMBER PROGRAM WITH >:@4,SOFT>:@4,,,(KEYS  NO4}W READY FOR YOUR INPUT.++(#USE ˠ TO DISABLE THE PROGRAM.**("USE U=USR(39300,ln,inc) TO ENABLE.6-?:B4}<<,104,104,141,223,153,104141,222,153,104,141,221153,104,141,220,153,17336,2,133,208,173,374}2,133,209,169,5,133194,133,206,173,8,2141,233,154,173,9,2141,234,154,169,193,1418,2,169,154,141,94}2,174,6,228,232,142188,154,174,7,228,142189,154,169,224,141,54"2,169,153,141,55,2,160,3,162,154,169,4}7632,92,228,96,0,0@0,0,164,208,166,209J169,7,32,92,228,173T233,154,141,8,2,173^234,154,141,9,2,169h4}0,133,17,141,255,2r141,240,2,133,77,104|64,8,72,152,72,13872,165,85,201,2,20825,173,242,2,201,124}208,18,169,23,229,8448,12,165,194,201,93208,6,165,206,240,11198,206,104,170,104,168104,40,76,98,224}8,1601,177,136,16,13,173222,153,133,212,173,223153,133,213,24,144,55165,136,133,204,165,137133,4}205,160,1,177,20448,26,136,177,204,133212,200,177,204,133,213200,177,204,24,101,204133,204,165,205,104}5,0&133,205,208,224,24,1650212,109,220,153,133,212:165,213,109,221,153,133D213,32,170,217,165,212N414},15,133,206,230,206X162,0,181,213,41,240b208,4,224,0,240,9l74,74,74,74,9,48v32,183,154,181,213,41154},9,48,32,183,154232,228,206,208,223,16932,32,183,154,169,5133,194,133,206,76,40154,168,138,72,152,324}0,0,104,170,96,872,138,72,152,72,449,210,16,22,162,0189,16,155,205,9,210240,21,160,0,232,2004}192,11,208,250,224,231208,236,104,168,104,170104,40,76,0,0,232189,16,155,240,6,32 183,154,24,144,2444},162126,142,31,208,173,11 212,205,11,212,240,251*202,202,16,241,104,1684104,170,104,40,104,64>146,64}7,79,76,79,82H32,0,0,0,0,186R68,65,84,65,32,0\0,0,0,0,189,71f79,84,79,32,0,0p0,0,0,128,76,79z674},65,84,69,32,00,0,138,80,79,8373,84,73,79,78,320,168,82,69,65,6832,0,0,0,0,0190,83,79,85,78,684}32,0,0,0,0,17383,84,82,73,71,400,0,0,0,141,7378,80,85,84,32,00,0,0,136,80,7975,69,32,0,0,04}0,0,170,80,69,6975,40,0,0,0,00,163,78,69,88,8432,0,0,0,0,0166,80,82,73,78,84$32,0,0,0,0,134}3.83,84,73,67,75,408 0,0,0,0B99CHANGE NEXT 10 BYTES TO INSERT YOUR OWN "SOFT" KEY.L!!173,83,84,82,73,71,40,0,04},0V0,139,71,79`83,85,66,32,0,0j0,0,174,68,82,65t87,84,79,32,0,0~0,140,82,69,84,8582,78,32,0,0,4}099CHANGE NEXT 10 BYTES TO INSERT YOUR OWN "SOFT" KEY. 168,82,69,65,68,32,0,0,0,0 0,19171,82,65,80,72,734}67,83,32,0,184,7079,82,32,0D:SOFTKEYS.MAR ?;@,(>:A%, (?(POKING DATA... P4=00 4 4 +67 3 3 |3 #9666 s2AIA 7 5 67*7 7i777 5x77L078} )7Б77 8L0  77 57 d777  5L077nMLI1 U46#8}7<P018(PQQ-7$ R1L31Pi(PQiQ-7-7F R1 U4666 /2 1 [1 8Lb#7I#7`itΩͽ08}66 ɴ*&6@ 6E766н 0`7Q7LxJJJ7*@ @JGɾ8}@@127 7@I@`7 "i 7-7 i' `@`#7 #7-77` d#78}#777ݭ6mm6ɾ7 6Ii6`7 !A:22 :2267!7 77: ɺ8}6`!m6!723` 66Lx2;7>7 0A7@6776 66٩ש 7778}ҍ7ҩҩ 7Р `787 7`686 -7 i&8 ܽ#7ש77`>/o778}ЈpԅΩЩ34͈͢`i(ȱi` 3XͥYΥiPͥiQΈ6 U4666آ08} \`6P˹Q̹ 7 6p5Qˑp5Qˑ b56` K6 m8 8/0#1"/X@Y  5%iz8}6 56ivi45 C׭0ϭ1Щ 7 7( `H 6HHX˥Y b5e˅˥i̭8}665 b56hhh`i(˥i`UU@@@@@@UU 0 077 57 58}7- 5777777ȭ7568777777}777}77 7 77 7`777 8}7777` 8p#M#ș#ȥә#i(ҥiݩF#ȩ#ȩ #ȩ#A#ȩ#ȩ##`҅ԥӅՠԙ8}#ȥՙ#i(ԥi`7 8(JJJJJ67787m77`"2B(HhH`x8}7ddddf$<4<<<,<<8080848D8808X8*D@8||(((3#/2%-%.,%6%,8}&,//2press@firebutton78 d ɬh7ca ٠  ɴ8 8}i(ҥi 6ՠ 8 3 67777id77i7``ͩ@΢͈`ҩ@`" 7""8}L9"I4 ׭BIB)78E97 L8`77$ 7777778}`hhL077ʽ7i 7i `6 s2AIA 7 5 67*7 7i777 5x77L078)9SCREESCRCHA@f +-AU &"AU<} [RETURN]& @P( >:@',>:,2 <USE CONTROL-1 TO PAUSED:INSIGHT1.MAR &"AU<g !i^tSCREESCRCHAHEXKEYCODHLO '@};@,'6.0123456789ABCDEFAdAU6-F:Ad,("AU@02$6-P:'@,$6-&@@}$< KEYCODE: HEX $F44 7%@<%@,7%@<%@,P  , DECIMAL Z @ D:IN@}SIGHT2.MARtSCREESCRCHAHEXKEYCODHLO '@  !iSCREESCRCHAHEXKEYCODHLO +D}%%6-F:@,%AV$F:@,(FIRST: SCREEN CODE ORDER2-AU%< FTHEN: D} ATASCII ORDERP6-%@@$@Z-AU6-d!A'6-&A'n' @26-%@dD}' A@x!@6- A@6-&@2 % " A "WAIT FOR BREAK KEYD:INSID}GHT3.MARSCREESCRCHAHEXKEYCODHLO +D ()qPMMODGRMODBOOMBOOVOLUMPMMOVDELAH} %6-@6-% BP/0@/A@rK;@d,6-C:,##@7-H}@@d;"G67,.>:,K ( -@6@2;2@;2@A@H}<<.6-?:<@<<@<A'<@d,<6-%@F-@@5 P Z0,0,8,28,28,8,0,0d0H},8,34,92,20,34,8,0n8,65,4,168,20,1,64,8x148,1,20,160,1,20,1,136145,74,32,130,65,2,84,13772,1,64,0,130,1H},8,82129,0,0,0,0,128,1,660,0,0,0,0,0,0,0D:TOOLKIT3.MARHQ#$d:PPMMODGRMODSHAPESHAPSIZPMMOV@ %6-@L}6-% BPW;@,6-C:,%6-@/#@@C-@@G"S67,.>:,W ((6-?:<L}@<<<A'<A',(,,24,60,126,90,219,255,219,195,102,60,242D:TOOLKIT2.MAR %6-@Ld9:: P PAGCLRPMMOVEPAGCLPMMOVPMMODPAGEDMGRMODPMBASMP} N""*** PLAYER/MISSILE SETUP ****N88DEFINE PMMODE & GRMODE BEFORE CALLIP}NG THIS ROUTINE4N!!PMMODE=1 FOR SINGLE-RES P/M>N!!PMMODE=2 FOR DOUBLE-RES P/MHNGRMODE=GRAPHICS MODERN-;@H,P};A,$6-C:,-6-C:,\N=6-#Bp--@@H1"=67,.>:,aN1 6-% "At'6-P}1 BpbN-* "ERROR IN DATA... LINES 20170-20240-&fN3-@A"'67,.>:,/6-%3 kN9B3g6P} "ERROR IN DATA... LINES 20260-205909&pN1"@6-@'6-@b1 BzN1"@6-@'6-@FP}1 BN$N=BByF:A,&1AF:A,&=AN+NE6-F:A,$AV&AYP}8B2w@E6-?:<<,NXA@h'A@x9A@KA@XP/M COLORSN$P}NPAGCLR ML DATAN104,201,2,240,16,133N206,162,0,228,206,208N1,96,104,104,232,169N0,240,244,104,133,20P}4N104,133,203,104,104,133N205,169,0,168,170,145O203,200,208,251,230,204O232,228,205,208,244,96OPMMOVP}E ML DATA$O104,201,5,240,18,141.O0,4,162,0,236,08O4,208,1,96,104,104BO232,169,0,240,243,104LO104,201,9,14P}4,9,104VO104,104,104,104,104,104`O104,96,24,201,0,240jO242,141,4,4,104,133tO206,104,133,205,104,104~O141,P}5,4,104,104,141O2,4,104,104,141,3O4,174,4,4,173,2O4,157,255,207,224,5O176,2,144,5,169,0O141,4,4,165,P}207,201O2,240,28,165,106,24O105,3,109,4,4,133O204,169,0,133,203,168O145,203,200,208,251,173O3,4,133,P}203,24,144O65,165,106,24,105,1O133,204,169,128,133,203P173,4,4,240,21,162 P0,165,203,24,105,128P133,2P}03,165,204,105,0P133,204,232,236,4,4(P208,237,160,0,152,1452P203,200,192,127,208,249"J67,.>:,N I6U}-@6-A''6-@dI2A@@(,6-R:,"@,6-&@2"@U}6-%@< @6-@F!@6-@P226-?:<@:@,U"T:,"" AGGAA A0A@Y }APA`ApA&6-6-6@& A&6-@6-6@& A%6-@6Y}-% A%6-@6-@% A%6-6-@% A$&6-6@6-@& AY}.&6-6@6-& A86-6@6-6@B# 6-6-#-@@L9%6-?:<@Y}:,h t6-@6-x336-?:<@:,#-((>6-R:,&-@@%* >"@]}A "@A@"@A`"@A T:,"AAF:Ad,"]}@B*AdAU7(>:A%,A A AP"AP (6-&@ A@"]}@ AP (6-%@ A@"@"AP (6-%@ A@"@AP]}" (6-&@ A@,h7@,4%67@,..^67%@<%@,.>:@:7%@,,&8&@,,]}h A 6M67@,.M67%@<%@,.>:@:7%@,,%8&@,,@<-@( $-@6]}(@:7%@,,<-J336-?:<@s6-@Q0@@@a)}70@@Q0@<-@@",68<,-<NAME AND GOALR-@a*}@".68<%@,-A68<@ &,-E I RPOINTS102,2,2,2,2,2,2,2401,2,3,5,8,13,a+}21,34202,3,4,5,6,7,8,9801,4,9,16,25,36,49,64 }  PLAYER 1 =  PLAYER 2 &B:a,},!@=6.7@<@,)B:,!@)6.7@<@,    VS 9 IS THIS CORRECT?&)@a-}9>:,0YAP1AR@ AP) A1SETUP"O-@@/6-%@H%@@$;a.}@O%@"@,$ A`$PUT SCORES AT BOTTOM6?6-@&6-$@ -6-@(&36-?6-a/}@06.=:8<,,067@<@,. Jb A6-@%!6--6-X6.7$@%@<$@a0}%@,b ATB Ap38@&<,8<,A`BEND OF ROUND^ AhD-@a1}+-@@<68<,-@ D re-@+-@@<6-8<,G6-8<,e68<@a2},-8<@,%|c'68<@,-8<@,%+,$[68<@,-8<@,%+8<,&8@&<,,_ c Pa3}-@+-@@H68<,-8<,%8<@,L P V-@+-@@N68<a4}@,-8<@,%8<,R V Z-@+-@@96.=:8<,,B6-B:,Z6-@%$@1&a5}A6-@%#6-&+ @ ,)6-/6.9 A= A  END OF MAIN LOOP)@%O }  a6} 1-@@9 = C O6-@L-@-6-@ &@$C6-@%$a7}@L6.| >-@@6--6-%&@46.> A!   AP ! * 6-6-a8}%&@ 6.* A=    AP  $6-,6-%36.= A06-%@ # AP,a9}  0     AP 3 6.6-%@"  , AP3 $&-@  a:}$08-@@"6-8<,86-@%$@:J!@  6-P:'@,)6.=:,@6.7@<@,Ja;} AD6.>:@2,N[ 6-6-@"6.% A+6-76-@#@6.=:,Q6.7B:,}) A`   ;-@@7%@P%$@@%; H-@%6-$@1+a?}6-76->6.H A F-@@6-#6-*6.4 AB  F  a@}6-6-6. A : -@B:,667<,.>:@:7<,,%A(,: 6-@B:,26aA}7<,.>:@:7<,,%A(,6 :6-@&+B:,"@,*6-06.: A:6-@4&+B:,"@,*6-aB}06.: A$G 6-6-:6.7$@%@<$@%@,D AG$>-@2.6aC}8<,-2 >6-@ )@6.>:, 4-$ 0 4+06.=:P:H:@,$@%@,,%aD}21)38A* 6-A:,4v 68<,-@4-@@K68<,-O v68aE}<@,-@%$@>6-@6-H<-@2&8<,26-< ApR )2aF}@K2@g2@A@y6-&+!,}$\ aG}A0fX6-8<,%6-8<@,66-8<@,G6-8<@,X6-8<@,p;'6-%@@%%$A`%aH}$@@/+%,;zk?68<@,-+%@,&@$+P:+%@,'@,,k%@A A A `aI}A pB!@&68<,-0 A0BSCORING ROUTINEO%@@@OP:H:@,$@%@aJ},AAAE6- A E8<,")+8<,","A @v6-@&@$aK}*68<@,-C68<@,-%@V68<@,-%l%@@%@v A T8<,"%68<,-aL}668<,-@J%@@@T Ah68<@,-%@0%@@@hP:H:@,$@%@aM},AAAM68<@,--68<@,-%C%@@%@M A0R68<@,aN}-%@0%@@@: A R68<,-@&8<,8<,"A68<,-@168Z   HH)H e^}p h  hyhy D L> L JJ    ! LA*` BFe_}7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!Le`}EE !E^ ^ E E7EȩEdE/EȩE  Dea} .L }  ;F d  ;?F7F? ( .   Z D LL d eb} . D  L    p  E` , d)  D L) 0BM݊L݉ec} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ Ged} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >Gee}PICTURE BAUTORUN SYSG  L }`8L`Lp8`  04}G)݁,G)ȱGȱGer}Hh0})Hh` B! 8`8ii(ZE6!JS Sd!  E  ` Tes}E 8  8LFEh   r9L )  EiFi(LdEE` dE`H)et}h/H^ji hEEdEiEȱEiE` WE QEEHI8 *hd ) eu}8EEȱEEE` I !ʽ)E1F5I!  !ȘJHjm9Ghm:H`  ev}!`GHLl Z dLȩ8 lI0 ` _} ; $ %  pLl`ew}ݚ I(`DOS SYShChDC IC`0I B0x D)D`}Need DOS2.5,type Y ex}Λd dd\DOS SYSCOPY3TO2COMey}dB}yh}ez}B8 SWITCH MARCXDOS SYSBSPSCRIPTOBJB CONTENTS B%TYPOTOOLFEBB6BOOTSTUF B,QSOLITAIRJANB }MENU e{} C C*(> C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISKe|}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU e}} L ? .  t`GBJ ~DEHI B V0dVe~}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEhe}DEL8HI4 0 HI,0 0  9 .G VLOe},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHIe} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHIe} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO e}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -e}LLu ÝDEHILV 9 .l 9 .l  `` s$B BHe}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu d} 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGi}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESi}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N'i}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx i}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECTi} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DLi}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BDi}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.i}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPECi}COPY--FROM, TO?OPTION NOT ALLOWED593 FREE SECTORS COPYING---D1:DRDBBS.BASl# 0|D .L/%#i}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SYi}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E i}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT Ai}LLOWED IN DESTINATION 0 <.|K%%157,066,003,032,086,228,016,181H%%173,224!},002,013,225,002,240,003R%%108,224,002,173,226,002,013,227\%%002,240,003,108,226,002,132,212f%%169,000,133,213,096,1!}62,016,169p%%000,157,072,003,157,073,003,169z%%007,157,066,003,032,086,228,016%%012,104,104,192,136,208,003,076 !} 096,080,076,118,080,096,-1 D:MN03,169z%%007,157,066,003,032,086,228,016%%012,104,104,192,136,208,003,076 )&= Y%q?`8f?g?hh``8Ie?Ie?????8?m?m? &= Y%q?`?i}??m???m?*+? $????8u?傅v?僅 $8u??u?v??v?` l* ( *8????` ( l* i}( *L;+ P*2 &Ǡ= Y% o%H &h)_ @W l* (L*S l* )L*P l* R-L*`8o?p?o?p?ХL'f?i}g?L++,v?u?v?L ,L+ee8u?傅v?僅8傍?働? $8u??u?v??vi}?`?Lf,? f,LK)? ,?`?? ,L'u?m?v?m?i?hhL,m?m?8u?倅v?i}偅 M$u?m?u?v?m?v?`r?Itr?`,-֠= Y% /)})Y`Э`2 &= Y% ,L & % %LH&^懥i}v?LZ)LK)Ƌ^Ƌg?L)8ee8内包Ld-L'@ԩ .i}01-XYȑȑ-.`pppAH) ԍЍ)Х  h@i}Э P* &= Y%I $I2 o%)_ @W . #)L.S . *L.P . 1-L. 'L &??`8??i}?? *?? $LL.'Uw?x? /~.X/ /x? o%x?,C09 CL.ɛE~L.~ /L.) }w?i})Ю ? /CL.?`Y/T0 B VD/EHIBLV/HI B V/`E:L/hDi}ԅ ؠH),hD0 /L/ b7h0``mD )0mD)?<mD)@`I@`mD@0,P a{i})ɀ`H2ҢҠh`lj;k+*opui-=vcU00bxz436521, .nm/reytwq907~8<>fhdgsaLJ:K\^OPUI_|VCBXZ$#i}&%"![ ]NM?REYTWQ()'@}FHDGSA {   ` }11 1pzD>EHi}IJB V0\gDgDdCeCgDgD 10?+K / 103iD 10) /iDiD. /LV1  1ƌL-1p B Vpi}C`H /h / 10 /L1pHIBLV 5 Y/ 5R} / 1 3CCCgDgD 3 o%2a12)_2Li}2ʊ *2H)2H`RLUF1234 F2S2p222322T3n3n3n3n33v3 3CLa2 3CgD CCCL1 3C8La2 3i}CigDުLa2z>C) 87 C 콺C.ʎCC`pBCHIDCELV 2! 2L3 3L123 2#L2i} 2$L2 3O? Y%@ .x?+ 2C,CȽ?Cx?CC 3 L2 3L2 3Z? Y% , 3 2L2{>L1pCi}J 2 20% % ~50} / - &LH&T /L/? 1 32> Y%? / /l> Y% o% 3L2 I` 333?i} Y%{>L/34CL 4Cf?g?L&4C8v?勪,C0ɛ^LR4 ,&LR4^LR4 87` &> Y% 40@ i}4pf?Dg?E8u?f?Hv?g?I B V0 3 10 L5H 3h!H} /2> Y%h / 4 -q?` &:> Y%L4C BLVi}pCCH@45 .hx? &hhL- 4CD?Ex?HICJBLV8f?g?ą &T> Y% 4i}L4 % ~5L4L5CDE8h?冝Hi?凝IB V`CHmf?u?Img?v?u?eu?v?ev? 4u?v?i}` 4L4} /J56> Y%L4@ԭ))`????8* &?.??.??.??.? ??L"6? ?i}8??????LT6?`8?j???k?? ? &> Y%q?`m?m?8u?倅v?偅ei? &> Yi}%q?` M$?mu?u??67mv?v?j?k? $L'ȱȊ`)?! ;I@L(H)h)` @@LO7i i}`KB:P?HH8????1pHI B? V( 4LH&hh?` &>LY%L8 &> Y% 5 i}4L8 5 7????CR778? ??]7C@f?g?????L9^)@???t?i}?t?ȱt?8ei? M9? u98.?t?s?@ < 9?? 88u?v?<:? ?? 8?i}E /l> Y% o% 1 -} / &LH&89L88??0 9?s?B u9 < 9 9 9???8????i} &Š> Y% o% 7?s?A u9 Y% .?L &i}??x?L &??S? ,&ъ ;<拥v?6?eiu?Ōv?卐8??? 'i}` &> Y%q?`Э# &> Y% .@?@x?L &8??e??ee8u?傅v?僅 $8ui}??u?v?v?@)?? ,@ ,&@m@iL<='s?0 87 b7?  b7_ b7L<`?)? 87c8?i}s?J8? b7?LSpeedSi}cript 3.0 by Charles BrannonBuffer ClearedBuffer FullDelete (S,W,P): Are you sure? (Y/N):ERASE ALL TEXTErase (S,W,P): i} to exitSave (Device:Filename)>Error #BREAK Key AbortNo ErrorsLoad (Device:Filename)> Press D1:*.*Memo>e?i}ry FullNo text in bufferPrint (Device:Filename)>Printing...Insert next sheet, press Find:Not foundChange to:i} -elete ock nlock ename ormat -oad Drive [ ]: Rename to:Format disk0`̌8l8pvhkJAN-MAR 198629SOLITAIR.JANBSolitaire VERIFY.JAN BCassette Verify RESET1m}.JAN DReset Controller (Program 1) RESET2.JAN DReset Controller (Program 2) RESET3.JAN DReset Controllm}er (Program 3) DELETER.JAN BLine Deleter HIRISE.FEB DHigh Rise (Joystick and 48K req'd) Im}NSIGHT1.FEBBInsight Atari (FEB) MEMLO Bumper PROGRAM2.BASDInsight (FEB) character set mover 1INSIGHT3.FEBBInsight (m}FEB) character set mover 2INSTR1.FEB BHigh Speed String Search Program 1 INSTR2.FEB BHigh Speed String Search Programm} 2 INSTR3.FEB DHigh Speed String Search Program 3 INSTR4.FEB DHigh Speed String Search Program 4 TYPOTOOL.FEBDTypom} Tool SPCALC.OBJ DSpeedCalc (48K req'd, no cartridge)SWITCH.MAR BSwitchbox (16K required) m} INSIGHT1.MARBInsight (MAR) Prog.1 ATASCII Codes INSIGHT2.MARBInsight (MAR) Prog.2 Keyboard codesINSIGHT3.MARBm}Insight (MAR) Prog.3 Screen Codes TOOLKIT1.MARDP/M Graphics Toolkit Prog.1 Setup TOOLKIT2.MARDP/M Graphics Toolkit Sm}hape Demo TOOLKIT3.MARDP/M Graphics Toolkit Explosion DemoTOOLKIT4.MARDP/M Graphics Toolkit Tank Demo TOOLKIT5.m}MARDP/M Graphics Toolkit Missile Demo TOOLKIT6.MARDP/M Graphics Toolkit P/M ShapemakerBOOTSTUF BBootstuffer m} SOFTKEYS.MARBSoftkeys (40K or 48K required) SPSCRIPT.OBJMSpeedScript (at least 24K required) ly0 GOTO 3210032100 DIM A$(106),TITLE$(23),T$(4),BLANK$(20):N7=0:NUL=1536:MRG=82:CURS=75232105 BLANK$=" ":BLANK$(20)=" ":BLANq}K$(2)=BLANK$:GOSUB 3238032110 GRAPHICS N7:OPEN #3,4,N7,"K:":OPEN #2,4,N7,"E:":POKE MRG,15:POKE CURS,132115 POSITION 3,10:? q}"SELECT: Line Lister":? :? " Data Reader":? :? " Finished"32120 POKE MRG,2:GET #3,A:IF A=76 THEN 3214032125 IF A=6q}8 THEN 3225032130 IF A=70 THEN 3254032135 GOTO 3212032140 TITLE$="Š":GOSUB 3240032145 GOSUB 3221032150 IF LINEq}45 AND S<>61 AND S<>155 AND S<>69 THEN 3217032175 IF S=61 THEq}N GOSUB 32215:GOTO 3215532180 IF S=69 THEN STOP 32185 IF S=69 THEN 3216532190 IF S=155 THEN 3224532195 GOSUB 32205:GOSUB q}32200:GOTO 3215532200 LINE=PEEK(PRGM)+PEEK(PRGM+1)*256:TYPE=PEEK(PRGM+4)<2:RETURN 32205 B=PEEK(PRGM+2):PRGM=PRGM+B:RETURN q}32210 PRGM=PEEK(136)+PEEK(137)*256:GOSUB 32200:RETURN 32215 PRGM=PRGM-B:GOSUB 3220032220 A=LINE:GOSUB 3221032225 IF LINE32099 THEN 3224032265 TYPE=LEN(A$):IF TYPE>8 THEN 3227532270 GOSUB 32440:POSITION INT(8-(LEN(A$)/2)+0.5),3:r}FOR I=N7 TO 20:POKE 53279,N7:NEXT I:? #6;A$:GOSUB 32295:GOTO 3226032275 IF TYPE/2<>INT(TYPE/2) THEN A$(TYPE+1)=BLANK$(1,1)3r}2280 GOSUB 32440:FOR A=1 TO LEN(A$) STEP 2:POSITION 7,3:FOR I=N7 TO 20:POKE 53279,N7:NEXT I:? #6;A$(A,A+1)32285 POSITION 12,r}9:? #6;INT(A/2+0.4)+1:GOSUB 32295:NEXT A:POSITION 1,9:? #6;BLANK$:POSITION 12,9:? #6;BLANK$(1,3)32290 GOTO 3226032295 FOR Ir}=N7 TO 200:ON PEEK(764)<>255 GOTO 32305:NEXT I32300 POSITION N7,3:? #6;BLANK$:RETURN 32305 POP :GET #3,B:IF B<>155 AND B<>6r}9 THEN GET #3,B:IF B<>69 THEN 3230032310 IF B=155 THEN POP :GOTO 3224532315 GRAPHICS 0:POSITION 2,7:LIST DLINE:? "CONT":GOSr}UB 3244032320 IF TYPE>8 THEN POSITION 13,16:? INT(A/2+0.4)+132325 STOP 32330 GOSUB 32435:GOSUB 32505:GOSUB 32440:RETURN 3r }2335 IF PEEK(195)=6 THEN 3224032340 GRAPHICS N7:? "ERROR- ";PEEK(195):END 32345 DATA 216,104,104,141,185,6,104,141,184,6,1r }65,136,133,203,165,137,133,204,32,136,6,165,203,133,205,165,204,13332350 DATA 206,104,141,185,6,104,24,105,1,141,184,6,144,3r },238,185,6,32,136,6,56,165,144,229,203,141,182,6,165,14532355 DATA 229,204,141,183,6,56,165,203,229,205,141,186,6,165,204,22r }9,206,141,187,6,160,0,174,183,6,240,14,177,20332360 DATA 145,205,200,208,249,230,204,230,206,202,208,242,204,182,6,240,7,177r },203,145,205,200,208,244,162,0,160,432365 DATA 56,181,138,237,186,6,149,138,181,139,237,187,6,149,139,232,232,136,208,236,96r},160,2,177,203,141,188,6,13632370 DATA 177,203,136,201,128,240,30,205,185,6,240,4,176,23,144,7,177,203,205,184,6,176,14,24,1r}73,188,6,101,20332375 DATA 133,203,144,215,230,204,208,211,96,0,0,0,0,0,0,032380 IF PEEK(NUL)=216 THEN 3239032385 RESTORE r}32345:FOR I=NUL TO 1724:READ A:POKE I,A:NEXT I32390 A=USR(NUL,32345,32390)32395 RETURN 32400 POKE CURS,N7:? TITLE$;:FOR I=r}N7 TO 100:NEXT I:? 32405 IF TITLE$(8)="" THEN RETURN 32410 ? "Press t**OR**o start at first line"32415 ? r}:? "Enter specific line number to start.":? :? "=>> ";32420 TRAP 32425:INPUT #2,A:TRAP 40000:GOTO 3243032425 A=N732430 RETr}URN 32435 GRAPHICS 2:POKE 712,148:POKE 708,154:RETURN 32440 Q=PEEK(87):B=2:B=B+(TYPE>8):FOR X=1 TO B:RESTORE 32485:READ TITr}LE$:POKE 182,X:READ T$:TITLE$(6,10)=T$32445 POSITION 1+(Q=0),6+X+((Q=0)*7)32450 IF Q THEN ? #6;TITLE$;32455 IF NOT Q THENr} ? TITLE$;32460 GOSUB 32475+X+((Q=0)*10):NEXT X32465 RESTORE DLINE:POKE 182,DITEM:RETURN 32476 ? #6;BLANK$(1,3):POSITION 1r}2,7:? #6;DLINE:RETURN 32477 ? #6;BLANK$(1,3):POSITION 12,8:? #6;DITEM:RETURN 32478 RETURN 32485 DATA DATA #,line,itemr},pair32486 ? DLINE:RETURN 32487 ? DITEM:RETURN 32488 RETURN 32505 Q=PEEK(87):POKE CURS,1:IF NOT Q THEN POSITION 2,20325r}10 ? " "," FOR MENU"32515 IF NOT Q THEN ? " "," NEXT HIGHEST LINE":? " "," NEXT LOWEST LINE"32r}520 IF Q THEN ? "  ANY KEY TO PAUSE/RESTART"32525 ? "PRESS TO EDIT";32530 IF NOT Q THEN POSITION 5,1432r}535 POKE CURS,N7:RETURN 32540 TITLE$="":GOSUB 32400:GRAPHICS N7:CLR :X=USR(1536,N7,N7):X=USR(1536,32100,32540):BLANpx&S'-BcBy #' %%(PLACE FORMATTED DISK IN DRIv}VE,(PRESS SPACE BAR(,( PLEASE WAIT"F:Ad,"AU" A036-A6!AA3Av}A&""6@ A0 6-%@: APD6-BcN""6@ A X v}6-%@b Al6-?:A6,v6( ( DONE$A@d6A@dz((( PRESS SPACE BAR Fv}OR ANOTHER COPY|2AdAU2F:Ad,"AUA6~"F:Ad,"@3" A *** DISK SAVERv } *********::104,169,0,141,11,3,133,240,141,4,3,169,1,141,1,3,141;;10,3,169,49,141,0,3,169,87,141,2,3,169,12,133,245,1v!}69??64,133,241,165,240,141,4,3,165,241,141,5,3,24,165,240,105BB128,133,240,165,241,105,0,133,241,32,83,228,238,10,3,1v"}98,245208,223,96,-1*** BOOTSTUFFER ***5567,12,0,6,6,6,76,34,6,162,0,160,0,169,0,145,25199200,192,0,208,24v#}7,230,252,165,252,201,15,208,237,76((FOR XL/XE VERS. THIS IS 177,197 247,242DD0,169,35,133,251,169,6,133,252,v$}169,196,141,200,2,141,198,2,162883,32,210,8,162,4,32,210,8,32,117,8,162,20,32,210,8 ;;32,117,8,32,5,9,32,245,8,201,76,v%}208,14,169,155,32,245778,32,143,9,32,7,7,76,9,6,201,83,208,48,169,155,32 88245,8,32,117,8,32,76,9,32,117,8,162,21,32,2v&}10,8,32*77117,8,32,5,9,201,67,208,6,32,64,10,76,60,6,201,68477208,9,32,189,6,32,143,9,32,80,7,76,60,6,162,11,32>::21v'}0,8,32,131,9,76,60,6,162,15,32,210,8,162,16,32,210H558,162,18,32,210,8,32,5,9,32,117,8,32,38,8,32,52R998,96,32,252,6,32v(},161,6,173,1,12,133,253,32,149,9,32\<<190,9,24,173,241,11,109,1,12,144,27,162,12,32,210,8,32f;;5,9,201,89,240,12,169,1,v)}141,241,11,238,242,11,32,76,9p::96,76,60,6,24,162,19,32,210,8,32,117,8,96,169,49,141z550,3,169,1,141,1,3,96,32,165,8,16v*}2,1,32,210,8,32::5,9,72,32,245,8,32,117,8,104,24,233,47,133,247,32,64@@9,169,0,105,12,166,247,240,5,105,15,202,208,25v+}1,170,189,91<<11,141,10,3,232,189,91,11,141,11,3,32,117,8,96,162,255BB232,189,91,11,201,197,208,248,134,248,134,249,9v,}6,32,213,7,32;;143,9,32,171,6,32,77,8,174,1,12,134,255,202,138,72,32==65,8,104,170,224,1,208,244,162,15,32,210,8,162,v-}3,32,210998,162,18,32,210,8,32,5,9,32,117,8,173,241,11,141,10;;3,206,10,3,173,242,11,141,11,3,169,87,32,52,8,166,255v.}==202,138,72,32,65,8,104,170,224,1,208,244,32,95,8,32,176777,162,10,32,210,8,96,169,0,141,4,3,169,11,141,5,399169,v/}11,141,10,3,169,0,141,11,3,169,87,141,2,3,32,8377228,48,4,32,65,8,96,76,150,6,32,65,7,32,117,8,162;;6,32,210,8,169,11v0},133,245,32,5,9,32,245,8,201,155,208EE11,230,248,198,245,208,250,166,248,202,208,11,166,248,157,91,11@@230,248,198,24v1}5,208,224,134,250,32,117,8,162,8,32,210,8,32::137,9,32,117,8,32,5,9,201,89,240,10,32,117,8,165,249$::133,248,76,216,7,v2}96,32,252,6,169,0,141,10,3,141,11,3.99169,82,96,141,2,3,169,11,141,5,3,169,128,141,4,3,328==123,8,32,83,228,48,1,96,76,v3}150,6,166,250,232,24,173,241B@@11,157,91,11,232,173,242,11,157,91,11,96,24,173,241,11,109L==1,12,141,241,11,144,8,173,2v4}42,11,105,0,141,242,11,24,96V::169,155,32,245,8,96,24,173,4,3,105,128,141,4,3,144,3`22238,5,3,24,238,10,3,32,145,8,96,1v5}73,10,3,201j66FOR ENHANCED DENSITY CHANGE LINE 1140 TO DATA 16t 208~208,12,173,11,3,20155FOR ENHANCED DENSITYv6} CHANGE LINE 1170 TO DATA 42''208,5,162,2,32,210,8,96,162,0,134AA246,169,0,133,245,138,72,189,91,11,32,245,8,10v7}4,170,232,230DD245,165,245,201,13,208,237,138,72,32,117,8,104,170,232,232,230DD246,165,246,201,10,208,216,96,232,134,v8}240,162,0,189,122,10,232EE201,155,208,248,198,240,208,244,189,122,10,232,134,254,32,245,8@@201,155,240,4,166,254,208,v9}239,96,162,11,142,66,3,162,0,142::72,3,142,73,3,76,86,228,162,80,169,3,157,66,3,169,3899157,68,3,169,3,157,69,3,169,4v:},157,74,3,169,0,157,75883,32,86,228,169,7,157,66,3,169,0,157,72,3,157,73,3@@32,86,228,133,241,169,12,157,66,3,32,86,2v;}28,165,241,96,2014410,176,5,201,0,144,1,96,76,60,6,173,242,11,201 55FOR ENHANCED DENSITY CHANGE LINE 1300 TO DATA 4v<}2@@240,24,56,169,0,237,241,11,133,253,32,149,9,32,190,9,162,7($$32,210,8,162,0,76,210,8,56,169266FOR ENHANCED DEv=}NSITY CHANGE LINE 1340 TO DATA 16< 208F237,241,11,133,253,32P99149,9,32,190,9,162,7,32,210,8,162,9,76,210,8,169,6v>}4Z@@141,198,2,96,169,244,141,198,2,96,169,196,141,198,2,96,169dEE48,133,225,133,226,133,227,56,165,253,233,100,144,6,13v?}3,253,230nCC225,16,246,56,165,253,233,10,144,6,133,253,230,226,16,243,230xBB227,198,253,208,250,96,165,225,32,245,8,165v@},226,32,245,8,165;;227,32,245,8,162,14,32,210,8,96,162,16,169,3,157,66,3::169,4,157,74,3,169,128,157,75,3,169,0,157,6vA}8,3,169,0AA133,234,133,236,169,6,157,69,3,169,12,133,235,32,86,228,230>>236,169,7,157,66,3,165,234,157,68,3,165,235,1vB}57,69,3,169@@128,157,72,3,169,0,157,73,3,24,165,234,105,128,133,234,165??235,105,0,133,235,32,86,228,48,21,206,1,12,2vC}08,206,169,12::157,66,3,32,86,228,48,6,165,236,141,1,12,96,76,150,6;;162,15,32,210,8,162,13,32,210,8,162,5,32,210,8,1vD}62,188832,210,8,32,117,8,32,5,9,169,12,141,252,2,32,211,97732,195,6,32,213,7,32,143,9,32,252,6,32,77,8,174,1;;12,vE}134,255,32,109,7,96,155,84,72,73,83,32,66,76,79,67>>75,155,83,69,76,69,67,84,73,79,78,63,155,198,213,204,204FF155,160vF},196,201,211,203,173,203,210,193,205,160,155,98,121,32,82@@65,78,68,89,32,66,79,89,68,155,208,210,197,211,211,160,208=vG}=204,193,217,155,78,65,77,69,32,63,155,32,76,69,70,84,32>>79,78,155,83,85,82,69,63,32,89,47,78,155,212,200,201,211"IIvH}160,196,201,211,203,155,196,207,206,197,155,194,207,207,212,160,197,GG210,210,207,210,155,211,205,193,204,204,197,210,160,vI}191,155,66,796::79,84,32,84,65,80,69,155,45,83,69,67,84,79,82,83,155@AA32,32,73,78,83,69,82,84,155,194,207,207,212,173,vJ}173,196,201JII211,203,155,155,200,201,212,173,173,210,197,212,213,210,206,155,208TCC210,207,199,210,193,205,173,207,235vK},161,155,76,41,79,65,68,32^9979,82,32,83,41,65,86,69,32,63,155,67,41,65,83,83,32h::79,82,32,68,41,73,83,75,32,63,155,48vL},46,197,77,80,84r9989,32,32,32,32,32,32,48,32,49,46,197,77,80,84,89,32|9932,32,32,32,32,49,32,50,46,197,77,80,84,89,32,vM}32,329932,32,32,50,32,51,46,197,77,80,84,89,32,32,32,32,329932,51,32,52,46,197,77,80,84,89,32,32,32,32,32,32,5299vN}32,53,46,197,77,80,84,89,32,32,32,32,32,32,53,32,54::46,197,77,80,84,89,32,32,32,32,32,32,54,32,55,46,1979977,80,84,8vO}9,32,32,32,32,32,32,55,32,56,46,197,77,809984,89,32,32,32,32,32,32,56,32,57,46,197,77,80,84,89//32,32,32,32,32,32,57,vP}32,13,0,0,0,0,0,0,-2 D:BOOTSTUFFER'-BcBy #' %%(PLACE FORMATTED DISK IN DRIt* kl!7SPCFTABPDTFELNSAXTTTNNCRIKCHRJN1AWF@zR}@@@@ @ zS}@ !"#zT}$%&' INITIALIZEQ +-@@K:?@QARzU}@;@,;@,;@,;@,;@,9@R,9@<@,9@R,9@R,;zV}@,9@,(T }-@@ )  SOLITAIRE;-@@T HIT ANY KEY TO START2"6-H:F:B7p,,"zW})@<4 >:A%,6-@(6-@R46-@F: A-@0  SHUFFLING...: A`P(zX}-@(  DEALING... ZG-@@+-@@5 A 9 = G A d@-zY}@ & TYPE M TO MOVE TO THE NEXT EMPTY SLOTn,, $ OR P TO PLACE A CARD AT THE CURSORxE"@6-@'6-zZ}1 AE"A`T)6-P:+8,&@,'@,%@T6-8,&@$P:+8,&@,'@,z[}"@ApG6-8<&@,/'@"P:'@,=6-%@G A E-"@)"@)"@')"z\}@@;6-%@E A 06.>:@ ,6-&6. 0 A pAdAUS6-F:Ad,,6-++z]}",$@,=6.>:%@ ,I"AUS A pAUA C6-F:Ad,#6.>:%@ ,/"AUz^}9 A pC A))@6.>:,)4PAP5 4M6.  A p+6-%@5 A  Az_}"@A6-8<&@,$$'@"P:'@,A55"@)"@)"@')"z`}@@A":6-8<,6-88<,,:6-88<&@,%@,,))688<,,-88<&@,%@,6!!688:@ , A p.-@!zd} NOW YOU HAVE A CHOICE OF## WHICH '2' YOU WANT TO PLACE## TWO OF 'S','H','D',OR 'C' )@6ze}.>:,! 4S6-@! A! 4H6-@! A! 4D6-@(! A! 4C6-@Azf}! A A NOW EXCHANGE LOCATIONS%6-8<,6-88<,,%6-8,688<,,-8, 68,-zg}-@!F-@@B % F  A &%%PLAYER CANNOT MOVzh}E SO RESHUFFLE0&-@@&68,-:aa8<@,@*8<@,@*8<@,@(*8 B #6-@R#-@@8,"A0,-@8,(688<,,zn}-,  0-@@0-@%8,@6-P:H:@,$%@,68,"68,-zo}8,,6-&@6 AP368<,-8,68,-8,+6-&@/ 3  *-@@R&68,-*  zp} A @ SET UP BOXES*-@@  4M6.>:@,&-@@8 >:@#,< zq}M >:@,>1-@@*  >:A$,. 1 HW-@@) >:@$,- > >:@zr},B T-W$RSET UP DECK\$-@@R 68,-$ fo-@@+-@@zs}G6-P:H:@,$%@,U68<,-8,a68,-8,o6-&@p   zX-@@+-@@M6zt}88<,,-+&@,$@%Q U X$SHOW CARDA6.{`66-P:+8<,&@,'@,%@A6.7<,2zu}26-8<,&@$P:+8<,&@,'@,"@6. "6. 234567890JQK"6.7<, A p$zv}LOCATE CARD POSITION2)-$@&@$@&@/ 2$I6-@+-@@R@768,-8,zw}E6-%@I m-@@+-@@?8,!8%@,H6-8,\68,-8%@,m68%@,zx}-  $-@@T)6-P:+8,&@,'@%@,T6-8,&@$P:+8,&@,'@,zy}"@6-@c6-8<&@,W@*@*@'*@@*'@P:'@,c6-@zz}   $$ YOU WON.+-@@ + ӡ8Q-@@!#  YOU WON!!5-@@"Q  ITz{} TOOK YOU  TRIESB1-@@#1 TYPE 'Y' TO PLAY AGAINL+)@6.>:,!4Y+ @0V 4Nz|}` AD:SOLITAIR.SEPTAIR.SEP2<HRJN1AWF@xFDE\jADDBECIOICCOICBADICBLEICSTABUFFERFIREADADADLEE~~} ~} ;@,!F:B2y,@!%D:MNO 6.hhh%67@,.>:Ap,767@,.LVO67@,~}.>:A(,?+@%@?6-F:A`,%AV$F:Aa,%@Q0@70@~}Q0@@@R&@@%@d3-@ADF:%,"@R%@2F:%,"~}@%@d2%@%@d z,@@ D:COLOR.OBJ9)@F)@S)@~}`)@m)@z)@++6-@%+%AV$,&+%AV$, A @i*@@~} D:PICTURE96-F:@,H6-F:@,T6-Ay6^ A i@G%2AP@@~}G2@AT@@6-?:Ai<@,h -@6? <2AQ@X2@~}AR@dA h  %D:MN6-@File#2,$2036-A46-A6'6-A@36-A~}HHHhhhe H)8h Lh e ԍХ) ̍`ILh`K?ꪫ}*  } **}*} *** }  *}**}*  } }**} *} <0???<