' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 7777777 7777JJJJx 77L? L7877777777 776i 7 7867 7`77 777777`x =(`(8`5775I7`B` 76`77`>J><;VU<)?<`8'x0|<&HhHh 8 8 8 8V&` aI꽌ɪVɭ&Y:&<&Y:&;: 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8 9: :' 9: :& :x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?8  1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#000'#07#0:"4<*55**5*%5)1)1)1)'#0/#0*5*75**5*:5/#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh < <݌ < < h < < < <`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 (G FG HZXj 80x D9$xxH` >( Z>h Z>L=.xxH >hh@(LH>9L>HH/Hh/ H?-З( 8(& 8$8 H` *8HNx`* >x$50x*$50xL9JJJJ`HHjf5 >h $50x`HA>VD;;P >(ED Z> ?$0x8x D9- 8DD# H8`?E Vˆʎ55L $ 5 55555 &a*5`*5` "L&5_*b*JL%u**Lz%`** $  Q(lXJ̥KlV $  Q(lV eօ3L e3L &%R*L &%Q*L d' "L4% N'e*)n*5 5 &`@-e*f*f* 5 "L# "5f*`L %.* *t*Q*L$ %L&*L` "O**P**u** d' "L% N'e*)n*o*o*n* &8ɍ` ^&f\*555L& ^&NR* & "R*ΩL&)\*Z* ʽ LH*v 3h`0h8` " ['L & N'С55 &5`*A*@` +5L^6L65`  \* ?*0 '\* '  Q( ^&\*lZl^?*c*q)H c*h`f*5h*5j*555@O*AP*`u*@`@5&`Q*R*`E 'Ls' ' ' @DAE@u*`8` %@ @A@`@`**@*A`M5 ) "L&`8@AW*c*@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@c*h8&ȑ@Hȑ@Ah@L'Hȑ@ȑ@* htphso`hMhL`9V*8U*897T*6S*67`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- (   Ϡ734@~3!+,W,o,*--,,9,-.-~3~3,,,,~3~3,,,,~3_*3 j.5 *H*H`Lc3 (+L3 +55555 1^3_* )3J Q*L_3Ls3443 D23455545554 70 / 7 :/354545455454555535L^/5-5I5555 55` / 4/ 2-5! / 08555454 70L3 (+50+5B5C3 2 70L35 *H*H`Lg3L{3505 *H*H` 3 ,5L3 3 1 ,H 1hBL, 0 BH [1 1h`Lo3 35 ,L3 3 1B , 1L,H 0hB@ 55 [1L133 (+34) 34 70L3 3L3 (+ 055L- (+34L{33454445 70 ^/* / 3B0 HȱBh -355 -8 /L38 25` +5 /3 /. /. 3 E7D B. /. /. 0]34S0J4 4) 3 4D4E B. 4  /. 02L3 Ν3 3`HD٤33DEEhiHLG.h ` /5B5-` /5B-` + X05I33383 33DH /4 E03744Ȍ7 X040 7 J7L35B5C`,5p` / R0-55`50` K/ R0-55`575755` 4/ K/ /( 55L/BȱBL/58` D2BH5BH :/ 75Bȭ5Bhh55 R0B5m55ȱB5m55` /LR0557755`*7*75LR0 E0(33 48`433 R0` E033LR0*7*7`777 555I7575757577** 7757`7 L35555f /55555555 ^/`855 i /B58` 41L 15ȱB5 /5555 /5`3 D23ȑB55B5 / 7 55`5555555555 5555`555`55BC55`5555`L3 /5B5C355 0Q340"B4 3` 02۰Ϭ33B438`3i#`3ЗLw35!50>5555`53 /3m3 3 3733i35 3583 /35ЉLw35`H /5h 25L/~43 533`55555555J5m55m5jn5n5n5ۭ55m5555m55m55`"L? 585H ~.(3` # d ֠z# u*`$(X):X;S0:3072:783,1288($ "" &"""  "" ****$$$$"""$$0&< ,""""**"""$>>   *U"":*:<"">""$$$$$$$$$$$>$ $>>$ "2"<""">"""8 "  "$>"6*""""""&*2"""""""$$"""*,"" "" ">*"""""""""""""**"""""">"">>> >00000>* i @0 66$>>< (&20 *,  **> > "2*&" " >>  ">> "8""> """"""<  >> LKxHHD+(DA/(Dq'  I)(H  p闠 y) 񗰐 z$ r0θ4KHH0t# p y0p 9G @0ɩL[hHHϸȸI^hHHoTDD."2N200DN(12):5:R$yN"Count the shapes to find out your"::"score."OR$::"This means correct:"O3O1150,80O200O"Do you need help? (Y/N)";:YN$:YN$"N"ĺ(12):10:"Getting the (IS$)8):P3(37)5:P4P3250CN20(IS$):IS$SHNP1,P3P2,P3P2,P4P1,P4P1,P3mpNCC((1)9):(3);CCuzNW$N"Read each question."::"Decide which"::"sentence answers"::"the question"::"correctly.")N:"Type the letter of"::"the cG$:G$(13)16550@'@D$"PR#6"-@3@d@(12):10:"Going to the other program...."@D$;"RUN FACT OR OPINION.1.M"hB N%N(12)*NIS$"INSTRUCTIONS"/N3:E$4NTC((1)8):(3);TC9N3>NP1140((IS$)9):P2140(TIONS"::"6. QUIT"#D>22:O$:R$mN>22:"Type the NUMBER of your choice,":"then press .";:"";XX>X1X615940>NQ10>X415570>X516600>X616500>5000t@(12);:5:"Insert a new disk and press .";@$6=13:"Type Y or N ";:". ";:YN$7@=YN$"N"15605=T=L=(12):T$f=CC((1)9):(3);CCm=1=TC((1)8):(3);TC="Which one do you want?">W$ >X13>X;". "FL$(X):>X&>"4. ANOTHER STUDENT"::"5. EASIER QUES! bYN$:YN$"Y"ĺ(12):(!4b:8000.!0u=!DuD$;"PR#0"L!XuD$;"IN#0"m!lu::10:"PLEASE WAIT......"!uD$;"RUN MGR""Type Y or N :";! bYN$:YN$"Y"ĺ(12):!4b:8000!0u!DuD$;"PR#0"!XuD$;"IN#0""lu::10:"PLEASE WAIT......"your score." NR$ N13; N:"This means correct: "B N3Q N1151,100W LOa a34,5p a(12):R$w a6 a"Are you sure you want to QUIT?" a:"Y = YES, I want to QUIT now." a:"N = NO, I want to CONTINUE."! b:"Type Y or N :";12)mN3:"Press the SPACE BAR"::"to move the"::"rectangle. Press"::"the RETURN key to"::"choose."vN200NTC((1)8):(3);TCNR$ N"There are "NQ" questions. But you may"::"stop any time."::"Count the shapes to find out"::140((TL$)7):P3(37)5:P4P325.WN(12)5\N4IfN20(IS$):IS$lpNP1,P3P2,P3P2,P4P1,P4P1,P3szN8{NW$N"Read each sentence."::"Decide whether"::"it is a true fact,"::"or just someone's"::"opinion."N200NW$N(d press .";,?G$:G$(13)163202?AAD$;"PR#6"G ArA(12):10:"Getting the program....."AD$;"RUN FACT OR OPINION.2.M"A N%NTC((1)8):(3);TC*NIS$"INSTRUCTIONS">N3HNE$MN4#RNP1140((TL$)8):P2 STUDENT"::6". HARDER QUESTIONS"::"7. QUIT"?D>22:O$:R$N>22:"Type the NUMBER of your choice,":"then press .";:"";XX>X1X715940>NQ20>X515570>X616800>X716300H?5000?(12):4:"Insert new disk an "1=120,88250,88@6=13:"Type Y or N ";:". ";:YN$S@=YN$"N"15605YT=h=(12):T$=CC((1)9):(3);CC=1=TC((1)8):(3);TC="Which one do you want?">W$ >X14>X;". "FL$(X):>X/&>5". ANOTHER" "= =3:79,57168,57:79,72168,72d=7:13:"";FIRST$:FIRST$""15630=FIRST$"TEACHER"30000=9:13:"";LAST$:LAST$""15640"=N$LAST$"."FIRST$,=11:"Is this correct? ";:150:FIRST$;" ";LAST$;:255:" (3);TC\<:"Separating what"::"is true from what"::"people only think"::"is true."e<200w<(18):(12)~<2<"Hi! What is your name?"<<6:O$<7:1:"First name:";:" "=9:1:"Last name:";:| (  x!$AG!B(ԪՊXPXخ @@ `  D @@@B@ ժժժ @&D dA   "~ |~~``p~~x(`ց؊تضժئǺ T*U*U*U x?(  (   ba#HBA(ֱ`x{@P՚`x{|? @@ F  D 0!B@ (U*U*U*U*U*U*U*U*U*U*U*U*U*U*U &D0"dA !<$~ BA# B(`ց֬цԮPրPʕ T*U*U*U (  (  $BB !  (ֱPؚ @`?`*U*U*U*D1 @D ?BApp9x(U*U*U*U*U*U*U*U*U*U*U*U*U*U*U ~p@NY1Xhp p ""(@ Ba|'D`B(PՂ֬цԩPQʕ  (  (U*U*U*U*U*U*U*U*U*U*U*U*U*U*U  `oqgC~~?pps(բŪت @*U*U*U*D"dO`#H?":R63J1NQ(X)'R@3J". ";QU$(J):5RT3J:13265;Rc3JR3J1NQ(X)[R3H3:J9H4R3J". "Q1$(J):36,H:Q2$(J):36,H:Q3$(J):36,H:Q4$(J):R3JR3R3D$;"PR#0"R3D$;"IN#0":3075:10000Dre not.)"O(P:"3. Pizza Hut pizza is the best.":" (Others may not agree.)p a printout? (Y/N)";:YN$:/Q2YN$"Y"10000Q3:"Make sure your printer is on and the"::"paper is set. Then press any key.";:G$Q 3Q3D$;"PR#1"Q3Q3"Fact or Opinion - "FL$(X):Q"3X413200R,3"Are these sentences FACT or OPINION5P2J1NQ(X):H4!P2J9H55P2J". ";QU$(J):YP2LINELINE1:LINE6İ200:LINE0gP2J:13050zP2J1NQ(X):H4P2J9H5P2J". "Q1$(J):H:Q2$(J):H:Q3$(J):H:Q4$(J):P2LINELINE1:LINE3İ200:LINE0P2JQ234,0::"Do you wantX)Ol/X412200%O/QU$(J):CL$(J),O/J7O/13000cO/Q1$(J):Q2$(J):Q3$(J):Q4$(J):CL$(J)jO/JO2D$;"CLOSE "FL$(X):216,0:(12):LINE0O2"Fact or Opinion - "FL$(X)::34,3O2X413025P2"Are these sentences FACT or OPINION?"::34, program....":EN.(12):3:X17:FL$(X):NQ(X):X". "FL$(X)::XtN.:"Type a number and press -->";N/"";X:X1X712040N/(12):2:"Getting the questions.....":N0/D$;"OPEN "FL$(X)ND/D$;"READ "FL$(X)NX/13000Ob/J1NQ(5&M*"1. Level 1"::"2. Level 2":aM*"Please type 1 or 2";:OT$:OT(OT$):OT1OT211005M+OT(OT$):OT11030,11040M+:11200M+D$;"RUN FACT OR OPINION.1.M"M +:11200M%+D$;"RUN FACT OR OPINION.2.M"M\+N+(12):10:"Getting the@`p8 8p`@@@@@@@L\xppx\L@@@@@@||@@@@`pp`@`p0||`pp`@`p8 Ƀpppppppppppp>>>><<88` ` ` |?|?00~~px\\xp@@||``<f0f8<@`p8330xLLL|xxlL xp`pp`@`p0 W         O ң/  M $' 1$L11 $$ ɍ` )?~?7 , AY M 3 o 2"":*:<"">""$$$$$$$$$$$>$ $>>$ "2"<""">"""8 "  "$>"6*""""""&*2"""""""$$"""*,"" "" ">*"""""""""""""**"""""">"">>> >00000>* i @0 66$>>< (&20 *,  **> > "2*&" " >>  ">> "8""> """"""<  >> LKxHHD+(DA/(Dq'  I)(H  p闠 y) 񗰐 z$ r0θ4KHH0t# p y0p 9G @0ɩL[hHHϸȸI^hHHoTDD$ "" &"""  "" ****$$$$"""$$0&< ,""""**"""$>>   *UPAUSE12000:PAUSE"B(12):57B(637)223500B"Please make sure that the key marked"::"CAPS LOCK is in the DOWN position."BPAUSE12000:PAUSEBBD$;"RUN FACT OR OPINION.M"B P`-??v-$ - ;NIA?  `p8      8p`@`pp@@@@@@@@pppx @`p8 ||||@@ xp@`p8 |||| || xp@`p8 ||  xp||@`p000@`p8 8p`@@@@@@@L\xppx\L@@@@@@||@@@@`pp`@`p0||`pp`@`p8 Ƀpppppppppppp>>>><<88` ` ` |?|?00~~px\\xp@@||``<f0f8<@`p8330xLLL|xxlL xp`pp`@`p0 W         O ң/  M $' 1$L11 $$ ɍ` )?~?7 , AY M 3 o 2+I`*)hQL$h 1L$h)L$h*`ɇ :I :`,0`  I`UU**ժU**U4+;߂ +|[?,$ +|B\|#B\9 Σ8 0h`H 0Iȱ 0I _ 0h `+i,^!*i,4*iPII*&if*+`, P\H_p , PPH` Bh $ 0IPH*&& h*H&& h& f$)% Ș)% L$, J , 0IH)hl )M H4+))`,1ɰ(ɸ$)_ B``ɠhɃ`ə`ɚ`ɂ`ɀ`ɐ`ɑ `ɗ@ `Ʌ `ɒ `ɔL `H, P $$!$  , %%#%% y $h( k HH _ 0h,  k  $( ɛɍ `HH 3, P Ș! 3$hh` k,  %%#%*I* 0`H, ,0 h`(*)) &+`H,0 @ &,P,R,Wh,  N H%2 hH)*** **m(L(mhH h '`,ɰ Ʌ+hi#2H $)) &)!(*e))e++8) )L Lp"H $)) &+(*hi#H j j L *(+) 0!*(`$ H))? @(hN    Vɖ ILɓ%Ɂ)ɍ*ɘ&,  ɕ( ` (LN N ` `(5 $, P$$!#$%, i#V%i#%M%L" `"%$Iiii=ߤ$%H " %%, %%#h%LB y ,fH <hLp $,  %%#%  kH %+I`*L )*! 0h`"H $)) &)(*)#`LkL Li ލR,0 ,J̩@K @& &  < 2 y6789L8L< | $(  ΰɐ$, P$$~!$$P$"%n%, %%L"ɍ7Ɋ7ɈɌOɎfɆ>ɉɋɏZ $ H h .#` L}%J u H h d #` L Q ; #` Q #`#2 '( H() 1 eȱm)h`JJ`#JȱJLh `#  <(eΨ =)eϰ%Hh>?iJK̅  1& ')*& "'JJ) ""% m% ʥ0)J!m%! `JJJJS) PI ȄR%*QTU'T8ePT UeRU QJJJ`JJJJS) PI ȄR%*QTU'T8ePT UeRU QJJJ`00', "&,i8i#H&ii&hif&i'`'i, &i,. &iPII&&if&H !"hH8 H!S hIiHSQUhPTh !"IiR"fS8PQ% 8TeRTUU&E%0Q&&kS TePTUeQPفŴxaIL &WSP& )`" !H)&JJ&&h' &' &' f&') &'#i%0J$)` .Q&%0Q&&`$0JI0`'0% I`0 I0ܩ(ߠQ)'%01&*%0Q)&E%0*Q&&QeS)j*"T*U*U*U*U*U*U*U*U*U*E((*@ (*(*(*@(ժժժժժժժժժժժժժժժժժժ*"`Ac~Cpnqq~qD((*@ `@` (*AO@B D@D(*"`~p`AG8pD((*@ ` (*(*"D"D"D"D"D"D((*@ (*(*"D((*@ ` (*P*(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**(*@*U*U*U*U*U*U*U*U*U*U*U*U*U(*(*@(*@@ G(* "(*@ (*(*(*@(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U** `An~pA7p8p"(*@ `@`|` (*AH@PB  D8D<(* `Ac@p`qG~q"(*@ `0 (*(**U*U*U*U*U*U*U*U*U*U*U*(*@ U*U*U*U*U*U*U*U*U*U*U*(* @p(* "(*@ ` (*(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**(*@(*(*@(*(*"D((*@ ` (*(**U*U*U*U*U*U*U*U*U*U*U*(*@(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**"`App{@D((*@ ` (*:FGNaq@PB0xt88<(*"`cs8`qp`9GCGsD((*@ `0 (*ժ(*(*@(*@C#$` a <G(*"D((*@ ` (*(ժժժժժժժժժժժժժժժժժժ*(*@(*(*@(*(* "(*@ ` (*(* "D"D"D"D"D"(*@(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U** `Appq@"(*@ ` (*"@0CDH(* `ws8`qp`yGCGs"(*@ `@xqC@G|qcLf (*P*(*(*@(* $dC'@p DH(* Q*U*U*U*U*U*U*U*U*U*"(*@ ` (*(*(*@(*(*@*U*U*U*U*U*U*U*U*U*U*U*U*U(*(*"D((*@ ` (*(*"D"D"D"D"D"D((*@ U*U*U*U*U*U*U*U*U*U*U*(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**"`App`@D((*@ ` (*@B 80(*"`s8`qp`yGCGsD((*@ `@L``L3fL3f (*@*U(*(*@(* $$$@ H(*"D"D"D"D"D"D((*@ ` (*(*(*@(*(*(*(* "(*@ ` (*(* "D"D"D"D"D"(*@ (*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U** `Ap0@@"(*@ ` (*@@(* `]s8`qp`9GCGs"(*@ `@x``L3fL3f (*@@(*(*@(* $$d@ (* "D"D"D"D"D"(*@ (*(*(*@(*(*(*(*"D((*@ ` (*(*"D"D"D"D"D"D((*@ (*(*"D((*@ ` (*@*U(*"`Is8gqp`9GCGs8D((*@ `@@``L3fL3f (*O@c@Bpx8880(*(*@ժժժժժժժժժժժՀ(* @c#$gpxx<BHH(*"D"D"D"D"D"D((*@ (*(*(*@(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**(*(* "(*@ ` (*(* "D"D"D"D"D"(*@ (*(* "(*@ ` (*ժ(* `As8gqpd9GCGs8"(*@ `@xps@Gsc|> (*"I@@B DDDH(*(*@(* CHH(* "D"D"D"D"D"(*@ (*(@*(*@ժժժժժժժժժժժՀ(*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U*U**(*(                    e on ANOTHER DISK? (Y/N) ";3 0YN$:YN$"Y"1250040(12):"To re-start this program,"::"type GOTO 15500 and press .":::0(12)0:"Please insert the disk you want to run."::"Then press . ";0Y$:Y$(13)125200l/"Do you want another exercise? (Y/N) ";K/YN$:YN$"Y"ĺ(12):15700V/(12)/:"Does someone else want to do an"::"exercise on this disk? (Y/N) ";/YN$:YN$"Y"15500/(12) 0:"Do you or someone else want to do an"::"exercisOPINION "FL$(X)7)"Score = "T" out of "N", or "P"%."=@)iT)"Here are the sentences you missed:":th)M1I|)M$(M))M)::)D$;"PR#0")D$;"IN#0")3075b/N0:T0:P0:H0:I0:NQ0:J0:FX$"":DT1:F$"":NW0i/(12):3+ copy now."8(:"N = No, I do not want a paper copy."`(:"Type your answer here-->";:YN$t(YN$"Y"12130z((:"Please make sure the printer is on."::"Then press any key.";(G$(:(D$;"PR#1")FIRST$" "LAST$" - FACT OR D$;"CLOSE SFILE"''D$;"APPEND SFILE"='D$;"WRITE SFILE"['"FACT OR OPINION "FL$(X)c'N$p'T:N:P'D$;"CLOSE SFILE"<((12):3P("Do you want a paper copy?"d(:"You must have a printer attached." x(:"Y = Yes, I want a paper"h"You scored "T" out of "N"."(jEm"You missed: ";NT".":^r"You scored "P;"%."kwPX0:N0z|I0100000 RX8İ200:RX0'NN0:2008'N$LAST$"."FIRST$B'5:"Entering information-----------."`'D$;"OPEN SFILE"t':CL$(J)xJ&pD$;"CLOSE "FL$(X)/z200:216,0E(12)O34,4[Y1NQd600m100v200}Y@34,0:(12)JR$T"FACT OR OPINION.2 "FL$(X)^P(TN)100:P(P102.5)(102.5)cFIRST$" "LAST$e46270,1620,1620,146$16368,00"";AN$@AN$""779]>AN$(CL$(J),1)İ500:fH300lRvJNQ10|(12)620000D$;"OPEN "FL$(X)D$;"READ "FL$(X)J1NQ6000(Q1$(J):Q2$(J):Q3$(J):Q4$(J) CHARACTER COLOR(3);CC&R$:N1". ";Q1$(J)N6:0,70278,70VB2dN9B5kBs10:B:"A. "Q2$(J)::B:"B. "Q3$(J)::B:"C. "Q4$(J)R$ 2 20:"Type a letter, then press .";2:0,146270,1You chose: <";AN$;">." II1& N, X: b ANSWER DISPLAY & INPUT vR$ J(NQ(1))1 H0690 G1H K(G)J640 G HH1 K(H)J 5CCCC1:CC9CC0:rect.":3 ^"You are on target with <";AN$;">.":P h"<";AN$;"> is right.":o r"<";AN$;"> is correct.": |"<";AN$;"> is o.k.": "Right you are, ";FIRST$;"!": "Super!!": "Nice going, ";FIRST$;".": R$:18:O$ LB0 "250# ", to STOP.";, RE$9 N5280N RE$(32)25000b RE$(13)250o "(12):w 'R$ ,18:O$ 1LB1 6"You chose: <";AN$;">." JTT1:R(6(1))1:R340,350,360,370,380,390,400,410 T"Yes, <";AN$;"> is cor) F1023,123% PD$;"NOMON C,I,O"0 Z150006 d@ nNN1G p2X s0,20278,20_ t3r vLB1PXPX13 wLB1āO260PX5:1O,11:1O,11:O xLB1Ĕ1PX3,11 R$:23 5:0,175278,175 24:" for more"; N5! /(4);"BLOAD ST.ALIEN, A5120"+ 01:0> 1232,0:233,20 2Q1$(20),Q2$(25),Q3$(25),Q4$(25),CL$(20),K(20),I(20),G(20),M$(20),MW$(20),AN$(20),FL$(20) 7D$(4):O$(15) < INIT VARIABLES AE$(5):T$(20):BF$(25):DB$(26):W$(23):R$(18 COPYRIGHT (C) 1984: BY CRITERION MICRO SOFTT ALL RIGHTS RESERVEDZ w LAST UPDATE 8/14/84(1023)12345::10:13::"FACT OR OPINION"#(4);"BRUN LOMEM:":16384((4);"BRUN H"-:::3072ԠҠΠŠñӮÍ>";:YN$(YN$"Y"12130"(i(:"Please make sure the printer is on."::"Then press any key.";q(G$y(:(D$;"PR#1")FIRST$" "LAST$" - FACT OR OPINION "FL$(X))"Score = "T" out of "N", or "P"%."@)T)"Here are the sentenc(X) 'N$'T:N:P.'D$;"CLOSE SFILE"<<((12):3]P("Do you want a paper copy?"d(:"You must have a printer attached."x(:"Y = Yes, I want a paper copy now."(:"N = No, I do not want a paper copy."(:"Type your answer here-- M1IRXRX1! M$(M)50 RX8İ200:RX0< MJ'NN0:200b8'N$LAST$"."FIRST$B'5:"Entering information-----------."`'D$;"OPEN SFILE"t'D$;"CLOSE SFILE"'D$;"APPEND SFILE"'D$;"WRITE SFILE"'"FACT OR OPINION "FL$JR$/^P(TN)100:P(P102.5)(102.5)=`FL$(X):QcFIRST$" "LAST$Weyh"You scored "T" out of "N"."jm"You missed: ";NT".":r"You scored "P;"%."wPX0|I010000"Here are the sentences you missed:":(12)6200000D$;"OPEN "FL$(X)FD$;"READ "FL$(X)RJ1NQ]6000q(QU$(J):CL$(J)xxJpD$;"CLOSE "FL$(X)z200216,0(12)34,4Y1NQ600100200Y@34,0:(12)$"F":FO$"FACT"1100!0D(S1,S3S2,S3S2,S4S1,S4S1,S3Kn3nxS1,T3T2,T3T2,T4S1,T4S1,T3AN$"O":FO$"OPINION"11000S1,T3T2,T3T2,T4S1,T4S1,T31190AN$(CL$(J),1)İ300::0500::15:D20ACROSS8:S1INDENT:S368:S4S3D1:T3S4D2~S2S156(FT$)ACROSS:T2S156(OP$)ACROSS:T3S4D2:T4T3D181190L20:38`G$:G$(32)G$(13)1100~G$(13)18003S1,S3S2,S3S2,S4S1,S4S1,S3ANW$B+"Fact"::B:"Opinion"3R$: 2j 20:" to move, to choose."3:0,146270,146270,1620,1620,14616368,020:38 MOVE RECTANGLE TO ANSWERFT$"FACT":OP$"OPINION"INDENT15D1 2vR$EJ(NQ(1))1RH0690]G1HmK(G)J640tG~HH1K(H)J4CCCC1:CC9CC0: CHARACTER COLOR(3);CCT$N1". ";QU$(J)B4N9B59"The correect answer is: OPINION."U FO$"OPINION"ĺ"The correct answer is: FACT."_ II1 !FO$"FACT"FO$"OPINION":550 "FO$"OPINION"FO$"FACT" &M$(I)QU$(J)"-"(FO$,1) 0FO$"" N X:*b ANSWER DISPLAY & INPUT ^"You are on target with <";FO$;">.":F h"<";FO$;"> is right.":e r"<";FO$;"> is correct.": |"<";FO$;"> is o.k.": "Right you are, ";FIRST$;"!": "GOOD!!": "Nice going, ";FIRST$;".": R$:18:O$ LB0" FO$"FACT"ĺ for more"; N5250/ ", to STOP.";7 G$D N5280b G$(83)G$(115)25000u G$(13)250 "(12): 'R$ ,18:O$ 1LB1 JTT1:R(8(1))1:R340,350,360,370,380,390,400,410 T"Yes, <";FO$;"> is correct.":)R$(18) F1023,123, PD$;"NOMON C,I,O"7 Z15000= dE iR$X jLB1PXPX13_ l1i nNN1z p0,20278,20 q3 sLB1āO260PX5:1O,11:1O,11:O xLB1Ē3:1PX3,10: R$:23 6:0,175278,175 24:" .(4);"BLOAD ALTCOMMA.SF"@ /(4);"BLOAD ST.ALIEN , A5120"J 01:0] 1232,0:233,20 2QU$(25),CL$(25),K(25),I(20),G(20),M$(20),MW$(20),FO$(20),FL$(25) 7D$(4):O$(15) < INIT VARIABLES AE$(5):T$(20):BF$(25):DB$(26):W$(23): COPYRIGHT (C) 1984: BY CRITERION MICRO SOFTT ALL RIGHTS RESERVEDZ w LAST UPDATE 8/13/84(1023)12345::10:13::"FACT OR OPINION"#(4);"BRUN LOMEM:":16384((4);"BRUN H"-:::3072 +I`*)hQL$h 1L$h)L$h*`ɇ :I :`,0`  I`UU**ժU**U4+;߂ +|[?,$ +|B\|#B\9 Σ8 0h`H 0Iȱ 0I _ 0h `+i,^!*i,4*iPII*&if*+`, P\H_p , PPH` Bh $ 0IPH*&& h*H&& h& f$)% Ș)% L$, J , 0IH)hl )M H4+))`,1ɰ(ɸ$)_ B``ɠhɃ`ə`ɚ`ɂ`ɀ`ɐ`ɑ `ɗ@ `Ʌ `ɒ `ɔL `H, P $$!$  , %%#%% y $h( k HH _ 0h,  k  $( ɛɍ `HH 3, P Ș! 3$hh` k,  %%#%*I* 0`H, ,0 h`(*)) &+`H,@ &,P,R,Wh,  N H%2 hH)*** **m(L(mhH h '`,ɰ Ʌ+hi#2H $)) &)!(*e))e++8) )L Lp"H $)) &+(*hi#H j j L *(+) 0!*(`$ H))? @(hN    Vɖ ILɓ%Ɂ)ɍ*ɘ&,  ɕ( ` (LN N ` `(5 $, P$$!#$%, i#V%i#%M%L" `"%$Iiii=ߤ$%H " %%, %%#h%LB y ,fH <hLp $,  %%#%  kH %+I`*L )*! 0h`"H $)) &)(*)#`LkL Li ލR,0 LF J̩@K @& &  < 2 y6789L8L< | $(  ΰɐ$, P$$~!$$P$"%n%, %%L"ɍ7Ɋ7ɈɌOɎfɆ>ɉɋɏZ $ H h .#` L}%J u H h d #` L Q ; #` Q #`#2 '( H() 1 eȱm)h`JJ`#JȱJLh `#  <(eΨ =)eϰ%Hh>?iJK̅  1& ')*& "'JJ) ""% m% ʥ0)J!m%! `JJJJS) PI ȄR%*QTU'T8ePT UeRU QJJJ`JJJJS) PI ȄR%*QTU'T8ePT UeRU QJJJ`00', "&,i8i#H&ii&hif&i'`'i, &i,. &iPII&&if&H !"hH8 H!S hIiHSQUhPTh !"IiR"fS8PQ% 8TeRTUU&E%0Q&&kS TePTUeQPفŴxaIL &WSP& )`" !H)&JJ&&h' &' &' f&') &'#i%0J$)` .Q&%0Q&&`$0JI0`'0% I`0 I0ܩ(ߠQ)'%01&*%0Q)&E%0*Q&&QeS)j   報ƍύύ報讍ƍƍύύ䮍ύύύƍ宍뮍ƍύծӮƍύƍύύύ  :10:"PLEASE WAIT......"+ZuD$;"RUN MGR"DÍ䮍ή宍Ԯ讍䠠쮍ÍԮήÍή쮍Íލή宍îԮ䮍ή宍Íή堳     z#?'???    ϠͺҠ ɮР! ԮΠ ԮϠŠ !Š²"ŠñŠòŠıԠҠή͠ԠҠή͠ Ȯà۰ݠƠ ӮӮŠŠ Š±ŠòˍčŠòōōU WANT?"# :"1. EASY QUESTIONS"> :"2. HARD QUESTIONS"[ :"TYPE 1 OR 2-->";:A${ :10:"PLEASE WAIT......." A$"1"400 A$"2"500  (4);"RUN FACT OR OPINION.1.M"   (4);"RUN FACT OR OPINION.2.M"2M"23 A16297: SW TO HI RES9 B16300: SW TO P1ZC16302: TEXT TO GRAPHICSgD16304qE230F32: TURN ON P1<n(4);"BLOAD PI.FOP,A$2000"xA,0:B,0:C,0:D,0:E,FX14000:X::3 "WHICH DO YO swer here-->";:YN$'(YN$"Y"12130-(t(:"Please make sure the printer is on."::"Then press any key.";|(G$(:(D$;"PR#1")FIRST$" "LAST$" - FACT OR OPINION "FL$(X))"Score = "T" out of "N", or "P"%."@)T)"Here are PINION "FL$(X)'N$#'T:N:P9'D$;"CLOSE SFILE"G<((12):3hP("Do you want a paper copy?"d(:"You must have a printer attached."x(:"Y = Yes, I want a paper copy now."(:"N = No, I do not want a paper copy."(:"Type your an M1IRXRX1! M$(M)50 RX8İ200:RX0< MJ'NN0:200U'12130m8'N$LAST$"."FIRST$B'5:"Entering information-----------."`'D$;"OPEN SFILE"t'D$;"CLOSE SFILE"'D$;"APPEND SFILE"'D$;"WRITE SFILE"'"FACT OR OJR$/^P(TN)100:P(P102.5)(102.5)=`FL$(X):QcFIRST$" "LAST$Weyh"You scored "T" out of "N"."jm"You missed: ";NT".":r"You scored "P;"%."wPX0|I010000"Here are the sentences you missed:":(12)6200000D$;"OPEN "FL$(X)FD$;"READ "FL$(X)RJ1NQ]6000q(QU$(J):CL$(J)xxJpD$;"CLOSE "FL$(X)z200216,0(12)34,4Y1NQ600100200Y@34,0:(12)$"F":FO$"FACT"1100!0D(S1,S3S2,S3S2,S4S1,S4S1,S3Kn3nxS1,T3T2,T3T2,T4S1,T4S1,T3AN$"O":FO$"OPINION"11000S1,T3T2,T3T2,T4S1,T4S1,T31190AN$(CL$(J),1)İ300::0500::15:D20ACROSS8:S1INDENT:S368:S4S3D1:T3S4D2~S2S156(FT$)ACROSS:T2S156(OP$)ACROSS:T3S4D2:T4T3D181190L20:38`G$:G$(32)G$(13)1100~G$(13)18003S1,S3S2,S3S2,S4S1,S4S1,S3ANW$B+"Fact"::B:"Opinion"3R$: 2j 20:" to move, to choose."3:0,146270,146270,1620,1620,14616368,020:38 MOVE RECTANGLE TO ANSWERFT$"FACT":OP$"OPINION"INDENT15D1 2vR$EJ(NQ(1))1RH0690]G1HmK(G)J640tG~HH1K(H)J4CCCC1:CC9CC0: CHARACTER COLOR(3);CCT$N1". ";QU$(J)B4N9B59"The correect answer is: OPINION."U FO$"OPINION"ĺ"The correct answer is: FACT."_ II1 !FO$"FACT"FO$"OPINION":550 "FO$"OPINION"FO$"FACT" &M$(I)QU$(J)"-"(FO$,1) 0FO$"" N X:*b ANSWER DISPLAY & INPUT ^"You are on target with <";FO$;">.":F h"<";FO$;"> is right.":e r"<";FO$;"> is correct.": |"<";FO$;"> is o.k.": "Right you are, ";FIRST$;"!": "GOOD!!": "Nice going, ";FIRST$;".": R$:18:O$ LB0" FO$"FACT"ĺ for more"; N5250/ ", to STOP.";7 G$D N5280b G$(83)G$(115)25000u G$(13)250 "(12): 'R$ ,18:O$ 1LB1 JTT1:R(8(1))1:R340,350,360,370,380,390,400,410 T"Yes, <";FO$;"> is correct.":)R$(18) F1023,123, PD$;"NOMON C,I,O"7 Z15000= dE iR$X jLB1PXPX13_ l1i nNN1z p0,20278,20 q3 sLB1āO260PX5:1O,11:1O,11:O xLB1Ē3:1PX3,10: R$:23 6:0,175278,175 24:" .(4);"BLOAD ALTCOMMA.SF"@ /(4);"BLOAD ST.ALIEN , A5120"J 01:0] 1232,0:233,20 2QU$(25),CL$(25),K(25),I(20),G(20),M$(20),MW$(20),FO$(20),FL$(25) 7D$(4):O$(15) < INIT VARIABLES AE$(5):T$(20):BF$(25):DB$(26):W$(23): COPYRIGHT (C) 1984: BY CRITERION MICRO SOFTT ALL RIGHTS RESERVEDZ w LAST UPDATE 8/13/84(1023)12345::10:13::"FACT OR OPINION"#(4);"BRUN LOMEM:":16384((4);"BRUN H"-:::3072""uD$;"RUN MGR"ЪժժժժժժժժժժժժժժժժЪu$|_ЪժժժժժժժժժժժժժժժժЪu_Ъu$ $$ $$_ЪժժժժժժժժժժժժժժժժժЪժժժժժժժժժժժժժժժժժЪu><`_Ъu_ЪժժժժժժժժժժժժժժժժժЪu    ` _ЪժժժժժժժժժժժժժժժժЪu>p`_Ъu_Ъu> `pp` ` _Ъu_Ъu_Ъu<@_Ъu_Ъu$ $$ $d$_ЪժժժժժժժժժժժժժժժժЪu<@_ЪժժժժժժժժժժժժժժժժЪժժժժժժժժժժժժժժժժЪu$ $$ d$_ЪժժժժժժժժժժժժժժժժժN3!N1151,145!LO#!a34,52!a(12):R$9!a6_!a"Are you sure you want to QUIT?"!a:"Y = YES, I want to QUIT now."!a:"N = NO, I want to CONTINUE."! b:"Type Y or N :";! bYN$:YN$"Y"ĺ(12):!4b:8000:W$ N(12)x N3:"Press the SPACE BAR"::"to move the"::"rectangle. Press"::"the RETURN key to"::"choose." N14 NTC((1)8):(3);TC N"How many ZODS"::"can you collect?" NR$ N18 N:"This means correct: " N::!(TL$)8):P2140((TL$)7):P3(37)5:P4P3259WN(12)@\N4TfN20(IS$):IS$wpNP1,P3P2,P3P2,P4P1,P4P1,P3~zN8NW$N"Read each sentence."::"Decide whether"::"it is a true fact,"::"or just someone's"::"opinion."N200 N >X1TN>X;". "FL$(X):$>X4D>22:O$:R$~N>22:"Type the NUMBER of your choice,":"then press .";:"";XX>X1X515940>NQ20>5000 N%NTC((1)8):(3);TC*NIS$"INSTRUCTIONS">N3HNE$MN4.RNP1140(is correct? ";:150:FIRST$;" ";LAST$;:255:" "N1=120,88250,88s6=13:"Type Y or N ";:". ";:YN$@=YN$"Y"15605T==(12):T$=CC((1)9):(3);CC=1=TC((1)8):(3);TC="Which one do you want?">W$ <7:1:"First name:";:" "i=9:1:"Last name:";:" " =3:79,57168,57:79,72168,72=7:13:"";FIRST$:FIRST$""15630=9:13:"";LAST$:LAST$""15640"=N$LAST$"."FIRST$;,=11:"Is th<20(TL$):TL$5.":::H0(12)0:"Please insert the disk you want to run."::"Then press . ";0Y$:Y$(13)1252001(4);"RUN HELLO"$1::D$;"OPEN CONTENTS.1" :D$;"READ C/(12)V/:"Does someone else want to do an"::"exercise on this disk? (Y/N) ";n/YN$:YN$"Y"15500y/(12) 0:"Do you or someone else want to do an"::"exercise on ANOTHER DISK? (Y/N) "; 0YN$:YN$"Y"12500=40(12):"To re-start  :"exercise on ANOTHER DISK? (Y/N) ";> 0YN$:YN$"Y"1250040(12):"To re-start this program,"::"type GOTO 15500 and press .":::0(12)0:"Please insert the disk you want to run."::"Then press . ";0Y$:Y$(13)(12):36l/"Do you want another exercise? (Y/N) ";V/YN$:YN$"Y"ĺ(12):15700a/(12)/:"Does someone else want to do an"::"exercise on this disk? (Y/N) ";/YN$:YN$"Y"15500/(12)& 0:"Do you or someone else want to do an": - FACT OR OPINION "FL$(X)B)"Score = "T" out of "N", or "P"%."H@)tT)"Here are the sentences you missed:":h)M1I|)M$(M))M)::)D$;"PR#0")D$;"IN#0")3075b/N0:T0:P0:H0:I0:NQ0:J0:FX$"":DT1:F$"":NW0 i/ant a paper copy now."C(:"N = No, I do not want a paper copy."k(:"Type your answer here-->";:YN$(YN$"Y"12130((:"Please make sure the printer is on."::"Then press any key.";(G$(:(D$;"PR#1")FIRST$" "LAST$"FILE"t'D$;"CLOSE SFILE"2'D$;"APPEND SFILE"H'D$;"WRITE SFILE"f'"FACT OR OPINION "FL$(X)n'N${'T:N:P'D$;"CLOSE SFILE"<((12):3P("Do you want a paper copy?"d(:"You must have a printer attached."x(:"Y = Yes, I w"h"You scored "T" out of "N"."(jEm"You missed: ";NT".":^r"You scored "P;"%."kwPX0:N0z|I0100000 RX8İ200:RX0'NN0:200'121308'N$LAST$"."FIRST$B'5:"Entering information-----------."`'D$;"OPEN S:CL$(J)xJ&pD$;"CLOSE "FL$(X)/z200:216,0E(12)O34,4[Y1NQd600m100v200}Y@34,0:(12)JR$T"FACT OR OPINION.2 "FL$(X)^P(TN)100:P(P102.5)(102.5)cFIRST$" "LAST$e46270,1620,1620,146$16368,00"";AN$@AN$""779]>AN$(CL$(J),1)İ500:fH300lRvJNQ10|(12)620000D$;"OPEN "FL$(X)D$;"READ "FL$(X)J1NQ6000(Q1$(J):Q2$(J):Q3$(J):Q4$(J) CHARACTER COLOR(3);CC&R$:N1". ";Q1$(J)N6:0,70278,70VB2dN9B5kBs10:B:"A. "Q2$(J)::B:"B. "Q3$(J)::B:"C. "Q4$(J)R$ 2 20:"Type a letter, then press .";2:0,146270,1You chose: <";AN$;">." II1& N, X: b ANSWER DISPLAY & INPUT vR$ J(NQ(1))1 H0690 G1H K(G)J640 G HH1 K(H)J 5CCCC1:CC9CC0:rect.":3 ^"You are on target with <";AN$;">.":P h"<";AN$;"> is right.":o r"<";AN$;"> is correct.": |"<";AN$;"> is o.k.": "Right you are, ";FIRST$;"!": "Super!!": "Nice going, ";FIRST$;".": R$:18:O$ LB0 "250# ", to STOP.";, RE$9 N5280N RE$(32)25000b RE$(13)250o "(12):w 'R$ ,18:O$ 1LB1 6"You chose: <";AN$;">." JTT1:R(6(1))1:R340,350,360,370,380,390,400,410 T"Yes, <";AN$;"> is cor) F1023,123% PD$;"NOMON C,I,O"0 Z150006 d@ nNN1G p2X s0,20278,20_ t3r vLB1PXPX13 wLB1āO260PX5:1O,11:1O,11:O xLB1Ĕ1PX3,11 R$:23 5:0,175278,175 24:" for more"; N5! /(4);"BLOAD ST.ALIEN, A5120"+ 01:0> 1232,0:233,20 2Q1$(20),Q2$(25),Q3$(25),Q4$(25),CL$(20),K(20),I(20),G(20),M$(20),MW$(20),AN$(20),FL$(20) 7D$(4):O$(15) < INIT VARIABLES AE$(5):T$(20):BF$(25):DB$(26):W$(23):R$(18 COPYRIGHT (C) 1984: BY CRITERION MICRO SOFTT ALL RIGHTS RESERVEDZ w LAST UPDATE 8/14/84(1023)12345::10:13::"FACT OR OPINION"#(4);"BRUN LOMEM:":16384((4);"BRUN H"-:::3072ŠӍٍŠӍٍŠòӍٍԠҠΠŠ͍ʍŠ²͍ʍŠò͍ʍԠҠΠŠ±ӍōԠҠercise? (Y/N) ";0N/YN$:YN$"Y"ĺ(12):15700;N/(12)N/:"Does someone else want to do an"::"exercise on this disk? (Y/N) ";N/YN$:YN$"Y"15500N/(12)O 0:"Do you or someone else want to do an"::"exercise on ANOTHER DISK? (Y/N) "; = "T" out of "N", or "P"%.""M@)NMT)"Here are the sentences you missed:":YMh)M1IdM|)M$(M)kM)MuM)::M)D$;"PR#0"M)D$;"IN#0"M)3075Mb/N0:T0:P0:H0:I0:NQ0:J0:FX$"":DT1:F$"":NW0Mi/(12):3Nl/"Do you want another ex I do not want a paper copy."EL(:"Type your answer here-->";:YN$YL(YN$"Y"12130_L(L(:"Please make sure the printer is on."::"Then press any key.";L(G$L(:L(D$;"PR#1"L)FIRST$" "LAST$" - FACT OR OPINION "FL$(X)M)"ScorePPEND SFILE""K'D$;"WRITE SFILE"@K'"FACT OR OPINION "FL$(X)HK'N$UK'T:N:PkK'D$;"CLOSE SFILE"yK<((12):3KP("Do you want a paper copy?"Kd(:"You must have a printer attached."Kx(:"Y = Yes, I want a paper copy now."L(:"N = No,0:NN0J|I010000JHJ"Here are the sentences you missed:":SJM1I^J M$(M)rJ0 RX8İ200:RX0yJ MJ'NN0:200J8'N$LAST$"."FIRST$JB'5:"Entering information-----------."J`'D$;"OPEN SFILE"Jt'D$;"CLOSE SFILE" K'D$;"AI100I200IXI/I@34,0:(12)7IJR$WIT"FACT OR OPINION "FL$(X):I^P(TN)100:P(P102.5)(102.5)IcFIRST$" "LAST$IeIh"You scored "T" out of "N"."IjIm"You missed: ";NT".":Ir"You scored "P;"%."JwPX>AN$(CL$(J),1)İ500:#HH300)HR/H:H(12)AH6LH20000bHD$;"OPEN "FL$(X)xHD$;"READ "FL$(X)HJ1NQH6000H(QU$(J):CL$(J)HxJHpD$;"CLOSE "FL$(X)Hz200H216,0H(12)H34,4HX1NQH600G9GW$GB7G"F. fact"::B:"O. opinion"?GR$FG 2vG 20:"Type a letter, then press .";G3:0,146270,146270,1620,1620,146G16368,0G"";AN$GAN$""779G4AN$"F"FO$"FACT"G9AN$"O"FO$"OPINION"H1145,65Oa34,0(a(12):R$/a4Ua"Are you sure you want to QUIT?"{a:"Y = YES, I want to QUIT now."a:"N = NO, I want to CONTINUE." b:"Type Y or N :"; bYN$:YN$"Y"ĺ(12):4b:8000de which"::"sentence answers"::"the question"::"correctly."N:"Type the letter of"::"the correct answer,"::"then press ."N200N(12):W$N"How many ZODS"::"can you collect?"OR$::"This means correct:"O3 O(12)*NIS$"INSTRUCTIONS"&/N3:E$@4NTC((1)8):(3);TCG9N3>NP1140((IS$)9):P2140((IS$)8):P3(37)5:P4P325CN20(IS$):IS$HNP1,P3P2,P3P2,P4P1,P4P1,P3pNCC((1)9):(3);CCzNW$AN"Read each question."::"Deci);CC =1%=TC((1)8):(3);TCC="Which one do you want?"K>W$W >X1TNk>X;". "FL$(X):r>XD>22:O$:R$N>22:"Type the NUMBER of your choice,":"then press .";:"";XX>X1X315940>NQ10>5000 N%N0&=9:13:"";LAST$:LAST$""15640>"=N$LAST$"."FIRST$,=11:"Is this correct? ";:150:FIRST$;" ";LAST$;:255:" "1=120,88250,886=13:"Type Y or N ";:". ";:YN$@=YN$"Y"15605T==(12):T$=CC((1)9):(300<(18):(12)<2:<"Hi! What is your name?"@<K<6:O$<7:1:"First name:";:" "=9:1:"Last name:";:" " =3:79,57168,57:79,72168,72=7:13:"";FIRST$:FIRST$""1563(3);TCn<3Kx."NUN200]UN(12):W$UN"You can earn a key"::"for each right"::"answer."UO1140,60UOUa34,0Ua(12):R$Ua4Ua"Are you sure you want to QUIT?"Va:"Y = YTURN>.";:"";X!TX>X1X515940+T>NQ205T>5000;T NGT4N(12);STHN(23);mTRNCC((1)9):(3);CCtT\N4TfN"INSTRUCTIONS"TpN4:"____________"TzN::UN"Read each sentence."::"Decide whether"::"it is a true fact,"::"or just somYN$S@=YN$"Y"15605ST=,S=(12):T$FS=CC((1)9):(3);CCMS=1gS=TC((1)8):(3);TCS="Which one do you want?"S>W$S >X1TNS>X;". "FL$(X):S>XSD>22:O$:R$TN>22:"Type the NUMBER of your choice,":"then press "Q=9:1:"Last name:";:" "R =3EN CONTENTS"$P:D$;"READ CONTENTS"0P:15500;P:X16GP:FL$(X)SP:TNTN1ZP:XzP.":::fO0(12)O0:"Please insert the disk you want to run."::"Then press . ";O0Y$:Y$(13)12520O0O1(4);"RUN HELLO"O$1O: P:D$;"OP宍ƍƍύ報ƍύύύƍƍ宍ύƍƠōԠҠΠŠ±ōōԠҠΠŠ±ōōŠ印ԠҠΠŠñ危ԠҠΠŠ荱Ԡsure the printer is on."::"Then press any key.";:(G$B(:Q(D$;"PR#1")FIRST$" "LAST$" - FACT OR OPINION "FL$(X))"Score = "T" out of "N", or "P"%."@)J)I010650T)"Here are the sentences you missed:":h)M1I|)M$(M)00:3&P("Do you want a paper copy?"Qd(:"You must have a printer attached."|x(:"Y = Yes, I want a paper copy now."(:"N = No, I do not want a paper copy."(:"Type your answer here-->";:YN$(YN$"Y"12000(2(:"Please make 34,7 M$(M)$0 RX10İ200:RX0+ M5'34,0M8'N$LAST$"."FIRST$b`'D$;"OPEN SFILE"xt'D$;"CLOSE SFILE"'D$;"APPEND SFILE"'D$;"WRITE SFILE"'"FACT OR OPINION "FL$(X)'LAST$:FIRST$'T:N:P'D$;"CLOSE SFILE"<(2102.5)(102.5)8`"FACT OR OPINION - 1 - "FL$(X)LcFIRST$" "LAST$nh"You scored "T" out of "N"."m"You missed: ";NT"."r"You scored "P;"%."|I010000"Here are the sentences you missed:":M1IRXRX1N "FL$(X)D$;"READ "FL$(X)+J1NQ66000J(QU$(J):CL$(J)QxJhpD$;"CLOSE "FL$(X)qz200|216,0(12)34,4Y1NQ600S1100200Y@34,0:(12):S0JR$^P(TN)100:P(PS1,S3S2,S3S2,S4S1,S4S1,S3$n3GxS1,T3T2,T3T2,T4S1,T4S1,T3aAN$"O":FO$"OPINION"k1100r0S1,T3T2,T3T2,T4S1,T4S1,T31190AN$(CL$(J),1)İ300::0500::(12)620000 D$;"OPE8:S4S3D1:T3S4D2WS2S156(FT$)ACROSS:T2S156(OP$)ACROSS:T3S4D2:T4T3D1a81190mL20:38`G$:G$(32)G$(13)1100~G$(13)18003S1,S3S2,S3S2,S4S1,S4S1,S3AN$"F":FO$"FACT"11000(ion" R$ 2C 20:" to move, to choose."m3:0,146270,146270,1620,1620,146{16368,020:38 MOVE RECTANGLE TO ANSWERFT$"FACT":OP$"OPINION"INDENT15D115:D20ACROSS8S1INDENT:S36 vR$J(NQ(1))1+H06906G1HFK(G)J640MGWHH1bK(H)Ji4CCCC1:CC9CC0: CHARACTER COLOR(3);CCT$N1". ";QU$(J)B4N9B59W$B"Fact"::B:"OpinFO$"OPINION"ĺ"The correct answer is: FACT."8 II1[ !FO$"FACT"FO$"OPINION":550y "FO$"OPINION"FO$"FACT" &M$(I)QU$(J)"-"(FO$,1) 0FO$"" N X:b ANSWER DISPLAY & INPUT ";FO$;"> is right.":4 r"Nice going, "FIRST$".":O |"<";FO$;"> is o.k.":z "Another right answer, ";FIRST$;"!": "GOOD!!": R0:"Nice going, ";FIRST$;".": R$:18:O$ LB0 FO$"FACT"ĺ"The correct answer is: OPINION.". ", to STOP."; G$& S0280? G$"S"G$"s"25000R G$(13)250_ "(12):g 'R$s ,18:O$| 1LB1 JTT1:RR1:R340,350,360,370,380,390,400,410 T"Yes, <";FO$;"> is correct.": ^"<";FO$;"> is a good answer.": h"<;"NOMON C,I,O" Z15000 d' iR$: jLB1PXPX13A l1K nNN1\ p0,20278,20c q3 sLB1āO260PX5:1O,11:1O,11:O xLB1Ē3:1PX3,10: R$:23 6:0,175278,175 24:" for more"; S0250 " /(4);"BLOAD ST.ALIEN , A5120", 01:0? 1232,0:233,20 2QU$(25),CL$(25),K(25),I(20),G(20),M$(20),MW$(20),FO$(20),FL$(25) 7D$(4):O$(15) < INIT VARIABLES AE$(5):T$(20):BF$(25):DB$(26):W$(23):R$(18) F1023,123 PD$ COPYRIGHT (C) 19849 BY CRITERION MICRO SOFTD(12)J k LAST UPDATE 02/23/85 :10:"PLEASE WAIT......"(1023)12345#(4);"BRUN LOMEM:":16384((4);"BRUN H.IIC"-:.(4);"BLOAD ALTCOMMA.SF"           =3:79,57168,57:79,72168,72H=7:13:"";FIRST$:FIRST$""15630d=FIRST$"TEACHER"30000=9:13:"";LAST$:LAST$""15640"=N$LAST$"."FIRST$,=11:"Is this correct? ";:150:FIRST$;" ";LAST$;:255:" "1=120,88250,88hat is"::"true from what"::"people only think"::"is true."I<200[<(18):(12)b<2<"Hi! What is your name?"<<6:O$<7:1:"First name:";:" "=9:1:"Last name:";:" "!) ;216,0&(";:YN$0(YN$"Y"121306(}(:"Please make sure the printer is on."::"Then press any key.";(G$(:(D$;"PR#1")FIRST$" "LAST$" - FACT OR OPINION "FL$(X))"Score = "T" out of "N", or "P"%."@)):ITE SFILE".'FL$(X):LAST$:FIRST$:T:N:PD'D$;"CLOSE SFILE"P<(200:3qP("Do you want a paper copy?"d(:"You must have a printer attached."x(:"Y = Yes, I want a paper copy now."(:"N = No, I do not want a paper copy."(:"TypP(TN)100:P(P102.5)(102.5):cFIRST$" "LAST$\h"You scored "T" out of "N"."wm"You missed: ";NT"."r"You scored "P;"%."'34,08'N$LAST$"."FIRST$`'D$;"OPEN SFILE"t'D$;"CLOSE SFILE"'D$;"APPEND SFILE" 'D$;"WR0000D$;"OPEN "FL$(X)0D$;"READ "FL$(X)<J1NQG6000v(Q1$(J):Q2$(J):Q3$(J):Q4$(J):CL$(J):JpD$;"CLOSE "FL$(X)z200:216,0:34,4Y1NQ:600:S1:100:200:Y@34,0:(12):S0:R$:"FACT OR OPINION - "FL$(X):&^B:"A. "Q2$(J)::B:"B. "Q3$(J)::B:"C. "Q4$(J):R$m 2:20:"Type a letter, then press .";2:0,146270,146270,1620,1620,14616368,0:"";AN$AN$""779>AN$(CL$(J),1)İ500:H300RNQ10:(12):6:2NSWER DISPLAY & INPUT vR$0 J(NQ(1))1= H0690H G1HX K(G)J640_ Gi HH1t K(H)J 5:CCCC1:CC9CC0: CHARACTER COLOR (3);CC:R$ N1". ";Q1$(J) 6:0,70278,70 B2:N9B5 B:102: r"<";AN$;"> is correct.":9 |"<";AN$;"> is o.k.":] "Right you are, ";FIRST$;"!":n "Super!!": R0:"Nice going, ";FIRST$;".": R$:18:O$ LB0 "You chose: <";AN$;">." "No, the correct answer is: "CL$(J);".": X ARE$"s"25000" RE$(13)250/ "(12):7 'R$H ,18:O$:LB1e 6"You chose: <";AN$;">." JTT1:RR1:R340,350,360,370,380,390,400,410 T"Yes, <";AN$;"> is correct.": ^"<";AN$;"> is a super answer.": h"<";AN$;"> is right.":5000! dNN1:2:0,20278,20:34 vLB1PXPX13^ wLB1āO260PX5:1O,11:1O,11:Os xLB1Ĕ1PX3,11y R$:23 5:0,175278,175 24:" for more"; S0250 ", to STOP."; RE$ S0280 RE$"S"IIC" -:, /(4);"BLOAD ST.ALIEN, A5120"E 01:0:232,0:233,20 2Q1$(25),Q2$(25),Q3$(25),Q4$(25),CL$(25),K(25),I(25),G(25),M$(25),MW$(25),AN$(25),FL$(25) 7D$(4):O$(15):E$(5):T$(20):BF$(25):DB$(26):W$(23):R$(18) F1023,123:1@ COPYRIGHT (C) 19849 BY CRITERION MICRO SOFTS ALL RIGHTS RESERVEDY d (12) LAST UPDATE 02/21/85:10:"PLEASE WAIT......"(4);"NOMON C,I,O"(1023)12345#(4);"BRUN LOMEM:":16384 ((4);"BRUN H.      ҠΠŠ±ōōԠҠΠŠ±ōōԠҠΠŠñōōԠҠΠŠıōōԠҠΠŠıōōԠS0:R0K'D$(4)K':34,0-K$'(12):3IK.'12:"File Maintenance"OK8'hK=':"1. Check scores"KB':"2. Delete student file"KQ':"3. View/print an exercise"KV':"4. Return to student program"K`'20:"Enter your choice--->";Lj'G$:G(;:36,26:"Score";:36,35:"%":"_______________________________________"OJ[JX1NSJ(LAST$(X),12);", ";(FIRST$(X),8);:36,24:(FL$(X),2);:36,TA(X):T(X)"/"N(X);:36,TB(X):P(X)JXJJD$;"PR#0"JD$;"IN#0"J(3075K<N0:N I34,0IYN$%IYN$"Y"45906IN0:NS0:R0AI10000OI(12):3rI"Please turn on the printer."I:"Roll the paper past the perforation."I 100IID$;"PR#1"I20((DISK$)2)IDISK$:IJ"Name";:36,16:"Exercise",12);", ";(FIRST$(X),10);24)(FL$(X),2);TA(X))T(X)"/"N(X);TB(X))P(X)RHNN1eHN18İ100:N0lHrXHt:"You have "R1" scores on this disk."HvR90ĺ"IT IS ABOUT TIME TO DELETE THE FILE!"H|100H:I"Do you want a printout? (Y/N)"; SFILE"Gf216,0#GpR1010000)GGGDISK$"Context Clues - 2"MG :XG(12)mG20((DISK$)2)zGDISK$:G"Name";19)"Exercise";29)"Score";36)"%":"---------------------------------------"GG34,4GX1NSHH(LAST$(X)ead."FD$;"OPEN SFILE"/F D$;"READ SFILE"9F*RR1lF4FL$(R):LAST$(R):FIRST$(R):T(R):N(R):P(R)F>T(R)9TA(R)28F@T(R)10TA(R)29FAP(R)100TB(R)34FBP(R)100TB(R)35FDP(R)10TB(R)36FMNSNS1FR2090G\D$;"CLOSEram disk can hold 100 names"::"and scores. When you approach this"::"limit, you will have to delete the file"::"from the program disk, and start over."E200E10000E(12)E3E2140E(12)F "Please wait while the file is r"This program reads the files created"::"by the Word Mentor programs."D:" The names and scores for each disk"::"will be displayed on the screen. If a"::"printer is attached, the information"::"can also be printed out."E:" Each progF$"All Rights Reserved"7C:20((A$)2):A$:::?C11WC20((B$)2):B$:oC$20((C$)2):C$:C.20((E$)2):E$:C820((F$)2):F$:CB1:Z140:"#";:Z:Z222:Z:"#";:40:"#";:Z:Z140:"#";:ZC`200Cj(12)HDtess to continue.";2BnG$:G$(13)110DBs(37):(15)JBxuB23:7:"Press to continue.";BG$:G$(13)110B(12):B:B(12):8CA$"The Manager":B$"Copyright (C) 1985":C$"by":E$"Criterion Micro Soft":LAST$(100),FIRST$(100),N(100),T(100),P(100),NS(100),R(100),J(20),FL$(100)\ATA(75),TB(75)hA(D$(4)A2 "EXERCISE A1",20,"EXERCISE B1",20,"EXERCISE C1",20,"EXERCISE D1",20,"EXERCISE A2",10,"EXERCISE B2",10,"EXERCISE C2",10AZ1000Bd23:7:"Pr@ COPYRIGHT (C) 1985 BY9@ CRITERION MICROSOFTU@ ALL RIGHTS RESERVEDr@ SCORE READER UTILITY@ MODIFIED 2/23/85@ FACT OR OPINION@ 3072@QU$(20),QB$(20),Q1$(20),Q2$(20),Q3$(20),Q4$(20),CL$(20),CW$(20)IA         ҠΠŠıōōԠҠΠŠıōōŠōōŠōōŠ²ōōŠòōōŠòōG$):G1G410090Lo'(12);Lt'G2000,10600,12000,11000ZLh) DELETE ALL STUDENT FILESL)"THIS WILL WIPE OUT ALL STUDENT FILES ON"::"THIS DISK."L):"PROCEED? (Y/N) ";:YN$L)YN$"Y"10000L)L)D$;"DELETE SFILE"L)10000M*(12):U*U* .""""< <"""<">$ "" &"""  "" ****$$$$"""$$0&< ,""""**"""$>>   *U*U*":*:<"">""$$$$$$$$$$$>$ $>>$ "2"<""">"""8 "  "$>"6*""""""&*2"""""""$$"""*,"" "" ">*"""""""""""""**"""""">"">>> >00000>* @0 66$>>< (&20 *,  > > "2*&" " >>  ">> "8""> """"""<  >> "LKxHHD+(DA/(Dq'  I)(H  p闠 y) 񗰐 z$ r0θ4KHH0t# p y0p 9G @0ɩL[hHHϸȸI^hHHoTDD>>><<88` ` ` |?|?00~~px\\xp@@||``<f0f8<@`p8330xLLL|xxlL xp`pp`@`p0     ōŠòōōԠҠΠŠٍ΍ԠҠΠŠٍ΍ԠҠΠŠ±ٍ΍ŠŠ±ŠñŠı 0L@` g RgƖ8PgPQhQghe Ӣi  g y  gh^_8^eP^ȱ^ eQ^^_Ll8ePeQ`LԠҠΠŠӮÍԠҠΠŠ±ӮÍԠҠΠŠıӮÍԠҠΠŠıӮÍŠŠ²Šòύƍƍƍύύƍύύ宍ύƍύύύύƍ䮍ƍƍ䮍ύƍ  Šòή̍箍򮍠Ԯ宍讍Ԯ쮍ή箍Ԯ箍ή뮍Ԯή宍Ԯ箍Ԯ讍쮍ÍԮ䮍     XuD$;"IN#0"-!lu::10:"PLEASE WAIT......"?!uD$;"RUN MGR"QUIT?"oYa:"Y = YES, I want to QUIT now."Ya:"N = NO, I want to CONTINUE."Y b:"Type Y or N :";Y bYN$:YN$"Y"ĺ(12):Y4b:8000Y0uYDuD$;"PR#0"YXuD$;"IN#0"Zlu:FORE YOU DECIDE." ]! a34,40 a(12):R$7 a5] a"Are you sure you want to QUIT?" a:"Y = YES, I want to QUIT now." a:"N = NO, I want to CONTINUE." b:"Type Y or N :"; bYN$:YN$"Y"ĺ(12): 4b:8000 0u DuD$;"PR#0" !ON is a statement of"::"one person's FEELINGS about something."G}PP:"A statement can be called a FACT if"::"it uses the words SOME, SOMETIMES,"::"USUALLY, OFTEN, MANY, etc."P P:"REMEMBER TO READ EACH SENTENCE VERY"::"CAREFULLY BE宍ƍƍύ報ƍύύύƍƍ宍ύƍƠ宍ύύ󠳱ƍύύύƍ宍ƍ宍ύ  " 󮠠Í󮍠ÍήÍή宍Ԯ箍ÍԮ쮍àԮΠήήÍԮή宍Ԯ宍 !! ! ! ! ! !ŠӮÍŠ²ӮÍύύύ쮍ύ報ƍ堶ƍ宍ύƍƍ䮍ƍƍ宍ύƍƍ箍ύƍƍύύƍ򠲮ύƍ"" "