' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL]렮 鷎귭෍ᷩ췩緈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`? \ 27902\60010?\ SUB-PRG XX/4 GRADE-1C MAIN IDEA\# 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))::N    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<ֆ?se3010Tm END SCREEN LOOP]r120v DATA FOR QUESTIONSL$(1)"1":L$(2)"3":L$(3)"2":P27904BVL$(1)"3":L$(2)"1":L$(3)"2":P28154L$(1)"2":L$(2)"3":L$(3)"1":P28416E IF NO TIME USED FOR SOUND$ 300B "SN1āI15:TN,255,10:f $I13:PC,35,42I:TX,L$(I):p %3010 &16368,0:R$:1: , SCORING 1L$L$(X)RR1:RRRR1:WR0 6L$L$(X)WW1:WRWR1:RR0 @5010 JRRRR%A27:40010T::D$;"BSAVE ";NF$;",A768,L127":::"BYE":D$;"RUN HELLOHI1"Q L$L$(X)ī275Z WF1` s WF0L$L$(X) WF0ī290 L$L$(X)įSY,1:PC,12,8:TX," ":PC,12,8:TX,"GOOD" SN1āI200205:TN,I,5: SN1āI11000:I: PAUSF0:L$(4)"X" X1NQ? SY,3:DE,1,17,40,18:INV:FI:NOt SY,3:DE,34,10,40,10:INV:FI:NO:DE,1,1,40,20 DISPLAY QUESTIONS AND SPEECH FOR QUESTION SY,3:PC,30,4X2 ANSWER ENTRY L$" ":ENS,L$,1,T%,AL%> (L$)27Ĺ769,SP1 SET UP QUESTIONS ; J1010,1110,1210,1310f SET UP SCREEN AND SCREEN PARTICULARSu SY,3:R%0 FTXN,P,1,6,N1$,PR$,R% 5010 SY,1:CO,4:DE,1,2,20,2:FI:DE,1,6,20,6:FI:DE,1,1,20,10:CO,2 BEGIN QUESTION LOOP W1$ 3SN(785)$ <L$(10),IX$(10)^ FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE."w PNS4:SP9:NQ3:RR%4 _4010 d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xSY,3: RN0JJ1:150 J(NS(1)1):JJ1140 J1J:JNSRN  279024 SUB-PRG XX/6 GRADE-1C SEQUENCE# 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))::NF$"SRF-"N      1u)f z% (2*n;/L,@4P3@ /p74 Ჳ@( %Y^4|J%=n)a // e88)2@ 1u PUU ***UUUU***ՀU@@@@(*+*UUUU***jUUUW****UUUU  RKING..."::D$;"RUN LESSONXX"7j:D$;"RUN HELLOHI1" *RAWING CONCLUSIONS# 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$xSY,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,0J770,A2::SY,3:PC,5,10:TX,"WO INSTRUCTIONS AND BLOADS=(4);"BLOAD BTCDC,A6150"jP(1)6170:I23:P(I)P(I1)(6148I):s10022:"READ THE PARAGRAPH. TYPE THE NUMBER OF":"THE RIGHT ANSWER. HIT RETURN TO GO ON.";:1:255K1 DISPLAY SCORE JRRRR%A27:400109 T(WR5)(W18)A25:40010Q c END QUESTION LOOP[ e3010a hw m END SCREEN LOOP r120  DATA FOR QUESTIONS L$(1)"2":PP(1) B VL$(1)"1":PP(2)  L$(1)"3":PP(3) PAUSE SUBS  TN,I,5:B SN1āI11000:I: PAUSE IF NO TIME USED FOR SOUNDK 300i "SN1āI15:TN,255,10: $SY,1:PC,17,7:TX,L$(X) %16368,0:R$: &3010 , SCORING 1L$L$(X)RR1:RRRR1:WR0 6L$L$(X)WW1:WRWR1:RR0 @5010 ANSWER ENTRY CO,3> PC,15,7:L$" ":ENS,L$,1,T%,AL%H CO,2 (L$)27Ĺ769,SP::D$;"BSAVE ";NF$;",A768,L127":::"BYE":D$;"RUN HELLOHI1" L$L$(X)ī290 L$L$(X)įPC,12,9:TX," ":PC,12,9:TX,"GOOD" SN1āI200205:J1140 J1J:JNSRN1; SET UP QUESTIONS V 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 ((I771))::NF$"SRF-"N1$* 3SN(785)> <L$(10),IX$(10)x FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE." PNS3:SP14:NQ1:RR%3 _4010 d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xSY,3: RN0JJ1:150 J(NS(1)1):J9  2790260010N SUB-PRG XX/11 GRADE-3C DRAWING CONCLUSIONS# 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$       1uWst /҉@|8 !P!+ P;H(i@ )c*d %P;@r 1u4P"p&!+;Y@҉@)e /C︵ tJd9eJ%t@Y҉@+K8 tmY/J% ;) 2Y'@4P"s@ MJ+ATJZ]UII7UJ%A UWMBTjAV*U t%EVZV IٶT*Umk)BZjժJUJj*TղZZqiNKU\VUSZXeZeUk*Zje)ڦJUǰL VjijU-U+R UT,YUʪTRjVee5UeUVUc*UeYҴVU-IUkRJ^JҺJVe^jjTZBjI*ZjnjjiKjT*RVb+uEUK]TMՊ.[ T[TPATU[UIV.+jWJjjU ѯVT/]RUJOVPծTҪV*V*i*KUIZJE ^A^UU*jI+B%]UڪMZj[RUPIUTkڪJZIUU*i[UEZ+VU)U%i[k RZj*UmVRU]U%UVEjVIUuUTjJ jTUJUJUjUVʖZ%UjUj *Z*uJj UժJV RRUZU*U*YjK+ҪV%JKjUZ[KKKG䲪eQe MRieZz[)J *mVJZUJUjBm%J*+ *ڶUWUJV՗TڶTVVK *նj%%*_TPUUEjTmUIEUkT*IT ^mIԫ*Z՟(zkKRU*h[UIJRoՒhTUTn*ժV_HJRmJҪUm+Z+ j Z%ZUD$*mURWu * .uk$yRכ *mmUR$UWE$V)=/-mUdʢժJ֪JRRjRUVjJibiZՆq1jX58qXV8qr4,-˥qq8-qqj9:˲\.)OMpjVײ(UJRiQTJRUժiQTZZUTkU)*ZVUT$JZVU%}*IJֶJR*ZRZ_J~VDպJKBڪ4?-mTIUZQڶRZDTVUJUVJj*EUku5TURTTU*-ZU*UFe㨪ִJ%MZUUj退xxp@````pX?{qyx`@@`e|p``@@ |p@a0 @@1u |~>???@`@p X@@O`?xx|x~@``p 0``ppxϼsa\}ggsƌΞxL   1u06.@$8҉@[ޛ,l t8@#" %@)o (\J%n nzn\0);N<"8 p#8 c\e3 1uLc /0+I@ڜ;D!:t8@Xs&+@e 1uIrJn\뀒\e8҉n:%K@(8Ή@/r)d8ވtzl /|"J#4 \3)ahs@% _~|p🏏|x'''@۳`ӳ1u @@󀂊~x`  1um-is /;39e0!@"| a\ @& )09[8@#&(z4P3@) t| oy# *t3@;@ 1ud$\%Hk ( 23P( '( ;H4 % -J%8 /9er:s\e 1u(@4 ʳ% te$a3%{|&@҉@8ވtzl %KD&Y҉@c[xs ( 3҉@P7% <8p`@UUUUWW^\********UUUUUUUU*j* p@?1u@x\^WW****?UUUU`p8<,lllUUUUUwUU*****okkUUUUU_]]:jjj*?;;ll,,,,l,UWWWWWWUkkkkkkk*]]]]]]_U;?+++++*1uu02[8@#s;,P#0@ޝ(P#"[ t0 /;z! s! !P"8@,3 2;@ 1uX*pK P4_N4ʜ### 2" 2"04ʜ 1u@ 9N IdwiC)'@!8nފt !ޛ,:%KD0J%inP2@;H0J%P;L0J%inP7%P1uy =Ҋs%st=0) ( \@) ! I@ޛ;-tsk98ވtG8@# p#8@X1uI@@\*p8Ή@sKY@\(n\( ,isӓ% /P) !r;tn -J% !P! cJ%S(4^@YdJ%*r3eG..."::D$;"RUN LESSONXX"3j:D$;"RUN HELLOHI1"DON: PREDICTING OUTCOMES PAGE 8h BILL WAGNER| 4-26-82  SP=SUBPROGRAM NUMBER: RR%=RIGHT IN A ROW GOAL NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIONS "SP2:NS3:RR%3:NQ10: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:CO,0:JJ0RR:TX,RR$::CO,2NO:CL,0:DI,0J770,A2::SY,3:PC,5,10:TX,"WORKIN THAT TELLS WHAT WILL HAPPEN NEXT.";H" HIT":"RETURN TO GO ON.";Q1:Z255D$;"BLOAD BTCPO-1-L2-D13,A6200"D$;"BLOAD BTCPO-2-L2-D13,A6400"D$;"BLOAD BTCPO-3-L2-D13,A6600"$ DISPLAY SCOREBSY,3:CO,2:DE,1,1,40,2*************r120/ DATA FOR QUESTIONSDP6200:L$(1)"3"JB_VP6400:L$(1)"1"ezP6600:L$(1)"2"  PAUSE SUBS   INSTRUCTIONS AND BLOADS::K1100'21:"TYPE THE NUMBER OF THE SENTENCENO%16368,0:R$:%, SCORINGI1(AX$"YES")RR1:RRRR1:WR0n6(AX$"YES")WW1:WRWR1:RR0x@5010JRRRR%A27:40010T(WR5)(W18)A25:40010^c END QUESTION LOOPe3010hX m END SCREEN LOOP *******L$L$(X)AX$"YES":282, AX$"NO":290V SY,1:CO,0:PC,14,9:TX,"GOOD":CO,2 SN1āI11000:I: PAUSE IF NO TIME USED FOR SOUND SN1āI200205:TN,I,5: 300 "SN1āI15:TN,255,10:$CO,4:SY,1:PC,1,9:INV:TX,L$(1):PC,1,8:TX," ":PC,1,8$ L$" "9 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:250 (L$"1"L$"3")(SN1)Ģ1:250 TICULARS K0İ4010I SY,1:DE,1,1,20,9:INV:FI:NO:DE,1,1,20,10d FTXN,P,1,1,N1$,PR$,R%n 5010 BEGIN QUESTION LOOP ******************** X1NQ DISPLAY QUESTIONS AND SPEECH FOR QUESTION ANSWER ENTRY SY,1:CO,0 0:RN0:J0:PR$"PRESS RETURN TO CONTINUE."B d BEGIN SCREEN LOOPW nR0:RR0:X0:K0a xSY,3v RN0JJ1:150 J(NS(1)1):JJ1140 J1J:JNSRN1 SET UP QUESTIONS J1010,1110,1210 SET UP SCREEN AND SCREEN PARe # VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982z % INITIALIZATION (ST%3:RE:: 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$ 3SN(785) <L$(10),IX$(10)* FD$(4):WR5  6001027902& LEVEL 2V COMPREHENSION: PREDICTING OUTCOMES PAGE 8h BILL WAGNER| 4-26-82  SP=SUBPROGRAM NUMBER: RR%=RIGHT IN A ROW GOAL NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIONS "SP2:NS3:RR%3:NQ1     P SCREEN AND SCREEN PARTICULARS. K0İ4010` SY,1:DE,1,1,20,9:INV:FI:NO:DE,1,1,20,10{ FTXN,P,1,1,N1$,PR$,R% CO,4:DE,1,13,40,13:FI:DE,1,1,40,20:CO,2 P6150įPC,1,7:TX,"IT CAN FLY. ":PC,1,12:TX,"1. A FISH 2. A FROG 0)< FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE."T d BEGIN SCREEN LOOPi nR0:RR0:X0:K0s xSY,3 RN0JJ1:150 J(NS(1)1):JJ1140 J1J:JNSRN1 SET UP QUESTIONS J1010,1110,1210,1310 SET U:NQ1j # VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982 % INITIALIZATION (ST%3:RE:: ,L$"B " 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$ 3SN(785) <L$(10),IX$(1  6001027902& LEVEL 2Z COMPREHENSION: DRAWING CONCLUSIONS PAGE 4l BILL WAGNER 4-26-82  SP=SUBPROGRAM NUMBER: RR%=RIGHT IN A ROW GOAL NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIONS "SP13:NS4:RR%4    HT IN A ROW."*PC,28,19:TX,"YOU HAVE"QSY,1:PC,19,10:DI,4:SN1įCL,40eRR$(RR):INV:CO,0:JJ0RR:TX,RR$::CO,2NO:CL,0:DI,0J770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"j:D$;"RUN HELLOHI1""D$;"BLOAD BTCDA-1,A6310"=D$;"BLOAD BTCDA-2,A6450"[D$;"BLOAD BTCDA-3,A6600"yD$;"BLOAD BTCDA-4,A6750"FTXN,P,1,1,N1$,PR$,R%$ DISPLAY SCORE SY,3:CO,2:DE,1,1,40,20:PC,1,19:RR$(RR%):TX,"GOAL = ":TX,RR$:TX," RIGB PAUSE SUBS " @ INSTRUCTIONS AND BLOADSJ::RK1[10021:"READ THE STORY. TYPE THE NUMBER OF THE SENTENCE THAT ANSWERS EACH QUESTION.";:"HIT RETURN TO GO ON.";1:255D$;"BLOAD BTCDI,A615010#T(WR5)(W18)A25:40010)^Ac END QUESTION LOOPKe3010RhX~m END SCREEN LOOP ********************r180 DATA FOR QUESTIONSP6150:A(1)6310:A(2)6450:A(3)6600:A(4)6750L$(1)"3":L$(2)"2":L$(3)"1":L$(4)"2"TIME USED FOR SOUND4 SN1āI200205:TN,I,5:= 300[ "SN1āI15:TN,255,10:~ $CO,2:SY,3:PC,1,18:TX,L$(X) %16368,0:R$: , SCORING 1(AX$"YES")RR1:RRRR1:WR0 6(AX$"YES")WW1:WRWR1:RR0JRRRR%A27:400PC,9,5:TX,"BYE":I11000::(4);"RUN HELLOHI1"[ (L$"1"L$"3")(SN1)ĺ(7):1:250 (L$"1"L$"3")(SN1)Ģ1:250 L$L$(X)AX$"YES":282 AX$"NO":290 SY,1:CO,0:PC,14,9:TX,"GOOD":CO,2 SN1āI11000:I: PAUSE IF NO X1NQ8 DISPLAY QUESTIONS AND SPEECH FOR QUESTIONW FTXN,A(X),1,14,N1$,PR$,R%a 5010t ANSWER ENTRY~ SY,3 PC,1,16:TX," ":PC,1,16 L$" " ENN,L$,1,T%,AL%1 (L$)27Ĺ769,SP:RE:::(4);"BSAVE ";NF$;",A768,L127":RE:J0:PR$"PRESS RETURN TO CONTINUE."; d BEGIN SCREEN LOOPP nR0:RR0:X0:K0Z xSY,3g J1:J11 SET UP QUESTIONS J1010 SET UP SCREEN AND SCREEN PARTICULARS K0İ4010 BEGIN QUESTION LOOP ******************** VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982s % INITIALIZATION (ST%3:RE:: 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$ 3SN(785) <L$(10),IX$(10)# FD$(4):WR0:RN0:  6001027902& LEVEL 2O COMPREHENSION: DETAILS PAGE 7a BILL WAGNERu 4-26-82  SP=SUBPROGRAM NUMBER: RR%=RIGHT IN A ROW GOAL NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIONS"SP8:NS1:RR%4:NQ4^ #      z"#?8pƭѠƭʠƭԠ!ƭΠ"! ɮŠ" ɮŭƭ٠ ɮŠƭŠ ɮŠ Š" í ͠د à ɮΠ ɮǠ ƭ͠  ɮӠ í! í" í͠د í̲ı í̲ı í̲ıŭŭŭŭ ͠د  Ӡ ͠د   ͠د ӭӭӭӭ ͠د  !ĭ"ĭ͠د ɠ     ͠د    ͠د Ѡ ͠د  ϭ̱ı ϭ̱ı͠د  ɭɭɭ ɭ ϭ̳ĵϭ̳ĵ͠د ϭ̲ı ϭ̲ı ϭ̲ı ϭ̱ı ͭӠɮϠɮǠɮҠɮˠ͠د ͠د Ϡɠ ɱؠ رƠҠ и144,10,8:SN1įTN,20,30JDP,6144,2,12:SN1āI120:TN,(503I),10:^I12000:II:d COMPLETED SUBPROGRAM XX/4 RE:CO,1:PC,6,4:TX,"HOORAY!":PC,6,6:TX,N1$:PC,3,8:TX,"IS DOING WELL." SN1āI120:TN,75,20:TN,150,20:(4);"BLOAD I.FLOWER,A6144":DP,6144,20,12:I120:SN1įTN,(902I),20:VSY,1CO,1:PC,6,1:TX,"YOU ARE":PC,6,3:TX,"GROWING":PC,5,5:TX,"VERY WELL!"CO,2DP,6144,2,1:SN1įTN,100,200DP,6144,32,5:SN1įTN,250,100DP,6,20:TN,150,20:(SN1āI12000:I.*N4 COMPLETED SUBPROGRAM XX/2>RE:CO,0:PC,5,4:TX,"FINE JOB":PC,5,6:TX,N1$:TX,"!"HSN1āI120:TN,75,20:TN,150,20:RSN1āI12000:I COMPLETED SUBPROGRAM XX/3RE:L  vA12000,2100,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  COMPLETED SUBPROGRAM XX/1RE:CO,4:PC,5,5:TX,"VERY GOOD!":I120:SN1įTN,75010 A1A11 RE:TS,ST%0 A1NS34010A  MODULE #NG m 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    ):A1(769):771,L1:I1L1:771I,((N1$,I,1))::515n hSN(785):(4);"BLOAD ";NF$:A1(769):785,0:515 A1(769):A2(770):L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$ A232010,33010,34010,35010,1710,1810,1910,1910 35,1,T%,AL%:(SN$)27N1$(27):330? LSN$"Y"SN$"N"ī331Z M785,0:SN$"Y"Ĺ785,1| NN1$(N1$,NL%):NF$"SRF-"N1$ O345 P(769)0350 T(4);"UNLOCK ";NF$:216,0 V360 Y216,0 Z(769)0Ĺ769,1 \(222)63407 ^L1(N1$ME.":CL,0:SP,255' FN1$"ANNIE "e 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$  60010)nST%3:SUPERTALKER SLOTJsNS14: # OF SUBPROG'S euSN(785): SOUND FLAG{x::RE:TS,ST%:} ** DIM'S, DATA, INIT., BLOADS **6(768)99410 E768,99:PC,1,1:CL,30:SP,220:TX,"PLEASE ENTER":PC,1,3:TX,"YOUR NA   WORKING..."::D$;"RUN LESSONXX"9gj:D$;"RUN HELLOHI1"51,40,20:PC,1,19:RR$(RR%):TX,"GOAL = ":TX,RR$:TX," RIGHT IN A ROW."efPC,28,19:TX,"YOU HAVE"fSY,1:PC,19,10:DI,4:SN1įCL,40fRR$(RR):INV:fCO,4:JJ0RR:TX,RR$::CO,2fNO:CL,0:DI,0f gJ770,A2::SY,3:PC,5,10:TX,"1uy&+0-;ir s\!L;:%8n@'@${+03;N )@#ir L[0 @@ :.:10:5:"LOADING PROGRAMS...."M (4);"BLOAD BSYM-SYMTABS"i103,1:104,92:23552,0(4);"RUN HELLOHI"( ;"BLOAD I.DUCKS,A6144" RE` CO,3:PC,6,2:TX,"THAT WAS ":PC,5,4:TX,"JUST DUCKY.":CO,2s DP,6144,14,12 I12000:II: SN1āI13:TN,240,50:TN,228,40::TN,114,100 I11000::SN1āI11000: ( COMPLETED SUBPROGRAM SN1āI12000:IV <` COMPLETED SUBPROGRAM XX/5fj RE:CO,0:PC,5,4:TX," A - OK!! "t SN1āI120:TN,75,20:TN,150,20:~ SN1āI12000:I  COMPLETED SUBPROGRAM XX/6 RE:SY,3:PC,5,10:TX,"WORKING...." (4)1u)@]lN / ޝ(NP+\3@8@(@P3L-;N@4bP;c@[8!{ [P2LLO" 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      PC,1,7:TX,"PIECE OF"4 PC,1,9::TX,"CAKE!!"L SP,255:CL,0:CO,2_ DP,6144,27,10 J1131:DP,7424,29,J:SN1įTN,(303J),25  SN0ī3065 I120:TN,50,20:TN,30,20: I13000:II:  COMPLETED SUBPROGRAM RAM XX/10U^ RE:CO,4:PC,5,5:TX,"WONDERFUL!":I120:SN1įTN,75,20:TN,150,20:mh SN1āI12000:Is  COMPLETED SUBPROGRAM XX/11 :::RE (4);"BLOAD I.CAKE,A6144" (4);"BLOAD I.CAKE-1,A7424" PC,1,5:TX,"THAT WAS A" RACING ALONG!"B CO,2:I2611:DP,6144,I,12:SN1įTN,15,5:H X I12000:^ ~ COMPLETED SUBPROGRAM XX/9 RE:CO,4:PC,5,5:TX," GREAT !":I120:SN1įTN,75,20:TN,150,20: SN1āI12000:IJ T COMPLETED SUBPROG XX/72 RE:CO,1Y< PC,1,3:TX,"YOU'RE":PC,5,5:TX,"DOING":PC,9,7:TX,"JUST FINE!"F SN1āI120:TN,100,20:TN,30,20:P I11500:II:  COMPLETED SUBPROGRAM XX/8 RE::(4);"BLOAD I.BIKE,A6144" CO,4:PC,1,4:TX,"YOU'RE1u4,8@Ҝt8҉@Xts; ;7Yl{@4+ @4)@#"P; i:n @;e壅夅 ȪeȩeˠgLgh8 Ȫ󄫠 #eȩeѩLl` - H Lӆ ԆLsůtRLgӆhԆsՆtֆ >&eee膝JJJJ)ŝƝ 0ȵƞढ़0 ,LƂLڂiiij8stijRLgh #Lѥȥ ݠ8埅ȱ堅b:bD:RE:SY,3@bNPC,10,10:TX,"INSERT THE NEXT DISK."mbXPC,8,12:TX,"PRESS RETURN TO CONTINUE."bb16368,0:R$:bl(4);"RUN HELLOHI "bveȪi LT >ȥ Ȫ͆0 ҅OR SRF+aSP(L$): SP=SUB-PROGRAM NUMBERJaSP1360: INVALID CHOICEcaSPNL1580: STOPaSPNL360: INVALID CHOICE aSPNN(SP): PICK UP ACTUAL S/P # BASED ON MENU CHOICEa&769,SP: POKE SUB-PROGRAM NUMBERb0(4);"RUN LESSONXX"---">`PC,1,(LSNL6):TX,"PLEASE TYPE A LESSON NUMBER, OR"`PC,1,(LSNL7):TX,"HIT RETURN TO START WHERE YOU LEFT OFF."`PC,1,LSNL8`FL4`L$" "`EN,L$,FL,T%,A%`(L$)27580aA%0560: IF ONLY CR THEN GOTO LESSONXX FRE:SY,3_iCO,41_jDE,1,LS1,39,LSNL5:FIX_kDE,2,LS2,38,LSNL4:INV:FI:NOb_lCO,2t_mDE,1,1,40,20_rPC,3,LS2:TX,LN$(0)_|I1NL_PC,3,(LSI3):TX,LN$(I)__PC,3,(LSNL4)_ST$(NL1)`TX,ST$:TX,". --- STOP BEGINNING"0^LN$(1)"1. PREDICTING OUTCOMES"L^LN$(2)"2. MAIN IDEAS"e^LN$(3)"3. DETAILS"^LN$(4)"4. SEQUENCE OF EVENTS"^LN$(5)"5. EVIDENCE TO SUPPORT CONCLUSIONS"^J ********************^T THIS CODE DISPLAYS MENU^^: _hLDS MENU TEXTQ]NN(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)4]NN(3)7]NN(4)9]NN(5)12 ^LN$(0)"COMPREHENSION SKILLS - \39076 \d HELLO PROGRAM`\i PACKAGE 4 / DISK 1 / SIDE A - COMPREHENSION SKILLS j\n120|\x768,0:769,0\ ********************\NSP14: NSP=#OF SUBPRO GRAMS \NL5: NL=# OF LINES IN THE MENU ]LN$(NL): HO      !!!ծպժժժs3|?~OOs?~ժժժՂծժժպժժժpscx``pxժժժՂU*U*U*U*U*}ժcsgdOgsgOsgOCgs?~sgCgߪժՂծժժպ+U*U*U~ժppsg~sc`sg`sgpxpsgߪժՂתծժկտժծժߪw]sgOgGqOg?~cgsg}]cwaw}AwwCcgc]{]]{w]}]{wssqOgsgOc?~sgcgժժժժժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂտժժժժվծժժժժժժժժժժժժժժժժժժՂ]]saw}]Us[]}]ww]U]{}]]c]wsawU}ծ׺ժժժsgsx?~OOsg~ժժժՂծժպժժժccsq?~OgOgcc?~ժժժՂU*U*U*U*U*}ժGgsg`OgsgOgsgOgcgsg?~sgcgߪժՂתժտ+U*U*U~ժcccsgOsqOgsgOgsgcc?~ccsgߪժՂߪծժկկժߪժտժߪwUscOgxOc?~sgcc}][k]w}]ww]]o[]{]]{w]}]{w{ժժժժժժժժժsxOgsgOg?~scsgժժժժժժժժժժժժժժժժժժՂU1"ꈭ(222)9Ĺ216,0:35015VRE:TX,"DISK FULL":PC,1,5:MT,15:EN,N1$,10,T%:nJ769,A1:SP$""510O(4);"RUN ";SP$8ǹ769,A1:770,A2::(4);"BSAVE ";NF$;",A768,L127"LǯPC,9,13:TX,"PRESS RETURN TO START":PC,11,15:TX,"THE LESSON AGARETURN TO CONTINUE."-A$:A$(13)340509Ά34520hӆ:(4);"DELETE ";NF$:(4);"RUN HELLOHI1"؆::(4);"RUN HELLOHI1"ˆ769,A1:770,A2:35050Lj:(4);"BSAVE ";NF$;",A768,L127":::5:8:"BYE":I1500:II::̈(4);"RUN HELLOHITX,"YOU FINISHED":PC,11,4:TX,"THE DISK."5 CO,2a I1024:DP,6144,I,14:SN1įTN,200,10g w I11000:}> \32010dDP,6144,14,10 }}}34510ڄ RE:SY,3:PC,3,9:TX,"INSERT THE NEXT DISK.":PC,1,11:TX,"PRESS COMPLETED SUBPROGRAM XX/14_ RE:(4);"BLOAD I.TURTLE, A6144"::(4);"BLOAD I.SSIGN,A7424 " I25101:DP,6144,I,14:SN1įTN,200,100  SN1āJ11000:J DP,7424,1,14:SN1įTN,40,50 SY,1:DE,1,1,20,10+ SY,1:CO,1:PC,9,2:XX/12Q& RE:CO,4:PC,5,5:TX,"GOOD WORK!":I120:SN1įTN,75,20:TN,150,20:i0 SN1āI12000:Iov  COMPLETED SUBPROGRAM XX/13 RE:CO,4:PC,5,5:TX,"TERRIFIC!!":I120:SN1įTN,75,20:TN,150,20: SN1āI12000:I  1u) s;ޛr;K䇐7rt;yG2I@/ 3Y38Q aP!;n8J%;ߐ$; {a84P3Yʙ%PP2 = LESSONXX390765(4);"RUN LESSONXX1";( DߪիվկվվժתժժժժժժժկժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂߪժժկ׺ծկ{ծպժժժp?~OOp?~ժժժՂժߪժժժժժժժժժժժժժժժժժժՂժssgsgxx~`~3dp?~sg3dߪժՂծպժժժժժժՂתվc]p~sgOg?~fsgcqw]cC]ccqccq]Ac]Accwg]AcqsժժժժժժժժժժժժժժժժժժժժժժժժՂUתիվտվժתժժժժժժժծժժպժժժժժժժՂժժժժժժժժժժժժժժժժժժՂߪժժծկժժժժժժժժժժժժժՂ]]A]cg]]Aacg]ccc]]Agc]qccA]wc]gsծպժժժx?~OOx?~ժժժՂߪժժժժժժժՂU*U*U*U*U*}ժssgsgpp~`~fx?~sgfߪժՂծժպժߪժՂתվw]scOsgOg?~gs[]{wmw]]wwo]]{][]][w]s[][w{sժժժժժժsg`sgxxsg`ժժժժժժժժժժժժժժժժժժՂתծտվժߪժժժժժժժվժժվժժժժժժժՂժժժժժժժժժժժժժժժժժժՂߪժժժվկժժժժժժժժժժժժժՂ]][mw[]][[][]ww]]][[]]{]w[msw][sծպժժժc~?~OOc?~ժժժՂծժժպժժժxsgx``xxժժժՂU*U*U*U*U*}ժssg3fOcscOsgOgc?~sggߪժՂծժݪպժ?xxsg~sg`sg`sgxxxsgߪժՂתծժտժկתߪw]sgOccOg?~Cgs}]{wuwM]ww_]_{A{]A{w]s}A{w{sc`sgpxsg`ժժժժժժժժժժժժժժժժժժՂUߪվתתժժժժժժպժժծժժժժժժժՂժժժժժժժժժժժժժժժժժժՂߪժժժժվկժժժժժժժժժժժժժՂA]{uw}AM{[]}Aww]MA{}]]{]w{uswM}cPOLLYIN."'Vǹ16368,0:A$:A$(13)51030Bj:(4);"RUN HELLOHI1"(4);"RUN ";SP$'wr  (4);"RUN ";SP$Ln8ǹ769,A1:770,A2::(4);"BSAVE ";NF$;",A768,L127":hnj:(4)$;"RUN HELLOHI1"nmLY^^ȱ^ȱ^eȱ^e(ӊ0Ц1uN % 5p&@҉@)e8҉n@%M0P0\L)g4 )4[N@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          THE SENTENCES.";." HIT RETURN TO GO ON.";71:@255^D$;"BLOAD BTCMA-1,A6150"|D$;"BLOAD BTCMA-2,A6400"D$;"BLOAD BTCMA-3,A6650"$ DISPLAY SCORESY,3:CO,2:DE,1,1,40,20:PC,1,19:RR$(RR%):TX,"GOAL = ":TX,RR$:TX**** r120& DATA FOR QUESTIONS;L$(1)"B":P6150ABVVL$(1)"C":P6400\qL$(1)"A":P6650w  PAUSE SUBS   INSTRUCTIONS AND BLOADS::K110021:"PRESS A, B OR C TO SHOW THE MAIN IDEA OF16368,0:R$:, SCORING?1(AX$"YES")RR1:RRRR1:WR0d6(AX$"YES")WW1:WRWR1:RR0n@5010JRRRR%A27:40010T(WR5)(W18)A25:40010^ c END QUESTION LOOPe3010hXm END SCREEN LOOP ****************"C")(SN1)Ģ1:2502 L$L$(1)AX$"YES":282D AX$"NO":290n SY,1:CO,0:PC,14,9:TX,"GOOD":CO,2 SN1āI11000:I SN1āI200205:TN,I,5: 300 "SN1āI15:TN,255,10: $CO,4:SY,1:PC,1,9:INV:TX,L$(1):NO %CO,3 PC,1,8:TX," ":PC,1,8+ L$"A"@ ENS,L$,1,T%,AL%Q L$(L$,AL%) (L$)27Ĺ769,SP:RE:::(4);"BSAVE ";NF$;",A768,L127":RE:PC,9,5:TX,"BYE":I11000::(4);"RUN HELLOHI1" (L$"A"L$"C")(SN1)ĺ(7):1:250 (L$"A"L$EEN PARTICULARS K0İ4010P SY,1:DE,1,1,20,9:INV:FI:NO:DE,1,1,20,10k FTXN,P,1,1,N1$,PR$,R%u 5010 BEGIN QUESTION LOOP ******************** X1NQ DISPLAY QUESTIONS AND SPEECH FOR QUESTION ANSWER ENTRY SY,1:(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE."I d BEGIN SCREEN LOOP^ nR0:RR0:X0:K0h xSY,3} RN0JJ1:150 J(NS(1)1):JJ1140 J1J:JNSRN1 SET UP QUESTIONS J1010,1110,1210 SET UP SCREEN AND SCR VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982t % INITIALIZATION (ST%3:RE:: ,L$"B " 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$ 3SN(785) <L$(10),IX$(10)1 FD$  6001027902& LEVEL 2P COMPREHENSION: MAIN IDEA PAGE 6b BILL WAGNERv 4-26-82  SP=SUBPROGRAM NUMBER: RR%=RIGHT IN A ROW GOAL NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIONS"SP5:NS3:RR%3:NQ1_ #"@`px8p`@@@p88p`````````ppxx@`p`?|~````````pp`|~p@?````````|`x@?@````pp1u`````~?@`|x`````````@x~p|?    c CONNIEQɿu3'RͲʎRʎ]]]ɪUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \C,1,3:TX,"YOUR NAwUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`Lxe^^Ӝu`".Q`pNФbptťܥm2<(-Py0\|66e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  1uZflP#'Yn8҉n0 %L@/@e8@4ʙd @&,8@P1u@0!P-I@`7^@8rڛ J%;; In;/)@l;-tJ% !P#-|K80(i@88 In;/)@l;# !P!8P ժЀЀժժՀՅՂժժЀIժժժժժժժ?xxsgxx`sg`sgxxxsgߪժՂjU@||ժժժժժssgsgO~OsgOs`c?~sgs`ߪժՂ*]*Dժժժժժժժժժx~sgOg?~3ds`{ժժժժժժժߪժՂժժժժժժժժժժժժժժժժժժՂSY,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"dSY,1:PC,19,10:DI,4:SN1įCL,40dRR$(RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,0deJ770,A2::SY,3:PC,5,10:TX,"WORKINSc(4);"BLOAD BTCS,A6150">cP(1)6170:P(2)P(1)(6150)Ic:100zc21:"PUT THE EVENTS IN ORDER. FOR EXAMPLE,"c"NEXT TO 1, TYPE THE LETTER OF THE":"FIRST EVENT. HIT RETURN TO GO ON."c1:c255cK1c$c DISPLAY SCOREtdbe3010bm END SCREEN LOOP'br120@b DATA FOR QUESTIONS}bL$(1)"A":L$(2)"C":L$(3)"B":PP(1):L$(4)"E":L$(5)"D"bBbVL$(1)"D":L$(2)"C":L$(3)"B":PP(2):L$(4)"E":L$(5)"A"bb PAUSE SUBSb b c INSTRUCTIONS AND BLOAD ANSWERS ARE:":I1NQ:PC,8(I1)4,17:TX,L$(I):Ga%16368,0:R$:Qa&3010_a, SCORINGa1L$L$(X)RR1:RRRR1:WR0a6L$L$(X)WW1:WRWR1:RR0a@5010aJRRRR%A27:40010aT(WR5)(W18)A25:40010ac END QUESTION LOOP`WF0L$L$(X)%`L$L$(X)ī290``L$L$(X)įSY,1:PC,8,9:TX," ":PC,8,9:TX,"GOOD"`SN1āI200205:TN,I,5:`SN1āI11000:I: PAUSE IF NO TIME USED FOR SOUND`300`"SN1āI15:TN,255,10:3a$PC,8,16:TX,"THE CORRECT0_X1NQ>_ DISPLAY QUESTIONS AND SPEECH FOR QUESTIONY_SY,3:PC,8(X1)4,14l_ ANSWER ENTRY_L$"1":ENS,L$,1,T%,AL%_(L$)27Ĺ769,SP::D$;"BSAVE ";NF$;",A768,L127":::"BYE":D$;"RUN HELLOHI1"_L$L$(X)ī275_WF1_J1J:JNSRN1/^ SET UP QUESTIONS J^J1010,1110,1210,1310u^ SET UP SCREEN AND SCREEN PARTICULARS^FTXN,P,1,1,N1$,PR$,R%^SY,3^I15:PS8(I1)1:PC,PS,14:I$(I):TX,I$:TX,".":^5010^ BEGIN QUESTION LOOP_WF:NF$"SRF-"N1$]3SN(785)2]<L$(10),IX$(10)l]FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE."]PNS2:SP11:NQ5:RR%2]_4010]d BEGIN SCREEN LOOP]nR0:RR0:X0:K0]xSY,3:]RN0JJ1:150]J(NS(1)1):JJ1140^5 \ 27902\60010B\ SUB-PRG XX/10 GRADE-3C SEQUENCE\# 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)):   1u;/\:҉@K %7[;Y n8[,z%o /S8:p-!@! 88l+@07@330(0) a78 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  ժժվիժժ1uC ՀՀꀀժժ11000:II:b 510%b MODULE #3Fb SP$"SUBPROGRAM XX/3":40010ub A232010,33010,34010,35010,3710,3810,3910b~SP$"":RE:SY,3:PC,7,5:TX,"MAYBE YOU SHOULD GET HELP.":PC,12,7:TX,"THEN COME BACK.":35010bbFb510b }b}c}cQ0@!n҉@K;S]҉@@%p/@t;e4y`````~!8@\sXn8*[,@7[҉@\cYN8 ( o=% :% @!(dL a @;,Ir8! ! %lY a P5;P!8 a ( g;#JrJ%Y@#8"Xky/J%n81u@07 ,p);;:y@ޛ\@0.Y҉@[-@҉mʳ8:{ n xy;# @4 5ydy@Yd=nkr;/P) a | ]w ֚ꪪ@p<몪@تժժꅅ``pתꪺp`߫뫪1uC ꪪ뇇`뚚  X1NQ6 DISPLAY QUESTIONS AND SPEECH FOR QUESTIONI ANSWER ENTRYu SY,3:PC,PS,11: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,"J(NS(1)1):JJ1140/ J1J:JNSRN1N SET UP QUESTIONS i J1010,1110,1210,1310 SET UP SCREEN AND SCREEN PARTICULARS SY,3:DE,1,17,40,18:INV:FI:NO FTXN,P,1,11,N1$,PR$,R% 5010 BEGIN QUESTION LOOP )::NF$"SRF-"N1$ 3SN(785)4 <L$(10),IX$(10)n FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE." PNS3:SP6:NQ1:RR%3 _4010: aFTXN,P(4),1,1,N1$,PR$,R% d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xSY,3 RN0JJ1:150   2790260010D SUB-PRG XX/5 GRADE-3C MAIN IDEA# 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)   PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"Fj:D$;"RUN HELLOHI1" ,# 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$((IȲ 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,0-J770,A2::SY,3::  INSTRUCTIONS AND BLOADSS21:100:"PRESS A OR B TO SHOW THE OUTCOME.":w"HIT RETURN TO GO ON.":1:255}(4);"BLOAD BTCPO-1-L1-D11,A27904"(4);"BLOAD BTCPO-2-L1-D11,A28154""(4);"BLOAD BTCPO-3-L1-D11,A28404"$W18)A25:40010*c END QUESTION LOOP4e3010:hPm END SCREEN LOOPYr120r DATA FOR QUESTIONSL$(1)"B":P27904BVL$(1)"B":P28154L$(1)"A":P28404  PAUSE SUBS I1500:II:: I11000:II:TIME USED FOR SOUND 300: "SN1āI15:TN,255,10: #CO,4:PC,1,9:INV:TX,L$(X):16368,0:R$::PC,1,9:NO:TX," " , SCORING 1L$L$(X)RR1:RRRR1:WR0 6L$L$(X)WW1:WRWR1:RR0 @5010 JRR3A27:40010T(WR5)(NF$;",A768,L127":::"BYE":D$;"RUN HELLOHI1"Z (L$"A"L$"B")(SN1)ĺ(7):1:260 (L$"A"L$"B")(SN1)Ģ1:260 L$L$(X)ī290 L$L$(X)įPC,12,9:TX,"GOOD" SN1āI200205:TN,I,5: SN1āI11000:I: PAUSE IF NO NQ4 SY,1:DE,1,7,20,8:INV:FI:NO:DE,1,1,20,10d DISPLAY QUESTIONS AND SPEECH FOR QUESTIONw ANSWER ENTRY SY,3:DE,1,13,40,13:CO,4:FI:CO,2:SY,1 PC,1,8:TX," ":PC,1,8:L$" ":ENS,L$,1,T%,AL%. (L$)27Ĺ769,SP::D$;"BSAVE "; J1J:JNSRN14 SET UP QUESTIONS J J1010,1110,1210u SET UP SCREEN AND SCREEN PARTICULARS FTXN,P,1,2,N1$,PR$,R% DE,1,1,40,1:CO,4:FI:DE,1,13,40,13:FI:DE,1,1,40,20:CO,2 5010 BEGIN QUESTION LOOP X1771))::NF$"SRF-"N1$$ 3SN(785)8 <L$(10),IX$(10)r FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE." PNS3:SP1:NQ1:RR%3 _4010 d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xSY,3: RN0JJ1:150 J(NS(1)1):JJ1140H  2790260010H SUB-PRG XX/1 GRADE-1C PREDICTING OUTCOMES# 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$((I     cJTX,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,0J770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"j:D$;"RUN HELLOHI1" W$((WERS THE QUESTION.";3" HIT RETURN TO GO ON.";A1:255:b(4);"BLOAD BTCDC-1,A27904"(4);"BLOAD BTCDC-2,A28154""(4);"BLOAD BTCDC-3,A28404"$ DISPLAY SCORE6SY,3:CO,2:DE,1,1,40,20:PC,1,19:RR$(RR%):TX,"GOAL = ": END SCREEN LOOPr1202 DATA FOR QUESTIONSHL$(1)"C":P27904NBdVL$(1)"B":P28154jL$(1)"C":P28404  PAUSE SUBS   INSTRUCTIONS AND BLOADS21:100"PRESS THE LETTER OF THE WORD THAT ANSC,14,9:TX,L$(X):I12000:& %3010= &16368,0:R$:1:K , SCORINGl 1L$L$(X)RR1:RRRR1:WR0 6L$L$(X)WW1:WRWR1:RR0 @5010 JRRRR%A27:40010 T(WR5)(W18)A25:40010 c END QUESTION LOOP e3010 hm0& (L$"A"L$"C")(SN1)Ģ1:260: L$L$(X)ī290q L$L$(X)įPC,12,9:TX," ":PC,12,9:TX,"GOOD" SN1āI200205:TN,I,5: SN1āI11000:I: PAUSE IF NO TIME USED FOR SOUND 300 "SN1āI15:TN,255,10: $CO,4:P X1NQ: DISPLAY QUESTIONS AND SPEECH FOR QUESTIONM ANSWER ENTRY PC,14,8:L$" ":TX," ":PC,14,8:ENS,L$,1,T%,AL% (L$)27Ĺ769,SP::D$;"BSAVE ";NF$;",A768,L127":::"BYE":D$;"RUN HELLOHI1" (L$"A"L$"C")(SN1)ĺ(7):1:26140 J1J:JNSRN17 SET UP QUESTIONS R J1010,1110,1210,1310} SET UP SCREEN AND SCREEN PARTICULARS FTXN,P,1,2,N1$,PR$,R% CO,4:DE,1,1,40,1:FI:DE,1,12,40,12:FI:DE,1,1,40,20:CO,2 5010 BEGIN QUESTION LOOP I771))::NF$"SRF-"N1$& 3SN(785): <L$(10),IX$(10)t FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE." PNS3:SP12:NQ1:RR%3 _4010 d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xSY,3: RN0JJ1:150 J(NS(1)1):JJ1  2790260010J SUB-PRG XX/7 GRADE-1C DRAWING CONCLUSIONS# 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$((   ,Hy84e sJ%)s )P/ (e#( !0!P,*gC8stJ%P) /0/ )P4y84P7( ) iseL(s=Rd`````~(p s@;D,s=n8 r8P-Ia;D4P&,9n[8 ( 9n[8 ( !@3%9@e /9n[4P;(p;3eo /;88 n=m\@y ԮՀՀ몪ժվժժҀЄ1u3 Հ ۊ몪@@{`@@  1um)v'Yn ;%@,L`"|8n ( \)| ΀!)a#8@+e_ SSONXX" j:D$;"RUN HELLOHI1" CPRG XX/5 GRADE-1C DETAILS# 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))::NF1,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,0J770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LEY21:"READ THE STORY. PRESS THE LETTERS OF THE WORD THAT ANSWERS EACH QUESTION.";}:"HIT RETURN TO GO ON.";:1:1:255(4);"BLOAD BTCD-1,A27904"(4);"BLOAD BTCD-2,A28154"$ DISPLAY SCOREaSY,3:CO,2:DE,1,ION LOOPe3010h.m END SCREEN LOOP7r120P DATA FOR QUESTIONSL$(1)"RED":L$(2)"NEW":L$(3)"NED":P27904BVL$(1)"OLD":L$(2)"TAG":L$(3)"PIE":P28154 PAUSE SUBS   INSTRUCTIONS AND BLOADS10000 "SN1āI15:TN,255,10:: $PC,38,10X:TX,L$(X)D %3010[ &16368,0:R$:1:i , SCORING 1L$L$(X)RR1:RRRR1:WR0 6L$L$(X)WW1:WRWR1:RR0 @5010 JRRRR%A27:40010 T(WR5)(W18)A25:40010c END QUESTL127":::"BYE":D$;"RUN HELLOHI1"E (AL%0)(SN1)ĺ(7):1:260b (AL%0)(SN1)Ģ1:260v L$L$(X)ī290 L$L$(X)įSY,1:PC,14,9:TX,"GOOD" SN1āI200205:TN,I,5: SN1āI11000:I: PAUSE IF NO TIME USED FOR SOUND 3SY,3:DE,1,17,40,18:INV:FI:NOX SY,3:DE,34,10,40,12:INV:FI:NO:DE,1,1,40,20 DISPLAY QUESTIONS AND SPEECH FOR QUESTION SY,3:PC,34,10X ANSWER ENTRY L$" ":ENS,L$,3,T%,AL%# (L$)27Ĺ769,SP::D$;"BSAVE ";NF$;",A768,JNSRN1* SET UP QUESTIONS E J1010,1110,1210,1310p SET UP SCREEN AND SCREEN PARTICULARS FTXN,P,1,2,N1$,PR$,R% DE,1,1,40,1:CO,4:FI:DE,1,14,40,14:FI:DE,1,1,40,20:CO,2 5010 BEGIN QUESTION LOOP X1NQ# $"SRF-"N1$ 3SN(785). <L$(10),IX$(10)h FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE." PNS2:SP7:NQ3:RR%6 _4010 d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xSY,3: RN0JJ1:150 J(NS(1)1):JJ1140 J1J:"  2790260010> SUB-PRG XX/5 GRADE-1C DETAILS# 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))::NF     cT!7 @!@"@ #@%$@ @@@@@/A@0A @.A`NS`NLLS@L$  " NN NL5: NL=# OF LINES IN THE MENU ]LN$(NL): HOLINES IN RANGEINCREMENT TOO LARGEDUPLICATE LINE NUMBERSOUT OF MEMORYPROGRAM ON HOLD, USE "&M" TO RECOVERHOLD FILE IN USELIMITED MEMORY, MAY DESTROY PROGRAM CONTINUE (Y/N)?SYNTAX> 63999LINE TOO LONGINCREMENT = 0S(/S(bA6Ȫ`樥sthhRL`EȱEi樠 ȱȱ`ijEȱEi椠`H h`:808`ESIFee'Lѥȥ񥰶NO PROGRAM IN MEMORYNO ЀՀʪ׮ժեՕȨ֪ՕԥԔ1u[說ժ! ! !1ur)8nk9g nJ%:8 ) / nJ%;/LP#2I@-;z!m8@%0")@@'! 1u!4P#$[[083J%wk/#ﻥ a\҉@Y38a04P2@2s/ sJ%-g| /0" -z/k04P"LP!cMERLIN L)?JJȭ "I1" 1u PUU ***UUUU***ՀU@@@@(*+*UUUU***jUUUW****UUUU @@@/?ooUUU?: RB*+8@UUu@@@@@@@`oo???98:{{s<~zrBACG_~|oO'wr " " 1u|! =m;a!@4['@4 % p/ y,:%;z!m8@-3! %LId " 1u4@(0![ )\0@ \/@"N\ ) ) 98z! @43@4P"_@'@sId !;ވtK %k /(k;eAST, "