2IMGCdrP@@@ 8L2C)pJJJJ IH(ȱH:=IH[H`@HcH  $ +   I/H`JLNGȄBȄF aK  haaFF  mJm# KKJ UJ )J ۈ) ;J3ȱJFȱJGJKaȄM  aaNNJFLGJL L? &PRODOS `DaElH$?EGvѶK+`L HHLy XP LM ŠϠĠӠS)*+,+`F)) (*=GJFjJJA QE'+ '== `@ STSP8QSS8 m P o R(8RLnSOS BOOT 1.1 SOS.KERNEL SOS KRNLI/O ERRORFILE 'SOS.KERNEL' NOT FOUND%INVALID KERNEL FILE: xةw,@  ȱlmi8#)!) >dLԡm#i㰼m#iЕOLԡȱfg hi !dLԡ憦  Ljmkm l y`2 Lԡ8(Je稽)ʈ@LBASICEMEO' @&PRODOS<n ! A,BASIC.SYSTEM'(n ! aCALLNAME;Q/Q/$QUIT=n n 'STARTUP@ n !n %INTROGIn !n $MENUM n !n LOASM2.0Sn !@n %PRINTUQn !n %SAVERe,n !@Q0%WORDS} .n !n 'PROGRAM\n !@Q1*INTRO.TEXTKn !n *PRINT.TEXTn !Y (NUMERIC1'n !@Q1*WORDS.TEXTQ1!Y ,PROGRAM.TEXT n !Y (NUMERIC2_-n !@Q2RUNMENU7n !n CAT.NAME Q2Q2RS39n !n RN3>n !n *SAVER.TEXT n !Y -NUMERIC1.TEXT n !Y -NUMERIC2.TEXT n !Y )PIC.LOLLY n !@n +PIC.MAILBOX n ! n RUNSAVER n !@n UP n !n RN2n !n RUNNUMERIC+n !n CR! 5$^!_! O&qM8d\ # ) f!`!&`!a! O&5   R!Y!0 $Y!0b!c! O&-) &d!e! O&Эb)0I0 ( Q!N)Gi/ U!4 [!\!]! X! iL X%+!L(!ΠΠҠ`j!!"!!!l!"# G#YO!-D(DR9B}PBiBPN  !"#$%!-RB}PBiB ,m# m# J Qڨ)̰n]e мȱ ; ̀𩠙< iO P F V >Z SY ɘL` X _ [ V7 c L '0%O '8O JmO * ʈ0  0ŠϠĠ͢Š͠͠ϠŠŠϠĠخ͠ YYZLYLYLY뿩 8@  *$ MNЩUM  L 5   8 0 8 `0 / x X$$ $&$0`ŠӠԭԠŠҬîʎ1DžϠ&8f ZHH)hh8JhJJJJJ &H&8H) 12 (j21 h!hH h %)Ђ12H)M0 h10200I20h2 %&`L#`&!"L  :8! ȱɈ  )& ` (Xp< @& )m&&.& & M&i  ``rȱȱȱȱ0]cȱeem((ȱ)(ȱ*()(ȱ2()(ȱ:( '(( f' 'LS&`L' x'L& ' LS& 'L&8ei` ,$`ee` `(( '(( '` ' ' '`hh8`8`)(*(2(`}:(`e`H)hJJ'0JJ)` (< ( < *? ( < (? ( < (? ( <*? * **? *? *? ( < *? ( <ꠙ,<ʆ>*=?BC8 é&'112`HB-4F 1"aɿ LL@ Nϰ H  @h( L Lh  @`bLJCAB@=?<>=?<>CAB@?A` / L  <>` ڢF]PL8i m L   4< L  BLRAM' hLDLآ <B*IBGF08Lé'+8H <(h`@؍L3،h@ihAiȱ@JJJJq@)@vȱ@Hȱ@Ah@$@ce J) LxL LxJiB LxJ) <ҩxNhHHHHL(  аƠx@BEOD w а(`( C)CJJJlBJ,~@~@}J@` ߩ%S @ ~`EhhhѺ0 h ѐ# ѐ ѐ ѐ 0 HϭэLпllllhh8` QSTV'P0ōҍJJJJ ɺi) ɺiL9ҎVl R)?DE S ҰR Ӱ R  |Ґ `l@Hȱ@I[HXAT==ȱH ɯ[ȩWY=5H)/@a)_WW .0 :A[8@`,WW=W\Y\Б[` Ґ L` א@>)I3[8=>?@`K8`@Nȱ@Oz@y ZIiNȽN)/ȩ/N`@[ WHJjjj1hA }'KI0|JHi 0`1C8` yz@yz Z3yNY@) Wڎ\i ԭYiY\`0 iڰ0GF ݰ#00 ڰW,T0 0 ۩.H hȑNWȮUNTW8`WYNWY0NN` װG8`F@ 0 [ :LթK8` I8`FHGH ܪhGhF ݰբFF芝 ݰFG ݮI mIHHymHȘI ݰLԩ` ՠ @@ @ЮY)mYʈ@ȱ@ȱ@#$)7I0 '* ܰ7FG ݰ( ְLݩI mIH`  S0FG ݰ ֬HFG ݰFG ݰ%" ݰX)Im'F(G)* ݰ4 ֭ $H ݰ%HFFHGHG ݐ`R8`͍͎)` װ H` /ٰR(*؅IHHЍ@`:86 ؐe76 8* 8Q8`7*؅IFG ݐ`:: p8D`F` ilH)HFȍHG ݰ$%7&8!8* J8` Lע )I '`89iFG`9*؅IH3H :( : )6WYȱHW`98eHI ٰSB0 ؠ0F7ʈ pٌY`Y8mY0>`,[Z0H Zhi LٍWȽWh00GFZY8y?F@G ݰ ڰ`00ZY Wڭ01i E8`1i0i iڰ$00̩GF ݰ ڰ ڰ`12)i1`00`Ȏ0i 0U`Y)W8`W`0 ېW }װG =۰A)H 0ʈh0)*FG'(`)/ /8ʈ` ۰0)i `TU8`0R ܍;%&: ݰN0FG ݰ< ;0 FGLۮ0:0 &%834`H8` ܹ ,:% & 8;:` %& `0JJJJ`;H0;hn):N;jN;jN;jAN;.C WݰHH; ݰ;;0E ݰ*ANC: DDab`Z8` Wݰ#CCB B 5ݐ`AB& .& .& .&8C*J%C DD0%&`0JJJJi LWݩH8`0E ݰ0ED0 ݰ 0 B`D ݰD`E0HyFiGB0HE0FFGG ݪh0`שB*xEDQ0C а(`(8`1@`M8`18@GʈI1)%J8%% KL|߹ Lߠ1C8`5)@ i1)%K8%5zJJ K_ F Lr߹) +5&KJ(b .1FG/8` .KJHIH IL9߅FHGI ѭKJJjHIH;7I1JJ Zߐ3HIHIL|ߩJKJK`FHIG ߰( ߬1Ȣ,IJLJ)eKM`1)` J %J9J ߰$90 ߰9JFJL8`JGBJ T 1FG`BH T1FG`H 1hHBF  GxDE10Q0C а(`(8` L*J 1 :"L ݢH 1 : 19` א@ P8`12B8` 1JJJJ) ) )6вJ8` G1悔F19 $ ӭ+I ;ސH1  "1h8` ߰0 1@`96229 (12 6 )8`)i п`  H h)N$%1IyLJzM yLLy zL Z L ;ް  0pMJN )@QNJOK ;ްiKKMMJJ KKIJN L MJФ̭KJJjHFIH QHIGQxKE а((H hH h8`8yL@ȭzM@L;ެ18NINO 8P OIJLL`MRMʱLN.MOJKMEKP/MMEKMLCL-PMO OJK,IpLeNNO(`JNKO1L ;ް/  0P L8 | Zߠ1J`L@yLȱ@zM1 `@Nȱ@O1`1I,}y%I%` t),% t 3 t)%` 1` H  ^h)N@ N;y zL  ;ް$ )bJ34 f۰ ) H BhL ) . )KJJjI&HI%H1  PLMEMʱNLMOJKMEKP%MMEKML2 OJK,IL PIeNNO >(` R  F .AKJ%HI&HI1 HIHI`  .` .A1 H% H& IhHIhH  i ` ܰ ii` )0CB `@5]1͔ M @B1i ׭]` .1 "#10 iڮ0)`L@.]1 1i ]8`L Ӑ L] Ӱ )ܹ0 )p )@ )  10FG ݰ حFG ׬1  %) % ְ1)E ݰ`H@h]`h`1`N8`  ` ) N1Ȣ)@I)I1@ʈL> 簞KIJH1ȢI1IIeJd)fKJcnde fd8d ccdf1 ^ _ab PH81^ a)`JJJJ1 1ȢII ;ސh(8H K@J5 K9X(K KXXK1 Ko`V8`n|o}`  on} KI9XX}`)HJJJh`OzyeNeO࿰ K9XАO`|@ȭ}@` }O|N 1NJKO`HHHHхhhhhL@Ae >]**ӂӹK|e9IJK,-NOPQRSuHUSTON!' @   !"#$Ԡ͠ˠĠԠLL`BLLТТТТТТТТТТТТТТТCOPR. APPLE,1983LM Mh@8nЍLЭ 0J @L:LLLՐ`BLڑL COPYRIGHT APPLE, 1983 h@ 0J @L:HUSTONP8H  ): e: y8鰕:Jjjj<)yi8i;i(*=>hP8`;Zx3QTTSRWVUHEVhEhH)IWHPHHHAHHHLaVEWLӿFGV*& .V  JJJJH :h Ei :EX`'8`jWC)p> pCYY 轊( ( BV ( p0 \BiJ @i> i'j:ZH i@ioZZH h ȭnWǥBJ 8X` +>*L o % XZoX 3 NZ`rZLkZq8r7IZiZkk 8 s q | kн Z)*>>` @ $(,048<@DHLPTX\`dh 0ުlptx| 0($ p,&"op8`kkV꽌ɪɖxl*k-kmMl 꽌ɪ`8` ZsDE8T8Wpq 7I꽌ɪ꽌ɭ蠪:VE:8`]V]H)]V])]T])] >8hUD` X`> Hh݌(`HCJJJJ)*h`8L:HhHh VY>:Y)`;R?AJ;<ȰY)`Y?)`ȐҰ ;HhHh=`Hh `Hh`DEiȍ018V%&8V)HV)hH)hHIhդD?DRIDQD); ?JDQD]`MY pY)p  p`  X A %  % ɍNH hɛɘɉɈ $ LN :LNې)ɮ۰ɺ'Ɲ LN  : X i % $ɛ$ɘɉ ɈL :Lɍ)ې)ɮ۰ɺH h 'ĝL  LL LXʩXύX)'L L L'L  (L(L $ʩ $$ $L `ީ %  &@DEF   %LҠؠӠ΢ϠԩҠŠƠԠԠŠӢɯϠҠůȠԠĠ  $# {  { / XXύX?klmnÍoL) !6L'!(0`670! = ***)<JJH !h穖tp% !Z/݀!!' ! !5).莀/ ! !!!!! !!$ ! "<" !!뭳!!!!ILYL 8!9!詍` ! !ՠՠɠ!STARTUP/p&()*+,-./0123456789:ŠϠŠà͠ӠàԠŬH06172839h` 97L75v^͘ ?/( ?LHLLɍ$?`? ɍɥAH93827160hH46576879h`,C Lޛ $0. ɍ  ,S0 ?@ L L 얻ɠ, XLޭBDEF޾ p 7 ޾ p($ذ (0 R( L?ԦʚLeةީ s +  L ,FL,DLE,C0!3 > Ɉ 3ɾL(3ɾ;Ƀ RB94 % ʽ  ٚ,S` w $݅3`(l8L"3L>(Ƀ,`3,G0]ɾ ` w`پ_پ p _پ׾`>( p۾m׾) W)ʩ@`ɾ>(O puȾ ɾ-O c־Jjjj `O>0O  矢POپھ p >H־Ǿh۰8L"־Jjjjɾ)Ⱦ8 ( OL L$L>(F`־ؾپھ׾` Ʉ +KDEF L LH KɍKL"?`  L@3 @LtJ)s@J % `͘?s?,E30ɍФ3 +E3HD F3 Ʉ%h3 M +E  LthɍLL3`3,A0s0% Ipn + {pnI:L ؅30,3LZ8[933LAAJL ةޘг uv $ 8LЌ Ie p>?@`>?@`BN8`b 矮K ⟩ 䟢 춼LK  w KK`JJJJ8`轗K)` 7#hhL"Jپھ pHJh` {!hgt}~p  `~t}p8n~ni}tpi~~tsLo8pinii>j?k̈́>~|p|Ii||̈́ ҡl 4 j `>i>?Ek?!>Q>>>̀ `` > ̀ `e>>?́?>?Emn(>e>ȱ>e?>Q>ؠ> ie>>?`|;}=:<~:<=;`||m};>:8o>oȑ>ppȑ>> :op` {Kpnͳ @p;=po:i>?Ek?>Q>> 5L壥>  5e>>?́?`>ȥj>>m>` T]m8injkiljo풼S <=$I0 U)VJ 'T)`l8`a HbIJhjǾȾɾ p٭b=a ' L>W)8VJưϥ3 ⟢켼 `F`4W)ɐ/XYjV) '8` e b`l׾ 뱰XYW0V):W׾ؾ_`)0%I0)3]8X^YȰ8` 8` p Ⱦɾʾ8`پھW)@%ZȾ pSԩ p`SW)0پȾھɾ p p 0LjÍ L I 뱰9 1׾ؾ  p p 0 H h(`׾ؾ` 뱰 ߭׾t8퍼mؾŰ펼t폼 L8` ˌھپLp k V)@W0!XY ^X6Y7` ^ YX`X:Y;τ<:: <`:8`'OV)Jj 'f a  ԟ  ԟ ⟭ + (:ji ԟɃ B ,  > ԟ ` ])Y 񩢍`Ⱦɾ0Ǿ p)莼 ' 6 t= i& i8Hh i` 6Y׾ؾ+پھ p|پɾʾ`HV)jh츾$-#Ͼ p о־޾Ǿ` 8` 8`ɾ)ɾ̸ ɾɾ0miȾ p pY)ικ`lP v*,N!ǾȾɾʾ pǾ~H Rh8`8`,C R  8` 2ȾɾM$ mHݓǾ phϾ pH h8`Ͼо־ǾҾ_` BӾ pW) yLC`C N `9V) ß ` V) v޾ p` v (8` 8`8`(W)`_V)Ij!؍Í`_ jЭW)`_ 2Ͼ pH h8`jGMоM  G):_`蹀:`V)8`MN; ;`;C N8` G)̀#:蹀:`V)R v޾,N0MHhHh p' ,N HCNh`M`M N `޾Lp vh־Ҿ,G0^W)TP) ecfdپھ׾ؾӾ p$c d pccddީ 8`ȾɾʾNfne}ȾȾI>Ie f`8` vP־ǾҾ,G0C =W)_``\"׾پӾؾھ pD`־ǾY׾ؾOW)ݩȾɾʾ pD`8`W)CB) ص 5W) )W)@! pZ}ȾȾ󰹩 p` v־ǾҾ,G 8`׾ؾ  p Ͷۥs׾tؾE` v ( о(־Ǿ,G 8`_`W)H־Jjjjh p̭ L8Ǿ ..8 ۭ (8mȾȾmɾɾʾiʾ` Lpl8l:/[ҝƬƀ#(ZZV4D\-:% >M CgIY2m*b6>BSAVERIFYBLOADELETECATALOGOPENWRITEXECREATEFRESTORENAMEBRUNLOCKCHAIN#FLUSHREADPOSITIONOMONPR#PREFIXCLOSEAPPENDu {Xx-ĭ-eͫzt> Ut⭳ԭci@@ -!S    !C- !ABELSDFRV@@ !$(19@EüϠž(+@ABCDEFGHIKLMNPSV     T[fouu~ՠٯ* PWN*]ĿNTz @n6VC/+A>@I5gN Oz @n[Dz @nd0,~z @`$仫@v$⩔,C[B?I>孓`仫6VtCicQĿUKqtVt Nʮq$6,⨁ K6, VtI=v!gNVt Vt  lg~TŠӠŠҠL2LLL"L  HK)\ `=P8` ԠŬLL<computer user 101IN$"X":32,0:33,40:34,0:35,24::T3:B10:L1:W39:81:71:"You are about to leave this":"lesson. When you press RETURN":"you will be in Applesoft BASIC,":"and will be able to write and":"save your own BASIC programs.":21 32,0:33,40:34,0:35,24::24:, 16368,0c P(16384):TETE1:P15591:P1341:TE22531 )P141TE0:998:16368,0: 3M$"Press RETURN":61:Z1700:Z:M$"_____________":61:Z1700:Z:31 =B:(W(M$))21:M$;:; G34,T2:35,B:<>32,L:33,W1::BD2W1:T1:BD:"_";:B:BD:"_";:BD KBDTB:BD:1:"|";:W:"|";:BD:34,T:35,B1:32,L2:33,W4:: Q32,0:33,40:34,V:35,24:: [32,0:33,40:34,0:35,24::(4);"RUN MENU" e Getting Down to BASIC by Jeff Vasek, Ed.D., Apple Computer, Inc. November 7, 1983 X928933:X,0:X50006000XY(6,60),N(6)(21) D$(4):XB5:YB16& :15:5:5:"Apple presents"H 12:12:"Getting down to..."a D$;"BLOAD LOASM2.0"{ R0:8000: READ DATA 4000 2000: PLOT WORD BASIC (3000: SET UP BORDER 21000: SCROLL & WAIT FOR KEY 7::10:10:"Please wait..." ?ABCDE<:(4);"RUN MENU" d" 5 R6:I0:C1:6X DL16384768:HL16384:VL16387 DL0,0:DL1,39:DL2,0:DL3,0:DL4,0:HLOC 1500:I0ī1200 DL0,39:DL1,39:DL2,39:DL3,0:DL4,0:VLOC 1500:I0ī1200 DL0,0:DL1,39:DL2,39:DL3,39:DL4,1:HLOC4 $1500:I0ī1200g .DL0,0:DL1,0:DL2,39:DL3,0:DL4,1:VLOC| 81500:I0ī1200 LK0:C VKNP(R)22ī1130 `XY(R,K)XB,XY(R,K1)XBRYB eKK2:1110 jRR1:R01150 tR6:CC1:C15C1 yC ~1500 1010 . J(16384)? J128ī1590O J141I1_ J(16368)e 6 RO(0)0:RO(1)6:RO(2)1:RO(3)5:RO(4)2:RO(5)4:RO(6)3 :15 R06 DC0 P1NP(RO(R)) X1XY(RO(R),DC):X2XY(RO(R),DC1) J1 X1X2ī2040 J1D IX1X2J:IXB,RO(R)YB:K020::R DCDC2:X c 4R46s 9JNP(R)21 >I0NP(R)22 HTXY(R,I):XY(R,I)XY(R,JI):XY(R,JI)T RTXY(R,I1):XY(R,I1)XY(R,J(I1)):XY(R,J(I1))T \ f  BORDER C0:0- I039:I,0:3200:G I139:39,I:3200:d I3801:I,39:3200: I3801:0,I:3200: A$"Please press RETURN to start." 22:(20(A$)2):A$ A$"Copyright 1984 Apple Computer, Inc."  24:(20(A$)2):A$; # CC1:C15C0, C:716390c16300,0:16297,0:16302,0:16304,0oI01916384768,I16393hI768861:A:I,A:I173,50,190,72,173,51,19072,169,30,141,50,190,169 3,141,51,190,32,111,253)104,141,51,190,104,141,50G190,96,32,27,253,201,155e240,31,201,141,208,35,96234,234,234,162,0,32,117253,160,2,138,145,105,200169,0,145,105,200,169,2145,105,76,57,213,141,02,169,141,162,1,96,201136,240,8,201,149,240,044 201,160,144,1,96,169,160D56,176,192Jfp:(4);"OPEN CALLNAME"z(4);"CLOSE CALLNAME"(4);"DELETE CALLNAME"(4);"OPEN CALLNAME"(4);"WRITE CALLNAME""computer user"(4);"CLOSE CALLNAME"@I06%EY:NP(Y):K0OJJ1NP(Y):XY(Y,K),XY(Y,K1):KK2:UT[r& 0,5,0,3,8,8,13,16,18,22,25,28& 6,6,28,25,22,18,15,12,10,10,6,6,3,0& 1,7, 0,0,4,4,7,7,9,9,12,12,20,20,24,24& 5,7,24,24,20,20,16,16,10,10,6,6,4,4,0,06& 2,7,0,0,4,4,6,6,10,10,12,12,20,20,24,24e& 4,7,24,24,20,20,16,16,10,10,6,6,4,4,0,0& 3,5,0,3,6,10,13,15,20,20,24,24 NI854861:(I);",";:I 351{IN$"X":32,0:33,40:34,0:35,24::F$"INTRO.TEXT":321:161:101:161:101:161:101:161:101:161:331 16368,0:231:NA$AN$::T1:1:(NA$)15ĺ"That's a bit long. Please type":"a shorter name (less than 15":"characters)."::11% T13:B20:L1:W39:221:151 "Is your name ";NA$"?"::"Please type Y if this is correct":"or N if it's wrong.":"Then press RETURN.";:CP1:231:CP0:AN$""ė:T1:1:31 )(AN$)89(AN$)78ė:T1:1:31V 3(AN$)89ė:T1:"We muFHIJKst have misunderstood.":"Please type in your name again":"and press RETURN."::11 =:(4);"OPEN CALLNAME":(4);"CLOSE CALLNAME":(4);"DELETE CALLNAME":(4);"OPEN CALLNAME":(4);"WRITE CALLNAME":NA$:(4);"CLOSE CALLNAME"::T2:1 G"There are six sections on this":"disk. Unless you are familiar":"with Applesoft BASIC, we suggest":"that you go through the sections":"in order.":101::T2:1" Q"But you can return to the menu at":"any time by pressing the ESC key.":101::T2:1:"Now you're ready to begin. Press" U"ESC to go to the menu, or press":"RETURN to go to the next lesson.":928,1:101:331::(4);"RUN PRINT" [331:311 e16368,0 oP(16384):TETE1:P155341:P13121:TE225111 yP141TE0:998:P M$"Press RETURN":141:Z1700:Z:M$"_____________":141:Z1700:Z:111m B:(W(M$))21:M$;: 34,T2:35,B:32,L:33,W1::BD2W1:T1:BD:"_";:B:BD:"_";BD:BDTB:BD:1:"|";:W:"|";:BD:34,T:35,B1:32,L2:33,W4:::J:(4);"READ ";F$:S$"":A$"":NL1:S$:S$"%"İ221:T,B,L,W:151mS$"&"āHT1B1:H:868:H813:IN$(IN$,1):IN$"^"211NL1ĢT1:1NLNL1:IN$;:18132,0:33,40:34,V:35,24::16368,0:AN$"":CP1251(93);:2KR0:768:J512736:X(J):X155341:X141J736:301ZX162R1jJ512291AN$AN$(X12832(X223)):301#AN$AN$(X128)-J:732,0:33,40:34,0:35,24:16368,0::A:(4);"OPEN ";F$: K:(4);"CLOSE ";F$:BU32,0:33,40:34,0:35,24:331::(4);"RUN MENU"H_ 6000104,8:103,1)(21)5:5000P34,0:33,40:16368,0v :T$"Getting Down to BASIC Menu"1000U140:"_";:U:" 1. Introduction"(:" 2. Printing Numbers and Calculations" 2:" 3. Printing Words" <:" 4. Writing Programs"? F:" 5. Saving Programs"b P:" 6. All About Variables"v d:" 7. Quit"~ gT0 iI17 j(I927)1Ė(1):2(2I):"*" k(I927)1JI1:T1 nI sT1J1 x2000 17A :"Type a numbeLNOPQRr, or select with the UP or DOWN ARROW key. Then press RETURN."V U140:"_";:U :"* marks a topic you have completed" 19:35:868:CH$ (CH$)13ī280 (CH$)10(CH$)11185 (CH$)10KJ:JJ1 (CH$)11KJ:JJ1 J8J1 J0J7- 2200:2000:170T (CH$)81(CH$)113KJ:J7:181q (CH$)49(CH$)55170 19:35:CH$:KJ:J(CH$)48:2200:2000 19:36:RE$ (RE$)13280 (RE$)8170 (RE$)10KJ:JJ1:179 (RE$)11KJ:JJ1:179- (RE$)49(RE$)55195R KJ:J(RE$)48:2200:2000:170s :10:12:"Please wait...." "J310,320,330,340,350,360,370 6:(4);"RUN INTRO" @:(4);"RUN PRINT" J:(4);"RUN WORDS" T:(4);"RUN PROGRAM" ^:(4);"RUN RUNSAVER"0 h:(4);"RUN RUNNUMERIC"G r:(4);"RUN QUIT"M ` H(40(T$))2k H:T$q  IFVAL (CH$) < 1 OR VAL (C H$) > 7 THEN VTAB 20: HTAB 19: CALL - 868: GOTO 175 J2110,2120,2130,2140,2150,2160,2170 2(J2):6:T$;8>T$"">CkHT$""qMRT$""W\T$""afT$""kpT$""u zT$""9K2210,2220,2230,2240,2250,2260,2270N2(K2):6:T$;fT$" Introduction "lT$" Printing Numbers and Calculations "T$" Printing Words "T$" Writing Programs "T$" Saving Programs ""T$" All About Variables "(8T$" Quit ">XI768861:A:I,A:Ix173,50,190,72,173,51,190 72,169,30,141,50,190,169 3,141,51,190,32,111,253 104,141,51,190,104,141,50 190,96,32,27,253,201,155 240,31,201,141,208,35,96 4234,234,234,162,0,32,117 T253,160,2,138,145,105,200 r169,0,145,105,200,169,2 145,105,76,57,213,141,0 2,169,141,162,1,96,201 136,240,8,201,149,240,04  201,160,144,1,96,169,16056,176,192 p:(4);"RUN STARTUP" L @L@LALA ACGCC<CC @ @C0-CC-C CCCCCL@CC>ʎCC @ @C(-CC-C C0CCCC A`j CC CC`HJ) h)i ` ACbCCWʎCC0= @ @Cj @C(-C A-CC-C CCܮCCCL@CCUCC0= @ @Cj @C(-C A-CC-C CCܮC0CC ACjjjjj` A @ A` C` C` AC @' A` 1211IN$"X":TT0:BT24:M0:521:621::F$"PRINT.TEXT":1181:551:471:551:471:TT15:BT24:32,0:18:1:(93);:621:18:10:721:255:M3:19:20:"(You press RETURN)";:471:19:5:868:1:NU:TT0:BT15:621:M0 551:471:551:471:TT15:BT24:611:551 TT15:BT24:611:621:16:641:W38:B9:T3:L1:X1:741:E1İ631:"Please type PRINT and a number,":"then press RETURN.":21 BSX:781:E121% )741:E1İ631:"You typed ";(AN$,BS);".":"Don't be shy. Please type PRINT":TVWXYZ[\]^_`abc"and follow it with a number.":21 -(AN$,X)""İ631:"You typed ";(AN$,BS);".":"You should follow PRINT with":"some number. Please try again.":21 3Z0:FI$(AN$,X):NU$(AN$,X):EN(FI$):971:E1E281m =E1İ631:"You typed ";(AN$,BS);".":"You shouldn't use letters or":"symbols (except - or .) in your":"numbers. Please try again.":21 GE2İ631:"Although the //c can handle":"numbers up to 38 characters long,":"this simulation will only handle":"numbers up to 8 characters long.":21# Q(AN$,X,1)"0"Z1 [NU(FI$):NU0Z1İ631:"You typed ";(AN$,BS);".":"You should follow PRINT with some":"number so that you can continue":"with the lesson.":218 e17:1:NU:631:"You did very well, ";NA$".":"Would you like to practice using":"the PRINT statement again? (Y/N)";` oCP1:641:AN$""Ģ6:33:958:111 y(AN$)89(AN$)78Ģ6:33:958:111 CP0:(AN$)89İ611:531:L:T1:"Okay, type PRINT and follow it":"with a number (remember to":"press RETURN).":21TT15:BT24:611:TT0:BT15:621:551:471:551:471:551:471:TT15:BT24:621:1:18:"]";:10:731:255:19:19:"(Please press RETURN)":471:19:5:868:1:NU:TT0:BT15:BT:551:471:TT15:BT24:611:TT0:BT15:551BSY$(1)"+":SY$(2)"=":SY$(3)"-":SY$(4)"_":SY$(5)"*":SY$(6)"/":SY$(7)"?":SN1SY$"":TT10:BT15:611:12:641:TT10:BT15:X1:N(1)0:N(2)0:741E1İ631:"Type PRINT, then type":"a calculation with two":"numbers.":161BSX:781:E1161741:E1İ631:"You typed ";(BU$,BS);".":"It would help if you would type":"in some numbers after PRINT.":"Please try again.":161(AN$,X,1)"-"XX1:N(1)1X(AN$)E1:171G811:SN1SY$"+"İ631:"You typed ";(BU$,BS)".":"For this to work, you must use":"the correct symbol (+). Please":"try again.":161_E1E2E3271E2İ631:"You typed ";(BU$,BS);".":"For this to work, you must use":"one of the symbols below.":"Please try again.":161cE3İ631:"You typed ";(BU$,BS)".":"You found the right key, but":"forgot to press SHIFT key.":"Please try again.":161E1İ631:"You typed ";(BU$,BS);".":"You should not have pressed the":"SHIFT key when you typed the":"symbol. Please try again.":161U911:E1İ631:"You typed ";(BU$,BS);".":"Please type in both numbers.":"Try again.":161m961:E1E2321#E1İ631:"You typed ";(BU$,BS);".":"You shouldn't use letters or":"symbols (except - or .) in your":"numbers. Please try again.":161-E2SY$"*"İ631:"Although the //c can handle":"numbers up to 38 characters long,":"this simulation will only handle":"numbers up to 8 characters long.":161M7E2SY$"*"İ631:"Although the //c can handle":"numbers up to 38 characters long,":"this simulation will only handle":"numbers up to 4 characters long.":161AAN$(AN$,X):XSL1:E3İ631:"You typed ";(BU$,BS);".":"It would help if you would type":"in both numbers. Please try again.":161VK741:E1İ631:"You typed ";(BU$,BS);".":"It would help if you would type":"in both numbers. Please try again.":161zU(ST$,1)"-"XX1:N(2)1:ZC1_1011:E1E2E3291:1091:DE1371i631:"You typed ";(BU$,BS);".":"Dividing by 0 will cause an error":"message. Please try again.":DE0:1613s13:1:FS:SN1401}631:"Very good! As you might guess,":"the computer can handle other":"operations. The box below":"shows you the symbols."yT17:B23:531:T1:1:"Addition + (PRINT 23 + 48)":"Subtraction - (PRINT 20 - 2)":"Multiplication * (PRINT 4 * 12)":"Division / (PRINT 16 / 4)":B9:471:T3:B9:411SN1İ631:"And there is the answer.":"Would you like to practice":"some other calculations? (Y/N)";:4317631::"Would you like to practice":"some other calculations? (Y/N)";_CP1:641:AN$""Ģ6:31:958:421(AN$)89(AN$)78Ģ6:31:958:421CP0:SNSN1:(AN$)784614SY$"-":631:"Okay, type in any calculation":"using one of the math symbols":"below (don't forget to start with":"PRINT).":161TT0:BT24:611:929,1:551:471:TT0:BT24:611:1191::(4);"RUN WORDS":471:1191:117116368,0P(16384):TETE1:P1551201:P13491:TE225481P141TE0:998:EM$"Press RETURN":511:Z1700:Z:M$"_____________":511:Z1700:Z:481hB:M(((WL)(M$))2):M$;: (4);"OPEN CALLNAME":(4);"READ CALLNAME":NA$:(4);"CLOSE CALLNAME":$34,T2:35,B:32,L:33,W1::BD2W1:T1:BD:"_";:B:BD:"_";:BD:BDTB:BD:1:"|";:W:"|";:BDJ34,T:35,B1:32,L2:33,W4::'(4);"READ ";F$:S$"":A$"":NL1:S$:S$"%"İ611:T,B,L,W:531:5811S$"&"İ541;HT1B1:H:1:868:HE813:IN$(IN$,1):IN$"^"601OTNL:1:NLNL1:IN$;:581 Y/c32,0:33,40:34,TT:35,BT::Pm32,0:33,40:34,TT:35,BT:wTT0:BT10:621:541:L:T1:HT1B1:H:1:868:H:T1:(4):16368,0:AN$"":CP16611:(93);R0:768:J512736:X(J):X1551201:X141J736:711X162R1R1701DAN$AN$(X12832(X223)):711YAN$AN$(X128)jJ:BU$AN$:NU((1)1001):2:"PRINT ";NU;:NU784:2:"PRINT 345 + 439":E0(AN$,X,1)" "771:X(AN$)E1:XX1:751 E0:(AN$,X,1)"?"XX1:@E0:(AN$,X,5)"PRINT"XX5:!E1:TT0:BT10:631:L:T1:"You typed ";(AN$,BS);".":"You didn't use PRINT.":"Please try again.": +J0:E0:SP1:NU$(AN$,X):SP1(NU$):A17:(NU$,SP,1)SY$(A)SLSP:A7:SP(NU$):831" 5SP(NU$)E2:A77 ?A:SP:E2871W IA17:(NU$,1)SY$(A)J1g SA:J1E0p ]901 gMS$(NU$,SL,1):MS$"_"MS$"?"E1 qMS$"="E3 {E1E2E3SY$MS$  E0:ENSL1 EN0E1:!(NU$,EN,1)" "951!ENEN1:921!L!E0:FI$(NU$,EN):SY$"*"(FI$)4E2:`!(FI$)8E2:!Y1EN:T$(NU$,Y):(T$)45(T$)32(T$)46(T$)47(T$)58E1!Y:E1FI(FI$)!!ST$(AN$,X):E0:SY$"*"((AN$,X))4E2:"((AN$,X))8E2:="((AN$,X))1(AN$,X)"-"E3:V"((AN$,X))0E3:"NU$(AN$,X):SL(NU$):Y(NU$)11:(NU$,Y,1)" "SLSL1"%Y:Y1SL:T$(NU$,Y):(T$)32(T$)45(T$)46(T$)47(T$)58E1#/Y:E1SE(NU$)#9$#CSY$MS$:N(1)1FIFI19#MN(2)1SESE1O#WSY$"+"FSFISEe#aSY$"-"FSFISE{#kSY$"*"FSFISE#uSY$"/"SE0DE1:1161#SY$"/"FSFISE##32,0:33,40:34,0:35,24:16368,0::#:(4);"OPEN ";F$:$:(4);"CLOSE ";F$:J$32,0:33,40:34,0:35,24:1191::(4);"RUN MENU"P$ @1481c@IN$"X":TT0:BT24:M0:581:571:701::F$"SAVER.TEXT":1451:631:521:631:ET13A TT(1)12:BT(1)24:W(1)38:B(1)10:T(1)3:L(1)1:IV13:1391:15:SN1:821:891:861:" 40 PRINT ";(34);I$(1);(34):921:TT0:BT12:691:631:521:631:521:631:521:631:521:631::521:631:521:631NSL2:BSX:1011:LN$"30"İ711:"You are trying to replace":"line 30 by typing 30 and a":"PRINT statement. Try again.":261NXX2:931:E1İ711:"You typed ";(BU$,BS)".":"You should follow the line":"number with a PRINT statement.":261PO#1021:E1261:931:E1İ711:"You typed ";(BU$,BS)".":"You should type a new literal":"quote to replace the old one.":"Please try again.":261O-PN2:1051:E1261:1081:E1261:1121:E1261O7TT12:BT24:701:24:::TT0:BT12:631:521:631:ET1]PATT20:BT24:691:701:21:741:W38:B10:T3:L1:X1:931:E1İ711:"Please SAVE your program under":"some name other than POEM.":"Try again.":321uPKBSX:1151:E1321PUPC1:931:E1İ711:"You typed ";(BU$,BS)".":"To SAVE a program you must give":"it a name. Please try again.":321+Q_PC0:SL(AN$):Y(AN$)X1:(AN$,Y,1)" "SLSL1DQi(AN$,Y,1)" "YXQsY:PN$(1)(AN$,X,SLX1):(PN$(1))15İ711:"You typed:":(BU$,BS):"Program names can be no longer":"than 15 characters. Try again.":321oR}(PN$(1))65(PN$(1))90İ711:"You typed ";(BU$,BS)".":"You can't begin a program name":"with a number or symbol.":"Please try again.":321RY1SLX1:(PN$(1),Y,1)" "E1:711:"You typed ";(BU$,BS)".":"You can't use spaces in program":"names. Please try again.":YSL SY:E1321hSY1SLX1:((PN$(1),Y))46((PN$(1),Y))57((PN$(1),Y))65((PN$(1),Y))90E1TE1İ711:"You typed "(BU$,BS)".":"If you use characters (other":"than '.') in program names":"you will get a SYNTAX ERROR.":"Please try again.":YSLTY:E1321TY1SL1X:(PN$(1),Y,1)"/"E1:711:"You typed "(BU$,BS)".":"You shouldn't use slashes in":"program names since they have a":"special meaning. Please try again.":YSLTY:E1321UPN$(1)"POEM"İ711:"You typed "(BU$,BS)".":"If you SAVE your program as POEM":"you will erase the old POEM":"program. Please save your":"program under another name.":321U:(4);"VERIFY PROGRAM.TEXT":TT12:BT24:701::::TT0:BT12:691:631:ET1wVTT20:BT24:691:701:21:741:W38:B9:T3:L1:X1:931:E1İ711:"You need to catalog the disk by":"typing CAT. Please try again.":481-W1301:E1481:(AN$,X,4)"ALOG"İ711:"Yes, the CATALOG command would":"work on an 80 column display,":"but please use CAT because you're":"using a 40 column display.":481EWLD0:1231:E1481W:(4);"VERIFY PROGRAM.TEXT":TT12:BT24:691:14:"]CAT"::CS1:BF271:BU9:1421:TT0:BT12:691:631:521:631X521:631:521:631:932,1:521:1461:TT0:BT24:691::(4);"RUN RUNNUMERIC":X 16368,0ZXP(16384):TETE1:P1551471:P13541:TE225531rXP141TE0:998:X'M$"Press RETURN":561:Z1700:Z:M$"_____________":561:Z1700:Z:531X1B:M(((WL)(M$))2):M$;:3Y;(4);"OPEN CALLNAME":(4);"READ CALLNAME":NA$:(4);"CLOSE CALLNAME":cYE(4);"OPEN CAT.NAME":(4);"READ CAT.NAME"YOI$:I$"@"I$(1)I$(1)I$:591YY(4);"CLOSE CAT.NAME":Zc34,T2:35,B:32,L:33,W1::BD2W1:T1:BD:"_";:B:BD:"_";:BD:BDTB:BD:1:"|";:W:"|";:BD9Zm34,T:35,B1:32,L2:33,W4::Zw(4);"READ ";F$:S$"":A$"":NL1:S$:S$"%"İ691:T,B,L,W:611:661ZS$"&"İ621ZHT1B1:H:1:868:HZ813:IN$(IN$,1):IN$"^"681ZTNL:1:NLNL1:IN$;:661Z[32,0:33,40:34,TT:35,BT::?[32,0:33,40:34,TT:35,BT:k[TT0:BT10:701:ET1ETET1:611:731t[621[L:T1:HT1B1:H:1:868:H:T1:[(4):16368,0:AN$"":CP1761[1:(93);\R0:768:J512736:X(J):X1551471:X141J736:811!\X162R1.\ R1801S\AN$AN$(X12832(X223)):811h\!AN$AN$(X128)y\+J:BU$AN$:\5SN3Ė2:"PRINT ";(34);"ROSES ARE RED";(34)\?SN1ĺ" 10 PRINT ";(34);"ROSES ARE RED";(34)\ISN2Ė1:"ROSES ARE RED"]S:]]SN1ĺ" 30 PRINT ";(34);"I LOVE MY APPLE";(34)W]gSN2ĺ"I LOVE MY APPLE"]]q]{SN1ĺ" 20 PRINT ";(34);"VIOLETS ARE BLUE";(34)]SN2ĺ"VIOLETS ARE BLUE"]]" 50 END":]E0]PC1971]X(AN$)E1:]981^X(AN$)E1:,^(AN$,X,1)" "1001;^XX1:941A^W^LN$(AN$,X,SL):w^E0:(AN$,X,1)"?"XX1:^E0:(AN$,X,5)"PRINT"XX5:^E1:711:"You typed ";(AN$,BS);".":"You didn't use PRINT.":"Please try again.":_E0:(AN$,X,1)(34)ı_%E1:Q$(AN$,X,1):(Q$)45(Q$)46(Q$)47(Q$)58İ711:"You typed ";(BU$,BS)".":"You could PRINT a number here,":"but we prefer that you type":"a literal quote. Try again.":R`/E1:711:"You typed ";(BU$,BS);".":"You forgot to use a quotation":"mark after the PRINT statement.":"Please try again.":a`9E0:SLX1`CSL(AN$)1111:(AN$,SL,1)(34)SLSL1:1091`M(AN$,SL,1)(34)ıMaWE1:711:"You typed ";(BU$,BS);".":"Although it's not required, we'd":"like you to end your statement":"with a second ";(34);" mark. Try again.":caaE0:SLX21141akE1:711:"You typed ";(BU$,BS);".":"It would help for now if you":"would enclose something inside":"the quotations. Try again.":buSLSL(X1):I$(PN)(AN$,X1,SL):9bE0:(AN$,X,4)"SAVE"XX4:bE1:711:"You typed ";(AN$,BS);".":"To save a program to disk you":"should begin by typing SAVE.":"Please try again.":bE0:(AN$,X,4)"LOAD"XX4:bcE1:711:"You typed ";(AN$,BS);".":"To load a program into memory":"you should begin by typing LOAD.":"Please try again.":cE0:(AN$,X,3)"RUN"XX2:cE1:711:"You typed ";(BU$,BS);".":"You should have typed RUN.":"Please try again.":dE0:(AN$,X,4)"LIST"XX3:ddE1:711:"You typed ";(BU$,BS);".":"You should have typed LIST.":"Please try again.":|dE0:X(AN$)1291dYX1(AN$):(AN$,Y,1)" "E1>eY:LD1E1İ711:"You typed ";(BU$,BS)".":"You shouldn't type anything after":"the line number if you wish to":"to delete a line. Try again.":eLD2E1İ711:"You typed ";(BU$,BS)".":"Please don't type anything after":"the program name or it will be-":"come part of the name. Try again.":fLD3E1İ711:"You typed ";(BU$,BS)".":"If you type anything after the":"program name the computer will":"try to find the wrong program.":"Please try again.":gE1İ711:"You typed ";(BU$,BS)".":"Please don't type anything after":"the command. It will just":"complicate things. Try again.":g ":CS1ĺ" "PN$(1);:17:"BAS";:27:"1";:30:""l:"BLOCKS FREE:";:15:BF;:23:"BLOCKS USED";:39:BU;:6l:(4);"OPEN ";F$:Pl:(4);"CLOSE ";F$:l32,0:33,40:34,0:35,24:1461::(4);"RUN RUNMENU"l 631IN$"X":TT0:BT24:M0:201:301::F$"WORDS.TEXT":601:231:151:231:151:231:151:32,0:18:1:(93);:32,L:TT15:BT24:301:18:10:SN1:421:255:M3:20:18:"(You press RETURN)";:151:20:5:868:SN2:421:TT0:BT15:BT:M0$ 231:151:TT15:BT24:291:TT0:231- ET1 TT12:BT24:291:301:13:341:W38:B10:T3:L1:X1:451:E1İ311:"Please type PRINT and something":"inside quotations.":"Always remember to press RETURN.":31 )BSX:491:E131g 3451:E1İ311:"|~You typed ";(BU$,BS);".":"Don't be shy. Please type":"PRINT and a word inside":"quotations.":31 =521:E131:541:E131:581:E131:LESL(X1)5 GVP((AN$)40):14VP:(AN$,X1,LE);:311:"You did very well, ";NA$".":"Would you like to practice using":"the PRINT statement again? (Y/N)";\ QCP1:341:AN$""Ģ6:33:958:81 [(AN$)89(AN$)78Ģ6:33:958:81 eCP0:(AN$)89TT15:BT24:291:311:L:T1:"Okay, type PRINT and follow it":"with a literal quote.":"(Remember to press RETURN)":21] oTT0:BT24:291:231:151:231:151:231:151:231:151:231:ET1 yTT15:BT24:291:301:16:341:W38:B10:T3:L1:X1:451:E1İ311:"Please type PRUNT and a number.":"Then press RETURN. Try again.":121 BSX:(AN$,X,5)"PRUNT"İ311:"You typed ";(BU$,BS);".":"You should type PRUNT 50":"one time in order to see what":"an error message looks like.":"Please try again.":121320:(7);:"?SYNTAX ERROR":TT0:BT15:291:231:151:TT15:BT24:291:TT0:231:930,1:151:TT0:BT24:291:611::(4);"RUN PROGRAM":A16368,0{P(16384):TETE1:P155621:P13171:TE225161P141TE0:998:M$"Press RETURN":191:Z1700:Z:M$"_____________":191:Z1700:Z:161B:M(((WL)(M$))2):M$;:T(4);"OPEN CALLNAME":(4);"READ CALLNAME":NA$:(4);"CLOSE CALLNAME":34,T2:35,B:32,L:33,W1::BD2W1:T1:BD:"_";:B:BD:"_";:BD:BDTB:BD:1:"|";:W:"|";:BD34,T:35,B1:32,L2:33,W4::2(4);"READ ";F$:S$"":A$"":NL1:S$:S$"%"İ291:T,B,L,W:211:261CS$"&"İ221aHT1B1:H:1:868:H813:IN$(IN$,1):IN$"^"281TNL:1:NLNL1:IN$;:261#32,0:33,40:34,TT:35,BT::-32,0:33,40:34,TT:35,BT:7TT0:BT12:301:ET1ETET1:211:331#A221PKL:T1:HT1B1:H:1:868:H:T1:uU(4):16368,0:AN$"":CP1361_1:(93);iR0:768:J512736:X(J):X155621:X141J736:411sX162R1}R1401AN$AN$(X12832(X223)):411AN$AN$(X128)'J:BU$AN$:]SN1Ė2:"PRINT ";(34);"HOT FUDGE SUNDAE";(34)~SN2Ė1:"HOT FUDGE SUNDAE"E0(AN$,X,1)" "481:X(AN$)E1:XX1:461E0:(AN$,X,1)"?"XX1:E0:(AN$,X,5)"PRINT"XX5:{E1:TT0:BT15:311:L:T1:"You typed ";(AN$,BS);".":"You didn't use PRINT.":"Please try again.": E0:(AN$,X,1)(34)ı&E1:311:"You typed ";(BU$,BS);".":"You forgot to use a quotation":"mark ("(34)") after the PRINT":"statement. Please try again.":5E0:SLX1i'SL(AN$)571:(AN$,SL,1)(34)SLSL1:5511(AN$,SL,1)(34)ı;E1:311:"You typed ";(BU$,BS);".":"Although it's not required, we'd":"like you to end your statement":"with a second ";(34);" mark. Try again.":2EE0:SLX2ıOE1:311:"You typed ";(BU$,BS);".":"It would help for now if you":"would enclose something inside":"the quotations. Try again.":Y:(4);"OPEN ";F$:c:(4);"CLOSE ";F$:'m32,0:33,40:34,0:35,24:611::(4);"RUN MENU"-w @1021@IN$"X":TT0:BT24:M0:311:421::F$"PROGRAM.TEXT":991:351:261:351:261:32,0:18:1:(93);:32,L:TT15:BT24:421:18:10:SN3:541:255:M3:20:18:"(You press RETURN)";:261:20:5:868:SN2:541:TT0:BT15:BT:M0A 351:261:TT15:BT24:411:TT0:351:261:351:261:351:261:351:261:32,0:14:1:(93);:32,L:TT15:BT24:421:14:10:SN1:541:255:M3:16:18:"(You press RETURN)";:261:16:5:868:TT0:BT12:BT:M0:351:261:351:261B32,0:16:1:(93);:32,L:TTЅ15:BT24:421:16:10:651:255:M3:18:18:"(You press RETURN)";:261:18:5:868:SN2:541:TT0:BT12:BT:M0:351:261:351:261:351:261:TT15:BT24:411:TT0:BT12:351:261C32,0:15:1:(93);:32,L:TT15:BT24:421:15:10:SN1:581:255:M0:261:L:351:ET1:TT(1)15:BT(1)24:W(1)38:B(1)9:T(1)3:L(1)1:IV18:931:20:SN2:541:581:TT0:BT12:351:261:351:261:351:261:351:261:TT16:BT24:411vD)32,0:16:1:(93);:32,L:TT15:BT24:421:16:10:SN1:611:255:18:18:"(You press RETURN)";:261:18:5:868:TT0:BT12:351:261:351:ET1:TT(1)18:BT(1)24:W(1)38:B(1)9:T(1)3:L(1)1:IV19:931D321:SN2:541:611:581:TT0:BT12:351:261:351:TT12:BT24:411:421:SN1:14:2:541:2:611:2:581:ET1rE=TT17:BT24:411:421:18:461:W38:B10:T3:L1:X1:671:E1İ431:"Please add a PRINT statement":"to the program at LINE 40.":61EGSL2:BSX:711:LN$"40"İ431:"You should start by typing":"40, then type a PRINT statement.":"Please try again.":61hFQXX2:671:E1İ431:"You typed ";(BU$,BS)".":"You should follow the line":"number with a PRINT statement.":61F[721:E161:671:E1İ431:"You typed ";(BU$,BS)".":"Please follow PRINT with a":"literal quote inside quotations.":"Try again.":61'GePN1:751:E161:771:E161:811:E161GoTT0:BT12:411:351:5:13:NAME$".";:261:351:261:351:261:32,0:21:1:(93);:32,L:TT15:BT24:421:21:10:641:255:M3:23:23:"(You press RETURN)";:261:23:5:868:TT0:BT12:BT:M0:351:ET1HyTT(1)22:BT(1)24:W(1)38:B(1)9:T(1)3:L(1)1:IV23:931:TT11:BT24:421:24:SN2::541:611:581:I$(1):::::TT0:BT12:351:261:351:261:32,0:21:1:(93);:32,L:TT15:BT24:421:21:10:661:255:M3I23:23:"(You press RETURN)";:261:23:5:868:TT11:BT24:421:22:SN1::2:541:2:611:2:581:" 40 PRINT ";(34);I$(1);(34):2:641:::::TT0:BT12:351:261:351:261:351:261:351:261:351:ET1LJTT20:BT24:411:421:21:461:W38:B10:T3:L1:X1:671:E1İ431:"Please change line 40 by typing":"40 and following it with a":"PRINT statement.":141JSL2:BSX:711:LN$"40"İ431:"You are trying to replace":"line 40 by typing 40 and a":"PRINT statement. Try again.":141HKXX2:671:E1İ431:"You typed ";(BU$,BS)".":"You should follow the line":"number with a PRINT statement.":141K721:E1141:671:E1İ431:"You typed ";(BU$,BS)".":"You should type a new literal":"quote to replace the old one.":"Please try again.":141LPN2:751:E1141:771:E1141:811:E1141MTT12:BT24:421:24:::TT0:BT12:351:ET1:TT(1)20:BT(1)24:W(1)38:B(1)9:T(1)3:L(1)1:IV21:961:TT11:BT24:421:22:SN1::2:541:2:611:2:581:" 40 PRINT ";(34);I$(2);(34):2:641:::::TT0:BT12:411:351:261:351MET1:TT(1)20:BT(1)24:W(1)38:B(1)9:T(1)3:L(1)1:IV21:931:TT11:BT24:421:22:SN2::541:611:581:I$(2):::::TT0:BT12:411:351:261:351:ET19NTT20:BT24:411:421:21:461:W38:B10:T3:L1:X1:TT0:BT12:671:E1İ431:"Please delete line 30 by typing":"30 and pressing RETURN.":211NSL2:BSX:711:LN$"30"İ431:"You are trying to delete":"line 30 by typing 30 and":"pressing RETURN. Try again.":211NLD1:XX1:881:E1211OTT12:BT24:421:24:::TT0:BT12:BT:351:ET1:TT(1)20:BT(1)24:W(1)38:B(1)9:T(1)3:L(1)1:IV21:961:TT12:BT24:421:22:SN1::2:541:2:611:" 40 PRINT ";(34);I$(2);(34):2:641:::::TT0:BT12:BT:351:261:351:261P32,0:21:1:(93);:32,L:TT20:BT24:421:21:10:SN1:581:255:321:TT0:BT12nPBT:351:261:351:931,1:261:TT0:BT24:411:1001::(4);"RUN RUNSAVER":|P16368,0PP(16384):TETE1:P1551011:P13281:TE225271PP141TE0:998:Q#M$"Press RETURN":301:Z1700:Z:M$"_____________":301:Z1700:Z:271BQ-B:M(((WL)(M$))2):M$;:Q7(4);"OPEN CALLNAME":(4);"READ CALLNAME":NA$:(4);"CLOSE CALLNAME":,RA:(4);"OPEN CAT.NAME":(4);"CLOSE CAT.NAME":(4);"DELETE CAT.NAME":(4);"OPEN CAT.NAME":(4);"WRITE CAT.NAME":I$(2);"@":(4);"CLOSE CAT.NAME":RK34,T2:35,B:32,L:33,W1::BD2W1:T1:BD:"_";:B:BD:"_";:BD:BDTB:BD:1:"|";:W:"|";:BDRU34,T:35,B1:32,L2:33,W4:: S_(4);"READ ";F$:S$"":A$"":NL1:S$:S$"%"İ411:T,B,L,W:331:381SiS$"&"İ3419SsHT1B1:H:1:868:H\S}813:IN$(IN$,1):IN$"^"401|STNL:1:NLNL1:IN$;:381SS32,0:33,40:34,TT:35,BT::S32,0:33,40:34,TT:35,BT:STT0:BT10:421:ET1ETET1:331:451S341(TL:T1:HT1B1:H:1:868:H:T1:MT(4):16368,0:AN$"":CP1481\T1:(93);TR0:768:J512736:X(J):X1551011:X141J736:531TX162R1TR1521TAN$AN$(X12832(X223)):531T AN$AN$(X128)UJ:BU$AN$:3USN3Ė2:"PRINT ";(34);"ROSES ARE RED";(34)fU'SN1ĺ"10 PRINT ";(34);"ROSES ARE RED";(34)U1SN2Ė1:"ROSES ARE RED"U;UESN1ĺ"30 PRINT ";(34);"I LOVE MY APPLE";(34)UOSN2ĺ"I LOVE MY APPLE"UYVcSN1ĺ"20 PRINT ";(34);"VIOLETS ARE BLUE";(34)6VmSN2ĺ"VIOLETS ARE BLUE"Ō'A;ónExÇ谘 ,#QÃ" ᑌP G Q*džWܹ󷌃@0q *稄Ā r ǣƏء.dž ⡀ C.\Ǐa؃E܀`PÅ΁   *`(0ɑă ٍÀΏ ဟ eׁۃ.Pð 㐀ㇰÅQ.(*ñȇ8 ́)ǃ(*8 ÇƃTޏƙn '谌 PϿ UjрƆV * ߷@ /Ç@ Qxǁ +(E ぀ P(U U🳇栰㟀&F0̿P`~Ǐ/bhɃ ⸌ƁÁ " DTXЉ䁀 @ఀ (Q ?,'(*`T`Ř TT ƙȇ @┌P"Uj_ (  @񁀘@*!𞀰ރP ǁ˻+Uz(UÁ،!L(Etƿ&@qȑÝ W . ࿀鐌 ΜÁ |VPX 0Ƥư) _'*3*Uƃ"*(gȑ ٸ͜T ƙ‡ 职Y"㜀*U*ÀƆσ_́`@"* LjPb򰀜Ç߳أ+UZUÇ @2 =:dȿߣ샠P @`ӏ σ͟ ,@Ɂ ӌ VP P𠆤ưa /}*,A ȍ(;Wn`N¥ ܃ΟU ƹȏ _@梔X @ Q*Wρف@0@* Pbۼ񁀼́/P2LJ؜ (@PCqrɓށUɑ   j鐏  T.PPǰ 𰆦搀 @.@:3:16298,0:16300,0:16303,0M@10:12:"Please wait...."s@:(4);"BLOAD PIC.LOLLY, A$4000"@(4);"BLOAD UP":4096@ (4);"RUN RS3"@@ 0:ȡHe@ hhл`Ie@҈.:3:16298,0:16300,0:16303,0M10:12:"Please wait...."u:(4);"BLOAD PIC.MAILBOX, A$4000"(4);"BLOAD UP":4096 (4);"RUN RN3"104,8:103,1):(4);"RUN RN2"