' +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 ~(`F d ֠z# u`   NG..."::D$;"RUN LESSONXX"4j:D$;"RUN HELLOHI1"ON: SIMILARITIES AND DIFFERENCES PAGE 10z"SP2:NS4:RR%4:NQ1# VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982% INITIALIZATION (ST%3:W8eXTTT`QW eXL9X3W eXRWSWL9X3W RWSWL9X4W eXTWUWL9X4W TWUWL9X5W eXVWWWL9X5W VWWWL9XhWWWɗ eXhW eXL9X eXL[ eXL9X eX(W eXL9X(WcW eXdW eXeW eXfW eXgWc``x```?``XL9X@ eXL9XL9XcWdWxW|W_40eWLZ PW YeWLZcWdW eXL9X T eX T e???33~>f~~?>300??pp00pp \,\,\,\,\ ff99@@``xx|||`````x```?````p ?||xx``Ccs[K`acgmiCCCCaaaa``@@@@@@@@@@@@@@@@@`px|~|xp``0p @@@@@@@@`0````p ?~~~NN@ 0`@@@@@@@0`@x```````9p 0``x```````3#3```p|pppppp@@@@@@~~??pp@@@@@@@@||p@@||@@p@@@@@@@@ @@@@  33_[[[[ [[XXxpmm--=8 0`@`0 @`0 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@0`@  8ff~~8 @`0@@""""""> >````````````````3fL3fMfL3fL33fL3fLfL3fL3""""""< >> ""*: <"">""""""""""""">>><"""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6" 00@@@@@@@@||@@00 ||>>* (*""  *$**> "2*&" " >>  ">> "8""> pp  LL pp|| ||LL pp pp pp||@@@@@@@@@@@@  pp  00@@ LLLL<<  00@@00 pp@@@@@@@@@@pp pp LL<K (L$"1"L$"4")(SN1)ĺ(7):1:237p (L$"1"L$"4")(SN1)Ģ1:237 L$L$(1)AX$"YES":282 AX$"NO":290 J=2,3,4 K1NA KQ%2K11:L$" ":PC,36,KQ%:TX," ":PC,36,KQ% ENN,L$,1,T%,AAND SCREEN PARTICULARS 5010P BEGIN QUESTION LOOP ********************\ X1NQ DISPLAY QUESTIONS AND SPEECH FOR QUESTION SY,3:CO,2:PC,3,3:TX,Q$(Q) ANSWER ENTRY J1244 PC,20,15:L$"3":TX," ":PC,20,15:ENN,L$,1:K07 xSY,3:DE,1,1,40,18:INV:FI:NO:DE,1,1,40,20L RN0JJ1:150i J(NS(1)1):JJ1140~ J1J:JNSRN1 K0İ4010 J1010,1110,1210,1310 CO,4:DE,1,1,40,5:FI:DE,2,2,39,4:INV:FI:NO:DE,1,1,40,20 SET UP SCREEN RE::8 *Q$(1)" 1. EAT 2. FUR 3. LITTLE 4. HOPS "j ,Q$(2)" 1. OLD 2. ROUND 3. TALL 4. OFF " 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$ 3SN(785) <L$(10),IX$(10) FD$(4):WR0:RN0:J0:PR$"" nR0:RR0:X06  6001027902& LEVEL 2a COMPREHENSION: SIMILARITIES AND DIFFERENCES PAGE 10z"SP2:NS4:RR%4:NQ1# VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982% INITIALIZATION (ST%3:     )(L$,1)IQ(AN$(1)L$(1))(AN$(2)L$(2))(AN$(3)L$(3))AX$"YES":282cAX$"NO":290SY,1:CO,4:PC,14,9:TX,"GOOD":CO,2SN1āI11000:I: PAUSE IF NO TIME USED FOR SOUNDSN1āI200205:TN,I,5:300"SN1āI1TX," ":PC,34,KQ% L$" "2 ENN,L$,1,T%,AL% (L$)27Ĺ769,SP:RE:::(4);"BSAVE ";NF$;",A768,L127":RE:PC,9,5:TX,"BYE":I11000::(4);"RUN HELLOHI1" (L$"1"L$"3")(SN1)ĺ(7):1:258 (L$"1"L$"3")(SN1)Ģ1:258 AN$(I,7:INV6 TX," "C PC,3,13r TX," "} I15 PC,3,(I7):TX," ":PC,38,(I7):TX," " :NO ANSWER ENTRY SY,3:CO,2 I13 KQ%2I1 PC,34,KQ%:D SCREEN PARTICULARS# K0İ4010> FTXN,P,1,1,N1$,PR$,R%H 5010x BEGIN QUESTION LOOP ******************** X1NQ SY,1:DE,1,7,20,9:INV:FI:NO:DE,1,1,20,10 DISPLAY QUESTIONS AND SPEECH FOR QUESTION SY,3:CO,2 PC,3D$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE."N d BEGIN SCREEN LOOPc nR0:RR0:X0:K0m xSY,3 RN0JJ1:150 J(NS(1)1):JJ1140 J1J:JNSRN1 SET UP QUESTIONS J1010,1110,1210 SET UP SCREEN ANe # VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982z % INITIALIZATION (ST%3:RE:: ,L$" " 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$ 3SN(785) <L$(10),IX$(10)6 F  6001027902& LEVEL 2V COMPREHENSION: CAUSE AND EFFECT PAGE 11h BILL WAGNER| 4-26-82  SP=SUBPROGRAM NUMBER: RR%=RIGHT IN A ROW GOAL NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIONS "SP3:NS3:RR%3:NQ1 ***ppp@@@@@}_{?. . A@@@   *(hhUU` *****Dd4?m[AAEDD h``` (mv{@NHjjtt4tUUn[m**?uu hhhh(*mvUU 1u3 jjhUU**uu?? *****??__TT5%)**JVTUUUYJJzzzzP@***UU RTUUUUUUZRRRRRJ OOOo? ((((***UUUUUUUU @``p` //+++********UUUUUUUUxypppppp``+ ծ׺ժժժsgsx?~OOsg~ժժժՂծժպժժժccsq?~OgOgcc?~ժժժՂU*U*U*U*U*}ժGgsg`OgsgOgsgOgcgsg?~sgcgߪժՂתժտ+U*U*U~ժcccsgOsqOgsgOgsgcc?~ccsgߪժՂ::NO:CL,0:DI,0[J770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"tj:D$;"RUN HELLOHI1" OAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982% INITIALIZATION(ST%3:RE:: 2L1(771):N1$"":I1L1:N1$N1$((I771))::N TO GO ON.";:1:255#K1)$= DISPLAY SCORESY,3:CO,2:DE,1,1,40,20:PC,1,19:RR$(RR%):TX,"GOAL = ":TX,RR$:TX," RIGHT IN A ROW.":PC,28,19:TX,"YOU HAVE"SY,1:PC,19,10:DI,4:SN1įCL,40RR$(RR):INV:JJ0RR:TX,RR$:IX$(4)"DAISY":IX$(5)"MAPLE"TL$(1)"/":L$(2)"X":L$(3)"X":L$(4)"/":L$(5)"X"Z6k PAUSE SUBSq w  INSTRUCTIONS AND BLOADS:10021:"TYPE AN X BELOW THE THREE ANSWERS.""OTHERWISE, TYPE A / SLASH.""HIT RETURTX," RIGHT IN A ROW.":PC,28,19:TX,"YOU HAVE"USY,1:PC,19,10:DI,4:SN1įCL,40RR$(RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,0J770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"j:D$;"RUN HELLOHI1"1Y # VERSI X UNDER THE THREE THINGS THAT ANSWER EACH QUESTION. OTHERWISE, PRESS THE / KEY. HIT RETURN AFTER EACH ANSWERAND TO GO ON.";1:255K1$ DISPLAY SCORE.SY,3:CO,2:DE,1,1,40,20:PC,1,19:RR$(RR%):TX,"GOAL = ":TX,RR$: WHALE CAR FROG BUS"FA(1)1:A(2)8:A(3)16:A(4)22:A(5)29fCX$"WHAT MOVES ON WHEELS?"L$(1)"X":L$(2)"/":L$(3)"X":L$(4)"/":L$(5)"X" PAUSE SUBS   INSTRUCTIONS AND BLOADS::10021:"PRESS1įCL,40:RR$(RR):INV:@CO,4:JJ0RR:TX,RR$::CO,2TNO:CL,0:DI,0ZJ770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"j:D$;"RUN HELLOHI1"=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIONS "SP3:NS3:RR%3:NQ1A6150"$D$;"BLOAD BTCCE-2,A6400"BD$;"BLOAD BTCCE-3,A6650"K255Q$e DISPLAY SCORESY,3:CO,2:DE,1,1,40,20:PC,1,19:RR$(RR%):TX,"GOAL = ":TX,RR$:TX," RIGHT IN A ROW."PC,28,19:TX,"YOU HAVE"SY,1:PC,19,10:DI,4:SNUBS   - INSTRUCTIONS AND BLOADS7::@100HK121:"EACH SENTENCE IS THE CAUSE OF SOMETHING.PRESS THE NUMBER OF THE SENTENCE IN THE BOX THAT SHOWS WHAT HAPPENED.";" HIT RETURNTO GO ON.";1:D$;"BLOAD BTCCE-1,N LOOPe3010hXCm END SCREEN LOOP ********************Lr120e DATA FOR QUESTIONSL$(1)"3":L$(2)"1":L$(3)"2":P6150BVL$(1)"1":L$(2)"3":L$(3)"2":P6400L$(1)"1":L$(2)"3":L$(3)"2":P6650  PAUSE S5:TN,255,10:9$SY,3:I13:PC,36,2I1:TX,L$(I):M%16368,0:R$:[, SCORING1(AX$"YES")RR1:RRRR1:WR06(AX$"YES")WW1:WRWR1:RR0@5010JRRRR%A27:40010T(WR5)(W18)A25:40010^c END QUESTIO *((PP@** GUU*PP@ (* 1u`p+*`x[_U:jj*XX\\XPX^***j:>..UUUu]]W**?zj*/UUUUUWWWWWWWV^|`>>z:zzjkwwwUUUW:zz?****__]]]]]](** *++,1qT__uuUW~x**j**zWWWu(*FSPEAQ ߪծժկկժߪժտժߪwUscOgxOc?~sgcc}][k]w}]ww]]o[]{]]{w]}]{w{ժժժժժժժժժsxOgsgOg?~scsgժժժժժժժժժժժժժժժժժժՂUժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂתժժկժվվժժժժժժժժժժժժժժժժժժՂ]U{]w}]Y{[]}]ww]Y]{}]U[]w{]wY}ծպժժժccsq?~OOcc~ժժժՂծժպժժժsgsx?~OgOgsg?~ժժժՂժcccCaOcscOgsgOgsgcc?~ccsgߪժՂժ+U*U*U~ժGgsgsgOsxOgsgOgscsg?~sgscߪժՂߪծժկկժߪպժկժߪUIp`|pxsgp[][]]w]]Us]]_[k{]k{U][k{w[ժժժժժժժժժ3|O`Og?~sasgժժժժժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂծժվկպվկժժժժժժժժժժժժժՂkI[]w[k][[][kUw]]k{[]I[]U[]w][ծպժժժpscx~~p~ժժժՂծժպժժժg3|?~OOg?~ժժժՂժppccpp`sg`sgpxpsgߪժՂժժժժ+U*U*U~ժcsgsgO3|OsgOsag?~sgsaߪժՂߪתկկժߪպժկժA]x`?~xxsgxgca]acc]AwccAawqcwqAcgwqcAժժժժժժժժժ~O`Og?~s`s`ժժժժժժժժժժժժժժժժժժՂUժժժժժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂիվծժվկ׺վկժժժժժժիժժժժժժժժժՂw]Aacgw]Aa]gwAcc]wqgc]a]AAac]g||ծպժժժxsgx~~x?~ժժժՂծժպժժժc~?~OOc?~ժժժՂ ժժժժժժժ?xxsgxx`sg`sgxxxsgߪժՂjU@||ժժժժժssgsgO~OsgOs`c?~sgs`ߪժՂ*]*D     <8p`@UUUUWW^\********UUUUUUUU*j* p@?1u@x\^WW****?UUUU`p8<,lllUUUUUwUU*****okkUUUUU_]]:jjj*?;;ll,,,,l,UWWWWWWUkkkkkkk*]]]]]]_U;?+++++* R9,jk,-RzJT W%TkmݭTUm kV WUZ m$VU*ժZVz**U ju⠪Z+*mROZjVVRjWhV+ZU%m*UVZ%]iZҪ*UZjQURM*TUjK RU*(PmVJ*ZUJJoK$vUVEJտ gRiU *V+&K~U4ZVUYYjTTJvRVUT %U*]UIUV*UշU)QZ**{(RyVUVK VRiZ-}JZTR<CպZ*MT^P\U |CQ:*>aQTeJ0MiZUJy-)R{mUJJjUTNBQuVTZVSTy>E05Wji*jZT\RRZMR*MVTժV RVTj TVJ 3,8VUգTժ45^J*Uښl[ZR SyjVK(֪yBa^P֪<}m* յ$zBAv*BR뵪H*Eo$HjV~DJd}VUVFhU'VZUjjUZUZUZU-jUVjڪD*VVjj*ժVY)ʪjI[q UժJKiVjZZ*-HjURVR Ԫn*VTVjJUZ*ժJJ-ZZZE*TKj%mVZjUVViUժJ[*$"UMZժjU*)IU*RJURUiVZJUVZJjUJU-jZVVVUJ+UiZUeZZUZV*JVRUZeUT4UJJ+TjҪJ*Ҫ-UVժJҪjERj+*J+iUJ+JUJZiZժTVUZZժTҪTVVZJڊV5iUVmmI*Uն$m*jTUTj*D[Q%ZVUJURTUjV)%*%!T[UURVTԪjJڷԪJU%UjURjkjZj%RUIJ۪Z**UJjZURmZU%*jZRTUjZUJRVkURU-Z[URԪjUVTUխJ"ժZ+UjBjIm[Օ*mUJ*%ժZ*kVI U_V Ւzj+RnUkIjU*UVZEzH+WZZnZ%JIJH/ U*HݪZuTUJ*iUJUuRVUJU iRvTImVIJZU*ժTɾHTUZJI)RZjRR޶VIB$mmVR*)IJRvmmJJRU߶VI"D"Umm[ZkJUJIJTUnk_V$ IDTU[k[ZkTJJTZ۶U*%I[U߶ZDDT%jkڮU{%AJRVժ*nVBG_!@VJZn[iڮ*jv*@Z[B[+J*jUIj*RUժjj J Z.TjڗRU*jjJjTZ>ժjURZUժZTTV*I$RjjժV*RZRZR*ժZZURmm߶ժJ"$IJZR*$Jk۶mJJI޶VITֶjJZJ)U}mZIHB*RUZiUiU\UZR4--]YUZljUK+JU[JjiUReSUjKUZiQljeZUTYվju%/QIݗTZUZjU*VU J*jUVZk E*U+j[VUJj%JZV*RZUJ*TZZ*Iժj[%URJ)Z*JUZVՊiTJjIUVUjUjUZUبViZjҖlMMUJ*aUZiVJ-UR+6UZUZZjZYMKˢeK-*MVZRZlVU--+K+j--ҕRiUeu*U**[U-VJҪRiUl J-jblYZTUiUYUeSY,3:CO,2:PC,1,19:TX,"GOAL = 6 RIGHT IN A ROW.":PC,28,19:TX,"YOU HAVE"YeSY,1ePC,19,10:DI,4:CL,40:RR$(RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,0eeJ770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"fj:(4);"RUNͲʎRʎ]]]???|՚֖TUUU ?*?*?*@@U|?*՚@@1u @x`֖(******UUUUUU**(UU՘֖ EHVZU()T"mIQVUR@HߪH(UIZ~]U"Uk*uUJIUmVU)UjRUUTZU%IUmiUJUUj*IUVUjmRTjTVUIRZ*ժRJZEKY.UϧJ"vVTU*ϧ@uPZU**V?F EkZJ絤Tm&EI_jm%]vKU+jU?zI]T}P[+ZUR+% R}ж%Z _&n+Rm*U% $i[%UTU[H$*7*$+$UQJU+HoKH&-JUտUI*jJjH[QuJRUTkVU *J T**ժTV*K VV գ\RUTծZ)RTUEMe|)I0k{,ԦR-*FVڢV*VEnRժVJ$RJUB{**V U[ZV%Z۪*IRUmwIZUJUTVHj*RUVmUTUZV5K5Tժ*+ ZV!.UU(( UUUUUTP 1uk TU`PT UTTPP@ ******(x~TTTTP@*******h}_ ( @XTUUUU?//+**UUU%)*(  EzZJʪժy8,KӲ(UVWJybںZ*%%ժ(hZVV$Pimk()UmmUJ TkRQRjURJ=BU[˒"Vk*Rq((zZTZ*Zz\(z]-%V*ZzڶJVJjZZ*UK֪RTkcjUCZUjU%8--MjZJ:5U$U4RZoWRu۪$jkַ"QjV%U[+? DZZ[-z<KյUIZ*~>U֪Jk[|4RUIj*RZ RjJjRZJR*UjUjY5U5U˪KqZRUVU*-X 63999LINE TOO LONGINCREMENT = 0S(/S(bA6Ȫ`樥sthhRL`EȱEi樠 ȱȱ`ijEȱEi椠`H h`:808`ESIFee'Lѥȥ񥰶NO PROGRAM IN MEMORYNO Ԇ8stijRLghLABCՆ>ֆ?sֆ?svZb#i&VV馒zV.*JU/-jVJJ+*ZZi'*mt>,ZUbeRiij /KKUyYZ:UurQIWKeէJ:h\^j^UJUպ}T**)ڤZUTUڭEukTAmIAնUIR*IσEBUUIR*IU9v$Rm[UJUZ(ѴVZTJ}TUW+jj*JkTVKJVղZkR)TiY(UYq^qTUqUUe4jrҔtJx-kb*MiYQ詪RujUYV-*R婬,-jZYu*۪eIUSYeVkUT.ɪJY,jT*UV(UZ*VBUkU*VU*VJUժm*j*]-JtuT)ZkWyY*)*V-TT(TjZTZUZàPVEIjUJUU? ۶(Z]$U`uJ JRU[-}<8XVCk$Z[||8Xtݭ UVRRJx8X nURkJv2ԺU%**,[%EU[LJEAVEQյ*IV-jYy:JuTJ)MU4ӤPlTU*qX4]SRj*8XVRUժRh(JڪRVJ"Jkw[DRZRK%${J"UJV}]RnW(jUTZ'UXTU*Z-K% Um۪RjUj**jjZURkRjUQQVW*6JuRVKQiժԴTJURmJǡ@q*JUc$PJ$UUEJ[S16)Z[-%UJz@To+*Im|>!TVTVZUV%)U۪JjkTU[U*UmUڪJj۪RU)JmU)R*mU)VJUVTZm*U*JUmUjjTVRTYVTR*VV].Zt4h\\iYU-KSVӲ,p,jZeURmVQ(j%~QKޤ%]iE[jVjTZJ+jU+ZZȭVdUTjVݤJR?*ՖTUj*%-]UVTV~UI*ת*RjZi*kUZjJZUJUTjնIUV RR WTժJUJGK(i(n*RTU>(TZRjSCAvU$T]Uժ[mUJ*%v*IRJRmjTJ+tWI*UJ_ doIj-UR[IJmiV@*VRRRU/^ZR"mZ%@I]$[I[IrBRUUU"J-?MVԖjIT5ՋUڒZPKP"&UVb/JȪZ?PP+ZRKTZWR+TKU(^*mUVB}RekBTkUIZ(5kbUʤy5ĢU岪iźQUPUJmMTeuT4%+JonVhUexUQ3S9Ujk-c]T*VSʮʬT9jgRjVPVjeZ]KkQV⌳fjMR2U+V*VYV-V9RMZjU.˪ZZUTczR* JVڶVU%^*J[JҊUZѦЭVUV*J UjjkU+jjUUV +](RUjVJ(^TZJJOr%lU*OބJRUJUժR/AނݪJuU%UJA^{A^UI*Um/RZ/Tk*U TUjTժVUjKuTDjե W$(1)"BIRD"0u`L$L$(X)WW1:WRWR1:RR0:PC,5X,7:CO,4:INV:TX,L$(X):16368,0:R$::PC,5X,7:NO:DI,2:TX," ":DI,0`5010`PC,12,9:TX," "`(RR6)A27:40010`(WR5)(W18)A25:40010`WR2İ4000:X0:70aNN1:N3N0:Xк(4);"BSAVE ";NF$;",A768,L127"::RE:PC,9,5:TX,"BYE":I15000::(4);"RUN HELLO"_JL$L$(X)įPC,12,9:TX,"GOOD":I200205:TN,I,5::350_YI15:TN,255,10:: TONE FOR WRONG ANSWER_^400__ SCORING`L$L$(X)RR1:RRRR1:WR***Ii-UUUULdb****"2"UUUU6$****3&dUUUUbFL 8x-%5DFb%4f"""cw$dDDLU000088,555 VVVV****UUUU****ձ5555uuuu,,,,,... GGCWWUU****UUUU****GEFEEUUUUUUUU@@``.+++++*+CCcUU**UU**UM@@@*UUUUUUUU````p00****ZKiUUUU  *1u |\$"f@@L~VVVWUU$***UUU2***2UUUb***/,, @@@@@```UUu5555\TV***UUUj**8899111 5`  ڥUV%ڪJkJ%UJRT.UT*R?HHնUIڥZJ* 6Ij۪$ZTjRUInj۪Rժ*TUiAۭjm*Qe~:PQնՒVZRU~tPUkVZ5--ECJjm[+%Uժji\ՔHUjUZ2UVMUj*ˬʬ*3I-D"$UJҿI!yw ݪRQMB*T*ɿ -!پIHۖJjUQF귄FHm[RJ@R%$7麒JZ$[Dm[RU+%UHod&DVIV+%UowBۖVK)_W V*jRj* TUԠUTUZ*M_'WURժ*Uժ*σ(ګVJZJkJZ[UjIRVUmkmT*TZUj[T*TZU[*Tjk* *jJRժjZZ *390^GL$" ":ENS,L$,2,T%,AL%:AL%0ī308^HDI,0:5010_I(L$)27Ĺ769,4::(4);"BSAVE ";NF$;",A768,L127"::RE:PC,9,5:TX,"BYE":I1$ ]7D$(4)%]<W$(6),L$(6),IX$(3).]AWR0C]FR0:RR0:X0:N0O]KSY,3:j]dRW6JJ1:J4ī102]eJ1J:J(2(1)1):JJ1101]fNO:]iJ2000,2100]l5005]mK0İ4000]nSP,255] ]300]"], QUESTIONS AND ANSWERS^ \27902%\ST%3:RESET:TS,ST%1\60010R\ SUB-PRG XX/4 GRADE-2 RID \ VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982\-:]2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1    ,A1:SP$""510"OD$;"RUN ";SP$8j:D$;"RUN HELLO"@58gRE:TX,"DISK FULL":PC,1,5:MT,15:EN,N1$,10,T%:PgJ769,A1:SP$""510cgOD$;"RUN ";SP$ygj:D$;"RUN HELLO"500:II::̈(4);"RUN HELLO"ꈭ(222)9Ĺ216,0:35015RE:TX,"DISK FULL":PC,1,5:MT,15:EN,N1$,10,T%:J769fԆ:(4);"DELETE";NF$2fՆA$:A$(13)34517Lf׆:(4);"RUN HELLO":ff؆:::D$;"RUN HELLO"fˆ769,A1:770,A2:35050fLj:D$;"BSAVE ";NF$;",A768,L127":::5:8:"BYE":I1500:II::fȈf̈(4);"RUN HELLO"gꈭ(222)9Ĺ216,0:3501= LESSONXX390765(4);"RUN LESSONXX1";( JղhPU_+,[jRUZTRU%V-UTHjSNR4hUU*UUk!EMuRiեJFjUSU]*QJU[[PRKUj*TUVeRjZRU^D"IIJj֪kU$*m[*%IRNת IUjR)jju IRURUkժV$ZkRJZju IRU*R\Pj%%UmR?]PQU۶$Z)Qֶj\PmUIIUZD*}RZJjUZi*IkJJZj]mֶUj3U Z * T*ӬRU]RZmUPIU[_R"mUIIU[RIURVu]Z)Q**UmRV:UTRuªVZTRR*RUT&H~+H귄m%jUFHۄDRZRH[ IVT[@&$DUEH $mAҷJժJ [AR_jJZ ٽ!$mTU*IJTիT j-VZJ*I}^CCiV* J?BAURJC UիM*UZR ڭ-)RնV"V~yDU%Eڶ[Hv%ToUj݄TխRZ*vTJIjUh] U[jU_IVU v[UIRmJIٯ QUZ%RZUJRUVUEJmUT{DUVUTJ*!joUI%HvWUTU[UTT!zWJJRIWVU[jU_RH[]RJ7[ i *U-!շA׫*)jV*$Z՚JRjUni!JIZUk*BQnJҪVUuU )iRժ*UZVLSRM*S*JJUjeUVVeVeeUVUVJJҪ,U*ʰeUYjUTUٱ4TRZRTTR m֡/ZUV-!ZkڷTJT+U*%U]IpJj0BZU:^*EIjmmRU֪IX4uYDS U뺵JZ[Jf(UuJT֪RkJڪ*JZeiiYjZVj-jUTVZJRUVVU)JJUVTTkRZR*VjTRjJ)ZZ[JIZTkZ%b-UuU+JU[ɪ*UJVUQdJJխTJUJJMZJ[jRJժRU+Uբ*JTU+ ZURZV>**~L<UuZZRrY,>C.Z+%URUJ?C-VjVV~U.VVJJRapZVy8VMgժ*U*8 +UժR*URpX4NT*JUpVRZRaXZ*aijRj4VUڽTj)U*۪$)VTUOZubRej*USUg)U+UVJUfZݪ"TUV*^$֪*RjVETU*I)U*=["mk*IIUVUeJZRUj(VZJJZjU*VhUKU p˥TReSKU*pRTZUjUUKyUV+U-~{{_'@x_Oa cL{`x|~c{|}cy}?`pppppppy{{{{{{{@@@``@pw{}}~~~~s??1uC pxxx|cwoo^?L||||xp`9;7gO__~||}`@@?_^~{{{{{?pp~   :.:10:5:"LOADING PROGRAMS...."M (4);"BLOAD BSYM-SYMTABS"i103,1:104,92:23552,0(4);"RUN HELLOHI"( ÂււؘՀՀ՜݀𰐀ՀՀՀՀՀՀՀՀՀՆ׃ՌՀՀՇ݀烪ՃՁՁՁર؈؈ؘ1u ՀՀՀఐ܇ՀՀՀՀՀՀՀ઀ՀՀՀހՀ࠰ՀՀՀՀՀՀՀՀՀՀՀLLO" ET PETALS."PC,1,18:TX,"ADJUST THE 'COLOR' AND THE 'HUE' (OR 'TINT') CONTROLS TO GET THE ABOVE DESCRIBED RESULTS. THEN PRESS RETURN."16368,0:R$:?@ SRF MANAGEMENTB(4);"RUN SRF DELETER"'#*#j::(4);"RUN HE,1,40,20dPC,1,9:TX,"WHEN THE COLORS ARE PROPERLY ADJUSTED, THE DUCK WILL BE SLIGHTLY ORANGE."PC,1,12:TX,"THE FLAG WILL HAVE WHITE AND SLIGHTLY ORANGE STRIPES WITH A BLUE FIELD." PC,1,15:TX,"THE FLOWER WILL HAVE GREEN LEAVES AND VIOL@ SRF MANAGEMENT.B(4);"RUN SRF DELETER"4'#:*#Sj::(4);"RUN HELLO" OUTINES)n HELLOHI ONERR GOTO 600101013,76:1014,0:1015,8: SET UP JMP $800 TO BACP800 AMPERSAND CONTROL PROGRAM D$(4):D$;"BLOAD BACP800"T 2H A BLUE FIELD."ZPC,1,15:TX,"THE FLOWER WILL HAVE GREEN LEAVES AND VIOLET PETALS."PC,1,18:TX,"ADJUST THE 'COLOR' AND THE 'HUE' (OR 'TINT') CONTROLS TO GET THE ABOVE DESCRIBED RESULTS. THEN PRESS RETURN."16368,0:R$:?LAG,A6144":DP,6144,15,1E lD$;"BLOAD I.FLOWER,A6144":DP,6144,28,1W DE,1,1,40,20 PC,1,9:TX,"WHEN THE COLORS ARE PROPERLY ADJUSTED, THE DUCK WILL BE SLIGHTLY ORANGE."PC,1,12:TX,"THE FLAG WILL HAVE WHITE AND SLIGHTLY ORANGE STRIPES WIT"R"İ5000 :  ( MENU. <O  MSG TO INSERT STUDENT DISK_ :RE:SY,3z :(4);"RUN HELLOHI1"  X COLOR CALIB. ZRE:SY,3:PC,5,10:TX,"WORKING..." ]RE bD$;"BLOAD I.DUCK,A6144":DP,6144,1,1 gD$;"BLOAD I.F002 c60 d,  DISPLAY TITLE SCREENM :(4);"BLOAD TITLE,A$2000" 21:4:"AMERICAN EDUCATIONAL COMPUTER, INC." 4:"COPYRIGHT 1983 PALO ALTO, CALIF." 16368,0 "PRESS 'H' FOR HELP OR 'R' TO RUN LESSONS";:1 R$ R$5:TX,"1. COLOR CALIBRATION"K DPC,4,7:TX,"2. STUDENT RECORD MANAGEMENT"t FPC,4,9:TX,"3. RUN STUDENT LESSONS" HPC,4,11:TX,"MAKE SELECTION & PRESS RETURN." LA$"1 ":PC,4,13:ENS,A$,2,TS%,AL%:AL%176 NA(A$):(A1)60 ZA7002,8002,5921,165:2922,152: JSR $98A5 OR 39077 TO TALK (INSTEAD OF $9200 FOR OLD USER.BIN) (768,0: CLEAR BOOTUP ENTRY FLAG FOR LESSONXX -:RE: 22000: TITLE <RE::SY,3 >CO,1:FI:INV:DE,2,2,38,15:FI:NO:DE,1,1,40,20 @CO,2 BPC,4,U`(4);"MAXFILES 1":39076: 39076=$98A4 JUST BELOW USER.BINL$200 (SUPERTALKER IO ROUTINES)n HELLOHI ONERR GOTO 600101013,76:1014,0:1015,8: SET UP JMP $800 TO BACP800 AMPERSAND CONTROL PROGRAM D$(4):D$;"BLOAD BACP800"T 2     ծպժժժx?~OOx?~ժժժՂߪժժժժժժժՂU*U*U*U*U*}ժssgsgpp~`~fx?~sgfߪժՂծժպժߪժՂ숈Č࠷ఀǀ㼀఼𘈌1uk 𐘘ހ耀ЀĔ Ȫ󄫠 #eȩeѩLl` - H Lӆ ԆLsůtRLgӆhԆsՆtֆstsưƯsgůhgӆhԆsՆtֆstsưƯsgůhhijg` Lӆ Lڂiiij8stijRLgh #Lѥȥ ݠ8埅ȱ堅壅夅 ȪeȩeˠgLgh8E."bb16368,0:R$:0bl(4);"RUN HELLOHI "6bveȪi LT >ȥ Ȫ͆0 ҅ >&eee膝JJJJ)ŝƝ 0ȵƞढ़0 ,LPNL360: INVALID CHOICE WaSPNN(SP): PICK UP ACTUAL S/P # BASED ON MENU CHOICE}a&769,SP: POKE SUB-PROGRAM NUMBERa0(4);"RUN LESSONXX"a:aD:RE:SY,3aNPC,10,10:TX,"INSERT THE NEXT DISK."bXPC,8,12:TX,"PRESS RETURN TO CONTINUT WHERE YOU LEFT OFF."(`PC,1,LSNL81`FL4?`L$" "S`EN,L$,FL,T%,A%e`(L$)27580`A%0560: IF ONLY CR THEN GOTO LESSONXX FOR SRF`SP(L$): SP=SUB-PROGRAM NUMBER`SP1360: INVALID CHOICE`SPNL1580: STOPaS,1,1,40,20$_rPC,3,LS2:TX,LN$(0)0_|I1NLN_PC,3,(LSI3):TX,LN$(I)T_h_PC,3,(LSNL4)x_ST$(NL1)_TX,ST$:TX,". --- STOP ---"_PC,1,(LSNL6):TX,"PLEASE TYPE A LESSON NUMBER, OR"`PC,1,(LSNL7):TX,"HIT RETURN TO STAR AND DIFFERENCES"3^LN$(2)"2. CAUSE AND EFFECT"P^LN$(3)"3. CLASSIFYING"k^J ********************^T THIS CODE DISPLAYS MENU^^:^hRE:SY,3^iCO,4^jDE,1,LS1,39,LSNL5:FI^kDE,2,LS2,38,LSNL4:INV:FI:NO^lCO,2 _mDENN(NL): HOLDS INDEXES TO GET FROM MENU LINE NUMBERS TO S/P'S|] LS= NUMBER OF LINES TO SPACE DOWN TO CENTER THE MENU]LS(22NL8)2]NN(1)1]NN(2)3]NN(3)5]LN$(0)"COMPREHENSION SKILLS - BEGINNING "^LN$(1)"1. SIMILARITIES^ \39076 \d HELLO PROGRAM`\i PACKAGE 4 / DISK 1 / SIDE 2 - COMPREHENSION SKILLS j\n120|\x768,0:769,0\ ********************\NSP6: NSP=#OF SUBPROGRAMS\NL3: NL=# OF LINES IN THE MENU\LN$(NL): HOLDS MENU TEXTA]      ]dRKRmB/tZE/B/Bt /B7rC;CWԪtWB/EnOR+R+7CB/RUi+Z& i+VB/U' vz[^I[Q[R+B]%Vl$iKRUUJ[TmꕴJZQDUiYjjUJRURZmj!TUkkUI)ImU[V7ߵZUBնj$JQWZ%UJu[kUIJjUTkkTZժj)IJjUJII֪JIZ[URJZVRRUjZTZURj JR*jJTjjjJmjVhJjUբ-z.TE]vآGV-Ԣ__RU^E[xElj /RUE[tыMRZ(JTC_"UjUZR*U*mVJ)JUjTJժZRUTVVUjRUVRTUZ JUZ*j{UV$RUmU$ZVjTUIDjZ$IjkmUTJRjUjVUZkVRR*Tj)RV*UUjjTZmk)UQUZk*Ij{o*ֶ[TZV)jUZ*URjTUZURUR*ժZRjjUZժZ)V*)jmUZUmJVV ZZZVU*RTU*[TUV*jVjZUR**&$m[w+-$տ&) IRw$$IjZJHR/w[IIe]% $Im_iT IzPԭw+% )n[UR*I $Zm%HJ$ݷmHnW$DmI$Im$$}DTj" oۖDVI$Dj޶J!Z[*"TRUv[$Tm*%ImUR)۪*iATIժժժժժժժ?xxsgxx`sg`sgxxxsgߪժՂjU@||ժժժժժssgsgO~OsgOs`c?~sgs`ߪժՂ*]*Dժժժժժժժժժx~sgOg?~3ds`{ժժժժժժժߪժՂժժժժժժժժժժժժժժժժժժՂߪիվկվվժתժժժժժժժկժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂߪժժկ׺ծկ{ծպժժժp?~OOp?~ժժժՂժߪժժժժժժժժժժժժժժժժժժՂժssgsgxx~`~3dp?~sg3dߪժՂծպժժժժժժՂ‚߂ꨠ訠ߗఘ€࠰ȀĀ1u ߀ޟח   תվc]p~sgOg?~fsgcqw]cC]ccqccq]Ac]Accwg]AcqsժժժժժժժժժժժժժժժժժժժժժժժժՂUתիվտվժתժժժժժժժծժժպժժժժժժժՂժժժժժժժժժժժժժժժժժժՂߪժժծկժժժժժժժժժժժժժՂ]]A]cg]]Aacg]ccc]]Agc]qccA]wc]gs 8@UUu@@@@@@@`oo???98:{{s<~zrBACG_~|oO'wr  (4);"RUN ";SP$Ln8ǹ769,A1:770,A2::(4);"BSAVE ";NF$;",A768,L127":hnj:(4)$;"RUN HELLOHI1"nmLY^^ȱ^ȱ^eȱ^e(ӊ0Цe^^ӜURN TO START":PC,11,15:TX,"THE LESSON AGAIN."RVǹ16368,0:A$:A$(13)51030mj:(4);"RUN HELLOHI1"(4);"RUN ";SP$o8ǹ769,A1:770,A2::(4);"BSAVE ";NF$;",A768,L127":oj:(4)$;"RUN HELLOHI1"*+8@UUu*+YE":I1500:II::-̈(4);"RUN HELLOHI1"Jꈭ(222)9Ĺ216,0:35015RE:TX,"DISK FULL":PC,1,5:MT,15:EN,N1$,10,T%:J769,A1:SP$""510O(4);"RUN ";SP$8ǹ769,A1:770,A2::(4);"BSAVE ";NF$;",A768,L127"/LǯPC,9,13:TX,"PRESS RETINSERT THE NEXT DISK.":PC,1,11:TX,"PRESS RETURN TO CONTINUE."XA$:A$(13)34050dΆ34520ӆ:(4);"DELETE ";NF$:(4);"RUN HELLOHI1"؆::(4);"RUN HELLOHI1"ˆ769,A1:770,A2:35050Lj:(4);"BSAVE ";NF$;",A768,L127":::5:8:"BOGRAM XX/8 / COMPLETED SUBPROGRAM XX/95J UT COMPLETED SUBPROGRAM XX/10[ { COMPLETED SUBPROGRAM XX/11  COMPLETED SUBPROGRAM XX/12v \32010dDP,6144,14,10 }}}34510ڄ ?RE:SY,3:PC,3,9:TX,"4);"BLOAD I.GRASSHOPPER,A6144":CO,2:SP,250W I13:DP,6144,14,10:SN1įTN,100,80a 2495 DP,6144,14,5:SN1įTN,50,80: 2495: DP,6144,14,10 RE I12000:II: ( COMPLETED SUBPROGRAM XX/7  COMPLETED SUBPR2000:I:RE:CO,1:PC,2,4:TX,"HOORAY FOR YOU!"Z SN1āI20021:TN,I,3:o SN1āI1200: SN1āI12000:IV ` RE:CO,0:PC,5,4:TX,"THAT'S SUPER!"e I12000:  SY,1:DE,7,3,15,10:INV:FI:NO:, RE:(SN1āI120:TN,(1002I),50:TN,(1302I),50:E>I11000:II:\?SN0āI12000:IbRE:CO,4:PC,2,5:TX,"VERY GOOD ":PC,2,7:TX,N1$:TX,"!":CO,2SN1āI120:TN,(1002I),50:TN,(1302I),50:I11000:II:SN0āI100,2200,2300,2400,2500,2600,2700,2800,2900,3000,3100,3200,3300,3400,3500,3600,3700,3800,3900,4000,4100,4200,4300,4400,4500,4600,4700 510 RE:CO,0:PC,5,4:TX,"FINE,":PC,5,6:TX,N1$:TX,"!" I12000:I * 4RE:PC,5,5:TX,"GREAT!"19:TS,ST% A1NS34010*  MODULE #N0 V SP$"SUBPROGRAM XX/"(A1):40010 SP$"":RE:SY,3:PC,13,5:TX,"STOP AND REST.":PC,8,7:TX,"GET HELP IF YOU NEED IT.":PC,12,9:TX,"THEN COME BACK.":51000     vA12000,21L1:771I,((N1$,I,1))::515W hSN(785):(4);"BLOAD ";NF$:A1(769):785,SN:515 A1(769):A2(770):L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$ A232010,33010,34010,35010,1710,1810,1910,1910 35010 A1A11 RE(27):330' LSN$"Y"SN$"N"ī331B M785,0:SN$"Y"Ĺ785,1d NN1$(N1$,NL%):NF$"SRF-"N1$n O345 P(769)0350 T(4);"UNLOCK ";NF$:216,0 V360 Y216,0 Z(769)0Ĺ769,1 \(222)6340 ^L1(N1$):A1(769):771,L1:I11$"ABIGAIL "M HSY,3:PC,1,14:TX,"THEN PRESS RETURN TO CONTINUE.":SY,1~ IPC,5,5:EN,N1$,10,T%,AL%:NL%AL%:AL%1329 J(N1$)27:(4);"RUN HELLOHI1" KSY,3:PC,1,17:TX,"SOUND ON? (Y,N) ":SN$"N":PC,17,17:EN,SN$,1,T%,AL%:(SN$)27N1$  60010)nST%3:SUPERTALKER SLOT2sNS6MuSN(785): SOUND FLAGcx::RE:TS,ST%:} ** DIM'S, DATA, INIT., BLOADS **6(768)99410E768,99:PC,1,1:CL,30:SP,220:TX,"PLEASE ENTER":PC,1,3:TX,"YOUR NAME.":CL,0:SP,255 FN      jڶUU*U*jUHjSݯJ@ڪm+ZKvR* i+J@jڶVUkkU۪TUITKRUmjUERZU)IRJvUDVHJڪJJ*ڪ+UmUZRjjUJ?~AjUI*ժR$vo*ZTUJDT֪*VZUzRUjI+UJmR*JjU^U*URڶ$TUmU*%_**nVUIRj*CTjoJDPUmU*JU[ *RJUժR?vwRUuoTkJ_$mI[%Zv U*"U*VUHj/;jZVVB/B/tZZVj}-iKn芮zIR'|IR*J-Ւ+^>vauIuZjM_h+J*nRRR]%vI]bJRJzIW]QWJJ/D7KtZ*uE[DZVj.zԊRmR'-JUT+ ]JJRZ]jjNRTJ҅NUE OR AN"BuPC,1,12:TX,"'E' FOLLOWED BY A CARRIAGE RETURN TO"gvPC,1,13:TX,"EXIT THE PROGRAM."wN$" ":L1:EN,N$,L,T%,NC%xN$"E"124yzI11000:{|:RE:(4);"RUN HELLO","UNDEFINED ERROR =":Y$(Y):PC,18,7:TX,Y$cpX(218)(219)256:X$(X):TX," ON LINE ":TX,X$qTX,"DISK IS WRITE PROTECTED!"rPC,1,8:TX,"CHECK DISK - REMOVE WRITE PROTECTOR."s116:::: tPC,1,11:TX,"TYPE A CARRIAGE RETURN TO CONTIb57c:dI1NF2e"DELETING ";FL$(I)KfD$;"UNLOCK ";FL$(I)dgD$;"DELETE ";FL$(I){h"FILE DELETED!":iIj122:::20k:::Y(222):PC,1,7lY8110mTX,"I/O ERROR - CHECK DISK!":116::::nY4113,oTXND088V::W59/XNDSNNDFI907Y86TZ21:"DELETING ";FL$(ND)n[D$;"UNLOCK ";FL$(ND)\D$;"DELETE ";FL$(ND)]23:"FILE DELETED!"^122_NF1ĉ:::22`NDNFNFNF1:57aINDNF1:FL$(I)FL$(I1)::NFNF1N$,L,T%,NC%H122I::3J(N$,1)"-"79KKSNSN15:SN1SN1eLFISN14:FI15FI15vMNF15FINF~N59ONC%083PSNSN15:SNNF57QFIFI15:FINFFINFR59S(N$,1)"E"NC%1124TN$"ALL"99UND(N$): BI6 C21:"TYPE THE NUMBER OF THE FILE THAT YOU"h D22:"WISH TO DELETE, OR 'ALL' TO DELETE ALL" E23:"SRF'S ON DISK, OR 'E' TO EXIT PROGRAM. (HIT RETURN TO SEE MORE SRF'S.)";: FPC,3,18:TX,"PLEASE MAKE A SELECTION. " GN$"E ":L3:EN,057 5::8 6PC,8,8:TX,"NO SRF'S FOUND ON DISK!"A 7122I 822X 9SN1:FI15i :FINFFINFr ;II2 <PC,3,1:TX,"STUDENT RECORD FILES" =ISNFI >I$(I):IIII1 ?PC,3,II:TX,"(":TX,I$:TX,")" @I10įTX," " ATX,FL$(I)HING": 'DS0145 (KBA(DS256):LK13:MK256C )ILM35V *(I2)25549t +TY(I):TY132TY449 ,NFNF1 -K130:(PK),(IK)128: .FL$(NF)B$"" /(FL$(NF),4)A$49 0FL$(NF)"":NFNF1 1I 2DS 3 4NFE' THEN PRESS RETURN. "@ PC,8,14:N$" ":L1:EN,N$,L,T%,NC%W N$"E"124: EXITh :NC%020 21::"RETRIEVING FILES" I030:IO:768I,IO: !780,DN "SE1511 #783,SE:768:SASA1 $787,32SA %SE &:21:"SEARC7,0,27,3,0,32,0,0,1,0,0,96,1,0,1,239,216@ ::RE:SY,3:CO,2l PC,8,7:TX,"STUDENT RECORD FILE (SRF)" PC,12,8:TX,"DELETION PROGRAM"  NF0:SA0 PC,5,12:TX,"PRESS RETURN TO DELETE FILES." PC,1,18:TX,"TO EXIT PROGRAM: PRESS '  27902 107R B$"SRF-3 ": MUST BE 30 BLANKS` FL$(105)~BA8192:D$(4):A$"SRF-"DN(43624)(43625)256AD(105)(106)256P(AD3)(AD4)2561(  169,3,160,10,32,217,3,96,0,0,1,96,1,0,1          08967 @!@"@ #@%$@ @@@@@/A@0A @.A` ͯ@@L@@N@@@N@@ @N @ @!@N!@!@"@N"@"@#@N#@#@Lʊ @@@L@@@@@@@ @ @ @!@!@!@"@"@"@#@#@#@`  0`@H@ڍ@I@@@@@67 L/989L ߦ0Lޠ"ȭ# // / (,  ߦ0Lޠȭ/  `  @ !@ "@ #@` @)` @!`hhL @` L0LEʊ @    ȭ  !#",`$@5  @<8WLi  Li % L  L    +  $@  @`  @$@ g^2B  [ .L  @$@^ L&7 --)**'++(L@.++-L.,,LN)&)L ߦ0Lޠȭ,  ` ߦ0Lޠȱȱ CL L0 NL  @$@ L&^LL -+. 0: .LL|867` Lގ` Lގ` Lގ@` ᥠ$%` "*' "Lޥ "'Lg L ߦ0Lޠ'ȱȱ ߦ0Lޠ(ȱȱ 15)&)+-,(8+'^*+.*+*@` L 22%);M3Ȍ24ȱ5 3JJLs34NjNjJJLs54**)?Ls5)?m [ ` ߦ0Lޠȭ899L^677` g 률QP ְL|889` g 률QP  + ` PEL  N= 1 @$@ ^L5  !@@ @@L I@L N@L C ʎ@L S L K L hhL` `@ @@#@@!@@` jjj   `i`@ @!@ݩ ` g 륡Lv݈ 2    @@ !@@ m @ "@ m!@ #@ !@@ @@ ߦ0Lޠȱȱ ߦ0Lޠ1ȱȱL~ \ L ]  L  L L $@ @  0EL8eL&  ʬ0x x  ` g 륡Lvݩ   @@ !@@m @ "@m!@ #@ @@ @i@@@ @@$@ @  + L ` "LP ߦ0Lޠȱȱ`"# " L 0L ` ,0 @#)@  0 @ @L L` ʎ@`@`@` ` @` ` Lލ0` g!!E"!#"$" %#`` $@ @"@#@%@]@@ @r@@@!@d@L @@V @@@@H!@@L @@!@4@@@ @&@L @@!@@@@ @@`I` `  Q  LISH;QTX TNPC DIDEANFITA FT DPt ESBATS REENqIN NO SP TU CO CL SYOV-MT;MAI FLȭ c0Lȱȱ  , L l     @@00  || || || ||pp  pp||  |||| || |||| || pp  LL pp || pp ppxx````````ppx| ``````@`p@@@@@@@@ppx| 888>`x<|x??||@@ pp@@00 |||| || pp@@00 || pp||@@000000pp pp pp00@@@@00@@@@||@@@@``@||@@`0 @`0 pp LLl|<""""""""""""">>><"""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>>* (*""  *$66>>> "2*&" " >>  ">> "8""> """"""<  "G G G Gm G` @`ԠéACtCLB!@@ @@ @@"@0@#@0L9F@LF@ @LF`+@2'@iFlF(@jFmF FmiFjFmFiFlF G RDRDLF'@FF(@FF FmFFFFF GI-NDNDLF+@%@F&@F FmFFF G-P+@`*@ 0 iH8h)@ G0 iH8 Gh E*@ :FEELD`EEEEEEEE0@EEEE0$E)@E*@ FE)@E*@ :FEL4EEEEL$E`EEEEJJJEEEE0SEEEE0$E)@E*@ FE)@E*@ :FELE*@ :FE*@ :FEEELE`@ A?Bt:BLAD DDhL Dh@ Di D ` !"# (!("(#( P!P !"# !"# !00xx@@00xxH@hIH@*0h H@EDLDEDh)LDh)LDh`EEEEJJJEEEE0REEEE0$E)@E*@ FE)@E*@ :FELD*@ :FDRCCDSCCF2CgCCCD3ChCCCEDFD fDH@RCKCSCLChLQCh(@SCiSCEDFD fDH@CCCChLCh(@CiCʬ@ 2DC D1DC DEDFD fDH@CCCChLCh@CiCEDFD fDH@ DDLB ELB pE@ʬ@,@DlBDmBL9B2DlB1DmBFLBDMB)EDFD fDH@lBeBmBfBhLkBh(@mBimB`$@8 @C@0 i CLBC@JEEC%@C&@F'@CD(@CFDFD DLB ELB pE@ʊ @ AQA@ʊ AlAmAA0ʠ AA AA \,)$@ AA`AlAmAA0ʩ AΔA`"@L}B$@8 @?B@0 i?BLA:B@JEE:B%@?B&@F'@:BD(@?BFDFD @LELFL9@LALFL:FLGHI XPFD@L@@,@DmADlALh@2DmA1DlAmA@@@@lA@@i@@@ʽ"nA>oA @ @ \,)$@ @`lA"mA> AΔA`@ DAJADAKA2DAPA1Di          VRjoJz*RmRt+UݪتTUuŖVE-VuJ]TRUq-VRRUmҺ" UW+%**U*Ekw"ZUTU[*jR]RBZkkmwTU%"Djmm%IU%mjoժRTIImRRIZURUJRTխU"PER*۵VIVTZJP$ujJ*U*Qۮ$ &P%"nV"JU"T*mT*W $ ڪJTmUkm%VjRUZJUV*VJVJTZkRTUժVURZUURR$Z*j%jZR֪R*MZUR*URV*J*j*jZVUJD*wU%RjkJIwIUݽ*$jkUR*$HZvUHRUZk*VU߫"Q֪n-HRUZJT*J!jUVIHRmJJժJRIDժRݿ[BDw$UUTUIPwKT%jڪ6$%Q!ժZ%TjHڪ@IIMw[@$U$I꿫*RUݛPUJڪJdH"RWUV$[ARHV!UT HRJ@V"m[@H[HRV+AԮj%n %"IRԶRJU I*eTUvJUk[)RUjJJV*RV.VҪjVZ:ڢYZUժ.jM%Or46>J-TՅU-"TJ{VQY.JUpڊ*UJժjE$VUժJժRժTUj*D%uB?+ "Ԗ jWz*i+u%RURuUT$-խ$T*K JDj[%I"Jj֪*V@R _ޢ*T!zKIU" U*TTZU+TU%ZZժTK+-mDEUURjTUhiTKRi u%r+tU"wъKjjEjUU*JjRVҫRUMTV-*T[;KԢKE*&+kU\P)Ֆj)-MU*Tjdh.USZuE mhWU*J׋jlUժJWRiKU*ڕU[J5`UkcFAGIT1uyi @Nxsn.NP,@+D)%37:0@/ y:\4i#3@`px8p`@@@p88p`````````ppxx@`p`?|~````````pp`|~p@?````````|`x@?@````pp1u`````~?@`|x`````````@x~p|?    UDRjkuKVRjUnUHIժmժ*)JmUZVT*VTRJVZjZU)%)IRUmmkTT%jJU*RUZRTjR*TUjUZZTJJZ*URUV * VU*U)R*kmU*TݵRRVVVJJZZRZIT-$Iպo$w]" IUݶH$U׺)_[D $Կޮ$A~o*BV$A"Wﻭ$D]}WI)I D{}HDjmVRB*IHTUJ Im* ڻۭR"$jvUJ"IoJ@RmmTDD$Um[R)!)U[j[ ZwV!!R۪H )UmV+TKU\KUz%RUmԪKRVUTZUVjJUVPI%jR ڿ@ P/6jUmQ hKZVUK%UA_CȖtԪ*UTUmUJ*-mEޭ[U)"TU T $M_V( Jv$ޕ$""ݭ$VR%DmE@IUݶ%I Jn+j-ԭBVZUjlIĶT+U*%RےEjRlҪ-]EUr+UCvj+ڢT)jVUJjU5*/.ٓ*UBU*Zk5UjRJ[*x*ZU4E 5RUVUiK*tUvZJU*[XUB+-*]UҪVrBVJJTUZZTVU)=UhY\h;Uz6VUKUt.թJV)U*U*URZ[jUjm%)Z%TUkR*UJ$)IݶmU)UT%UjVU%$IjZkJJU*JֶmT%jUJUkjT*UZJ *ժV Tj *Z*jjZj-JRժj%RR+UuUkJjV"ծTZJ*RTURTJZRJTU*MJUV[ UVTJV[k*ժZURSRVVZZ!IڒZimJUTRJwUZUI"mkJUTTUJI]VJVD-V$RZնZQ)}[J$TUVJJVj%HZU"TU*ITTmUIRjmURj{oTRRUJW*II*Ujk֪JT} RU֪JDHUkV$V%IJj[%JZU[W"VI)jmnJDJV*ITjj[RVV+ҖVURU6VUTVVZT[**ZUSժRTJjTZ***ZVJVV ZT_HUU۪m%J"QV HJJD$QjWUIJT"[JUn%$VU%j[[[UT-@ҿjﮤBToZHJ*jUJR/[ZHR*ݶm+I%UնjURjUHUu*$Ijm]JDRZ۶JTjZUD$ RUn۪$mkU$VmwZDRmUjnUR$TުZHTޭmV*Q[UI*DjV%7*J[U+*ս[궪Jݮ*U߭$U$$oUIo%D $Zo۶*IjUDRU+. HWnJ~[TmZ$%_KqIn%DR-%I$j1utP78@) n !C( Jn;8 @@(@4 /J%-s=/;L- @'@7Ce J֪ZTZR*Q$uֺRUTUZVUJJUZZR VTU]RZT R_*)ZJ_J*)JkZVR*jjJ몭RJ*jUVVZ ZժJV-*j՚VZ%*****zUUUU}**zUU*j?++.8p`ummgca``********UUUUUUUU********555uUUUU````````********UUUUUUUU********UUUUUUUU ````````********UUUUUUUU********UUUUUUUU :***````````*cEDDIEj k/hS- *R KR**JjiժRUժVUZ*QZVUTT[UTETUQ[WݪVURZ?ŮJP "UIVUmIKTTI蕪h*QKV{]*UHj?K%QVjj-*Umժ}V$dmVVU[R%**U[ ]BUtEVU]IKTUR-U]?UAZ[V&mYj*-ZQKRZUTkU*B]^.m%ҋzW**Kiѫ-uSꪕZRtE*l J*KUSUOJJT* k]*JZթ-J6ZTUWUJVTUԵIEZV%J*խU[VU-JV*URVU)ZZZRRjR]Q[ժKUB+jZRITjmUԪZVUJUJTVJV*jVUJZJVV[VRRR j ZE]R*Z%ժT)vnJES4vE7i-BZRUԢUWU*Jj5ZUJRvKJUUk -TUmZVjvUFT*Vi ZUJJmZPjUԪZ+TVWiJRlj*+YUQUTUi*UTT+EZWRՒ+TJEU*۪*U*ZU@PRRT*"mVVJvZ*UjU.QW+u&ZVjjUj%UZjZUTKJ$UٕZ+RTZzjJVjJRRmDTEZ՛TRI*.tԤWTTu,j.JhUZ*ݪmiU*ԒVUZժԤVZjEWeUmi.ZUZ&[URmliUêjZ?AVURUeUheUZT-RVUU-VTK.USS-nMhE.mZEUťTU5uKUJVhZ٪JM^RWZURKzUYY*JUDEH/UujT{K$mUiRJT-! 񿤪䶖ڋꭒJZUժTTj+")D+V[e+ZiR JU[E@WTZRTJVUVIڪ%jjjUjUVUTj%RU%mUV$UUIJjUTURջDMZ[VkՖZRM% K/AUAUm[v%RT[IjJ%$ݤJoUTKԭRjj+IR+$@+[U j[Rm+QڒTUZ[@ԗ.Uj-ZRZUJR$@/WjZ!jTRjU*JUJ /-DڪZTURD +tEZB-IUEHuU@JݷVRH*RU۪ZJ*TiUJRVVJVTҶVUJB@U*VU%*kUJ)*ZZ*R[UT*J$K)K_!uWmJjVI*ժRUZEWR-uW]JjV*VRUB +*A{UURUjVK VmWQZ%ZZjjR/VjZ*7хتjJ-jUJjUڪZ%UZZUV*JjRTUV TUjT*ժZRJjVUjnZjUV* _U*I%UI[U[TJ TZUH*JRڪZkR UjJR)UJI֪Rd?T Dn{KTIRn[UHm۪*TVնJRU/HZUmwRAժn$ZkmU%RjVU)TZWZPUvժ$RV[UTJUm֪R*ZTjJJ $UmݶHVZJJVURjUZZUJRjժ*TZ1ui:5 ( / / % !À@YJ%xt /;y@\t)a;8 yK(@4 K҉@K;L4P4 2/\@ 0`@00((,uWUUUUU+*jjjj:~}wWuuuuU.:jjjj**uuUUUWW_*k|WXx69((80`@UUUU55++/-=55%_s`PV0 @@ eEA 00 (lWwu_]WU  EUl8<.*u1uC 8@`@`@pPll.+**** ]u8>+++++* u `` PPpag}UU*****+*.uuuuuuuU**jj::.._WWUUUUUzj::*: 08((((8UUUUUUUU~j**jz>/UW_uuu}/{?+/{n.UUUUW_}:jjjjjj  W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'Ru`".Q`pNФbptťܥm2<(-Py0\|66e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuJ770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"Zj:D$;"RUN HELLOHI1" EE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982% INITIALIZATION(ST%3:RE:: 2L1(771):N1$"":I1L1:N1$N1$(5 K1$# DISPLAY SCORESY,3:CO,2:DE,1,1,40,20:PC,1,19:RR$(RR%):TX,"GOAL = ":TX,RR$:TX," RIGHT IN A ROW.":PC,28,19:TX,"YOU HAVE"SY,1:PC,19,10:DI,4:SN1įCL,40RR$(RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,0APAUSE SUBS  4 INSTRUCTIONS AND BLOADSZ(4);"BLOAD BTCCE-1-L3-5A,A6150"(4);"BLOAD BTCCE-2-L3-5A,A6450"10022:"READ THE PARAGRAPH. THEN TYPE THE":"NUMBER OF THE CORRECT ANSWER.""HIT RETURN TO GO ON.":1:251:RR0 @5010* JRRRR%A27:40010K T(WR5)(W18)A25:40010c c END QUESTION LOOPm e3010s h m END SCREEN LOOP r120  DATA FOR QUESTIONS L$(1)"2":P6150:PX33:PY11 B VL$(1)"1":P6450:PX27:PY13   SN1āI11000:I: PAUSE IF NO TIME USED FOR SOUND@ 300^ "SN1āI15:TN,255,10: $SY,3:PC,1,18:TX,"THE CORRECT ANSWER IS ":TX,L$(X) %16368,0:R$: &3010 , SCORING 1L$L$(X)RR1:RRRR1:WR0 6L$L$(X)WW1:WRWRNSWER ENTRY7 SY,3:PC,PX,PY:L$" ":ENS,L$,1,T%,AL% (L$)27Ĺ769,SP::D$;"BSAVE ";NF$;",A768,L127":::"BYE":D$;"RUN HELLOHI1" L$L$(X)ī290 L$L$(X)įSY,1:PC,14,9:TX," ":PC,14,9:TX,"GOOD" SN1āI200205:TN,I,5:7 140 J1J:JNSRN17 SET UP QUESTIONS R J1010,1110,1210,1310} SET UP SCREEN AND SCREEN PARTICULARS FTXN,P,1,1,N1$,PR$,R% 5010 BEGIN QUESTION LOOP X1NQ DISPLAY QUESTIONS AND SPEECH FOR QUESTION A(I771))::NF$"SRF-"N1$' 3SN(785); <L$(10),IX$(10)u FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE." PNS2:SP4:NQ1:RR%2 _4010 d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xSY,3: RN0JJ1:150 J(NS(1)1):JJ1\  2790260010K SUB-PRG XX/6 GRADE-3C CAUSE AND EFFECT# VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982% INITIALIZATION(ST%3:RE:: 2L1(771):N1$"":I1L1:N1$N1$(  | ]w ֚ꪪ@p<몪@تժժꅅ``pתꪺp`߫뫪1uC ꪪ뇇`뚚  \5\768,0\ :=\:10:12:"STUDENT LESSON."n\::"PRESS THE RETURN KEY TO CONTINUE. ";R$t\\((4);"RUN LESSONXX"\2 N1u% /)d,M, a͟+ !@;k (008.J)p;p[P0\ J%z/P"( @-+s҉@n d\s+;( ,)w;)c\NY%Y@;H% 5l ( ,@;L) Id )e u,19:TX,"YOU HAVE"9SY,1:PC,19,10:DI,4:SN1įCL,40oRR$(RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,0uJ770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"j:D$;"RUN HELLOHI1" : 2L1(771):N1$"":I1L1:N1$N1$-"IN THE SAME GROUP. PRESS D TO SHOW ONE"["THING THAT IS DIFFERENT. HIT RETURN TO"o"GO ON.";:1:x255K1$ DISPLAY SCORESY,3:CO,2:DE,1,1,40,20:PC,1,19:RR$(RR%):TX,"GOAL = ":TX,RR$:TX," RIGHT IN A ROW.":PC,28AR")(I1)J%43(IX$(3)"I.CHERRY")(I3)J%2DJ2J%J%1g(IX$(2)"I.CAKE")(I2)I%13{DP,27904,I%,J%  PAUSE SUBS   INSTRUCTIONS AND BLOADS:10021:"PRESS S TO SHOW TWO THINGS THAT BELONG"I3I%25:J%39(IX$(1)"I.ROSE")(I1)I%2:J%4b(IX$(2)"I.SSIGN")(I2)I%13:J%4(IX$(2)"I.BOOK")(I2)I%13(IX$(3)"I.FLOWER")(I3)I%26(IX$(1)"I.APPLE")(I1)I%2(IX$(1)"I.RUG")(I1)J%2(IX$(1)"I.C"D":L$(2)"S":L$(3)"S""(2010(n\IX$(1)"I.CAR":IX$(2)"I.BOOK":IX$(3)"I.PLANE"~L$(1)"S":L$(2)"D":L$(3)"S"2010 DISPLAY IMAGESI1NQD$;"BLOAD ";IX$(I);",A27904"I1I%1:J%3I2I%14:J%3GHT":IX$(2)"I.SSIGN":IX$(3)"I.MOUSE"H[L$(1)"S":L$(2)"S":L$(3)"D"R`2010XIX$(1)"I.ROSE":IX$(2)"I.CAKE":IX$(3)"I.FLOWER"L$(1)"S":L$(2)"D":L$(3)"S"2010 IX$(1)"I.RUG":IX$(2)"I.CENT":IX$(3)"I.QUARTER"#L$(1)10# T(WR5)(W18)A25:40010) ^A c END QUESTION LOOPK e3010a m END SCREEN LOOPj r120  DATA FOR QUESTIONS IX$(1)"I.APPLE":IX$(2)"I.CHEESE":IX$(3)"I.CHERRY" L$(1)"S":L$(2)"D":L$(3)"S" 2010 B&VIX$(1)"I.TLI,I,5: SN1āI11000:I' 300E "SN1āI15:TN,255,10:u #INV:CO,4:I13:PC,5I,7:TX,L$(I)::NO $3010 &16368,0:R$:1: , SCORING 1WF0RR1:RRRR1:WR0 6WF0WW1:WRWR1:RR0 @5010 JRRRR%A27:4005X,6 ANSWER ENTRY4 L$" ":ENS,L$,1,T%,AL% (L$)27Ĺ769,SP::D$;"BSAVE ";NF$;",A768,L127":::"BYE":D$;"RUN HELLOHI1" L$L$(X)WF1  WF0ī290 WF0įPC,12,8:TX," ":PC,12,8:TX,"GOOD" SN1āI200205:TNJ1J:JNSRN1; SET UP SCREEN AND SCREEN PARTICULARSJ K0İ4010d SET UP QUESTIONS J1010,1110,1210,1310,1410 5010 BEGIN QUESTION LOOP L$(4)"X":WF0 X1NQ DISPLAY QUESTIONS AND SPEECH FOR QUESTION PC,((I771))::NF$"SRF-"N1$) 3SN(785)= <L$(10),IX$(10)w FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE." PNS5:NQ3:SP1:RR%5 d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xSY,3: RN0JJ1:150 J(NS(1)1):JJ1140  2790260010M SUB-PRG XX/8 GRADE-1C SIMILARITIES/DIFFERENCES# VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982% INITIALIZATION(ST%3:RE:: 2L1(771):N1$"":I1L1:N1$N1$     DD!!!!!!!!HHHHHHHH (((((,$$!!!!!!!!HXXXPPXH3"4RAAq~c !ax,HHY?|sg=~p*1u@pX;!@`?)nHHHHHHHHcF 0 0FFd4NNKIIh,$HHHHHHHH`@` 0XH7$$$4@NJJJ~LDF$$$B@@@`````  BBBBb##!$,(hHHHH   pPPPPPPxD~|~~~~~??~|xpx???xxxxppppp@1u!ː7 /J%l@/ (Hg( &ʙn0#YrCJ%z/P;8#r8( -](0$˓r: td83P;;K [b 4P&,n  3Yc;8r ks8 ! /<%4@ \#Ή@&ʙn0! (038 ! /aP( 3  UUUUUUU********UUUUUUUU********``````@@*****+++UUUUUUUU********UUUUUUUU********UUUUUUUU*****jjj/,8``UUUUUW^p******jUUUU_s******+UUUUuuz>O1u |pC(**U`x<..xWUUUU~j**WWv~_WUU**z****UUUUUU @``ppppp+*******UUUUUUUU********UUUUUUUU********UUUUUUUU:jj****ppppppp`********UUUUUUUU********U $(2)"/":L$(3)"X":L$(4)"X":L$(5)"/", [BX$"BOLTS WHEELS WATER PAN STOVE"(A(1)1:A(2)9:A(3)18:A(4)26:A(5)322CX$"WHAT THINGS DO YOU NEED TO MAKE BREAD?"<L$(1)"/":L$(2)"/":L$(3)"X":L$(4)"X":L$(5)"X"nBX$"BIKE35(jCX$"WHAT THINGS DO PEOPLE EAT?"^tL$(1)"/":L$(2)"X":L$(3)"/":L$(4)"X":L$(5)"X"dBX$"PAPER BUTTER BRUSH COLORS NAILS"A(1)1:A(2)9:A(3)18:A(4)26:A(5)35CX$"WHAT THINGS DO YOU NEED FOR PAINTING?"&L$(1)"X":L BUTTERFLY STOVE BIRD"EA(1)1:A(2)7:A(3)15:A(4)27:A(5)35kCX$"WHAT THINGS FLY IN THE SKY?"L$(1)"X":L$(2)"/":L$(3)"X":L$(4)"/":L$(5)"X"BVBX$"WIRE SANDWICH PAPER FRUIT CANDY"`A(1)1:A(2)8:A(3)19:A(4)27:A(5)RRR1:WR006(AX$"YES")WW1:WRWR1:RR0:@5010SJRRRR%A27:40010tT(WR5)(W18)A25:40010z^c END QUESTION LOOPe3010m END SCREEN LOOP ********************r120 DATA FOR QUESTIONSBX$"JET STORE SN1āI11000:I: PAUSE IF NO TIME USED FOR SOUNDUSN1āI200205:TN,I,5:^300|"SN1āI15:TN,255,10:#SY,3:CO,2$I15%PC,A(I),10&TX,L$(I)'(16368,0:R$:*3020, SCORING 1(AX$"YES")RR1:RX")(SN1)ĺ(7):1:260? (L$"/"L$"X")(SN1)Ģ1:260R AN$(K)(L$,1)Y K (AN$(1)L$(1))(AN$(2)L$(2))(AN$(3)L$(3))(AN$(4)L$(4))(AN$(5)L$(5))AX$"YES":282 AX$"NO":290 SY,1:CO,1:PC,14,9:TX,"GOOD":CO,2:SY,34CO,4:DE,1,3,40,3:FI:DE,1,7,40,7::FI:DE,1,1,40,20:CO,2H K15S L$" "b PC,A(K),8w ENS,L$,1,T%,AL% (L$)27Ĺ769,SP:RE:::(4);"BSAVE ";NF$;",A768,L127":RE:PC,9,5:TX,"BYE":I11000::(4);"RUN HELLOHI1" (L$"/"L$"CULARS K0İ4010 5010O BEGIN QUESTION LOOP ******************** SY,1:DE,1,1,20,9:INV:FI:NO:DE,1,1,20,10 DISPLAY QUESTIONS AND SPEECH FOR QUESTION ANSWER ENTRY SY,3:CO,2 PC,1,4:TX,CX$ PC,1,6:TX,BX$= R$"PRESS RETURN TO CONTINUE."6 d BEGIN SCREEN LOOPK nR0:RR0:X0:K0U xSY,3j RN0JJ1:150 J(NS(1)1):JJ1140 J1J:JNSRN1 SET UP QUESTIONS J1010,1110,1210,1310,1410 SET UP SCREEN AND SCREEN PARTION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982n % INITIALIZATION (ST%3:RE:: 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$ 3SN(785) <L$(10),IX$(10) FD$(4):WR0:RN0:J0:P  6001027902& LEVEL 2P COMPREHENSION: CLASSIFYING PAGE 12b BILL WAGNERp 4-24-82 SP=SUBPROGRAM NUMBER: RR%=RIGHT IN A ROW GOAL NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIONS"SP5:NS5:RR%5:NQ1Y # VERSI         ժժՃժժժՃ༬ݪժժՃ1u3 ՀժՀժժꚚՃ  WHICH ONES MAKE GOOD PETS IN THE HOME?"xIX$(1)"CAT":IX$(2)"GOLDFISH":IX$(3)"ELEPHANT":IX$(4)"DOG":IX$(5)"EAGLE"L$(1)"X":L$(2)"X":L$(3)"/":L$(4)"X":L$(5)"/"Q$"WHICH ONES ARE TREES?"IX$(1)"ROSE":IX$(2)"OAK":IX$(3)"PINE"IX$(5)"FISH"CL$(1)"X":L$(2)"/":L$(3)"X":L$(4)"/":L$(5)"X"I qQ$"WHICH ONES ARE IN A CLASSROOM?"#IX$(1)"JET":IX$(2)"CHALK":IX$(3)"PAPER":IX$(4)"BED":IX$(5)"DESK"(L$(1)"/":L$(2)"X":L$(3)"X":L$(4)"/":L$(5)"X"n'Q$"HICH ONES HAVE FOUR LEGS?"d[IX$(1)"HORSE":IX$(2)"BIRD":IX$(3)"COW":IX$(4)"DOG":IX$(5)"SNAKE"`L$(1)"X":L$(2)"/":L$(3)"X":L$(4)"X":L$(5)"/"Q$"WHICH ONES CAN SWIM WELL?" IX$(1)"FROG":IX$(2)"ANT":IX$(3)"SEAL":IX$(4)"MOUSE":ION LOOPe3010(m END SCREEN LOOP1r120J DATA FOR QUESTIONSjQ$"WHICH ONES ARE FRUITS?"IX$(1)"APPLE":IX$(2)"ORANGE":IX$(3)"BREAD":IX$(4)"BANANA":IX$(5)"FISH"L$(1)"X":L$(2)"X":L$(3)"/":L$(4)"X":L$(5)"/"BVQ$"WE CORRECT ANSWERS ARE":SY,1:I1NQ:PC,P(I)21,8:TX,L$(I):S $16368,0:R$:] %3010k , SCORING 1WF0RR1:RRRR1:WR0 6WF0WW1:WRWR1:RR0 @5010 JRRRR%A27:40010 T(WR5)(W18)A25:40010 ^c END QUESTLLOHI1" L$L$(X)WF1! 0 WF1ī290c WF0įPC,12,8:TX," ":PC,12,8:TX,"GOOD" SN1āI200205:TN,I,5: SN1āI11000:I: PAUSE IF NO TIME USED FOR SOUND 300 "SN1āI15:TN,255,10:? #SY,3:PC,9,14:TX,"TH BEGIN QUESTION LOOP# WF0/ X1NQ_ DISPLAY QUESTIONS AND SPEECH FOR QUESTION~ SY,1:PC,P(X)21,6:CO,4 ANSWER ENTRY L$" ":ENS,L$,1,T%,AL%:CO,2 (L$)27Ĺ769,SP::D$;"BSAVE ";NF$;",A768,L127":::"BYE":D$;"RUN HEJJ1:150( J(NS(1)1):JJ1140= J1J:JNSRN1h SET UP SCREEN AND SCREEN PARTICULARS SET UP QUESTIONS J1010,1110,1210,1310,1410,1510 5010 SY,3:PS(21(Q$)2):PC,PS,6:TX,Q$ I1NQ:PC,P(I),9:TX,IX$(I):NF$"SRF-"N1$ 3SN(785)6 <L$(10),IX$(10),P(10)p FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE." PNS6:NQ5:SP6:RR%6 ZP(1)1:P(2)7:P(3)16:P(4)25:P(5)32 _4010 d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xSY,3: RN0v  2790260010@ SUB-PRG XX/9 GRADE-3C CLASSIFYING# VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982% INITIALIZATION(ST%3:RE:: 2L1(771):N1$"":I1L1:N1$N1$((I771))::! !!!!!!!!!UUUU ****(******(((PQAAA********UUUUUUUU******** UUUTTP((( **UUUUTTUU**** ( (((UUUUUUUU********((**** UUUUUU****TUPTU ((**UUAQP"*((****U1u PTTUUU******UUU@ (****(UUUUUUUU********UU UUUU **UU@***!! ! ! 10c;cF:RE:CL,40:SP,200:PC,4,5:TX,"GOOD WORK!!"lcKCL,0:SP,255:I120:TN,100,20:TN,50,20:cPI11000:II:c510c MODULE #4c cSP$"SUBPROGRAM XX/4":40010cA232010,33010,34010,35010,4710,4810,49106dfSP$"":RE:11:TN,(10I),10:TN,(5I),10:5bh I11000:II:>b 510Nb MODULE #3ob SP$"SUBPROGRAM XX/3":40010b A232010,33010,34010,35010,3710,3810,3910c~SP$"":RE:SY,3:PC,7,5:TX,"MAYBE YOU SHOULD GET HELP.":PC,12,7:TX,"THEN COME BACK.":350P$"SUBPROGRAM XX/2":40010Ja A232010,33010,34010,35010,2710,2810,2910a SP$"":RE:SY,3:PC,5,10:TX,"STOP AND REST. THEN COME BACK.":35010a a a a^ RE:PC,2,5:TX,"GOOD. KEEP IT UP!":!bc I110:TN,(10I),10:TN,(5I),10::I10:TX,"THEN COME BACK.":35010#`)`0` 7` `v:RESET:TS,3:CO,1:FI:PC,5,3:CO,3:TX,"VERY GOOD":PC,5,5:TX," ":TX,N1$:TX,"!!!":I200205:TN,I,10:TN,(15),10:TN,100,10::I12000:II:` `510` MODULE #2`a S1_A10A11,_A11010,2010,3010,40107_ 34010G_ MODULE #1M_n_SP$"SUBPROGRAM XX/1":40010_A232010,33010,34010,35010,1710,1810,1910`SP$"":RE:SY,3:PC,13,5:TX,"STOP AND REST.":PC,8,7:TX,"GET HELP IF YOU NEED IT.":PC,12,9)6340T^^A1(769):L1(N1$):769,A1:771,L1:I1L1:771I,((N1$,I,1))::515x^hD$;"BLOAD ";NF$:A1(769):515^A1(769):A2(770):L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$^A11520,2520,3520,4520^35010_A1A1]HSY,3:PC,1,18:TX,"THEN PRESS RETURN TO CONTINUE.":SY,1e]JPC,5,5:EN,N1$,10,T%,AL%:AL%1330]L(N1$)27ĺ(4);"RUN HELLO"]NN1$(N1$,AL%):NF$"SRF-"N1$]O345]P(769)0350]TD$;"UNLOCK ";NF$:216,0]V360]Y216,0^\(222  *TUUUQTTU @UUUU( zxxx8Pduttu(((+KIjj|  UUEQQAA (*(UUUUUUUU88819===9Jbr2"""yQQQ?TU ( (*@P( EQEP"" (( """""Q1u3 @0  (`@@0 aAAACR (QP@((( """qyyy" "" ~`qF|x@@@aoA|_7 `@ x |v@@p0xx|~?~xp@|@`0xpA0? @@|`8`@@@pxxpx{xxxx_~@ ?0@`xp1u# @``0pp< p@p?@<@p0p`@~8 w@8?"" " "