' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈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)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./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(#*!!.<,$94>94="4; +,E!r ; $ Hh Լ ռ ռ ռ`HJ>݌h Hh݌`DF DF /L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD#LHH`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  LӜsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\ IOÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( 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 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@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@ ,\Z[PRN,XɄOɊRQF(0Bhhhw4h/ ^0(p ߩRP1Q ɿ, P\L˵B̵C8pB߮Z\  յյ\BIR Z-^ Jp\IZLLӜ ( 2  Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B ߼ / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8` ܫ 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˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` Bl şL/Ơĵµ`ڿ8.ڿ.ۿ`êL`õĵ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 x(` d£àĠz# u`""""""< >> ""*: <"">""""""""""""">>><"""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6" 00@@@@@@@@||@@00 ||>>* (*""  *$**> "2*&" " >>  ">> "8""> pp  LL pp|| ||LL pp pp pp||@@@@@@@@@@@@  pp  00@@ LLLL<<  00@@00 pp@@@@@@@@@@pp pp LL<`x<|x??||@@ pp@@00 |||| || pp@@00 || pp||@@000000pp pp pp00@@@@00@@@@||@@@@``@||@@`0 @`0 pp LLl|<+*|_UUU|/****UUUUUU******}UUUU @p\VW`xnkjjjjWUUUU*******/=eUUUUUUU*******UUUUU}'+****jUUUu=/+*jj}--/+++*55555@p08800`UUUUUUUWjj*******+/}UUUUUUUUj******oUUUUUU+*****~WUUUUu?+****z_UUUUUU*****j:>5ՠժՊ@`|~  1u PUU ***UUUU***ՀU@@@@(*+*UUUU***jUUUW****UUUU @@@/?ooUUU?: RB*+8@UUu@@@@@@@`oo???98:{{s<~zrBACG_~|oO'wr 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 ~ꪪժߪꪪ~ЂՂՂՕ ՂՊЈՊՊЊ` ~~|~???>>>x@`x?|xpC@px~@@@0pppp`p !AAL@@@`xxx||~?A??~|ppxx|~@@pxxx||~@|_OOOOOO``@@@@``<xx@~`8<<\L @``p?`@@xqCCG~~~?8pA~p?@@|~?pp`@@@@@?@``pxCc#c~|xppppp@px|~$78ǹ769,A1:770,A2::(4);"BSAVE ";NF$;",A768,L127"LǯPC,9,13:TX,"PRESS RETURN TO START":PC,11,15:TX,"THE LESSON AGAIN."Vǹ16368,0:A$:A$(13)51030j:(4);"RUN HELLOHI1" E768,99:PC,1,1:CL,30:SP,220:TX,"PLEASE ENTER":PC,1,I1"ˆ769,A1:770,A2:35050gLj:(4);"BSAVE ";NF$;",A768,L127":::5:8:"BYE":I1500:II::̈(4);"RUN HELLOHI1"ꈭ(222)9Ĺ216,0:35015RE:TX,"DISK FULL":PC,1,5:MT,15:EN,N1$,10,T%:J769,A1:SP$""510O(4);"RUN ";SPIX),Y:W\32010 }%}0}345107ڄ RE:SY,3:PC,3,9:TX,"INSERT THE NEXT DISK.":PC,1,11:TX,"PRESS RETURN TO CONTINUE."A$:A$(13)34050Ά34520ӆ:(4);"DELETE ";NF$:(4);"RUN HELLOHI1"؆::(4);"RUN HELLOH:(4);"RUN REWARDS" :! k*RE::SY,3:CO,5(1):DE,1,1,40,20:FI:DE,2,2,39,19:INV:FI:NO:|> SOUNDS #1CY(40(1)4)HX(22(1)1)KI1703010:TN,(IX),Y:TN,(IX),Y:MY204695OI3017010:TN,(IX),Y:TN,(CO,5(1):DE,1,1,40,20:FI:DE,4,3,37,18:INV:FI:NOd0 CO,5(1):SY,1:PC,6,5:TX,"MARVELOUS!"2 SN0āI11000::2025: SN1İ4670v  COMPLETED SUBPROGRAM XX/13 32000 (770)834010 RE:SY,3:PC,15,10:TX,"WORKING...":5:TX," ":PC,5,6:TX," ":: SP,255 I16:CO,1:PC,5,5:TX," ":PC,5,5:TX," RIGHT ON! ": SN0ī2025 I200105:TN,I,10: J12000:JJ: :  COMPLETED SUBPROGRAM XX/126& RE::SY,3:??Apxp~p@~~~~}{AAas<A@``~~~~cccC|@x|OggsqO?`?|@|xA>~xqqqacCx?????~>>?x` ~~|~???>""""""""""""">>><"""">""" ""  ">"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     ```````wc````````?OgsyI>~|ysgo````````yy>oo`꯯ GGGGGGGGGGGGxxxxxxxxO~xxxxxxxx?')TUUU|xb *~|xxxxxxxx* y`wc?OgsyI>~|ysgoyy>oo`꯯?xp`@@@@@?@``px~~O~G??')TUUU|xb *~|* y67 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    ING PICTURES.":PC,7,12:TX,"PLEASE WAIT FOR 15 SECONDS."U`(4);"RUN MAKE A FACE"f` REWARD-CATq` 27902` ::RE:CO,4:FI:DE,2,2,19,9:INV:FI:NO:CO,3:PC,5,3:TX,"WORKING..."` (4);"BLOAD I.CAT,A6144":(4);"BLOAD I.CAT-1,A7680"*a X,N1$_J1T%:!_PC,X%,Y%*_INV6_TX,N1$D_J1T%:J_W_I1200g_SN1įCL,I_PC,I20((I1)20),1(I1)20_(NO:TX," ":INV:TX,N1$_Z__ MAKE A FACE_D$(4)_::RE9`SY,3:PC,10,10:TX,"I'M LOAD~ꪪժ 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"] 169,3,160,10,32,217,3,96,0,0,1,96,1,0,1,"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  {@~x@|??@@`x@`x|~|??x`x|ժ~~~~~~~~~~~~~~~~~ PC,15,10:TX,"WORKING..."@b^770,8:(13);(4);"RUNLESSONXX":WbjERROR ENCOUNTERED}bt(222)25540010:CTRL-C PRESSEDb~(13);(4);"RUNHELLO":TEREDbt(222)25540010:CTRL-C PRESSEDb~(13);(4);"RUNHELLO":NSY,1:CO,3:PC,3,3:TX,"CATS ARE PERFECT!"Ca CO,2:DP,6144,14,10Oa SP,245za I15:DP,7680,20,14:DP,6144,14,10:a 21:"PRESS RETURN TO CONTINUE.";R$a& aRETURN WITHOUT A REWARDaaaJGO BACK TO LESSONXXbT::RE::SY,3: HAVE"-SY,1:PC,19,10:DI,4:SN1įCL,40cRR$(RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,0CO,3:SY,1:PC,1,4:TX,BX$:CO,2J770,A2::SY,3::D$;"RUN LESSONXX"j:D$;"RUN HELLOHI1" ,]( ST% = 3: & RE: & TS,ST%: HOME : HGR AND ROOT"^"WORD WHICH FIT THE DEFINITION. (MAKE A WORD USING THE PREFIX AND THE ROOT.)";g255tK1:1:z$ 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,"YOU1)"IMPURE"bQvBX$" TRI RE BI ":IX$(1)"TWICE WEEKLY (WEEKLY)"f{L$(1)"BIWEEKLY"l} PAUSE SUBS   INSTRUCTIONS AND BLOADS:100 21:"READ THE DEFINITION AND THE ROOT WORD":"AFTER IT. TYPE THE PREFIX ICYCLE" 6LJBX$" DIS RE MIS ":IX$(1)"TO PLAY AGAIN (PLAY)"_OL$(1)"REPLAY"eBX$" UNI UN IN ":IX$(1)"NOT DIRECT (DIRECT)"L$(1)"INDIRECT"BX$" UN IM EN ":IX$(1)"NOT PURE (PURE)" L$(MIS IN UNI ":IX$(1)"AN OUTFIT FOR WORK (FORM)"L#L$(1)"UNIFORM"RnBX$" MIS RE UN ":IX$(1)"TO FAIL TO EXPLODE (FIRE)"L$(1)"MISFIRE"BX$" TRI BI UNI ":IX$(1)"A THREE-WHEELER (CYCLE)"L$(1)"TRIX$(1)"TO BRING INTO THE COUNTRY (PORT)">L$(1)"IMPORT"DBVBX$" DIS EN FORE ":IX$(1)"TO SURROUND (CLOSE)"[L$(1)"ENCLOSE"BX$" RE BI UNI ":IX$(1)"TO TURN BACK (VERSE)L$(1)"REVERSE" 8BX$" $L$(X)WW1:WRWR1:RR0% @5010> JRRRR%A27:40010_ T(WR5)(W18)A25:40010 ^ IF WR > 2 THEN GOTO 110 c END QUESTION LOOP e3010 h m END SCREEN LOOP r120  DATA FOR QUESTIONS+BX$" IM RE DE ":L$(L$,AL%) L$L$(X)282' 290\ PC,14,9:TX,"GOOD":SN1āI200205:TN,I,5:r SN1āI1950:{ 300 "SN1āI15:TN,255,10: #SY,1:PC,9,8:TX,L$(X) $16368,0:R$:; , SCORING 1L$L$(X)RR1:RRRR1:WR0 6LY,3:PS(21(IX$(1))2):PC,PS,4:TX,IX$(1)6 5010P BEGIN QUESTION LOOP\ X1NQo ANSWER ENTRY PC,9,6:L$" ":CO,4:ENS,L$,9,T%,AL%:CO,2 (L$)27Ĺ769,SP::D$;"BSAVE ";NF$;",A768,L127":::"BYE":D$;"RUN HELLOHI1" 40,18:INV:FI:NO:DE,1,1,40,205 RN0JJ1:150R J(NS(1)1):JJ1140g J1J:JNSRN1 SET UP QUESTIONS J1010,1110,1210,1310,1410,1510,1610,1710,1810,1910 SET UP SCREEN AND SCREEN PARTICULARS K0İ4010, S ):J 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$X 3SN(785)l <L$(10),IX$(10) FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE." PNS10:NQ1:SP9:RR%6 d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xSY,3:DE,1,1, 60010 279021 ONERR GOTO 60010Z SUB-PRG XX/9 LEVEL-5WA PREFIXES-2# VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982% INITIALIZATION ( ST% = 3: & RE: & TS,ST%: HOME : HGR          ?{@~x@|??~|~~@@`x@`x|~?~~xxxx~~??p|`~x`?~xp`@@@ժՊp~|~~:OV,0:CO,2:INV:FI:DE,1,1,40,20:NO:A(A$)n n MAKE A TUNEn ?x`x| ??p|`~x`?~xp`@@Lnh 255Rnm n DE,1,1,16,20,1,16,20:OV,0:CO,2:INV:FI:DE,1,1,40,20:NO:A(A$)=e VeJGO BACK TO LESSONXXeT::RE::SY,3:PC,15,10:TX,"WORKING..."e^770,8:(13);(4);"RUNLESSONXX":ejERROR ENCOUNTEREDet(222)25540010:CTRL-C PRESSED f~(13);(4);"RUNHE DP,35808,26,11:d /d DP,36448,21,13:Ed DP,36704,21,13:Kd ad DP,37216,23,15:wd DP,37488,24,15:dT 100::SY,3:DE,1,1,40,20dY 21d^ "ENTER A NUMBER AND PRESS RETURN."dc SN1āI200505:TN,I,5:dh 255dm 7e DE,17,6:DP,31824,35,6:c /c DP,32280,21,6:Dc DP,32632,21,6:Jc nc DP,33440,21,9:DP,33568,29,9:c DP,33696,21,8:DP,33824,29,8:c DP,33952,21,9:DP,34080,29,9:c DP,34208,20,8:c c DP,35552,25,10:c DP,35680,25,10:dI11000:4b :21:"PRESS RETURN TO CONTINUE.";R$?b 40010Ob( LOAD DATAlb2 D$;"BLOAD HPICS,A29800"rbK b DISPLAY IMAGESb DP,29800,20,1:b DP,30376,21,1:b DP,30792,21,1:b b DP,31368,17,6:DP,31520,35,6:c DP,31672,1,37760,3,1::DP,38032,3,6:DP,38304,3,122a2900QaPC,1,17:ENN,A$,1,TS%,AL%[a2995yaA2841,2842,2844: MOUTHaSN1āI120:TN,(200I),10:TN,(200I),10:a2995aPC,1,10:TX,"THAT WAS FUN!":PC,1,12:TX,"SEE YOU LATER!" bISSN02832,2834,2836: NOSE;`PC,1,1:DI,3:TX,"1 2":DI,0]`PC,1,12:TX,"3 NO MOUSTACHE"}`DP,36960,3,1:DP,37088,3,6`2900`PC,1,17:ENN,A$,1,TS%,AL%`2995`A2838,2840: MOUSTACHE`PC,1,1:DI,3:TX,"1 2 3":DI,0(aDP&_fA2823,2824,2826,2828,2830: EYES0_h2995W_iA52185: WHEN GLASS,SKIP NOSES_kPC,1,2:DI,3:TX,"1 2 3 4":DI,0_pDP,35936,5,1:DP,36064,3,5:DP,36192,3,9:DP,36320,4,13_u2900_zPC,1,15:ENN,A$,1,TS%,AL%_2995`A2831,0RR:TX,RR$::NO:CL,0:DI,0$hghJ770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"}hj:D$;"RUN HELLO" $UN LESSONXX"Mj::SY,3:PC,5,10:TX,"WORKING..."::(4);"RUN HELLOHI1":\ WORD ANALYSIS: ROOTS WITH PREFIXES AND SUFFIXES (PG.15)\"VERSION 1 DONE BY M.D. FULLMER ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982 ]%INENN,A$,1,TS%,AL%^929957^>A2819,2820,2822: BROWA^@2995p^CPC,1,1:DI,3:TX,"1 2 3 4 5":DI,0^OPC,3,16:TX,"EYE GLASSES"^RDP,34976,3,1:DP,35104,3,4:DP,35296,3,9:DP,35424,3,12^W2900^\PC,1,18:ENN,A$,1,TS%,AL%^a2995,16:TX,"NO SIDE HAIR"6]DP,31976,5,1:DP,32128,5,7@]2900_]PC,1,19:ENN,A$,1,TS%,AL%i] 2995] A2816,2818: BURNS]2995]PC,1,1:DI,3:TX," 1 2 3":DI,0]DP,32984,3,4:DP,33136,3,8:DP,33288,3,12]/2900^4PC,1,17: \60010\ 27902*\ MAKE A FACE6\D$(4)@\2610F\f\:D$;"BLOAD HEAD-A,A$2000"p\2900\A$" ":PC,2,19:ENN,A$,1,TS%,AL%\2995\A2810,2812,2814: HAIR\2995\PC,2,1:DI,3:TX,"1 2 3":DI,0]PC,4       $DISPLAY SCOREvSY,3:CO,2:PC,1,19:TX,"GOAL = ":RR$(RR%):TX,RR$:TX," RIGHT IN A ROW. YOU HAVE":SY,1:PC,19,10:DI,4:SN1įCL,40RR$(RR):INV:I0RR:TX,RR$::NO:CL,0:DI,0 J770,A2:::SY,3:29000::(4);"RIGHTFUL SIGHTLESS)I1NS:L2$(I):aOWN,KIND,COLOR,HELP,FAIR,FIELD,HONEST,FRIEND,SIGHTgByINSTRUCTIONS::10021:"READ EACH GROUP OF WORDS. THEN TYPE THEROOT WORD.";" HIT RETURN TO GO ON.";1:255:K1:1P,KINDNESS UNKINDLY KINDEST,DISCOLOR COLORLESS COLORFULLYHELPER HELPLESSNESS UNHELPFUL,FAIRLY UNFAIREST FAIRNESS,INFIELD FIELDER OUTFIELDER HONESTNESS DISHONEST HONESTLY,FRIENDLESS FRIENDSHIP UNFRIENDLY,UNSIGHTLY INS4A25:400100^ IF WR > 2 THEN GOSUB 4040NSY,1:PC,14,9:TX," "a130:END LOOPyDATA FOR QUESTIONS 8,9,6SUBPROGRAM NUMBER, NUMBER OF WORDS, NUMBER CORRECT TO GRADUATEI1NS:L1$(I):ADISOWN OWNER OWNERSHI:SN1āI1950:!3008"WW1:WRWR1:RR0V#SN1āI15:TN,255,10:$SY,1:CO,4:PC,7,7:INV:TX,L2$(J):16368,0:R$:(R$)13295%292'PC,7,7:NO:TX," ":;,SCORING@5010JRRRR%A27:40010 TWR: PRESSED AL%0277( 2808 SN1ĺ(7)D 1:250 N$L2$(J)282RR1:RRRR1:WR0:SY,1:CO,2:PC,14,9:TX,"GOOD":I200205:TN,I,5::300 290RR1:RRRR1:WR0:SY,1:CO,2:PC,14,9:TX,"GOOD":SN1āI200205:TN,I,5:CO,2* PC,21(L1$(J))2,5:TX,L1$(J)Y SY,1:DE,1,5,20,9:INV:FI:NO:CO,5(1) PC,7,6:ENS,A$,10,T%,AL%:N$(A$,AL%(AL%0)) (N$)27Ĺ769,SP%:RE:::(4);"BSAVE ";NF$;",A768,L127":PC,9,5:TX,"BYE":I15000::(4);"RUN HELLOHI1": "6 `CO,4:SY,3:DE,1,3,38,7:FI:NO:DE,1,1,40,20Y c4010:5010:DIRECTIONS, SCOREp dBEGIN SCREEN LOOP x1000:GET DATA RWNSJJ1:150 J1J:J(NS(1)1):JJ1140 : BEGIN QUESTION LOOP SY,3:DE,2,4,37,6:INV:FI:NO$:N1$=STUDENTS NAME, NF$=STUDENTS FILENAME9 3SN(785)f <L1$(NS),L2$(NS): L1$=WORD L2$=ANSWER FR0:RR0:W0:WR0:J0: R=NUMBER RIGHT RR=NUMBER RIGHT IN A ROW W=NUMBER WRONG WR=NUMBER WRONG IN A ROW J=INDEX VARIABLE  PT%0:AL%0:A$" ITIALIZATION\ ( ST% = 3: & RE: & TS,ST%: TEXT : HOME : HGR : REM ST%=SUPERTALKER SLOT d ): -SP%,NS,RR%: SP%=SUBPROGRAM NUMBER NS=NUMBER OF WORDS RR%=NUMBER CORRECT TO GRADUATE+ 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1N 60010& ONERR GOTO 600102:27902Q SUBPROGRAM XX/8 GRADE-4 WORD ANALYSIS: ROOTS WITH PREFIXES AND SUFFIXES (PG.15)"VERSION 1 DONE BY M.D. FULLMER ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982 %IN         00,2000,3000,4000^,40010"^7^ NAME IN LIGHTSd^N1$"":I1(771):N1$N1$((771I)):n^BT%40^LL%20(N1$)^VRE:^`I140^aX%1L%(1):Y%110(1)^dSN1įTN,200(1),50(1)^eCO,4.5(1)^jPC,X%,Y%^tNO_~T. MAKE A FACE"0]FPC,5,11:TX,"3. WINKING CAT"e]PPC,5,13:TX,"4. SKIP REWARD: GO TO NEXT LESSON"p]cN$"1"]dPC,5,17:TX,"ENTER SELECTION AND PRESS RETURN "]iPC,5,15:TX," ":PC,5,15]nENN,N$,1,TS%,L%:N$"1"N$"4"ĺ(7):105^(N$)10 \60010\ REWARDS)\LEVEL 6/14\27902B\(::RE:~\-CO,4:FI:DE,2,2,19,9:INV:FI:NO:CO,2:DE,1,1,20,10\2SY,3:PC,14,4:TX,"REWARDS MENU"\7PC,14,5:TX,"------------"\<PC,5,7:TX,"1. YOUR NAME IN LIGHTS"]APC,5,9:TX,"2    : :29000::(4);"RUN LESSONXX"bfj::SY,3:PC,5,10:TX,"WORKING..."::(4);"RUN HELLO":RIGHT IN A ROW. YOU HAVE":CSY,1:PC,19,10:DI,4:SN1įCL,40xRR$(RR):INV:I0RR:TX,RR$::NO:CL,0:DI,0~J770,A2:::SY,3:29000::(4);"RUN LESSONXX"j::SY,3:PC,5,10:TX,"WORKING..."::(4);"RUN HELLOHI1":LTIONL](ND,TIGHT,HELP,SICK,ACT,WALK,JUDGE,DRY+B=INSTRUCTIONSC:N:100n21:"TYPE THE ROOT WORD.";:"HIT RETURN TO GO ON.";1:255:K1:1$DISPLAY SCORESY,3:CO,2:PC,1,19:TX,"GOAL = ":RR$(RR%):TX,RR$:TX," ND LOOPDATA FOR QUESTIONS/ 7,9,6sSUBPROGRAM NUMBER, NUMBER OF WORDS, NUMBER CORRECT TO GRADUATEI1NS:L1$(I):VISITOR,FRIENDSHIP,TIGHTNESS,HELPER,SICKNESS,ACTOR,WALKER,JUDGESHIP,DRYNESSI1NS:L2$(I):%VISIT,FRIE$SY,1:CO,4:PC,7,8:INV:TX,L2$(J):16368,0:R$:(R$)13295K%292l'PC,7,8:NO:TX," "y,SCORING@5010JRRRR%A27:40010TWR4A25:40010^ IF WR > 2 THEN GOSUB 4040SY,1:PC,14,9:TX," "130:ERESSED AL%0277 280. SN1ĺ(7): 1:250M N$L2$(J)282V 290 RR1:RRRR1:WR0:SY,1:CO,2:PC,14,9:TX,"GOOD":SN1āI200205:TN,I,5: SN1āI1950: 300 "WW1:WRWR1:RR0 #SN1āI15:TN,255,10:B5(1)* PC,11(L1$(J))2,3:TX,L1$(J)N SY,1:DE,1,5,20,9:INV:FI:NO PC,7,7:ENS,A$,10,T%,AL%:N$(A$,AL%(AL%0)) (N$)27Ĺ769,SP%:RE:::(4);"BSAVE ";NF$;",A768,L127":PC,9,5:TX,"BYE":I15000::(4);"RUN HELLOHI1":: PSY,3:DE,3,3,38,8:FI:NO:DE,1,1,40,20J c4010:5010:DIRECTIONS, SCOREa dBEGIN SCREEN LOOPu x1000:GET DATA RWNSJJ1:150 J1J:J(NS(1)1):JJ1140 : BEGIN QUESTION LOOP SY,3:DE,4,4,37,7:INV:FI:NO SY,1:CO, NAME, NF$=STUDENTS FILENAME* 3SN(785)W <L1$(NS),L2$(NS): L1$=WORD L2$=ANSWER FR0:RR0:W0:WR0:J0: R=NUMBER RIGHT RR=NUMBER RIGHT IN A ROW W=NUMBER WRONG WR=NUMBER WRONG IN A ROW J=INDEX VARIABLE PT%0:AL%0:A$"SICK "' `CO,4: ST% = 3: & RE: & TS,ST%: TEXT : HOME : HGR : REM ST%=SUPERTALKER SLOT U ): -SP%,NS,RR%: SP%=SUBPROGRAM NUMBER NS=NUMBER OF WORDS RR%=NUMBER CORRECT TO GRADUATE 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$:N1$=STUDENTS 60010' ONERR GOTO 600103:27902R SUBPROGRAM XX/7 GRADE-4 WORD ANALYSIS: ROOTS AND SUFFIXES (PG.14)" VERSION 1 DONE BY M.D. FULLMER ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982%INITIALIZATIONM (         ժՊxp|">~xpUj+U*U*u_*=x@|x+U*U*U*u@@@ЪՂժժժ>~G@?xxxU*U*U*u-pG@@~A?~?ժx~A@c@~p?pԪժժp~@`CԪժժx`px""""""|x4:SN1įCL,40DRR$(RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,0JsJ770,A2::SY,3::D$;"RUN LESSONXX"j:D$;"RUN HELLOHI1".MBER: RR%=RIGHT IN A ROW GOAL\ NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIONS\"SP6:NS12:RR%6:NQ1b]THESUFFIXES IN THE BOX.";;" HIT RETURN TO":"GO ON. ";D1:M255UK1[$o 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,"FOOL":L$(1)"ISH"*X>BX$"ONE WHO RIDES IN A BALLOON":CX$"BALLOON":L$(1)"IST"^o PAUSE SUBSu {  INSTRUCTIONS AND BLOADS10021:"READ THE CLUE. TYPE THE SUFFIX THAT GOES WITH THE REST OF THE WORD. USE JBX$"FOND OF READING":CX$"BOOK":L$(1)"ISH"5bBX$"AT EASE":CX$"COMFORT":L$(1)"ABLE"hBX$"ONE WHO TRAVELS FOR FUN":CX$"TOUR":L$(1)"IST"bvBX$"SOMETHING THAT BOTHERS":CX$"ANNOY":L$(1)"ANCE"BX$"NOT CLEVER":CX$X$"GREEN":L$(1)"ISH"SBX$"A SHOW OR PROGRAM":CX$"PERFORM":L$(1)"ANCE"Y BX$"PLEASANT":CX$"AGREE":L$(1)"ABLE"nBX$"A PERSON WHO PAINTS":CX$"ART":L$(1)"IST"BX$"AID OR SUPPORT":CX$"ASSIST":L$(1)"ANCE"6/(W18)A25:400104^ IF WR > 2 THEN GOTO 110Lc END QUESTION LOOPVe3010]hXm END SCREEN LOOP ********************r120 DATA FOR QUESTIONSBX$"CAN BE RETURNED":CX$"RETURN":L$(1)"ABLE"BVBX$"SLIGHTLY GREEN":C205:TN,I,5:3007"SN1āI15:TN,255,10:\#LWLC(CX$):PC,LW,12:TX,L$(X)q$16368,0:R$:;{&3010, SCORING1(L$L$(X))RR1:RRRR1:WR06(L$L$(X))WW1:WRWR1:RR0@5010JRRRR%A27:40010T(WR5)8U*}U*U~+U*p@ Ԫ@>U*U*Uj~@Ъ|/U*}~G@@@kU*U*U*//5@G?@@~A?xԪժժ@~A@x~Ъժժx`px""""~x?|0U*/U*U*?U* p@"Ԃ~p/U*U*U*}@@@Ъ |U*~G@?`nU*U*U*=-`G?@ @~A?|Њժ~A?x,AL% AL%0L$"X":270, L$(L$,AL%)? (L$)27280k 769,SP::D$;"BSAVE ";NF$;",A768,L127" ::"BYE":D$;"RUN HELLOHI1" L$L$(X)290 SY,1 PC,12,8:TX," ":PC,12,8:TX,"GOOD": SN1āI11000:SN1āI2001,20,10:SY,3" PC,1,10:TX,BX$< LC39(CX$)(L$(1))R PC,LC,10:TX,CX$ BEGIN QUESTION LOOP ******************** X1NQ DISPLAY QUESTIONS AND SPEECH FOR QUESTION ANSWER ENTRY SY,3:CO,2 L$" " ENS,L$,4,T%:JJ1140 J1J:JNSRN1> SET UP QUESTIONS J1010,1110,1210,1310,1410,1510,1610,1710,1810,1910,2010,2110 SET UP SCREEN AND SCREEN PARTICULARS K0İ4010 5010 SY,3:CO,2 SY,1:DE,1,3,20,9:INV:FI:NO:DE,1,N0:J0:PR$"PRESS RETURN TO CONTINUE."4 P PROMPTQ TSY,1:CO,4:PC,1,1:INVo VTX," ABLE IST ANCE ISH "w XNO ZBL$" " d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xDUMMY0: THIS IS A DUMMY STATEMENT RN0JJ1:150 J(NS(1)1)# VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982w % INITIALIZATION (ST%3:RE:: 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$ 3SN(785) <L$(10),IX$(10)' FD$(4):WR0:R  27902600107 LEVEL 6 SUBPROGRAM XX/6Y WORD ANALYSIS: SUFFIXESk BILL WAGNERy 5-20-82 SP=SUBPROGRAM NUMBER: RR%=RIGHT IN A ROW GOAL NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIONS"SP6:NS12:RR%6:NQ1b        [Հp?"p+U*U*U|G@Vj*=U*'Uj+5|@Ъ@@p?Ԫժժx@`~ժժժ|``>">"">"xx`?0U*Uj+U*Uj`@ժՀ@`*U*u@[Ղ| >U*U*U~G@|\j/U*}*+5~@@@p?@Ԫժժx@~?p[Ԫժժ|`pp"">""xx@8U*UoW*U*`@ժxW*U*UzxՂ~p_*U*U~G@xpjU*U*Uj++5@S " fNO\fSY,3:CO,2:PC,1,19:TX,"GOAL = 6 RIGHT IN A ROW.":PC,28,19:TX,"YOU HAVE"ffSY,1fPC,19,10:DI,4:CL,40:RR$(RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,0ffJ770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"gjS FOR SHORT.";eTA,27904,3Ae" HIT RETURN TO GO ON.";:1:He1PeK1ue:(4);"BLOAD PW-BELL-9,A27904"eI1550:II:: (PAUSE)ee DISPLAY SCOREfSY,1:DE,1,1,20,10:CO,2:INV:PC,1,8:TX," PEACH = L ":PC,1,9:TX," DESK = d SY,1d 9d:(4);"BLOAD PWI-RLSV-LE,A27904"?ddd21:"I WILL NAME THE PICTURE.";zdTA,27904,1:4080d" IF YOU HEAR THE LONG /E/ SOUND, PRESS L FOR LONG.";dTA,27904,2:4080e" IF YOU HEAR THE SHORT /E/ SOUND, PRESS "BLOAD ";IX$(I);",A6144"+c I1I%2:J%1?c I2I%14:J%1Sc I3I%25:J%1{c (IX$(3)"I.DESK")(I3)I%26:J%3c (IX$(2)"I.TENT")(I3)I%I%1c (IX$(1)"I.BELL")(I1)J%J%1c (IX$(3)"I.SLED")(I3)J%2c DP,6144,I%,J%d1)"BEETS":W$(2)"BEADS":W$(3)"SLED"GbCL$(1)"L":L$(2)"L":L$(3)"S"Mbb:IX$(1)"I.EGG":IX$(2)"I.TENT":IX$(3)"I.WHEEL"b2300bW$(1)"EGG":W$(2)"TENT":W$(3)"WHEEL"bL$(1)"S":L$(2)"S":L$(3)"L"bbI13bSY,3c (4);cTIM:RR$(RR%):TX,RR$:TX," RIGHT IN A ROW. YOU HAVE":]SY,1:PC,19,10:DI,4:SN1įCL,40RR$(RR):INV:I0RR:TX,RR$::NO:CL,0:DI,0'4,8,6J770,A2:::SY,3:29000::(4);"RUN LESSONXX"j::SY,3:PC,5,10:TX,"WORKING...":;ժժժ~@@">">"@~x`W*U*U*U*U`@>ժՊ`?p~?{~^*U*U*U |G@@Wj*e+Uj*5|@Ԫ@@p|ժժժ|@?x`;ժժժ~`""""""`~p0U*U*U*U*U:`@ժՂ`?~Uj?6 RIGHT IN A ROW.":PC,28,19:TX,"YOU HAVE"5fSY,1fPC,19,10:DI,4:CL,40:RR$(RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,0ffJ770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"fj:(4);"RUN HELLO"(4);"RUN HELLO"ESSON TO GO ON.";:1:e1!eK1Fe:(4);"BLOAD PW-RAKE-9,A27904"ceI1550:II:: (PAUSE)ie}e DISPLAY SCOREeSY,1:DE,1,1,20,10:CO,2:INV:PC,1,8:TX," RAKE = L ":PC,1,9:TX," SACK = S "eNO+fSY,3:CO,2:PC,1,19:TX,"GOAL = LA,A27904"d5d21:"I WILL NAME THE PICTURE.";KdTA,27904,1:4080d" IF YOU HEAR THE LONG /A/ SOUND, PRESS L FOR LONG.";dTA,27904,2:4080d" IF YOU HEAR THE SHORT /A/ SOUND, PRESS S FOR SHORT.";dTA,27904,3e" HIT RETUR";IX$(I);",A6144"$c I1I%2:J%18c I2I%14:J%1Lc I3I%25:J%1qc (IX$(3)"I.GLASS")(I3)I%26c (IX$(2)"I.SNAKE")(I2)I%13c (IX$(2)"I.GRAPES")(I2)I%16c DP,6144,I%,J%c c SY,1c d:(4);"BLOAD PWI-RLSV-W$(2)"GRAPES":W$(3)"FAN"W$(1)"CAGE":I,4:SN1įCL,40ERR$(RR):INV:I0RR:TX,RR$::NO:CL,0:DI,0KV'4,8,6J770,A2:::29000::(4);"RUN LESSONXX"j::SY,3:PC,5,10:TX,"WORKING..."::(4);"RUN HELLOHI1":XATIONAL COMPUTER INC. COPYRIGHT 1982]%INITIALIZAT1::(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ÇՀՕ񅅕ÃӪժՕӂՀՊӪժ1u Ã𿟏  c MERLIN 7 @!@"@ #@%$@ @@@@@/A@0A @.A`NS`NLLS@L$  " NN ***************\NSP13: NSP=#OF SUBPROGRAMS\NL4: NL=# OF LINES IN THE MENU]LINES 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(bA6z!#?? ͠د ͠د͠د ɮˠɮŭɮ˭ƭ͠د ͠د ͠د ɠ  ƠҠ  и ͭӠ ɮϠ ɮǠɮҠ ɮР! ɮԠ" ɮӠ ɮӠ ɮŠ ɮˠ  Ϡ ɮȠɮŠɮР ɮӠ ɮŠ ɮԠ ɮŠ  ɮԠɮĠɮǠ ɮР ɮȠɮˠɮǠ ͠د!Ӡ" ɮǠƭ͠Š"ƭ٠! ƭΠ ɮԠ Ӡ ŠŠ ɮԭɮҭɮԠ͠د  ͠د ͠د"ɮˠӠ$ ĭ" ɮǠɮΠɱرؠɮ̠͠د ͠د͠دժժժժժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂիվծժվկ׺վկժժժժժժիժժժժժժժժժՂw]Aacgw]Aa]gwAcc]wqgc]a]AAac]g||ծպժժժժժժժժժժժժժժժժժժՂծժպժժժժժժժժժժժժժժժժժժՂ ժժժժժժժժժժsgxxxxժժժժՂjU@||ժժժժժժժժ3fsg~OgcxժժժժՂ*]*D          ! ! ! ! ! Ȫ`樥sthhRL`EȱEi樠 ȱȱ`ijEȱEi椠`H h`:808`ESIFee'Lѥȥ񥰶NO PROGRAM IN MEMORYNO sՆtֆstsưƯsgůhhijg` Lӆ Ԇ8stijRLghLABCՆ>ֆ?sȥ Ȫ͆0 ҅ >&eeUMBER$aSP1360: INVALID CHOICE=aSPNL1580: STOPaaSPNL360: INVALID CHOICE aSPNN(SP): PICK UP ACTUAL S/P # BASED ON MENU CHOICEa&769,SP: POKE SUB-PROGRAM NUMBERa0(4);"RUN LESSONXX"a:aD:RE:SY,3bNPC,10,10:YPE A LESSON NUMBER, OR"Z`PC,1,(LSNL8):TX,"HIT RETURN TO START WHERE YOU LEFT OFF."l`PC,1,LSNL9u`FL4`L$" "`EN,L$,FL,T%,A%`(L$)27580`A%0560: IF ONLY CR THEN GOTO LESSONXX FOR SRFaSP(L$): SP=SUB-PROGRAM NFI)_kDE,2,LS2,38,LSNL4:INV:FI:NO3_lCO,2E_mDE,1,1,40,20__rPC,3,LS2:TX,LN$(0)k_|I1NL_PC,3,(LSI3):TX,LN$(I)__PC,3,(LSNL4)_ST$(NL1)_TX," ":TX,ST$:TX,". --- STOP ---"`PC,1,(LSNL7):TX,"PLEASE T- MIDDLE LEVELS",^LN$(1)" 1. PREFIXES"H^LN$(2)" 2. SUFFIXES"f^LN$(3)" 3. ROOT WORDS"^LN$(4)" 4. PREFIXES/SUFFIXES"^J ********************^T THIS CODE DISPLAYS MENU^^:^hRE:SY,3^iCO,4_jDE,1,LS1,39,LSNL5:LN$(NL): HOLDS MENU TEXT`]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)11^LN$(0)" STRUCTURAL SKILLS \390765\d HELLO PROGRAM - FILENAME HELLOHI1}\i PACKAGE 3 / DISK 1 / SIDE 1 - STRUCTURAL SKILLS - MIDDLE LEVELS\n120\x768,0:769,0\ ********************\NSP13: NSP=#OF SUBPROGRAMS\NL4: NL=# OF LINES IN THE MENU]     69,SP::D$;"BSAVE ";NF$;",A768,L127":::"BYE":D$;"RUN HELLOHI1"U L$L$(X)282^ 290 SY,1:PC,14,9:TX,"GOOD":SN1āI200205:TN,I,5: SN1āI1950: 300 "SN1āI15:TN,255,10: $SY,3:PC,25,52X:TX,L$(X):16368,CO,5(1):PC,8,1:INV:TX,L$(6):NO/ 5010I BEGIN QUESTION LOOPU X1NQd K0İ4000n SY,3 DISPLAY QUESTIONS AND SPEECH FOR QUESTION SY,3:PC,25,4X2 ANSWER ENTRY L$" ":ENS,L$,11,T%,AL%C (L$)27Ĺ7,3:DE,1,1,40,18:INV:FI:NO:DE,1,1,40,20@ RN0JJ1:150] J(NS(1)1):JJ1140r J1J:JNSRN1 SET UP QUESTIONS J1010,1110,1210,1310 SET UP SCREEN AND SCREEN PARTICULARS FTXN,P(J),4,6,N1$,PR$,R%% SY,1: HGR ):O 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$] 3SN(785)q <L$(10),IX$(10) FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE." PNS4:SP10:NQ5:RR%6 _4000 d BEGIN SCREEN LOOP nR0:RR0:X0+ xSY 60010 279021 ONERR GOTO 60010_ SUB-PRG XX/10 GRADE-5WA SUFFIXES# VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982% INITIALIZATION ( ST% = 3: & RE: & TS,ST%: HOME :@`px8p`@@@p88p`````````ppxx@`p`?|~````````pp`|~p@?````````|`x@?@````pp1u`````~?@`|x`````````@x~p|?   ժhtH"                TX," ":PC,3,5:TX,"NOW YOU'RE ROLLING!"} DP,6144,13,13:SP,250:I110:DP,7424,14,18:DP,6144,13,13::SP,255 I12000:II: RE  COMPLETED SUBPROGRAM XX/11 :RE. SP,240:FI:CO,3:PC,5,4:TX," ":PC,5,XX/9 4650= CO,5(1):SY,1:PC,6,5:TX,"GOOD WORK !"M SN0ī2025] SN1İ4670cJ T COMPLETED SUBPROGRAM XX/10 :::SY,3:PC,5,10:CO,2:TX,"WORKING..." (4);"BLOAD I.TRUCK,A6144":(4);"BLOAD I.TRUCK-1,A7424"2 PC,5,10:C,3,5:TX," ":PC,3,6:TX," "} PC,3,7:TX," ":PC,3,8:TX," " CO,2:PC,3,5:TX," GREAT ":SY,1:PC,3,6:TX," WORK! " I11000:II:  COMPLETED SUBPROGRAM 025< I200105:TN,I,10:3A J12000:JJ:9 X COMPLETED SUBPROGRAM XX/8u :RE:CO,3:SN1įCL,40 SP,255:I120:J110:PC,I,J:TX,"8":SN1įTN,I,5 : PC,3,3:TX," ":PC,3,4:TX," "; P,12:NO:DP,6144,15,12:SN1įTN,255,200. = SN02520G 4670W I12000:] }( COMPLETED SUBPROGRAM XX/72 RE::SY,3:CO,5(1):DE,1,1,40,20:FI:DE,7,7,33,13:INV:FI:NO3 CO,5(1):SY,1:PC,6,5:TX,"FANTASTIC!"9 SN0ī2ETED SUBPROGRAM XX/5j 4650Mt CO,5(1):SY,1:PC,6,5:TX,"GOOD WORK !"]u SN0ī2025m~ SN1İ4670s  COMPLETED SUBPROGRAM XX/6 RE::(4);"BLOAD I.HEART,A6144" PC,2,3:TX,"YOU'RE DOING FINE!"( I15:CO,2:INV:DP,6144,15 SUBPROGRAM XX/4- :RE:CO,3:SN1įCL,40g SP,255:I120:J110:PC,I,J:TX,"X":SN1įTN,I,5o :$ CO,5(1):PC,4,4:TX," ":PC,4,6:TX," ":SY,1:PC,4,5:TX," OUTSTANDING! ". I11000:II:V ` COMPLMPLETED SUBPROGRAM XX/3@RE::(4);"BLOAD I.LADDER-1,A6144"PC,2,2:TX,"YOU'RE":PC,2,4:TX,"MOVING":PC,4,6:TX,"UP."J1511:DP,6144,21,J:SN1įTN,10J,50SN0āI12000::22904670I12000:COMPLETED:CO,(I1):PC,5,5:TX," GOOD START!!":4SP,255DSN0ī2025`I200105:TN,I,10:tJ12000:JJ:z*4COMPLETED SUBPROGRAM XX/2746509CO,5(1):SY,1:PC,6,5:TX,"WELL DONE !"=SN0ī2025>SN1İ4670CO     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/1 :RE:SN1įCL,40(SP,240:I04:FI10,1910 35010 A1A11. RE:TS,ST%? A1NS34010P  MODULE #NV | 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 0E ^L1(N1$):A1(769):771,L1:I1L1:771I,((N1$,I,1))::515} 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,19,17,17:EN,SN$,1,T%,AL%:(SN$)27N1$(27):330M LSN$"Y"SN$"N"ī331h 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)6343:TX,"YOUR NAME.":CL,0:SP,2555 FN1$" "s 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"1 KSY,3:PC,1,17:TX,"SOUND ON? (Y,N) ":SN$" ":PC  60010 LESSONXX19nST%3:SUPERTALKER SLOTXsNS13: # OF SUBPROG'S suSN(785): SOUND FLAGx::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,        I24:P(I)P(I1)(6148I):):10021:"READ THE SUFFIX. IF IT GOES WITH THE ROOT TO MAKE A NEW WORD, TYPE THE NEW WORD. OTHERWISE, PRESS THE / SLASH KEY.""HIT RETURN TO GO ON. ";255K1:1:$ DISPLAY SCORErS" pL$(1)"CARELESS ":L$(2)"/ ":L$(3)"RECKLESS ":L$(4)"COLORLESS ":L$(5)"ENDLESS "(L$(6)"LESS"n PAUSE SUBS   INSTRUCTIONS AND BLOADSRW04050(4);"BLOAD BTWAS,A6150"P(1)6170:MENT" BsVL$(1)"/ ":L$(2)"/ ":L$(3)"CHILDHOOD ":L$(4)"BROTHERHOOD":L$(5)"STATEHOOD "`L$(6)"HOOD"L$(1)"DANGEROUS ":L$(2)"HUMOROUS ":L$(3)"VENOMOUS ":L$(4)"/ ":L$(5)"/ "L$(6)"OU ":RR0įSY,3:PC,25,42X:TX," ":PC,25,52X:TX," "Thjm END SCREEN LOOPsr120 DATA FOR QUESTIONSL$(1)"/ ":L$(2)"TREATMENT ":L$(3)"/ ":L$(4)"ARRANGEMENT":L$(5)"APARTMENT "L$(6)"0:R$:; %3010 , SCORINGA 1L$L$(X)RR1:RRRR1:WR0c 6L$L$(X)WW1:WRWR1:RR0m @5010 JRRRR%A27:40010 T(WR5)(W18)A25:40010 ^ IF WR > 2 THEN K = 0 c END QUESTION LOOP e3010NfSY,1:PC,14,9:TX," ߪծժկկժߪպժկժߪUIժժ~`|psg|ppsg`ժժՂ[][]]w]]Us]]_[k{]k{U][k{w[ժժժժժժժժժժժOO`3|sa`Ogsgsg?~ժժՂժժժժժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂծժվկպվկժժժժժժժժժժժժժՂkI[]w[k][[][kUw]]k{[]I[]U[]w][ծպժժժժժժժժժժժժժժժժժժՂծժպժժժժժժժժժժժժժժժժժժՂժժժժsgppppxժժժժՂժժժժ+U*U*U~ժժժժ3fsg3|OggժժժժՂߪתկկժߪպժկժA]ժժ~`?~xsg?~xxsg`ժժՂgca]acc]AwccAawqcwqAcgwqcAժժժժժժժժժժժOO`~s``Ocsgsg?~ժժՂժժժժժժժժժժժժժժժժժժՂUp?@Uj*U*U*Uz*5x@x^*U*U*U*U`@ժժժժ|G@~``W*U*U*U}xG@ @AԪ`@A?xO                  =\ LESSONXX\390765\(4);"RUN LESSONXX1";\( L:JJ0RR:TX,RR$::NO:CL,0:DI,0)hlhJ770,A2::SY,3:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"hj:D$;"RUN HELLOHI1" Nj:D$;"RUN HELLOHI1" ONERR GOTO 60010_\ SUB-PRG XX/10 GRADE-5WA SUFFIXES\# VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982\% INITIALIZATION]( ST% = 3: & RE: & TS,ST%: HOME :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"SY,1:PC,19,10:DI,4:SN1įCL,40RR$(RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,0J770,A2::SY,3::D$;"RUN LESSONXX"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Ѐښ~>ǍШ@` qP@@C@@Օ1uC @`@pxxp @aa@>> ***(((((***!!!!%--%%%5***Յ++----=-- ժՊԪժժՊԪժժՊժժժՀԀժՊՀԪժժ1us ՟ժ   | ]w ֚ꪪ@p<몪@تժժꅅ``pתꪺp`߫뫪1uC ꪪ뇇`뚚:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"Gfj:(4);"RUN HELLO" SUB-PRG XX/1 GRADE-1 SHORT-A\ VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982\-:]2L1(771):N1$"":I1L1:N1$N1$VE":+SY,1:PC,19,10:DI,4:SN1įCL,40`RR$(RR):INV:I0RR:TX,RR$::NO:CL,0:DI,0fJ770,A2:::SY,3:PC,5,10:TX,"WORKING...":29000::(4);"RUN LESSONXX"j::SY,3:PC,5,10:TX,"WORKING...":::(4);"RUN HELLOHI1":2ST% = EACH WORD. IF IT HAS THE PREFIX 'DIS'-, TYPE Y FOR YES. OTHERWISE, TYPE N FOR NO.";u" HIT RETURN TO GO ON.";~1:255:K1:1$DISPLAY SCORESY,3:CO,2:PC,1,19:TX,"GOAL = ":RR$(RR%):TX,RR$:TX," RIGHT IN A ROW. YOU HAER OF WORDS, NUMBER CORRECT TO GRADUATE=I1NS:L1$(I):DISAPPEAR,DISCONNECT,DISHES,DISCOLOR,DISOBEY,DISAGREE,DISTRUST,DISK,DISHONEST,DISLIKEI1NS:L2$(I):Y,Y,N,Y,Y,Y,Y,N,Y,YBINSTRUCTIONS::100W21:"READ 292 'PC,7,6:NO:TX," ":;-,SCORING7@5010PJRRRR%A27:40010fTWR4A25:40010^ IF WR > 2 THEN GOSUB 4040SY,1:PC,14,9:TX," "130:END LOOP DATA FOR QUESTIONS 1,10,6'SUBPROGRAM NUMBER, NUMBJ)282 290d RR1:RRRR1:WR0:SY,1:CO,2:PC,14,9:TX,"GOOD":SN1āI200205:TN,I,5::z SN1āI1950: 300 "WW1:WRWR1:RR0 #SN1āI15:TN,255,10: $SY,1:CO,4:PC,7,6:INV:TX,L2$(J):16368,0:R$:(R$)13295%PC,9,5:TX,L1$(J). PC,7,5:ENS,N$,1,T%,AL% (N$)27Ĺ769,SP%:RE:::(4);"BSAVE ";NF$;",A768,L127":PC,9,5:TX,"BYE":I15000::(4);"RUN HELLOHI1":: PRESSED N$"Y"N$"N"277 280 SN1ĺ(7) 1:220 N$L2$(R &ENS N$=INPUT VARIABLE FOR &ENS E c4010:5010:DIRECTIONS, SCORE\ dBEGIN SCREEN LOOPq x1000: GET DATA RWNSJJ1:150 J1J:J(NS(1)1):JJ1140 : BEGIN QUESTION LOOP SY,1:CO,5(1) PC,7,5:TX," ":F$=STUDENTS FILENAME" 3SN(785)O <L1$(NS),L2$(NS): L1$=WORD L2$=ANSWER FR0:RR0:W0:WR0:J0: R=NUMBER RIGHT RR=NUMBER RIGHT IN A ROW W=NUMBER WRONG WR=NUMBER WRONG IN A ROW J=INDEX VARIABLE " PT%0:AL%0:N$"Y": T%,AL%=DUMMY VARIABLES FO 3: & RE: & TS,ST%: TEXT : HOME : HGR : REM ST%=SUPERTALKER SLOT K ): -SP%,NS,RR%: SP%=SUBPROGRAM NUMBER NS=NUMBER OF WORDS RR%=NUMBER CORRECT TO GRADUATE 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$:N1$=STUDENTS NAME, N 60010' ONERR GOTO 600103:27902R SUBPROGRAM XX/1 GRADE-4x WORD ANALYSIS: PREFIX DIS (PG.9)" VERSION 1 DONE BY M.D. FULLMER ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982%INITIALIZATIONC ( - ST% =     LLO" 4);"MAXFILES 1":39076: 39076=$98A4 JUST BELOW USER.BINL$200 (SUPERTALKER IO ROUTINES)n\ HELLOHI\ ONERR GOTO 60010\1013,76:1014,0:1015,8: SET UP JMP $800 TO BACP800 AMPERSAND CONTROL PROGRAM\ D$(4):D$;"BLOAD BACP800"T]2ET PETALS."ePC,1,18:TX,"ADJUST THE 'COLOR' AND THE 'HUE' (OR 'TINT') CONTROLS TO GET THE ABOVE DESCRIBED RESULTS. THEN PRESS RETURN."e16368,0:R$:e?e@ SRF MANAGEMENTeB(4);"RUN SRF DELETER"e'#e*#fj::(4);"RUN HE,1,40,20ddPC,1,9:TX,"WHEN THE COLORS ARE PROPERLY ADJUSTED, THE DUCK WILL BE SLIGHTLY ORANGE."dPC,1,12:TX,"THE FLAG WILL HAVE WHITE AND SLIGHTLY ORANGE STRIPES WITH A BLUE FIELD." ePC,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  ժժժժsgccscOcccpժժժժՂժ+U*U*U~ժժժժ3fsgsxOgsgGժժժժՂ||~~㸏|?????@@?1u pԴ./*jZUUUUU PX<,*jZVVUUUWVVVTJj+-5U**j+)5uUVvW΃VZk.􍉈 ի㻚ՔՊիﯫݕ׀ߪվՁժוݪՕՋժ1u ՀժժՀתժISCOVER BINSTRUCTIONS%:0:10021:"TYPE THE NUMBER OF THE WORD THAT FITS BEST IN EACH SENTENCE. USE A WORD FROM THE BOX.";" HIT RETURN TO GO ON.";1:255:K1:1$DISPLAY SCOREBSY,3:CO,2:PC,1,19:MESS.,I ==== PEOPLE WHO DO NOT TELL THE TRUTH.,DID THE CHILDREN ==== THE SECRET ROOM?kI1NS:L2$(I):3,1,2,1,3,2,2,1,3$I1NS3:L3$(I):.1-DISHONEST 2-DISCONNECT 3-DISAGREE,1-DISLIKE 2-DISOBEYED 3-DISAPPEAR,1-DISTRUST 2-DISPLEASE 3-DPPLES TASTE BAD, BUT I ====.",IT WOULD BE ==== TO STEAL.,THE TV WON'T WORK IF I ==== IT."I DON'T LIKE HAM, AND I ==== BEANS, TOO.",CAN YOU USE MAGIC TO MAKE THE HAT ====?,"I TOLD MY DOG TO SIT, BUT HE ==== ME."UIT WILL ==== DAD IF WE MAKE A BIG 010TWR4A25:40010<^ IF WR > 2 THEN GOSUB 4040ZSY,1:PC,14,9:TX," "m130:END LOOPDATA FOR QUESTIONS 2,9,6SUBPROGRAM NUMBER, NUMBER OF WORDS, NUMBER CORRECT TO GRADUATEI1NS:L1$(I):X"TED THINKS AāI200205:TN,I,5:-SN1āI1950:6300M"WW1:WRWR1:RR0k#SN1āI15:TN,255,10:$SY,1:CO,4:PC,2,8:INV:TX,L2$(J):16368,0:R$:(R$)13295%292'PC,2,8:NO:TX," ":;,SCORING@5010JRRRR%A27:40RE:::(4);"BSAVE ";NF$;",A768,L127":PC,9,5:TX,"BYE":I15000::(4);"RUN HELLOHI1":: PRESSED N$"1"N$"3"277 280 SN1ĺ(7) 1:220 N$L2$(J)282 290RR1:RRRR1:WR0:SY,1:CO,2:PC,14,9:TX,"GOOD":SN140,5:NO:FI:DE,2,2,39,4:INV:FI:NOK CO,2:PC,4,3:TX,L3$((J1)31)v SY,3:CO,2:DE,1,8,40,18:INV:FI:NO SY,3:CO,2:DE,1,10,40,18:PC,1,10:TX,L1$(J) SY,1:CO,5(1):PC,2,7:TX," ":PC,2,7:ENS,N$,1,T%,AL%k (N$)27Ĺ769,SP%:$=INPUT VARIABLE FOR &ENS = c4010:5010:DIRECTIONS, SCORET dBEGIN SCREEN LOOPh x1000:GET DATA RWNSJJ1:J1J1:150 J1J:J(NS(1)1):JJ1140 : BEGIN QUESTION LOOP ((J1)3)((J11)3)210& CO,4:SY,3:DE,1,1,STUDENTS FILENAME 3SN(785)> <L1$(NS),L2$(NS),L3$(NS3) FR0:RR0:W0:WR0:J0: R=NUMBER RIGHT RR=NUMBER RIGHT IN A ROW W=NUMBER WRONG WR=NUMBER WRONG IN A ROW J=INDEX VARIABLE GJ13 PT%0:AL%0:N$" ": T%,AL%=DUMMY VARIABLES FOR &ENS N3: & RE: & TS,ST%: TEXT : HOME : HGR : REM ST%=SUPERTALKER SLOT J ): -SP%,NS,RR%: SP%=SUBPROGRAM NUMBER NS=NUMBER OF WORDS RR%=NUMBER CORRECT TO GRADUATE 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$:N1$=STUDENTS NAME, NF$=? 60010& ONERR GOTO 600102:27902R SUBPROGRAM XX/2 GRADE-4y WORD ANALYSIS: PREFIX DIS (PG.9) "VERSION 1 DONE BY M.D. FULLMER ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982%INITIALIZATIONB ( ST% =      !!ժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂתժժկժվվժժժժժժժժժժժժժժժժժժՂ]U{]w}]Y{[]}]ww]Y]{}]U[]w{]wY}ծպժժժժժժժժժժժժժժժժժժՂծժպժժժժժժժժժժժժժժժժժժՂ1u+וʫݪ⫫ՕՀP"0BX$"TO LOSE":L$(1)"MIS":CX$"LAY"6*m>BX$"ARRANGE BEFOREHAND":L$(1)"PRE":CX$"ARRANGE"s PAUSE SUBS   INSTRUCTIONS AND BLOADS100.21:"READ THE CLUE. TYPE THE PREFIX THAT GOES WITH THE RE":L$(1)"IN":CX$"ACCURATE"!6SJBX$"HAVING NO SENSE":L$(1)"NON":CX$"SENSE"YBX$"BEING NAUGHTY":L$(1)"MIS":CX$"BEHAVING"BX$"TO VIEW IN ADVANCE":L$(1)"PRE":CX$"VIEW"bvBX$"NOT MAKING ANY STOPS":L$(1)"NON":CX$"STO"PRE":CX$"COOKED"BDVBX$"FACTUAL":L$(1)"NON":CX$"FICTION"J{BX$"NOT FINISHED":L$(1)"IN":CX$"COMPLETE" BX$"TO PRINT INCORRECTLY":L$(1)"MIS":CX$"PRINT"nBX$"NOT ACTIVE":L$(1)"IN":CX$"ACTIVE"BX$"WRONG:RR0@5010(JRRRR%A27:40010IT(WR5)(W18)A25:40010i^ IF WR > 2 THEN GOTO 110c END QUESTION LOOPe3010hXm END SCREEN LOOP ********************r120 DATA FOR QUESTIONSBX$"ALREADY COOKED":L$(1) ":PC,12,8:TX,"GOOD":/SN1āI11000:PSN1āI200205:TN,I,5:Y300w"SN1āI15:TN,255,10:#SY,3:CO,2:PC,26,12:TX,L$(X)$16368,0:R$:;, SCORING1(L$L$(X))RR1:RRRR1:WR06(L$L$(X))WW1:WRWR1Y SY,3:CO,2$ L$BL$BL$BL$D PC,26,10:ENS,L$,NC,T%,AL%[ AL%0L$"X":270l L$(L$,AL%) (L$)27280 769,SP::D$;"BSAVE ";NF$;",A768,L127" ::"BYE":D$;"RUN HELLOHI1" L$L$(X)290 SY,1PC,12,8:TX," ,20,10:SY,3! PC,1,10:TX,BX$: NC(L$(1)):LC26NCP PC,LC,10:TX,CX$ 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 ANSWER ENTRJJ1140 J1J:JNSRN1= SET UP QUESTIONS J1010,1110,1210,1310,1410,1510,1610,1710,1810,1910,2010,2110 SET UP SCREEN AND SCREEN PARTICULARS K0İ4010 5010 SY,3:CO,2 SY,1:DE,1,3,20,9:INV:FI:NO:DE,1,10:J0:PR$"PRESS RETURN TO CONTINUE."3 P PROMPTP TSY,1:CO,4:PC,1,1:INVn VTX," PRE NON IN MIS "v XNO ZBL$" " d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xDUMMY0: THIS IS A DUMMY STATEMENT RN0JJ1:150 J(NS(1)1): VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982v % INITIALIZATION (ST%3:RE:: 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$ 3SN(785) <L$(10),IX$(10)& FD$(4):WR0:RN  27902600107 LEVEL 6 SUBPROGRAM XX/3X WORD ANALYSIS: PREFIXESj BILL WAGNERx 5-20-82 SP=SUBPROGRAM NUMBER: RR%=RIGHT IN A ROW GOAL NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIONS"SP3:NS12:RR%6:NQ1a #     ""U*U*U*U*U*}ժժժժsgsgsgOgsgccժժժժՂתժտ+U*U*U~ժժժժ`ccsqOccccժժժժՂߪծժկկժߪժտժߪwUժժOOgxscsgxOcccsg3fժժՂ}][k]w}]ww]]o[]{]]{w]}]{w{ժժժժժժժժժժժOgOgsgsxscsgOgsgsg?~ժժՂժժժժժժժժժժժժժժժժժժՂU1uఐՀըхՀ1:"TYPE THE NUMBER OF THE WORD THAT FITS INEACH SENTENCE.";Z" HIT RETURN TO GO ON.";c1:s255:K1:1y$DISPLAY SCORESY,3:CO,2:PC,1,19:TX,"GOAL = ":RR$(RR%):TX,RR$:TX," RIGHT IN A ROW. YOU HAVE":SY,1:PC,19,10:DEAR?I1NS:L2$(I):/1,2,1,2,2,1,2,1G$I1NS2:L3$(I):." 1. FRIEND 2. FRIENDSHIP"," 1. DARK 2. DARKNESS"," 1. SAIL 2. SAILOR"," 1. LEAD 2. LEADER"BINSTRUCTIONS::100<2I1NS:L1$(I):MOLLY IS MY BEST ==== .,==== MAKES US STICK TOGETHER.,THE LIVING ROOM IS VERY ==== .,I CAN'T SEE IN THE ====.THE ==== WORKED ALL HIS LIFE ON A SHIP.,I CAN ==== A SMALL BOAT.,GAIL IS A GOOD ==== .,WILL SHE ==== OUR TEAM THIS YSCORING@5010*JRRRR%A27:40010@TWR4A25:40010c^ IF WR > 2 THEN GOSUB 4040SY,1:PC,14,9:TX," "130:END LOOPDATA FOR QUESTIONS 4,8,6SUBPROGRAM NUMBER, NUMBER OF WORDS, NUMBER CORRECT TO GRADUATE0:SY,1:CO,2:PC,14,9:TX,"GOOD":SN1āI200205:TN,I,5:TSN1āI1950:]300t"WW1:WRWR1:RR0#SN1āI15:TN,255,10:$SY,1:CO,4:PC,2,8:INV:TX,L2$(J):16368,0:R$:(R$)13295%292'PC,2,8:NO:TX," ":;,NS,N$,1,T%,AL% (N$)27Ĺ769,SP%:RE:::(4);"BSAVE ";NF$;",A768,L127":PC,9,5:TX,"BYE":I15000::(4);"RUN HELLOHI1":: PRESSED N$"1"N$"3"277 280 SN1ĺ(7) 1:220 N$L2$(J)282 290>RR1:RRRR1:WRO,4:SY,3:DE,1,1,40,5:NO:FI:DE,2,2,39,4:INV:FI:NOr CO,2:PC,20(L3$((J1)21))2,3:TX,L3$((J1)21) SY,3:CO,2:DE,1,8,40,18:INV:FI:NO SY,3:CO,2:DE,1,10,40,18:PC,1,10:TX,L1$(J) SY,1:CO,5(1):PC,2,7:TX," ":PC,2,7:ERIABLES FOR &ENS N$=INPUT VARIABLE FOR &ENS O c4010:5010:DIRECTIONS, SCOREf dBEGIN SCREEN LOOPz x1000:GET DATA RWNSJJ1:J1J1:150 J1J:J(NS(1)1):JJ1140 : BEGIN QUESTION LOOP ((J1)2)((J11)2)2108 CTUDENTS NAME, NF$=STUDENTS FILENAME1 3SN(785)P <L1$(NS),L2$(NS),L3$(NS2) FR0:RR0:W0:WR0:J0: R=NUMBER RIGHT RR=NUMBER RIGHT IN A ROW W=NUMBER WRONG WR=NUMBER WRONG IN A ROW J=INDEX VARIABLE GJ13, PT%0:AL%0:N$" ": T%,AL%=DUMMY VATIONT ( ST% = 3: & RE: & TS,ST%: TEXT : HOME : HGR : REM ST%=SUPERTALKER SLOT \ ): -SP%,NS,RR%: SP%=SUBPROGRAM NUMBER NS=NUMBER OF WORDS RR%=NUMBER CORRECT TO GRADUATE# 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$:N1$=S 60010& ONERR GOTO 600102:27902Q SUBPROGRAM XX/4 GRADE-4 WORD ANALYSIS: SUFFIXES SHIP, NESS, OR, ER (PG.11)" VERSION 1 DONE BY M.D. FULLMER ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982 %INITIALIZA     ժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂտժժժժվծժժժժժժժժժժժժժժժժժժՂ]]saw}]Us[]}]ww]U]{}]]c]wsawU}ծ׺ժժժժժժժժժժժժժժժժժժՂծժպժժժժժժժժժժժժժժժժժժՂ:(4);"RUN HELLOHI1": SUBPROGRAM XX/5 GRADE-4q\ WORD ANALYSIS: SUFFIXES SHIP, NESS, OR, ER (PG.12)\"VERSION 1 DONE BY M.D. FULLMER ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982\%INITIALIZATION](ST%3:RE::::RMER,1. ACT 2. ACTOR#B5INSTRUCTIONS;:F:10021:"TYPE THE NUMBER OF THE WORD THAT FITS INEACH SENTENCE.";" HIT RETURN TO GO ON.";1:255:K1:1$DISPLAY SCORE6SY,3:CO,2:PC,1,19:TX,"GOAL = "S.,BOB IS THE ==== WHO PLAYED THE PART OF THE RABBIT.,BOB IS TEACHING SARA HOW TO ==== IN PLAYS.{I1NS:L2$(I):1,2,2,1,1,2,2,1$I1NS2:L3$(I):.1. LEADER 2. LEADERSHIP,1. SHY 2. SHYNESS,1. FARM 2. FAI): CARL IS THE ==== OF THE TROOP.,CARL'S ==== HAS BEEN GOOD FOR THE TROOP.,THE BABY'S ==== MAKES HIM CRY WHEN HE SEES A STRANGER.,IS HE TOO ==== TO TALK TO US NOW?e WE GROW CORN AND BEANS ON THIS ==== .,MR. ALLEN HAS BEEN A ==== FOR TEN YEAR0JRRRR%A27:400100TWR4A25:40010S^ IF WR > 2 THEN GOSUB 4040qSY,1:PC,14,9:TX," "130:END LOOP DATA FOR QUESTIONS 5,8,6SUBPROGRAM NUMBER, NUMBER OF WORDS, NUMBER CORRECT TO GRADUATEI1NS:L1$(:PC,14,9:TX,"GOOD":SN1āI200205:TN,I,5:HSN1āI11000:Q300"WW1:WRWR1:RR0:SN1āI15:TN,255,10:$SY,1:CO,4:PC,2,8:INV:TX,L2$(J):16368,0:R$:(R$)13295%292'PC,2,8:NO:TX," ":;,SCORING@501 (N$)27Ĺ769,SP%:RE:::(4);"BSAVE ";NF$;",A768,L127":PC,9,5:TX,"BYE":I15000::(4);"RUN HELLOHI1":: PRESSED N$"1"N$"3"277 280 SN1ĺ(7) 1:220 N$L2$(J)284 2901RR1:RRRR1:WR0:SY,1:CO,2PC,21(L3$((J1)21))2,3:TX,L3$((J1)21)Y SY,3:CO,2:DE,1,8,40,18:INV:FI:NO L4$(L1$(J),40):L5$(L1$(J),41,78) SY,3:CO,2:DE,1,10,40,18:PC,1,8:TX,L4$:PC,1,10:TX,L5$ SY,1:CO,5(1):PC,2,7:TX," ":PC,2,7:ENS,N$,1,T%,AL%ONS, SCORE! dBEGIN SCREEN LOOP6 x1000: GET DATAT RWNSJJ1:J1J1:150v J1J:J(NS(1)1):JJ1140| : BEGIN QUESTION LOOP ((J1)2)((J11)2)210 CO,4:SY,3:DE,1,1,40,5:NO:FI:DE,2,2,39,4:INV:FI:NO. CO,2:),L3$(NS2) FR0:RR0:W0:WR0:J0: R=NUMBER RIGHT RR=NUMBER RIGHT IN A ROW W=NUMBER WRONG WR=NUMBER WRONG IN A ROW J=INDEX VARIABLE GJ13 PT%0:AL%0:N$" ": T%,AL%=DUMMY VARIABLES FOR &ENS N$=INPUT VARIABLE FOR &ENS c4010:5010:DIRECTI ST%=SUPERTALKER SLOTr -SP%,NS,RR%: SP%=SUBPROGRAM NUMBER NS=NUMBER OF WORDS RR%=NUMBER CORRECT TO GRADUATE 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$:N1$=STUDENTS NAME, NF$=STUDENTS FILENAME 3SN(785) <L1$(NS),L2$(NS  60010:279027 SUBPROGRAM XX/5 GRADE-4q WORD ANALYSIS: SUFFIXES SHIP, NESS, OR, ER (PG.12)" VERSION 1 DONE BY M.D. FULLMER ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982%INITIALIZATION (ST%3:RE::::     ,AL%=DUMMY VARIABLES FOR &ENS N$=INPUT VARIABLE FOR &ENS \ c4010:5010:DIRECTIONS, SCOREs dBEGIN SCREEN LOOP x1000:GET DATA RWNSJJ1:150 J1J:J(NS(1)1):JJ1140 : BEGIN QUESTION LOOP SY,1:CO,5(1)' PC,7,51$:N1$=STUDENTS NAME, NF$=STUDENTS FILENAME: 3SN(785)g <L1$(NS),L2$(NS): L1$=WORD L2$=ANSWER FR0:RR0:W0:WR0:J0: R=NUMBER RIGHT RR=NUMBER RIGHT IN A ROW W=NUMBER WRONG WR=NUMBER WRONG IN A ROW J=INDEX VARIABLE 9 PT%0:AL%0:N$" ": T%NITIALIZATION] ( ST% = 3: & RE: & TS,ST%: TEXT : HOME : HGR : REM ST%=SUPERTALKER SLOT e ): -SP%,NS,RR%: SP%=SUBPROGRAM NUMBER NS=NUMBER OF WORDS RR%=NUMBER CORRECT TO GRADUATE, 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"Nv 60010% ONERR GOTO 600101:27902Q SUBPROGRAM XX/11 GRADE-4 WORD ANALYSIS: ROOTS WITH PREFIXES AND SUFFIXES (PG.17)"VERSION 1 DONE BY M.D. FULLMER ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982 %I1uԪ תծժտժկתߪw]ժժOOccsgCgccOgsgsg?~ժժՂ}]{wuwM]ww_]_{A{]A{w]s}A{w{ժժ``sgscsgsgpppxժժՂժժժժժժժժժժժժժժժժժժՂUߪվתתժժժժժժպժժծժժժժժժժՂժժժժժժժժժժժժժժժժժժՂߪժժժժվկժժժժժժժժժժժժժՂA]{uw}AM{[]}Aww]MA{}]]{]w{uswM}ծպժժժժժժժժժժժժժժժժժժՂծժժպժժժժժժժժժժժժժժժժժժՂU*U*U*U*U*}ժժժժsgsgsgOgssgժժժժՂծժժպ+U*U*U~ժժժժppscppsժժժժՂתծժկտժծժߪw]ժժOOgGqsgcgGqOgsgsg3fժժՂ}]cwaw}AwwCcgc]{]]{w]}]{wsժժOgOgsgsqsgsgOccccc?~ժժՂժժժժժժժժժժժժժժժժժժՂUUTTPP@@** @****(( UUUUUUUU********UUUUUUUU********UUUUUUUU********UUUUU UUUTTPP@********UUUUUUUU********UUUUUUUU**** @***(( UUUUUUUU********UU1u @*P (((TUUUUUUU********UUUU ((****TUUUUUUU********((******UUUUUUUU********UUUUUUUU********UUUUUUUU********UUUUUUU*  URN TO GO ON.";1:(255:K1:1.$ADISPLAY SCORESY,3:CO,2:PC,1,19:TX,"GOAL = ":RR$(RR%):TX,RR$:TX," RIGHT IN A ROW. YOU HAVE":SY,1:PC,19,10:DI,4:SN1įCL,40RR$(RR):INV:I0RR:TX,RR$::NO:CL,0:DI,0HIP,UNHELPFUL,INCOME,RICHNESS3I1NS:L2$(I):PB,B,P,B,P,P,B,S,S,B,P,SVBhINSTRUCTIONSn:y:10021:"READ EACH WORD. IF IT HAS ONLY A PREFIXTYPE P. IF IT HAS ONLY A SUFFIX, TYPE S. IF IT HAS BOTH, TYPE B.";:"HIT RET,1:PC,14,9:TX," ")130:END LOOPADATA FOR QUESTIONSP 11,12,6SUBPROGRAM NUMBER, NUMBER OF WORDS, NUMBER CORRECT TO GRADUATEI1NS:L1$(I):UNFRIENDLY,INFIELDER,REHEAT,UNFORCEFUL,DISOWN,DISAGREE,UNKINDNESS,WASHER,FRIENDSWR1:RR0'#SN1āI15:TN,255,10:k$SY,1:CO,4:PC,7,6:INV:TX,L2$(J):16368,0:R$:(R$)13295t%292'PC,7,6:NO:TX," ":;,SCORING@5010JRRRR%A27:40010TWR4A25:40010^ IF WR > 2 THEN GOSUB 4040SY(7) 1:220p N$L2$(J)282RR1:RRRR1:WR0:SY,1:CO,2:PC,14,9:TX,"GOOD":I200205:TN,I,5::300y 290 RR1:RRRR1:WR0:SY,1:SY,1:CO,2:PC,14,9:TX,"GOOD":SN1āI200205:TN,I,5: SN1āI1950: 300 "WW1:WR:TX," ":PC,9,5:TX,L1$(J)D PC,7,5:ENS,N$,1,T%,AL% (N$)27Ĺ769,SP%:RE:::(4);"BSAVE ";NF$;",A768,L127":PC,9,5:TX,"BYE":I15000::(4);"RUN HELLOHI1":: PRESSED N$"P"N$"S"N$"B"ī277 280 SN1ĺcMEתիվտվժתժժժժժժժծժժպժժժժժժժՂժժժժժժժժժժժժժժժժժժՂߪժժծկժժժժժժժժժժժժժՂ]]A]cg]]Aacg]ccc]]Agc]qccA]wc]gsծպժժժժժժժժժժժժժժժժժժՂߪժժժժժժժժժժժժժժժժժժժՂU*U*U*U*U*}ժժժժsgsgpOgxcժժժժՂծժպժժժժ`ժժժժՂתվw]ժժOOsgscgsgOcsgsg?~ժժՂ[]{wmw]]wwo]]{][]][w]s[][w{sժժժժժժժժ``sgsgsgsgxxxxժժՂժժժժժժժժժժժժժժժժժժՂתծտվժߪժժժժժժժվժժվժժժժժժժՂժժժժժժժժժժժժժժժժժժՂߪժժժվկժժժժժժժժժժժժժՂ]][mw[]][[][]ww]]][[]]{]w[msw][sծպժժժժժժժժժժժժժժժժժժՂծժժպժժժժժժժժժժժժժժժժժժՂU*U*U*U*U*}ժժժժsgsgscOgcgժժժժՂծժݪպժժժժOyxsgxx`ժժժժՂLLOHI1":fתվc]ժժO~sgpfsgpsgsg?~ժժՂgcqw]cC]ccqccq]Ac]Accwg]AcqsժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂU"RUN LESSONXX"'j:D$;"RUN HELLOHI1"NPROGRAM XX/13x\ WORD ANALYSIS: ROOTS WITH PREFIXES AND SUFFIXES PAGE 3\ BILL WAGNER\ 5-20-82\ SP=SUBPROGRAM NUMBER: RR%=RIGHT IN A ROW GOAL] NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIOPLAY 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,0J770,A2::SY,3::D$;:L$(1)"DIRECT"& PAUSE SUBS, 2 P INSTRUCTIONS AND BLOADSV_10021:"TAKE AWAY ALL THE PREFIXES, SUFFIXES,"22:"AND ENDINGS. TYPE THE ROOT WORD.""HIT RETURN TO GO ON. ";255K1:1:$  DISRECALLING":L$(1)"CALL"6CJBX$"GOVERNORSHIP":L$(1)"GOVERN"ImBX$"MISTRUSTFUL":L$(1)"TRUST"sBX$"PAINTER":L$(1)"PAINT"bvBX$"DISHONESTY":L$(1)"HONEST"BX$"STATEHOOD":L$(1)"STATE"*>BX$"INDIRECTLY"*******r120) DATA FOR QUESTIONSMBX$"ENLARGEMENT":L$(1)"LARGE"SBvVBX$"POISONOUS":L$(1)"POISON"|BX$"UNBEATEN":L$(1)"BEAT" BX$"SLEEPLESS":L$(1)"SLEEP"nBX$"IMPOLITENESS":L$(1)"POLITE"BX$";"RUN LESSONXX"(gj:D$;"RUN HELLOHI1"K4J770,A2:::SY,3:29000::(4);"RUN LESSONXX"uj::SY,3:PC,5,10:TX,"WORKING..."::(4);"RUN HELLOHI1":S AND SUFFIXES (PG.17)\"VERSION 1 DONE BY M.D. FULLMER ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982 ]%ICORING)1(L$L$(X))RR1:RRRR1:WR0M6(L$L$(X))WW1:WRWR1:RR0W@5010pJRRRR%A27:40010T(WR5)(W18)A25:40010^ IF WR > 2 THEN GOTO 110c END QUESTION LOOPe3010hXm END SCREEN LOOP *************" ::"BYE":D$;"RUN HELLOHI1"5 L$L$(X)290c PC,12,8:TX," ":PC,12,8:TX,"GOOD":z SN1āI11000: SN1āI200205:TN,I,5: 300 "SN1āI15:TN,255,10: #PC,14,6:TX,L$(X) $16368,0:R$:; &3010, SNV:FI:NO:DE,1,1,20,10H DISPLAY QUESTIONS AND SPEECH FOR QUESTION[ ANSWER ENTRYe CO,3 PC,14,5:L$" ":ENS,L$,6,T%,AL% AL%0L$"X":270 L$(L$,AL%) CO,2 (L$)27280 769,SP::D$;"BSAVE ";NF$;",A768,L127"110,1210,1310,1410,1510,1610,1710,1810,1910,2010,2110` SET UP SCREEN AND SCREEN PARTICULARSo K0İ4010y 5010 SY,1 CO,4 PC,1,5:INV:TX,BX$:NO BEGIN QUESTION LOOP ******************** X1NQ SY,1:DE,1,7,20,9:I(785) <L$(10),IX$(10)S FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE."k d BEGIN SCREEN LOOP nR0:RR0:X0:K0 xSY,3: RN0JJ1:150 J(NS(1)1):JJ1140 J1J:JNSRN1 SET UP QUESTIONS 5 J1010,1NS "SP13:NS12:RR%6:NQ1 # 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-"N1$ 3SN)  27902600109 LEVEL 6 SUBPROGRAM XX/13x WORD ANALYSIS: ROOTS WITH PREFIXES AND SUFFIXES PAGE 3 BILL WAGNER 5-20-82 SP=SUBPROGRAM NUMBER: RR%=RIGHT IN A ROW GOAL NS=NUMBER OF SENTENCES: NQ=NUMBER OF QUESTIO     (RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,02[J770,A2::SY,3::D$;"RUN LESSONXX"tj:D$;"RUN HELLOHI1" N 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982\% INITIALIZATION]( ST% = 3: & RE: & TN AFTER TYPING EACH ONE,"0"AND TO GO ON. ";=K1:1:C$W 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,40,RR$I)1 *S PC,12,8:TX," ":PC,12,8:TX,"GOOD":SN1āI200205:TN,I,5:d PAUSE SUBSj p  INSTRUCTIONS AND BLOADS:10021:"FIND THREE PREFIXES, SUFFIXES, OR""ENDINGS. TYPE THEM BELOW EACH SENTENCE. PRESS RETURL$(1)"OUS ":L$(2)"DIS ":L$(3)"MENT".6nJIX$(1)"DON'T MISTAKE HELPFUL AID FOR":IX$(2)"FRIENDSHIP."OL$(1)"MIS ":L$(2)"FUL ":L$(3)"SHIP" TEST FOR CORRECT ANSWERI1NQ(L$L$(I))(RW(I)0)ī2050WF1:2090RW(ORT BUSINESS IS UNCERTAIN."F#L$(1)"IM ":L$(2)"NESS":L$(3)"UN "LnIX$(1)"HE WAS MISLED BY THE PLANS FOR":IX$(2)"STATEHOOD."L$(1)"MIS ":L$(2)"S ":L$(3)"HOOD"IX$(1)"IT IS DANGEROUS TO DISCONTINUE":IX$(2)"TREATMENT."(ING " BKVIX$(1)"THE FARMER WILL RESELL THE USELESS":IX$(2)"HORSE."v[L$(1)"ER ":L$(2)"RE ":L$(3)"LESS"|IX$(1)"SCRUBBING THE APARTMENT MADE HIM":IX$(2)"SLEEPY."L$(1)"ING ":L$(2)"MENT":L$(3)"Y " IX$(1)"THE IMP :.:10:5:"LOADING PROGRAMS...."M (4);"BLOAD BSYM-SYMTABS"i103,1:104,92:23552,0(4);"RUN HELLOHI"( 8 T(WR5)(W18)A25:40010A^ IF WR > 2 THEN GOSUB 4010Yc END QUESTION LOOPce3010ym END SCREEN LOOPr120 DATA FOR QUESTIONSIX$(1)"I WAS CERTAINLY ASTOUNDED BY THE":IX$(2)"ENDING."L$(1)"LY ":L$(2)"ED ":L$(3)"205:TN,I,5:& SN1āI1950:/ 300M "SN1āI15:TN,255,10:v #SY,1:I1NQ:PC,P(I),7:TX,L$(I): $16368,0:R$:;:3010 , SCORING 1WF0RR1:RRRR1:WR0 6WF0WW1:WRWR1:RR0 @5010 JRRRR%A27:40010,1:CO,4:PC,P(X),6& ANSWER ENTRYK L$" ":ENS,L$,4,T%,AL%:CO,2 (L$)27Ĺ769,SP::D$;"BSAVE ";NF$;",A768,L127":::"BYE":D$;"RUN HELLOHI1" 2010  WF0282 290 PC,12,8:TX," ":PC,12,8:TX,"GOOD":SN1āI200 5010Y SY,3:CO,1:DE,1,1,40,9:FI:DE,2,2,39,7:INV:FI:NO:DE,1,1,40,20:CO,2 PC,3,4:TX,IX$(1):PC,3,6:TX,IX$(2) BEGIN QUESTION LOOP WF0 I1NQ:RW(I)0: X1NQ DISPLAY QUESTIONS AND SPEECH FOR QUESTION SY10 d BEGIN SCREEN LOOP/ nR0:RR0:X0:K0; xSY,3:P RN0JJ1:150m J(NS(1)1):JJ1140 J1J:JNSRN1 SET UP SCREEN AND SCREEN PARTICULARS SET UP QUESTIONS IX$(2)" " J1010,1110,1210,1310,1410,1510,1610S,ST%: HOME : HGR  ):\ 2L1(771):N1$"":I1L1:N1$N1$((I771))::NF$"SRF-"N1$j 3SN(785) <L$(10),IX$(10),P(10),RW(3) FD$(4):WR0:RN0:J0:PR$"PRESS RETURN TO CONTINUE." PNS7:NQ3:SP12:RR%6 ZP(1)2:P(2)9:P(3)15 _40v 60010 279020 ONERR GOTO 60010l SUB-PRG XX/12 GRADE-5WA PREFIXES,SUFFIXES,ENDINGS# VERSION 1 DONE BY M.D. FULLMER & ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982% INITIALIZATION ( ST% = 3: & RE: & T        j::SY,3:PC,5,10:TX,"WORKING..."::(4);"RUN HELLOHI1":NRAM XX/2 GRADE-4y\ WORD ANALYSIS: PREFIX DIS (PG.9) \"VERSION 1 DONE BY M.D. FULLMER ASSOC. FOR AMERICAN EDUCATIONAL COMPUTER INC. COPYRIGHT 1982\%INITIALIZATIONB]( ST% = TX,"GOAL = ":RR$(RR%):TX,RR$:TX," RIGHT IN A ROW. YOU HAVE":iSY,1:PC,19,10:DI,4:SN1įCL,40RR$(RR):INV:I0RR:TX,RR$::NO:CL,0:DI,0'4,8,6J770,A2:::SY,3:PC,5,10:TX,"WORKING...":29000::(4);"RUN LESSONXX">cMANDY!IժժժժժժժժժժsgxxxxժժժժՂjU@||ժժժժժժժժ3fsg~OgcxժժժժՂ*]*DժժժժժժժժժժժO~sgx3dsgpsgsg?~ժժՂ{ժժժժժժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂߪիվկվվժתժժժժժժժկժժժժժժժժժՂժժժժժժժժժժժժժժժժժժՂߪժժկ׺ծկժժժժՂ{ծպժժժժժժժժժժժժժժժժժժՂժߪժժժժժժժժժժժժժժժժժժՂժժժժsgsgxOgp?pժժժժՂծպժժժժժժժժժժժժժժժժժժՂ:996`````~ C$H@)aL@lP@,y@@4p- C#)@ﴀ4 544J%T@Ht@ C$H@[oL@[P@ZeT@@ C#)@ﴀ4 52:4@4 n@@!: \39076!\d HELLO PROGRAMU\i DISK 9 / SIDE A - REV. LONG & SHORT VOWELS _\n120q\x768,0:769,0\ ********************\NSP3: NSP=#OF SUBPROGRAMS\NL3: NL=# OF LINES IN THE MENU\LN$(NL): HOLDS MENU TEXT>]NN("       NF$eԆ:(4);"DELETE";NF$5eՆA$:A$(13)34517Oe׆:(4);"RUN HELLO":ie؆:::D$;"RUN HELLO"eˆ769,A1:770,A2:35050eLj:D$;"BSAVE ";NF$;",A768,L127":::5:8:"BYE":I1500:II::eȈë(4);"RUN HELLO"fꈭ(222)9Ĺ216,0:30:TN,164,100:TN,190,200:TN,96,200:TN,114,100:TN,96,255Od䄁I13000:II:d턯RE::CO,2:SY,3:PC,8,8:TX,"YOU'VE FINISHED SIDE A.":PC,8,10:TX,"TURN THE DISK OVER.":PC,8,12:TX,"PRESS RETURN TO CONTINUE"dΆ34520eӆ34517::(4);"DELETE";.":35010ccFc510$c }*c}5c}34510;cAcLc34510Vcڄ::ycބRE:(4);"BLOAD I.SHIP,A6144"cRE:PC,2,4:TX,"FULL STEAM AHEAD!"c℁I25152:DP,6144,I,12:TN,255,255:;dㄯTN,147,200:TN,164,100:TN,190,100:TN,147,10cMSY,1:PC,19,10:DI,4:SN1įCL,40ZRR$(RR):INV:JJ0RR:TX,RR$::NO:CL,0:DI,0`J770,A2::SY,3:CO,2:PC,5,10:TX,"WORKING..."::D$;"RUN LESSONXX"j:D$;"RUN HELLOHI1"2CES: NQ=NUMBER OF QUESTIONS\"SP3:NS12:RR%6:NQ1a]#ST OF THE WORD. USE THEPREFIXES IN THE BOX.";Q" HIT RETURN TO ":"GO ON. ";Z1:c255kK1q$ 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"$"ժժվիժժ1uC ՀՀꀀժժ" " " կ׻ժッ타ȰU1uကఐ᪪պݚݚ爌úݚ""