' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 R*Ͳ*ʎR*ʎ]*]*]*ɍuLɍ}R*LR*ɍ*g^H8* ^&hZ*LɍR* &LͲ*ɊR*R*%* Q(L$Ͳ* Z*@ -^*  \*[*Z* Q(Y*\*[*Z*8`l6L_*Ȍb*_*Ͳ*]* !)Y( h( (֝u**W* '* H &h@ ['_* /QSIRb*_*L!`LLL*L7`**`LQ(LYLeLXLeLee Q*H\*(h0L&& $`(* &R*  \*Z*Ll8 R* HH\*`\*Z*[*Y*S*6`*LxQ*ɿu3'u**`*5".Q`pN%$#$$b"p"t""%%%%"""m%2"<"("-"P"y%%0#\##|"6$6$$$e<%%g< 7JJJJj*7h*I * aUL@* kU8*  L % Q(^*R*(jQ*0l^l\ * wU*?AyC@B@B|ACLT$VXZdflpx|~**7777(*3]67V<<8:=???@@##topmnU^_R ij^_lk 󅔆nmLY^^ȱ^ȱ^eȱ^e(ӊ0Цe^^LA@@&E&&A@@&AA)߅CBBH&E&&A@B& ChLQhBAȌy8zx8v{v I7H7@)*AL@m{@AAA,+i(ˢ3Z@[A@ /@v wm{@8/e@@eAA3]ͥ@\ƊiY H8`?E V9L>HH/Hh/ H?-З( 8(& 8$8 H` *8HNx`* >x$50x*$50xL9JJJJ`HHjf5 >h $50x`HA>VD;;P >(ED Z> ?$0x8x D9- 8DD#HIHHHHhHH݌hHhHh݌H6 (G FG HZXj 80x D9$xxH` >( Z>h Z>L=.xxH >hE(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh < <݌ < < h < < < <`HJ>݌h Hh݌`葠葠ȔЖȔЖȠ8  1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#000'#07#0:"4<*55**5*%5)1)1)1)'#0/#0*5*75**5*:5/#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?&Y:&<&Y:&;: 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8 9: :' 9: :& :x)*++`>J><;VU<)?<`8'x0|<&HhHh 8 8 8 8V&` aI꽌ɪVɭ穎77777777777JJJJx 77L? L7877777777 776i 7 7867 7`77 777777`x =(`(8`5775I7`B` 76`77`Ͳ*Lɍ ['LL&_*_* ^& 9 )L&3 9 )a  ! 0L jLY ! u*< !(_*9 ) ˭*ɠu*ɠK_*9 )?L L[dmx- (   Ϡ734@~3!+,W,o,*--,,9,-.-~3~3,,,,~3~3,,,,~3UVERIF!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ȑ@Ȋ@c*h8&ȑ@Hȑ@Ah@L'Hȑ@ȑ@* htphso`hMhL`9V*8U*897T*6S*67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABR^?*c*q)H c*h`f*5h*5j*555@O*AP*`u*@`@5&`Q*R*`E 'Ls' ' ' @DAE@u*`8` %@ @A@`@`**@*A`M5 ) "L&`8@AW*c*@8@-@HAȑ@hHn* &8ɍ` ^&f\*555L& ^&NR* & "R*ΩL&)\*Z* ʽ LH*v 3h`0h8` " ['L & N'С55 &5`*A*@` +5L^6L65`  \* ?*0 '\* '  Q( ^&\*lZl3L e3L &%R*L &%Q*L d' "L4% N'e*)n*5 5 &`@-e*f*f* 5 "L# "5f*`L %.* *t*Q*L$ %L&*L` "O**P**u** d' "L% N'e*)n*o*o*55L6 &L"L& # "#-55*( $ z$egehtpjigh q$ Q(l` $ z$8L`*Ma*EK@>ˆʎ55L $ 5 55555 &a*5`*5` "L&5_*b*JL%u**Lz%`** $  Q(lXJ̥KlV $  Q(lV eօ*@ N'5L& ' ' ' ' "L#` -e* L  #s*r* #m*l* #s*r*L# "-5L& # z$e*)r*s* z$r*s*Lq$ ]# Q(lr** L& #8gh #hgL# #8LʨM #ˤL#5H "hL'55555 &55L&&E`( !80 0 !DDL"DLDL^* t*^*`,t*P pMt*-^*^*`*DH #hW*L' " d'@` "L" 5 5 c* "L" " &Lq6L#c*l* m*l*l*5m*5 "EL&AD@ C' N' 'c*5L&u*ɠ% d': "L" 'Ќ7*75LR0 E0(33 48`433 R0` E033LR0*7*7`777 555I7575757577** 7757`7 L35555f /55555555 ^/`855 i /B58` 41L 15ȱB5 /5555 /5`3 D23ȑB55B5 / 7 55`5555555555 5555`555`55BC55`5555`L3 /5B5C355 0Q340"B4 u*`55555555J5m55m5jn5n5n5ۭ55m5555m55m55`"L? 585H ~.(3` # d ֠z# 3` 02۰Ϭ33B438`3i#`3ЗLw35!50>5555`53 /3m3 3 3733i35 3583 /35ЉLw35`H /5h 25L/~43 533`+QQàҠ蟠ՙ蠌â蠹鰠ѠMŠ𻩠éȰ堤ȠzȥŃ蠠栠Ϡ砠Ū𠠺蠉ʱ̠ŲŅӬƠŠ蠠ƠϠ堠𠁠Ʌ΁ŠŮp]z]̠͠]Ϡӿ](]ԠŠҠî@9`0``@@@```@@x|?~@gg`aG@agc7fld`pxxx>x<888<0px|gCB@@@@9 РӠŭΡ? G MSY_fmw}66L|DŨ p8ǜd,ɐXʼ ˄L̰x@Τl4И`(ҌTӸԀHլt<נh0ٔEL (2<FPZdx,6^hr|$.8=B  4>HR\fp  & 0 : A]ŭA]ŭΠԠҮʮР N@"/r8@p( РӠŭΡ) M6%(o P a(ŭΠ)<\ &FMd6?ed6?ed6?e P\4\ZUVWYdUVW+ xA]A]ŭA]ŭΠ<]ŭΠԠҮʮA ]<]7]ŭΠΠ٠Үʮ N@"3r<@p( РӠŭΡ) (M6%2o P a(ŭΠ)47oPa(ԠŠҬî)<UVW Y FM6&PMd6?ed6?ed6?e Z\\rdUVWYnUVW- xo P a@*#rUVWKYYUVWYMM UVWYo P a()Pa()UVWYo P a()Pa()UVWY\_nQqq("q1?r`1?r1?r%q1?r!,qqq0?rq0?r6UVW@dedeJdeMTdeM^qqhY[rd6ed7e |oPa()Pa()Pa()o Pa()oPa()oPa()[UV W X q.?rq.?rq.?rq.?r\Y[q q.?r&`.?r%[0q/?r":`.?r$0DqdeNq_&`8dr8k r$_<\`$<[9]̠͠Ԡ٠ŠҠ}]נ̠ԠŠɠïϠҠӠЮ٠ĮΠϬ`ĠΠ͠ԠŠҠƠŠǠӍӠ٠٠ϠŠčӠōӠčϠՠȠϠŠԠٿŠōȠĠՠſĠĠ٠ӍŠӍǍˠӍԠԠōŠΠˍˠӍ٠Ӎԍ ]ҠŠӠҠϬ#*]̠ŠŠŠ!4]ԠҠԮƠŠϠ!>]ӠŠ̠٬"H]Š٠ԠŠנ#R]ĠΠϠ \]Ԡ͠ҠӬ f]ŠŠ q80L>nk'nk(X 1vu8 4L:۠-$șȩ0LW     9ƙ U i 0 i8.ș0șylykyjyi00ڊIi i/ȄȪ) q L H ϐ { lhHHH hHL? hυυ Ljݥ ,L mݰ % LߩƉ 慝 憨80 ў*%L L ު `  }LޢLL(L<  } }$%0Ʃ 8(L$0pijlk"ћћliA[8`hH`klmniȅ ӥȅklȥȑȑȑȑȑiȅ` ieȅ` gݥ0 ɐ ~LGHHHHH hhhHH ,҄ hh)klnm?Łћȱeȱeעk,5LԢx8` ћLK*L өȥʆȑ $PhihiȑȊ ↭^e]eR Ӆmn殤ƕƮ8m因n圑bȱhhћȊћLLȥ e^eʅʥʆd ee`^de *& edeeƙ` 8ompnL$8vС,L A  ީ j ީ HHHHH L  ߅Lj A㥋HH jhhȱ𙅄ȱH +륹HHȱHH ghh Lhhhhȑhȑhȑhȑ` jݠ 6hh R䆞`" ȱ "e膮 㦫 R^LԥSR`FHI8eopnm opqrh`M0 䩀hЦstopmnU^_R #ij^_lk 󅔆nmLb^_^ȱ^ȱ^eȱ^e(ӊ0ȱ^ ie^^__Ŕ #^05ȱ^0ȱ^+ȱ^ȱ^poŜ䛐^_e^^__`)Jeiop Ӥȥ敥ȑL䥡HH ` lhhqL 奌  奫  *LݠHȱȱh^_ H^qheqqr` lݥ^_ 5^Hȱ^ȱ^h(po Heooph^_`T SRS` H hhhL* ьHH 㥌 hhe^^_ L* IL` ) ʊH񌰸Iš hhhhhhhHH` L ` ^LL g ᦠL LN覸^e^`_a`H` Jh`` g R L楝ɑ 률PQ`PHQH RPhQhPL F犠P` F熅  L熆PE%`dL 饢IEL < LS리8$Ii0ǨV $W8Ie Ji `eeeeeLi&&&&8坰IiBfffff`IIIIII `ELԢai0vvvvvj`^Vy dv88; 54541r LᥝH- 2 f  \7 h < L bcde 饡 饠 饟 饞 LLJ eeededcecbebfbfcfdfefJ`^_^^^^E ^`e0,iLR襫`I0hhLNL ci ` cP Li v r8坅 Ğğ Ġġ* e24(&&&0⨥塅堅埅垅L@ (LꢅLԥbcdeL.^_^^^^ ^`, r^_^^^ %^^`` r` L襝 *` 녞I*L)F``a`Ȫı`E0!` Şȱ`şȱ`Š ȩŬ`(IL륝J8$ 芢 脤`)F 鄤`ɠ 넬I* L)腞` -+ [..E0 - +f \$8Lf$På8噅 U 9ƚ0`LH$ 9h80 LaH ch 륪EL祚 d$0L eêŦƥ堠ѥԀհť՞ŠÊĨȘƸ`E/E//`$(H)? @(hl8NO,(,` ɛ`2H2 h2Ɉɘ  : 3  5ɕ()ߝɍв [=< @L< >=?<) < `JJJ>IeLץڅuۅv܅݅ߚLLްij ֥`a, PQ ֥`a```aiśj地a`ʈjiLԭVSL@TL9 ʅPQ L PȱQL L,U,R@ ,T,SWP ~)`H)&JJ&&h' &' &' f&')'#i媽0J(` Q&%0Q&&`#0JI0`'0 I`0 I0ݩ()%%01&%0)&E%0Q&&e)j00',"&,i8i#H&ii&hif&i'`'i,&i,&iPII&if&HhH8HӰ hIiHӅхhЅhIi҄f8Ъх e8e҅ԥձ&E%0Q&&bӰ eЅԥePفŴxaI1& ')*& 'JJ) e ʥ0)Je`JJJJӊ)IȄҤѢԆզ8eЅԐ e҅Ր JJJ`JJJJӊ)IȄҤѢԆզ8eЅԐ e҅Ր JJJ` g RQPHH, hh`L `*U W :L ` `  eȱe ` -L -La=?P<Ȅ> sʆ>PHt?QnLԅtp=hso< LeP>eQ? ॔<=`@ ߩL ʊ( (H hL$`J G(i.&E0%.Q&&` , iH h-`/'-'0 (`HJ) 'h)i& &&`0i)0 00`J G&(JJJJ)`:; H:J jɢ )Jb y.)/) JJJ Ȉ` H:  J/Ȑh,--&,*i H/.  `0 .: VȘ L `8/;e:` T0 "T3  T3  T; "D3 D"D3 D"D3 "D3 &1!YMJؤ#]#)i#$S#$S[[i$$)|mi)S4i#bZH&bTDThDt(ntJrtttrDh2"&&rr&HDDȅEhH 0l( Lh:h;l Le / XZ]_, :ILl `Ȇ׍숈l E@A  J 0`YE <Šӭpd`HVTQ PS 6" (!#%L" X`I`ɍ,,L8L,H ΰɐHJ) )h)i( ((`ɇ@ 0`$($$!f`ɠɍZɊZɈ$!$$"% %% e (`I(ii,i\$%H $ hi#ʥ"%$$%%#%"H $(*)+!hi# H $(*0 $(!`8Hh`BC<>=?<=`K i! Ȉ2 ,`H h*:` ƙ.șI)$Ъ0.ȩ+.8嚪-E/8 i:`  cd pLP袊 +륪 #쩊  UH A驊  hJ I`8;)q4X>Vt~w/z*|cYX ~u7ϠGX͠LϠ٠SGϠDĠHSĠNSĠTĠ 5EMҠL Šō?FِLϚΠ κ f ٢  ٦Τ ȹɀI ȄȹH h3 oLl  . $ ; &?1?=A>?I i`HH11`IJ듧ƙɾ5Ė+]̵b@L q L H ϐ { lhHHH hHL? hυυ Ljݥ ,L mݰ % LߩƉ 慝 憨80 ў*%L L ު `  }LޢL L3L`) #L $  `  v mL;ʅ˅LM  mdžة * * *     % 0LH΢QPHΪ0h$0 )?i h](Њ Px+L 4P xL# 48` PxL PeHxeH˰iکeۅȱhڙ`ꠀЕ x ت3 Q3ؕxQεy NvNδPPPL#Q8yڅ`Sε{ϵQڵyxȔPMuHOwh(VP`΅h(OM L6 T&ϐ eڅeۅ &L~ 畠(LoU [΅ڥυ   o ` l3 3` 4J G 4&(JJJJ) 甠` F٩ $ 婠 Ȣ ii)ɰL ̥͐Eʑ˥ʥ˰ਈ$ u~q  u  mʥ` ȹ0 L uߙ`` $0LL*iS 00)ȆȘHJI@hL`ȩ)?Jжi?oiO iȱ) zȵх 8 05X~")XȔ) v*Ȇ0LJɢ  Ȉ ϴX)HЄ ȹ)eHe0hޤȄ h󰩠ɩch cɰ$0 $` d'ʅ˅LM&ȱϰqȥȥ`FLʥM˥J̥Kͩ`Lkȱ0@hJHȱШhЄӠȱ0I@iHeШiH˰hhЈЈ͑Ј̑ЈЈ0JKЬ@iHe eѕxh$0 xx ԅբ H 0  敠$ ( x$0  xx 0$FԨֹ)U h)װ H ֐ι Ll`w0P`fLPεϵxϱHȱ΅hΈ` J  畠P` Y $0`  畠$0 8 P# o ΅ڥυ e epݕ` 4LL$ `  rPՆϦ ` ΅υȩ ` Τ PڵxۥΑȥL`hh$ F`` %ֈ`ʤZA^ܙ ݙ0  m7;܄iȢٚ . y$IqܤݐLM͠1FLJܹ/ݾLuc ܪȱ L[ĨP?xO_ڹo  ʤ  Y YoܹݾЇ`TP@xL` Ιϙ_oܙݙᙯ` ??<<<<<<<0UUUUUUUUWB oTMɅ"3J[NSJIfmzq# [$NYP;#o6#"#!0 9@0Ӷ:Pyإ<[(N>W']5Kgvqh5`4ɺл1>@@A`41`>BD`8>6>) `LL u ?l:L``L@ 'A=?`ʕ>?>`8M˕   , ` L:L``F`$ ܪȱ 婠Lܤ`Ś25 a0 穠LJKH۰hЅѠȱ0@ȱHШhh0J L赟0L0ܤ } L赟L0ܤ } L ` ` [ S oP YVPL6 O 5OPL Ι_LfP0Q@PPxA@QPa`qp`HP8εxh`ɅLLHxܥyݥPQLuƵPxLhQεyϱΠ L 4) ؘ 甠` uHɃLh` ☪ T`  甠`ѥ΅ ΅ҥυө 甠0ХҠ ӕ "L 4i` F`ٚ .L 4 `$$L$Ն$L,L 8!$`L# ȱ0` 4 `u` 7$ 8`0 &&` { %Ppĥ uv` 2e   %F8 2 8Hh&&&&& 0hhI`LJ?>ʊ:>Ș;k/=:   S;:L 4 40K14 L= BC D..=D5֤4 J :3 g ɠɤ ɓՊ x= 4   &B&C= 44ݴ 4ݺ ɤ4&D ?5=ɥD 5 5 D4ɻɍЀL\ɠ` }Ɏ$ ``LXWVhY `XWYHV(` Jhh LH) JQ JJJH`HJ`hh ?l8e` %GQ/[҅n3peʵ``` f f` &L L fLC`8i`uu  ee`` ` 0` ` ` 5I` 5Iй` f f`LJ G(i.&E0%.Q&&` , iH h-`/'-'0 (`HJ) 'h)i& &&`0i)0 00`J G&(JJJJ)`:; H:J jɢ )Jb y.)/) JJJ Ȉ` H:  J/Ȑh,--&,*i H/.  `0 .: VȘ L `8/;e:` T0 "T3  T3  T; "D3 D"D3 D"D3 "D3 &1!YMJؤ#]#)i#$S#$S[[i$$)|mi)S4i#bZH&bTDThDt(ntJrtttrDh2"&&rr&HDDȅEhH 0l( Lh:h;l Le / XZ]_, :ILl `Ȇ׍숈l E@A  J 0P O䯭䮡𥴳\@`` ~3`Gg壡yi壡yi` @Gh X{gggggg'(dgxkg~9g'7(*O AND PRESS RETURN)";A! +VTB2:868:VTB1:36,TB:868:"";H$Y!*+(H$,1)"Y"11060u!/+H$"":P15:OQ500:2490!4+(H$,1)"N"11040!>+(VTB):868:(VTB1):"WOULD SOMEONE ELSE LIKE TO PLAY? ";:VTB(37):TB(36) "H+23:868:VTB1:36,TB:8`E/E//`$(H)? @(hl8NO,(,` ɛ`2H2 h2Ɉɘ  : 3  5ɕ()ߝɍв [=< @L< >=?<) < `JJJ>Ie@@A`41`>BD`8>6>) `LL u ?l:L``L@ 'A&?1?=A>?I i`HH11`IJ듧ƙɾ5Ė+]̵b@TH THE PADDLE HELD OFF-CENTER."':516368,0"* BEFORE WE BEGIN, PLEASE TYPE":"* YOUR FIRST NAME AND THEN PRESS":"* THE KEY MARKED ";(34);"RETURN";(34);(40)(41)256(36),96: CURSORP(16384):P15511000(16287)1272335P156P1412260("";A$:(A$)02335` I1(A$):((A$,I,I))642330m I:II1 A$(A$,I,(A$)):(A$)ĭ(A$)12A$(A$,12) 2490@$ 936:5:"========================================";::" L I T T L E B R I C K O U T ";::"========================================"p. 12:" COPYRIGHT 1979 APPLE COMPUTER INC"xj 20t :"(PRESSING THE ESC KEY WILL END THE GAME)" 23:"PRESS THE SPACE BAR TO BEGIN....";:(40)(41)256(36),96:16368,0 P(16384):(16287)12724807 P160P1552460R 16368,0:P15511000a :24:1:k 936 :A2:B12:C9:D13:E2:F15:COLORS LL5:P15 355 OOLDP1(1), 13006 S0:Y19:L6@ 23:50,63:" PUSH PADDLE BUTTON TO BEGIN THE GAME ";:50,255`J K120:K: ALLOW TIME FOR USER TO RELEASE BUTTON FROM LAST PUSHhT 20X P1(1):((OOLDP1P1)3(16286)127)ERASEİ4810Y OOLDP1P1:WRONG PADDLEZ ERASEERASEERASE1[ ERASE1İ4800] (16287)128(16384)1552900^ 23:8687h A:X,Y3:Y120(1)@r X19c| V1:W5(1)2:LL1:L1800| (A$)ĭL1ĺA$", "; L1ĺ"THIS IS BALL ";6L;" OUT OF 5." (16384)15511000 L13010 50,63:"THIS IS THE LAST BALL"; 50,255:23:* I125125(1):20:I:M1:N02 8023:1:868:50,63:" PUSH PADDLE BUTTON TO BEGIN THE GAME ";:50,255:OQ500:23:1:868:" <<< PLEASE USE THE OTHER PADDLE. >>> ";6,40:7,30:768ERASE20:X SOUND ROUTINEUb768,173:769,48:770,192:771,136:772,208:773,4:774,198:775,7:776,240:777,8:l778,202:779,208:780,246:781,166:782,6:783,76:784,0:785,3:786,96v4! PADDLES NOT PLUGGED IN>!10:"BRICK OUT REQUIRES THE USE OF THE APPLE"&H!"PADDLE SET. PLEASE PLUG IN THE PADDLE"OR!"SET AND THEN PRESS THE SPACE BAR."|\!:"IF YOU DO NOT HAVE PADDLES, YOU MAY"f!"EXIT THE GAME BY PRESSING THE ESC KEY."p!P(16384):P1558560z!16368,0:P1558580:11000 !(16287)127(16286)1278560 !P1608560^ !936::: PADDLES ARE IN AND SPACE BAR HAS BEEN PRESSED. * "ESC" KEY HAS BEEN PRESSED +16368,0:936:(34)0Ģ10 +"WOULD YOU LIKE TO CONTINUE" +"PLAYING? ";:VTB(37):TB(36)!+::"(TYPE YES OR N`ɠɍZɊZɈ$!$$"% %% e (`I(ii,i\$%H $ hi#ʥ"%$$%%#%"H $(*)+!hi# H $(*0 $(!`8Hh`BC<>=?<=`K i! Ȉ2 ,`H h*:` ................................N$\.......................................|%\.......................................&\.......................................'\.......................................(\.................................ՠȠϠŠԠٿŠōȠĠՠſĠĠԠӍԍD"$ՙİĠȘРŮåŹĠʲѪŪŹz̘ՠ栠̺˥Šʠ̠éɠŠՐŖĠ跠Рᠤŗԝ̠ҠŠՐŦӮ踠ᠤ̗ŪӯشȠҠŠՐĠðŠփàŠ栌Ű2>&JJJȱ>'JJJ3ȱ>*JJJfȱ>J&*J&'J&&ȱ>J&*J&'J&*)')3*)f>)JJJ`80|'x&Hh &    Y'&Yxꪽ'    `Hh` aI꽌ɪ򠚽ɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɵ'*&%&,E'зЮ꽌ɪФ`2JJJ'J&J>Ƚ3JJJJ&'J&&3>ȽfJJJJ&'J&&f>ȥ&)>ȥ')>JJJ >`+*xS&x'8*3Ixix&& 8 l {' o {& {x)*++`FG8`0($ p,&"USEDBY (0 8@ HPX !"#$`h%&px')*+,-./12345679:;<>p񩠅aL92DWbr:# LINE# > .STRING. .OLDSTR.NEWSTR. SOURCE FILE<#> # p 8e  Lȱ7 ) LhhLB  H hLL 0 LB  ȹ LB̅L9EFGhHhhJ)LHHEFG(l#.2J-97>EjNWbՑ]mAʄHIHHHHhHH݌hHh݌H6 \.......................................l\.......................................\.......................................\.......................................\.......................................$\.......................................R\.......................................\.......................................\.......................................\....................................... \.......................................8\.......................................f\.......................................\.......................................\.......................................\.......................................\.......................................L\.......................................z\.......................................\.......................................\.......................................\.......................................2\.......................................`\.......................................\.......................................\.......................................\.......................................\.......................................F\.......................................t \....................................... \....................................... \....................................... \.......................................,                                ΠĠԠŠҠƠŠǠӍӠ٠٠ϠŠčӠōӠčϠ D5   , b Y L> b @   Lvم38%0` X L8 :   < `" X    i(  ! o , и` X$i( " X , 7 , ) ; <7698  ; ` o ɱɸ" L; )9 o ɱɳ# L_ )7`  o ɱɸ" L )8 o ɱɳ# L )6789<<` L n o00Щ莻ɽదɬnɽ̻ʎ! o : Lm  ɛhhL%H% h% ` ` `HHH  hhh`HHH : $'   hhh`, `Hh`h`< q  ` Y  < LK ` !!`! !8`!1!2  `iii!Lk !Lk H m hLk !>!2!1!!=!D  # o? : L  hh` >)`ʽ!08`  `  ?,06 /,0&莽 ,0ȌP8``Ȉ!`  nɽ! 莼Ȍ`8`  nɽ! ʎ`8`HH nɽ"̿̿88hh` ȹHH`hh" XL  < L < < B,30ޭ# #   ` H h ` $> = ` ` : :   oOɃ  hhhhhh`DDTPɍɬCDL$,)  o : L  `   DLI,68>` `1#2#34`ȱ`ȭ`#1#2 13` ` X,3` #1ȹ #2Ȍ 1 `,30 ""12 """zm"""` 3` # # 1 "2 " ̷`12 `HHHλ0+>jj9hhh`(  ㎬М 4LHHH:612 L] 34Lhhh`HHH J ( 4L <hhh` : :4  ,>  4,$ ɀ@ 4 L 5  LƠ砠ŠυÒŠ̳à鶠栌źŗϠɆűҠȠࠃ̶íհѥĪƠ蠠Ӯt h "#!$6CPbt~?O^d&3>Ou0:?VcqqqqqŠԿſΠԿſſԠӮӠþϠΠϠΠՠҠ٠Ҡ٠Ϡ΍٠ӮŠΠנŠŠҠŠ٠ҍξϠŠǠŠҍ̭þξϠٍ̠ҮŽĠՠŠϠŠҠٿԠŠˠĠӠԠΠˠĠӠ٠ϠՠԠǿōϠӠćˠ̍ˠŠčŠčɯϠҍĠԠ٠ϠΠ͍Š۠ӠϠҠ               ..................................P!K\.......................................~!L\.......................................!M\.......................................!N\......................................."O\...............................  #    LLF LM In4If+ L    j H 1u+      9 J  q      9   Lk    9 eJJJJ l    9 LN H h0`H Xh%` 1L68793` ɍɛ`,ɠ1ɍ ɬ 8`1` d ihimm7`H P^ȱQ_Odhp` a & C DOS 3.3 MASTER - CREATE UTILITY COPYRIGHT 1980 BY APPLE COMPUTER INC ALL RIGHTS RESERVED. (NOW LOADING DOS IMAGE) PLEASE INPUT THE "GREETING" PROGRAM'S FILE NAME: REMEMBER THAT "MASTER" DOES NOT CREATE THE "GREETING" PROGRAM, OR PLACE IT IN THE DISK DIRECTORY THIS IS THE FILE NAME THAT WILL BE PLACED WITHIN THE IMAGE: PLACE THE DISKETTE TO BE MASTERED IN THE DISK DRIVE. PRESS [RETURN] WHEN READY NOTE: IF YOU WANT A DIFFERENT FILE NAME,PRESS [ESC]. THE DISKETTE HAS BEEN UPDATED, YOU MAYREMOVE IT AT THIS TIME. IF YOU WISH TO "MASTER" ANOTHER DISK- ETTE, PRESS [RETURN]. OTHERWISE PRESS [ESC] TO EXIT "MASTER" IF YOU WISH TO RETRY PRESS [RETURN] OTHERWISE PRESS [ESC] TO EXIT "MASTER" INSERT A SYSTEM DISKETTE AND PRESS [RETURN] TO REBOOT DOS  UNABLE TO READ IMAGE.  IMAGE OF DOS 3.3 (MASTER) IS NOT AVAILABLE. CHECK INSTRUCTIONS.  UNABLE TO WRITE. DISKETTE MUST BE INITIALIZED PROPERLY. CHECK DISKETTE FOR PROPER INSERTION.  DISKETTE IS WRITE PROTECTED. REMOVE WRITE PROTECT TAB.``````WRITTEN BY JAMES R. HUSTON DECEMBER 15, 1978 (THIS MESSAGE IS FILLER, WHY READ IT?)......4)\.......................................b*\.......................................+\.......................................,\.......................................-\........................................\.......................................H/\.......................................v0\.......................................1\.......................................2\.......................................3\........................................4\.......................................\5\.......................................6\.......................................7\.......................................8\.......................................9\.......................................B:\.......................................p;\.......................................<\.......................................=\.......................................>\.......................................(?\.......................................V@\.......................................A\.......................................B\.......................................C\....................................... D\.......................................< E\.......................................j F\....................................... G\....................................... H\....................................... I\......................................."!J\.....   4020^.10:958:"ENTER NEW NUMBER THEN PRESS 'RETURN'.":"(USE THE FORMAT: XXX XXX XXXX)".13:"-> ";A$:6100:NP$B$:NP$""S5Ĺ32,0::25000.NP$""Ĺ32,0:25000.(NP$)12ĺ"":4050. IS ENTRY CORRECT? (/::8:"HERE IS THE MAKE TEXT# A$(100):I08D$(4): CTRL D@:m("YOU GET TO TYPE ONE STRING AT A TIME."2"A STRING MAY HAVE UP TO 239 CHARACTERS."<"THIS PROGRAM LETS YOU WRITE TEXT FILES. "F:II1 P"(PRESS THE RETURN KEY TO QUIT.) Z"TYPE STRING #";I;": ";. d"";A$(I)@ nA$(I)""60F xa "WHAT FILE NAME? ";N$t D$;"OPEN ";N$ D$"DELETE ";N$ D$;"OPEN ";N$ D$;"WRITE ";N$ I1 J1I1 :A$(J) J D$;"CLOSE ";N$TROL CHARS. 6B$""%6(A$)ı46I1(A$)Y6((A$,I,1))26B$B$(A$,I,1)`6If6~6] PRINTER ON/OFF 6]PRPR:250506]6a MAIN MENU 6a:NR:NRNR10006a::1:"----------------------------------------";:X7a" APPLE COMPUTER, INC. PHONE LIST ";::"----------------------------------------"7a"PROGRAM CURRENTLY CONTAINS "NR" LISTING";:NR1ĺ"S";7a:"ROOM FOR "(150NR)" ADDITIONAL LISTINGS"7a8:"THE PRINTER IS";:PRĺ" OFF";)8aPRĢ9:" ":25070?8a" ";::" ON ":w8a10:"YOU MAY CHOOSE FROM THE FOLLOWING:":32,5::8a"1 SEARCH FOR A LISTING":"2 LIST THE ENTIRE FILE"8b"3 ENTER NEW LISTINGS":"4 DELETE A LISTING"9 b"5 EDIT A LISTING":"6 PRINTER ON/OFF"79b"7 EXIT THIS PROGRAM":32,0:C9 b32,0:k9*b22:20:868:"WHICH: ";S$:S(S$)94bS1S7ĺ(7):251309>bS1000,2500,4000,5000,6000,24000,8009Hb9 9APPLE COMPUTER, INC.9 COPYRIGHT 4/1/1979*:&  END ROUTINE %&*MF0890U&4DISKĺ(4)"SAVE PHONE LIST":::22:976:&>:11:"INSERT A NEW TAPE INTO THE RECORDER, SET";:"ON RECORD, AND PRESS 'RETURN' ";:"";S$&HI11500:::I12000::'R:12:"THE PROGRAM AND DATA HAVE BEEN SAVED!!":22:'z::22:/' SEARCH D'3000:OP11010':9:5:"WOULD YOU LIKE TO SEARCH BY"::10:"1 WORD (FAST)":7:"OR 2 CHARACTER (SLOW)"'14:868:20:"WHICH: ";SK$:SK(SK$):SK1SK2(SK$)1ĺ"":10078(:11:5:"PLEASE ENTER THE SEARCH KEY:":13:5:"";S$:S$""25000O(PRİ700:" ":" "(:1:" NAME PHONE NUMBER":"----------------------------------------"(PRİ750(S22510(12:868:12::"<< SEARCHING >>"::VT2):Z)FO0:I1NR1)NA$:(NA$,1)(92)1040W)SK0SK1ĭ(NA$,(S$))S$1075h)II1(NA$))$(NA$,II,(S$))S$FOFO1:1100:1075).II)3I:FO1200)812:868:12::"<< NOT FOUND >>"::PRİ700:S14:" "::750*B(7):I11500:I:25000*K'*L GOT ONE! H*NVTVT1:VT21PR1İ1300\*PFO1Ģ12:868i*QPRİ700z*VVT:1:NA$;*`PRİ750*tINRı*PRİ700:" ":" ":" ":" ":750+22:868:"THAT'S ALL OF THEM! - PRESS 'RETURN' ";:"";S$:25000++ GOT A FULL PAGE [+22:958:"ENTER 'RTN' TO CONT - 'ESC' FOR MENU ";:T$r+(T$(27)ġ:25000+2T$(13)Ģ3:1:958:VT3:+<(7):1300+ + LIST EVERYTHING + 3000+ 1012+ :Z+ VT2:FO0:I1NR, NA$:(NA$,1)(92)INR2540$, 1100>, VT22VT2:3:958E, IO, 1200l, IS DATA FILE EMPTY? , ::NR0Ģ12:9::"<< NO NAMES ON FILE >>"::I12000:I::25000, , ENTER LISTINGS -:NR150Ģ12:12:"DATA TABLE FULL!":I12000::25000-32,3:10:958:"ENTER NEW NAME AND PRESS 'RETURN'.":"(USE NO COMMAS, COLONS OR QUOTES.":"TWENTY-FIVE CHARACTERS, MAXIMUM.)"-14:"-> ";A$:6100:NN$B$:NN$""S5Ĺ32,0::25000-NN$""Ĺ32,0:25000.(NN$)25ĺ"":  "* A WALL OF BRICKS WITH A BALL":"* STRUCK BY YOUR PADDLE."::"* YOU CONTROL THE PADDLE ON THE BOARD":"* BY TURNING THE APPLE PADDLE (0)."::"* YOU MAY ";(34);"PUT ENGLISH";(34);" ON THE BALL":"* (DEFLECT THE BALL) BY HITTING IT":"* WIw  2000(Q(0):(QOQ)5(Q)ıEZ(16384):Z15511010cOQQ:Q(39Q6):Q0Q0r(Q34Q342D:Q,QLL0:A:PQď0,Q10<QPďQLL1,390FPQ:KX,Y3:F:I,K:XI:YJPJYW:J0J119İ230xIXV:I01900 I6OQ500( 20:E:KJ3:I392408 I,K)E75C I270\ V2:W(KP)2LL:M1s 6,150(W)4:7,3 Z(16336)(16336)(16336)(16336):768 75 WW:JY:Z(16336)(16336)(16336)(16336)(16336)(16336)(16336):: SIDE BOUNCE5 I16:M(16336):I:IX:M0> VVF 75T MV(V)\ M1 (K2)2,(K2)21I:SSI29:24:8:S;:23:1 '6,180I3:7,3:Z(16336):768 ,6,140I(1):7,2:768 66,50:7,3:768 J^BRICK STRUCK TS720250# ^24::::1500:7606 cE:DRAW FIELDM hI039:0,39I:I\ I20342 B:0,39I:C:W((I4(I4))4.05)(I4)394 W,W1I:W I: 23:"CONGRATULATIONS, ";:(A$)ĺA$;", "; "YOU WIN!";:868: A$"CHAMP" 1100< 24::::22:"YOUR SCORE IS ";:S10910M *S50EXTP1^ 4S100NVC0l >S20960{ HS601010 RS1201040 \S2001050 fS3001060 pS4201070 zS6501080 1090 NVC930 "NOT TOO GOOD, BUT":"KEEP ON TRYING!":NVC1:1100( NVC1950h "STILL NOT GREAT,":"BUT KEEP WORKING AT IT.":NVC11:1100 "ALL RIGHT.":"JUST KEEP TRYING.":1100 NVC990 EXTP910 "PRETTY BAD!":1100 "MUCH BETTER THAN IT WAS.":"KEEP GOING!":1100""O.K.":"TRY IT AGAIN!":11000NVC1030D"FAIR. ":1100f"GETTING REALLY GOOD.":1100}"NOT BAD. ":1100"GOOD.":1100$"VERY GOOD.":1100."VERY, VERY GOOD.":11008"EXCELLENT.":1100B"NEARLY PERFECT.":1100PL50,63:24:"PUSH BUTTON FOR NEW GAME, ESC KEY TO EN";:2039,4:50,255:16368,0V "POKE 2039,4" POKES AN INVERSE "D" INTO THE LAST SCREEN POSITION, AVOIDING SCROLLING.`SSBANUS:BANUS0jS(789)(790)2561160: NEW SCORE LESS THAN HIGH SCORECt790,S256:789,S(790)256: POKE NEW HIGH SCORE INTO PLACEY~21:15:"FORMER"}Z(16384):(16287)127119020:Z1551160 Z15511000OQ500:2520 PRINT POINT SCALESCOLE6LL(936:"POINTS PER BRICK -> 1 2 3 4 5 6 7 8".P24:958:"SCORE= 0";wZ(787)37ĭ(788)381390: IF "VARIABLE" ALREADY INITIALIZED, SKIPd787,37:788,38:789,0:790,0: SET FLAGS AND INIT NON-CLEARING VARIABLEn22:"HIGH SCORE= ";(789)(790)256;:1: BONUS?22:50,63:L1ĺ" BONUS POINTS: "xL1ĺ"BONUS POINTS FOR ";L;" BALLS LEFT: "22:Q11800:QQ0L50532:Q;6,180:7,10:768"6,200(1)50:7,10:768,6,160Q10:7,12:7686Q:50,255'@BANUSQ5:21:1:"TOTAL=";7JQ1500:QJTQSSBANUS5U^8:Q;oh6,150Q40:7,3:768r6,140:7,2:768|6,50:7,3:768K110(1)20:KQ::lH180:OD(16336):H:2910 *** START OF PROGRAM ***7000: POKE SOUND ROUTINE0:936:16298,0X*(16287)127ĭ(16286)127İ85004 ^IF BOTH PADDLE SWITCHES READ "ON", THEN PADDLES ARE NOT PLUGGED IN.>24\QILLJPOQXYKWEVDFNMZS:SET UP VARIABLE TABLE FOR MAXIMUM SPEEDa2340if"***************************************";:1:1:"***************************************"p10:1,460:0,4739: "DRAW" ASTERICKS (*) ALONG EDGESz3:"* BRICK OUT IS A DYNAMIC BOARD GAME":"* IN WHICH YOU ATTEMPT TO KNOCK DOWN"A        ٹHH ޥLLޥШh^^h_H r륡HHHHHl^h#d j݄hJhhhhhhE` LJ }d.U"i L=8,LLTҐL {ݩ),(,,ѸLLԠhhL ߅` ȱLL 0 &WSP& )`" !H)&JJ&&h' &' &' f&') &'#i%Ѕ0J$)` .ХQ&%0Q&&`$0JI0`'0% I`0 I0ܩ(ߠQ)'%01&*%0Q)&E%0*Q&&QeS)j00',"&,i8i#H&ii&hif&i'`'i,&i,.&iPII&&if&H !"hH8 H!S hIiHSQUhPTh !"IiR"fS8PQ% 8TeRTUU&E%0Q&&kS TePTUeQPفŴxaI1& ')*& "'JJ) ""% m% ʥ0)J!m%! `JJJJS)фPIȄR%*QTU'T8ePT UeRU QJJJ`JJJJS)фPIȄR%*QTU'T8ePT UeRU QJJJ` Ӎ$ H h .Ю#` L}Э%J u ӊH Өh dѮ#` L Q ;Ү#` Q Ү#`#2 Ӎ'( H() 91 eȱm)h`JJ`#JȱJLh `#  <(eΨ=)eϰ%Hh>?iJK̅  #`Lk 34 Lh856!;<79)F:&8J9j*0v 婭   +<; LhLk'cg=%;!,<+k,w(gG gG]$ t < N8i| (|`ܠLդ4ɪ 4<`<  / ) ) "&6 B /`TLՆ8M˕  Tբ , Tզ`  . $ ; E.. 4L& >H ֥ h ߦ>  E֥ E & > ` E  E  H ֥ hL  ֥ -L L -EF# =Pi  ֤Lְ ׅ! ׅ  ׅ ׅLԱJHȱJh`LNפ0`L,׈L20`LF׈LL ׅJF8ȹe8ИL`Lø{{ttmnghab\\WWRRMNIIEEAA=>::673401..+,))&'$%"# !$v# \ۦuv $ W (Lb-逐@ HHLLF:L8gh}~`Ƀ` Sբ$L?`gh<=ij>?`v(Le lL5٩ ӥHHvHuHH >L ٥vQ 8egh ֐` eӚɰ ,ZLLhhB;uhvhh ٘e`:,  "hhh` { ɫ ޥ L>L( HɰɫЉơhL* ,h`PQ/ Q^ԥP &^ &^ePP^eQQP&QPe PQ L ߅ ޥHH {h* mh r ȥ`L'hpoj iLڠ 㥌 婝 5ȱȱ` = $)94,;D {$0 4 Lک \I`$ !i)$ )L(ʊ$ L W 檠^ \ LD۩ ,? ɠ )H h`0{|uvLh$L :ۥyz` @ `" ީ; =L Z , ,խLc ZL,զ}~, ߅ $P )0 Z ۆ $1$P 膸 ": ,i = {LrH0h J c ,Lqۥ 3 LۥL Ȫ*ȱ_ȱ{ȱȅ| L+ܥLSؠߠL:`?EXTRA IGNORED ?REENTER  ߅ ei` 꺽  ' 8 uvL׊i , {$8$0`LԦƹƸ$HH `ީ 8ϐ*IEʼna Lݦ,{iweLi^ e^hٲаg jH hV_F*ƹƸٲаH                 ٹHH ޥLLޥШh^^h_H r륡HHHHHl^h#d j݄hJhhhhhhE` LJ }d.U"i L=8,LLTҐL {ݩ),(,,ѸLLԠhhL ߅` ȱLL 0oeܔٱ0ۏ$1@hnW &tlnrvNjUaE=H jmكدzڕؤi֟H֐# A :dFZyy{{h}PTFNddENFONEXDATINPUDEDIREAGTEXPRINCALPLOHLIVLIHGRHGHCOLORHPLODRAXDRAHTAHOMROTSCALESHLOATRACNOTRACNORMAINVERSFLASCOLORPOVTAHIMEMLOMEMONERRESUMRECALSTORSPEEDLEGOTRUIRESTORŦGOSURETURRESTOOWAILOASAVDEPOKPRINCONLISCLEAGENETABTFSPCTHEANOSTEЫANOҾSGINABUSFRSCRNPDPOSQRNLOEXCOSITAATPEELESTRVAASCHRLEFTRIGHTMIDNEXT WITHOUT FOSYNTARETURN WITHOUT GOSUOUT OF DATILLEGAL QUANTITOVERFLOOUT OF MEMORUNDEF'D STATEMENBAD SUBSCRIPREDIM'D ARRADIVISION BY ZERILLEGAL DIRECTYPE MISMATCSTRING TOO LONFORMULA TOO COMPLECAN'T CONTINUUNDEF'D FUNCTIO ERROR IN BREAKɁ! i` Ӆmn8囅^圪#8^Ɨ8^ƕƗƕ` i65^^.`p(o"H H h0hhpo`M$L Z۽`H \h ֩P :ۤv  ڢ .ՆF v YLئij YՄ ֐D_i^aeii`jij圪8iae^_^`_a8stopiejȄ ӥPQmnij e֥gh^_^ ijL<Ԡȱ^Șe^^_iȑ^^_Ң3 j )` )`ʠ$hh eL$p "tpM?E0<=Ѕυ 8ɀA N4O0Ťș98:I8xІș Нƹ`ghȥQћ Pћ `֨gȑggiihij ֩*stopijklmn IآURhhHHz`gihi` ,  ,Є hhPQPQD X ȱȱQP- $ ) \ۥ$! ک$ȱȱж \L枱`8Єτ ,0 \ ,0 \ \۩ И F eihh eHiHvHuH j gݥ %ׅ^_L ީ  g ޥHHH XإvyzW4ȱuȱve$v# \ۦuv $ W (Lb-逐@ HHLLF:L8gh}~`Ƀ` Sբ$L?`gh<=ij>?`v(Le lL5٩ ӥHHvHuHH >L ٥vQ 8egh ֐` eӚɰ ,ZLLhhB;uhvhh ٘e`:,  "hhh` { ɫ ޥ L>L( HɰɫЉơhL* ,h`PQ/ Q^ԥP &^ &^ePP^eQQP&QPe PQ L ߅ ޥHH {h* mh r ȥ`L'hpoj iLڠ 㥌 婝 5ȱȱ` = $)94,;D {$0 4 Lک \I`$ !i)$ )L(ʊ$ L W 檠^ \ LD۩ ,? ɠ )H h`0{|uvLh$L :ۥyz` @ `" ީ; =L Z , ,խLc ZL,զ}~, ߅ $P )0 Z ۆ $1$P 膸 ": ,i = {LrH0h J c ,Lqۥ 3 LۥL Ȫ*ȱ_ȱ{ȱȅ| L+ܥLSؠߠL:`?EXTRA IGNORED ?REENTER  ߅ ei` 꺽  ' 8 uvL׊i , {$8$0`LԦƹƸ$HH `ީ 8ϐ*IEʼna Lݦ,{iweLi^ e^hٲаg jH hV_F*ƹƸٲаH                z # ΧӠŠΠҠϠ ҠԠ ٠ ٮʰ   !àϠ "Ġà2à2ŠˠԠ ŠԠ ҠŠ  ΠŠԠ3͠ Ҡ ҠӠ'ŠԠ  ϠӠŠӠԠΠ͠Ա ";Q$4 TQ$:Q(Q$):(Q1Q9)Q$"0"ĺ(7);:330R ^R1Q:R2Q:Q0R11:R29] h:(5) r"PART# NAME SIZE IN STOCK ----- ---- ---- -------- " | :12);FL$:(10) "COMMAND","NUMBER" "-------","------542000^UD1.0h PAD TO 40 CHARACTERS V0rI(NN$)(39(NP$)):NN$NN$".":n0|NN$NN$NP$:S5ı0 UPDATE DATA NUMBER 0:T:TTUD:CU(START11)0T$(T):I1(T$)0(CUI),((T$,I,1)):0S4ı1 FIND EMPTY DATA LINE !1T$:(T$,1)(92)4310;1LN(123)(124)256U1 CALCULATE OFFSET s1CU(START((LN201)46))10 POKE DATA LINE 1:ICU(CU39)1DI,((NN$,I1CU,1)):1b SET UPDATE FLAG 1lMFMF1:S4S5ı1v2500012 DELETE DATA CONTENTS %2:30002:10:"PLEASE ENTER THE NAME OF THE PARTY YOU":"WISH DELETED FROM THE DIRECTORY AND":"PRESS 'RETURN'."214:"-> ";K$:K$""S5ġ:250002K$""250002 FIND AN EXACT MATCH 2:Z:I1NR3NA$:(NA$,(K$))K$510063(NA$,1)(92)INR5070E3::25000\3 FOUND A MATCH v3LN(123)(124)2563:11:NA$:S5ı3 13:868:"DO YOU WISH TO DELETE THIS DATA (Y/N) ";S$:(S$,1)"Y"52003(S$,1)"N"ĺ"":5130450804P OK THEN, KILL IT! -4ZUD1:4250K4dCU(START((LN201)46))\4nCU,((92))m4x4450:250004p EDIT A DATA LINE 4z:30005|:10:"PLEASE ENTER THE NAME OF THE PARTY WHOSE";:"LISTING YOU WISH TO EDIT AND PRESS":"'RETURN'.":5020I513:868:"DO YOU WISH TO EDIT THIS DATA (Y/N) ";S$:S$""25000h5(S$,1)"Y"NN$NA$:60505(S$,1)"N"İ50705"":60205 GO EDIT THE LINE 5:8:NN$:4020:43605250005 REMOVE CONTROL CHARS. 5B$""6(A$)ı6I1(A$)96((A$,I,1))26B$B$(A$,I,1)@6IF6^6] PRINTER ON/OFF q6]PRPR:25050w6]6a MAIN MENU 6a:NR:NRNR10006a::1:"----------------------------------------";:87a" APPLE COMPUTER, INC. PHONE LIST ";::"----------------------------------------"u7a"PROGRAM CURRENTLY CONTAINS "NR" LISTING";:NR1ĺ"S";7a:"ROOM FOR "(150NR)" ADDITIONAL LISTINGS"7a8:"THE PRINTER IS";:PRĺ" OFF"; 8aPRĢ9:" ":250708a" ";::" ON ":W8a10:"YOU MAY CHOOSE FROM THE FOLLOWING:":32,5::8a"1 SEARCH FOR A LISTING":"2 LIST THE ENTIRE FILE"8b"3 ENTER NEW LISTINGS":"4 DELETE A LISTING"8 b"5 EDIT A LISTING":"6 PRINTER ON/OFF"9b"7 EXIT THIS PROGRAM":32,0:#9 b32,0:K9*b22:20:868:"WHICH: ";S$:S(S$)e94bS1S7ĺ(7):251309>bS1000,2500,4000,5000,6000,24000,8009Hb9 9APPLE COMPUTER, INC.9 COPYRIGHT 4/1/1979 "NOMONI,O,C":$ :D$(4)8OP$D$"OPEN "MCL$D$"CLOSE "a(RD$D$"READ "v2WR$D$"WRITE "<FL$"APPLE PROMS"FOP$;FL$;",L40"J9000K1000P390ZQ100,180,480d330nRR1R2xRD$;FL$;",R";R N$,BL,BW,ST/ " ";R;8);N$;24);BL;32);ST6 R> D$G 310P 330h T7:RR1R2:TT1 RD$;FL$;",R";R:N$,BL,BW,ST:D$ (T):" ";R;8);N$;:(7):Q$ (Q$)15200 (Q$)0N$Q$ (T):(24):BL;:(23):Q$:(Q$)0BL(Q$)6 (T):(32):ST;:(31):Q$:(Q$)0ST(Q$)c (T):" ";R;8);N$;24);BL;32);ST;" " "WR$;FL$;",R";R:N$;",";BL;",";BW","ST &768: ,D$:R 6(23):"PRESS THE RETURN KEY TO CONTINUE.";:Q$ @80 J:"PART NUMBER 1-9 (0=ALL) ";::"NAME";::" ENTRY:":10:14:NN$d/12:"AND THE ";::"PHONE NUMBER";::":":14:14:NP$/,18:8:868:"ARE THEY CORRECT (Y/N) ";S$:(S$,1)"Y"4180/6(S$,1)"Y"S5ġ:6000/@(S$,1)"N"ĺ"":4100/J4000/OS542000TSs 8tit8sB@tCtABCB>?><>=?>BPݱ>BL@ /@i ipm@8e@@AiA8ϥ_^8LKLKꤸ ML#gq -- DOS 3.3 HELLO  (:.(Y2"DOS VERSION 3.3 08/25/80"<:"APPLE II PLUS OR ROMCARD SYSTEM MASTER"F P --POKE LANGUAGE CARD FINDER Z768,0:769,173:770,0:771,224:772,72:773,173:774,129:775,192:776,104:W _777,72:778,205:779,0:780,224:781,208:782,35:783,173:784,131:785,192: d786,173:787,131:788,192:789,169:790,165:791,141:792,0:793,208:794,205: i795,0:796,208:797,208:798,19:799,74:800,141:801,0:802,208:803,205:N n804,0:805,208:806,208:807,10:808,173:809,129:810,192:811,173:812,129: s813,192:814,169:815,1:816,208:817,2:818,169:819,0:820,141:821,0: x822,3:823,104:824,205:825,0:826,224:827,240:828,3:829,173:830,128: }831,192:832,96: 769 (768)1250% I --IF THERE, LOAD INTG AND PA#1P 10:"(LOADING INTEGER INTO LANGUAGE CARD)" "BLOAD INTBASIC,A$D000" --WRITE PROTECT THE CARD A(16254): $C082  --NO CARD OR CAN'T RELOAD  (768)0Āj ":"...LANGUAGE CARD CANNOT BE RELOADED":" UNTIL THE SYSTEM IS REBOOTED..."p ,H" "LIST"," 1"' "CHANGE"," 2"9 "EXIT"," 3"d :"CHOOSE NUMBER (1 - 3) ";Q$:Q(Q$)s Q0Q4ı (15):(7);:450 CL$;FL$ : DEMONSTRATION OF RANDOM ACCESS A$(9),B(9),C(9),D(9)4 ::"THIS DEMONSTRATION WILL NOT EXECUTE ON":"A WRITE-PROTECTED DISKETTE SUCH AS" "YOUR DOS SYSTEM MASTER (VERSION 3.3). FOR YOUR CONVENIENCE, PROVISIONS HAVE BEEN MADE TO COPY THIS PROGRAM AND IT'S" "DATA TO ANOTHER DISKETTE.":"DO YOU WISH TO DO THIS NOW? (Y OR N) ";Q$:Q$"N"480#Q$"Y"10704$:(9):1040Q.:"NOW READING DATA..."l8R19:RD$;FL$;",R";RBA$(R),B(R),C(R),D(R)LRVCL$;FL$`(7):::"INSERT AN INITIALIZED DISKETTE, THEN":"PRESS THE RETURN KEY TO BEGIN TRANSFER.":" ";Q$jOP$;FL$;",L40"*tWR$;FL$;",R0"c~"75":"DEL 1000,1250":"SAVE RANDOM":"HOME":"RUN"nR19WR$;FL$;",R";RA$(R);",";B(R);",";C(R);",";D(R)RCL$;FL$$::"WHEN THE PROGRAM AND DATA HAVE BEEN":"FULLY TRANSFERRED, THE PROGRAM WILL":"BEGIN RUNNING."8D$;"EXEC ";FL$h LINE 75 AND LINES 1000-1250 ARE NOT SAVED RECORD ZERO CONTAINS THE 'SAVE' PROGRAM EXECUTIVE(#I768775:J:I,J:2##169,0,32,237,253,76,142,253       RENUMBER ':::255YS$"&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&"SS$"& &"S$;SS$;"&";11);"APPLESOFT RENUMBER";40);"&";$SS$; ."&";4);"COPYRIGHT 1978 APPLE COMPUTER INC";40);"&"; 8SS$;S$ BE L::"RENUMBER (DEFAULT VALUES)"w V:"& [FIRST 10] [,INC 10] [,S 0] [,E 63999]" `:"MERGE" j:"&H PUT PROGRAM ON HOLD" t"&M MERGE TO PROGRAM ON HOLD" ~24 "PRESS 'RETURN' TO CONTINUE..."; A$ (A$)3Ā% (A$)13220Q :4)"RENUMBER IS INSTALLED AND READY" 8:"IF YOU USE 'FP', 'HIMEM', OR 'MAXFILES'" :" YOU WILL HAVE TO RE-RUN RENUMBER" ' DO NOT CHANGE 10010 '(121)(122)256316yi<>zi=i?<     a@F a()_d"]]͠"]]]٬Ӡ]ӠŠŠƠ" ]٠ŠŮ#]ŠҠϠm_]]]Ӻ]Ԡ٠]ŠҠî]],dq]ŠӠŠ͠Ӡna@ xa@F0R@`@*#r9()$TTh]נŠΠϠˮҠӠԠĠϠϠϠƠŠӠӬҠƠŠӠϮa@Jca@GS()&@q`7;@r$@p@*#r`@:()@:()$.`@9()%q`@9()%q_n7]ŠĠΠ̠ٮӠԠŠԠſHa@@p()a(ӠŠ̠էŠǠƠ)GUVWM`@*#r9@*#r%a()GYca@*rGS()&@`7;@r$6@p@*#r`@:()@:()$`@9()$ ,]ɠΧԠנԠ̠ԠӬˠF&cca(̠ԬɠŠЮԠ̠)a(ՠǠƿ)G0@p()R@Brd:ca(ŠŠΠԠ)a(ȠΠ)E@*ra(Ġ)E@*rG-DS()&@`@*;@rr9()%@p@*#;@rrkNca(ԠĠŠԠҠҠ)a@*rE(ſ)GR@@p@*#r`@:()@:()$NXa@ ba@Fl]ŠҠĮvT'a@F5qqbE()Fa@FR@TTa@F*a@`@9()$bb_bba@F$a@`@9()$bb_bb a@Fa@a@(a(ɠננ)FE(ӡ)_> ]ɠԠԠԡ*UVW cY4a(ɠԠԠԡ)>>cS(ԠϠ٠ο)&@`;@r%`@*#r9()%Q_d ] ] ]̺ ]͠ӠӠ ]ԠӠӠ ]͠ŠҮ ] ]͠Ӻ ]ˠ٬ˠɠ ] ]ҮΠ ] ] ]ĺ ]a(ΠɬϬ)^KM6N@"FrC@"FrC@"FrC@"FrC@"rC@"rC@" rC@"rC@"(rf@p(ĠŬ)@p(ŠŬ)@p()@p(ΠŬ̸)a@v]ŠŠӠŠԠϠԠŠ٠ĠϠԠǠҠΠŠŠŠήźq]ҠΠԠĤĠŬҢŠԠƤŠԠŠҢӠҠ͠ӠϠӮ]a(LJҠŠ٠Ԡ)a(ŠĠΠҠϠ٠)a(š)moa(̠ǠŠ)ca(ŠՠҠĠſ)GR@`;@r%`@*#r9()$dg$ca(Ӻ)ca(ՠ̠ˠƠΠ̬Ġɠ)a(٠ϠӠԠ̠ՠ)U.a(ǠƮɠ̠ϠӠ٠)a(ՠӠƠӠԠ)r8a(̬ϠȠՠĠ)a(ӠҠϮ٬Š٧)a(ΧŠӠԩ)WBa(ƠɠϠԠӠԠҠ̠Ӭ)a(ɠ̠ˠՠנӠϠ)6La(ԠŠɠ̠נԠҠ)a(Ӯ)cQVa(ϠՠԠŠϠԠǬ)a(ŠՠԠŠӠſ)XWa(ŠŧҠŠϠԠԠ)a(ŠĠРϠנҠƠϠŠ)4XS(ԠŠǠԺ)&@`@:()$d `a@F ja() ta@F*~a(ӠԠŠΠŠ)bb a@F a()      ERROR MESSAGES"1 "13 OTHER MESSAGES"G "14 NOTES"] "15 NOTES"s "16 NOTES"{ 23 "PRESS RETURN TO RUN RENUMBER" "HIT ANY KEY FOR INSTRUCTIONS"; (A$ 2(A$)3Ā <(A$)133950 F PPT)"P̠Š͍ō΍̠ԬӬԠũԠũˠԬŠŬ̠ұ̠ҲӬL )WHLC L , Ɇ ɀL  , ҅LзLgş堰G L & & & .ee'Lѥȥ񥰶L & &ghȱ y y;L ۥghij L L  ͆0 ҅ >&eee膝JJJJ)ŝƝLpƞߥ ,LLtRL LƞƠeEgiEh8iejegeheeȪi LT >ȥ Ȫ͆0 ҅ >&eee膝JJJJ)ŝƝ 0ȵƞढ़0 ,LƂLڂiiij8stijRLgh #Lѥȥ ݠ8埅ȱ堅壅夅 ȪeȩeˠgLgh8 Ȫ󄫠 #eȩeѩLl` - H Lӆ ԆLsůtRLgӆhԆsՆtֆstsưƯsgůh尐giihijg` Lӆ Ԇ8stijRLghLABCՆ>ֆ?s 63999LINE TOO LONGINCREMENT = 0"      m% RENUMBER*::255:TT15:PT34t"&";05);"APPLESOFT RENUMBER INSTRUCTIONS";40);"&";z$"&";4);"COPYRIGHT 1980 APPLE COMPUTER INC";40);"&";.::8BTT)"CONTENTS"PT)"PAGE 1 " L"PAGE TITLE PAGE TITLE " VI `" 1 CONTENTS 9 SYNTAX "w j" 2 WARNING 10 ERROR MSGS" t" 3 RENUMBER 11 ERROR MSGS" ~" 4 RENUMBER 12 ERROR MSGS" " 5 RENUMBER 13 OTHER MSGS"0 " 6 MERGE 14 USAGE NOTES"_ " 7 MERGE 15 USAGE NOTES" " 8 SYNTAX 16 USAGE NOTES" 1290 "9 INPUT SYNTAX" "10 ERROR MESSAGES" "11 ERROR MESSAGES" "12  39 PRINT A"2"99 RETURN 45 RETURN"<3860ZTT)"MERGE"PT)"PAGE 6 "`" THIS PROGRAM CAN ALSO MERGE" "THE BASIC PROGRAM IN THE HOLD FILE TO""TO THE BASIC PROGRAM IN MEMORY." *:" FIRST, LOAD THE v ]Ӡ]Kc (M6*2a(ӠΠ)1<ca(ŠɠĠ͠)F] P]ŠŠĠUZdededededeHdedededehU_d eHd ed ed ed ede#dededeUddededededededededeUidededededeJd ed!ed"ed#eUnd$ed%ed&ed'e d(ed)ed*ed+ed,eUsd-ed.ed/ed0ed1ed2ed3ed4ed5eUxd6ed7ehd8ed9ed:ed;ed<ed=ed>e}d?ed@e`M`.?r$]]ƠŬĠ]2o a(ǠԠϠŠĩ)a(Ġìİ)]ŠԠŠq.?6~?r]ð_6]]ϠĠҠΧԠ]"`.?r$6P,a(ŠĠԠŠ)a(̠Š͠ӠĮ) 6a()AGE 2 "6 Z"W W A RRRR N N III N N GGG "e d"W W A A R R N N I N N G G" n"W W A A R R NN N I NN N G " x"W W W AAAAA RRRR N N N I N N N G " "W W W A A R R N NN I N NN G GG"! "WW WW A A R R N N I N N G G"P "W W A A R R N N III N N GGG "X 13{ " DO NOT PRESS RESET" :" DURING RENUMBER OR MERGE" :" IT WILL DESTROY YOUR PROGRAM!" :" ALSO DO NOT USE 'MAXFILES'"#:" IT WILL DESTROY RENUMBER!"-3860NTT)"RENUMBER"PT)"PAGE 3 "T" THIS PROGRAM CAN RENUMBER ALL OR""PART OF A BASIC PROGRAM. BY TYPING":"& ":"IT WILL RENUMBER THE ENTIRE PROGRAM"""STARTING AT TEN AND GOING BY TENS."9,::"OLD NEW"`6:"1 INPUT X 10 INPUT X"@"2 IF X<1 THEN 1 20 IF X<1 THEN 10"J"3 ON X GOSUB 39,87 30 ON X GOSUB 50,70"T"27 END 40 END"^"39 PRINT A 50 PRINT A"$h"45 RETURN 60 RETURN"Mr"87 PRINT A * A 70 PRINT A * A"q|"99 RETURN 80 RETURN"{3860TT)"RENUMBER"PT)"PAGE 4 ""& FIRST 50, INC 5":" FIRST SETS THE FIRST NEW LINE NUMBER"" INC SETS THE STEP TO THE NEXT LINE"2" NUMBER"c:" YOU CAN SET THE NEW FIRST LINE AND""LINE INCREMENT TO ALMOST ANY VALUE.":"OLD NEW":"1 INPUT X 50 INPUT X""2 IF X<1 THEN 1 55 IF X<1 THEN 50"/"3 ON X GOSUB 39,87 60 ON X GOSUB 65,75"T"39 PRINT A 65 PRINT A"x"45 RETURN 70 RETURN""87 PRINT A * A 75 PRINT A * A"&"99 RETURN 80 RETURN"03860:TT)"RENUMBER"PT)"PAGE 5 "D!N" TO RENUMBER PART OF A PROGRAM,"GX"YOU MUST SPECIFY WHICH PART BY"rb:" START SETS THE FIRST LINE AND"l" END SETS THE LAST LINE TO BE"v" RENUMBERED":"& FIRST 30, START 87, END 99":"OLD NEW"$:"1 INPUT X 1 INPUT X"N"2 IF X<1 THEN 1 2 IF X<1 THEN 1"{"3 ON X GOSUB 39,87 3 ON X GOSUB 39,30""27 END 27 END""39 PRINT A 30 PRINT A * A""45 RETURN 35 RETURN""87 PRINT A * A     8`ppp``|@`?pyy`xa@ya{1~| x x||~_O|p@.& dede _H &h`H &I1h`H &1h` G me@` @ )jjjj) j)jj)`  ff `HH hh`"*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>>  >00000>">>>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< >> "HPRWɍ;)?  i% HH Ge$ihhhLHH  5hh`i V$ Gi     𼪩 HhHh0`Ruuu4u4R4R4R_chdKOKOKOOK!NCNCNCC!!!NKFFFJFJFOK4H 44HH4  ccO  cccMM!!__uuOu}u}u}}u@M W b h b W b vb W MMM W b W MWWM W b h b W b vb W MAAM b W MWb(M AM AAM AM A=J :"J :":"J :"J :341(1(AAMMWb W MA:AM b W MWb(x!n$} x!d  s n$ s"d(  x!ss"      } d( xis"x!  }   x! n$dn$i&d( } }   }s} U]Սߟ55555ߟ`?ppx8__  ?C?0A? A?@?@;@;@;@1@1@1@1@1@1@1@ @ ``0@ 0<<< @`x~<||p||~~~wwgggc@c@c@a@a@a@``@`@ ` @ `@@aacFN|xx?xwxcpp<p ppppxxx8888 880000000  0xxx00@p| |Cxxxxx~@px8`0`0`p``@`@@@p@@`````08<<<p|~`>@>>>>@@?@8@@            ܠŠԠŠܭ (q.?$r9<d$eM6dqqqR@`;@r$<P\t`7$<qd` $<x\t`7$<q`$<\t`7$<q)d3e]Ԡ_d"ed#e[ d"ed#e[ qq _$I(UVWf8r 8r8rlm'n!o"<UVWq8-rr-r_Pq88-rdrr8d-rr8d-rr8d-rr88d-rrd-rdrVdq8d-rr8&88d-rrd-rdrrq'8'r8(r5xgh`.?6@r%[]ԠҠŧƠBqqdededeMYY[,dededeM[,\,`$\(q8drl_qqqhq8rq:m:R 8r`%qS[q\,[0a()[,qq\[t@O4rD4rD4r-rq\-rq-rq-rq?-rq-rq9-rq-rq)TN@"rC@"rC@"rC@" r;h-rq!KM6o\\cPa() |c\)P a(٠Ҡ)c\\,cca(Ġ٠Š)#\oq q \?\M6\oS(ҠŬſ)&@oD`7;@r$UVW;@r`<@*rr%Y`;@r$@p@*#;@rr`<@r%@p()Aa@GocM6da(Šͯį٩)G\oPqqqqLqqqqa(Š)FE()FE()FG\oαqM6d\coM6d0`7%a(ԠŠͯį٩)G\*`8r8r$!qα`%qS&ocM6dT0oP`  %a()G`  %a()Ga(Š)G9DoP 8  rbE()FE()FGoq)X\,UVWYq q \Abd2e?a(ӠâϠРԭ)d2eelLUVW f8r 8r8rgh'ghY^qocUVWXfijkYijkijk%lmno\UVWXJ`$qq 8 r\`%qq5bG` %a()Ga()GqYa(РŠ)o'oa(ӠĠ)GP bG\( d6?ed"ed#e" ocoa(ҠԬ)G*`7;@r$>F4UVW;@ra@*#rG`<@*rr%Y`;@r%d$e.?$r_H>d$e.?$r/HS()&@`;@r$`@*#r:()$R\M61\oS(٠ɠԠŠŬſ)&@f`7;@r$\p\M6u`@*#r9()$=zoPa()cP a(٠Ҡ)G)qqUVW\Y_oPa(ˠ)Q]ŠϠԠqqqB`7%q 8 r`7%qq\,q_Sq8  r8r878r8drr[ $]]8dededededededeLdedede`oLdede0dededede ded ed ed ed ed e`_@ft]ܠǠŠŠܭ!qq`;@r%[7`;@r%[qUVW;@rq<@*rr`$`$+`  $q[q Y2q8rqq[e]     COMMAND ARE IGNORED" 3860C TT)"INPUT SYNTAX"PT)"PAGE 9 "I x " THE FIRST LETTER AFTER '&' MUST BE" "C,E,F,H,I,M,OR S" :" C,H,AND M EXECUTE IMMEDIATELY." "THE REST OF THE LINE IS IGNORED." :" E,F,I,AND S  ȱ Xȹ (󩿅3 jɍɱɸ  JJJ 譂l` 13-SECTOR BOOT UTILITY SLOT TO BOOT FROM (DEFAULT=6) SLOT TO BOOT FROM (DEFAULT=6)2>&JJJȱ>'JJJ3ȱ>*JJJfȱ>J&*J&'J&&ȱ>J&*J&'J&*)')3*)f>)JJJ`80|'x&Hh &    Y'&Yxꪽ'    `Hh` aI꽌ɪ򠚽ɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɵ'*&%&,E'зЮ꽌ɪФ`2JJJ'J&J>Ƚ3JJJJ&'J&&3>ȽfJJJJ&'J&&f>ȥ&)>ȥ')>JJJ >`+*xS&x'8*3Ixix&& 8 l {' o {& {x)*++`FG8`0($ p,&" (0 8@ HPX !"#$`h%&px')*+,-./12345679:;<>HIHHHHhHH݌hHh݌H6 :"& HOLD"[H:" NEXT, LOAD THE SECOND PROGRAM."R"YOU MAY RUN OR RENUMBER THIS PROGRAM"\"AS NEEDED."f:" THEN, TO MERGE THE TWO TYPE"p:"& MERGE"z3860TT)"MERGE"PT)"PAGE 7 "/" MERGE WILL COMBINE THE HOLD FILE"\"WITH THE PROGRAM CURRENTLY IN MEMORY.":" * LINE NUMBERS ARE ARRANGED IN"" ASCENDING ORDER":" * DUPLICATE LINE NUMBERS WILL BOTH"" APPEAR, HOLD VERSION SECOND"#:" * MERGING WITH NO PROGRAM IN"M" MEMORY RESTORES THE HOLD FILE"m:" CONVERT":"& CONVERT":" WILL CONVERT AN RAM APPLESOFT" "PROGRAM TO RUN WITH A ROM CARD AND" "VICE VERSA." 3860$ TT)"INPUT SYNTAX"PT)"PAGE 8 ". K8 " THE FIRST CHARACTER OF ANY INPUT"_B "MUST BE '&'."L :" RENUMBER / MERGE ONLY RECOGNIZES"V "THE FOLLOWING SINGLE CHARACTER COMMANDS"` :"PARAMETER LETTERS"j " F - FIRST NEW LINE NUMBER"(t " I - LINE NUMBER INCREMENT"I~ " S - START OF RANGE"h " E - END OF RANGE" :"COMMAND LETTERS" " M - MERGE" " H - HOLD" " C - CONVERT" :" EXTRA LETTERS AND SPACES AFTER" "A      TINUE (Y/N)?";% :" THIS OCCURS WITH SMALL SYSTEMS"i% " OR LARGE PROGRAMS. THE RENUMBER"% " MAY OR MAY NOT SUCCEED."% :" * PROGRAM DESTROYED IF IT FAILS"% :" * ANY REPLY BUT 'Y' CANCELS"& " RENU : CLEAR THE TEXT WINDOW= :216,0: TURN OFF ONERRZ7:15:"BRIAN'S THEME"o9:17:" BY"11:16:"BRIAN HOWARD"15:" COPYRIGHT 1979, APPLE COMPUTER INC."#23:9:"PRESS RETURN TO CONTINUE...";(A$:A$(13)40 P: CLEAR THE TEXT AREA< d22: MOVE CURSOR TO MIDDLEf x: SET HIGH RESOLUTION GRAPHICS MODE A(1)279: PICK AN X FOR "CENTER" B(1)159: PICK A Y FOR "CENTER" I%((1)4)2: PICK A STEP SIZE :22 15:"STEPPING BY ";I%/ 24:" ";W X0278I%: STEP THROUGH X VALUES| S01: 2 LINES, FROM X AND X+1 3S: FIRST LINE BLACK, NEXT WHITE  DRAW LINE THROUGH "CENTER" TO OPPOSITE SIDE ,XS,0A,B279XS,159 6(16384)15531111 @S,X; TY0158I%: STEP THROUGH Y VALUES` hS01: 2 LINES, FROM Y AND Y+1 |3S: FIRST LINE BLACK, NEXT WHITE  DRAW LINE THROUGH "CENTER" TO OPPOSITE SIDE 279,YSA,B0,159YS (16384)15531111 S,Y PAUSE11500:PAUSE: DELAY6 120: DRAW A NEW PATTERNV y16298,0: TURN OFF HI-RESx y16388,0: CLEAR KBD STROBE y:936::ASET UP RENUMBER"# "PARAMETERS."S( :" * PARAMETERS ARE DECIMAL NUMBERS IN"z2 " THE RANGE OF 0 TO 63999"< " * IF NO NUMBER FOLLOWS E,F,I,OR S"F " THEN THE PARAMETER IS SET TO 0"P " * MULTIPLE PARAMETERS ARE SEPARATED"Z " BY COMMAS, ','"Hd " * MULTIPLE PARAMETERS CAN BE IN ANY"Zn " ORDER"x " * A COMMA MUST BE FOLLOWED BY A" " PARAMETER LETTER" 3860 TT)"ERROR MESSAGES"PT)"PAGE 10"  " MOST ERROR MESSAGES ARE SELF-"( "EXPLANATORY. ERRORS WILL STOP"U "EXECUTION BEFORE ANY CHANGES ARE MADE"r "TO THE BASIC PROGRAM." :"ERR NO PROGRAM IN MEMORY" " THIS OCCURS IF YOU TRY TO RE-" " NUMBER WITH NO PROGRAM IN MEMORY." :" * & MERGE RETURNS THE "? " PROGRAM ON HOLD TO MEMORY"U :"ERR SYNTAX" " THE FIRST LETTER OF YOUR COMMAND" " OR PARAMETER WAS INVALID."" 3860, TT)"ERROR MESSAGES"PT)"PAGE 11"6 @ "ERR > 63999"$ J " ONE OF THE PARAMETERS WAS LARGER"= T " THAN 63999."_ ^ :"ERR LINE INCREMENT = 0" h " THIS IS DISALLOWED." r :"ERR LINE INCREMENT TOO LARGE" | " THE INCREMENT WILL CAUSE A LINE"! " TO BE NUMBERED GREATER THAN 63999.";'! :"ERR NO LINES IN RANGE"T! " THIS INDICATES THAT NOTHING WAS"! " CHANGED BECAUSE THE SPECIFIED"! " RANGE OF LINES WAS EMPTY."! :"ERR OUT OF MEMORY"! " OCCURS WHEN AN OPERATION REQUIRES"" " MORE MEMORY THAN IS AVAILABLE."(" 3860O" TT)"ERROR MESSAGES"PT)"PAGE 12"U" y" "ERR DUPLICATE LINE NUMBERS"" " ONE OF THE UNCHANGED LINE NUMBERS"" " WOULD EQUAL ONE OF THE NEW LINE"# " NUMBERS IF RENUMBER CONTINUED."# :" TO FIX USE"@#& " * SMALLER INCREMENT OR"l#0 " * DIFFERENT FIRST LINE NUMBER"#: :"ERR LINE TOO LONG"#D " RENUMBERING WOULD CAUSE A LINE TO"#N " BE LONGER THAN 239 CHARACTERS."$X :" TO FIX USE FEWER STATEMENTS PER"&$b " LINE."F$l :"ERR HOLD FILE IN USE"r$v " ONLY ONE PROGRAM MAY BE IN THE"$ " HOLD FILE AT A TIME."$ 3860$ TT)"OTHER MESSAGES"PT)"PAGE 13"$ $ "LIMITED MEMORY, MAY DESTROY PROGRAM" % "CON      ijlk ~󅟆nmLȱȱeȱe(ӊ0ȱ ie枦ş 0FȱAȱ<ȱȱŰ+H8oȑoȥpphei e枥`̄iq imo 膢 ȱ " <67 L  8ij v vo> ='H " RENUMBER FIXES LINE NUMBER"d'R "REFERENCES IN THESE STATEMENTS;"r'\ A10:B20'f :A)"GOTO"B)"ON...GOTO"'p :A)"GOSUB"B)"ON...GOSUB"'z :A)"DEL"B)"LIST"' :A)"RUN"B)"THEN"( :" 'THEN' AS IN '7 IF X=0 THEN 250'"( ( J( :" RENUMBER WILL NOT RENUMBER ANY"w( "REFERENCE THAT IS A PART OF A REMARK."( 3860( TT)"NOTES"PT)"PAGE 15"( ( " RENUMBER COMMANDS MAY BE PUT IN"( "BASIC PROGRAMS, BUT ON EXECUTION "') "RENUMBER WILL RETURN TO BASIC COMMAND"9) "MODE, ']'."i)::" RENUMBER IS ABOUT 2K BYTES LONG")::" RENUMBER MAY TAKE UP TO ONE")"MINUTE TO RENUMBER OR MERGE A 16K BASIC")$"PROGRAM. DO NOT HIT 'RESET'!!!"*.::" DISK USERS, DO NOT USE 'MAXFILES'"I*8"AFTER RENUMBER IS IN, DOS WILL WRITE"_*B"OVER RENUMBER."i*L3860*VTT)"NOTES"PT)"PAGE 16"*`*j" TO SEE IF RENUMBER IS OK, TYPE"*t:"& INC 0"*~:" IF YOU GET 'INCREMENT = 0' ERROR,"+"RENUMBER IS PROBABLY INTACT."L+:" THE INTENDED USE FOR MERGE IS TO"x+"BE ABLE TO INSERT SUBROUTINES INTO A"+"PROGRAM FROM A SUBROUTINE LIBRARY."+:" THE 'HOLD' FILE IS A SEPARATE PART","OF MEMORY. NEITHER BASIC NOR RENUMBER"2,"CAN USE THIS MEMORY FOR THEIR OPERATION.";_,"THEREFORE FOR MAXIMUM USEABLE MEMORY,","USE THE HOLD FILE ONLY WHILE MERGING","PROGRAMS.",3860,1000, 536443710 4APR80, ,24-"PRESS SPACE FOR MORE, ESC TO RESTART"; -(A$-2(A$)3Ā--<(A$)2739303-F9-PC-Z1000I-dl-n20:"":20:"RUN RENUMBER":20:"RUN RENUMBER":$K0 D$(4): CTRL D?0 "THIS PROGRAM RETRIEVES TEXT FILES"l0"CREATED BY THE 'CREATE TEXT' PROGRAM."0"MON C,I,O IS IN EFFECT."00"NAME OF TEXT FILE? ";Z$0D$;"MON C,I,O"00D$;"OPEN ";Z$0(D$;"READ ";Z$02I17A$(I) 1<J1I1F:A$(J)1PJ31ZD$;"CLOSE ";Z$I1dD$;"NOMON C,I,O" M ..0 \.......................................^ \....................................... \....................................... \....................................... \.......................................\.................GN@"(rq qq6@q6?q6?q6?q6qqTddede0dededededed ed e]nd ed ed ededededeLdedede`KMcde*@p(ŠΠ)\c,a(ϠŠά),a(ӠҮΠŠŠ٠)-a(ΧԠŠԠŠƠŠ٭),a(ĮŠŠΧ٠Ϡ)a(٠ή)cc "a()G ,@p(ĠҠ)\ 6a()G"@@p(ĠҠ)\ Ja()GT@p()\ ^a()Gh@p(Ǡ)\ ja()Gl@p()\rcc |S(ȠĠՠſ)&@&`;@r%_q<@*#rr`%_ `%Q_d`.?r$_\  @p()\c @p()\c @p()\c@p()\&_X\ bUVWXlPbGvYcUVWXPbGYcc_;LMUVW2UVWUVWq`.?r$f8r 'ghghg(h(g(h('gh(g(hgh(g(h YZZ_1 M@p(ŠŠŠӠĠӮ)\/*@p(ŠӠҠŠ֠Ġ)\.4@p(ŠĠҮ٠Š׮)\`.?r.?r$`.?r$_ML!q2?rq`'%q'!q2?rq`'%q'%q8r `%q\&oa(ؠӠ)FE()a(٠Ӡ)FE()`.?r$ `.?r%L`.?r%q8rfgh_dedeM[!P88(;@rrra@c[) LUVWflm'nY> flm'nlm'n#ij#kij#k'[UVW;@rPa@*#rGY[)]ԠŠҬî           !!!!!! 1d***********************;e* *Xf* W A R N I N G *ug* - - - - - - - *h* *i* DO NOT MODIFY *j* ANY LINE IN THIS *k* PROGRAM WITH A * l* LINE NUMBER LESS *# m* THAN 400!! *@ n* *] o* PROGRAM WILL *z p* SELF-DESTRUCT! * q* * r*********************** s 1000 \......................................." \.......................................P \.......................................~ \....................................... \....................................... \....................................... \.......................................6 \.......................................d \....................................... \....................................... \....................................... \....................................... \.......................................J \.......................................x \....................................... \....................................... \....................................... \.....................................     ....2\.......................................`\.......................................\.......................................\.......................................\.......................................\...............7U9:D3:E16384:F16368:G16287:H16286:Z127~d768,173:769,48:770,192:771,136:772,208:773,4:774,198:775,7n776,240:777,8:778,202:779,208:780,246:781,166:782,6:783,76:784,0:785,03:786,96:::F,0 A$"APPLE DEMONSTRATION PROGRAMS":2000:F " TO OPERATE A DEMONSTRATION, TYPE"s "ITS NUMBER. THEN TYPE THE KEY MARKED" "'RETURN' AT THE RIGHT EDGE OF THE KEY-" "BOARD. TYPE THE 'RETURN' KEY TO STOP" "ANY DEMONSTRATION.":: ""1."; ,A$"STANDARD COLOR NAMES":2000& 6"2.";L @A$"STANDARD COLOR NUMBERS":2000W J"3.";s TA$"KALEIDOSCOPE":2000~ ^"4."; hA$"SKETCHING SCREEN":2000 r: |"WHICH WOULD YOU LIKE?";A$ (A$)0ī200 N(A$)48 N1N4ī200 N500,600,700,800 (E)Z450) 2003 3000U A$"BMDPDGMLBOGPLYAW":4000:w A$"LGBUGRBBRRRIGEQI":4000: A$"ATLRRELLWNENRLUT":4000: A$"KAUPNYUUNGYKNOAE":4000 &450 X3000 bI0142 l2I4:I; vI: I1152 2I4:I; I:::450Q ::W350:I119:J019:KIJ:(E)Z200g J3(I3)IW12 I,K:K,I:40I,40K:40K,40I K,40I:40I,K:I,40K:40K,I J,I,W:450 :A$"USE THE GAME CONTROLS AND BUTTONS.":2000& *A$"THE BUTTONS CLEAR THE TV AND CHANGE":2000X 4A$"THE DISPLAYED COLOR. TRY ONE NOW.":2000o (G)Z(H)Z930 (E)Z200 900 : P(0):X(P6):X39X39 I(1):Y(I6):Y39Y39 P((IP)29):P255P255 150021:"X IS ";X;" ":"Y IS ";Y;" ".(E)Z200<(G)ZĈP(H)ZU(U1)^U16U0oU:X,Y:9406,P:7,D:768:((40(A$))21):A$:: :I031:I2:0,39I3:I 5:0,392:0,3935:2,350:2,3539:I1(A$)2I2:(A$,I,1);I:......................D\.......................................r\.......................................\.......................................\.......................................\.......................................*\.......................................X\.......................................\.......................................\.......................................\.......................................\.......................................>\.......................................l\.......................................\.......................................\.......................................\.......................................$\.......................................R\.......................................\.......................................\.......................................\....................................... \.......................................8\.......................................f\.......................................\.......................................\.......................................\.......................................\.......................................L\.......................................z\.......................................\.......................................\.......................................\...................................     ......4)\.......................................b*\.......................................+\.......................................,\.......................................-\........................................\.............* K]]ˠ٠(]Ԡ٠2]ŠҠî<]F]Za(Ġٮʰ)]ð dN@"r?nN@"(rM6a(ŠŠΠ)ccxMq.?rde.?r]de.?r]@@p()qq\qq.?r\qq4@p()q\qq\q q0oPa()oPa()0Mdedededeod"e M62a(ӠΧ٠ϠΠ٠)GR@ M6'@p()\]ԠǠ*oPd2e?a()d2eM]Ġ`.?r$]ҡoPa()`.?r$"`$J]ԠԠ&,@p()\]ԠР-6oPd2e?a()d2e5@a(Ԡج)FE()FE()F.?rq_T&J@p()\]ԠР4ToPd2e?a()Gd2ea()G^M]ŠhoPa()r`.?r$9|od2e?a(ŠϠŠ)_3od2e?a(ŠϠĠ)hod2ed6?ecS(ϠՠȠϠŠҠٿ)&@`;@r$`@*#r9()$`@*#r:()$KQHc\bGd2ePa@E(Ժ)Gqq\de[@\bGd2ePa(ź)Gqq\[Fq.?6@r`$d6?e`$q`$q"PbE()[?d2e?Pa(Ԡ)Gd8.?)r.?(rre`[ `%[ `%[M6`@*#r9()%c1a(Ԡ)E@E(ˠĠӠ)GR@ M6[ĠӠ)GR@ M6[`R@ M6[ [........................F\.......................................t \....................................... \....................................... \....................................... \......................................., \.......................................Z\.......................................\.......................................\.......................................\.......................................\.......................................@\.......................................n\.......................................\.......................................\.......................................\.......................................&\.......................................T\.......................................\.......................................\.......................................\....................................... \.......................................:\.......................................h\....................................... \.......................................!\......................................."\....................................... #\.......................................N$\.......................................|%\.......................................&\.......................................'\.......................................(\.................................     PLEASE ENTER THE SEARCH KEY:":13:5:"";S$:S$""25000O(PRİ700:" ":" "(:1:" NAME PHONE NUMBER":"----------------------------------------"(PRİ750(S22510(12:868:12::"<< SEARCHING >>"::VT2): LLL˹Ɂ <ȱ<L4 0#( 8<  8  `<#`<ȑ<<ȑ<Ƚȑ<Ƚ< <   `LH =<``饠..........................H/\.......................................v0\.......................................1\.......................................2\.......................................3\........................................4\.......................................\5\.......................................6\.......................................7\.......................................8\.......................................9\.......................................B:\.......................................p;\.......................................<\.......................................=\.......................................>\.......................................(?\.......................................V@\.......................................A\.......................................B\.......................................C\....................................... D\.......................................< E\.......................................j F\....................................... G\....................................... H\....................................... I\......................................."!J\.......................................P!K\.......................................~!L\.......................................!M\.......................................!N\......................................."O\.......................................6"P\.......................................d"Q\......................................."R\......................................."S\......................................."T\.......................................#U\.......................................J#V\.......................................x#W\.......................................#X\.......................................#Y\.......................................$Z\.......................................0$[\.......................................^$\\.......................................$]\.......................................$^\.......................................$ SET PRINTER SLOT $SL1$ DISK SYSTEM?? %(994)(1001)192DISK13%DISKĺ(4)"NOMON C,I,O":`% GET ADDRESS OF FIRST DATA STATEMENT %START((103)(104)256458)%& SET FAST/SLOW SEARCH %0OP0%:25000% ACTIVATE PRINTER %SL:% DE-ACTIVATE PRINTER &0:&  END ROUTINE %&*MF0890U&4DISKĺ(4)"SAVE PHONE LIST":::22:976:&>:11:"INSERT A NEW TAPE INTO THE RECORDER, SET";:"ON RECORD, AND PRESS 'RETURN' ";:"";S$&HI11500:::I12000::'R:12:"THE PROGRAM AND DATA HAVE BEEN SAVED!!":22:'z::22:/' SEARCH D'3000:OP11010':9:5:"WOULD YOU LIKE TO SEARCH BY"::10:"1 WORD (FAST)":7:"OR 2 CHARACTER (SLOW)"'14:868:20:"WHICH: ";SK$:SK(SK$):SK1SK2(SK$)1ĺ"":10078(:11:5:" ";::"NAME";::" ENTRY:":10:14:NN$c/12:"AND THE ";::"PHONE NUMBER";::":":14:14:NP$/,18:8:868:"ARE THEY CORRECT (Y/N) ";S$:(S$,1)"Y"4180/6(S$,1)"Y"S5ġ:6000/@(S$,1)"N"ĺ"":4100/J4000/OS542000TS54% ************************C* DISK COPY *a* COPYRIGHT 1980 BY *(* APPLE COMPUTER INC. *2* *<************************F"BLOAD COPY.OBJ0": A$2C0 P:" APPLE DISKETTE DUPLICATION PROGRAM"::% Z704:CS(718)16A d715,(110)1:BUFSTART[ n716,(112)1:BUFEND I$" ORIGINAL":NCS:A718:310:MSN:N(720):320:MDN:A717 I$"DUPLICATE":NMS:310:SSN:N3MD:320:SDN FT0 5:24:" ":8:24:" "2 704:717,SS16:718,MS16:719,SD:720,MDG 17:34,16:936T :222,0 "-- PRESS 'RETURN' KEY TO BEGIN COPY --";:" ";I$ DK$" ORIGINAL":360: GET ORIG DISK 5:24::"READING": 707: READ A HUNK (713)2280: ERROR!+ 5:24:" ":(713)1290F FT255: NOT FIRST RDn DK$"DUPLICATE":360: GET DUP DISKx 275 8:24::"FORMATTING": "INIT XXX,S";SS;",D";SD;",V";(714):FT1 8:24:" " 216,0:222,0 256 DK$"DUPLICATE":360: GET DUP DISKC 8:24::"WRITING";::" "\ 710: WRITE A HUNKr 8:24:" " (713)2190 (222)255ij 18::"****** UNABLE TO WRITE ******":290 18::"****** UNABLE TO READ ******"@ "19::16368,0::"DO YOU WISH TO MAKE ANOTHER COPY?";I$:(I$)0300U '(I$,1)"Y"160k ,(I$,1)"N"290s 1: 6:350:N;::1:I$;" SLOT: ";:L1:H7:330:A,N16: @350:N;::4:" DRIVE: ";:L1:H2:330:+JK(16384):K128330:16368,0:K141340:KK176:KLKH330:NKDO16368,0:K141340]PKK176:KLKH330eQNKT20:N;" ":^:22:"DEFAULT = ";:((41)256(40)14),96:hMSSSırMDSDıw:(DK$,1)"D"ĺ#|"INSERT ";DK$;" DISK AND PRESS RETURN";:" ";DK$-9363CPRESS RETURN";:" ";DK$X936^DK$t936zZ)FO0:I1NR1)NA$:(NA$,1)(92)1040W)SK0SK1ĭ(NA$,(S$))S$1075h)II1(NA$))$(NA$,II,(S$))S$FOFO1:1100:1075).II)3I:FO1200)812:868:12::"<< NOT FOUND >>"::PRİ700:S14:" "::750*B(7):I11500:I:25000*K'*L GOT ONE! H*NVTVT1:VT21PR1İ1300\*PFO1Ģ12:868i*QPRİ700y*VVT:1:NA$*`PRİ750*tINRı*PRİ700:" ":" ":" ":" ":750*22:868:"THAT'S ALL OF THEM! - PRESS 'RETURN' ";:"";S$:25000++ GOT A FULL PAGE Z+22:958:"ENTER 'RTN' TO CONT - 'ESC' FOR MENU ";:T$q+(T$(27)ġ:25000+2T$(13)Ģ3:1:958:VT3:+<(7):1300+ + LIST EVERYTHING + 3000+ 1012+ :Z+ VT2:FO0:I1NR, NA$:(NA$,1)(92)INR2540#, 1100=, VT22VT2:3:958D, IN, 1200k, IS DATA FILE EMPTY? , ::NR0Ģ12:9::"<< NO NAMES ON FILE >>"::I12000:I::25000, , ENTER LISTINGS -:NR150Ģ12:12:"DATA TABLE FULL!":I12000::25000-32,3:10:958:"ENTER NEW NAME AND PRESS 'RETURN'.":"(USE NO COMMAS, COLONS OR QUOTES.":"TWENTY-FIVE CHARACTERS, MAXIMUM.)"-14:"-> ";A$:6100:NN$B$:NN$""S5Ĺ32,0::25000-NN$""Ĺ32,0:25000.(NN$)25ĺ"":4020].10:958:"ENTER NEW NUMBER THEN PRESS 'RETURN'.":"(USE THE FORMAT: XXX XXX XXXX)".13:"-> ";A$:6100:NP$B$:NP$""S5Ĺ32,0::25000.NP$""Ĺ32,0:25000.(NP$)12ĺ"":4050. IS ENTRY CORRECT? '/::8:"HERE IS THE    EDIT AND PRESS":"'RETURN'.":5020i513:868:"DO YOU WISH TO EDIT THIS DATA (Y/N) ";S$:S$""250005(S$,1)"Y"NN$NA$:60505(S$,1)"N"İ50705"":60205 GO EDIT THE LINE 5:8:NN$:4020:4360525000 6 REMOVE CONK0dQ$(34): 34 IS THE ASCII CODE FOR A QUOTATION MARK (") Z0n::2:12{0x:"<< EXEC DEMO >>":::0"THIS PROGRAM CREATES A SEQUENTIAL TEXT"0"FILE NAMED "Q$"DO'ER"Q$" CONTAINING SEVERAL" 1"STRINGS, EACH A LEGAL APPLE II COMMAND.""1:"WHEN YOU TYPE"41"EXEC DO'ER"`1"THEN THE COMMANDS IN FILE DO'ER TAKE"1"CONTROL OF YOUR COMPUTER. EACH COMMAND"1"WILL BE EXECUTED JUST AS IF IT HAD BEEN"1"TYPED AT THE KEYBOARD. THE DOS MANUAL"2"DESCRIBES THE PROGRAM IN MORE DETAIL."!2:10D2:"<< HAPPY EXECUTING >>"::l2"PRESS THE SPACE BAR TO MAKE THIS"2"PROGRAM CREATE THE FILE DO'ER."22"IF YOU WISH TO STOP THIS PROGRAM NOW,"2"YOU MAY PRESS THE ESC KEY."G3  END INSTRUCTIONS AND WAIT FOR KEY TO BE PRESSED. m3"A$:A$(27)Ā: ESC KEY PRESSED3,A$(32)320: SPACE BAR PRESSED36(7);:290: BEEP AND TRY AGAIN 3@:: PROGRAM STARTS HERE4JD$(4):CTRL-D4TD$"MON C,I,O"'4^D$"OPEN DO'ER"<4hD$"WRITE DO'ER"F4r"FP"W4|"MON C,I,O"t4"REM HERE IS A PROGRAM"z44"100 TEXT:HOME:VTAB 5"4"110 PRINT"Q$"HERE'S A NEW PROGRAM"Q$4"120 END"44"SAVE NEW PROGRAM!!"45"LIST : REM NEW PROGRAM!!";5"REM PAUSE TO LOOK AT LISTING"Z5"FOR X=1 TO 8000: NEXT X"e5"INT"v5"MON C,I,O"5"LOAD COLOR DEMO"5"LIST"5"FP"5"PRINT"Q$"PAUSE TO LOOK AT LISTING"Q$5"FOR X=1 TO 4000:NEXT X"5"MON C,I,O"'6"CALL -155 : REM JUMPS TO MONITOR"@6"800.820 I 821.840"J6"FP"}6"PRINT"Q$"PAUSE TO LOOK AT MONITOR LISTING"Q$6"FOR X=1 TO 4000:NEXT X"6!"MON C,I,O"6&"CATALOG"60"RUN NEW PROGRAM!!"65 7:"115 PRINT"Q$"WE CAN EVEN CHANGE IT"Q$"7?A7D"LIST : REM EVEN MORE RECENT PROGRAM!!"j7I"REM PAUSE TO LOOK AT NEW LISTING"7N"FOR X=1 TO 8000:NEXT X"7X"SAVE EVEN MORE RECENT PROGRAM!!"7b"DELETE NEW PROGRAM!!"7l"CATALOG"7vD$"CLOSE DO'ER" 8:::"IT'S DONE!!!":8@8"YOUR APPLE'S READY TO DO'ER IT'S THING!"b8"ALL YOU HAVE TO DO IS TYPE"t8"EXEC DO'ER"8"PRESS THE RETURN KEY, AND SIT BACK."RPRESS THE RETURN KEY, AND SIT BACK."42000^UD1-0h PAD TO 40 CHARACTERS U0rI(NN$)(39(NP$)):NN$NN$".":m0|NN$NN$NP$:S5ı0 UPDATE DATA NUMBER 0:T:TTUD:CU(START11)0T$(T):I1(T$)0(CUI),((T$,I,1)):0S4ı1 FIND EMPTY DATA LINE 1T$:(T$,1)(92)4310:1LN(123)(124)256T1 CALCULATE OFFSET r1CU(START((LN201)46))10 POKE DATA LINE 1:ICU(CU39)1DI,((NN$,I1CU,1)):1b SET UPDATE FLAG 1lMFMF1:S4S5ı1v2500012 DELETE DATA CONTENTS $2:30002:10:"PLEASE ENTER THE NAME OF THE PARTY YOU":"WISH DELETED FROM THE DIRECTORY AND":"PRESS 'RETURN'."214:"-> ";K$:K$""S5ġ:250002K$""250002 FIND AN EXACT MATCH 2:Z:UU13NA$:(NA$,(K$))K$510033(NA$,1)(92)UUNR5070?3UUUU1P3UUNR5070]3:25000t3 FOUND A MATCH 3LN(123)(124)256:UUUU13:11:NA$:S5ı3 13:868:"DO YOU WISH TO DELETE THIS DATA (Y/N) ";S$:(S$,1)"Y"52004(S$,1)"N"ĺ"":5130 45081<4P OK THEN, KILL IT! M4ZUD1:4250k4dCU(START((LN201)46))|4nCU,((92))4x4450:250004p EDIT A DATA LINE 4z:3000#5|:10:"PLEASE ENTER THE NAME OF THE PARTY WHOSE";:"LISTING YOU WISH TO!! ! ! ! ! !!!ōϠӠćˠ̍ˠŠčŠčɯϠҍĠԠ٠ϠΠ͍Š۠ŠҠN D   , b Y L> b @   Lvم380` X L !   - `" X    i( ! o , и` X$i( " X , 7 , ͭ) ; # ͭ  ; ` o ɱɸ" L; )  o ɱɳ# L_ )`  o ɱɸ" L ) o ɱɳ# L ) ##` L U o00Щ莢ɽదɬUɽ̢ʎ! o : Lm  ɛhhL%H% h% ` ` `HHH  hhh`HHH : $'   hhh`, `Hhݯ`h`# q  ` Y  # LK ` RRSS`R S8`RSDE  `iiiQLk RLk H m hLk S%RQr$T+  # o? : L  hh` %)`ʽQ08`  `  ?,06 /,0&莤 ,0欧ȌP8``ȈQ`  UɽQ 莣Ȍ`8`  UɽQ ʎ`8`HH Uɽ"̦̦88hh` ȹHH`%) ` f `,%0 f `,% f ` f` `  f `hh" XL  ̅      `H jjH9mmL[mmhh`  # L# # 3,0ޭR S   ` .H h. ` % f$,/ ` f` : :   oOɃ  hhhhhh`+t+TPɍɬC+L,)  o : L f f`   t+L:,%` f`RS`KȱL`KȭL`DERS ` ` I,`DE]ȹ]Ȍ  E`,0 /R.SDE RSQzmVVW` `DE]^ /].^ E̞`DE `HHH/.0+>0jj.9hhh`( 01 0㎓/.М LHHH?!=>@AH IL=K>Lhhh`HHH ; ( L -hhh` : :  ,% f f4,$ ɀ@  L   LϠ젃Š𠁠Ƞɠź̪ӯؠԉȠҠńϠ̠̠ΒȤŠ͠㠩υe h QQQQQ<JWdv&crK$:GRc*1DNSjwŠԿſΠԿſſԠӮӠþϠΠϠΠՠҠ٠Ҡ٠Ϡ΍٠ӮŠΠנŠŠҠŠ٠ҍξϠŠǠŠҍ̭þξϠٍ̠ҮŽĠՠŠϠŠҠٿԠŠˠĠӠԠΠˠĠӠ٠ϠՠԠǿ"" " " " " """""""""