' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   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#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^Lõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!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 AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( q  Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH ~(` d ֠z# u`z"#USBC  *%   !Š " Π" ŠӠ  ҠŠԠŠԠàϠ ͠  ҠӠ' Ҡ  ٠РԠҠӠРٮҠŠٮʠŠˠԠϠ ԠϠР ԠϠɠ٠ɠԠ+ҠӠɠ  Ӡ               q`$,q'6PbE()[?d2e?Pa(Ԡ)Gd8.?)r.?(rre`[ŭŠ٠ŠǠ)%Ndede*Na(ΠŠ٠)ŠŠĠ)Zd2ed6?e_(Hdc\bGd2ePa@E(Ժ)Gqq\,de[R\bGd2ePa(ź)Gqq\,d e.?r[F,q.?6@r`$,d6?e`$6`.?r?$2~O2a(ԠŬ)a(ԠΠϠΠ٠)R@M @<d2e?`.? r$Fa(ŠϠĠ)_ZL  vQ 8egh ` e ɰ ,ZL LhhB;uhvhh e`:,  "hhh` { ɫ   L>L( HɰɫЉơhL* ,h`PQ/ Q^ԥP &^ &^ePP^e@ HHLLF:L8gh}~`Ƀ` S $L*?`gh<=ij>?`v(Le lL5 HHvH枱`8Є ,0 \ ,0 \ \ И F e ihh eHiHvHuH  j g %^_L ! "  g # HHH XvyzW4ȱuȱve$v# \uv $% W (Lb-逐 Pћ `֨gȑggiihij *stopijklmn IURhhHHz`gihi` ,   ,Є hhPQPQD X ȱȱQP- $% ) \$! $ȱȱж \L3 j )` )`ʠ$hh eL$p "tpM?E0<=Ѕ 8ɀA N4O0Ťș98:I8xІș Нƹ`ghȥQћ :v %  . F v Y Lij  Y  D_i^aeii`jij圪8iae^_^`_a8stopiejȄ PQmnij egh^_^ ijL< ȱ^Șe^^_iȑ^^_ҢLECAN'T CONTINUUNDEF'D FUNCTIO ERROR IN BREAKɁ! i` mn8囅^圪#8^Ɨ8^ƕƗƕ` i65^^.`p(o"H H h0hhpo`M$L*  Z` H \h PCOSITAATPEELESTRVAASCHRLEFTRIGHTMIDNEXT WITHOUT FOSYNTARETURN WITHOUT GOSUOUT OF DATILLEGAL QUANTITOVERFLOOUT OF MEMORUNDEF'D STATEMENBAD SUBSCRIPREDIM'D ARRADIVISION BY ZERILLEGAL DIRECTYPE MISMATCSTRING TOO LONFORMULA TOO COMPTSCALESHLOATRACNOTRACNORMAINVERSFLASCOLORPOVTAHIMEMLOMEMONERRESUMRECALSTORSPEEDLEGOTRUIRESTORŦGOSURETURRESTOOWAILOASAVDEPOKPRINCONLISCLEAGENETABTFSPCTHEANOSTEЫANOҾSGINABUSFRSCRNPDPOSQRNLOEX //`/l*n*r*v**N*jU****+++a*E=H jmziH##$#  &'A! ''':((dFZyy{!{h"}&PTFN&ddENFONEXDATINPUDEDIREAGTEXPRINCALPLOHLIVLIHGRHGHCOLORHPLODRAXDRAHTAHOMRO٠)2ca(̠Ӡ)9<de de,dedeLde(de)-FdBedCed>e.?Lrd?e.?Mr;Pd<e8.?rrd=e.?r8.?r0rMoe,+++)))$*1*@*++..T/Z//W)J KM6a()GP(a()GP(Ka(Ԡ̯۠͠Π)GPa(Ԯ)GP(0a()M(ca(ԠŠҬî)ca(4%L:-$șȩ0LW& % !% # % # 9"ƙ U"  #i 0 i8.ș0șyl&yk&yj&yi&00ڊIi i/ȄȪ)ƙ.șI)$Ъ0.ȩ+.I* L) ` -+ [..E0 - +f \$8L$f$På8噅 U" 9"ƚ0`L&H$ 9"h80 $La$H c#h #EL d$0L e q80L$>nk'nk(X 1%vu8 # ^_^^^ %^^`` r#` L *` #I*L) F``a`Ȫı`E0!` Şȱ`şȱ`Š ȩŬ`(IL#J8$  `)F !`ɠ #0hhLN L c#i ` c#P" "Li" !v r#8坅 "Ğğ Ġġ* e24(&&&0⨥塅堅埅垅L"@ (L"L bcdeL. ^_^^^^ ^`, r#4541r #LH-! 2! f"! ! \'7! h $ sʆ>PHt?QnL tp=hso< LeP>eQ? <=`@ L ʊ( (H hL/$`COPYRIGHT 1978 APPLE."HHLڅuۅv܅݅LL() s*L   )򊅤TH UR0PQQPIPPIPPPQ)stop0gh֘gghgh K:< l g RlP L L 0,  0,-`L ),-  0` )( &u(L\' !# ' ' " b(Lf"HL#(IڢIڢ-(h#5ᆥ](IڢʥH &HɁ! f"Π( \'hɁf( hL&` vy{| g|S}dpL}Qz}c0~~D:~L̑湭`: 808`ORXv8H  && r'h "` !# ! v'L! #Ș殅 !iȅ ƣ`5Dzh(F #0ɠ "穦' !'  . ɠL+#f(  c#k( ^" c# #$ p( H 0 I &p( h8嚪-E/8 i:`  c#d& "pLP +# #$ # U#H A! ! 'hJ I`8;)q4X>Vt~w/z*|cYX ~uƀ1r۠& !iP z# f#Ɉ +" #$ i$dg$ca(Ӻ)ca(ՠ̠ˠƠΠ̬Ġɠ)a(٠ϠӠԠ̠ՠ)U.a(ǠƮɠ̠ϠӠ٠)a(ՠӠƠӠԠ)v8a(̬ȠՠԠĠ)a(ӠҠϠϮԠƤŠԠŠҢӠҠ͠ӠϠӮ]a(LJҠŠ٠Ԡ)a(ŠĠΠҠϠ٠)a(š)moa(̠ǠŠ)ca(ŠՠҠĠſ)GR@`;@r%`@*#r9()Ŭ)@p(ŠŬ)@p()@p(ΠŬ̸)a@v]ŠŠӠŠԠϠԠŠ٠ĠϠԠǠҠΠŠŠŠήźq]ҠΠԠĤĠŬҢŠ] ] ]ĺ ]a(ΠɬϬ)^KM6N@"FrC@"FrC@"FrC@"FrC@"rC@"rC@" rC@"rC@"(rf@p(Ġ]͠ӠӠ ]ԠӠӠ ]͠ŠҮ ] ]͠Ӻ ]ˠ٬ˠɠ ] ]ҮΠ )FE(ӡ)_> ]ɠԠԠԡ*UVW cY4a(ɠԠԠԡ)>>cS(ԠϠ٠ο)&@`;@r%`@*#r9()%Q_d ] ] ]̺ 5qqbE()Fa@FR@TTa@F*a@`@9()$bb_bba@F$a@`@9()$bb_bb a@Fa@a@(a(ɠננ)E@*ra(Ġ)E@*rG-DS()&@`@*;@rr9()%@p@*#;@rrkNca(ԠĠŠԠҠҠ)a@*rE(ſ)GR@@p@*#r`@:()@:()$NXa@ ba@Fl]ŠҠĮvT'a@F6@p@*#r`@:()@:()$`@9()$ ,]ɠΧԠנԠ̠ԠӬˠF&cca(̠ԬɠŠЮԠ̠)a(ՠǠƿ)G0@p()R@Brd:ca(ŠŠΠԠ)a(Ƞ)$.`@9()%q`@9()%q_n7]ŠĠΠ̠ٮӠԠŠԠſHa@@p()a(ӠŠ̠էŠǠƠ)GUVWM`@*#r9@*#r%a()GYca@*rGS()&@`7;@r$na@ xa@F0R@`@*#r9()$TTh]נŠΠϠˮҠӠԠĠϠϠϠƠŠӠӬҠƠŠӠϮa@Jca@GS()&@q`7;@r$@p@*#r`@:()@:(4_]]]Ӻ]Ԡ٠]ŠҠî]],dq]ŠӠŠ͠      [UVW;@rPa@*#rGY[)]ԠŠҬîa(ؠӠ)FE()a(٠Ӡ)FE()`.?r$ `.?r%L`.?r%q8rfgh_dedeM[!P88(;@rrra@c[) LUVWflm'nY> flm'nlm'n#ij#kij#k'/*@p(ŠӠҠŠ֠Ġ)\.4@p(ŠĠҮ٠Š׮)\`.?r.?r$`.?r$_ML!q2?rq`'%q'!q2?rq`'%q'%q8r `%q\&o 2 BY T GALE$  13-6-79 679 6 *"5 " * VERSION V, COPYRIGHT ITT *"a " * *" " * JUNE 13, 1979. *" " * *" " *********************************" "BRUN INTEGER" &"NOMONC,I,O"10)"INT"/W :16300,0:50,255:16298,0:936 :" *********************************" " * *" " * INTEGER >< BASIC *" " * 1)256(40)14),96:: X(16384):X128700:16368,0@ ,255:1:I$;" SLOT: ";:L1:H7:300:A,N16:w 500:N;:50,255:1:" DRIVE: ";:L1:H2:300:A9,(A)N1: ,K(16384):K128300 .16368,0:K141310 0KK176:KLKH300 2NK 615:N;" ": 50,63:22);"DEFAULT=";:((4COPY---":16368,0:700:1:27855 <50,63:(12)70` A"****** UNABLE TO READ ******":90q F(11)1180 K"******UNABLE TO WRITE ******":90 P(4)68ĺ"****** SLAVE WRITE PROTECTED ******" Z50,255:16368,0:40. d:500:N;:50N1:MSSSN3MD #200:SDNs (" MASTER SLOT=";MS;" SLAVE SLOT=";SS:" DRIVE=";MD;" DRIVE=";SD -(978)6348 /0:0 0" AFTER COPY IS DONE, RE-BOOT YOUR SYSTEM" 1 2" INSERT SLAVE,THEN":"---HIT RETURN TO BEGIN *) START HERE A$(40):"NOMON C"::" I.T.T. DISKETTE DUPLICATION PROGRAM":" ...PLEASE INSERT MASTER ... " 3386:CS(2)16 I$"MASTER":NCS:A0:100:MSN:N(3):200:MDN:I$" SLAVE":NMS:A1:100:SSN: "NOMONC,I,O"K10:2:"*** COPY ROUTINE BEING LOADED *** "R#1h("EXEC COPYFILE"n2` BY T.GALE, 16-4-79NSUMER PRODUCTS ** LTD ** ** DAZ 04-04-79 * * Ϡӿ](]ԠŠҠ!4]ԠҠԮƠŠϠ!>]ӠŠ̠٬"H]Š٠ԠŠנ#R]ĠΠϠ \]Ԡ͠ҠӬ f]ŠŠŠŮp]z]̠͠]ȭ]͠"]]]٬Ӡ]ӠŠŠƠ" ]٠ŠŮ#]ŠҠϠΠ ]ҠŠӠҠϬ#*]̠ŠԠŠӠſ)OWS(ŠȧҠŠϠԠǠנӿ)&@`@:()$d `a@F ja() ta@F*~a(ӠԠŠΠŠ)bb a@F a() a@F a()_d"]٬Š٧)a(ΧŠӠԩ)WBa(ƠɠϠԠӠԠҠ̠Ӭ)a(ɠ̠ˠՠנӠϠ)6La(ԠŠɠ̠נԠҠ)a(Ӯ)cQVa(ϠՠԠŠϠԠǬ)a(Šՠ1)256(40)14),96:: X(16384):X128700:16368,0@  * ORG.BY T.GALE *v%b * FOR GINA. *C,255:1:I$;" SLOT: ";:L1:H7:300:A,N16:w 500:N;:50,255:1:" DRIVE: ";:L1:H2:300:A9,(A)N1: ,K(16384):K128300 .16368,0:K141310 0KK176:KLKH300 2NK 615:N;" ": 50,63:22);"DEFAULT=";:((4COPY---":16368,0:700:1:27855 <50,63:(12)70` A"****** UNABLE TO READ ******":90q F(11)1180 K"******UNABLE TO WRITE ******":90 P(4)68ĺ"****** SLAVE WRITE PROTECTED ******" Z50,255:16368,0:40. d:500:N;:50N1:MSSSN3MD #200:SDNs (" MASTER SLOT=";MS;" SLAVE SLOT=";SS:" DRIVE=";MD;" DRIVE=";SD -(978)6348 /0:0 0" AFTER COPY IS DONE, RE-BOOT YOUR SYSTEM" 1 2" INSERT SLAVE,THEN":"---HIT RETURN TO BEGIN *) START HERE A$(40):"NOMON C"::" I.T.T. DISKETTE DUPLICATION PROGRAM":" ...PLEASE INSERT MASTER ... " 3386:CS(2)16 I$"MASTER":NCS:A0:100:MSN:N(3):200:MDN:I$" SLAVE":NMS:A1:100:SSN:B *************************?* *^* DISC COPY PROGRAM *}* COPYRIGHT 1979 ** ITT CONSUMER PRODUCTS ** LTD ** ** DAZ 04-04-79 * *5:2,350:2,3539:#I1(A$);2I2);(A$,I,1);C:40K,I :::4507 ::I14:C(I)((1)15):N %(16384)127200 *I311:C(I1)C(I)::C(1)((1)15):I15:J14 4C(J):LJ514I:K39L:K,LK:K,LL:K,LL:K,LK:::805 :I031:I2:0,39I3:I 5:0,392:0,393UNE":4000 &450 X3000+ bI0142; l2I4);I;C v:Q I1152a 2I4);I;p :::450 ::W350:I119:J019:KIJ:(16384)127200 J3(I3)IW12 I,K:K,I:40I,40K:40K,40I K,40I:40I,K:I,40K:(A$)200 N(A$)48+ N1N52009 N5410C ::Z N500,600,700,800q (16384)127450z 200 3000 A$"BPBPDGMODMGMMLLW":4000: A$"LURIGRGRBBRGGBGI":4000: A$"ARWNRERNLLETRLRT":4000: A$"KPNKNYNGUUYANE 'RETURN' KEY TO STOP ANY"? " DEMONSTRATION.":32,5::_ ""1. STANDARD COLOR NAMES" @"2. STANDARD COLOR NUMBERS" T"3. KALEIDOSCOPE" h"4. MOVING TUNNEL" m"5. END PROGRAM":32,0:: r: |"WHICH WOULD YOU LIKE?";A$ $(40):C(4) :::16368,0h 7);"I.T.T. COLOR DEMO PROGRAM":7)"=========================":: "TO RUN A DEMONSTRATION, TYPE ITS NUMBER" "THEN TYPE THE KEY MARKED 'RETURN' AT" "THE RIGHT-HAND EDGE OF THE KEY-BOARD." :"TYPE THE *************************?* *^* I.T.T. *}* COLOR DEMOS PROGRAM ** ** BY DAZ 10 APRIL 1979 ** ************************** A     !":1100NVC1030*"FAIR. ":1100L"GETTING REALLY GOOD.":1100c"NOT BAD. ":1100v"GOOD.":1100$"VERY GOOD.":1100."VERY, VERY GOOD.":11008"EXCELLENT.":1100B"NEARLY PERFECT.":11006L50,63:24:"PUSH BUTTON F NVC1950N "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:22:"YOUR SCORE IS ";:S109103 *S50EXTP1D 4S100NVC0R >S20960a HS601010q RS1201040 \S2001050 fS3001060 pS4201070 zS6501080 1090 NVC930 "NOT TOO GOOD, BUT":"KEEP ON TRYING!":NVC1:1100500:760 cE: DRAW FIELD3 hI039:0,39I:IB I20342y 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:::6:M(16336):I:IX:M0" VV* 758 MV(V)@ M1w (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::::13:I39240 I,K)E75& I270? V2:W(KP)2LL:M1V 6,150(W)4:7,3 Z(16336)(16336)(16336)(16336):768 75 WW:JY:Z(16336)(16336)(16336)(16336)(16336)(16336)(16336):: SIDE BOUNCE I1b  2000(Q(0):(QOQ)5(Q)ıFOQQ:Q(39Q6):Q0Q0U(Q34Q34w2D:Q,QLL0:A:PQď0,Q10<QPďQLL1,390FPQ:KX,Y3:F:I,K:XI:YJPJYW:J0J119İ230xIXV:I01900I6OQ500 20:E:KJ       $:T "$&(*,.02468  / `  ` ` ȱ`ܲDEEhiHLfh ` ;B-` ;B-`  -I 8 ز'DH 7  F@ 8Y01i  ,ԥDnHi W hx W L  IL, HJ݌h$$ Hhꝍ݌` x W xLW  ` !"#$%&'( )*+,-./0123456789:;<=> ?@ABCDEFGHIJKLMNOPQRS   i ۤ " L $ p f g g  U  U  U EEHJ݌h f g g g g  A V f i > 0֩$$ f $Hh i  , L.  &&꽌ɪɵ'*&%&E'зЮ꽌ɪФ`*xY+&x'8*BIxix&&  x) + ') + &д +`FG8`0($ p,&"  q (  > 80|'x &Hh &  Y M '&Y M x ꪽM ' `Hh`aI꽌ɪ򠚽ɭ&Y & &Y &   꽌ɪ\8`     űűűűŸŸŸŸŸŸ׍ٮҍĠٮʍ΍ō: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 SETI125125(1):20:I:M1:N0' 80}23: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 ROUTINEKb768,1732900^ 23:868,h A:X,Y3:Y120(1)5r X19X| V1:W5(1)2:LL1:L1800q (A$)ĭL1ĺA$", "; L1ĺ"THIS IS BALL ";6L;" OUT OF 5." (16384)15511000 L13010 50,63:"THIS IS THE LAST BALL"; 50,255:23: E ";:50,255TJ K120:K: ALLOW TIME FOR USER TO RELEASE BUTTON FROM LAST PUSH\T 20X P1(1):((OOLDP1P1)3(16286)127)ERASEİ4810Y OOLDP1P1: WRONG PADDLEZ ERASEERASEERASE1[ ERASE1İ4800] (16287)128(16384)155(16287)1272480) P160P1552460D 16368,0:P15531111S :24:1:] 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 GAM ";::"========================================"b. 12:" COPYRIGHT 1979 APPLE COMPUTER INC"jj 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):156P1412260"";A$,(A$)02335R I1(A$):((A$,I,I))642330_ I:II1 A$(A$,I,(A$)):(A$)ĭ(A$)12A$(A$,12) 24902$ 936:5:"========================================";::" L I T T L E B R I C K O U T HELD OFF-CENTER.":(16368,0"* BEFORE WE BEGIN, PLEASE TYPE":"* YOUR NAME AND THEN PRESS":"* THE KEY MARKED ";(34);"RETURN";(34);" ";(40)(41)256(36),96: CURSORP(16384):P15511000(16287)1272335P 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":"* WITH THE PADDLE"***************************************";: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"4"* A WALL OFND ROUTINE :936:16298,0H*(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 SPEEDa2340[fQ5:21:1:"TOTAL=";%JQ1500:Q8TQSSBANUS5C^8:Q;]h6,150Q40:7,3:768rr6,140:7,2:768|6,50:7,3:768K110(1)20:KQ::lH180:OD(16336):H:2910 *** START OF PROGRAM *** 7000: POKE SOU1ĺ" BONUS POINTS: "fL1ĺ"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@BANUSP24:958:"SCORE= 0";cZ(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:L(790)256: POKE NEW HIGH SCORE INTO PLACEB~21:15:"FORMER"fZ(16384):(16287)1271190{20:Z1551160 Z15511000OQ500:2520 PRINT POINT SCALESCOLE6LL(936:"POINTS PER BRICK -> 1 2 3 4 5 6 7 8"OR 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 SCORE,t790,S256:789,SUWB oTMɅ"3J[NSJIfmzq# [$NYP;#o6#"#!0 9@0Ӷ:Pyإ<[(N>W']5Kgvq !# """"""###c ܪȱ L[ĨP?xO_ڹo   ʤ   Y YoܹݾЇ`TP@xL"` Ιϙ_oܙݙᙯ` ??<<<<<<<0UUUUUUU  rPՆϦ ` ΅υȩ ` Τ PڵxۥΑȥL"`hh$ F`` %ֈ`ʤZA^ܙ ݙ0  m7;܄iȢٚ . y$IqܤݐLM͠1FLJܹ/ݾLu$FԨֹ)U h)װ H #֐ι Ll`w0P`fLPεϵxϱHȱ΅hΈ` J  P`  Y $0`  $0 8 P# o ΅ڥυ e epݕ` 4LL#$ ` `Lkȱ0@hJHȱШhЄӠȱ0I@iHeШiH˰hhЈЈ͑Ј̑ЈЈ0JKЬ@iHe  eѕxh$0 xx ԅբ H 0   $ ( x$0  xx 0Ȉ ϴX)HЄ ȹ)eHe0hޤȄ h󰩠ɩch cɰ$0 $` d'ʅ˅LM&ȱϰqȥȥ`FLʥM˥J̥Kͩȹ0 L uߙ`` $0LL*iS 00)ȆȘHJI@hL"`ȩ)?Jжi?oiO iȱ) zȵх 8 05X~")XȔ)! *Ȇ0LJɢ    Ȣ ii)ɰL ̥͐Eʑ˥ʥ˰ਈ$ u~q  u  mʥ` yڅ`Sε{ϵQڵyxȔPMuHOwh(VP`΅h(OM L6 T&ϐ eڅeۅ &L~ 畠(LoU [΅ڥυ   o ` l3 3` 4J G 4&(JJJJ) `  F٩ $0h$0 )?i h](Њ Px+L 4P xL# 48` PxL PeHxeH˰iکeۅȱhڙ`ꠀЕ x ت3 Q#3ؕxQεy NvNδPPPL#"Q8` a Ul L3L`) #L $  `  v mL;ʅ˅LM  mdžة * * *     % 0LH΢QPHΪ       "";H$$"R+(H$,1)"Y"OQ500:2020<"\+(H$,1)"N"11080G"f+31111a"y16368,0::936::LND PRESS RETURN)";>! +VTB2:868:VTB1:36,TB:868:"";H$V!*+(H$,1)"Y"11060r!/+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:868:1278560 !P1608560Z !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 NO A. PLEASE PLUG IN THE PADDLE"FR!"SET AND THEN PRESS THE SPACE BAR."s\!:"IF YOU DO NOT HAVE PADDLES, YOU MAY"f!"EXIT THE GAME BY PRESSING THE ESC KEY."p!P(16384):P1558560z!16368,0:P1558580!31111 !(16287)127(16286)) <J1I F:A$(J) PJ3 ZD$;"CLOSE ";Z$I dD$;"NOMON C,I,O" MK D$(4): CTRL D? "THIS PROGRAM RETRIEVES TEXT FILES"l"CREATED BY THE 'CREATE TEXT' PROGRAM.""MON C,I,O IS IN EFFECT.""NAME OF TEXT FILE? ";Z$D$;"MON C,I,O"D$;"OPEN ";Z$(D$;"READ ";Z$2I 7A$(I"TYPE STRING #";I;": ";" 8A$(I)4 :A$(I)""40: <U >"WHAT FILE NAME? ";N$h FD$;"OPEN ";N$| PD$;"WRITE ";N$ ZI1 dJ1I1 n:A$(J) xJ D$;"CLOSE ";N$ ) A$(100):I0'D$(4): CTRL D-\"THIS PROGRAM LETS YOU WRITE TEXT FILES."b ""YOU GET TO TYPE ONE STRING AT A TIME."$&"A STRING MAY HAVE UP TO 239 CHARACTERS."(2II14"(PRESS THE RETURN KEY TO QUIT.) 6 . L 4 `$$L"$Ն$L,"L 8!$`L# ȱ0` -µµ`HP8εxh`ɅLLHxܥyݥPQLuƵPxLhQεyϱΠ L$ 4) ؘ ` uHɃLh`  T#`  `ѥ΅ ΅ҥυө 0ХҠ ӕ "L# 4i` F`JKH۰hЅѠȱ0@ȱHШhh0J L赟0L#0ܤ }! !L!赟L#0ܤ }! !L $` ` [" S"  oP  YVPL6 O 5OPL Ι_LfP0Q@PPxA@QPa`qpMː ʥ˰JυKL ! 8Mϕڥ۰եڅʥۅ ,! ` :L!΄<Ȅ>=?`ʕ>?>`8M˕ !  ,! ` L:L``F`$ ܪȱ Lܤ`Ś25 a0 Lȩ` 6 6P`JLKMLxL L6 L[L JL̄ʩKͥp˅MLLLy! 2 L,PQ܅x݅yL آ8ЕNЕKʵ˕ە LkLMNܕ`LΥΥLMLʥ-` 4(L(n  rLa! ?"&0ΰ` ΔL 4΅` ȑ` l΅υLD L4 xPiڄeΕPeϕxPȵxڰL# N ONi)OO i@ &N&O ϕLz JKLυML LMJυKL qL g` ` `嶡䡯z~" `` Oڵw۴Nv L`xw8OPL# (` 40!(L 4LdF` # %L"wL{ TL~&&&ڥې څΈ` l 4Ȑ,` 40L 4Ȑg~9g'7(*䮥G 0 #gMghghPcQ)Wqqqqhhq`uuuQ줰䮲륥Q9O/Q) WjB`O~5'Q 䯭䮡ޜݜݞG ٦Τ ȹɀI ȄȹH h3 oLP O䯭䮡𥴳\@`` ~3`Gg壡yi壡yi` @Gh X{gggggg'(dgxk#"!""!##!#$7ϠGX͠LϠ٠SGϠDĠHSĠNSĠTĠ 5EMҠL Šō?FِLϚΠ κ f# ٢ "," 2" "EXIT"," 3"D :"CHOOSE NUMBER (1 - 3) ";Q$:Q(Q$)S Q0Q4ıi (15):(7);:450v CL$;FL$~ : DEMONSTRATION OF RANDOM ACCESS A$(9),B(9),C(9),D(9) ::"THIS DEMONSTRATION WILL NOT EXECUTE ON":"A WRITE-PROTECTQ$"0"ĺ(7);:3302 ^R1Q:R2Q:Q0R11:R29= h:(5) r"PART# NAME SIZE IN STOCK ----- ---- ---- -------- " | :12);FL$:(10) "COMMAND","NUMBER" "-------","------" "LIST"," 1" "CHANGE(32):ST;:(31):Q$:(Q$)0ST(Q$)S (T):" ";R;8);N$;24);BL;32);ST;" "y "WR$;FL$;",R";R:N$;",";BL;",";ST ,D$:R 6(23):"PRESS THE RETURN KEY TO CONTINUE.";:Q$ @80 J:"PART NUMBER 1-9 (0=ALL) ";Q$ TQ$:Q(Q$):(Q1Q9)" " ";R;8);N$;24);BL;32);ST) R1 D$: 310C 330[ T7:RR1R2:TT1} RD$;FL$;",R";R:N$,BL,ST:D$ (T):" ";R;8);N$;:(7):Q$ (Q$)15200 (Q$)0N$Q$ (T):(24):BL;:(23):Q$:(Q$)0BL(Q$)& (T):"NOMONI,O,C":$ :D$(4)8OP$D$"OPEN "MCL$D$"CLOSE "a(RD$D$"READ "v2WR$D$"WRITE "<FL$"APPLE PROMS"FOP$;FL$;",L40"K1000P390ZQ100,180,480d330nRR1R2xRD$;FL$;",R";RN$,BL,ST  T'S DONE!!!":C"YOUR APPLE'S READY TO DO'ER IT'S THING!"e"ALL YOU HAVE TO DO IS TYPE"w"EXEC DO'ER""PRESS THE RETURN KEY, AND SIT BACK."NGE IT"Q$"?DD"LIST : REM EVEN MORE RECENT PROGRAM!!"mI"REM PAUSE TO LOOK AT NEW LISTING"N"FOR X=1 TO 8000:NEXT X"X"SAVE EVEN MORE RECENT PROGRAM!!"b"DELETE NEW PROGRAM!!"l"CATALOG"vD$"CLOSE DO'ER":::"I*"CALL -155 : REM JUMPS TO MONITOR"C"800.820 I 821.840"M"FP""PRINT"Q$"PAUSE TO LOOK AT MONITOR LISTING"Q$"FOR X=1 TO 4000:NEXT X"!"MON C,I,O"&"CATALOG"0"RUN NEW PROGRAM!!"5:"115 PRINT"Q$"WE CAN EVEN CHAT : REM NEW PROGRAM!!"; "REM PAUSE TO LOOK AT LISTING"Z "FOR X=1 TO 4000: NEXT X"e "INT"v "MON C,I,O" "LOAD COLOR DEMOS P" "LIST" "FP" "PRINT"Q$"PAUSE TO LOOK AT LISTING"Q$ "FOR X=1 TO 4000:NEXT X""MON C,I,O" TD$"MON C,I,O"' ^D$"OPEN DO'ER"< hD$"WRITE DO'ER"F r"FP"W |"MON C,I,O"t "REM HERE IS A PROGRAM"z  "100 TEXT:HOME:VTAB 5" "110 PRINT"Q$"HERE'S A NEW PROGRAM"Q$ "120 END"  "SAVE NEW PROGRAM!!"  "LISAND WAIT FOR KEY TO BE PRESSED. m "A$:A$(27)Ā: ESC KEY PRESSED ,A$(32)320: SPACE BAR PRESSED 6(7);:290: BEEP AND TRY AGAIN @:: PROGRAM STARTS HERE JD$(4):CTRL-DROGRAM IN MORE DETAIL."! :10D :"<< HAPPY EXECUTING >>"::l "PRESS THE SPACE BAR TO MAKE THIS" "PROGRAM CREATE THE FILE DO'ER."  "IF YOU WISH TO STOP THIS PROGRAM NOW," "YOU MAY PRESS THE ESC KEY."G  END INSTRUCTIONS I COMMAND."" :"WHEN YOU TYPE"4 "EXEC DO'ER"` "THEN THE COMMANDS IN FILE DO'ER TAKE" "CONTROL OF YOUR COMPUTER. EACH COMMAND" "WILL BE EXECUTED JUST AS IF IT HAD BEEN" "TYPED AT THE KEYBOARD. THE DOS MANUAL" "DESCRIBES THE PKdQ$(34): 34 IS THE ASCII CODE FOR A QUOTATION MARK (") Zn::2:12{x:"<< EXEC DEMO >>":::"THIS PROGRAM CREATES A SEQUENTIAL TEXT""FILE NAMED "Q$"DO'ER"Q$" CONTAINING SEVERAL" "STRINGS, EACH A LEGAL APPLE I     X<1 THEN 1 55 IF X<1 THEN 50"N"3 ON X GOSUB 39,87 60 ON X GOSUB 65,75"s("39 PRINT A 65 PRINT A"2"45 RETURN 70 RETURN"<"87 PRINT A * A 75 PRINT A * A"F"99 RETURN 80 RETURN"P9000TT)"RENUMBEINE NUMBER":" INC SETS THE STEP TO THE NEXT LINE"Q" NUMBER":" YOU CAN SET THE NEW FIRST LINE AND""LINE INCREMENT TO ALMOST ANY VALUE.":"OLD NEW" :"1 INPUT X 50 INPUT X" "2 IF "39 PRINT A 50 PRINT A"C"45 RETURN 60 RETURN"l"87 PRINT A * A 70 PRINT A * A""99 RETURN 80 RETURN"$9000TT)"RENUMBER"PT)"PAGE 4 ""& FIRST 50, INC 5" :" FIRST SETS THE FIRST NEW LIRE PROGRAM"6"STARTING AT TEN AND GOING BY TENS."X::"OLD NEW":"1 INPUT X 10 INPUT X""2 IF X<1 THEN 1 20 IF X<1 THEN 10""3 ON X GOSUB 39,87 30 ON X GOSUB 50,70""27 END 40 END"O DO NOT USE 'MAXFILES'"B:" IT WILL DESTROY RENUMBER!"LN9000mTT)"RENUMBER"PT)"PAGE 3 "s" THIS PROGRAM CAN RENUMBER ALL OR""PART OF A BASIC PROGRAM. BY TYPING":"& " :"IT WILL RENUMBER THE ENT I N NN G GG"@ h"WW WW A A R R N N I N N G G"o r"W W A A R R N N III N N GGG "w |13 " DO NOT PRESS RESET" :" DURING RENUMBER OR MERGE" :" IT WILL DESTROY YOUR PROGRAM!":" ALS(A$)1310000 & ,PT)"PAGE 2 "U 6"W W A RRRR N N III N N GGG " @"W W A A R R N N I N N G G" J"W W A A R R NN N I NN N G " T"W W W AAAAA RRRR N N N I N N N G " ^"W W W A A R R N NN ERROR MESSAGES"0 "12 ERROR MESSAGES"O "13 OTHER MESSAGES"e "14 NOTES"{ "15 NOTES" "16 NOTES" 23 "PRESS RETURN TO RUN RENUMBER" "HIT ANY KEY FOR INSTRUCTIONS"; A$ (A$)3Ā RENUMBER 13 OTHER MSGS"O " 6 MERGE 14 USAGE NOTES"~ " 7 MERGE 15 USAGE NOTES" " 8 SYNTAX 16 USAGE NOTES" 200 "9 INPUT SYNTAX" "10 ERROR MESSAGES" "11 GE 1 "4 z"PAGE TITLE PAGE TITLE ": |h }" 1 CONTENTS 9 SYNTAX " ~" 2 WARNING 10 ERROR MSGS" " 3 RENUMBER 11 ERROR MSGS" " 4 RENUMBER 12 ERROR MSGS" " 5 q% RENUMBER6 PAGES, 300 * PAGE #<I::255Y#TT15:PT34F"&";05);"APPLESOFT RENUMBER INSTRUCTIONS";40);"&";PZ"&";4);"COPYRIGHT 1978 APPLE COMPUTER INC";40);"&";d::n xTT)"CONTENTS"PT)"PA             D$;"EXEC ";FL$? LINE 75 AND LINES 1000-1250 ARE NOT SAVEDw RECORD ZERO CONTAINS THE 'SAVE' PROGRAM EXECUTIVE} TIVE D;FL$;",R0"C~"75":"DEL 1000,1250":"SAVE RANDOM":"HOME":"RUN"NR19bWR$;FL$;",R";RA$(R);",";B(R);",";D(R)RCL$;FL$::"WHEN THE PROGRAM AND DATA HAVE BEEN":"FULLY TRANSFERRED, THE PROGRAM WILL":"BEGIN RUNNING."070$:(9):10401.:"NOW READING DATA..."L8R19:RD$;FL$;",R";RfBA$(R),B(R),C(R),D(R)mLRzVCL$;FL$`(7):::"INSERT AN INITIALIZED DISKETTE, THEN":"PRESS THE RETURN KEY TO BEGIN TRANSFER.":" ";Q$jOP$;FL$;",L40" tWR$ED DISKETTE SUCH AS" "YOUR DOS SYSTEM MASTER (VERSION 3.2). 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"480Q$"Y"1PERATION REQUIRES">"z " MORE MEMORY THAN IS AVAILABLE."H" 9000o"TT)"ERROR MESSAGES"PT)"PAGE 12"u""$"ERR DUPLICATE LINE NUMBERS""." ONE OF THE UNCHANGED LINE NUMBERS""8" WOULD EQUAL ONE OF THE NEW LINE"!#B" TO BE NUMBERED GREATER THAN 63999.";G!H :"ERR NO LINES IN RANGE"t!R " THIS INDICATES THAT NOTHING WAS"!\ " CHANGED BECAUSE THE SPECIFIED"!f " RANGE OF LINES WAS EMPTY."!p :"ERR OUT OF MEMORY""u " OCCURS WHEN AN O "ERR > 63999"D  " ONE OF THE PARAMETERS WAS LARGER"] " THAN 63999."  :"ERR LINE INCREMENT = 0" " THIS IS DISALLOWED." * :"ERR LINE INCREMENT TOO LARGE" 4 " THE INCREMENT WILL CAUSE A LINE"&!> " GRAM IN MEMORY."6 :" * & MERGE RETURNS THE "_ " PROGRAM ON HOLD TO MEMORY"u& :"ERR SYNTAX"0 " THE FIRST LETTER OF YOUR COMMAND": " OR PARAMETER WAS INVALID."D 9000 TT)"ERROR MESSAGES"PT)"PAGE 11" MOST ERROR MESSAGES ARE SELF-"H "EXPLAINATORY. ERRORS WILL STOP"u "EXECUTION BEFORE ANY CHANGES ARE MADE" "TO THE BASIC PROGRAM." :"ERR NO PROGRAM IN MEMORY" " THIS OCCURS IF YOU TRY TO RE-" " NUMBER WITH NO PROIPLE PARAMETERS ARE SEPARATED"9 " BY COMMAS, ','"g " * MULTIPLE PARAMETERS CAN BE IN ANY"y" " ORDER", " * A COMMA MUST BE FOLLOWED BY A"6 " PARAMETER LETTER"@ 9000 TT)"ERROR MESSAGES"PT)"PAGE 10" ! " ED."/ :" E,F,I,AND S SET UP RENUMBER"B "PARAMETERS."r :" * PARAMETERS ARE DECIMAL NUMBERS IN" " THE RANGE OF 0 TO 63999" " * IF NO NUMBER FOLLOWS E,F,I,OR S" " THEN THE PARAMETER IS SET TO 0" " * MULTTERS AND SPACES AFTER"3 "A COMMAND ARE IGNORED"= 9000b TT)"INPUT SYNTAX"PT)"PAGE 9 "h  " 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 IGNOR F - FIRST NEW LINE NUMBER"G " I - LINE NUMBER INCREMENT"h " S - START OF RANGE" " E - END OF RANGE" :"COMMAND LETTERS" " M - MERGE" " H - HOLD" " C - CONVERT" :" EXTRA LET VERSA."90007` TT)"INPUT SYNTAX"PT)"PAGE 8 "=j jt " THE FIRST CHARACTER OF ANY INPUT"~~ "MUST BE '&'." :" RENUMBER / MERGE ONLY RECOGNIZES" "THE FOLLOWING SINGLE CHARACTER COMMANDS" :"PARAMETER LETTERS" " EAR, HOLD VERSION SECOND"B:" * MERGING WITH NO PROGRAM IN"l" MEMORY RESTORES THE HOLD FILE":" CONVERT":"& CONVERT":" WILL CONVERT AN RAM APPLESOFT""PROGRAM TO RUN WITH A ROM CARD AND""VICE4TT)"MERGE"PT)"PAGE 7 "!>NH" MERGE WILL COMBINE THE HOLD FILE"{R"WITH THE PROGRAM CURRENTLY IN MEMORY."\:" * LINE NUMBERS ARE ARRANGED IN"f" ASCENDING ORDER"p:" * DUPLICATE LINE NUMBERS WILL BOTH"z" APP1D:" FIRST, LOAD THE FIRST PROGRAM AND"=N"TYPE"MX:"& HOLD"zb:" NEXT, LOAD THE SECOND PROGRAM."l"YOU MAY RUN OR RENUMBER THIS PROGRAM"v"AS NEEDED.":" THEN, TO MERGE THE TWO TYPE":"& MERGE"9000 RETURN"-r"87 PRINT A * A 39 PRINT A"Q|"99 RETURN 45 RETURN"[9000yTT)"MERGE"PT)"PAGE 6 "" THIS PROGRAM CAN ALSO MERGE"&"THE BASIC PROGRAM IN THE HOLD FILE TO"0"TO THE BASIC PROGRAM IN MEMORY.":,:"OLD NEW"C6:"1 INPUT X 1 INPUT X"m@"2 IF X<1 THEN 1 2 IF X<1 THEN 1"J"3 ON X GOSUB 39,87 3 ON X GOSUB 39,30"T"27 END 27 END"^"39 PRINT A 30 PRINT A * A"h"45 RETURN 35R"PT)"PAGE 5 "@" TO RENUMBER PART OF A PROGRAM,"f"YOU MUST SPECIFY WHICH PART BY":" START SETS THE FIRST LINE AND"" END SETS THE LAST LINE TO BE"" RENUMBERED"":"& FIRST 30, START 87, END 99"A DOS 'FP' **"( '(121)(122)256316yi<>zi=i? ?><>=?>BPݱ>BL@( /@i ipm@8e@@AiAPҥ_^8LKLK / ROM PROGRAM TO"4 " CURRENT TYPE OF BASIC"< 23^ "DO YOU NEED INSTRUCTIONS?";f A$u (A$)3Ā A$"Y"10000 :20 "RUN RENUMBER INSTRUCTIONS"  ':"RENUMBER INSTALLED ABOVE HIMEM"::"** RE RUN RENUMBER AFTER PLE COMPUTER INC";40);"&";' dSS$;S$- nP x"RENUMBER (DEFAULT VALUES)" :"& [FIRST 10] [,INC 10] [,S 0] [,E 63999]" "MERGE" :"&H PUT PROGRAM ON HOLD" "&M MERGE TO PROGRAM ON HOLD" :"CONVERT" :"&C CONVERT RAM+  RENUMBER&:::2556#TT15:PT34h(S$"&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&"2SS$"& &"<S$;SS$;F"&";11);"APPLESOFT RENUMBER";40);"&";PSS$; Z"&";4);"COPYRIGHT 1978 AP    !!! ! ! ! ! !!RESTART";-<#A$ -A#(A$)3Ā3-F#(A$)2790609-P#?-Z#G-d#10M-'p-'20:"":20:"RUN RENUMBER":ORY. NEITHER BASIC NOR RENUMBER"R,."CAN USE THIS MEMORY FOR THEIR OPERATION.";,8"THEREFORE FOR MAXIMUM USEABLE MEMORY,",B"USE THE HOLD FILE ONLY WHILE MERGING",L"PROGRAMS.",9000, 10,'#,(#24 -2#"PRESS SPACE FOR MORE, ESC TO T 'INCREMENT = 0' ERROR,"=+"RENUMBER IS PROBABLY INTACT."l+:" THE INTENDED USE FOR MERGE IS TO"+"BE ABLE TO INSERT SUBROUTINES INTO A"+"PROGRAM FROM A SUBROUTINE LIBRARY."+:" THE 'HOLD' FILE IS A SEPARATE PART"!,$"OF MEM'RESET'!!!"=*::" DISK USERS, DO NOT USE 'MAXFILES'"i*"AFTER RENUMBER IS IN, DOS WILL WRITE"* "OVER RENUMBER."*9000*TT)"NOTES"PT)"PAGE 16"**" TO SEE IF RENUMBER IS OK, TYPE"*:"& INC 0"+:" IF YOU GEOGRAMS, BUT ON EXECUTION "G)"RENUMBER WILL RETURN TO BASIC COMMAND"Y)"MODE, ']'.")::" RENUMBER IS ABOUT 2K BYTES LONG")::" RENUMBER MAY TAKE UP TO ONE")"MINUTE TO RENUMBER OR MERGE A 16K BASIC" *"PROGRAM. DO NOT HIT HEN"1(:" 'THEN' AS IN '7 IF X=0 THEN 250'"7(=(j(:" RENUMBER WILL NOT RENUMBER ANY"("REFERENCE THAT IS A PART OF A REMARK."(9000(TT)"NOTES"PT)"PAGE 15"((" RENUMBER COMMANDS MAY BE PUT IN")"BASIC PRROGRAM."'90000'hTT)"NOTES"PT)"PAGE 14"6'r]'|" RENUMBER FIXES LINE NUMBER"'"REFERENCES IN THESE STATEMENTS;"'A10:B20':A)"GOTO"B)"ON...GOTO"':A)"GOSUB"B)"ON...GOSUB"':A)"DEL"B)"LIST"(:A)"RUN"B)"TY' CANCELS":&" RENUMBER AND RETURNS TO BASIC"h&:"PROGRAM ON HOLD, USE '&M' TO RECOVER"&:" THIS IS DISPLAYED WHENEVER A"&" PROGRAM IS PUT INTO THE HOLD FILE."&" TYPING '& MERGE WILL RECOVER"'" THE P, MAY DESTROY PROGRAM"-%Z"CONTINUE (Y/N)?"[%d:" THIS OCCURS WITH SMALL SYSTEMS"%n" OR LARGE PROGRAMS. THE RENUMBER"%x" MAY OR MAY NOT SUCCEED."%:" * PROGRAM DESTROYED IF IT FAILS" &:" * ANY REPLY BUT 'RS."3$~:" TO FIX USE FEWER STATEMENTS PER"F$" LINE."f$:"ERR HOLD FILE IN USE"$" ONLY ONE PROGRAM MAY BE IN THE"$" HOLD FILE AT A TIME."$9000$<TT)"OTHER MESSAGES"PT)"PAGE 13"$F%P"LIMITED MEMORY NUMBERS IF RENUMBER CONTINUED.";#L:" TO FIX USE"`#V" * SMALLER INCREMENT OR"#`" * DIFFERENT FIRST LINE NUMBER"#j:"ERR LINE TOO LONG"#o" RENUMBERING WOULD CAUSE A LINE TO"$t" BE LONGER THAN 239 CHARACTEISKETTE AND PRESS [RETURN] TO REBOOT DOS  UNABLE TO READ IMAGE.  IMAGE OF DOS 3.2 (MASTER) IS NOT AVAILABLE. CHECK INSTRUCTIONS.  UNABLE TO WRITE. DISKETTE MUST BE INITIALIZED PROPERLY. CHECK DISKETTE FOR PROPER INSERTION.  DISKETHAS BEEN UPDATED, YOU MAYREMOVE IT AT THIS TIME. IF YOU WISH TO "UPDATE" ANOTHER DISK- ETTE, PRESS [RETURN]. OTHERWISE PRESS [ESC] TO EXIT "UPDATE" IF YOU WISH TO RETRY PRESS [RETURN] OTHERWISE PRESS [ESC] TO EXIT "UPDATE" INSERT A SYSTEM D PLACE IT IN THE DISK DIRECTORY THIS IS THE FILE NAME THAT WILL BE PLACED WITHIN THE IMAGE: PLACE THE DISKETTE TO BE "UPDATED" IN THE DISK DRIVE. PRESS [RETURN] WHEN READY NOTE: IF YOU WANT A DIFFERENT FILE NAME,PRESS [ESC]. THE DISKETTE DOS 3.2 MASTER - UPDATE UTILITY COPYRIGHT 1979 BY APPLE COMPUTER INC ALL RIGHTS RESERVED. (NOW LOADING DOS IMAGE) PLEASE INPUT THE "GREETING" PROGRAM'S FILE NAME: REMEMBER THAT "UPDATE" DOES NOT CREATE THE "GREETING" PROGRAM, OR`H Xh%` .L68793` ɍɛ`,ɠ.ɍ ɬ 8`.` a f efjj7`H M[ȱN\Lahm` ` % B   #    ef ! LM In4If+ L    j H .u+      9 J  n      9   Lk    9 bJJJJ l    9 LN H h0!!!!!!""AX> 63999LINE TOO LONGINCREMENT = 0 NO PROGRAM IN MEMORYNO LINES IN RANGEINCREMENT TOO LARGEDUPLICATE LINE NUMBERSOUT OF MEMORYPROGRAM ON HOLD, USE "&M" TO RECOVERHOLD FILE IN USELIMITED MEMORY, MAY DESTROY PROGRAM CONTINUE (Y/N)?SYNT1 && &!ee)ei `hhLȪ`樥sthhRL`EȱEi樠 ȱȱ`ijEȱEi椠`H h`ESIFtstsưƯsgůh尐giihijg` L 8stijRLghL8BC>?s