' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֝uW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'Ӝu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wU H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   vLDcpq` [` ~  Lh@(LH9LHH/Hh/ H-З( ܸ(& ¸$8 H` *HVDP (ED Z $0x8x D- ܸDD#HIHHHHhHH݌hHhHh݌H6 h Լ ռ ռ ռ`HJ>݌h Hh݌`  1#"""  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0FG8`0($ p,&"_]` L/浍굺L  !"#$%&'()*+,-./0123456789:;<=>?&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ穎鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` `CC`ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LL[dmx-#(#6 @C͠٠ˠ@跻~!Wo*9~~~~ɬƬ~UVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS @ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABR^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHn 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)nooõĵL LLЦ  #-µµ( zegehtpjigh q Ql` z8L`MaEK@>ˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ@ NL   L` -e L գsr ࣭ml ࣭srL -µLЦ գ ze)rs zrsLq ] Qlr L̦ գ8gh ࣥhgL գ8LʨM ࣥˤLµH hLħõµ µõL&E`( 80 0 DDLDLDL^ t^`,tP ȟpMt-^^`DH hWLԧ d@` Lꢩ  c ȢL LqLգcl mllm ꢥELȦAD@ C N cLuɠ% d: L ЌĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ Cu`浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(`  d ֠Cz# 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ ` _ o <= ,3ii8逅 X<=>?(<=>?<=>? u:Lmli): [)jjjjJ S:;:>;?ǥ`ȱ:0:e2+88:ȱ:Р:  c ɍ ɍЂ`  笍䍲ӠӮҠ􍲵荲Ƞؠ荲ҠӠΠҠʠà􍲵̠󍲵٠̫Ԡ̠􍲶Р̫̍à̫àЍԍРѠҮЮɍӠ퍠ӮҠԍРŠȍà堣ٍ̩٠卲̠堣卲ɠӠ卲Ӡà̍à̍Í̍à̍РƮҠ쿍ŠұѠŠ󍲸ӠÍà̍ҍàҍàҍÍ̍àҍРƮҍŠұѠō̮ҮЍԍРѠȍٍٍٍ̩РƮҫ忍Šȍٍٍ̩РƮҍŠұŠҠ֠􍳱ұҠԲ即Ҡ͠ҲĠ󍳱̠Ԡ 􍳲РčѠҴҳč̠ҳРčŠԍҴРҠؠؠ؍Ѡ̮ҮЍ卲Ġư󠽠䠣󺠱䍲􍲳Ѡ̮ҮЍĠƠ庍󍲳Ѡ 􍲳ŠȠ򍲳 ٠̩٠Ƞʠ占׮Į庠ȠҠӬ؍ؽ蠤Ġ󍱰ǠΠ򠲰Ǎ䍱§ʧЦҧ󍱱砠ίƍ䍱РΠǠЩ獱Ǻ堤Ƹñ򍠠ƮҠѠ󍱱ƮРѠ󠱲󍱱Ʈ͠Ѡ󠱲󍱱̠Ѡ򍱲ҠѠ堤䍱ԠѠ􍱲̠Ѡ򍱲̠Ѡà󠭤̠ѠŠ󠫤ĠѠð䍱 Ѡð􍱲ӠѠƸàʠѠƹ􍱲ŠѠõαѠĶƠԯԠ􍱳ԠѠĠԲѠŶ󍱳àѠŷÍ͠ѠŸ֠ѠŸ͠Ѡ󠣠ŠѠ÷ԭԠҠƠȠʮύ٠٠Ԡ򍱴ҽҠԍĢ危ҠԠ􍱴ҠԠ危ҢҠԍҠԍҠԍҠα􍱵ҠŠ危Ҡ̠͠ƮҍƮҠ䩍̫Ʈҫ ¯ʿҠԍҠԍʍҠԍҠԍ٠Ġ ʍٍ̠ԠРʍѠҮЮύ󠭠󍍱ӸàƮҍàƮЍƮҫ䠱򍱸à砫ƮЫӸàƮҍàƮ͠򍱸Ʈҫ砭àƮͫҠŠƮ͠Ʈҭ̠ƮҫƮ̫ͫƮЍ̍ƮЫ̫Ԡ젣Š΍ҮЮϠԍРŠҮЮɍàԍƠ̫̍ƍ̍ƍ̫Š΍ҮЮɠñƠ̍ñ̫ƍ̫̍àԍΠؠà􍲲Ҡà䬠ÍР٠̩٠卲ŴàРàРؠàؠ؍場àĠðì؍Ѡ̮ҮЍРàШةàؠ          ̭ððİİ͍ŶðƸİƹ͍úŠưàŸİøĠĠĠĠİƸƠ øĠĠ ĠĠĠĠč°ĠĠĠč¸ĠĠŠŵðưŶİǍԢ䮢Ԡ Cz #????? ٱʠ ήӠӠή͠ŠήĠήРŲήΠ ҠϭҠӠ!ŠԠ"ήΠҠΠȠүנԠȮʮŠ Ƞʮʠ   ͠٠ˠȠԠӠҠҠ ԠҠҠٱ68(ST6UVk,ȱk-`),-`G ::63000]Y140:"=";::qX;:5:A$(X):(" "X" ";:6:(A$(X),15):2X" ";:5:(NA$(X),8,15):<1:20:22:20:34,1:2:FP33,21:32,19:1:1:: U33,40:32,0:23:1::U Z85:23:"IS YOUR PROGRAM LISTED HERE? Y/";::"N";::" ";:A$:w dA$"Y"MAXN1:N105::2000 n23:958:34,1:35,21::35,24: 60:X0 N1105 ((NA$(N),8,1))652000 ((NA$(N),8,1))61N105:2000 ((NA$(N),8,1))942000! XX1: A$(X)(NA$(N),8,30)T T(X)((NA$(N),2,1))h X21İ30:2000 X21X61X101İ80 X41İ40:2000 $X41X81İ90 .X61İ30:2000 8X81İ40:2000 BX101İ30:2000 L40  MAXX 85:34,22 23:958T "SELECT A FILE BY NUMBER -->";A$:A(A$):AMAX2010_ A1Ĭ} :::T(A)66T$"BRUN " T(A)84T$"EXEC " T(A)65T(A)73T$"RUN " 23:T$A$(A) 23:D$T$A$(A)  NAME$(105),A$(105),T(105) "X138:B$B$"=":3 ,X10511:NAME$(X)B$:I 6NAME$(0)(B$,19)U @D$(4)} E12:12:"READING CATALOG ":12:29 Y63075 ^2054:D$"CATALOG" c216,0:D$"PR#0":D$"IN#0": h(NA$(0),1)" "Ģ12:868:"!!! ERROR - UNABLE TO READ DIRECTORY !!!": |:10005 1:" 80N":0,63998:0     " GRAPHICS ADDRESS CONVERTER .D$(4)<D$"PR#3"F(::R210:20}<"GRAPHICS ADDRESS AND LENGTH CHANGER"F11:25P" BY MARK J. RUSKIN"Z14:20d"(1) CONVERT HIRES GRAPHIC";n16:20 x"(2) CONVERT DOUBLE HIRES GRAPHICS"; 18:205 "(3) QUIT PROGRAM TO BASIC";Y 20:20"WHAT IS YOUR CHOICE?";a A$q A$"1"300 A$"2"400 A$"3"500 A$"1"A$"3"160 , 614:20:"FILE NAME TO CONVERT? ";B$ @10 JD$"BLOAD";B$ TD$"BSAVE";B$;"1,A$2000,L$2000" ^10' h305 :14:20W " FILE NAME TO CONVERT? ";C$` 10r D$"BLOAD";C$ D$"BSAVE";C$"2,A$2000,L$4000" 10 30 :D$"PR#3":   a  *** INITOR'(* BY82* B.D.BRETTH<* 18/08/88OF*VP*mZ:6:D$(4):T135d(978)157ĺ"PROGRAMME WORKS WITH 48K DOS 3.3 ONLY.":n17::"INITOR";:: x:"AN UTILITY TO INITIALIZE 5.25 IN. DISKS":"WITH UP TO 40 TRACKS. dISKS CAN BE"a "INITIALIZED WITH DOS 3.3 OR WITHOUT":"DOS 3.3 ON TRACKS 0 - 2." :"DATA DISKS CAN CONTAIN UP TO 608 FREE":"SECTORS WHILE DOS 3.3 DISKS CAN CONTAIN":"576 FREE SECTORS." 22:"PRESS ANY KEY TO CONTINUE: ";:Z$:6 :8:"WITH DOS 3.3 IMAGE (Y) OR NOT (N)? :";:Z$:O Z$"Y"Z$"N"160| 10:"NO. OF TRACKS ON DISK (18-40) :";T T18T40180 B1(T10):B1B1176 B2T(T10)10:B2B2176 Z$"N"300 :8:"INSERT AN ERASABLE DISK AND HIT ";A$U 48894,T:44725,T4:46063,T:TELL DOS NO. OF TRACKS TO INITIALIZEj D$;"INIT HELLO" 48894,T1:44725,T14:46063,T1:RESET TRACKS = 35 :8:"A ";T;" TRACK DOS 3.3 DISK HAS BEEN":"INITIALIZED. ANOTHER ONE? (Y/N) :";:Z$: Z$"Y"ė:8:110 ":S ,:8:"INSERT AN ERASABLE DISK AND HIT ";A$c 6PASSPASS1 @48894,T:44725,T4:46063,T J44793,11:42344,76:44723,4:PREVENT DOS & HELLO SAVE AND MARK TRACKS 1 & 2 FREE TD$;"INIT HELLO"' ^48894,T1:44725,T14:46063,T1:RESET TO 35 TRACKSX h44793,5:42344,32:44723,12:RESET DOS INIT` r:n |BUF20000w BUF 550 DSLOT(IOB15)16:DRV(IOB16):VOL0 D$(13)(4) LOAD TRACK 1, SECTOR 0 :"LOADING TRACK 0 - SECTOR 0":TRK0:SEC0:LOCBUF&CMD1:620DSECTOR ZERO BOOT MESSAGESI079:XbLOCI,X:|LOC46,B1:LOC47,B2SAVE SECTOR:"SAVING SECTOR":CMD2:620T;" TRACK DATA DISK INITIALIZED!":720&PREP FOR RWTS0FINDIOB768:RWTSFINDIOB8:ERR78B:ADRFINDIOBFINDIOB25:V:ADR,V:eDFINDIOB:IOB(78)(79)256:N32,227,3,133,79,132,78,96X32,227,3,32,217,3,176,5b169,0,133,78,96,169,1,133,78,96l* RWTS *vIOB1,DSLOT16:IOB2,DRV IOB4,TRK:IOB5,SEC8IOB9,LOC256:IOB8,LOC(IOB9)256SIOB12,CMD:IOB3,VOL]RWTS72,0:IOB3,255:IMPOSSIBLE VOLUME NUMBER(ERR)710:"DISK ERROR"D$;"MAXFILES 3":RESET HIMEM TO NORMAL22:"Another Disk? :";:Z$:)Z$"Y"ė:::D$(4):T135:1101:1,166,43,189,136,192,32,88,252,169,37,133,0,169,8,133,1,32,24,8,169,0,240,252,160,0,177,0,240,632,240,253,200,208,246,96,196,207,211,173,204,197,211,211,160,180,176,160,212,210,193,195,203,160,196,201,211,203,141` 194,207,207,212,160,193,206,207,212,200,197,210,160,196,201,211,203,0,0,0 194,207,207,212,160,193,206,207,212,200,197,210,160,196,201,211,203,0,0,0       ***************+* *@* CAT.READ *U(* BY *j2* B.D.BRETT *<* 18/08/88 *F* *P***************Z:6dBUF20000nBUFxD$(4):TI35:HE$"0123456789ABCDEF"/ (978)157ĺ"PROGRAMME WORKS WITH 48K DOS 3.3 ONLY.":J 16::"CAT.READ";::h :12:"READING CATALOG " NA$(50,4):T(50,4),S(50,4),L(50),A(50) TRK17:SEC15:LOCBUF CMD1:990:Initialize DSLOT(IOB15)16:DRV(IOB16):VOL0 TI0:N10:N20:N30:N40:OF35! 1060W TY(LOC14TI35):TY0TY(LOC13TI35):235` 500} (LOC11TI35)255470 TY0TY128280 TY1TY129330 TY2TY130380 TY4TY132430 N3N31 "Z$"":I130:Z(LOC13ITI35)128:NA$(N3,3)NA$(N3,3)(Z)& ,Z 6T(N3,3)(LOC11TI35):S(N3,3)(LOC12TI35)c @470o JN4N41 TZ$"":I130:Z(LOC13ITI35)128:NA$(N4,4)NA$(N4,4)(Z) ^ hT(N4,4)(LOC11TI35):S(N4,4)(LOC12TI35) r470 |N1N11D Z$"":I130:Z(LOC13ITI35)128:NA$(N1,1)NA$(N1,1)(Z)J ~ T(N1,1)(LOC11TI35):S(N1,1)(LOC12TI35) 470 N2N21 Z$"":I130:Z(LOC13ITI35)128:NA$(N2,2)NA$(N2,2)(Z)  T(N2,2)(LOC11TI35):S(N2,2)(LOC12TI35)1 TITI1:TI7TI0:SECSEC1E TI0SEC0210N 220V :~ I1N2:TRKT(I,2):SECS(I,2):1060 TRK(LOC12):SEC(LOC13):1060 A(I)(LOC)256(LOC1):L(I)(LOC2)256(LOC3) &3:14::"BINARY FILES";:: 05::"TURN ON PRINTER & PRESS ";:Z$:IDD$;"PR#1"YN(9);"80N"X20);"APPLESOFT FILES":20);"_______________"blN10ĺ"NO FILES PRESENT":680vI1N1DET(I,1):1200:T$H$DES(I,1):1200:S$H$$NA$(I,1);" -T/S LIST AT T$";T$;" ,S$";S$*2:`20);"BINARY FILES":20);"____________"fN20ĺ"NO FILES PRESENT":790I1N2DET(I,2):1200:T$H$DES(I,2):1200:S$H$DEA(I):1200:A$H$DEL(I):1200:L$H$;NA$(I,2);" ,A$";A$;" ,L$";L$;" -T/S LIST AT T$";T$;" ,S$";S$A I:s 20);"TEXT FILES":20);"__________"y*4N30ĺ"NO FILES PRESENT":880>I1N3HDET(I,3):1200:T$H$RDES(I,3):1200:S$H$ \NA$(I,3);" -T/S LIST AT T$";T$;" ,S$";S$fp:Hz20);"INTEGER FILES":20);"_____________"NqN40ĺ"NO FILES PRESENT":970}I1N4DET(I,4):1200:T$H$DES(I,4):1200:S$H$NA$(I,4);" -T/S LIST AT T$";T$;" ,S$";S$D$;"PR#0"1160Prep for RWTS7FINDIOB768:RWTSFINDIOB8:ERR78_ADRFINDIOBFINDIOB25:V:ADR,V:FINDIOB:IOB(78)(79)256:32,227,3,133,79,132,78,9632,227,3,32,217,3,176,5169,0,133,78,96,169,1,133,78,96$* RWTS *.IOB1,DSLOT16:IOB2,DRV*8IOB4,TRK:IOB5,SECUBIOB9,LOC256:IOB8,LOC(IOB9)256pLIOB12,CMD:IOB3,VOLzVRWTS`72,0:IOB3,255:impossible volume numberj(ERR)1150t~:"DISK ERROR"D$;"MAXFILES 3":Reset himem to normal"22:"Another Disk? :";:Z$:8Z$"Y"ė:::90@:H$"":M301:N%DE(16M):DEDEN%16M:H$H$(HE$,N%1,1):     (,,,`e( (,`뷍e ?췭# h΁`HX h`   췍,,`9(104)137Ĺ104,137:137256,0:(4)"RUN COPY128"V(4)"BLOAD COPY128.OBJ" RD34816:WR34819:FMT34822:MA34984:AM34987SDV%(3,3):SDV%(2,0)7:SDV%(2,1)2:SDV%(2,2)254 d::" APPLE DISKETTE DUPLICATION UTILITY 128K RAM REQUIRED/COMPARABLE TO COPYA ":F 12:"ORIGINAL SLOT :":10:"DRIVE :"q 16:"DUPLICATE SLOT :":10:"DRIVE :" ,I01:J01 6I4J12:17:868:A$:A$ @MXSDV%(2,J):MN1:SDV%(I,J)(A$):SDV%(I,J)MNSDV%(I,J)MXĺ(7):310 TI4J12:17:868:SDV%(I,J) ^J,IF hD11:J01:SDV%(0,J)SDV%(1,J)D10M rJ[ 20:868 22:"ARE THESE VALUES CORRECT? :Y";(8);:A$:A$ A$(13)A$"Y"A$"y"100 22:868:"PRESS ANY KEY TO BEGIN :";:A$:A$:22:868 FIRST1 T34016:I018 1,SDV%(I,0):2,SDV%(I,1):5,15C XI700M ]3000c bJ01:0,T(8J) gA$"READING DISK":2000 l4,SDV%(I,2) vRD A$"":(3)A$"UNABLE TO READ" 2000 (3)I1:T0:J1 T8J1 JČMA J 1000 4000/ (FIRST)SDV%(I,2)0800N A$"FORMATTING DISK":2000W FMT} A$"":(3)A$"UNABLE TO FORMAT" 2000 (3)I1:T0:1000 J101:T8J0 "0,T(8J) #A$"WRITING DISK":2000 %4,SDV%(I,2) *WR 4A$"":(3)A$"UNABLE TO WRITE") >2000? H(3)I1:T0:J0J RJČAMQ \JX Id FIRST0k T A$"COPY SUCCESSFUL." (3)A$(7):A$A$A$"COPY ABORTED." 20:A$ 22:"COPY ANOTHER DISKETTE ? :N";(8);:A$:A$A$"Y"A$"y"400@216,0::9790 "HARD WAY TO ENDLI412:21:868:A$: D1Ģ22:1:"INSERT ORIGINAL THEN PRESS RETURN:";A$:22:868 D1Ģ22:1:"INSERT DUPLICATE THEN PRESS RETURN:";A$:22:868     LrLL  ȩ `H h i0j` 2` 2`  Ll` g8 Ɉ  Ɉ`Hh``u=<<<=`   ͠ؤ¬ҠɠϠºؤɬˠԍŠ ԠҠɠϠԠԠԠ٢ Ԡ΢ Ԡ˯ŢҠɠϠԠԍԠӠҠԠ¾ӠҠԠþӠҠԠľӠ͢ԠžӠӢԠƾҠԠǾҠԠȾҠԠɾ͢ԠʾӢԠ˾ĠҠǢԠ̾ˠҢԠ;ŠӢԠξԠŢԠϾ٠Ϡˠ٢͠Ġо΍͠ĠѾ΍͠ĠҾ΍ҠɠϠº ɺ ԠؤɬԍҠɠϠԠԍ   ԠþĢ   ԠŠԠؤԠؠàؤƠؠΠƠؠҠؠ ΠؠؠƠؤجˠΠؤجŢŠϠؤجˠ ؠ Ԡؤج̍ƠؤŢĠؤŢΠԠҤҤ  ȠԠǺ̠ԠϠԠŠȠ¾ԠؤԠ  Ԡ̠ϠƠؤŢĠؤŢΠԠҤҤ  ȠԠǺ̠ԠϠԠŠȠƾǾԠؤԠ  Ԡ̠ϠϠ   ԠԠŠŠŠŠ˿ٯΩԠؤԠƠؤ٢Π  Ԡ̠ϠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠƠؤŢΠŠŠŠŠŠ͠ŠŠӍ͠ŠŠӍ͠ŠŠӍ΍΍       PEANUTS PICTURE PUZZLERSHTK0:LT35:ST15:LS15:CDWR:FAST1`47426,24:490:61047426,56:490:T1TK:TK(TRK)1::310:TKT1:610(TRK)LT1060TK(TRK):ST(SCT):1020$:"COPY DONE": 2 CHANGES  0,3,145,222  0,3,155,170  DLM SOFTWARE<TK3:LT35:ST15:LS15:CDWR:FAST1g47447,0:47337,0:47411,106:490:61047447,240:47337,244:47411,251:490:610:(TRK)LT1050TK(TRK):ST(SCT):1020:"COPYDONE":" MUPPET WORD BOOK(BK8:LB279;380:CDRD:30N380:CDWR:30vBK(BLK)(BLK1)256:BKLB2020A$"COPY DONE":10280'(4)"BLOAD DRVR.MUPPETS,A$1900"$ PRINT SHOP SIDE 2 CONTROLLERLTK0:LT35:ST15:LS15:CDWR:FAST1\490::610490:T1TK:TK(TRK)1::310:TKT1:610:(TRK)LT1060TK(TRK):ST(SCT):1020$:"COPY~DONE": 12~CHANGES 16,6,45,96  16,6,46,64  16,12,224,96*  16,12,225,73;  6,14,54,24M  6,14,55,144^  6,14,56,37o  6,12,14,24  6,12,15,144  6,12,16,59  6,12,206,234  6,12,207,234 ; CON.PACMAN,TK3:ST0:LT35:CDWRFT1TK:490:360:550i430:100:STST1:STDOS1030vBF1060ST0:TKTK1:TKLT1030$490:TKT1:ST0:360.430:100:STST1:STDOS10708ST0:TKTK1:BF0TKLT1070 BTKLT1020 L:"COPY~DONE":: '(4)"BLOAD~RWTS.PACMAN,A$1900"   140T$(11):I0:N0MF8:L104:F=#FIELDS/REC & L=#REC LEN. Y D$(4)_D$"OPEN IMFILE.DAT,L"L",D2"D$"OPEN ASCII.DATA,D1"(NN12D$"READ IMFILE.DAT,R"N7"REC-"N<I1FFT$(I)KI" "T$(I)P UD$"APPEND ASCII.DATA,D1"3 ZD$"WRITE ASCII.DATA"> dI1FI nT$(I)O xZ }I(0)b 40q D$"CLOSE" "File transfer finished" "ERR# "(222)" IN LN# "(218)(219)256  " PRETEND TO DELETE THE DISKJ"THE DISK IS ABOUT TO BE DELETED!"X16151,1d(T150k2Tx<49384,0F"FOOLED YOU! HA! HA!"P!) ABRACADATA DESIGN YOUR OWN SERIESCTK0:ST0:LT35:CDWRY47507,0:47517,0hT1TK:490w47445,213TK((TK2))2Ĺ47445,212$430:100:STST1:STDOS1060.BF10908ST0:TKTK1:TKLT1040 B490:47445,213:TKT1:ST0& L430:100:STST1:STDOS1100H VST0:TKTK1:BF0TKLT1100X `TKLT1030} j47507,174:47517,164:47445,213 t::"DONE":""