' +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- (  Ϡ@跻~!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`Ԫ~{կժժժժժѪՊԪժժӪժժժժ՜P*ԪߪժժժժՊԪժժժժժ@T*ԪժժժժժժժժժժժժժժժժՊԪժժժժժժժժժ ԪժժժժժժժժժժժժժժժՊԪժժժժժժժժժԪժժժժժժժժժժժ<~x|@@ԪժժժժժժժժժժժժժժժժժժՊԪժժժժժժժժժժ8xԪߪժժժNJԪժOժժ@!UUԪժծժתժժժժժ_Ԫ~c?ԪԪ?ժժժժժժԪՊԪժժѪժժժժղ@*ԪתժժժժՊԪժժժժժ `T*ԪժժժժժժժժժժժժժժժժՊԪժժժժժժժժժժԪժժժժժժժժժժժժժժժՊԪժժժժժժժժժ倀 Ԫժժժժժժժժժժժ|~}~``ԪժժժժժժժժժժժժժժժժժժՊԪժժժժժժժժժժxpԪߪժժժ~ӊԪժǪժժ` U*UԪժվ~~~ժժժժԪ~wժՊԪߪ~ߪ?ժժժժժժ?ԪՊԪժժԪժժժժ @ ԪժժժժժՊԪժժժժժ0T*ԪժժժժժժժժժժժժժժժժժՊԪժժժժժժժժժժԪժժժժժժժժժժժժժժϪժՊԪժժժժժժժժժԪժժժժժժժժժժժ|CԪpp0倀ԪժժժժժժժժժժժժժժժժժժՊԪժժժժժժժժժժ՘x@ԪժժժՊԪժӪժժ՜0 U*UԪWu~~ժժժժ ԪժժԪժժժժժժժժժժժժՊԪժժպԪժժժժ@ ԪժժժժժՊԪժժ~ժժժժT*Ԫժժժժժժժժժժժժժժժ~ժժՊԪժժժժժժժժժժ @ԪժժժժժժժժժժժժժժתժՊԪժժժժժժժժժԪժժժժժժժժժժժ|gԪ p<|Ԫժժժժժժժժժժղ| pԪժժժԊԪժѪժժղU*UԪ~_~{ժժժժ~ Ԫժժ T U*U*U*U*@ B*U*U*U*U*U U*U*U*U*UpT*U*U*U P +U*U*U*U*%@*U*U*UT*U*U*T U~TU*U*U*U**@* U*U*U*U*U*U* `|V*U*T*U*U2 @?P*E@? U(M(U*T*A U( U@U*U*UT*U*U*S|@"U*U*U*U*5*`U*UJ X*U*U*U*U*UH*UT U*U*U*U*@*S*U*U*U*U*U2 U*U*U*U*UU*U*U*U* P )U*U*U*U*eP*U*U*UT*U*U*TU@TU*U*U*U**@*0U*U*U*U*U*U**U|XE?|V*U*U8T*U*U `_*UU@*H*A"`U(U@0T*U*UT*U*U*Q`p*U*U*U*U*(0T*UJ@*U*U*U*U*H*U T U*U*U*U*@*Q*U*U*U*U*Ub@ 0U*U*U*U*TU*U*U*U*9@*@)T*U*U*U*UP*U*U*UT*U*U*VTT8U*U*U*U**@* U*U*U+U*U* Up?uW R*U*UbW*U*U(P*U|TjU X*tm~?6w *U@ T*U*UT*U*U*Q(| .U*U*U*U*(T*U*@*U*U*U*U*T\*UT U*U*U*U *@Q*U*U*U*U*UJ@ U*U*U*U*T@!U*U*U*U*e@*@+U*U*U*U*UP*U*U*UT*U*U*RT(U*U*U*U* @*@*0U*U*U+U*U* U`` V*U*U U*U*U (P*P*XbvP@*P`T*U*UT*U*U Ap(?ԪתժժժϊԪժժժ#TԪժժժժժժժժժժժ~|Ԫ~cԪ  NONE OF THE";N;"GAMES.";ELSE3990B56780:'ʵENTERWITHPROMPT.L54130i5SC;"OF THE";N;"GAMES.";5SC8ĺ@580,"PRESS ENTER TO RECEIVE YOUR"5SC8ĺ@708,"SKIING AWARD.";5SC7ī40705679054940:'ʈAPHICSPRIZE.66790:' CLOSEN1$ CLOSEN2$EҠӍΠԠŮɠӠŠٍŠŠҠӍŠԠήӍΠĠϠϠϠŠ٠΍ǠԮΠĠύŠŠǍŠƠōٮӍŠӮ٠ŠƠōΠԠҍӠٮӍ̠ƠӠΠŠ٠ōҠΠŮŠӠōԠҠƍҠٮӍǠӠĠΠՍŠĮɠŠŠ͍Πɧ͠ˮč̠ŠӠĠŠӠōҠΠҍӮӍɧ͠Š٠ŠŠϠΧԍŠŮŠŠ΍ŠŠԍŮӍǠӠԠΠ̠ӠԍĮ̠ӠōŠΠǮčΠƠŠԠΠԍҠήӍΠŠҠӠӍҠΠԮΧӠ΍ΠԍΠӠҮӍŠŠӠĠӍΠΧӠӮŠŠҍӠΠӠ΍ΧӠӮӍҠӠŠҠ΍ŠӮԍŠŠΠ׮Ӎɠ̠ĠŠ͠ҮɠĠŠ͍ҠɠĠήčӠҠԠŮ٭ŠӍŠҠ΍Ӎ٠̠ӠΠύŮΠ̠̠ōƠԠӠԍŠǠŠήԠӠϠԍΠŠŠҍ٠ԠӮӍŠӠ٠Š̠ǠԍŠ׮̠ԠŠƍŠӠԠŠ׍ŠŮӍ̠ŠӠԠ٠čŠΠ׮٠ӠŠٍŠϠĠύӍנŠŠԠϠӠԮŠԠԠϠӠԍӠΠ٠٠נŮӍŠŠȠƠӍŠǠήŠǠ΍ӠΠ٠ٍӮč٠ԠӠˠҍ͠ٮӍԠϠՠϠϠР̍ΠԠٿϠՠŠύ͠ΠԠӿčΠӠӠĠԠӠҮԠӠҍĠΠӍˮčΧӠŠӠӍΠͧӮΠӠҍŠΠͮŠ̠ƠΠӠϮϠӠҍΠ٠ҍ٠ΠήčŠӠ̠ҠƍŠԠͮŠӠ΍ҠԠӮčɠԠĠΠɠР΍ŠͮǠΠō͠ӠŠ  T U*U*U*U*P F*U*U*U*U*U*U*U*U*U*U@W*U*U*UrP*U*U*U*U*5@*U*U*UT*U*U*T UpxTU*U*U*U*** T*U*U*U*U*U x|W*U*UT*U*U" ~P*E`(Y*U*U*U*U*U@U@U*U*UT*U*U*R?~+U*U*U*U*%*Q*Uz*H*U*U*U*U*UH*U6450:'ʔ"C""E"SCEBOX.'E@66,AN$;7ET1100:TZE@960,"PRESS ENTER TO GO ON.";uE5550:'CAUSEEFFECTE@66,AN$;ET1100:TE"@960,"PRESS ENTER TO GO ON.";E,@192,AA$;E6T150:TE@@192," ";EJT130:TFTIN@348,(131);(139);(180);": ,";(176);"O";(95);"/ *:*:*";oD@416,(130);(141);"<<";(131);", *:*:*:*";D@482,"*:*:*:*:*:*:*";D@550,"*:*:*:*:*";D@618,"*:*:*:";D@790,"SORRY,";D@854,"NO POINTS THIS TIME.";DT1100:TEC'"C(@960,(30);.C2I811HC<@L(I),AS$;:'SKIER.WCFT150:TvCP@L(I),EA$;:'ERASESKIER.}CZICd@228,"*:*:*:*:*/";STRING$(3,(131));"/";Cn@164," ";Cx@168,"*:*:*";C@282,(170);"1";(133);" *:*:*:*:*:* /";>D ";STRING$(3,(191));[B@780,STRING$(4,(191));" ALPINE SKIER";(170);STRING$(3,(191));yB@844,STRING$(21,(191));B@960,"PRESS ENTER TO GO ON.";BB'B'B '2NDWIPEOUT C'));(159);(135);34,0:35,24#H#\V11#aI(F1$(II))#fAN$(II,1)A$(II,I)ĪV10$pT:B$(II,1)#"VT1:HT:B$(II,2);"VT2:HT:B$(II,3)S"VT3:HT:B$(II,4)k"VT4:HT:B$(II,5)q""24:"TYPE THE ONE THAT'S DIFFERENT. ""33,25:32,15"34,19:35,21"20:AN$(II,1)"(AN$(II,1))162215# 33,40:D 3" !RL!I1N"!J15/!A$(I,J)6! JB!F1$(I)M!J15Z!B$(I,J)a!Jm!F2$(I)t!I!D$;"CLOSE"!!!04:A$(II,1)!:5:A$(II,2)!D6:A$(II,3)!N7:A$(II,4)!X8:A$(II,5)!b!VT16:HT20 "VT:HNISH SIGN ! "18:"FINISH"2 ,1,1751,145E 639,17539,145L @6Z JX2404g T2X,130n ^Xt RD1ĺD$;"OPEN ROUND 1":D$;"READ ROUND 1" RD2ĺD$;"OPEN ROUND 2":D$;"READ ROUND 2"!RD3ĺD$;"OPEN ROUND 3":D$;"READ ROUN5,13575,110x15:10:"2"075,12055,120C75,11055,110V55,12058,115i58,11555,110o| POLE#1165,89165,629:23:"1"165,62145,62145,72165,72145,72148,67145,62148,67  FI SLOPE EQUATION/FA14: NO.OF NODESDFB6: AMPLITUDEZFC360: Y OFFSETpFD230: X OFFSETFE0.50: SLOPE 3279,42X279110(Y((FDX)FA)FBFE(FCX)2X,Y32:145,125!>16:135,1451>T1500:TC>16:135,145U>48:120,155f>0:145,150x>16:145,170>32:120,180>3:0:1?24:"SORRY, NO POINTS THIS TIME. " ?T12000:T?60000 ?EX1COUNT1İ62900 SLOPES FOR REAL."(60000"(P(0:45,18294,18294,19145,19145,182:3V("VFOR REAL."o(60000u((0:45,18294,18294,19145,19145,182:3("C17:20:21)!'18:19:22)3'19:18:23)E'20:17:24)W'21:16:25)]'d'P3'U2,474,474,182,182,4'Z1,375,375,191,191,3'':59900'61200'6:"I THINK YOU'VE GOT THE IDEA."(:"NOW LET'S GO TO THE &`V68AA$"DIFFERENT"&j*&FC3101&3I&XXXSTART:YYYSTARTV&1XX,YYk&XXXXFINISH4&Y((FDX)FA)FBFE(FCX)&1XX,YY&1X,Y&XXX:YYY&X&HOLD0ĕ1XX,YY&&I13:I:6:34):I&7:1:10)'V10%pEX1II162380*%NW(II,1)V1?%V10NW(II,2)1E%N%V21h%AN(F2$(II))ĪV20}%EX1II162480%NW(II,2)V2%%$V(F1$(II))%)V83AA$"SAME"%.V68AA$"DIFFERENT"%8%VV(F2$(II))%[V83AA$"SAME"(34)$AN(16384)#$ 16368,04$AN8362265E$ AN6862265U$"T1100:Td$$0:312,8t$&T1200:T$(3:312,8$*62210$9T1100:T$>2:2:" "$HT1200:T$J2:2:(AN)$L16384,0$N$\V11%fAN(F1$(II)):N3(II)262130!#6:B$(II,3)H#17:20:BB$(II,1):N4(II)162160k#19:BB$(II,2):N4(II)262160#18:BB$(II,3):N4(II)362160#17:BB$(II,4):N4(II)462160#16:BB$(II,5)#$24:"PRESS ";(34);"S";(34);" OR ";(34);"D.";):N1(II)262015"":6:A$(II,3)I"?17:20:AA$(II,1):N2(II)162050l"D19:AA$(II,2):N2(II)262050"I18:AA$(II,3):N2(II)362050"N17:AA$(II,4):N2(II)462050"S16:AA$(II,5)"b"1:6:B$(II,1):N3(II)162130#6:B$(II,2)D ROUND 3"!RL!I1Nf!N1(I):J1N1(I):A$(I,J):J:N2(I):J1N2(I):AA$(I,J):J:F1$(I)!N3(I):J1N3(I):B$(I,J):J:N4(I):J1N4(I):BB$(I,J):J:F2$(I)!I!D$;"CLOSE"!!!01:6:A$(II,1):N1(II)162015"56:A$(II,2,145 @6 JX2404& T2X,130- ^X3 : 3W 2,418,418,182,182,4t 1,319,319,191,191,3z RD1ĺD$;"OPEN ROUND 1":D$;"READ ROUND 1" RD2ĺD$;"OPEN ROUND 2":D$;"READ ROUND 2" !RD3ĺD$;"OPEN ROUND 3":D$;"REA(LE$)39(LE$,1)" "LE$(P2)LE$:P2P21:A$RI$:21224?RK`R(A$)40LE$(P2)A$:21228kR21218RLE$(1)""ĺ:LE$(1)RLE$(2)""ĺLE$(2)RLE$(3)""ĺLE$(3)RLE$(4)""ĺLE$(4)RLE$(5)""ĺLE$(5)R:"CORRECT ANSWER: ";RLE$(1)""Ģ10:1:LE$(1)6RLE$(2)""ĺLE$(2)NRLE$(3)""ĺLE$(3)fRLE$(4)""ĺLE$(4)~RLE$(5)""ĺLE$(5)RP21:A$""RI1N4(II):A$A$BB$(II,I)" ":I:A$A$" "RK1255RRI$(A$,K)RL(A$)KRLE$(A$,L)8R10x15:10:"2"&75,12055,120975,11055,110L55,12058,115_58,11555,110r165,89165,629:23:"1"165,62145,62145,72165,72145,72148,67145,62148,67"18:"FINISH",1,1751,145 639,17539782FFX,11=2FFX,11.B2FFX,15=G2FFX,15DLXKV3Q`^:59900hFA14qFB6|FC360FD230FE0.50 3279,42X279110(Y((FDX)FA)FBFE(FCX)2X,Y48:160,105#>32:145,1253>T1500:TE>32:145,125W>16:135,145g>T1500:Ty>16:135,145>48:120,155>0:145,150>16:145,170>32:120,180>3:0:1?24:"SORRY, NO POINTS THIS TIME. "0,120(732:1100,130%-73:0:1W2724:"SORRY, NO POINTS THIS TIME. "h<7T12000:TsF760000P7EX1II1İ62900<12000>XSTART96:YSTART105>1100,105>XFINISH80:HOLD0>62600>48:160,105>T1500:T61192,61%6XFINISH160:HOLD00662600B648:1140,60R6T1500:Td648:1140,60v632:1120,806T1500:T632:1120,80616:1110,1006T1500:T716:1110,100 748:190,11570:1110,105716:112)116368,0 1WCRī12700G1I2630:LL(I,1):LL(I,2):"*":In1I1115:LL(I,1):LL(I,2):" ":Iy1126701EX1II1R30İ629001120001:599001T(0)2(4);"BLOAD CHAIN,A520"(2520"TFEATURE"6XSTART188:YSTART61I)1I2630:LL(I,1):LL(I,2):" ":I91W(16384)G116368,0X1WCRī127001I1620:LL(I,1):LL(I,2):"*":I1I15:LL(I,1):LL(I,2):" ":I1I2125:LL(I,1):LL(I,2):"*":I1I610:LL(I,1):LL(I,2):" ":I1W(16384 ";RLE$(1)""ĺ" "K"lR(A$)40LE$(P2)A$:21200-vR21040RLE$(1)""Ģ10:1:" ";RLE$(1)""ĺ" "* RP21:A$""LR8:1:"SENTENCE PAIR GIVEN:"rRI1N3(II):A$A$B$(II,I)" ":IRA$A$" "0RK1255:RRI$(A$,K)BRL(A$)KDRLE$(A$,L)NR(LE$)39(LE$,1)" "LE$(P2)LE$:P2P21:A$RI$:21100XR)O60000: WAIT FOR CR WITH PROMPT.<,OK15:LE$(K)"":KB.OH Pb P *******************yP ** WRONG SENT.#2P *******************PR8:" 20217 OLE$(1)""ĺ:LE$(1)8OLE$(2)""ĺLE$(2)POLE$(3)""ĺLE$(3)hOLE$(4)""ĺLE$(4)OLE$(5)""ĺLE$(5)O:"CORRECT ANSWER: ";F1$(II)O(F1$(II))83ĺ:"STUDENT'S RESPONSE: D"$O(F1$(II))68ĺ:"STUDENT'S RESPONSE: S"$)NLE$(5)""ĺLE$(5)(NP11:A$""YNI1N2(II):A$A$AA$(II,I)" ":I:A$A$" "fNK1255vNRI$(A$,K)NL(A$)KNLE$(A$,L)N(LE$)39(LE$,1)" "LE$(P1)LE$:P1P11:A$RI$:20223NKN(A$)40LE$(P1)A$:20227O ";NLE$(1)""ĺ" "NLE$(1)""Ģ10:1:LE$(1)NLE$(2)""ĺLE$(2)NLE$(3)""ĺLE$(3)NLE$(4)""ĺLE$(4 ";7NLE$(1)""ĺ" " 8_3(8d2,474,474,182,182,4E8n1,375,375,191,191,3K8Q8i8 *****************8 ** END OF EXAMPLE8 *****************88:59900861200: HEADER86:"I THINK YOU'VE GOT THE IDEA."9:"NOW LET'S GO TO 7 ******************** 7N70:45,18294,18294,19145,19145,182:3T7"45,182:3g7"7F7H ********************7J ** DRAW "POINT" BOX7L ********************7N7P1:" "7U2:" "8Z3:" FOR REAL."6600006!6<6 ********************V6 ** BLANK RETURN BOXq6 ********************w660:45,18294,18294,19145,19145,182:36"AL."660000666 ********************6 ** BLANK RETURN BOX*****************5 ** BLANK RETURN BOXE5 ********************K5y50:45,18294,18294,19145,19145,182:35"***********55:59900561200: HEADER56:"I THINK YOU'VE GOT THE IDEA." 6:"NOW LET'S GO TO THE SLOPES 75,191,191,34424 *****************J4 ** END OF EXAMPLEb4 *****************h4u4:59900461200: HEADER46:"I THINK YOU'VE GOT THE IDEA."4:"NOW LET'S GO TO THE SLOPES FOR REAL."460000445 ****:A$33VT4:HT:A$!346:A$,357:A$23783FS3H ********************m3J ** DRAW "POINT" BOX3L ********************3N3P1:" "3U2:" "3Z3:" "3_33d2,474,474,182,182,44n1,375,30,1)17:LL(30,2)228~1I15:LL(I,1):LL(I,2):"*":I_1I1620:LL(I,1):LL(I,2):" ":I1I610:LL(I,1):LL(I,2):"*":I1W(16384)116368,01WCRī127001I2125:LL(I,1):LL(I,2):" ":I1I1115:LL(I,1):LL(I,2):"*":5t1LL(21,1)18:LL(21,2)299u1LL(22,1)23:LL(22,2)20Tv1LL(23,1)2:LL(23,2)13ow1LL(24,1)3:LL(24,2)21x1LL(25,1)8:LL(25,2)20y1LL(26,1)6:LL(26,2)13z1LL(27,1)19:LL(27,2)5{1LL(28,1)21:LL(28,2)12|1LL(29,1)1:LL(29,2)14}1LL(3(II,I)" ":I5NA$A$" "(HNK12558RNRI$(A$,K)FZNL(A$)KV\NLE$(A$,L)fN(LE$)39(LE$,1)" "LE$(P1)LE$:P1P11:A$RI$:20100pNKN(A$)40LE$(P1)A$:20200N20040NLE$(1)""Ģ10:1:" * WRONG SENT.#1)N *******************0N  N8:" "%NP11*N8:1:"SENTENCE PAIR GIVEN:"/NA$"" 4NI1N1(II):A$A$A$!:"HOPE TO SEE YOU AGAIN SOON FOR ANOTHER"L`":"GAME OF ALPINE SKIER.""24:"PRESS RETURN TO START OVER.":45,18294,18294,19145,19145,182(#60010#(4);"BLOAD CHAIN,A520"#520"INSTRUCTIONS"NN *******************N *28730016368,0&W141ī79007W206ī8300Ax7300^(4);"BLOAD CHAIN,A520"m@520"MAIN"zl :59900 61200: HEADER!6:NA$;","4!:"ALWAYS REMEMBER THAT SIMILAR SENTENCES"!:"SOMETIMES HAVE DIFFERENT MEANINGS. I"-p5500II2N+NW(II,1)0İ20000BNW(II,2)0İ21000JIIW:59900k61200: HEADERX6:"THANK YOU, ";NA$;".":"IF YOU WANT TO PLAY ANOTHER ROUND," :"PRESS RETURN, IF NOT, PRESS N."*16368,0W(16384):W161200: HEADERB P:NA$;"'S SCORE:";25);N1;28);" ATTEMPTED"_ Q25);SC;28);" CORRECT" 8:"DO YOU WANT TO SEE THE INCORRECT" ":"RESPONSES? (Y/N)" ,16368,0 |W(16384):W1285500 16368,0 W217ī6100 W206ī6800T IS AND"8 :"TELL HIM OR HER YOU ARE FINISHED. IF"j :"YOU ARE SUPPOSED TO GO ON, PRESS RETURN."x 16368,0 W(16384):W1284300 016368,0 W148ī4900 \W141ī6800 4290 :59900 61200: HEADER $:59900 38001 T 60000: WAIT FOR RETURN WITH PROMPT.7 Q  *******************j ** TEACHER FEATURE ******************* H :59900 61200: HEADER 6:"IF YOUR TEACHER WANTS TO KNOW HOW YOU" :"DID, LEAVE THE COMPUTER AS I SC7ī29006 60010: WAIT FOR CR WITHOUT PROMPT.N ( 62450: CLEAR HGR2V 2 :s < (4);"BLOAD PIC.TROPHY" F 59900: HGR2 P 16:29:"SKI CHAMP" Z 17:28:"OLYMPIC CLASS" d 18:28:"ALPINE SKIER" 60000: WAIT FOR CR WITH PROMPT. ER. 6:"THAT'S ALL OF THE GAMES. YOU WON"X SC0ĺ:"NONE OF THE ";N1;" GAMES."i SC0ī2100 l60000: WAIT FOR CR 3800 4:SC;" OF THE ";N1;" GAMES." SC8Ģ10:"PRESS RETURN TO RECEIVE YOUR SKIING" SC8ĺ:"AWARD." `d  FILENAME: TFEATURE&,,28X>Y  ********************r ** STUDENT'S SCORE ********************R211100LE$(5)R21LT(0)V3:0:1:5990061000: ASSM x61200: HEAD                      ,18294,18294,19145,19145,182:3)2"19145,182:3@2"*************h2 ** ERASE SENT.#22 *******************22VT16:HT20:A$" ": 20 SPACES2#VT:HT:A$2(VT1:HT:A$2-VT2:HT:A$32VT3:HTL(11,1)22:LL(11,2)111k1LL(12,1)5:LL(12,2)15Ml1LL(13,1)15:LL(13,2)15hm1LL(14,1)2:LL(14,2)31n1LL(15,1)23:LL(15,2)33o1LL(16,1)14:LL(16,2)36p1LL(17,1)12:LL(17,2)3q1LL(18,1)13:LL(18,2)15r1LL(19,1)6:LL(19,2)3 s1LL(20,1)6LL(11,2)11&k1LL(12,1)5:LL(12,2)15Bl1LL(13,1)15:LL(13,2)15]m1LL(14,1)2:LL(14,2)31yn1LL(15,1)23:LL(15,2)33o1LL(16,1)14:LL(16,2)36p1LL(17,1)12:LL(17,2)3q1LL(18,1)13:LL(18,2)15r1LL(19,1)6:LL(19,2)3s1LL(20,1)6:LL(20,2)2(1,2)29"a1LL(2,1)10:LL(2,2)13;b1LL(3,1)7:LL(3,2)31Uc1LL(4,1)20:LL(4,2)24od1LL(5,1)23:LL(5,2)39e1LL(6,1)19:LL(6,2)8f1LL(7,1)17:LL(7,2)33g1LL(8,1)15:LL(8,2)1h1LL(9,1)3:LL(9,2)38i1LL(10,1)11:LL(10,2)5 j1LL(11,1)22:20"520"INSTRUCTIONS" 8 *****************P ** COLOR SUBR. **h *****************n|X30160X,YX,Y12X412:27:"VIOLET"'>5:Y109:970=H15:27:"ORANGE"OR6:Y133:970c\18:27:"BLUE"f22:"WHEN YOU ARE SET, PRESS RETURN TO BEGIN."k16368,0pW(16384):W128880z16368,0WCR880DC1(4);"BLOAD CHAIN,A5  *********************:  ** COLOR ADJUSTMNT **V  *********************\ h :32,0o 3 "BEFORE WE BEGIN, PLEASE ADJUST YOUR" :" VIDEO MONITOR TO MATCH THESE COLORS." 1:Y60:970 9:27:"GREEN" *2:Y85:970$V$"*"& &W(16384)(16368)1301 0I02G :1:1:UO$(I);H$;^ D1:39:RO$(I);V$;u N24:1:BO$(I);H$; XI1620 b" "; l1:1:LO$(I);V$; vI0650 D$;" "; I W(16384) 16368,0 WCR560   32,8:34,7. :"THIS IS A DATA COMMAND";CR$K " MICROCOMPUTER";CR$m " LEARNING PROGRAM";CR$;CR$ 20:"PRESS RETURN TO GO ON."; V$"":H$"" 32,0:34,0 I112:H$H$"* ":I:H$H$"*" I17:V$V$"*"D$" "D$" "D$:I:V*****" r ** OPENING FRAME **? | *********************E K p UO$(0)"":UO$(1)" ":UO$(2)" " RO$(0)" "D$:RO$(1)RO$(0)RO$(0):RO$(2)"" BO$(0)"":BO$(1)" ":BO$(2)" " LO$(0)RO$(1):LO$(1)RO$(0):LO$(2)"" : : ******************** ( 16384> (4);"BRUN ASSM"` "N225576256:232,232:233,N2 ,UO$(3),RO$(3),BO$(3),LO$(3) 6CR13128:NO("N")128 @Q$(34):D$(10)(8):CR$(13):UN$(21):NR$(14) J T ^ h ****************d FILENAME:HELLOn"x; ******************Q ** ALPINE SKIERZ **t ** GETTING SENTENCE ** MEANING ** 09-07-81 ****************** ******************** ** INITIALIZATIONS         W LET'S GO TO THE SLOPES FOR REAL.".16000041:1T1 ** BLANK RETURN BOXZ110:45,18294,18294,19145,19145,182:31"R94,18294,19145,19145,182:31"RL."160000111 ** BLANK RETURN BOX1#20:45E GOT THE IDEA.">0:"NOW LET'S GO TO THE SLOPES FOR REAL."I060000O0U0o0 ** BLANK RETURN BOXu000:45,18294,18294,19145,19145,182:30",18294,18294,19145,19145,182:30"RTHINK YOU'VE GOT THE IDEA."#1:"NO19:18:22)/20:17:23)1/21:16:24)7/=/HW/J ** DRAW "POINT" BOX]/Ld/P3/U2,474,474,182,182,4/Z1,375,375,191,191,3/// ** END OF EXAMPLE//:59900/61200: HEADER06:"I THINK YOU'V.1XX,YY .XXXXFINISH4@.Y((FDX)FA)FBFE(FCX)M.1XX,YYX.1X,Yf.XXX:YYYm.X.HOLD0ĕ1XX,YY... ** ERASE SENTENCES..I13:I:6:34):I.7:1:10).17:20:20).18:19:21) /A$"DIFFERENT"-8-N0-P ** -- #2 --I-R ** FACT OR OPINIONO-T`-VV(F2$(II))u-[V83AA$"SAME"-`V68AA$"DIFFERENT"-j-- ** MOVE SKIER DOWN- ** SLOPE--FC310: Y OFFSET-3-XXXSTART:YYYSTART * FALSE-- V2=0,,V217,AN(F2$(II))ĪV20R,EX1R40R41:62480,NW(II,2)V2: NW ARRAY IS USED IN THE TEACHER FEATURE.,,, ** -- #1 --, ** FACT OR OPINION, ,$V(F1$(II)),)V83AA$"SAME"-.V68AL(1,1)4:LL(1,2)29-a1LL(2,1)10:LL(2,2)13Fb1LL(3,1)7:LL(3,2)31`c1LL(4,1)20:LL(4,2)24zd1LL(5,1)23:LL(5,2)39e1LL(6,1)19:LL(6,2)8f1LL(7,1)17:LL(7,2)33g1LL(8,1)15:LL(8,2)1h1LL(9,1)3:LL(9,2)38i1LL(10,1)11:LL(10,2)5j1L" ")1628009*1EX1II1Ģ2:2:"1 POINT !"O.1EX1II1ī12610[81SCSC1wB1SC1Ģ2:2:"1 POINT!"L1SC1Ģ2:2:SC;" POINTS"V124:"PRESS RETURN TO GO ON.":45,18294,18294,19145,19145,182[1W0:16368,0`1LL(1,1)4:LL0W141ī12510!0C5ī16000,0124007062700k024:" "v06300002:2:" "0XSTART100:XFINISH241YSTART105:HOLD110:1XX,YY162600$11:" "&12:" " (13:R0T1250:Ti\0V21Ģ24:"PRESS RETURN TO GO ON. ":45,18294,18294,19145,19145,182tf062550p07:" "z0T1100:T0V21ī124400CC107:AA$0T1250:T0V20ī124900W(16384)016368,0(16384)/16368,0(/W141ī123008/C5ī14000C/12170h 0XSTART188:XFINISH100:YSTART61s06270002:2:" "024:" "063000 00:1XX,YY*0626004062100>062200H062400 V11Ģ24:" ":24:"PRESS RETURN TO GO ON.":45,18294,18294,19145,19145,182v/62500/C0/7:" "/T1100:T/V11ī12210/CC1/7:AA$/T1250:T/V10ī12250/WRENT" J)60000 .IIII1. .IIN1127509 .T(0)F .:59900_ .XSTART260:YSTART22j .61340u .61850 .XFINISH190:HOLD1 .62600 /PRRDī12100 /F31ī12100 /61900:F31 D/62000 N/62200 X/62300 b/T1250:Twl// '):"FOR PRACTICE. I'LL GIVE YOU TWO SENT-"] ,):"ENCES. DECIDE WHETHER THE SENTENCES" 1):"HAVE THE SAME MEANING OR DIFFERENT" 6):"MEANINGS. AFTER YOU HAVE DECIDED, TYPE" ;):"YOUR CHOICE:" @):10)"S FOR SAME" E):10)"D FOR DIFFEAY, PRESS N." (16368,08 (W(16384):W12810450F (16368,0a ( IF W=CR, YES EXAMPLEr (W141ĪEX1 (W141ī10510 ( IF W=N, NO EXAMPLE (W206ĪEX0:II1:12000 )10450 )61200 ")6:"LET'S TRY TO SKI DOWN JUST ONE SLOPE"(W177ī10380 n(W178ī103802 x(W179ī10380B (T1100:TM (10320Z (RDW176} (21:"OK, ROUND ";RD;" IT IS." (60000 (61200 (6:"IF YOU WOULD LIKE TO SEE AN EXAMPLE," (:"PRESS RETURN. IF YOU ALREADY KNOW HOW" (:"TO PLL(30,2) j'R11 '61200I '8:"WHICH ROUND WOULD YOU LIKE TO PLAY?"a '11:" ROUND 1"w (:" ROUND 2" (:" ROUND 3" (18:"PRESS THE NUMBER OF YOUR CHOICE." (3:0:1 ((1180,80 K(PRRD P(W(16384) Z(16368,0 dW ' FILENAME: MAIN$'H3'V12:V22:EX0:F30:II0:RD0:AN0:SC0S8'61000_='D$(4)jB'T(0)sL'N13Q'R1110200V'N1(13),N2(13),N3(13),N4(13),A$(13,3),AA$(13,5),B$(13,3),BB$(13,5),F1$(13),F2$(13)['AL$(5),AN$(13,2) `'NW(13,2),L                       GHT OR WRONG ?$+V ** TRUE--- V1=1:+W ** FALSE-- V1=0@+XI+\V11c+fAN(F1$(II))ĪV10~+pEX1R40R41:62380+NW(II,1)V1+V10NW(II,2)1+++ ** SECOND SENTENCE+ ** RIGHT OR WRONG ?+ ** TRUE--- V2=1, *(16384)* 16368,0(*AN83622659* AN6862265I*"T1100:TX*$0:312,8h*&T1200:Tw*(3:312,8**62210*9T1100:T*>2:2:" "*HT1200:T*J2:2:(AN)*L16384,0*N*S*T ** FIRST SENTENCE+U ** RI)162800: DRAW POINT BOXA*1EX1COUNT1Ģ2:2:"1 POINT !"Z.1EX1COUNT1ī12610f81SCSC1B1SC1Ģ2:2:"1 POINT!"L1SC1Ģ2:2:SC;" POINTS"V124:"PRESS RETURN TO GO ON.":45,18294,18294,19145,19145,182[1W0:16368,0`1L" "I063000: BLANK RETURN BOX.X02:2:" "r0XSTART100:XFINISH241YSTART105:HOLD110:1XX,YY162600: MOVE SKIER FROM 3RD->4TH STEP.$11:" "&12:" "(13:" "ύƭŠōӠŠŮύΠĮîӠŠ̍ƠŠĠӮƍӠӍˠĮύҍ̍ҍōٍǍٍٍčҍčō͍ǍԍǍԍōύǍōōōčҍ΍׍ōǠ͍͍΍͍Ӎȍҍԍԍ̍ԍ΍Ѝ΍΍ҍٍԍҍҍҍύנōōҍԍƍ̍΍ӍӍӍӍӍҍӍԍԍǍ΍ˍōˍԍ͍ōҍǍԍӍ΍ԍ΍Ӎč̍΍΍׍ōōōбӍӍӍō΍΍̍ō΍ȍ̍ҍōōčˍҍčōҍٍٍٍҍӍčӍōōōčٍٍ̍̍X,15 !LX!V3!`NII,1):N4(II)1621608)19:BB$(II,2):N4(II)262160[)18:BB$(II,3):N4(II)362160~)17:BB$(II,4):N4(II)462160)16:BB$(II,5)))) ** SAME OR DIFFERENT))24:"PRESS ";(34);"S";(34);" OR ";(34);"D.";(34) *ANd[g???$ -6.-....>.>>''''''I -?->5ے--(--(--(--(--(--(@@#????? d-6--??W--??W--??W--??W "WNLE$(K)""Ģ10:1:LE$(K)^OKO:"CORRECT ANSWER: ";F1$(I)O(F1$(I))67ĺ:"STUDENT'S RESPONSE: E"$O(F1$(I))69ĺ:"STUDENT'S RESPONSE: C")O60000: WAIT FOR CR WITH PROMPT. ";8NLE$(K)""ĺ" ,K)ZNL(A$)K!\NLE$(A$,L)xfN(LE$)40(LE$,1)" "(LE$)40(LE$,1)"."LE$(PN)LE$:PNPN1:A$RI$:20100pNKN(RI$)2ī20200N20040NK15ZNLE$(K)""Ģ10:1:" "%NPN1*N8:1:"SENTENCE GIVEN:"4NA$A1$(I)" "A2$(I)" "A3$(I)" "A4$(I)" "HNK1255RNRI$(A$24:"PRESS RETURN TO START OVER.",(#60010I#(4);"BLOAD CHAIN,A520"`#520"INSTRUCTIONS"fNN *******************N ** WRONG SENT.#1N *******************N  N8:1:" 9100x7300,(4);"BLOAD CHAIN,A520";@520"MAIN"Hl :59900\ 61200: HEADER4!6:"ALWAYS REMEMBER THE DIFFERENCE BETWEEN"!:"CAUSE AND EFFECT. I HOPE TO SEE YOU"!:"AGAIN SOON FOR ANOTHER GAME OF ALPINE"`":"SKIER."!"WW(II,2)0İ20100dI II+,600008:59900L61200: HEADERaX6:"THANK YOU.":"IF YOU WANT TO PLAY ANOTHER ROUND," :"PRESS RETURN, IF NOT, PRESS N."W(16384)16368,0LT1200:TW141ī7900W206. I1N:WW(I,1)NW(I,1):WW(I,2)NW(I,2):IY 8:"DO YOU WANT TO SEE THE INCORRECT"s ":"RESPONSES? (Y/N)" |W(16384) 16368,0 DT150:T W217ī6100 W206ī6800 p5500 II1N 8I12 WW(II,1)0İ20000ӍӠҠ̍Ϡήύ٠ƠԠӠčȮύҠŠΠРԠǍҠΠĠҮύǠӠήύΠϠӍӠٮύԍ٠ȠӮύӠӠŠΠύȮύ̠ӠōǠ΍̮ύŠӠĠٍàӮƍϠԠŠԍƠՠԠύŠӮƍԠӠǠǮƍΠΠҠĮύΠӠŠӠϠ׮ƍԠӠΠύŠϮύҠ٠̠ŠΠӍԠΠӮύӠŞ̌ӠԠĮύҠӠŠΠĠŮƍӠĠUND(S)(S)(S)(S) T$ * C  ******************[ ** ALP SKI HEADERt ******************z  :59900 2:14:"ALPINE SKIER" $6:0:1 )FF132 .X50FF7 82FFX,11 =2FFX,11 B2FFX,15!G2FF860070"16368,0:WCR60070(.>F@ *****************XB ** RUN ASSMpD *****************vFH(4);"BRUN ASSM"R **************** ** CLICK SOUND ****************S16336T15 SO16302,0:16304,0+16299,0:16297,017XOZ *****************d\ ** WAIT FOR CR|] *****************^`24:"PRESS RETURN TO GO ON."e45,18294,18294,19145,19145,182jCR13128t16368,0W(16384):W129:AA$(II,2):N2(II)262050?(I18:AA$(II,3):N2(II)362050b(N17:AA$(II,4):N2(II)462050u(S16:AA$(II,5){(b(( ** SENT #2((1:6:B$(II,1):N3(II)162130(6:B$(II,2):N3(II)262130(6:B$(II,3))17:20:BB$((I):J1N3(I):B$(I,J):J:N4(I):J1N4(I):BB$(I,J):J:F2$(I)H'IX'D$;"CLOSE"^'!d'(v'* ** SENT. #1|','01:6:A$(II,1):N1(II)162015'56:A$(II,2):N1(II)262015':6:A$(II,3)'?17:20:AA$(II,1):N2(II)162050(D1ԠҍΠҠŠ؍ͮƍӠŠŠήύ͠ӠōƠŠԍӮƍĠԠ҇ΠӠĠҍŮύӠ٠ӠӠҍƍĠӠҍΠŮύŠҠӠϠӠӍӮύӠŠϠˍΠŠŠōΠӮύǠӠǮύҠٍ̠ҠϮύҠӠŠŠ΍ҮύŠΠӍӠΠōԮƍǠӠϠŠҍٮύϠҠӍŠĠ΍àĮƍ̠ΠŠŠͮύӠōA ** &<&RD1ĺD$;"OPEN ROUND 1":D$;"READ ROUND 1"l&RD2ĺD$;"OPEN ROUND 2":D$;"READ ROUND 2"&RD3ĺD$;"OPEN ROUND 3":D$;"READ ROUND 3"&RL&I1N&N1(I):J1N1(I):A$(I,J):J:N2(I):J1N2(I):AA$(I,J):J:F1$(I)A'N3ԠǍ٠ΠŠĮύԠӠōԠŠՍŠҠήύ̠ӠŠԠԠō̠ҮƍΠŠٍӠŠҍٮύ٠ӠŠԠȍƠŠҮƍŠčΠϠʍƍz#?0/   Ҡ ŠΠͭӠ % Ġ ŠҠˠĠ ŠԠΠŠ Ϡ Ġ έ͠4 Π" Ġ ͠îԠ!ӠĠ î٠!Ġ . I1N:WW(I,1)NW(I,1):WW(I,2)NW(I,2):IY 8:"DO YOU WANT TO SEE THE INCORRECT"s ":"RESPONSES? (Y/N)" |W(16384) 16368,0 DT150:T W217ī6100 W206ī6800 p5500 II1N 8I12 WW(II,1)0İ20000KIP"A h:"THE ";(34);"TEACHER FEATURE";(34);" PRESS RETURN."Q W(16384)_ 016368,0o T1100:T W148ī4900 \W141ī8300 4300 $:59900 61200: HEADER 5:12:"TEACHER FEATURE" P10:"STUDENT'S SCORE: ";SC;"/";N :59900! 61200: HEADERP t6:"NOW FOR THE TEACHER FEATURE. IF THE"| :"TEACHER WANTS TO SEE THE STUDENT'S" <:"RESULTS, HE OR SHE CAN DO SO JUST BY" :"HOLDING DOWN THE (CTRL) KEY AND" :"PRESSING (T). WHY NOT TRY IT? TO S10: WAIT FOR CR WITHOUT PROMPT.8 ( 62450: CLEAR HGR2a 60010: WAIT FOR CR WITHOUT PROMPT.} 3500: TEACHER FEATURE T 60000: WAIT FOR RETURN WITH PROMPT.  ******************* ** TEACHER FEATURE ******************* H F THE GAMES." @:"YOU WON ";F SC0ĺ"NONE OF THE ";N;" GAMES."W SC0ī2100p l60000: WAIT FOR CRz 3500 4SC;" OF THE ";N;" GAMES." SC8Ģ10:"PRESS RETURN TO RECEIVE YOUR SKIING" SC8ĺ:"AWARD." ` SC7ī2900 600 201,141,240,21,201,136: 240,17,201,128,144,13U 201,160,176,9,72,132o( 53,56,233,64,76,2492 253,76,240,253<I76876827FV:I,V:IP54,0:55,3Z1002d1002d1٠РӠŠӮ٠РӍԠԍӮӍŠҠӠĠ΍٠ӮŠŠРƍҠΠǍ٠ӮčɠŠҠӮɠŠԠԍӠٍӮč΍ӠӠǠҮŠӠӍԠӠ̍ӠҮčΠ٠Š̠ԠŠč٠ҠŠîŠĠԠōĠҠ٧ӍîčΠƠŠ֠ϠɠΠϠύЮɠΧԠЍȠŠ֠ήǮǍΠŠΠōԮӍ̠ԠŠƠŠӠōΠͮŠƠŠӍΧԠŠ΍ͮӍŠŠӠӍҠŮӍӠΠčҠŮčŠҠƠҠԳŠ̠ŠҍӠƠԠΧԍϠٮč͠Ġ٠ȮҠŠϠōҠɠčҠŠҮӍŠĠ̠ԮŠĠǍԠԮӍ٠ӠĠŠ΍ΠԠŠĠˍҠ٠ŠĠҠӮŠǍĠ٠΍̠ӮӍŠ̠ԠŭĠ΍ҠŠŮǠŠōŠ΍̠ŠĮčŠ̠ŠҠӠƠōҠӠŮӍ٠ӮčŠΠŠӍӮӠ̠ŠԍӠō٠ԠӮčԠԠƠŠȧӍŠӠҮԠƠōȧӠŠӍԠҮӍӠԠčƠҠӮҠӠ̠ύ٠ƠՠōŠƠŠӮčŠȠӠȠΠōǠŠŠӮҠƠŠōӠŠҍΠŠȮӍŠ٠ӠŠԍǠΠҠٮŠٍŠӠҍӠҠΠٍҠϠǮӍ٠ԠӠ͍ΠӮԠӍŠϠٮčӠԠŠĠōȠŠĮӠōԮӍŠƠŠӠ٠űŠĠŠԍƠҠǮŠӍŠҠǍҠĠҮčԠԠƠ٠ӍĠŠԮԠƠŠӍĠŠԮӍŠӠҠӠϧӍԠǮ      ,U*U*U*U* `+U*U*eP@*U*U*U*U*UPV*UӍ̠ŠӠĠčӠԠͧӮ٠ͧӍҠĠύĠҮӍ̠ƠŠӠōĠԠ̮̠Ӡō٠̠ύΧԠԠήӍɠ٠ŠͮɠΧԠō̠ӮčΠǮӍŠŠˠӠҮӠԠҮ芊ԍӠƠӠӮŠōӍƠӮčŠԠĠӠčĠӮŠԠӍĠΠύԠРԠӮ΍ŠōŮčŧӠĠĠԮōԍٮӍĠӠĠٍŮĠӠōԠ΍ĠΠōĮčΠĠҠٍ̠ΠͮΠӍ̠ōӠҠΠٮ٠ӍҠ΍ήčŠ٠٠ٍӠӠƍӮŠΠӍԠƠō٠ٍٮčŠӠĠŠħӍԠҠҮŠħӍԠҍȠӠŮčΠŠԍҠƠ̮č٠ӠŠԠƍŠӮ٠ӍϠҍӮӍ̠ӠŠĠύŠΠŠͮŠ̍Š΍Ԯč̠ӠҠΠήΠӍҠ΍̮Ӎàō̮̠ӠōȠҍȮӍȠƠŠҠ΍Ġ̮Š΍ĠҍӠȮčŠӠҠŠҍŠӮŠӍӠ΍ŠҠōӮӍΠΠĠŠ΍ŠӠٮΠӍԍ٠̍ŮӍԠ̠ȍŮōΠŠҍȮӍŠԠŠӍӮŠٍӠӮčΠӠŠԠ٠΍ŠŮŠӍĠΠ΍ŠŮčȠӠŠȠϲŠӠŠԠԍΠҠ̠ͮŠӍΠŧӠ͍ŠҠ΍ŠӮӍĠӠҠΠ΍ΠŮĠӠԍŠϠ٠΍ΠŮč٠٠Ҡč̠Ů٠ԍϠF2$(II)4S(F2$(II))83ĺ:"STUDENT'S RESPONSE:D"b S(F2$(II))68ĺ:"STUDENT'S RESPONSE: S"S60000: WAIT FOR CR WITH PROMPT.SK15:LE$(K)"":KS ******************* ** HGR2 SCREEN *******************>> """"**6"""""""> >>> >00000>">>>>>>>>>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< h`a `I?a(j`NO,0 i`j`ё(,ɍ `LSa ``"*:"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""`#`6`L`aHɠ_ɟ XɈFɕk` ɎOk`h`"%$i`j` ` `i`j`h` ` ` `L` `k`h ``H%) *n%jm$m *.%%j) @ahH)?mmiZiȘ0   ԪժժժժժժժժժժժժժժՊԪժժ՚ժժժժժՊԪժժժժժՊԪժժ?ժժժժ倀 P*ԪժժժժժժժժժժժժժժժժժՊԪժժժժժժժժժժ`Ԫժժժժժժժժժժժժժժ~ӪժՊԪժժժժժժժժժՎ@Ԫժժժժժժժժժժժ~@Ԫx~~OԪժժժժժժժժժժꀀ|?XԪժժժ?ԊԪժԪժժ  U*Ԫ{ժժժժ Ԫժժ ԪժժժժժժժժժժժժժժժՊԪժժՊժժժժժժ@Ԫ?ժժժժժϪՊԪժժժժժժP*ԪժժժժժժժժժժժժժժժժժՊԪժժժժժժժժժժ0ԪժժժժժժժժժժժժժժժժՊԪժժժժժժժժժ՘`ԪժժժժժժժժժժժpԪ>xcǪԪժժժժժժժժժժ|@?@Ԝ ԪժժժՊԪժ?ԪժժU*Ԫ?ժժժժ?Ԫժժժ ԪժժժժժժժժժժժժժժժՊԪժժժժժժժժժ`Ԫ?}}ժժժժժǪՊԪժժϪժժժժP*ԪժժժժժժժժժժժժժժժժժՊԪժժժժժժժժժժ倀8ԪժժժժժժժժժժժժժժԪժՊԪժժժժժժժժժղ0ԪժժժժժժժժժժժՌ_~Ԫ~|Ӫ Ԫժժժժժժժժժժժ|``ԺԪߪժժժՊԪժժժժՊU*ԪժժժժԪժ?ժժ倀@ԪժժժժժժժժժժժժժժժՊԪժժժժժժժժժ0Ԫozժժժժժ~ӪՊԪժժתժժժժP*ԪժժժժժժժժժժժժժժժժժՊԪժժժժժժժժժժ8 Ԫժժժժժժժժժժժժժժ?ժժՊԪժժժժժժժժժ @Ԫժժժժժժժժժժժ՚~`Ԫ~}AѪոԪժժժժժժժժժժժ~?px#           ϠϠϠŠ٠΍ǠԮΠĠύŠŠǍŠƠōٮӍҠΠŮŠӠōԠҠƍҠٮӍǠӠĠΠՍŠĮɠŠŠ͍Πɧ͠ˮč̠ŠӠĠҠӍΠԠŮɠӠŠٍŠŠҠӍŠԠήӍΠĠŠŠ΍ŠŠԍŮӍǠӠԠΠ̠ӠԍĮ̠ӠōŠΠǮčΠƠŠԠΠԍҠŠӮ٠ŠƠōΠԠҍӠٮӍ̠ƠӠΠŠ٠ōҮӍŠŠӠĠӍΠΧӠӮŠŠҍӠΠӠ΍ΧӠӮӍҠӠŠҠ΍ŠӮŠӠōҠΠҍӮӍɧ͠Š٠ŠŠϠΧԍŠŮčӠҠԠŮ٭ŠӍŠҠ΍Ӎ٠̠ӠΠύŮΠ̠̠ōƠԠӠԍŠήӍΠŠҠӠӍҠΠԮΧӠ΍ΠԍΠӠ̠ǠԍŠ׮̠ԠŠƍŠӠԠŠ׍ŠŮӍ̠ŠӠԠ٠čŠΠ׮٠ӠŠٍŠϠĠԍŠŠΠ׮Ӎɠ̠ĠŠ͠ҮɠĠŠ͍ҠɠĠή٠٠נŮӍŠŠȠƠӍŠǠήŠǠ΍ӠΠ٠ٍӮč٠ԠӠˠҍ͠ŠŠήԠӠϠԍΠŠŠҍ٠ԠӮӍŠӠ٠ŠΠӠӠĠԠӠҮԠӠҍĠΠӍˮčΧӠŠӠӍΠͧӮΠӠҍŠΠͮӍנŠŠԠϠӠԮŠԠԠϠӠԍӠΠӠ̠ҠƍŠԠͮŠӠ΍ҠԠӮčɠԠĠΠɠР΍ŠͮǠΠō͠ӠŠٮӍԠϠՠϠϠР̍ΠԠٿϠՠŠύ͠ΠԠӿčɲŠΠӠР΍ŠǮŠΠӍϠРΠōǮč̠ƠŠӠŠӍԠͮ͠Ӡō٠ŠԍǠЮӍŠ̠ƠΠӠϮϠӠҍΠ٠ҍ٠Πήč     ӍŠҠӠĠ΍٠ӮŠŠРƍҠΠǍ٠ӮčɠŠҠӮɠŠԠԍӠٍӮč٠Š̠ԠŠč٠ҠŠîŠĠԠōĠҠ٧ӍîčΠƠŠ֠ϠɠΠϠύЮɠΧԠЍȠŠ֠ήӍ٠РӠŠӮ٠РӍԠԍӮͮŠƠŠӍΧԠŠ΍ͮӍŠŠӠӍҠŮӍӠΠčҠŮčŠҠƠҠ΍ӠӠǠҮŠӠӍԠӠ̍ӠҮčΠҠŠϠōҠɠčҠŠҮӍŠĠ̠ԮŠĠǍԠԮӍ٠ӠĠŠ΍ΠǮǍΠŠΠōԮӍ̠ԠŠƠŠӠō΍̠ӮӍŠ̠ԠŭĠ΍ҠŠŮǠŠōŠ΍̠ŠĮčŠ̠ŠҠӠƠōҠӠŮŠ̠ŠҍӠƠԠΧԍϠٮč͠Ġ٠ȍŠԍӠō٠ԠӮčԠԠƠŠȧӍŠӠҮԠƠōȧӠŠӍԠҮӍӠԠŠĠˍҠ٠ŠĠҠӮŠǍĠ٠ŠȠӠȠΠōǠŠŠӮҠƠŠōӠŠҍΠŠȮӍŠ٠ӠŠԍǠΠҠٮŠ٠Ӎ٠ӮčŠΠŠӍӮӠ̠ԠӠ͍ΠӮԠӍŠϠٮčӠԠŠĠōȠŠĮӠōԮӍŠƠŠӠ٠ԠčƠҠӮҠӠ̠ύ٠ƠՠōŠƠŠӮčҠǍҠĠҮčԠԠƠ٠ӍĠŠԮԠƠŠӍĠŠԮӍŠӠҠӠϧӍԠǮŠӠҍӠҠΠٍҠϠǮӍ٠DZΠӠҠŠҍΠҠҠӮΧӠҠӍӠŠҍΠΠӮӍŠӠŠŠ΍ȮŠӍԠӮčŠĠŠԍƠҠǮŠӍ      ";@926," * ";4@994,"* * ";CI120:Ih@860,A1$;:@926,A1$;:@994,A1$;xI1200:I@704,(31);@720,"COPYRIGHT 1981";@776,"IMPERIAL INTERNATIONAL";@842,"LEARNING CORPORATION"; @970,"PRESS ENT * * ";$B@926,"* * *";<L@994,"* * * ";KVI120:Ic`@728," * ";{j@792," * * ";t@860,"* * ";~@926,"* * ";@994,"* * * ";I120:I@728,A1$;:@792,A1$;@860," * @926," * * ";.@994,"* * * ";=I120:IU@728," * ";m@792," * * ";@860," * * * ";@926,"* * * ";@994,"* * * *";I120:I$@728," * ";.@792," * * "; 8@860,"' >I113HI10A$A1$8R@L(I),A$;:'SKIERG\@654,B2$;WfI1TT500fpI2TT50uzT1TT:T@L(I),EA$;:'ERASESKIER@654,B2$;I'PUFFOFSNOWFROMWIPEOUT.'A1$" "@860," * ";)STRING$(5,(24))SF$STRING$(8,(25))(26)SF$7'Q@456,B1$;:@654,B2$;k@662,B3$;:@418,B4$;@358,B5$;:@296,B6$;@174,B7$;@10,S1$;:@196,LA$; @70,"THIS IS A ";@128,"DEMONSTRATION OF"; '*'MOVINGSKIER.4$(2,(24))(26)STRING$(5,E$)STRING$(4,(24))(26)STRING$(3,E$)STRING$(5,(24))(26)STRING$(3,E$)vSF$(42)1S1$SF$(26)STRING$(12,(25))SF$(26)STRING$(4,(24))SF$STRING$(10,(25))(26)SF$STRING$(2,(26))STRING$(6,(24))SF$(26)cB7$(160)(190)STRING$(3,(191))(189)(144)STRING$(5,(24))(27)(184)(191)(180)L(1)630:L(2)628:L(3)690:L(4)688:L(5)750:L(6)748:L(7)810:L(8)808:L(9)806:L(10)804:L(11)802:L(12)800:L(13)798E$(128)hEA$E$STRING(176)<vB4$(160)(158)(129)STRING$(10,(128))(128)B5$(184)(135)STRING$(2,(32))(139)(129)(130)(175)(135)(130)(175)(135)B6$(160)(158)(175)STRING$(8,(191))STRING$(9,(24))(27)(184)STRING$(7,(191))(180ō٠΍ԍӍҍҍԍ΍ԍԍ׍ō̍ȍōō΍ٍč̍̍̍ˍ̍̍ԍҍ΍ōō΍ҍԍЍōԍōύנˍϠٍӍ΍ōЍԍЍ׍ōԍǍō͍ҍЍ΍ύԍ̍΍ȍٍōЍōԍȍΠٍ΍ĠԍӍӍčō΍ōӍԍȍčԍӍǍԍ΍ԍڍÍ˧Π̍̍ҍҍҍҍҍ̍ҍԍŠǍǍǍҠǍǍԍӍӍӍҍҍԍ̍ԍ΍̍̍Šԍ̍ҍōҍԍҠҍ΍Ǎōƍ   IT.) Z"TYPE STRING #";I;":"- d"";A$(I)? nA$(I)""60E x` "WHAT FILE NAME? ";N$s D$;"OPEN ";N$ D$"DELETE ";N$ D$;"OPEN ";N$ D$;"WRITE ";N$ I1 J1I1 A$(J) J D$;"CLOSE ";N$ MAKE TEXT$ A$(1000):I09D$(4): CTRL DA:n("YOU GET TO TYPE ONE STRING AT A TIME."2"A STRING MAY HAVE UP TO 239 CHARACTERS."<"THIS PROGRAM LETS YOU WRITE TEXT FILES. "F:II1 P"(PRESS THE RETURN KEY TO QU N THE","FAN; COOL THE","AIR.",Ch 2,"HANDS GET WARMER;","PUT ON YOUR MITTENS.",E,3,"CREATE A","BOUNDARY;","BUILD A FENCE.",Er 2,"THE FLOOR SHINES;","WAX THE FLOOR.",E,3,"BAKE A CAKE;","THE BATTER","BECOMES SOLID.",C:| 2,"KEEP TURNING IN CIRCLEZJ 2,"SCORE A BASKET;","EARN TWO POINTS.",C,3,"THE STREET","BECOMES WET;","IT RAINS.",ET 2,"THE SNOWBALL GROWS;","ROLL A SNOWBALL IN THE SNOW.",E,3,"TICKLE THE","CHILD; THE","CHILD LAUGHS.",C^ 2,"MOVE THE GEARS;","START THE MOTOR.",E,3,"TURN O"WOOD; POUND A NAIL.",E,3,"THE WIND","BLOWS; THE","FLAG WAVES.",C6 2,"THE ANKLE IS STRONGER;","TAPE AN ANKLE.",E,3,"FEEL","REFRESHED;","DRINK LEMONADE.",E@ 2,"CHILD IS HAPPY;","CHILD WINS THE GAME.",E,3,"SCRUB A","FLOOR; THE","FLOOR IS CLEAN.",COT;","THE CAKE IS","BURNT.",Cz 2,"THE LOLLIPOP GETS SMALLER;","LICK A LOLLIPOP.",E,2,"FINGER BLEEDS;","CUT FINGER.",E" 2,"DEFLATE THE TIRE;","THE TIRE GOES FLAT.",C,4,"MAKE","FOOTPRINTS;","WALK IN THE","SNOW.",EA, 2,"THE NAIL SINKS INTO THE",OG;","HIS TAIL WAGS.",C#9 ** ROUND#3 **?E 2,"THE KITTEN PURRS;","THE KITTEN IS PETTED.",E,3,"THE COLORS","FADE; DRY","SOME FLOWERS.",E 2,"RADIATION IN THE AIR;","NUCLEAR POWER PLANT LEAKAGE.",E,4,"THE OVEN","IS TOO H","NEWS.",Ei 2,"YOU ARE LATE FOR SCHOOL;","MISS THE BUS.",E,3,"WIN THE","GAME; GET","FIRST PRIZE.",C 1,"FALL; SLIP ON THE ICE.",E,4,"CROSS THE","FINISH LINE","FIRST; WIN THE","RACE.",C 2,"SAVE ENERGY;","INSULATE YOUR HOUSE.",E,2,"PET THE DER A BROKEN BOTTLE;","GET A FLAT TIRE.",C,3,"CAR WON'T","START; CAR","IS OUT OF GAS.",E 2,"OPEN THE DOOR;","TURN THE DOORKNOB.",E,3,"DROP A ROCK","IN THE RIVER;","MAKE WAVES.",C  2,"MAKE ICE;","PUT WATER IN FREEZER.",E,3,"FEEL SAD;","RECEIVE BAD.",C,4,"YOUR CLOTHES","FEEL TIGHT;","GAIN 20","POUNDS.",E 2,"MOW THE LAWN;","THE GRASS IS SHORTER.",C,3,"WATER COMES","OUT; OPEN THE","FAUCET.",E 1,"LAUGH; HEAR A FUNNY JOKE.",E,3,"LIE IN THE","SUN ALL DAY;","GET A SUNBURN.",CW 2,"DRIVE OVRER.",Cad 2,"THE BUG DIES;","STEP ON A BUG.",E,4,"PUSH ON","THE BRAKE;","COME TO A","STOP.",Cn 2,"DISCOVER THE PLOT;","READ THE STORY.",E,4,"TYPE A WORD;","PRESS CERTAIN","KEYS ON THE","TYPEWRITER.",E9x 2,"MAKE MUD PIES; GET YOUR","HANDS DIRTY"PEPPER;","SNEEZE.",C ! (7 2 ** ROUND#2 **= <C F P 2,"MILK CHANGES COLOR;","STIR CHOCOLATE INTO MILK.",E,3,"TAP YOUR","FOOT; LISTEN","TO MUSIC.",EZ 2,"ADD SUGAR;","SWEETEN THE LIQUID.",C,3,"WEAR YOUR","GLASSES; SEE","THINGS CLEA1) <J1I1 F:A$(J)# PJ7 ZD$;"CLOSE ";Z$M dD$;"NOMON C,I,O"S nY x_ s D$;"MON C,I,O" D$;"OPEN ROUND 2" D$;"WRITE ROUND 2" I1 J1I1 A$(J) J D$;"CLOSE ROUND 2" D$;"NOMON C,I,O" > 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  ) <J1I F:A$(J) PJ3 ZD$;"CLOSE ";Z$I dD$;"NOMON C,I,O" AK 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 ";8NLE$(K)""ĺ" ,K)ZNL(A$)K!\NLE$(A$,L)xfN(LE$)40(LE$,1)" "(LE$)40(LE$,1)"."LE$(PN)LE$:PNPN1:A$RI$:20100pNKN(RI$)2ī20200N20040NK15ZNLE$(K)""Ģ10:1:" ō٠΍ԍӍҍҍԍ΍ԍԍ׍ō̍ȍōō΍ٍč̍̍̍ˍ̍̍ԍҍ΍ōō΍ҍԍЍōԍōύנˍϠٍӍ΍ōЍԍЍ׍ōԍǍō͍ҍЍ΍ύԍ̍΍ȍٍōЍōԍȍΠٍ΍ĠԍӍӍčō΍ōӍԍȍčԍӍǍԍ΍ԍڍÍ˧Π̍̍ҍҍҍҍҍ̍ҍԍŠǍǍǍҠǍǍԍӍӍӍҍҍԍ̍ԍ΍̍̍Šԍ̍ҍōҍԍҠҍ΍Ǎōƍ   7539,145@6JX2404+T2X,1302^XGh61850: ANS BOXMSj **************** ** ANSWER BOX ** ****************32:2"O"2,418,418,182,182,41,319,319,191,191,3F55,11055,12058,115-58,11555,1103@ POLE#1FY165,89165,62i9:23:"1"|165,62145,62145,72165,72145,72148,67145,62148,67 FINISH SIGN"18:"FINISH",1,1751,145 639,1360: Y OFFSET/FD230: X OFFSETHFE0.50: SLOPE O 3[279,42lX279110(Y((FDX)FA)FBFE(FCX)2X,Y4TH STEP.0C5ī16000: 2ND SENTENCE WIPE OUT.012400062700: ERASE SENTENCE PAIR*024:IER FROM 2ND->3RD STEP+4062100: SENT.#2A>062200: GET ANS.WH062400: ANS.T/F?gR0T1250:T\0V21Ģ24:"PRESS RETURN TO GO ON. ":45,18294,18294,19145,19145,182f062550: RETURN AA$=CORRECT ANS.p07:" " 0 ** MOVE SKIER FROM.0 ** 2ND TO 3RD STEP40Y 0XSTART188:XFINISH100:YSTART61z062700: ERASE SENTENCE PAIR02:2:" "024:" "063000: BLANK RETURN BOX 00:1XX,YY*062600: MOVE SKS /C0/7:" "//T1100:T@/V11ī12210J/CC1V/7:AA$f/T1250:Tw/V10ī12250/W(16384)/16368,0/W141ī12300: MOVE SKIER 2ND->3RD STEP/C5ī14000: 1ST SENTENCE WIPE OUT./121700 READ DATA%D/62000: PRINT SENT#1;N/62200: GET ANS.QX/62300: ANS.T/F?ab/T1250:Tl/V11Ģ24:" ":24:"PRESS RETURN TO GO ON.":45,18294,18294,19145,19145,182v/62500: RETURN AA$=CORRECT AN2II1:R31-.IIN112750: END OF ROUND8.T(0)E.:59900^.XSTART260:YSTART22q.61340: SLOPE.61850: ANS.BOX.XFINISH190:HOLD1.62600: MOVE SKIER DOWN SLOPE TO 1ST FLAG/PRRDī12100/F31ī12100 /61900:F31:NING OR DIFFERENT"C 6):"MEANINGS. AFTER YOU HAVE DECIDED, TYPE"Y ;):"YOUR CHOICE:"q @):10)"S FOR SAME" E):10)"D FOR DIFFERENT" J)60000 . . ** START MAIN SKI- . ** SLOPE ALGORITHM . .IIII1 .R3112005 .EX0II ( IF W=N, NO EXAMPLE( (W206ĪEX0: (W206ī12000E )10450Y )61200: HEADER ")6:"LET'S TRY TO SKI DOWN JUST ONE SLOPE" '):"FOR PRACTICE. I'LL GIVE YOU TWO SENT-" ,):"ENCES. DECIDE WHETHER THE SENTENCES" 1):"HAVE THE SAME MEA1200: HEADER< (6:"IF YOU WOULD LIKE TO SEE AN EXAMPLE,"l (:"PRESS RETURN. IF YOU ALREADY KNOW HOW" (:"TO PLAY, PRESS N." (16368,0 (W(16384):W12810450 (16368,0 ( IF W=CR, YES EXAMPLE (W141ĪEX1 (W141ī10510 2( <( ** ROUND NUMBER ?" A(, K(PRRD< P(W(16384)J Z(16368,0\ d(W177ī10380n n(W178ī10380 x(W179ī10380 (T1100:T (10320 (RDW176 (21:"OK, ROUND ";RD;" IT IS." (60000 ( ( ** EXAMPLE ** ( (6AL$(5),AN$(13,2)( `'NW(13,2),LL(30,2)1 j'R11E '61200: HEADERs '8:"WHICH ROUND WOULD YOU LIKE TO PLAY?" '11:" ROUND 1" (:" ROUND 2" (:" ROUND 3" (18:"PRESS THE NUMBER OF YOUR CHOICE." (3:0:1 ((1180,80('#' FILENAME:MAIN-WITHREM)$'U3'V12:V22:EX0:F30:R30:R40:II0:RD0c4'AN0:SC0u8'61000: ASSM='D$(4)B'T(0)L'N5Q'R1110200V'N1(13),N2(13),N3(13),N4(13),A$(13,3),AA$(13,5),B$(13,3),BB$(13,5),F1$(13),F2$(13) ['           ! ! "     ! 1W(16384)116368,0+1WCRī12700R1I2630:LL(I,1):LL(I,2):"*":Iy1I1115:LL(I,1):LL(I,2):" ":I1126701EX1II1R30İ62900112000: GO TO TOP OF SLOPE AND START OVER.1:599001T(0)2(4);"BLOAD CHAIN,A WATERMELON."=%:"DO THESE SENTENCES HAVE THE SAME MEAN-"m&:"ING? NO. IN THE FIRST SENTENCE, TODD"&:"DOES NOT LIKE WATERMELON. IN THE " &:"SECOND SENTENCE, HE LOVES IT. THESE"&:"SENTENCES HAVE DIFFERENT MEANINGS."&60000 T MEANINGS."7%24:"PRESS RETURN TO SEE AN EXAMPLE."`%60010: WAIT FOR CR WITHOUT PROMPT.m%:59900%61200: HEADER%6:"READ THESE TWO SENTENCES:"%:" 1. EVERYONE EXCEPT TODD LIKES"%:" WATERMELON." %:" 2. TODD LOVESLLS."]%60000b%.c% *****************Dd% ** INSTRUCTIONS\e% *****************bf%o%:59900%61200: HEADER%6:"YOU'LL HAVE TO READ PAIRS OF SENTENCES"%:"AND DECIDE WHETHER THEY HAVE THE SAME" %:"MEANING, OR DIFFEREN59900!%61200: HEADER5&%6:"THANKS, ";NA$;"."f0%:"HOW WOULD YOU LIKE TO BECOME AN OLYMPIC":%:"CLASS ALPINE SKIER? TO DO IT, YOU'LL"D%:"HAVE TO SKI OUR SPECIAL SLOPE VERY"N%:"WELL. THIS IS DONE BY USING YOUR"X%:"READING SKI$61200: HEADER=$6:"HI THERE. WHAT'S YOUR FIRST NAME?"`$:"TYPE IT AND PRESS RETURN."o$1170,166|$10:NA$$(NA$)19370$NA$(NA$,12)$(NA$,1)" "NA$(NA$,(NA$)1):9430$(NA$,1)" "NA$(NA$,(NA$)1):9440%:T 1981"-#17:19:"IMPERIAL INTERNATIONAL"Q#18:20:"LEARNING CORPORATION"d#61100: CLICKt#T1500:T#61100: CLICK#60000## *********************# ** STUDENT'S NAME# *********************##:59900SET2#FD166: X OFFSET&<#3:0:18F#XX165:YY161EP#1XX,YYVZ#X165404o_#Y((FDX)FA)FBFC|d#1XX,YYn#1X,Ys#XXX:YYYx#X#T1500:T#7:5:"ALPINE SKIER"#61100: CLICK#T1500:T#16:23:"COPYRIGH FE0.4: SLOPEB!3:0:10H!XX250:YY130B!X2501704b!Y((FDX)FA)FBFE(FCX)o"1XX,YYz"1X,Y"XXX:YYY"X"1170,166)#*# ** FLAT PLANE **+#.#FA3: NO.OF NODES/#FB5: AMPLITUDE0#FC160: Y OFFNGTH,$82^"233,100:232,07X59900: HGR2 ON=LS SKIER ANIMATIONYgCR$(13)tZ3:0:1hT11000:Ti1250,130nT11000:TxFA3: NO. OF NODESFB5: AMPLITUDE@FC575: Y OFFSETFD250: X OFFSET* COPYRIGHT FRAME **0  *********************6 d@ ::i ,:(4);"BLOAD PIC.COPYRIGHT,A$4000" 6(4);"BLOAD SHAPETABLE,A$6400" ; @ SHAPE#1:SKIER J SHAPE#2:CIRCLE L SHAPE#3:SQUARE CURSOR O ADDRESS $6400T SHAPETABLE LEI02 \1:1:UO$(I);H$;5 1:39:RO$(I);V$;L $24:1:BO$(I);H$;Z I15200d " ";z P1:1:LO$(I);V$; I05500 D$;" "; |I W(16384) D16368,0 WCR4600  p  8 *********************  *# :"THIS IS A DATA COMMAND";CR$@ <" MICROCOMPUTER";CR$b " LEARNING PROGRAM";CR$;CR$ 20:"PRESS RETURN TO GO ON."; hV$"":H$"" 32,0:34,0 0I112:H$H$"* ":I:H$H$"*" I17:V$V$"*"D$" "D$" "D$:I:V$V$"*" OPENING FRAME' T ******************- 3  X UO$(0)"":UO$(1)" ":UO$(2)" " RO$(0)" "D$:RO$(1)RO$(0)RO$(0):RO$(2)"" H BO$(0)"":BO$(1)" ":BO$(2)" " LO$(0)RO$(1):LO$(1)RO$(0):LO$(2)"" :59900: HGR2 ON t32,8:34,7LIZATIONS$  ********************* @ l(4);"BRUN ASSM"P DC1ī6600V w 4UO$(3),RO$(3),BO$(3),LO$(3) CR13128:NO("N")128 Q$(34):D$(10)(8):CR$(13):UN$(21):NR$(14) ` ( ****************** **Ad FILENAME:INSTRUCTIONS#),E *********************[ ** ALPINE SKIERdX **~ ** GETTING SENTENCE  ** MEANING ** 09-13-81 *********************Lx ******************** @ ** INITIA          " \*U*U*U*U*UP*Ux@U*U*UT*U*UJpP(E x čȍōˍҍٍԍ΍ҍҍ΍ӍǠ̠̍ˍύōΠύ̍Ս΍ōٍōӍ׍΍̍ȍ΍ԍÍٍōɍ΍ٍčԍԍԍ΍ҍǍȍٍҍٍҠōӍύ΍Ӎčōٍ׍ԍ׍ƍԍҍōٍčȠύčҍڍččӍ΍Ӎ΍ȍōˍō͍ōŠ΍ŠϭЍĠǠōӠԍٱÍٍōٍǍ΍Ǎč̍ȍӍӍӍӍӍ΍΍Ӎ΍΍΍ԍԍ΍ōҍ΍čǍ΍ύՍō,125>T1500:T&>32:145,1258>16:135,145H>T1500:TZ>16:135,145l>48:120,155}>0:145,150>16:145,170>32:120,180>3:0:1?24:"SORRY, NO POINTS THIS TIME. " ?T12000:T ?60000: WP7EX1II1R30İ629003<12000: START OVER9x>Oz> ** 2ND SENTENCEb{> ** WIPE OUT.h|>>XSTART96:YSTART105>1100,105>XFINISH80:HOLD0>62600: MOVE SKIER>48:160,105>T1500:T>48:160,105>32:145:1120,80616:1110,100-6T1500:T@716:1110,100R 748:190,115d70:1110,105w716:1120,120(732:1100,130-73:0:12724:"SORRY, NO POINTS THIS TIME. "<7T12000:TF760000: WAIT FOR CR WITH PROMPT.********S16336&T15DSOUND(S)(S)(S)(S)KTQWp ****************** ** ALP SKI HEADER ******************:599002:14:"ALPINE SKIER"$6)FF132.X50FF782FFX,11CR13128t16368,04W(16384):W12860070O16368,0:WCR60070U[>s@ *****************B ** RUN ASSMD *****************FH(4);"BRUN ASSM"R **************** ** CLICK SOUND ******** SCREEN! *******************'?16302,0:16304,0W16299,0:16297,0]cX{Z *****************\ ** WAIT FOR CR] *****************^`24:"PRESS RETURN TO GO ON."e45,18294,18294,19145,19145,182 jSS"1':"ALPINE SKIER. THERE ARE 12 RACES IN"^':"EACH ROUND. THERE ARE THREE ROUNDS"o':"IN ALL."'::"GOOD LUCK, ";NA$;"."'60000'(4);"BLOAD CHAIN,A520"'520"MAIN"x"END": ******************* ** HGR2D EARN A POINT. IF YOU"ML':"ARE WRONG AT ANY TIME, YOU'LL ";(34);"WIPE"wV':"OUT";(34);" AND GAIN NO POINTS."`'60000t':59900y'61200: HEADER~'6:"IF YOU EARN 8 POINTS, YOU WIN A SPECIAL"':"TROPHY FOR BECOMING AN OLYMPIC CLAR DIFFERENT"&60000$':599008'61200: HEADERh'6:"IF YOU ARE RIGHT, YOU MAKE IT THROUGH"$':"THE FIRST GATE. THEN YOU'LL GET".':"TWO MORE SENTENCES. IF YOU ANSWER"8':"CORRECTLY AGAIN, YOU'LL CROSS THE"B':"FINISH LINE AN&:59900&61200: HEADERN&6:"I'LL GIVE YOU TWO SENTENCES. DECIDE"{&:"WHETHER THE SENTENCES HAVE THE SAME"&:"MEANING OR DIFFERENT MEANINGS. AFTER"&:"YOU HAVE DECIDED, TYPE YOUR CHOICE:"&:10)"S FOR SAME" &:10)"D FO*U*U*U*U*0T*UJ*U*U*U*U*H*U U*U*U*U*Q*U*U*U*U*Ub0U*U*U*U*U*U*U*U*9@)T*U*U*U*UU*U*UT*U*U*8U*U*U*U* U*U*U+U*U*p?uWR*U*UbW*U*UP*U|@X*tm~?6w  T*U*UT*U*U*(|.U*U*U*U*T*U**U*U*U*U*\*UӍčȍōˍҍٍԍ΍ҍҍ΍ӍǠ̠̍ˍύōΠύ̍Ս΍ō٭ٍōӍ׍΍̍ȍ΍ԍÍٍōɍ΍ٍčԍԍԍ΍ҍǍȍٍҍٍҠōӍύ΍čōٍ׍ԍ׍ƍԍҍōٍčȠύčҍڍččӍ΍Ӎ΍ȍōˍō͍ōŠ΍ŠϭЍĠǠōӠԍбÍٍōٍǍ΍Ǎč̍ȍӍӍӍӍӍ΍΍Ӎ΍΍΍ԍԍ΍ōҍ΍čǍ΍ύՍōAL$(2):B3$(K)AL$(3):B4$(K)AL$(4):B5$(K)AL$(5):F2$(K)AL$(6)F KV D$;"CLOSE"f "T1500:Tq ,K1N 6A1$(K);CR$;A2$(K);CR$;A3$(K);CR$;A4$(K);CR$;A5$(K);CR$;F1$(K);CR$;" ";CR$ @B1$(K);CR$;B2$(K);CR$;B3$(K);CR$;B4$(K);CR$;B5$(K);CR$;F1):LPI1 ?Ih DA1$(K)AL$(1):A2$(K)AL$(2):A3$(K)AL$(3):A4$(K)AL$(4):A5$(K)AL$(5):F1$(K)AL$(6)z vLP1:RP1:J0 X2$ LN(X2$) I1LN (X2$,I,1)(64)RPI1:JJ1:AL$(J)(X2$,LP,RPLP1):LPI1 I? B1$(K)AL$(1):B2$(K)EN ROUND 1":D$;"READ ROUND 1"N RD2ĺD$;"OPEN ROUND 2":D$;"READ ROUND 2"~ RD3ĺD$;"OPEN ROUND 3":D$;"READ ROUND 3" RL K1N X1$ LP1:RP1:J0 LN(X1$) 5I1LN :(X1$,I,1)(64)RPI1:JJ1:AL$(J)(X1$,LP,RPLP%dD$(4):CR$(13)lnA1$(13),A2$(13),A3$(13),A4$(13),A5$(13),B1$(13),B2$(13),B3$(13),B4$(13),B5$(13)sAL$(6),F1$(13),F2$(13)xRD1N13 ***************** ** READ DATA ** ***************** RD1ĺD$;"OP    AIT FOR CR WITH PROMPT. 3 ?EX1II1R30İ62900K A12000: START OVERQ f ** HGR2 SCREENl 16302,0:16304,0 16299,0:16297,0  Z \ ** WAIT FOR CR ] `24:1:"PRESS RETURN TO GO ON. "!!e4 U*U*U*U*F*U*U*U*U*UU*U*U*U*@W*U*U*Ur*U*U*U*U*5U*U*UT*U*U*pxU*U*U*U* T*U*U*U*U*U x|W*U*UT*U*U"~P*E`Y*U*U*U*U*U@U*U*UT*U*U*?~+U*U*U*U*%Q*UzH*U*U*U*U*UH*U U*U*U*U*@B*U*U*U*U*UU*U*U*U*pT*U*U*U +U*U*U*U*%U*U*UT*U*U*~U*U*U*U* U*U*U*U*U*U*`|V*U*T*U*U2@?P*E@?H(U*T*A UU*U*UT*U*U*|@1) <J1I F:A$(J)! PJ5 ZD$;"CLOSE ";Z$I D$;"OPEN JUNK"^ D$;"WRITE JUNK"g I1t J1I1 A$(J) A$(J)"RAIN"ĺ"2" J D$;"CLOSE" ,D$;"NOMON C,I,O" D 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  2$(K);CR$;" ";CR$ J" "$ TK5,18294,18294,19145,19145,182/!jCR13128=!t16368,0Z!W(16384):W12860070u!16368,0:WCR60070{!!@!B ** RUN ASSM!D!H(4);"BRUN ASSM"!R!! ** CLICK SOUND!!S16336!T15 "SOUND(S)( $U*U*U*U* U*U*9Pp*U*U*U*U*PT*UT U*U*U*U**@P*U*U*U*U*UJP U*U*U*U*T@(U*U*U*U*@*`+U*U*U*U*T U*U*UT*U*U*RT,U*U*U*U* @*@*AU*U*U+U*U*"U?x T*U*U*P*U*U P*Uh~@*U*P@T*U*UT*U*UJQp(` ,U*U*U*U* `+U*U*eP@*U*U*U*U*UPV*UT U*U*U*U**`T*U*U*U*U*UJP U*U*U*U*Pp*U*U*U*U*U *0*U*U*U*U*T U*U*UT*U*U*RT,U*U*U*U*@**@U*U*U|+U*U*D"U~>(\*U*U*U*U*U P*Ux*U @U*U*UT*U*UJ@pP(E x ((U*U*U*U* 8(U*U*T@(U*U*U*U*E@ R*U8T0U*U*U*U*** T*U*U*U*U*U P T*U*U*U*P \*U*U*U*U*U(*U*U*U*U*UUU*U*UT*U*U*R`P*U*U*U*U*@**@U*U*UT*U*U*D Ux`(H*U*U*U*U*U X*U@xU*U*UT*U*Uj@|P*E p@(8U*U*U*U**U*U*U@)U*U*U*U*e@ S*U:                THE SLOPES FOR REAL." 960000&9,9G9 ********************a9 ** BLANK RETURN BOX|9 ********************990:45,18294,18294,19145,19145,182:39"II *******************9959900: HGR2:":"THAT'S AS)(S)(S)"T""7" ** ALP SKI HEADER=" J":59900e"2:14:"ALPINE SKIER"r"$6:0:1}")FF132".X50FF7"82FFX,11"=2FFX,11"B2FFX,15"G2FFX,15"LX"V3"`"~" ** SLOPE & FLAGS",K)ZNL(A$)K!\NLE$(A$,L)xfN(LE$)40(LE$,1)" "(LE$)40(LE$,1)"."LE$(PN)LE$:PNPN1:A$RI$:20100pNKN(RI$)32ī20200N20040NK15NLE$(K)""ĺLE$(K)OKO:"CORRECT ANSWER: ";F1$(I)O(F1$(I))67ĺ: "%NPN1*N8:1:"SENTENCE GIVEN:"4NA$A1$(I)" "A2$(I)" "A3$(I)" "A4$(I)" "HNK1255RNRI$(A$24:"PRESS RETURN TO START OVER.",(#60010I#(4);"BLOAD CHAIN,A520"`#520"INSTRUCTIONS"fNN *******************N ** WRONG SENT.#1N *******************N  N8:1:" 9100x7300,(4);"BLOAD CHAIN,A520";@520"MAIN"Hl :59900\ 61200: HEADER4!6:"ALWAYS REMEMBER THE DIFFERENCE BETWEEN"!:"CAUSE AND EFFECT. I HOPE TO SEE YOU"!:"AGAIN SOON FOR ANOTHER GAME OF ALPINE"`":"SKIER."!"WW(II,2)0İ20100dI II+,600008:59900L61200: HEADERaX6:"THANK YOU.":"IF YOU WANT TO PLAY ANOTHER ROUND," :"PRESS RETURN, IF NOT, PRESS N."W(16384)16368,0LT1200:TW141ī7900W206. I1N:WW(I,1)NW(I,1):WW(I,2)NW(I,2):IY 8:"DO YOU WANT TO SEE THE INCORRECT"s ":"RESPONSES? (Y/N)" |W(16384) 16368,0 DT150:T W217ī6100 W206ī6800 p5500 II1N 8I12 WW(II,1)0İ20000KIP"A h:"THE ";(34);"TEACHER FEATURE";(34);" PRESS RETURN."Q W(16384)_ 016368,0o T1100:T W148ī4900 \W141ī8300 4300 $:59900 61200: HEADER 5:12:"TEACHER FEATURE" P10:"STUDENT'S SCORE: ";SC;"/";N :59900! 61200: HEADERP t6:"NOW FOR THE TEACHER FEATURE. IF THE"| :"TEACHER WANTS TO SEE THE STUDENT'S" <:"RESULTS, HE OR SHE CAN DO SO JUST BY" :"HOLDING DOWN THE (CTRL) KEY AND" :"PRESSING (T). WHY NOT TRY IT? TO S10: WAIT FOR CR WITHOUT PROMPT.8 ( 62450: CLEAR HGR2a 60010: WAIT FOR CR WITHOUT PROMPT.} 3500: TEACHER FEATURE T 60000: WAIT FOR RETURN WITH PROMPT.  ******************* ** TEACHER FEATURE ******************* H F THE GAMES." @:"YOU WON ";F SC0ĺ"NONE OF THE ";N;" GAMES."W SC0ī2100p l60000: WAIT FOR CRz 3500 4SC;" OF THE ";N;" GAMES." SC8Ģ10:"PRESS RETURN TO RECEIVE YOUR SKIING" SC8ĺ:"AWARD." ` SC7ī2900 600) <J1I F:A$(J) PJ3 ZD$;"CLOSE ";Z$I dD$;"NOMON C,I,O"` D$;"OPEN ROUND 7"x D$;"WRITE ROUND 7" I J1I A$(J)A$(J)"@" A$(J) J D$;"CLOSE ROUND 7" DLL OF I $d5$n75,13575,110-$x15:10:"2"@$75,12055,120S$75,11055,110f$55,12058,115y$58,11555,110$$ POLE#1$$165,89165,62$9:23:"1"$165,62145,62$145,72165,72$145,72148,67%145,62148,6 #:59900!# SLOPE EQUATION'#?#FA14: NO.OF NODEST#FB6: AMPLITUDEj#FC360: Y OFFSET#FD230: X OFFSET#FE0.50: SLOPE# 3#279,42#X279110#(Y((FDX)FA)FBFE(FCX)#2X,Y#