' +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@ [_ /QSIR4b_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@  8`&&꽌ɪɗ &f'*&%&,E'ЧО꽌ɪД`DEF` L`LDvEF`FILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- c Ϡ@跻~!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 zzgg`14:3:"think I'd like to live in a city.";:CITYĺ(8);",":15:3:"too.";Q& ]& J & 15:3:"Did E.T. seem real to you?";:3900:LA35:500& REAL0:QQ$"Y"REAL1:3520& KW$"YES":3300:F0REAL1:3520 ' KW$"SOMETIMES":3300:F0REA";:13(2CAL)(3NY):3:"The country?";:3900:500[% SUB0:KW$"SUBURB":3300:F0SUB1% CITY0:KW$"CITY":3300:F0CITY1% 2800:12:3:"I live in the suburbs.";:SUBĺ(8);", too.";K& " I like";:13:3:"it here in Irvine, but someday I":40($k KW$"CALIF":3300:F0CAL1:34458$m 2800:3450$p 2800:12:3:"That's where I was born--in New York";:13:3:"City.":15:3450$u 2800:12:3:"I'm a Californian, myself.";:144%z 12(2CAL)(3NY):3:"Do you live in a city? The suburbs?%2#U (QQ$)20NG%46#V (QQ$)2(QQ$)21NG%3G#W NG%1İ2800d#X NG%3424,4000,4100,4200n#Y 3424#` 122(NG%1):3:"What state do you live in?";:3900:500#a NY0:CAL0:KW$"NY":3300:F0NY1:3440$f KW$"NEW YORK":3300:F0NY1:34:X(QQ$)" "G !"H N 1"M 400:TMı"R 2800:A$(1)"Tell me a little about yourself.":A$(2)"How many brothers and sisters do you":A$(3)"have?":X13:11X:3:A$(X);:"S 3900:LA35:500#T NG%1:(QQ$BL$,3)"TWO"QQ$"2"(QQ$)2NG'd really like to program games.":A$(4)"And there's so many other things you":A$(5)"can do with a computer when you know":A$(6)"how."! 2800:X16:11X:3:A$(X);::! ! KEYWORD SEARCH " F00:X1(QQ$):(QQ$BL$,X,(KW$))KW$F01E":3300:F0PG15 KW$"YEAH":3300:F0PG1:3270\ KW$"YOU BET":3300:F0PG1:3270j PG3275 A$(1)"So am I. I just wish I had more time":A$(2)"to learn.":3280 A$(1)"I am. I just wish I had more time to":A$(2)"learn."! A$(3)"Iof E.T.":A$(4)"Now, I play a lot of adventure":A$(5)"games." A$(6)"Are you interested in programming?":2800:X16:11X:3:A$(X);::3900:500:PG0:QQ$""3262 QQ$"Y"QQ$"YES"PG1:3270 KW$"YES":3300:F0PG1:3270 KW$"A LITTLing and games, but I":A$(2)"just wish I had more time to learn.":3280 2800:13:3:"Arcade games or adventure games?";:3900:500> A$(1)"Donkey Kong is one of my favorite":A$(2)"arcade games. I played it all the":A$(3)"time during the filming ":3300:F0PR1p 2800:GAMPRA$(1)"I like both, too. I just wish I had":A$(2)"more time to learn.":3280 PRGAMA$(1)"That's great. I do a little, too. I":A$(2)"just wish I had more time to learn.":3280G PRGAMA$(1)"I like programm:8:3:"two words of a question: ";:28::" ";::(8);:LA9D P M  16:3:"What do you do with computers?";:3900 LA35:500:QQ$""3210 GAM0:KW$"GAME":3300:F0GAM1:3230 KW$"PLAY":3300:F0GAM1 PR0:KW$"PROGRAM00:3090" PL$"N2"İ3400:3090; PL$"J"İ3500:3090T PL$"C"İ3600:3090} PL$"J1"PL$"J2"NPL$PL$:CODE1: PL$"C1"PL$"C2"PL$"C4"PL$"C5"CODE1: CODE3  INPUT QUES >& "Press SPACE BAR and type the first";DUN1:2790 2750 ! < CLEAR ANS WINDOW Y X16:11X:3:36);:d 12:3jS |T WINDOWS g | X1N2:11X:4:35);: M2(Q2$(I,0)):X1M2:11X:4:Q2$(I,X);:  SPECIAL CASES  PL$"M"İ32"or type "BO$"Q"UN$" to quit: ";:16368,08 16368,0P (16384)1282730r X$((16384)128):16368,0 X$(8)ĺ" ";X$;:DUN0:2720 X$"Q"ĺX$;:2750 X$" "2790 2720 16368,0 (16384)1282755  (16384)141X:11X:3:A$(X);:-7 CODE1İ3900:310:I8 PL$"O"İ3700:CODE3:W< CODE3ıeF CODE4ıK CODE2ĺ"CODE="CODE:P 400U TMCODE1Z TMCODE3  DONE?  3900* "Press SPACE BAR for another question";:22:11:en I interviewed for my part in":A$(3)"'E.T.' But he really put me at ease.":A$(4)"" PL$"F"DUN(2)A$(2)"actual filming. Steven wanted my":A$(3)"reaction on film.":A$(4)""# PL$"B"(DUN(2))DUN(2)1' ( SHOW ANS 2 2800:X1M DIMS !6'N18: NO. 1ST PARTS:6'N26: NO. 2ND PARTSF6'A$(20)S6(Q1$(N1)c6 (Q2$(N1,N2)y6(I1N1:Q0$(I):6( WHAT WAS,WAS IT,DID YOU,WHAT IS,WHAT DO,WHAT ARE,DO YOU,HOW DID6(I1N1:Q1$(I):7( What was,Was it,Did you,What is,Whatore?","Do you want to talk about it again?"x5'A(27):XS$"ACERACJACKGLHOPQIOHLMNOPQMD":X127:A(X)((XS$,X,1))64:5'RD(X)((1)3)15'ZZ$"...WHAT WAS....DO YOU....HOW DID....WHAT IS....DID YOU....WAS IT....WHAT ARE...WHAT DO."5'6' (1)(94)#4'CAR$(91):COM$(95)@4'DI(17):X117:DI(X):}4' 1,9,21,39,59,67,74,80,93,101,119,131,139,152,0,166,1754'X14:AN$(X):+5' "Hmmm...haven't we discussed this?","I think we already discussed this.","Didn't we talk about this befs I mentioned before,"z3'RE$(18):BO$(25):UN$(26):HO$(12):EL$(14):EP$(15):LG$(17):GU$(3)"1":OU$(3)"3"3'CUR$(127):BE$(7):BA$(8):BL$" "3'KB163843'LA35: LEN ANSWER LINE 4'KD$(0)" ":KD$AD"F$",R"R:A$(Z):RR1::D$:02l OPEN F Q2v D$"OPEN"F$;",D"D",L"L:D$:c2 CLOSE F z2 D$"CLOSE"F$:D$:2' INIT 2'10100:10200:10300:10900:3072:2t' CONSTS 3~'D$(4):F$"ASK ME FILE":L37:HW$"How about you?":AS$"A:"family.":34241g11h N-->20 SIBLINGS 1r3900:3800:2800:"Come on, you're teasing me. How":3:"many do you really have?":3900:500:3900:28001|(QQ$)20ĺ"Okay, if you say so.":3424134121 READ F 2RSR:Z1MX:D$"REQQ$"Y"QQ$"YES"QQ$"YEAH"QQ$"I DO"4080K0KW$"YES":3300:F04080i0KW$"YEAH":3300:F04080s0342402800:"Great, that's just like me!":342400 N-->2 SIBLINGS 1T3900:2800:12:3:"It must be great having a big":13:3/< CLEAR BOX3 :/FVX2122:VX:3:36);::21:3@/mW/n CLEAR TICKER b/s33,40z/x3:1:40);:33,38// MORE N--2 SIBLINGS /3900:2800:12:3:"Do you have one brother and one";:13:3:"sister?";:3900:500:3900.0$"BIK":3300:F03790,.KW$"BICYC":3300n.2800:12:3:F0ĺ"I see we have something in common!";:3795."It's good to have something you like";:13:3:"to do.".3900:3:40:.. CLEAR BOX1 .X78:X:3:36);::7:3/;. I also like":A$(3)"biking. "HW$:3780m-A$(2)"biking and computers. I also like":A$(3)"dancing. "HW$-X16:11X:3:A$(X);::3900:LA35:500-KW$"COMPUT":3300:F03790-KW$"DANC":3300:F03790-KW$"MUSIC":3300:F03790.KWlso like biking and":A$(3)"computers. "HW$:3780,MBGA$(2)"computers. I also like biking and":A$(3)"dancing. "HW$:3780,GBMA$(2)"dancing and biking. I also like":A$(3)"computers. "HW$:3780)-GMBA$(2)"dancing and computersing. "HW$:3780m+BGMA$(1)AS$" I really":A$(2)"like biking, computers and dancing.":A$(3)HW$:3780+A$(1)AS$" I really like"+BGMA$(2)"biking. I also like computers and":A$(3)"dancing. "HW$:37802,GBMA$(2)"dancing. I ake better?";:3900:500(*APL$"C1"::@*BMOVIEPL$"C4"::O*LPL$"C5":U*sa*t O *~2800:B0:G0:M0:DUN(2)B1*DUN(7)G1*DUN(13)M1*X36:A$(X)"":+BGMA$(1)"I really like biking, computers and":A$(2)"danc1:3640,)2KW$"YES":3300:F0BOOK1:3640U)3KW$"YOU BET":3300:F0BOOK1:3640{)4KW$"YEAH":3300:F0BOOK1:3640)5KW$"I READ IT":3300:F0BOOK1)8BOOKMOVIEPL$"C2"::)=(BOOKMOV)3650*?2800:12:3:"Which ending did you liKW$"YES":3300:F0MOV1:36308(%QQ$"Y"MOV1:3630](&KW$"YEAH":3300:F0MOV1:3630('KW$"I SAW IT":3300:F0MOV1:3630((KW$"YOU BET":3300:F0MOV1:3630(.BOOK0:2800:12:3:"Have you read the book?";:3900:500)0QQ$"Y"BOOKL1:35203' KW$"A LITTLE":3300:F0REAL1:3520Y' KW$"YEAH":3300:F0REAL1:3520' KW$"YOU BET":3300:F0REAL1:3520' REALPL$"J1"::' PL$"J2":'' C '17:3:"Did you see the movie?";'3900:LA35:500($MOV0:$)2(CM$)3ER1:2075G X((CM$" ",2,2)):X1X40ER1:2075Z VVX:V0V0j 2950:3000tS 2075T ER ^ 21:1:868:1:BE$;:CM$""ĺ"EMPTY COMMAND":X14000::2920c "I DON'T KNOW "CM$:X14000:h 21:1:868r ER ANY KEY TO RESTART"EN395030EN39503A KEY."GEN39529L,1360,1360,0D+300D+4D. DRAW MACHINE FD.12005:12010uD.WQ831916383128:WQ,0::: CLEAR COL 0D.10800:D N:1:HO$:D0(12):(4)"PR#0":(4)"IN#0":(4)::D:11:4:"THERE IS A PROBLEM WITH YOUR DISK":ED9:"PRESSC+300(C+HO$:3:17:LG$OU$"TIPS"RE$C+6:4:"If Robert asks you a question, type"::4:"in your answer and press "BO$"RETURN"UN$"."::4:"Use up to 35 letters."C+::4:"To start the interview again, type"::3:"'NEW'."D+2:0,0278,02784:"from the word pairs moving across"WBz+:4:"the screen.) PRESS "BO$"RETURN"UN$"."B+::4:"Question endings will then appear."::4:"Use the SPACE BAR to choose an"::4:"ending. Press "BO$"RETURN"UN$"."B+5:5,0273,0273,1665,1665,0:3ts; brother, Craig,"::4:"15; and sister, Kathleen, 12."aA4+2:0,4278,4278,670,670,4:300gA[+vA\+ TIPS Af+HO$:3:17:LG$GU$"TIPS"RE$Ak+12005&Bp+6:4:"Type in the first two words of the"::4:"question you want to ask. (Choose"::Michael, the older"::4:"brother in 'E.T.' More recently"::4@+"Robert starred in a movie thriller"::4:"called 'I am the Cheese.'@ +1:1,4279,4279,1501,1501,4:300:A*+HO$:3:4:"Robert lives in Irvine, California,"::4:"with his paren"BLOADMACHINE.PAK,A36096":D$'?*8300-?*=?* INTRO ?+3:4:"Robert Macnaughton, 16, has been"::4:"acting since he was in the sixth"::4:"grade. Millions of moviegoers got":@@ +:4:"their first chance to see him when"::4:"he played ,29,4,1,C3>x( C3,33,3,3,X.>y( C4,36,3,3,XA>z( C5,179,3,3,XQ>{( O,0,0,0,0d>|( R,182,2,2,D2j>(}>0* SHOW PIC >:*38252,141:38251,0:38256,1:38260,141>D*HO$:38250>*>* PARAMS >*D1>*D$"BLOADRUNPACK,D1,A38250"?*D$X=j( N,152,3,1,N1(=k( N1,155,6,1,N2;=l( N2,161,2,4,XN=m( P,166,5,2,P1a=n( P1,171,4,3,Xs=o( Q,175,4,3,X=p( J,101,2,4,X=q( J1,103,5,2,J3=r( J2,108,3,2,J3=s( J3,111,5,1,J4=t( J4,116,3,3,X=u( C,21,4,4,X=v( C1,25,4,3,X >w( C2<\( F,67,4,1,F1#<]( F1,71,3,3,X4<^( G,74,6,3,XF<_( H,80,6,1,H1Y<`( H1,86,3,1,H2kCX$"S"4190?CX$"E"4170:"1:BO$;(" "(X(TI18)),3);UN$;" ";P$(X(TI18))@',22:1:958:22:"ENTER ";::"E";::" TO EDIT, ";::"I";::" TO INSERT OR ";::"D";::" TO"-"DELETE LINE, ";::"M";::" FOR MORE, ";::"S";::" TO DRAW: ";:16368,0 .RN0:CF0:CM$"COL"4380/CM$"L"4300ACM$"H"4350iCM$"RUN"RN1::4900:3300:4024}2000:ERR40244024:1040 CMDS ::1:BO$;"YOUR COMMANDS:";UN$::TI03:1:958:3:X118:X(TI18)NC4135 FOR":"LIST OF COMMANDS YOU ENTERED, ";::"M";::" FOR MEN";2039,213:I0%1:21:11:4400:CM$CC$:PC%CM$"M"CF0:::11:8:"TO SAVE YOUR POSTER, CHOOSE"::6:"'SAVE A POSTER ON A DATA DISK'":16050:::PC%0:4090CM$"M"CF0:::4090+21:1:868:1:"COMMANDS: ";::" ":22:"BC"((BC)CB$,4)"BN"((BN)CB$,4)"BS"((BS)CB$,4)"BW"((BW)CB$,4)"SC"((SC)CB$,4)"V"((V1)CB$,4)"H"((H1)CB$,4)?23:1:"ENTER ";::"H";::" FOR COMMANDS YOU CAN USE, ";::"L";::":21:" 0 2 4 6 8 10 12 14":" 1 3 5 7 9 11 13 15"p 23:8:"PRESS ";::"RETURN";::" TO CONTINUE";:16368,0:" ";CX$:21:1:958  DRAW CY1:CFNC04900:: IF CF THEN CM$="RUN":GOTO 4030)  2075 SOUND 3 BN1āZ1SP(BS)::R PI,PI(BN):DU,SP(BS):MUSX d RUN p NC0ı ER0:TU1NC:CM$P$(TU):21:1:868:1:"COMMANDS: ";CM$:2015::H CHRT PR :21:1:958:X015:IX23:X:0,39I:0,39I1:Z40ER1:2075F LC:OH,OV0I C$"V"3175BN SI$"-"3165XS HOHZ:H39H39aT OHHkX 3195] HOHZ:H0H0^ OHHb 3195g SI$"-"3190l VOVZ:V39V39m OVVq 3195v VOVZ:V0V0w OVV{ 2950| LCH,VM$)4ER1:2075=& SI$(CM$CB$,2,1):SI$"+"SI$"-"3135j+ Z((CM$" ",2,2)):Z1Z40ER1:2075{0 C$"V"31305 HZ1:LC:OH,OV:OHH:LCH,V):2950:2075: VZ1:LC:OH,OV:OVV:LCH,V):2950:2075? +/-D Z((CM$" ",3,2)):Z1 XOVV:H1,H2X:3200::OVV( 3085: C$"L"3070Z V1V:V2VBW1:V239V239 XOHH1:V1,V2X:3200::OHH 3085 U H1H:H2HBW1:H239H239 XOVV1:H1,H2X:3200::OVV   CUR ! (CM$)2(C0  STORE % REPRNıG RNNCNC1:P$(NC)CM$:PC%1M Z PLOT d LCBCl BC~ C$"R"3030 V1V:V2VBW1:V239V239 XOHH:V1,V2X:3200::OHH 3085 C$"D"3050 H1H:H2HBW1:H239H239$DK$PN$" (SIDE 2)":DR%D:DE$PN$:VN$"MICROZINE PREMIER ISSUE SIDE 2":61000Z1$62000i1$DER%EK2o1$|1' INIT 1':1'10100:10200:10700:10800:10400:10900:1t' CNSTS 1y'PN$"MICROZINE":PM%18:MS$"PP."1~'X17:ME$(X):2$"OPEN"FI$",D"D:D$"WRITE"FI$:D$,0R!4351220!?0# READ ^0#RR1:D$"READ"F$",R"R:X$d0#k0T$ v0^$434900c$DK$"DATA DISK":QX%3:DR%D:VN$"MICROZINE DATA DISK":DE$DK$:610000e$620000f$435120h$DER%EK10$0$0$D2ıN1NC:NC08260"/0 R1NC:P$(R):*/D D$5/N 43512;/k H/l OPEN S/v 43490/ D$"OPEN"FI$;",D"D:D$"READ"FI$:NP:D$/ 43512/ / CLOSE / Z58410/ 43490/ D$:D$"CLOSE"FI$:D$/ 43512/3!/4! INIT />!43490!0H!D02.FI$"PP."PO$(CX):D$"DELETE"FI$",D"D:43512^.NA$PO$(CX):LRLR1:PO$(CX)PO$(LR1):k. READ w.NP0ı.Z58130.43490.NC0:D$"READ"FI$:R1NP:NCNC1:P$(NC):.43512. . RITE . 43490. D$"WRITE"FI$ / 7200:WIPEİ7300-:1040+-  CHOOSE <-*WIPE0:6200K-HCX07290-M22:1:958:22:"DO YOU WANT TO "BE$"ERASE ";PO$(CX);:"? ";CX$:(CX$,1)"Y"WIPE1-z-- DEL -::12:X$"ERASING "PO$(CX):(40(X$))2::X$:.4349EAD <,:12:X$"LOADING "PO$(CX):((40(X$))2)::X$:k,FI$"PP."PO$(CX):8300:8100:8400:CF1:w,X DEL ,bTI$"ERASE A POSTER FROM A DATA DISK":6100:LR0Ģ12:2::"THERE ARE NO POSTERS ON THE DATA DISK"::X14000::7099-v34,21: MENU:";:16368,07+oESC0:24:39:X$:X$(13)6270T+qX$"M"ESC1:CU0:6270f+tX$" "6255~+vCUCU1:CULRCU1+y1(LC2)18(LC9):120(LC9):CU$;::1(CU2)18(CU9):120(CU9):CU$;::LCCU:6255+~:CXCU:LC0+, RTI$))2:TI$*7!*8 CHOOSE 1*=6210:6250i*B3:X1LR:1(X2)18(X9):320(X9):PO$(X);:*L3:1::CUR$;::CU1:LC1*i+j22:4:"PRESS SPACE BAR TO CHOOSE A POSTER"::"PRESS ";::"RETURN";::" WHEN READY OR ";::"M";::" FOR HAS ALREADY BEEN USED"::XX14000::59102)o?)p LOAD )zTI$"LOAD A POSTER FROM A DATA DISK":6100:LR0Ģ12:2::"THERE ARE NO POSTERS ON THE DATA DISK"::X14000::6099)6200:CXİ6300:4020)1040) READ CAT *:1:(40(:X$:@(LRLR1:FI$"PP."NA$:8500:8200:8400:PO$(LR)NA$:N(  NAME? (11:958:11:1:U$;:1:"";NA$:(NA$)10ĺ(7);:5910(4FO0:LR05950(6XX1LR:PO$(XX)NA$PO$(XX)""FO1(9,)>FOĢ23:1:958:23:4:BE$;::"THAT NAMEE THIS ONE.":16050::1000'5:"THE COMPUTER WILL SAVE THE COMMANDS"::"THAT YOU HAVE JUST ENTERED. WHAT DO"::"YOU WANT TO CALL THIS POSTER?"'NA$"":5900:NA$""ī5099'5100'1040' SAVE (:12:X$"SAVING "NA$:(40(X$))2:6100:3&FER0:FS9999%&434908&F,ZL,D,FS,FERC&43512S&FS415020g&FZ0:NC05018&X1NC:FZFZ1(P$(X))::FZ1(FZ256)&FS2FZ5020'10:2:BE$;"THE DATA DISK IS FULL. YOU MUST ERASE"::" A POSTER BEFORE YOU CAN SAVBS1:BW1:V0:H0:OH0:OV0:SD5:SC0:LC0:9% SAVE %LRPM%ė:BE$:9:3:"THERE ARE TOO MANY POSTERS ON THE"::3:"DATA DISK. YOU MUST ERASE A POSTER"::7:"BEFORE YOU CAN ADD ANOTHER.":16045::1000&:TI$"SAVE A POSTER ON A DATA DISK":(TI18)ĺ(7);:K$XYNCLB1:P$(XY1)P$(XY)::NCNC1:P$(LB)"":PC%1$21:958:22:8:"USE EDIT TO INSERT COMMAND":24:8:"PRESS ";::"RETURN";::" TO CONTINUE ";:16368,0$(16384)1284594$21:$$$ INIT ,%.BC15:BN0:LB(LB$):LB0ı?#LB1(TI18)LBNCLB18(TI18)ĺBE$;:T#LBNCNCNC1:#XYLB1NC:P$(XY1)P$(XY)::NCNC1:PC%1## INSERT $22:958:22:1:"INSERT BEFORE WHAT LINE NUMBER?";:" ";LB$:LB(LB$):LB1(TI18)LBNCLB18$;:44202"lCC$(CC$,(CC$)1):C$;" ";C$;:4420G"vI0%ĺBE$;:4420{"{(CC$)29(CC$)(P$(X(TI18)))ĺBE$;:4420"C$(P$(X(TI18)),(CC$)1,1):4445"I0%0"" DEL #22:958:22:1:"ENTER LINE NUMBER TO DELETE:";:" ";LB$:"Use SPACE BAR to make a choice."::5:"Press "BO$"RETURN"UN$" when you are ready."b,LC1:CU1y6(CU2)5:3:CUR$;16368,0@22:38:C$:(C$)32(C$)134160E(C$)134190JCUCU1:CUNB1CU1=T(LC2)512(LC6):320(LC"Y"āLI15:V$(LI)""::4030#C PAGE 4--DISPLAY BOXES U4900:NB0ıfNB1CH1:2:3:"Choose the box of cards that you want"::3:"to enter information on.""LI1NB:(LI2)512(LI6):520(LI6):NN$(LI):T'20:6: YOU CAN ADD MORE BOXES.":1500%: ENTER DATA Z4100:NB0ı: CHOOSE FILEk4200: OPENLRRMAXİ8400:HO$:11:10:"This card box is full!":1500:4099108004300: ENTER DATAFERFS3ı MORE?4500:CX$T":"ON THE DATA DISK, THEN LOAD IT AGAIN AND":"TYPE 'L' TO LIST THE COMMANDS."[>:10430x>:D1ĉ::9300:EK62000>:1040>> LIST >>::12:"POSTER COMMANDS":>>"CODE COMMAND";7)"RANGE";8)"SAMPLE"?>X118:4X:1:AB$(X);:8:C0: =[+=: SAMPLE 1=:D1İ9350:EK62000d=:RN1:12:9:BO$"GETTING THE SAMPLE POSTER"UN$=:FI$"PP."(1)"SAMPLE":D$"OPEN"FI$",D1":Z51:D$"READ"FI$:NP:8100:8400:Z50=:4900::3300P>:::9:"TO SEE HOW THIS POSTER WAS MADE, SAVE I:5:"PRESS SPACE BAR TO MAKE A CHOICE":23:8:"PRESS ";::"RETURN";::" WHEN READY ";:16368,0<+23:32:CX$:CX$" "CX$(13)11030<+CX$(13)11040<+CUCU1:CU8CU1<+LC24:4:" ";:CU24:4::CU$;::LCCU:11030= +CHCU:LCOR TRAPQ;*LR0:X0105:(NN$(X),2)"PP"LRLR1:PO$(LR)(NN$(X),(NN$(X))3)W;*h;*LR20LR20n;*|;* MENU ;*CFCH3:;+LC1:CU1:::2:1::14)"POSTER MENU"15):; +6:X17:6:ME$(X):::6:4::" ";::23:1:40)c<+21ER FILE"L:*D$"OPEN"F$",D1,L10":R1:9100:D(X$):R2:9100:SL(X$):ZLSLa:*D$"CLOSE"F$:D$u:* GET DATA DISK:*D$"BRUNCAT/FREE.OBJ,D1":::*9300:DER%EK1::*CER0:*43490:*C,SL,D,MS$,NN$,CER:*43512;*CERX: FORCE ERROR F3,254,144,2,230,255,198,251,208,221,96,9/*:90* SOUND u9:*B38375:PI38376:DU38377:MU38378:I123:X:BI,X:9D* 255,255,173,48,192,136,208,5,206,233,149,240,9,202,208,245,174,232,149,76,234,149,969*9* PARAMS :*F$"MZ."(1)"PARAMET8) MOVE MEM .8)I164:X:38310I,X:8) 169,12,133,255,169,4,133,253,208,8,169,12,133,253,169,4,133,255,169,0,133,254,133,252,169,8,133,251,160,119,177,252&9) 145,254,136,16,249,24,165,252,105,128,133,252,144,3,230,253,24,165,254,105,128,13(F$"PP."(1)"TITLE":D$"BLOAD"F$",A$C00,D1"X7(:38321:16368,0:CY1:21:1:9587(22:6:"MAKE A PICTURE BY PROGRAMMING!"7(24:8:"PRESS ";::"RETURN";::" TO CONTINUE ";:16368,07((16384)141104407(23:1:9587(23:8)26,V39,"REP3(U3/L7/D2)","RUN","NEW",COLV6((FMAX20:PO$(FM):PMAX270:P$(PM):SL%(25)s62(S%(20):X120:S%(X):63( 1024,1152,1280,1408,1536,1664,1792,1920,1064,1192,1320,1448,1576,1704,1832,1960,1104,1232,1360,14886;(6( TITLE 6(D$(4)/7TERS,PLACE BRUSH HERE,PLACE BRUSH HEREk5( REPEAT,"RUN POSTER",ERASE POSTER AND COMMANDS,SHOW COLOR CHART5 ( 0-15,0-15,1-10,1-10,0-105( 1-40 SPACES,1-40 SPACES,1-40 SPACES,1-40 SPACES'6( SC10,BC9,BS2,BW5,BN3,U23,D18,R5,L38,DRAW,ERASE,"PR JIM",HX)::X19:RG$(X)::X118:SM$(X):f4' SC,BC,BS,BW,BN,U,D,R,L,DRAW,ERASE,PR,H,V,REP,RUN,NEW,COL&5( SCREEN COLOR,BRUSH COLOR,BRUSH SPEED,BRUSH WIDTH,BRUSH NOISE,DRAWS UP,DRAWS DOWN,DRAWS RIGHT,DRAWS LEFT,DRAWS ONE SPACE,ERASES ONE SPACE,PRINTS LET5)(95):U$U$U$:CU$" ".3'X110:SP(X):W3' 10,30,50,70,90,110,130,150,170,190m3'X110:PIT(X):3' 192,153,129,96,76,64,47,37,31,233'49103'3' DIMS 3'NN$(105)3'AB$(18),CO$(18),SM$(18)'4'X118:AB$(X)::X118:CO$('"RUN THE SAMPLE POSTER",SEE LIST OF COMMANDS YOU CAN USE,MAKE YOUR OWN POSTER,SAVE A POSTER ON A DATA DISK,LOAD A POSTER FROM A DATA DISK,ERASE A POSTER FROM A DATA DISK,GO BACK TO TABLE OF CONTENTS3'BE$(7):CB$" ":D$(4):U$(95)(95)(95)(9HOOSE FILE )4200: OPEN FILEi)LR0ĺHO$:11:3:BE$"There are no cards in that card box!":1500:{)5200: SORT?)6100: SORT PARAMS)6200: SELECT)EN0ĺHO$:11:1:"There are no cards with that information":1500:*SRTİ6300:ation":"beside each section title":t(S:LI1NF:4(2LI):4:SEC$(LI);:SEC$(LI)""ĺ(DOTS$,11(SEC$(LI)));(T4400:(X4340(]LI1NF:LV$(LI)V$(LI)ANYCHG1:LINF(^(bANYCHANGİ8200((p ONE CARD )z5100:NB0ı: C;'XX$:XX$(13)ĺ:5660?'XX$(8)ĺXX$;" ";XX$;:5651O'BE$;:5654i'CX$"N"ĺHO$:8400:{'&RXRX1:5624'C'D EDIT DATA 'IANYCHG0:LI1NF:LV$(LI)V$(LI):'J5715%(N1:" ";(F$,(F$)3);" BOX"DS$"You can change inform((SF$(RX),3)):8100%&5700: EDITh& RXENĺHO$:11:5:"That's all the cards in the box.":1500:&20:1:EP$:20:" Do you want to see the next card? ";:16368,0&CX$:CX$""CX$(13)ĺ"Y":5670&CX$"Y"CX$"N"ĺBE$;:5651'CX$SF))COMMA)E%SF$(R)(LNAM$BL$,8)(FRNAM$BL$,5)(ZERO$(R),3)K%r%SF$(0)BL$:SF$(LR1)"^^^^^^^^^^^"%12000: SORT%% DISPLAY AND EDIT %LN22:10800%EN05645%RX1: SORT ARRAY SUBSCRIPT% GET A RECORD&R),LSRT)(ZERO$(R),3):5560=$COMMA0:V$(SFIELD)""5540~$X1(V$(SFIELD)):(V$(SF),X,1)COMMA$COMMAX:X(V$(SF))$$(COMMA)SF$(R)(V$(SFIELD)BL$,LSRT)(ZERO$(R),3):5560 %LNAM$(V$(SFIELD),COMMA1):FRNAM$(V$(SFIELD),(V$(#HO$:12:15:"Sorting ...."/#5515:5530J#LSR13: LEN SRT FIELDb# ALPHA OR NUMERIC?#R1:8100:AL1:(V$(SFIELD))0(V$(SFIELD)BL$,1)"/"(V$(SFIELD)BL$,1)":"AL0##R1LR:8100$(ALPHA)SF$(R)(ZERO$((V$(SFIELD))you are ready.""}LC1:CUR17"(CUR2)7:3:CUR$;E"16368,0o"21:38:C$:(C$)32(C$)135260"(C$)135290"CURCUR1:CURNF1CUR1"(LC2)7:3:" ";:(CU2)7:3:CUR$;:LCURCUR:5260"SFIELDCUR""| SORT o you want the cards sorted? ";:200?!dSRT1:CX$"N"SRT0:!n6:" Choose the section that should be used":" to sort the cards."!sLI1NF:(LI2)7:5:SEC$(LI):"x19:6:"Use SPACE BAR to make a choice."::5:"Press "BO$"RETURN"UN$" when RTİ5500:50701 R1LR:SF$(R)(BL$(R),3):; 5600A W  CHOOSE FILE i 4900:NB0ız NB1CH1: HO$:2:" Choose the box of cards that you want"::" to look at or change." 4130 O P PAGE 8 $!ZHO$:2:" Da card by selecting"::" the second choice on the menu.":1500J^ EDIT DATA ~5100:NB0ı: CHOOSE FILE4200: OPEN FILELR0ĺHO$:11:3:BE$"There are no cards in that card box!":1500:5200: SORT?ENLR SEV CONTENTS 6:4(2LI):15:(V$(LI)DA$,22);" ";<M PAGE 6 20:1:EP$:20:" Do you want to enter information on"::" another "(F$,(F$)3);" card? ";200$ MESSAGE D.HO$:NB0Ģ11:(7);"You must first plan X$"N":X$:XX$(13):43559X$;:OVER0:X$"Y"OVER1BXX$dXX$(8)Ė39:" ";:39:4345yXX$(13)435120:1:EP$:OVER4320 20:1:EP$:CQ2Ģ20:5:LR$GU$"FILING YOUR CARD"RE$ RLR1:LRR:8200/ 0 SHOW PR4(2LI):4::SEC$(LI);:SE$(LI)" "ĺ(DOT$,11(SE$(LI)));I4400O{LI1NF:1400:CC$"X"V$(LI)"":4338CC$""V$(LI)CC$4400:::33,40:20:1:EP$:20:"Do you want to change the information?";X$X$(13) WRONG WITH THE DATA DISK"::9:"CANNOT ADD MORE CARDS":1500:RFS3İ3900:iX1NF:V$(X)"":20:1:EP$:20:" ";NN$(CH);" BOX"DS$;"You can enter":" information beside each section title.":LN224320:4370?33,37:LI1NF:6):" ";:(CU2)512(CU6):320(CU6):CUR$;:LCCU:4160G^CHCUMgah OPEN FILE km8400rF$"SF."NN$(CH):8300 PAGE 5--ENTER DATA FER0:FS9999:43490F,SL,D,FS,FER:43512@FERĺHO$:11:2:"SOMETHING IS139'LW778: HT LC FLAG09'X13:I$(X):i9' Label a Box,Enter Subject Titles,Enter Informationo9'~9' DIMS 9'NN$(105):TZ$(12): TEMP FILE NAME ARRAY9'RMAX200:SF$(RM1),B%(RM2): SORT ARRAYS9;(90* SHOW CARD !::*38252,Go Back to Table of Contentsd8'X$(95):DA$X$X$X$X$X$X$X$X$:DA$DA$DA$DA$:DA$(DA$,22)}8'DOTS$"............"8'X15:SC$(X):8' NAME,STREET,CITY,STATE,PHONE8'COMMA$(92):KOLN$(124)9'BACK1288:EN128110:WYE12889:RET128" ":ZERO$"0000000000000"D7'DSH$(123)(125)Y7'X17:ME$(X):|7' Introduction to Secret Files7' Plan a Card,Enter Information on Card,Look at or Change Cards in a Box,Search for Particular Cards8' Erase a Box of Cards 6$620006$DER%EK2!6$06' INIT A6'21000:3075c6$'(4)"BLOADRUNPACK,D1,A38250"6)'(4)"BLOAD CARD.PAK,A36096"6.'10100:10200:109006s'6t' CONSTANTS 6~'D$(4):L115:PN$"Microzine":MS$"SF."-7'CUR$(127):BE$(7):BL$"F$",R"R5#X$5#.5T$ GET DATA DISK 95Y$43490z5^$DK$"data disk":QX%3:DR%D:VN$"MICROZINE DATA DISK":610005c$435125e$620005h$DER%EK15$5$ GET PROG DISK 5$D2ı6$DK$PN$:DR%D:QX%3:VN$"TABLE OF CONTENTS":61000D$ 4 435124 %4 CLOSE F 04 43490A4 :D$"CLOSE"P4 D$:43512V43!g44! INIT F r4>!434904@!D$"OPEN"F$",D"D",L"L4H!D$"WRITE"F$",R0"4R!"0"4\!X15:SEC$(X):4f!D$4p!435124!4# READ 4#RR15#D$"READ3 D$"WRITE"F$",R"R(3 X15:V$(X):>3& D$"WRITE"F$",R0"X30 LR:X15:SEC$(X):`3: D$k3D 43512q3k 3l OPEN F 3v 434903x D$"OPEN"F$;",D"D",L"L3 D$"READ"F$;",R0"3 LR3 NF0:X15:SEC$(X):SEC$(X)""NFNF13 4 10:BO$;X;UN$" ";I$(X):::V16:X$"EXPERIMENT WITH IT. IT'S FUN TO USE!":1300}266:0,24278,24278,1500,1500,24:15002?2 READ F 2434902D$"READ"F$",R"R2X15:V$(X):2D$2435122 2 WRITE F 2 43490ore information.":13001V11:X$"Information is kept on cards.":1300:V15:X$"Groups of similar cards":1300:V17:X$"are kept in boxes.":130011:1,10279,10279,1501,1501,10:15001HO$:V8:X$"To create a secret file:":1300P2:X13:NB)0HN$NN$(NB):NBNB1 060 CHOOSE FILE H04900:NB0ıY0NB1CH1:0HO$:2:" Choose the box of cards that you want"::" to erase."0413000 INTRO 1V5:X$"Use this program to organize":1300:V7:X$"and st"UN$BE$" the"::NN$(CH)" box of cards? ";:200H/ESC0:CX$"N"ESC1N/d/  DELETE FILE /*HO$:12:(40(NN$(CH))22)2:BO$"ERASING "NN$(CH)" BOX OF CARDS."UN$//43490/4D$:D$"DELETE""SF."NN$(CH)",D"D:D$/9435120>NN$(CH)NN$(BL$:SF$(EN1)"^^^^^^^^^^^":12000: SORT0.?. SORT `.HO$:12:100:"Sorting ..."f.|.X DELETE FILE .b7300:NB0ı.l7100:ESC7099.v7200.. FOR SURE? //20:1:EP$:20:"Are you sure you want to "BO$"ERASE$(SF),X,1)COMMA$COMMAX:X(V$(SF))+-rn-t(COMMA)SF$(EN)(V$(SFIELD)BL$,LSRT)(ZERO$(R),3):6290-yLNAM$(V$(SFIELD),COMMA1):FRNAM$(V$(SFIELD),(V$(SF))COMMA)-~SF$(EN)(LNAM$BL$,8)(FRNAM$BL$,5)(ZERO$(R),3)-R*.SF$(0)1NT:(V$(CR(X))CR$(CR(X)))(CR(X)0)TRUE0:XNT:,VJ,`TRUE6290z,jENEN1:SRTSF$(EN)(ZERO$(R),3):6290,o(ALPHA)SF$(R)(ZERO$((V$(SFIELD))),LSRT)(ZERO$(R),3):6290,pCOMMA0:V$(SFIELD)""6260%-qX1(V$(SFIELD)):(V0:+33,37:4330/+X1NF:CR$(X)V$(X):G+ SEARCH PARAMETERSu+NT0:X1NF:CR$(X)""NTNT1:CR(NT)X{++7+8 SELECT RECS +=HO$:12:9:"Please wait...searching."+BSRTİ5515+DEN0:R1LR+G8100+LTRUE14,QXв SORT*5600: DISPLAY *:* GET SORT PARAMS K*LN22:10800*:20:(F$,(F$)3);" BOX"DS$"Enter the information":"that you want to search for.":*LI1NF:V$(LI)"":+LI1NF:4(2LI):4:SEC$(LI);(DOT$,11(SE$(LI)));:440ܠɧ宍ɠ栧ŮԮܠɠܠɠ孍ܠɠɧ宠ɠܠܠŮԮܠ宠ɍ쮍ŮԮܠɠܠɠ쮍ܠ孍䮠ɠܠŮԮܠܠܠܠŮԮ堶ŮԮ塍ɠ쮍(15) OkR!OH VERIFY DISK 2ORDER%0:QZ%0=Op61200COTO VERIFY `O參61300O$DER%0ĺD$"VERIFY"VN$",D"DR%O.216,0OsOt VERIFY ERR O~QZ%QZ%1:QZ%QX%DER%1OO0(12):(4)"PR#0":(4)"IN#0":(4)::*P:110BsBt VERIFY ERR 9B~QZ%QZ%1:QZ%QX%DER%1dB9:11:BE$;BO$"Cannot read "DK$"!"UN$oB61100uBB0(12):(4)"PR#0":(4)"IN#0":(4)::B:11:4:"THERE IS A PROBLEM WITH YOUR DISK":BD9:"PRESS ANY KEY TO RESTART"CN395 Af61100Ap61200A3A ASK FOR DISK A11:9:"Put "DK$" in "DM$:::9:"Press "BO$"RETURN"UN$" when ready: ";:16368,0ACX$:CX$(13)61120A:HO$AA VERIFY A參61300A$DER%0ĺD$"VERIFY"VN$",D"DR%B.216,4N:@HNEK20099@RN9350#@N9@R HIGHER TEXT o@RRE$(18):WI$(23):BO$(25):UN$(26):LR$(17)@&RCL$(3):GU$CL$"1"@0RHO$(12):EL$(14):EP$(15)@kR@H VERIFY DISK @RDER%0:QZ%0A\DM$"the drive.":D2DM$"Drive 2."II1? /JM112048>? /T$SF$(I):SF$(I)SF$(M1):SF$(M1)T$Z?/LLLL1:B%(LL)I:12006k?/JM212060?/SF$(M)SF$(M1)12060?/T$SF$(M):SF$(M)SF$(M1):SF$(M1)T$?/MB%(LL)1:LLLL1?/LL012006?C/? N FINAL ?*NHO$:8400@QUICKER SORT &>.LL1:B%(1)EN1:M19>.JB%(LL):IM1J>.JM312051\>.M1((IJ)2)f>.II1u>.IJ12039>.SF$(I)SF$(M1)12015>.JJ1>.IJ12039>.SF$(J)SF$(M1)12024>/T$SF$(I):SF$(I)SF$(J):SF$(J)T$>/12015?/IM18:"Press "BO$"RETURN"UN$" when ready: ";:16368,0f=*+16368,0:24:33:X$:X$" "X$(13)11050z=++X$(13)11090=,+CUCU1:CU8CU1=/+(LC2)4:4:" ";:(CUR2)4:4:CU$;:LCCU:11050=4+X$;=R+1:HO$:CHCUR:CQCH:8400=[+>. X1NB:NN$(X)TZ$(X)::NN$(0)""&<*5<* MENU c<+HO$:2:4:WI$;GU$"SECRET FILES MENU"RE$r<+LC1:CUR1< +6:X17:6:ME$(X)::<+6:4:CU$;<+2:0,24278,24279,1590,1590,24<+22:4:"Press SPACE BAR to make a choice."3= +24:DER%EK1:$;* READ DATA DISK CAT5;*CER0:43490M;*C,SL,D,MS$,NN$,CERX;*43512q;*CERX: FORCE ERROR;*NB0:X0105:(NN$(X),2)"SF"NBNB1:NB13TZ$(NB)(NN$(X),(NN$(X))3);*NB12X105;*;*NB12NB12;*NB010999 <*,141:38251,0:38256,1:38260,1411:D*HO$:382507:*H:* PARAMS k:*F$"MZ."(1)"PARAMETER FILE":*D$"OPEN"F$",L10,D1":R1:9100:D(X$):R2:9100:SL(X$):*D$"CLOSE"F$:D$:*D$"BRUNCAT/FREE.OBJ,D1":* GET DATA DISK ;*HO$:9300:楡Lȑ` $Lv$ ȑ`  '` ȩ  ȭ  H`ɠ```i`8 `砃𪹺Ġɺρɵ҉гఠŠ栃𠹺Ġ ȱe   Y B o  i i0 z z )  i!iξ  Ls L L `ٝ `` L k R䨱)qqȥr `  楡  L` FCLL  B e 8   $Lv$ ȑL 'L L { Lԍ ^  ީ@ ߩ$0LvݠLiie   *> \\>"c<""2,&""<< <""2,">$<""< &"""  $ & ****&""""""""<""< & """2,"""""**""""2, >>~?"**":*:<"">""""""""""">>>"2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">"""""""""""""**""""""> >>@`0 @0>>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< >> "U**ULKxHHD+(DA/(Dq'  I)(H  p闠 y) 񗰐 z$ r0θ4KHH0t# p y0p 9G @0ɩL[hHHϸȸI^hHHoTDD*]*yh@?A1a U~1r32f32~ _j?U?Ĉ⁞Ş}~0$F<~?q3aԭfLy?fLիW*u ߆؃ňŋ_zOOy緺̀@/Uʃ࿟_k է՛؀ЍмWԀЂÞ(y/ućWU_*?U* ?u+u2>2f32?~ԯЀňzPj唝;U/u;~Uz ǁNJԠ3fLy?~A܊ϏժʁU*U* ГЪTO ݦ󵣧Ã(*u۾ϽWz Ċ u)3֧ă/U*u?_.D*} c?q3aꀊ'+eſՌՃݎIѼ烐࡮͎/u ' ow*}jU z Տ8U*U*U*}ߢ߰ǵW~ ╪ТՆU*U*u_j_U o_*}띨\jzA3f |U*U~#*{@*{ ?o}{u ՌjOg<>xsaC~|ǂ񺝉ԯU/{]z բ3fLy?fO̊׮ȜP*U*}{Ċ_~ ȢгƢծՀTjԊzkh(+G*/W~sg{}?u/@*a?13aǢЂÇ'kĕXr{پݬȇ@*U ' תբ|j ĂՖŸ*U*~ϊҷǴU ߺŪիـͿТՃUjO3ypՁ\:U*}?U]} `o/Up~߱T~3fLs|ڇطü׼P?u ' /{  ׂ++Og<~ssO3f?|Կ_*U.ƮηU?* ۟3NypaAߺ׮P*}/u{ϙĚ] –ͩʲ۠ԅɅĠؠҠàϠ̷۠ԅ҅Ӱ…Ðؠ֠Ϡ͊ࠠƠӪZ  wii`[0 L` lW+U* с0p` |@``p f`0`@̟UjpAa``g1`C8``pOagժժ` ӢFժժρՆ`~<@@aOs`g 0@ACΓΙ΄  j îõj û1*۟΃̂ۙΆ ~  jj j 1*  *߿j Άΰj 9jΟΣΜ΂յ   7* ΂   7v7~7~~??ߝj ΋˕jû8j΀΂  j j΀ ΂ ۟  ׿j j jΜΜjj jΟ΀ ΂Μގ  W_WWW~j ś  Ղ@ j j ΃j ΃* ΃ۙΛ  ___܇炇ݿ ݚ  π ǟU p ǟ    Ã~r~zU ݝ ݝۼ͜ ݁݅ٝU݃sݝ ݝݝݪ݅͘ݝ݄݃ ݀  U    Ǹ    ݨ@~  ݁jzjjjCrz: ݝ݁ ݅ݝ݆݃ ݏ ݀݁؟݁݃݅͘؅U ݟ݀݁  j~jj Ǹ p`` 0:ȡHe@ hhл`Ie@҈@`G8x@GAOs` @pA LJ|`C` 3<*C2Q>e~slp*U*}#UρlW.U*تʁW`@@+U*5իp`0``A1x`@`0`0`0 CaA ժժժŁp`0``@1x`@g`0`0`p ~a@ ժժժ``@yU*.l@*U*_Ám\.U*W@@+U*=Ձ0@x`@a?`@~@@``x~@a@  ``yx?``l+U*UÁR\.U*lW+U* ǟՁ0px`@`~@a@ ``p @@@``@`pppp``xx||||xx``|~~~???~~~|`???@  ( $@h`+'bH"(@ "h `o ސdmiei mponȌojikn j*.k.j.iLE8jl.k8nklk8nj.i8nihJqLr oLHmi) of -llL-kkhɀ M lLɀ M ko hihL` *LHmh*l wLekL/e 8ei8fgjk80L;ig iȩLLjiLё` qȹragbfch h mp mimiHiih8h mimhihih mimiiih8 o8jp*0jLȌfj0LjjjjL.Ȉ*L6g*lJ*m,lPnik wnLki(Lkmdei pjfjHnhjl wLfkeikmLk8Lkmdei p**ʐLgJJmddeeeh) mee`fg 8 Ȱiij` ސdmiei pjjjLfj``pMl)pk) ol 9f p`` qȹragbfch hh Fhi h F`gfhJqLr        U*U**U*Uժժժ3fL̙L3f̙"DĈD"Ĉ"DĈ"Dɤ$I$wn];ݻ];wnݻn];wݻ;wn]ݩeh)8 .e .edh)Jbca L-ɠcba :L- qL- iiLZii`@@           p)ȱȱL:   `hL-))  A`_ ALZ@ h ALZ`ȱ` A ALZ aȱbȱc48bbaabmbama8cmcɀ     ||  LL `x< 806 ><x?`7||  LL   pxxp||||@@@@@@@@@        xp  ?008800p``00000F1F1F1N3 || @@@@@@@@@@@ xp   xx  8p`>~f9F1F1000000  < | l L   `x< 808 <x`x|8f3v76666v?f|?x?px  LL    ||  LL  ||@px xp@||     LLpx || xppx || `x<  <x`pxxx xppx xpxx````````````` >}ɉɋɏZɠ5          z#?   Ůˠ" ŠŠ Šв7 Ԯʠ űˠ  Ųˠ  ˠŮˠ ԠӮˠӮˠĮˠ  !ЮŠ"ͺǠנ ˠ Ю͠ ԯŮʠ ! Ҡ?ԠӠ=ӠĠàڮҠŠˠŠŠ ЮŠϠŠҠŠŠ ϱϲŠƠӠ ӠˠŠ?^B>:" TO SAVE A POSTER, GO BACK TO MAIN"::"MENU AND CHOOSE THAT OPTION.":34,0:16045mB>CH21040wB>4370B N FIN AL B%N:8400B4N:BHNEK20099BRN9350BNBU SAVE GR BU38311BVCM$"L"4320B"VCM$"H"4360 C,VCM$TS A TITLE OF UP TO 26 LETTERS":"BELOW YOUR POSTER."A>16045:5:" 'REP' REPEATS COMMANDS INSIDE THE"::"PARENTHESES. 'REP3', THREE TIMES;"::"'REP4', FOUR TIMES, ETC. COMMANDS INSIDE":"THE PARENTHESES MUST BE SEPARATED WITH A"B>"SLASH (/).":OINT."::" 'BN0' WILL GIVE YOU NO SOUND AT ALL."::" 'H' AND 'V' JUST MOVE THE BRUSH; THEY";@>:"DO NOT DRAW. 'H' MOVES THE BRUSH RIGHT"::"OR LEFT; 'V' MOVES IT UP OR DOWN."5A>:" 'NEW' ERASES COMMANDS AND YOUR"::"POSTER."::" 'PR' PUO$(X);?>X10Ė22:RG$(X);7?>358(X15):SM$(X);=?>H?>16045S?>16060a?>16368,0?>24:8:"PRESS ";::"RETURN";::" TO CONTINUE ";:CX$::?>11:"TIPS FOR USING POSTER":::34,3b@>" 'SC' WILL COVER THE POSTER UP TO THAT":"P` O0x@GAsOs` xpAg~~ ǀՇ<|`C` 񁰀D?U+UßAzߪC `@pC?0`p|~+U*pya?``C1p`A``?`p|~GaC ժժ`c@y@ .33` O0x@GAOs` ppA<|`C` 3ÁDU+uP>l*U*_Jρl.U* ت`?` CU*}P.ylp*U**@́lW.U*L`@p+U*1ߪpy`0``C1x`@``0`p GaC `c@ysꌆ`c@y<"p@3 0LCAf`0f8W [ ?>dY gn9CLf `0f 7W [ ?03dW  gn8">""> [  3dWgm8""""""3p@qcCfLWgk8  >2 ""22pL3 <|pA@`pC7W7 "*"*8Xysg? @x9? ?3[ 3 3dpqaC `x9? 3? 3dWgkW ? ?hWbk7'""& ""&3F6 ?hW[k7'"""""""":` 'WYk6'>"">">>":@qaC"">><"p@3 0LCAf`0f8ǪժժWЪ [ ?>dժժYՂ g3p@qcCfLCLf `0f 7êժժWՀ [ ?03dժժW Ղ gn8Հ [  3dժWՊgm8""""""ժWԪժՊgk8  >2 ""22pL3 <|pA@`pC7ժժWk7 "*"*8Xysg? @x9ժժ?Ղ ?3[ 3 3dpqaC `x9ժժ?Ղ 3? 3dժWԪժժgժժWՊ ? ?hժWЪժժbk7'""& ""&Fx3F6ǪժՊ ?hժWժժ[k7'"""""""":` 'ԪWêժժYk6'>"">">>":@qaCxsaC3~௟կ􌞐Wj{kǛɣßw?ok ĉ*ߪزP_!/-o|ߎՠ}g|U*Uzo/_@*u~/ _~ÝU*UzW~kU>U*u?Uz_aOp`?2aԠȟNj*U ƊłÑ8U~ǺߢO.u+wU_} ي̀тŭ䝠ъ?U/}߁_Ǽ ׾׺蠅Ǐ֨V*O3N?f9p՘*U*UzjW~?pg`?0aۇ㏁ϛ~93>23'P0U+U~OEm|?q3a+}?} 'jƒ*U*Ng<s|y3f|р՘T~kţuz?/˕]~O3NO3f9fŰݐߣհȁPp_j_kOn ߠՂՙԢ UAg|ǜ_j(U*}?Uz/ W*׀ǣ*U/u/uU׏Ѐ׳஌}z_>}_~W 󼄋҆.}׮?U*}Ńwo]_U~ ΁˜պ տκ򍠆_*U*U~羮 ꁠɁW*Wz!5W*zx'L?0aɑU*];922&2'W T~SzgdD|?q3akW* ' ŧ⇐O~?xaC3~Ջ*U~Wzw ߎ؁Wj8fp笅P*Uǟ›ۇz_n ׏Ճ˜ЀU~ő˜/UUj?U8*U(o `J ᏄўPzf?~sǧԀ(~}U Ê燱++U*u_?~_z 񎂠͙?xpA𺘨Ϻ          ntributing Software Editors"% 900. 990?  RETURN ~ 24:8:"Press "BO$"RETURN"UN$;" to continue: ";:16368,0 24:34:CX$:CX$(13)920 HO$  HO$:12:10:"ONE MOMENT, PLEASE..." :(4)"RUNTABLE OF CONTENTS,D1"*dway, New York, NY 1OOO3" T :14:"Deborah Kovacs":13:"Creative Director" :15:"Stephen Gass":14:"Project Manager" :14:"Jeffrey Siegel":14:"Software Editor" :16:"Bob Neumann":5:"Megan Stine and H. William Stine":6:"Coraphics created with":3:"Penguin Software's Graphics Magician"U c100,123180,123 h18:"FAMILY COMPUTING CENTER, NORTHFIELD, MN"::13:"Software Testing": 900 2:9:WI$BL$"PUBLISHED BY"REG$:: 14:"SCHOLASTIC INC."::5:"73O Broars": 9002 ,1:10:WI$VI$"ASSISTED BY"REG$O 64:14:"TECHNIGRAPHICS"X ;:3 @5:"Ame C. Flynn and Michael Callery":10:"Computer Graphic Design": J5:"Lorene Lavora and Steve Sullivan":11:"Computer Illustration": T@ ^11:"G   7* յ/  * Ͼ σ  ճ/̓   ռ*Օ/  /ϸ̻ǻ/ ˕ /   ϴ676?~Ղ/ / WwWW/ Ս/ ̀  ~  պϲϳ  _W_w_ե/յ/  ϻ ݂݃ݪU݂݃݉ݏ݌݃݀݀, 7/ / * ~r~U  U ݀݀݀݇ݨ ݀U ݈ݨ݀݃ݪ݄݃ݪ݉Ü݆݀݃݀ z݂݀݌݆݃݀݁ō݀ rs   ݀݀݀ ݈ܠ ݃ݪ݄݃ݪ݄݄݀ᣪ ݇ݨ܏݀݃݊݀݃݉ݙݞ݂݀ j~j:jrj 裪`G `r`  U̸ ݀݀j~j݀݀         TH YOUR DISK":2 D9:"PRESS ANY KEY TO RESTART"= N39503 MN N39503 P? 6200039310' HELLO2238400J(4)"BLOADPICDRAW"h((4)"BRUNLOMEM:":16384|2(4)"BRUNHRCG"73072:783,0F(4)"RUNTABLE OF CONTENTS,D1"0(12):(4)"PR#0":(4)"IN#0":(4):: :11:4:"THERE IS A PROBLEM WI 383Ղx|@q~@?Gs`|~x0~~~ ׿ժÁ xCC` 33z` O0x@GAsOs` xpAg~~ ՆQχ|`CO`3l_*UÁQ\*U*` (}*UQ\*U*^lW/U* ߁p` @``p gq0`@g'UjpAa``C1`C@?``p|OaCժժ@Ax參61300`$DER%0ĺD$"VERIFY"VN$",D"DR%k.216,0qst VERIFY ERR ~QZ%QZ%1:QZ%QX%DER%112:11:(7);BO$"Cannot read side ";SIDE(CH)"!";UN$'23:8:"Press "BO$"RETURN"UN$":1:"Type "BO$"Y"UN$" or "BO$"N"UN$" and press "BO$"RETURN"UN$": ";:16368,0vCX$:CX$"Y"CX$"N"ĺ(7);:490CX$;X$:X$(13)498X$(8)ĺX$;" ";X$;:491(7);:493YES0:CX$"Y"YES134,0:H VERIFY DISK 0ESC0:YESESC1(HO$:ESCı10:"To initialize a data disk, take the"::"'Computer Stuff' choice on the menu."23:8:"Press "BO$"RETURN"UN$" to continue ";:16368,0X$:X$(13)465HO$:NV:1:EP$:34,V1:VEMIER ISSUE SIDE "(SIDE(CH)))J61000/T5N RUN UTILITIES? HO$:3:"For "ME$(CH)", you need a data disk"::"that must first be initialized by the"::"Computer Stuff program."V14:12:"Do you already have a data disk?"::49:5120-(3070)99ĺ(4)"RUNPOSTER,D1":B(4)"RUN"P$(CH)V, TURN OVER 6:HO$:11:4:"That program is on the other side."::" Turn the disk over and press ";BO$"RETURN";UN$;:16368,0:": ";CX$::HO$@DR%1:QX%2:VN$"MICROZINE PROZINE"::7:"AND TURN OFF THE COMPUTER."7 CH7239k CH2CH4CH5CH6İ242:(4)"RUNLOAD PIC,D1"y 242:245 :1:(12):12:10:"ONE MOMENT, PLEASE...." 3070,0 CH1ĺ(4)"BLOADPICDRAW"CH3Ĺ3070,99:(4)"BRUNLOMEM:"DITS,D1":! CUCU1:CU7CU1X 4(2LC):14:" ";:4(2CU):14:CU$;:LCCU:221 CHCU:3070,CH:CH3CH4İ400:ESCĬ SIDE(CH)SIDEİ300:DER%Ĭ CH3CH7D$(4):10:2::D$"IN#0":D$"PR#0"::) CH7Ģ11:9:"TAKE OUT THE MICR 24:39:CX$:CX$" "CX$(13)CX$"C"CX$"Q"221M CX$(13)235 CX$"Q"Ģ24:39:CX$;:X$:X$(13)Ģ24:39:" ";:221 CX$"Q"CH7:237 CX$"C"Ģ24:39:CX$;:X$:X$(13)Ģ24:39:" ";:221 CX$"C"Ģ1:HO$:(4)"RUNCRE} 6:X16:15:ME$(X):::1:1,24279,24279,1421,1421,24:20:3:"Press SPACE BAR to choose a program.":6:14:CUR$; 22:9:"Press "BO$"RETURN"UN$;" when ready.":24:2:"Type "BO$"C"UN$" to see credits, or "BO$"Q"UN$" to quit: ";:16368,0:H s TWISTAPLOT,Ask Me,Poster,Secret Files,Computer Stuff,What's Next?^ vX16:SIDE(X):p w 1,2,2,2,2,1 xME$(1)ME$(1)(91)(93):X16:P$(X): y TP.1,ASK ME,POSTER,SECRET FILES,UTILITIES,PREVIEW 1:4:LR$VIO$"TABLE OF CONTENTS"RE$ 62000393100 TABLE OF CONTENTS<D$(4)RE$(18):LR$(23):BO$(25):UN$(26):VI$(3)"2":EP$(15):CU$(127):HO$(12):LC1:CU1:SIDE2:3075::HO$:X16:ME$(X):D$"OPENSIDE,D1":D$"READSIDE":SIDE:D$"CLOSESIDE":D$     @,~Հ~`?p~~~~~~~~~~~~~Հ~x~~~~~~~~~~~~~~~Հ~|~~~~~~~~~~~~~Հ~x~~~~~~~~~~~~~Հ~~~~~~~~~~~~~~~Հ~|~Յ~~Հ~~~~~~~~`Ղ~~ՁՀ~|~~~~~~~~~~~Հ~~Հ~|~~~~~~~~~~0: =[+=: SAMPLE 1=:D1İ9350:EK62000d=:RN1:12:9:BO$"GETTING THE SAMPLE POSTER"UN$=:FI$"PP."(1)"SAMPLE":D$"OPEN"FI$",D1":Z51:D$"READ"FI$:NP:8100:8400:Z50=:4900::3300P>:::9:"TO SEE HOW THIS POSTER WAS MADE, SAVE I:5:"PRESS SPACE BAR TO MAKE A CHOICE":23:8:"PRESS ";::"RETURN";::" WHEN READY ";:16368,0<+23:32:CX$:CX$" "CX$(13)11030<+CX$(13)11040<+CUCU1:CU8CU1<+LC24:4:" ";:CU24:4::CU$;::LCCU:11030= +CHCU:LCOR TRAPQ;*LR0:X0105:(NN$(X),2)"PP"LRLR1:PO$(LR)(NN$(X),(NN$(X))3)W;*h;*LR20LR20n;*|;* MENU ;*CFCH3:;+LC1:CU1:::2:1::14)"POSTER MENU"15):; +6:X17:6:ME$(X):::6:4::" ";::23:1:40)c<+21ER FILE"L:*D$"OPEN"F$",D1,L10":R1:9100:D(X$):R2:9100:SL(X$):ZLSLa:*D$"CLOSE"F$:D$u:* GET DATA DISK:*D$"BRUNCAT/FREE.OBJ,D1":::*9300:DER%EK1::*CER0:*43490:*C,SL,D,MS$,NN$,CER:*43512;*CERX: FORCE ERROR F3,254,144,2,230,255,198,251,208,221,96,9/*:90* SOUND u9:*B38375:PI38376:DU38377:MU38378:I123:X:BI,X:9D* 255,255,173,48,192,136,208,5,206,233,149,240,9,202,208,245,174,232,149,76,234,149,969*9* PARAMS :*F$"MZ."(1)"PARAMET8) MOVE MEM .8)I164:X:38310I,X:8) 169,12,133,255,169,4,133,253,208,8,169,12,133,253,169,4,133,255,169,0,133,254,133,252,169,8,133,251,160,119,177,252&9) 145,254,136,16,249,24,165,252,105,128,133,252,144,3,230,253,24,165,254,105,128,13(F$"PP."(1)"TITLE":D$"BLOAD"F$",A$C00,D1"X7(:38321:16368,0:CY1:21:1:9587(22:6:"MAKE A PICTURE BY PROGRAMMING!"7(24:8:"PRESS ";::"RETURN";::" TO CONTINUE ";:16368,07((16384)141104407(23:1:9587(23:8)BE$;X$:E61100EGE0(12):(4)"PR#0":(4)"IN#0":(4)::yE:11:4:"THERE IS A PROBLEM WITH YOUR DISK":ED9:"PRESS ANY KEY TO RESTART"EN39503Y0(12):(4)"PR#0":(4)"IN#0":(4)::\:11:4:"THERE IS A PROBLEM WITH YOUR DISK":D9:"PRESS ANY KEY TO RESTART"N39503 . .0::F0AGAIN1) (AGAIN)DUN(A(PL))1/ B READ ANS L 2400[ PL$"O"ıe 8100 PL$"D1"ACTA$(4)"when I was in seventh grade. I got":A$(5)"that role in 'The Diviners.'":A$(6)""V PL$"B"DUN(2)A$(1)(A$(1),32):A$(2)"wh; AGAIN0:QQ$"Y"QQ$"Y "AGAIN1:3900:3:40::2548p KW$"YES":3300:3900:3:40::F0AGAIN1:2548 KW$"YEAH":3300:3900:3:40::F0AGAIN1:2548 KW$"I DO":3300:3900:3:40::F0AGAIN1:2548 KW$"YOU BET":3300:3900:3:4NE o (t FOUNDĺPL$" NOT FOUND":. A READ ANS a PLJ:ZI:X120:A$(X)"": Z1ZZ1:PLPL(Q2$(Z,0)):2530  PL$(XS$,PL,1):DUN(A(PL))DUN(A(PL))1:AGAIN1: 12:3:AN$(RD(X));:14:3:AN$(4);:3900:LA35:500N X3611:(Q$,X,1)" "PTX:X1*P VQ 7:3:(Q$,PT);:8:7:(Q$,(Q$)PT);yV JCH:X1N2:11X:4:35);:_ ` FIND PLACE IN ARRAY e PL$"R"ACT1j FO0:X1NE:PL$KL$(X)FOX:SRSR(X):MXMX(X):CODECODE(X):NPL$NPL$(X):X((16384)128):16368,08 X$(32)X$(13)2318K X$(13)2360e$ CHCH1:CHM21CH1. 11LC:3:" ";:11CH:3:CU$;:LCCH:23188 CH0ĺ(7);:2318B 11CH:3:" ";:3900L Q$Q$" "Q2$(I,CH)"?":(Q$)36Ģ7:3:Q$;:2390$ STEM JLC1:CH1:3950:2800:3800:Q1$(FO);" ...";:IFO:Q$Q1$(FO):d GET END OF QUES x LC1:CH1:2940 3900:9:"Press SPACE BAR to choose.":10:"Press "BO$"RETURN"UN$" when ready: "; 12:3:CU$; (16384)1282318 X$2200:ESC%2000)2300:ESC%2000>2500:ESC%2000\DUN(A(PL))(AGAIN)2000q2550:ESC%20002600:ESC%2000CODE3PL$NPL$:2025CODE3İ2700:DUN2000CODE4İ3000:2040 CODE120253 PRINT QUES(QQ$,1)" "(QQ$)1QQ$(QQ$,(QQ$)1):592LQ(QQ$BL$,3)"NEW"ESC%1RTaVBE$;:510gWy CONTROL 11000:11100:120002000K CONTROL ESCAPE%ES%0:X1NE:DUN(X)0::ACT0:2800:390015:ESC%20008,0:QQ$""C$!C$""5102C$BAK$570DC$(13)590T C$" "598i((QQ$)LA)598QQ$QQ$C$:C$;:510:QQ$""598?(QQ$)1ĺBA$;" ";BA$;:505DQQ$(QQ$,(QQ$)1):BA$;" ";BA$;:510N34,40OQQ$""596-PE"(34)": ";+ TM0:16368,0:16384,128E (16384)12832430 C$((16384)128):16368,0:QQ$"":33,38:LA13:515:KW$"TELL ME":3300:F0TM1 KW$"TELLME":3300:FOTM1 3900 3:40:   INPUT 33,38 1636 CLEAR $ 23:1:EP$:23:* +; , RETURN D 1200w 66:"Press SPACE BAR to continue: ";:16368,0 @CX$:CX$(32)320 3:40::  TELL ME 3900:" Press SPACE BAR to continue or";:22:4:"type "(34)"TELL ME MOR3900:"Try typing '"T2$(((1)4)5)"'.":310:199 919C ;3900I = ?ER0:FO0:X1N1:QQ$Q0$(X)QQ$Q0$(X)" "FOX:XN1 A:FOER1:ER%ER%1 C d CONTROL n10000:1000:20000 36350 (4)"RUNTABLE OF CONTENTS,D1":O"SZ3:51, )(QQ$BL$,3)"HOW"SZ4:51N +(QQ$BL$,4)"WHAT"SZ5:51d - PROMPT 1ST WORD /3900:"Try starting with '"T1$((1)51)"'.":310:19 1 PROMPT 2ND WORD 3SZ555 53900:"Try typing '";T1$(SZ)" "T2$(SZ)"'.":310:191 7KB)128āK175::K(0):21> 33,38:515:3950:63:ESC%ı| ERİ3900:"I'm sorry, I don't understand you.";:22:310 ER59 ER%257 ! 1ST WORD OK? #(QQ$BL$,3)"WAS"SZ1:51 %(QQ$BL$,3)"DID"SZ2:51 '(QQ$BL$,2)"D = 6200039310#360962 ASK ME; 100S GET QUES STEM ]ER%03900:2800:3800:3100:QQ$"":16368,033,40:3:1:(ZZ$,40);:8:17(KB)127C$((KB)128):16368,0:8:28:27 ZZ$(ZZ$,2)(ZZ$,1):(                    Z40ER1:2075F LC:OH,OV0I C$"V"3175BN SI$"-"3165XS HOHZ:H39H39aT OHHkX 3195] HOHZ:H0H0^ OHHb 3195g SI$"-"3190l VOVZ:V39V39m OVVq 3195v VOVZ:V0V0w OVV{ 2950| LCH,VM$)4ER1:2075=& SI$(CM$CB$,2,1):SI$"+"SI$"-"3135j+ Z((CM$" ",2,2)):Z1Z40ER1:2075{0 C$"V"31305 HZ1:LC:OH,OV:OHH:LCH,V):2950:2075: VZ1:LC:OH,OV:OVV:LCH,V):2950:2075? +/-D Z((CM$" ",3,2)):Z1 XOVV:H1,H2X:3200::OVV( 3085: C$"L"3070Z V1V:V2VBW1:V239V239 XOHH1:V1,V2X:3200::OHH 3085 U H1H:H2HBW1:H239H239 XOVV1:H1,H2X:3200::OVV   CUR ! (CM$)2(C0  STORE % REPRNıG RNNCNC1:P$(NC)CM$:PC%1M Z PLOT d LCBCl BC~ C$"R"3030 V1V:V2VBW1:V239V239 XOHH:V1,V2X:3200::OHH 3085 C$"D"3050 H1H:H2HBW1:H239H239$)2(CM$)3ER1:2075G X((CM$" ",2,2)):X1X40ER1:2075Z VVX:V0V0j 2950:3000tS 2075T ER ^ 21:1:868:1:BE$;:CM$""ĺ"EMPTY COMMAND":X14000::2920c "I DON'T KNOW "CM$:X14000:h 21:1:868r ERZ 2950:3000 2075$ S H (CM$)3(CM$)4ER1:2075~ (CM$" ",2)"SH"ER1:CM$"THAT COMMAND":2075 Z((CM$" ",3,2)):Z0Z15ER1:2075 LCZ Z:SCZ:I039:0,39I:3200::BC:2950 2075 U  (CM? 24:8:"PRESS ";::"RETURN";::" TO CONTINUE";:16368,0W (16384)1282572j 23:1::958 RNNCNC1:P$(NC)CM$' 2075( R 2 (CM$)2(CM$)3ER1:2075F X((CM$" ",2,2)):X1X40ER1:2075P HHX:H39H39868:1:"ALL COMMANDS ARE ERASED!":X13000:;~ :4900E 2075O P h (CM$)3ER1:2075 (CM$" ",2)"PR"ER1:2075 X$(CM$,(CM$)2):X$(X$,33):CM$"PR"X$ 21:1:958:22 (X$)40ĺX$:2570 (40(X$))2:X$1X40ER1:2075' VVX:V39V397 2950:3000A 2075K  L o  (CM$)2(CM$)3ER1:2075  X((CM$" ",2,2)):X1X40ER1:2075  HHX:H0H0 $ 2950:3000 . 2075 ` N j CM$"NEW"ER1:2075/t NC0:21:1:2)):Z0Z10ER1:2075' ZBNZ:29501 \2075< ^ BS i `Z((CM$" ",3,2)):Z1Z10ER1:2075r bBSZ| d2950 f2075  D CM$"DRAW"ĠBC:LCBC:H,V:3200:2950:2075 (CM$)2(CM$)3ER1:2075 X((CM$" ",2,2)):XM$,2)"BN"2134' >(CM$,2)"BS"21426 @ER1:2075A B BC n DZ((CM$" ",3,2)):Z0Z15ER1:2075w FBCZ H2950 J2075 L BW NZ((CM$" ",3,2)):Z1Z10ER1:2075 PBWZ R2950 T2075 V BN  XZ((CM$" ",3,00 C$"P"2500$ C$"R"26005 C$"S"2700F C$"U"2800| CM$"ERASE"ĠSC:H,V:LCSC:2950:3200:BC:2075 ER1 ERİ2900 3 4 B 6(CM$)3(CM$)4ER1:2075 8(CM$,2)"BC"2114 :(CM$,2)"BW"2124 <(C  PRS  8400_ NCPMĢ21:1:868:1:BE$;"YOUR POSTER IS FULL!":X14000::ER1: (CM$CB$,3)"REP"İ4200:2075 CM$""ER1:2075 C$(CM$,1):C$"B"2100 C$"D"2200 C$"H"C$"V"3100 C$"L"2300 C$"N"24= 6200039310#383102 POSTER=n10000IsEK130Sx1000^20000lEK62000:D$"RUNHELLO2,D1": CONTROL 11000CH71099CH3LC0CH15000,16000,4000,5000,6000,7000CH0:1000K130              " " """""""""     :4:"THERE IS A PROBLEM WITH YOUR DISK":MPD9:"PRESS ANY KEY TO RESTART"XPN39503f MAKE FILE ' F$"SF."N$:8500> NBNB1:NN$(NB)N$DG X< DISK FULL FHO$:V9:X$"THE DATA DISK IS FULL.":1300:V11:X$"YOU MUST ERASE A BOX OF CARDS":1300:V13:X$"OR A POSTER OR INITIALIZE A NEW":1300P15:"DATA DISK BEFORE."' LI15:(LI2)8:1:LN10:12008 CC$""3270d (CC$BL$,(CC$))(BL$,(CC$))CC$""u SEC$(LI)CC$ (LI2)8:1:(SEC$(LI)DA$,LN)  21:1:EP$ SEC$(1)""SEC$(2)""SEC$(3)""SEC$(4)""SEC$(5)""ĺBE$:3200 CT%1:SEC$(CT%)SK$(X)y &{ 3300, G EDIT FIELD NAMES l 23:1:EP$:X67:X:1:40):z 4:8:N$ 6:"Type your new section titles or press":BO$"RETURN"UN$" to keep a title as it is.":"To erase a title completely type spaces5:SEC$(X)SC$(X):A] X15:(X2)8:1:(SEC$(X)DA$,LN)::ob 23:"Are the titles the way you want? ";xg 200l CX$"Y"İ3200:3165m 21:1:EP$p ELIMINATE GAPSq X15:SK$(X)SEC$(X):SEC$(X)"":v CT%0:X15:SK$(X)""CT%CC$""ĺHO$:3199%O F00:NB03155FP X1NB:N$NN$(X)F01:XNBLQ R F0ĺ::BE$;"THERE IS ALREADY A BOX WITH THAT NAME!"::1500:3100S 4:8:(N$BL$,LN):X "You can use these section titles or":"type in your own titles:":Z X1. FERĺHO$:12:" SOMETHING IS WRONG WITH THE DATA DISK.":V14:X$"CANNOT ADD ANOTHER BOX.":1300:1300:u/ 435120 FS3İ3900:5 3:"What do you want to call this box of":"cards?": 4:8:(DA$,10);:LN10:8:16368,0D 1200N N$CC$:CLOSE":435126) V1:X$"PLAN A CARD":BO$:1300:UN$+ NB12V10:X$"YOU ALREADY HAVE 12 BOXES OF CARDS.":1300:V12:X$"YOU MUST ERASE A BOX":1300:V14:X$"BEFORE YOU CAN ADD MORE BOXES.":1300:1500:, FER0:FS9999:43490- F,SL,D,FS,FERjEP$ ? @ SET UP QUES BJT$(1)"Y":T$(2)"N":T$(3)"N"HZ CONTROL e11000tCH72099CH7900,3000,4000,5000,6000,700020103 PLAN A CARD  3100  GET FILENAME & HO$:43490 ( D$"CC$)1):C$;(95);C$;1415<(CC$)LNĺ(7);:1415SC21ĺ(7);:1415mCC$CC$C$:C$;:1415s RETURN 23:1:EP$:23:7:"Press "BO$"RETURN"UN$" to continue: ";::" ";::16368,0(16384)12813152023:1:)96C$((C$)32):LW,0:(95);(8);< C$","C$COMMA$Q C$":"C$KOLN$ C(C$):C13ĭ(CC$)LNCC$""āXX(CC$)1LN:(95);: C13ı C81470 (CC$)1CC$"":C$;(95);C$;:1415 (CC$)1ĺ(7);:1415CC$(CC$,( (CC$)LNĺ(7);:1205B C$","CC$CC$(92):C$;:1205Y C21ĺ(7);:1205s CC$CC$C$:C$;:1205y   CENTER V:((40(X$))2)1:X$ w x INPUT }4400:4(2LI):15 ~16368,0 CC$"" C$& (C$);(8); C$","C$COMMA$2 C$":"C$KOLN$q C(C$):C13ĭ(CC$)LNCC$""āXX(CC$)1LN:(95);:} C13ı C81250 (CC$)1CC$"":C$;(95);C$;:1205 (CC$)1ĺ(7);:1205 CC$(CC$,(CC$)1):C$;(95);C$; 1205 `(CX$)31ĺCX$;. j(CX$)32ĺBE$;:1110Q tC$:(C$)8ĺC$;" ";C$;:1110g ~(C$)13ĺ:1170w BE$;:1140 CX$T$(1)CX$T$(2)CX$T$(3)ĺBE$;(8);:1110   INPUT CC$"" C$ (C$)96C$((C$)32):LW,0:(950 (CX$)32ĺBE$;:210B CX$"Y"CX$"N"ĺBE$;(8);:210Z XC$:XC$(13)ĺ:{ XC$(8)ĺXC$;" ";XC$;:210 BE$;(8);" ";(8);:210 +  CONTROL 2000 K L GET SINGLE CHAR V16368,0:CX$ [CX$""1110; 6200039310#360968 SECRET FILESFd CONTROLQn10000]sEK130gx1000r20000}36350EK262000(4)"RUNTABLE OF CONTENTS,D1" Y/N 16368,0:CX$CX$""210 (CX$)31ĺCX$;:27                             " R HIGHER TEXT COMMANDS YNRREG$(18):WIDE$(23):LRG$(17):BOLD$(25):UNB$(26)N&RCL$(3):WH$CL$"0":GU$CL$"1":VI$CL$"2":OU$CL$"3":BLUE$CL$"4":YE$CL$"5":LA$CL$"6":PI$CL$"7":AQ$CL$"8":BK$CL$"9"O0RHOM$(12):ELN$(14):EPG$lized.":3090jM 11:2:"Something is wrong. The data disk has"::5:"not been initialized. Try again."sM 900M D1MICROİ4000M M GET PROGMD2ıMHO$M11:1:"Put the ";PN$;" back in the drive."::910MMICRO1MNL 61000:62000\L DER%ĺHO$:12:3:(7);"You have the Microzine in the drive!":900:L HO$:12:4:"Please wait. Initializing disk."L ID%1L ER0L 43490L 37632,SL,D,ERL 43512 M HO$:ERĢ12:3:"The data disk has been initiaive 2."KMICRO0:13:910KHO$:11:"This program will "(7);BO$"ERASE"UN$;" the disk now in"::"drive ";BO$D;UN$". Do you want to go ahead? ";K300:ESC0:CX$"Y"ESC1:4000KHO$K3K INITK VN$"TABLE OF CONTENTS":DR%D:QX%0u":"no longer need. If there is a write-"::"protect tab on the data disk, take it"::"off now."JD$"BLOAD INIT.OBJ,D1,A$9300"J900JHO$:11:ND1Ė1:"Put disk to be initialized in the drive.":2020K2:"Put disk to be initialized in DrIDUN1060&ID$"READ"F$",R2":ND?ID$"READ"F$",R3":SLRI$D$"CLOSE":D$XIKgI GET DATAyID2:ND1D1IHO$:2:10:"INITIALIZE A DATA DISK"cJ8:"For your data disk, you can use either a":"new, blank disk, or an old disk that yoĺX$;" ";X$;:310!Hh(7);:340'H-H5H23|H8:"Press "BO$"RETURN"UN$" when ready: ";:16368,0:CX$::HO$:H DRIVESHD$(4):F$"MZ."(1)"PARAMETER FILE"HD$"OPEN"F$",D1,L10"HD$"READ"F$",R1"H X$:DUN0:X$"Y"DUN1 (1)"PARAMETER FILE":D$"OPEN"F$",D1,L10"4G NDDRGD$"WRITE"F$",R1":"Y":D$"WRITE"F$",R2":DR:D$"WRITE"F$",R3":SL:D$"CLOSE"F$:D$:G, Y/N G616368,0:CX$G@CX$"Y"CX$"N"ĺ(7);:310GJCX$;GTX$:X$(13)390H^X$(8)#FX$:X$(13)ĺ:SL(SL$):250AFX$(8)ĺX$;" ";X$;:241QF(7);:246F15:35:SL:13:EP$:14:"You have "DR" disk drive";:DR2ĺ"s";F" in slot "SL".F23:1:"Is this correct? (Y/N): ";:300FCX$"Y"217*G:HO$:F$"MZ.")ĺX$;" ";X$;:217"E(7);:2260EDR(DR$)?EDR2DR2\E13:35:EP$:13:35:DRiE14:EP$E15:"What is your disk drive slot? 6";(8);:16368,0ESL$:SL$""SL$(13)SL$"6":SL6:250ESL$"1"SL$"7"ĺ(7);:243FSL$;press "BO$"RETURN"::UN$"after each one.":34,12>D12:EP$}D13:"How many disk drives do you have? 1";(8);:16368,0DDR$DDR$""DR$(13)DR$"1":DR1:240DDR$"1"DR$"2"ĺ(7);:221DDR$;DX$:X$(13)ĺ:229EX$(8CU:23:1:HOM$:CHNMID%ĺ(4)"RUNHELLO2,D1"YCUCHNMĺ(4)"RUNTABLE OF CONTENTS,D1"mCZCH200,100:60Cd1000:DUNİ200Cn2000:ESC199Cx3000CC RESET FILECHO$:9:"CHANGE DISK DRIVE SETUP"1D6:"Answer the questions and B@9:8:CUR$;nBA22:5:"Press SPACE BAR to make a choice."::9:"Press "BO$"RETURN"UN$" when ready: ";BB16368,0:24:34:X$:X$(13)80BCX$(32)66BDCUCU1:CURNM1CU1BF7(2LC):8:" ";:7(2CUR):8:CUR$;:LCCUR:66/CPCHis a 'help' program that lets you"::"make a data disk and answer some"::"questions about your computer system."|A7900A<HO$:2:2:WI$GU$"COMPUTER STUFF MENU"REG$A=5:5,50275,50275,1205,1205,50B?X1NM:(2X)7:9:M$(X);::LC1:CUR1Z @62000@39310#@376325@ UTILITIESQ@D$(4):PN$"Microzine"]@MICRO1r@::3072:21000@(NM3:X1NM:M$(X):@) Change disk drive setup,Initialize a data disk,Return to Table of Contents@*CUR$(127)sA2::9:"This        FOR":"LIST OF COMMANDS YOU ENTERED, ";::"M";::" FOR MEN";2039,213:I0%1:21:11:4400:CM$CC$:PC%CM$"M"CF0:::11:8:"TO SAVE YOUR POSTER, CHOOSE"::6:"'SAVE A POSTER ON A DATA DISK'":16050:::PC%0:4090CM$"M"CF0:::4090+21:1:868:1:"COMMANDS: ";::" ":22:"BC"((BC)CB$,4)"BN"((BN)CB$,4)"BS"((BS)CB$,4)"BW"((BW)CB$,4)"SC"((SC)CB$,4)"V"((V1)CB$,4)"H"((H1)CB$,4)?23:1:"ENTER ";::"H";::" FOR COMMANDS YOU CAN USE, ";::"L";::":21:" 0 2 4 6 8 10 12 14":" 1 3 5 7 9 11 13 15"p 23:8:"PRESS ";::"RETURN";::" TO CONTINUE";:16368,0:" ";CX$:21:1:958  DRAW CY1:CFNC04900:: IF CF THEN CM$="RUN":GOTO 4030)  2075 SOUND 3 BN1āZ1SP(BS)::R PI,PI(BN):DU,SP(BS):MUSX d RUN p NC0ı ER0:TU1NC:CM$P$(TU):21:1:868:1:"COMMANDS: ";CM$:2015::H CHRT PR :21:1:958:X015:IX23:X:0,39I:0,39I1:''''''''('''@,''''('('('('('`('('('  13)210 +: 0(12):(4)"PR#0":(4)"IN#0":(4)::l :11:4:"THERE IS A PROBLEM WITH YOUR DISK": D9:"PRESS ANY KEY TO RESTART" N39503 N39503 P16368,07 UP2İ200:24:1:38);:23::1:110G ZZ1200105d d(16384)128ZZ1:90 iP6ĺ(4)"RUN TABLE OF CONTENTS,D1": n(4)"RUN"P$(P)",D1": 24:8:"Press "BO$"RETURN"UN$" to continue: ";:16368,0 24:34:X$:X$( 6200039310' LOAD PIC2 38250@16302,0XBO$(25):UN$(26)l(X16:P$(X):) X,ASK ME,X,SECRET FILES,UTILITIES,PREVIEW2P(3070)7(4)"BLOADRUNPACK,A38250"<(4)"BLOAD"P$(P)".PAK,D1"F:16302,0:38250  LB(LB$):LB0ı?#LB1(TI18)LBNCLB18(TI18)ĺBE$;:T#LBNCNCNC1:#XYLB1NC:P$(XY1)P$(XY)::NCNC1:PC%1## INSERT $22:958:22:1:"INSERT BEFORE WHAT LINE NUMBER?";:" ";LB$:LB(LB$):LB1(TI18)LBNCLB18$;:44202"lCC$(CC$,(CC$)1):C$;" ";C$;:4420G"vI0%ĺBE$;:4420{"{(CC$)29(CC$)(P$(X(TI18)))ĺBE$;:4420"C$(P$(X(TI18)),(CC$)1,1):4445"I0%0"" DEL #22:958:22:1:"ENTER LINE NUMBER TO DELETE:";:" ";LB$:,0:1515(LC15):H,V:4421'!?CC$""9!D16368,0:C$L!E(C$)134490^!F(C$)84450{!I(CC$)29ĺ(7);:4420!NC$(21)4470!YC$","C$":"ĺ(7);:4420!]CC$CC$C$:C$;:4420!bCC$""ĺ(7);:4420"g(CC$)1CC$"":C$;" ";C&3400::22100 0 INPUT 3 1CC$"":16368,0J 20:H,V:XZ170:b 3(16384)1274410q 4XZ170: 5(16384)1274410 615:H,V:XZ170: 7(16384)1274410 8XZ170: 9(16384)1284402!:C$((16384)128):16368)OP:SL(SL%1)CP:II1RP:ZQ0SL%:CM$(CC$,SL(ZQ)1,SL(ZQ1)SL(ZQ)1):REP1:2020:ERZQSL%guERIIRP}IICM$CC$:REP0:2950 SAVE GR 220004100::221002200016000:2210022000 4rOP0:X4(CC$):(CC$,X,1)"("OPX:X(CC$):wm|CP0:X4(CC$):(CC$,X,1)")"CPX:X(CC$)sOPCPOPCPER1:RP((CM$,4,OP4)):RP0ER1:SL0:XOP1CP1(CC$,X,1)"/"SL%SL%1:SL(SL%)XaSL(0 @ MORE%ETITI1:TI18NC4190/I4120:J EDIT\L3:X118:X(TI18)NC4180OX2:5:4415:CC$""P$(X(TI18))CC$RX2:5:868:5:P$(X(TI18))T]4120^:1gh RPT mCC$CM$:SL%0:ER0:(CM$)30ER1:37:" ";:37:CX$:CX$(8)4142^/CX$"D"CX$"I"CX$"S"CX$"M"CX$"E"ĺBE$;:4142h0CX$;1XX$:XX$(8)41422XX$(13)4145;:CX$"D"İ4500:4120<CX$"I"İ4550:4120=CX$"M"4160>CX$"S"4190?CX$"E"4170:"1:BO$;(" "(X(TI18)),3);UN$;" ";P$(X(TI18))@',22:1:958:22:"ENTER ";::"E";::" TO EDIT, ";::"I";::" TO INSERT OR ";::"D";::" TO"-"DELETE LINE, ";::"M";::" FOR MORE, ";::"S";::" TO DRAW: ";:16368,0 .RN0:CF0:CM$"COL"4380/CM$"L"4300ACM$"H"4350iCM$"RUN"RN1::4900:3300:4024}2000:ERR40244024:1040 CMDS ::1:BO$;"YOUR COMMANDS:";UN$::TI03:1:958:3:X118:X(TI18)NC4135 /3071,23" 2D$"RUN HELLO2":. dX1755 nX; xh 0(12):(4)"PR#0":(4)"IN#0":(4):: :11:4:"THERE IS A PROBLEM WITH YOUR DISK": D9:"PRESS ANY KEY TO RESTART" N39503 N39503::72,0:144/ D$"BLOAD MZINE2.PAK":38250[ 16304,0:16302,0:16299,0:16297,0| "(16384)127Ĺ16300,0:40 #100:16299,0:(16384)12740 $100:16300,0:(16384)12740 %35 (16300,0 -0:V160167:64,V218,V::3 6200039310% HELLO19 ::::D$(4)G16301,0mD$"BLOAD MICROZINE DATA MESSAGE"D$"BLOAD RUNPACK,A38250"D$"BLOADMZINE1.PAK"3825016368,0X$"4000<2000.3FFFM D823G" X121:511X,((X$,X,1))128   ٍ΍΍宍ܠ܍殍ܠ堧ܠ܍䠧ܠ䠧ܠŮԮ䠧ܠﮍɠܠ䮧ɠܠ卍ܠɠ뮍卍ܠܠﮍܠ܍宧ܠ܍ܠ܍ܠԮŮԮɠɠܠ魍㮠捍砧ŮԮܧ󮠧ܠ썍ܠܧɠܠɠ宍ɠŮԮ箠܍ɍܠɍ졍ܠ宠ŮԮܠɠɠŮԮ䠧卍󧮍䠚ɠ󧮠ɠܠɠᮍɠɠɠ宍ɠɠܠɠ宠ɠɠɠܠﮠ宍ܠɠɠ䮍ᠧ姠宠ɍɍ䭭宍ܠܠɠ姠ɧ宍ɠܠﮍ܍ܧɠ䮠ܠ܍宧ɠܠɠ󮧠ܠܠ宧ŮԮ捠宍ɠ܍ܠɠŮԮ宍ɠɠܠɠܠŮԮ䠧宧ܠ宍čɠܠ             MENU:";:16368,07+oESC0:24:39:X$:X$(13)6270T+qX$"M"ESC1:CU0:6270f+tX$" "6255~+vCUCU1:CULRCU1+y1(LC2)18(LC9):120(LC9):CU$;::1(CU2)18(CU9):120(CU9):CU$;::LCCU:6255+~:CXCU:LC0+, RTI$))2:TI$*7!*8 CHOOSE 1*=6210:6250i*B3:X1LR:1(X2)18(X9):320(X9):PO$(X);:*L3:1::CUR$;::CU1:LC1*i+j22:4:"PRESS SPACE BAR TO CHOOSE A POSTER"::"PRESS ";::"RETURN";::" WHEN READY OR ";::"M";::" FOR HAS ALREADY BEEN USED"::XX14000::59102)o?)p LOAD )zTI$"LOAD A POSTER FROM A DATA DISK":6100:LR0Ģ12:2::"THERE ARE NO POSTERS ON THE DATA DISK"::X14000::6099)6200:CXİ6300:4020)1040) READ CAT *:1:(40(:X$:@(LRLR1:FI$"PP."NA$:8500:8200:8400:PO$(LR)NA$:N(  NAME? (11:958:11:1:U$;:1:"";NA$:(NA$)10ĺ(7);:5910(4FO0:LR05950(6XX1LR:PO$(XX)NA$PO$(XX)""FO1(9,)>FOĢ23:1:958:23:4:BE$;::"THAT NAMEE THIS ONE.":16050::1000'5:"THE COMPUTER WILL SAVE THE COMMANDS"::"THAT YOU HAVE JUST ENTERED. WHAT DO"::"YOU WANT TO CALL THIS POSTER?"'NA$"":5900:NA$""ī5099'5100'1040' SAVE (:12:X$"SAVING "NA$:(40(X$))2:6100:3&FER0:FS9999%&434908&F,ZL,D,FS,FERC&43512S&FS415020g&FZ0:NC05018&X1NC:FZFZ1(P$(X))::FZ1(FZ256)&FS2FZ5020'10:2:BE$;"THE DATA DISK IS FULL. YOU MUST ERASE"::" A POSTER BEFORE YOU CAN SAVBS1:BW1:V0:H0:OH0:OV0:SD5:SC0:LC0:9% SAVE %LRPM%ė:BE$:9:3:"THERE ARE TOO MANY POSTERS ON THE"::3:"DATA DISK. YOU MUST ERASE A POSTER"::7:"BEFORE YOU CAN ADD ANOTHER.":16045::1000&:TI$"SAVE A POSTER ON A DATA DISK":(TI18)ĺ(7);:K$XYNCLB1:P$(XY1)P$(XY)::NCNC1:P$(LB)"":PC%1$21:958:22:8:"USE EDIT TO INSERT COMMAND":24:8:"PRESS ";::"RETURN";::" TO CONTINUE ";:16368,0$(16384)1284594$21:$$$ INIT ,%.BC15:BN0: ׯȫֳȱζйׯȫֳȱεйׯȫֳȱδйׯȫֳȱγйׯȫȳҠӠӠŠҍзů֭שвůȫשзů֫שгůȫשֳȱð׍ֲȱñױεıֲȲıֲȲıֲȱñαйׯȫֲȱιйׯȫֲȱθйׯȫֲȱηй̴ֲķֳȱձҲıֲ̲ȵ÷еů֫שдůȫשвů֭שвůȫשдů֫שжůȭשαвשιвůȫשйů֫שвůȫשŸñĴִȳöĴֵȳ׍ֶȳ׍ִȳĴִȳù̲ĴҲֶȳ׍ֱȴζӵóҳֱȴ׳γӳñҳֱȴ״ӱ÷αҳֲȴðιױĴҶղȴֲıҹȱշȵֳչұĹұֲȸ̲ղҶıñֲȲñαijҳճָ̳ȴΰòմֵȵ׍ֶȶ׍ֵȷ׍ִȸĴñִȱĴִȱñ̲ĴҲָȱñմҲIJ̱ıָȱ׍ָȲñմҲĴִ̲ȲóҲֵȲ׍ֶֶȲ׍ַȲıҲִȲ  Z 2950:3000 2075$ S H (CM$)3(CM$)4ER1:2075~ (CM$" ",2)"SH"ER1:CM$"THAT COMMAND":2075 Z((CM$" ",3,2)):Z0Z15ER1:2075 LCZ Z:SCZ:I039:0,39I:3200::BC:2950 2075 U  (CM? 24:8:"PRESS ";::"RETURN";::" TO CONTINUE";:16368,0W (16384)1282572j 23:1::958 RNNCNC1:P$(NC)CM$' 2075( R 2 (CM$)2(CM$)3ER1:2075F X((CM$" ",2,2)):X1X40ER1:2075P HHX:H39H39868:1:"ALL COMMANDS ARE ERASED!":X13000:;~ :4900E 2075O P h (CM$)3ER1:2075 (CM$" ",2)"PR"ER1:2075 X$(CM$,(CM$)2):X$(X$,33):CM$"PR"X$ 21:1:958:22 (X$)40ĺX$:2570 (40(X$))2:X$1X40ER1:2075' VVX:V39V397 2950:3000A 2075K  L o  (CM$)2(CM$)3ER1:2075  X((CM$" ",2,2)):X1X40ER1:2075  HHX:H0H0 $ 2950:3000 . 2075 ` N j CM$"NEW"ER1:2075/t NC0:21:1:2)):Z0Z10ER1:2075' ZBNZ:29501 \2075< ^ BS i `Z((CM$" ",3,2)):Z1Z10ER1:2075r bBSZ| d2950 f2075  D CM$"DRAW"ĠBC:LCBC:H,V:3200:2950:2075 (CM$)2(CM$)3ER1:2075 X((CM$" ",2,2)):XM$,2)"BN"2134' >(CM$,2)"BS"21426 @ER1:2075A B BC n DZ((CM$" ",3,2)):Z0Z15ER1:2075w FBCZ H2950 J2075 L BW NZ((CM$" ",3,2)):Z1Z10ER1:2075 PBWZ R2950 T2075 V BN  XZ((CM$" ",3,00 C$"P"2500$ C$"R"26005 C$"S"2700F C$"U"2800| CM$"ERASE"ĠSC:H,V:LCSC:2950:3200:BC:2075 ER1 ERİ2900 3 4 B 6(CM$)3(CM$)4ER1:2075 8(CM$,2)"BC"2114 :(CM$,2)"BW"2124 <(C  PRS  8400_ NCPMĢ21:1:868:1:BE$;"YOUR POSTER IS FULL!":X14000::ER1: (CM$CB$,3)"REP"İ4200:2075 CM$""ER1:2075 C$(CM$,1):C$"B"2100 C$"D"2200 C$"H"C$"V"3100 C$"L"2300 C$"N"24= 6200039310#383102 POSTER=n10000IsEK130Sx1000^20000lEK62000:D$"RUNHELLO2,D1": CONTROL 11000CH71099CH3LC0CH15000,16000,4000,5000,6000,7000CH0:1000K130!!!!!!!!!               ) ҠҠЬ ҠԠƠ`H,ՠĬϠРɺi#"DDӺ̠*("DD333øΰӱױñֲȲ(  //OO333 ,f"//DOO333)+h 9L8L< ɠ5!! ! ! ! 26,V39,"REP3(U3/L7/D2)","RUN","NEW",COLV6((FMAX20:PO$(FM):PMAX270:P$(PM):SL%(25)s62(S%(20):X120:S%(X):63( 1024,1152,1280,1408,1536,1664,1792,1920,1064,1192,1320,1448,1576,1704,1832,1960,1104,1232,1360,14886;(6( TITLE 6(D$(4)/7TERS,PLACE BRUSH HERE,PLACE BRUSH HEREk5( REPEAT,"RUN POSTER",ERASE POSTER AND COMMANDS,SHOW COLOR CHART5 ( 0-15,0-15,1-10,1-10,0-105( 1-40 SPACES,1-40 SPACES,1-40 SPACES,1-40 SPACES'6( SC10,BC9,BS2,BW5,BN3,U23,D18,R5,L38,DRAW,ERASE,"PR JIM",HX)::X19:RG$(X)::X118:SM$(X):f4' SC,BC,BS,BW,BN,U,D,R,L,DRAW,ERASE,PR,H,V,REP,RUN,NEW,COL&5( SCREEN COLOR,BRUSH COLOR,BRUSH SPEED,BRUSH WIDTH,BRUSH NOISE,DRAWS UP,DRAWS DOWN,DRAWS RIGHT,DRAWS LEFT,DRAWS ONE SPACE,ERASES ONE SPACE,PRINTS LET5)(95):U$U$U$:CU$" ".3'X110:SP(X):W3' 10,30,50,70,90,110,130,150,170,190m3'X110:PIT(X):3' 192,153,129,96,76,64,47,37,31,233'49103'3' DIMS 3'NN$(105)3'AB$(18),CO$(18),SM$(18)'4'X118:AB$(X)::X118:CO$('"RUN THE SAMPLE POSTER",SEE LIST OF COMMANDS YOU CAN USE,MAKE YOUR OWN POSTER,SAVE A POSTER ON A DATA DISK,LOAD A POSTER FROM A DATA DISK,ERASE A POSTER FROM A DATA DISK,GO BACK TO TABLE OF CONTENTS3'BE$(7):CB$" ":D$(4):U$(95)(95)(95)(9$DK$PN$" (SIDE 2)":DR%D:DE$PN$:VN$"MICROZINE PREMIER ISSUE SIDE 2":61000Z1$62000i1$DER%EK2o1$|1' INIT 1':1'10100:10200:10700:10800:10400:10900:1t' CNSTS 1y'PN$"MICROZINE":PM%18:MS$"PP."1~'X17:ME$(X):2$"OPEN"FI$",D"D:D$"WRITE"FI$:D$,0R!4351220!?0# READ ^0#RR1:D$"READ"F$",R"R:X$d0#k0T$ v0^$434900c$DK$"DATA DISK":QX%3:DR%D:VN$"MICROZINE DATA DISK":DE$DK$:610000e$620000f$435120h$DER%EK10$0$0$D2ıN1NC:NC08260"/0 R1NC:P$(R):*/D D$5/N 43512;/k H/l OPEN S/v 43490/ D$"OPEN"FI$;",D"D:D$"READ"FI$:NP:D$/ 43512/ / CLOSE / Z58410/ 43490/ D$:D$"CLOSE"FI$:D$/ 43512/3!/4! INIT />!43490!0H!D02.FI$"PP."PO$(CX):D$"DELETE"FI$",D"D:43512^.NA$PO$(CX):LRLR1:PO$(CX)PO$(LR1):k. READ w.NP0ı.Z58130.43490.NC0:D$"READ"FI$:R1NP:NCNC1:P$(NC):.43512. . RITE . 43490. D$"WRITE"FI$ / 7200:WIPEİ7300-:1040+-  CHOOSE <-*WIPE0:6200K-HCX07290-M22:1:958:22:"DO YOU WANT TO "BE$"ERASE ";PO$(CX);:"? ";CX$:(CX$,1)"Y"WIPE1-z-- DEL -::12:X$"ERASING "PO$(CX):(40(X$))2::X$:.4349EAD <,:12:X$"LOADING "PO$(CX):((40(X$))2)::X$:k,FI$"PP."PO$(CX):8300:8100:8400:CF1:w,X DEL ,bTI$"ERASE A POSTER FROM A DATA DISK":6100:LR0Ģ12:2::"THERE ARE NO POSTERS ON THE DATA DISK"::X14000::7099-v34,21:03Y39503YJ+ X%  `ӠˠӠҠ٭Ԯl" 0L@` g RgƖ8PgPQhQghe Ӣi  g y  gh^_8^eP^ȱ^ eQ^^_Ll8ePeQ`L"