' +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:;<=>?  ( 9 +"  "*  (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).).*#!.*'!.8)(#/-)(#/-,,eb)++$ h( ,!!"@h !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HH ᥠ L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD# H8`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  L IH  /JJJJ"LL뷩 ᷩ췩 ɛ LDLSAVBPILOCUNLOCIBPIBPIBPPRBPIBLISCALBPIBUZZOFӜsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\  OÌȌ`W ԧ H h@ [_ /QSIZRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLOɍ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׭Lܫ &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[PRR3\ɄSɊ"RQJ(0Fw6. ^-%p 㩠RP.Q I* P\L˵B̵C8pB߮Z\ @ յյ\BIR Z-^ Jp\IZLLӜv  Ϡ@跻~!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ֵ  ַ յյ`` ᥠ hh`ĵµ`ڿ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`00:Z$"Y"NL1:L15:30203 R$"N"Z$"N"3010 QF0:QD1:QT$(QD)WD$(L):110:WIND,0,115,272,190:BOX:CO:"Enter sentence using: "WD$(L)::CO,0,170:"(Do not press RETURN until the entire sentence has been entered.)"- CO,0,136:ELI,(70,"-AZ-ss RETURN instead of entering a word.)" FL0:CO,CO(1,L)20,CO(2,L):ELI,(14,"-AZ-az .'-",0),WD$(L):Q2$WD$(L):900:WD$(L)Q2$:((WD$(L))0WD$(L)" ")L12090 (WD$(L))0WD$(L)" "įBOX,0,165,279,191:CO,10,175:"Are you finished? ";:FL1:360sults for all"W*1:"Enter numbers (one at a time) you want to "WD$" results for: ";*ELI,(3,"alAL-09",0),A$:LU,A$:(A$)0STX:12000\+(A$,1)"A"āL1C:ST$(L)Y$(L):BOX,36,L109,(Y$(L))739,L1019,8::STC:12000+A((A$)):A0A)LC101:Y$(L1)Y$(L)::L19:CO,10,(L10)10:" "L"."::L1012:CO,10,(L10)10:L"."::0,140279,1400*L1C:CO,40,(L10)10:Y$(L)::WIND,0,142,279,191:X0*BOX:3:"or...":"a) Press RETURN key if finished":"b) Enter ALL to "WD$" rejFDİ600:900d:50000) CHOOSE NAMES^h)NT2:T(1)3:T(2)4:T6:ZD2:WP0:SMZD1)34000:CL$:CN$"RESULTS ARE AVAILABLE FOR:"CO$CC$:0,18279,18:FCN,".RES",Y$,C:C0:CO,0,89:"There are no results saved on this disk.":30000:12000p8FD0:FCN,".RES",Y2$,Y2:Y2āXY2101:Y2$(X1)Y2$(X)::L21Y2:FD(Y2$(L2)ST$(L))FD:pBFDİ500:900LY212FDĺCL$:CO,0,89:"There are 12 student's results saved on this diskette. Results for "ST$(L)" could not be saved.":30000:6500:FL0:34000-700:L11E:W$(L1)Y$(L1):[SMNT1:T(1)4:WP1:T4:FL1:ZD1:34000SMFL0:ZD2:T4:NT1:T(1)4:WP1:34000CNT,FS:FS10ĺCL$:CO,0,89:"Your disk is almost full. No more results can be saved.":CL:LST:30000:6500^skette.":10:"Do you want to continue? ";:36000:Z$"N"5000gWD$"transfer":10600:C0ST06010SMT4:NT1:T(1)4:ZD2:WP1:FL1:34000:T3:ZD1:WP0:FL1:NT1:T(1)3:34000CST L1ST:F$ST$(L)".RES":SMT3:ZD1:T(1)3:NT1:WP0ain menu"::"Which number? ";:ELI,(1,"-13",1),A$TA((A$)):A6000,1050,31000jpTRANSFER RESULTSuT3:WP0:FL1:NT1:T(1)3:ZD1((SM)1):34000>zWIND:CL$:5:"Records will be transferred to a results diskette and be deleted from this dirint Word Lists","SIX","This utility allows you to print any word lists that have been saved on a diskette."ame list edited, or the results deleted."Ã"Check Student Results","FIVE","This utility allows you to see a list of all misspellings made by a student. These results can be transferred to a RESULTS data diskette containing cumulative results."lÃ"Pelected word lists from any diskette containing a word list to another diskette.")Ã"Edit a Spelling Diskette","FOUR","This utility allows you to make changes on a SPELLING diskette that has already been created. The lesson design may be changed, the nof students or an individual."nÃ"Enter or Edit a Word List","TWO","This program allows you to enter, edit, or delete word lists. Each word list can contain up to 15 words and sentences."QxÃ"Transfer Word Lists","THREE","This utility will transfer sur disk drive and diskette.":30000:7PòPROGRAM DATAdÃ"Create a Spelling Diskette","ONE","This utility will create an independent SPELLING diskette containing a tailored spelling lesson and a management system. This diskette can be used by a group :CO,0,80:ZE6ĺ"Error: File not found.";:32100Q}ZE8ĺ"I/O Error.";:32100(}ZE0ZE16ĺ"DOS Error #"ZE" in line #"ZN:30000:2}:"Error #"ZE" in line #"ZN" in Menu Program. Please report this error to MECC.":30000:%d}" Please check yo GENERATOR#:S#ZL11:XX(1):Z(16384):ZL(Z127)::ZZ128:16368,0:j0uSPACE BAR ROUTINE{:u:SPACE::y PROCESS ESC-ESC"y2000,y}ERROR PROCESSING }ZE(222):ZN(218)(219)256:ZE255Ĭ1}CO$CL$:WIND:HSP:VSPW$" "6030_(CO,CO(1,A)20,CO(2,A):" ":CO,CO(1,A)20,CO(2,A):W$:WD$(A)W$p(R$"N"6500(QF0:QD1:QT$(QD)WD$(A):110(BOX:CO:"Sentence: ";:S$(A)))8:"(Press RETURN if no change wanted)":4:"Change to: ";:ELI,(70,"CO::"Enter number of word to edit: ";:ELI,(2,"-09",0),A$:(A$)05070g'uA((A$)):AEA06000 (zBOX:CO::"Word: ";:WD$(A):8:"(Press RETURN if no change wanted)"CC$:4:"Change to: ";:ELI,(14,"-AZ-az .'-",0),W$:Q2$W$:900:W$Q2$:(W$)0,L):WD$(L):5&RS$"":R$"Y"RS$" and sentence "&BOX:CO:"Options:"::" 1. Edit a word"RS$:" 2. Delete a word"RS$:" 3. Add a word"RS$:" 4. Quit"&:"Which number? ";:ELI,(1,"-14",1),A$:A((A$))&A6000,7000,8000,1010J'pBOX:"Edit which word list? ";:ELI,(2,"R-09",0),A$:(A$)01010e%(A$,1)"R"E18PGPG:300:5015{%(A$,1)"R"5015%A((A$)):AEA05020%PF$Y$(A):T$"WORD LIST NAME: "Y$(A):500%F$Y$(A)".WORD":700 &L1E:CO,CO(1,L)20,CO(2 "WD$(L)::S$(L):30000:c$,BOX:CO::"Do you want to see another list? ";:36000:Z$"Y"4000m$61010s$$C0:800:Q1(Q1)$E01010$BOX:CO:4:"or":"a) Press RETURN to continue":E18ĺ"b) Enter R to see remaining lists"=%2:8)(APG18)40507#T$"WORD LIST NAME: "Y$(A):500[#PF$Y$(A):F$Y$(A)".WORD":700#L1E:CO,CO(1,L)20,CO(2,L):WD$(L):#R$"N"4140#BOX:CO::"Do you want to see the sentences? ";:36000:Z$"N"4140$L1E:BOX:CO::"Word:"or":"a) Press RETURN to continue":E18ĺ"b) Enter R to see remaining lists""2:"Which word list do you want to see? ";:ELI,(2,"R-09",0),A$:(A$)01010"(A$,1)"R"E18PGPG:300:4040"(A$,1)"R"4040#A((A$)):(AE)(APG181RD":EN:600'! XX1:AX:X18AX18;! X19PG1:300e! FD0X1įCO,C2(1,A)26,C2(2,A):NQ$! BOX:CO::"Do you want the list saved on another disk? ";:36000:Z$"Y"3080! 1010!!C0:800:Q1(Q1)!E01010N"BOX:CO:4:b XNMZ$"N"1010" t X03200F v FD0:L1X:Y$(L)NQ$FD1:LX { :FD1įBOX:CO::"The name entered has already been used. Using the name will replace the old word list."::"Do you want to use the name? ";:36000:Z$"N"3080 ! F$NQ$".WO30807 C0:FR1:800:Q1(Q1):FR0:NM18:ZT5NM36F ZT0NM3 BOX:CO:"This diskette can hold "NM" word lists.":"It currently has "X" stored.":30000X XNMįBOX:CO::"DISK IS FULL":"Do you wish to continue? ";:36000:Z$"Y"3080 0  3030e BOX:CO:8:"(Name can have 12 or fewer characters.)"CC$:2:"New word list name: "; ELI,(12,"-AZ-az-09 .-",1),NQ$:LU,NQ$:U((NQ$,1)):(U64U91)įBOX:CO:"Word list name must begin with a letter A-Z. Please re-enter.":30000:3:3062* QF0:QD1:QT$(QD)WD$(A):110 BOX:CO::"Enter sentence using: "WD$(A):CO,0,170:"(Do not press RETURN key until entire sentence has been entered.)":CO,0,140:ELI,(70,"-AZ-az- @",1),S$:S$(A)S$:QD2:QT$(QD)S$(A):110 200:QF307QD)WD$(A):110:QD2:QT$(QD)S$(A):110:WIND,0,115,272,191:200:(QF)3070V 3030 R$"N"įBOX:CO::"No sentences were entered.":30000:3030 R$"Y"įBOX:CO::"Re-enter sentence for which word? ";:ELI,(2,"-09",1),A$:A((A$)):A0ANA BOX:CO::"Re-enter which word? ";:ELI,(2,"-09",1),A$:A((A$)):A0AN3050 WIND:CO,CO(1,A)20,CO(2,A):" ":CO,CO(1,A)20,CO(2,A):ELI,(14,"-AZ-az .'-",1),WD$(A):Q2$WD$(A):900:WD$(A)Q2$:WD$(A)" "3055L R$"Y"QD1:QT$( word list":3:"5. Exit without saving"| :"Which number? ";:ELI,(1,"-15",1),A$:A((A$)):A3040,3050,3060,3080,1010 R$"Y"āL1N:BOX:CO::"Word: ";WD$(L)::S$(L):30000::3030 BOX:CO::"No sentences were entered.":30000:3030Saz- @",1),S$:S$(L)S$:QD2:QT$(QD)S$(L):110@ 200:QF3005I BOXl FL1Z$"N"LL1:BOX:Z$"Y"r ( WIND,0,115,272,190:BOX:CO:"Options:":3:"1. Review sentences":3:"2. Re-enter a word":3:"3. Re-enter a sentence":3:"4. Save theLLING DISKETTE"CO$:0,15279,154:"Options:"::" 1. Transfer the same word lists to":" another diskette"::" 2. Transfer different word lists to":" a diskette"::" 3. Return to main menu" :"Which number? ";:ELI,(1,"-13",1),A$:AE"F$:E:R$:XE:R$"Y"XE2iI1X:QO$Y$(I)QO$:I:D$"CLOSE":EYEY1:EY$(EY)(F$,(F$)5):1465LC:CL$:CO,0,89:"Your disk is almost full. No more lists can be saved on it.":30000lWIND:CL$:CO:CN$"TRANSFER LISTS TO SPE1448,NT3:WP1:ZD1:FL2:SMZD2:FL2o34000:SET,ZD:ZS645:RFL,"MECC$$DISK"ZS:38000:PTZT1450D$"VERIFY MECC$$DISK",D2$:CNT,FS:FS10ī1460CL$:CO,0,89:" Transferring "(F$,(F$)5)" word list..."D$"OPEN"F$;D2$:D$"WRITning the word list";.5SMĺ" in drive "ZD;E5".":30000:34010T5WP34099n5ZT$DT$:ZD2ZT$D2$5ZE0:ZEĺD$"BSAVE MECC$$DISK,A"ZS",L$28"ZT$<6 WP(WP1):ZE4įCO:CEW:GCP,Z1,Z2:Z2Z2((178Z2)2):CO,Z1,Z2:"Please remove the writeZN$34070c4߄CO:CEW:GCP,Z1,Z2:Z2Z2((178Z2)2):CO,Z1,Z2:Q1Ĵ(Q1)34030,34040,34040,340404䄺"Insert your "T$(T)" diskette";:340454"Insert the diskette ("T$(T)") to save the word list on";:340455"Insert the diskette ("T$(T)") contai"Please report this error to MECC.":30000[3Z}NT1:T(1)0:WP0:Q10:T0:ZD1:34000:31000b3Є 3ՄZU1:SET,ZD:ZS654:Q10340153ڄCPRO,ZP:ZPįCPRO,ZP 4܄SPRO,ZP(ZP):ZE0:ZEįRFL,"MECC$$DISK"ZS:38000:R0:ZL1NT:R(ZTT(ZL))R:ZL:RN$. Please check your disk and drive.":30000:320902N}ZE9ĺ"Your disk is full."CC$:30000:FCN,".WORD",W$,W:FD0:L0W1:FD(W$(L)NQ$)FD::FDĺD$"DELETE"NQ$".WORD"2O}ZE9ĺCL$:3250*3P}S$" error number "ZE" at line #"ZN:"in Program Two.":::T(1)0:T(2)5:T(3)3:T6:ZD2:34000:-1y^1|y35000:NT1:T(1)0:T0:ZD1:WP0:Q10:34000h1y1000n1}1 }ZE(222):ZN(218)(219)2561}ZUZE16Ħ1(}12}CL$:CO,0,801<}ZE255320901F}S$"DOS":ZE15S$"BASIC"32K}ZE8ĺ"I/O Error:L1C:D$"DELETE"W$(L)::10100 N0,20,0,30,0,40,0,50,0,60,0,70,0,80,0,90,136,20,136,30,136,40,136,50,136,60,136,70,136,80,0,20,0,30,0,40,0,50,0,60,0,70,0,80,0,90,0,1000LO130,20,130,30,130,40,130,50,130,60,130,70,130,80,130,90,130,1000`m'1jmNT3Y$(A)".WORD")::FG9030H/.'CC1:W$(C)Y$(A)".WORD":LA:A18LA18/8'BOX,C2(1,L)22,C2(2,L)1,(Y$(A))7C2(1,L)25,C2(2,L)7,8:9030/*CEįBOX:CO::"Are you finished? ";:36000:Z$"N"9020 0.WP1:28000:BOX:CO::"One moment please..."L:X18XX18:b.x#BOX,C2(1,X)22,C2(2,X)1,(Y$(L))7C2(1,X)25,C2(2,X)7,8:LEL18(PG18)o.#:12000.'(A$,1)"R"E18PGPG:300:9020.'(A$,1)"R"9030.$'A((A$)):AEA0(PGA19)(PGA18)9030/)'CFG0:L1C:FGFG(W$(L)ee remaining lists"-F#1:"Enter word list numbers (one at a time) of the lists to delete: ";:ELI,(3,"alrALR-09",0),A$:LU,A$-P#(A$)0C01010-Z#(A$)011000-d#(A$,1)"A"10000.n#CE:L1C:W$(L)Y$(L)".WORD"::L1(PG18)18(PG18):X0,"-AZ-az- @",1),S$:S$(E)S$:QD2:QT$(QD)S$:110F,r200:(QF)8040Z,600:700:5070`,(#w,-#C0:800:Q1(Q1),2#X01010-<#BOX:CO:4:"or":"a) Press RETURN key when finished":"b) Enter ALL to delete all the lists":X18ĺ"c) Enter R to sE1:600:700:5070+@)+EE155070+JBOX:CO:"Enter new word: ";:ELI,(14,"-AZ-az .'-",1),W$:EE1:WD$(E)W$:CO,CO(1,E)20,CO(2,E):W$+^R$"N"80701,hQF0:QD1:QT$(QD)WD$(E):110:BOX:CO:"Enter sentence using: "WD$(E):CO,0,130:ELI,(7)20,CO(2,A):" ":AEWD$(E)"":7110k*vLAE:CO,CO(1,L)20,CO(2,L):" ":*LAE1:CO,CO(1,L)20,CO(2,L):WD$(L1):WD$(L)WD$(L1):*R$"N"7150*AES$(E)"":7150*LAE1:S$(L)S$(L1)::S$(E)""+E-AZ-az- @",0),S$:(S$)0S$" "S$S$(A)6)S$(A)S$O)QD2:QT$(QD)S$:110d)200:(QF)6050x)d600:700:5070~)X)bBOX:CO::"Enter number of word to delete: ";:ELI,(2,"-09",0),A$:(A$)05070)gA((A$)):AEA070104*lCO,CO(1,Aor number "ZE" at line #"ZN:"in Program Four."::"Please report this error to MECC.":30000x Z}T0:ZD1:34000:31000~ Є ՄZU1:SET,ZD:ZS654:FLFLFL:34020 ڄCPRO,ZP:ZPįCPRO,ZP.!܄SPRO,ZP(ZP):ZE0:ZEįRFL,"MECC$$DISK"ZS:38000:R0L0:T0:ZD1:WP0:34000(yRNH,"MENU".}Q }ZE(222):ZN(218)(219)256a}ZUZE16Ħg(}y2}CL$:CO,0,80<}ZE25532090F}S$"DOS":ZE15S$"BASIC"K}ZE8ĺ"I/O Error. Please check your disk and drive.":30000:32090] P}S$" errY$(A))739,A1017,81XX1:W$(X)Y$(A):8050X0WP1:34000:BOX:CO::"One moment please...":A1X:F$W$(A)".RES":D$"DELETE"F$D2$:WIND:1010''CO:CEW:GCP,Z1,Z2:Z2Z2((178Z2)2):CO,Z1,Z2:y|y35000:NT1:T(1)0:Fults for which user? ";:ELI,(3,"alAL-09",0),A$:LU,A$:(A$)08090|(A$,1)"A"XC:L1C:W$(L)Y$(L):BOX,36,L109,(Y$(L))739,L1017,8::8090A((A$)):ACA08050XEE0:L1X:EEEE(W$(L)Y$(A))::EE8050BOX,36,A109,(L112:CO,10,L1010:L10ĺ" ";=YL"."::0,140279,140|^LC101:Y$(L1)Y$(L)::L1C:CO,40,L1010:Y$(L):hWIND,0,142,279,191:BOX:3:"or...":"a) Enter ALL to delete all results.":"b) Press RETURN to continue."Dr1:"Delete resnt please...":W$(C1)R$:W$(C2)GN$:F$"NAME LIST":EC2:600:2000X@DELETE RECORDSJWIND:CL$:CN$"RESULTS ARE AVAILABLE FOR"CC$CO$:0,18279,18:X0OFCN,".RES",Y$,C:C0įCO,0,89:"There are no results on this diskette."CC$:30000:8100"T1):@CC1:BOX,30,20,279,138:L1C:CO,40,L1010:W$(L):OC0ī5020]pC16500zGN$W$(1):L1(GN$):CH$(GN$,L,1):CH$","LN$(GN$,1,L1):SN$(GN$,L2):GN$SN$" "LN$:(GN$)19GN$(SN$,1)". "LN$DdBOX:CO::"One momeN to continue)"CC$:3:"Note: Records for this user will also be deleted.":1:"Enter number of name to delete: ";ELI,(2,"-09",0),A$:(A$)06000A((A$)):A0AC5020ST$W$(A):200:300:W$(A)"":C2CC1:6000LAC1:W$(L)W$(L09 ,.'-",1),GN$:W$(C2)GN$:A$GN$:400:GN$A$:(A$)03090c BOX:CO::"One moment please..."F$"NAME LIST":EC2:600:2000DELETE NAMEC0įBOX:CO::"There are no names on this diskette.":30000:2030rBOX:CO:5:"(Press RETURGC13095 FG1C1įBOX:CO:"This group can be given a name which will appear on the diskette title screen."::"Do you want to name the group? ";:36000:R$Z$:W$(C1)R$:R$"N"W$(C2)"":3095< BOX:CO:"Enter group name: ";:ELI,(13,"-AZ-az-O,0,89:"Please remove the write-protect tab from your "T$(T)" diskette.":WP2:30000:34010m3WIND:ZU0::%sert diskette to save word list"QQ$(E1)"on";HSMĺ" in drive ";ZD;Q"."WIND:0,70279,70279,1050,1050,70:30000:34010WP34099ZT$D1$:ZD2ZT$D2$ZE0:ZEĺD$"BSAVE MECC$$DISK,A"ZS",L$28"ZT$\ WP(WP1):ZE4ĺCL$:C"MECC$$DISK"ZS:38000:R0:ZL1NT:R(ZTT(ZL))R:ZL:RN$ZN$34070c߄CL$:WIND,13,80,265,191䄭(FL)3įCO:"Insert your "T$(T)" diskette";(FL)1įCO:"Insert diskette containing word list"QQ$(E1)"to be transferred";-(FL)2įCO:"Inve.":30000:32090}P}S$" error number "ZE" at line #"ZN:"in Program Three."::"Please report this error to MECC.":30000Z}T0:ZD1:34000:31000ЄՄZU1:SET,ZD:ZS654:FL034015ڄCPRO,ZP:ZPįCPRO,ZPF܄SPRO,ZP(ZP):ZE0:ZEįRFL,30,100 y7|y35000:FL3:T0:NT1:ZD1:WP0:34000GyRNH,"MENU"M}p }ZE(222):ZN(218)(219)256}ZUZE16Ħ(}2}CL$:CO,0,80<}ZE25532090F}S$"DOS":ZE15S$"BASIC"K}ZE8ĺ"I/O Error. Please check your disk and dri((A$)) A1400,1050,31000N N 0,20,0,30,0,40,0,50,0,60,0,70,0,80,0,90N 136,20,136,30,136,40,136,50,136,60,136,70,136,80,136,90N 0,20,0,30,0,40,0,50,0,60,0,70,0,80,0,90,0,100LO 130,20,130,30,130,40,130,50,130,60,130,70,130,80,130,90,1".RES",V$,V:V06070D%FD0:L0V1:FD(V$(L)NM$)FD::FD7000x%:D$"OPEN"F$:D$"WRITE"F$:"0000":D$"CLOSE"F$%XD$"OPEN"F$:D$"READ"F$:N$:D$"CLOSE"F$:N((N$)):NN(ER2)2:N898010&:D$"APPEND"F$:D$"WRITE"F$:Y$(1):ER:ER0āL1 SAVE RESULTS$$uDE$(8)"No"9000<$wCNT,FS:FS108000l$zF$NM$".RES":RO1Y$(1)"REVIEW (forced)"$RO2Y$(1)"REVIEW (optional)"$RO0Y$(1)PF$$ER06050$X0:L1ER2:XX1:Y$(L2)WD$(ER%(X)):Y$(L3)ER$(X):LL1:%FCN,1X:WD$(CR%(L))Y$(L1)DLL1:FD1:Y$(L12)(((Y$(L12)))1):L1X#:FD1(E3)DLY$(DL2)"0"āL2DLE3:Y$(L2)Y$(L23):Y$(L21)Y$(L24):Y$(L22)Y$(L25):L2L22::EE3:5050#FD1Y$(DL2)"0"EE3:L3DLDL2:Y$(L3)"":#:600$pXE:L11RV:FD0:L21E:Y$(L2)WD$(RV%(L1))FD1:Y$(L22)"2"":FD0XX1:Y$(X)WD$(RV%(L1)):XX1:Y$(X)S$(RV%(L1)):XX1:Y$(X)"2"""EX:600" UPDATE REVIEW FILE"CR0RO0ī6000"F$NM$".REV":700:XED#L1CR:FD0:L16:CO,0,20! :CO$:30000F! FG1:XRV:L1X:O%(L)RV%(L)::1524]! SAVE REVIEW FILEs!DE$(8)"No"5000!CL$:CO,0,89:"One moment please..."!RV05000!F$NM$".REV":700:E(RV3)89āL1E(3RV):Y$(L)Y$(LRV3)::EE(RV3)A"T C0:30000:" REVIEW OPTIONB FG1RV0DE$(7)"No"4000` CL$:EN$"":RV1EN$"s" CO,0,0:"Let's review the word"EN$" you missed.":3:0,18279,18:0,178279,178 ! CO,0,20:L1RV:CN$WD$(RV%(L))CC$:L10ĺCO$:30000:BOX,0,20,279,17V%(RV)O%(L))DE$(6)"1"İ30000:1535>DE$(6)"5"2900DE$(6)"2"DE$(6)"3"įCO,0,160:"Let's try again."CC$:30000:CL$:CO,0,40:CN$WD$(O%(L))CO$CC$:900:DE$(6)"3"BL1:1650DE$(6)"2"1650DE$(6)"4"CC1:C2İ30000:1535 CR1:CR%(CR)O%(L):2900OWD$(O%(L))A$DE$(5)"3"įIMAGE,2,110,120:1740WD$(O%(L))A$įCO,0,145:CN$DE$(11)CO$CC$FG2000ERER1:ER%(ER)O%(L):ER$(ER)A$RV0FD0:L11RV:FD(O%(L)RV%(L1))FD: (FD)RV0ER1RVRV1:RZ-az ,.'-",1),A$:QR14:400:A$" "1680T4:L1RX1LX11:L1,LY19L1,LY1:CO,0,40:CN$WD$(O%(L))CO$CC$:BOX,0,0,279,25WD$(O%(L))A$DE$(5)"3"įIMAGE,1,110,120:1725WD$(O%(L))A$įCO,0,145:CN$DE$(10)CO$CC$WD$(O%(L))A$CRA6:X1:BN:N0:1590|rBOX,0,70,279,191:CO,0,10:"Spell the word:"CN$CC$:PAUSE,15:5:L1LX1RX1:L1,LY19L1,LY1:|BL1įCO,LX16,103:(LW1)āL11(LW1):"_";::QRLWQR14:BLĺ"_":BL0:QRLWCN$(CO,LX16,100:ELI,(QR,"-09-A,0,90:180300002"N((DE$(4))):N01650K,X1:A1:B5:N5BN6BOX,0,70,279,191:CO,0,70:"Type the word:":L1AB@CO,LX,X1080:L110ĺ" ";EL1". ";:ELI,(14,"-09-AZ -az,.' - ",1),A$:400:A$WD$(O%(L))1600JXX1::N50:QX0L1XOCL$:CO,0,40:CN$WD$(O%(L))CO$CC$:Q1$WD$(O%(L)):UL,Q1$LW(Q1$):LX139((LW2)10)15:LY35:RY35:RX139((LW2)1015):900DE$(2)"No"1565 R$"Y"DE$(2)"Yes"QB$S$(O%(L)):(QB$)0QC$QB$:UL,QC$:150:QG0įCOLEL8:E91295@L916:(L4):20:WD$(L):LEL16F `0,174279,174:30000v SPELLING LESSONXE:FG0L1E:O%(L)L:DE$(3)"Random"ME:200QA0:QB0:QA$"":QB$"":QC$"":QT$(1)"":QT$(2)"":QE0:QQ0:QG2:QY1524RO0:800:E01200z3:0,175279,175:CO,0,180:"Which list? ";:ELI,(2,"-09",1),A$:A((A$)):AEA01245PF$Y$(A):F$Y$(A)".WORD":950:WIND:CL$DE$(1)"No"1500"Your word list"CC$:0,18279,18:L18:(L4):2:WD$(L)::CO,0,89:"Your review list is empty."CC$:30000:1200CL$:CO,0,80:"Your review list contains "E3" "QW$((E3)1)::"How many would you like":"to review? ";:ELI,(2,"-09",1),M$:M((M$)):ME31235M01200L1M:O%(L)L::200:350::ZL1NT:R(ZTT(ZL))R:ZL:R(N$ZN$)34070a!䄰10000:"Please insert your "T$(T)" diskette";{!鄭SMĺ" in drive "ZD;!".":30000:34010!WP34099!ZT$D1$:ZD2ZT$D2$ "ZE8İ10000:"I/O Error. Please check your disk and drive.":3CC$$DISK"ZS(v:L(ZE(ZS)0)39070l9:"WARNING:"::ZEĺ" This is a MECC data diskette.":3906038000:" This is a "T$(ZT)" diskette":" for "ZN$"."::"Do you want to erase this? ";:36000:OK(Z$"Y"):39099"9:ZEĺ"This izZN$"":Z1D(ZSZ)0Z36ZN$ZN$((ZSZ)):ZZ1:38020QZT(ZS)WӔmX VERIFY DISKETTEbZS654:ZO9503ZD:ZU1:ZE0::ZEĺD$"VERIFY LOGO,S"(ZO)",D"(ZO1)",V"(ZO2)gLZE:ZE8OK1:ZU0: lSET,ZD:ZE0:(ZE)įRFL,"ME4̈D1$",S"((953))",D"((954))",V"((955))wֈD2$",S"((956))",D"((957))",V"((958)):D1$D2$SM1}ZH(36)1:ZV(37)1:INP,(3,"YESNO",ZC),Z$:Z$(Z$,1):(Z$""ZC)(Z$"Y"Z$"N")ĖZH:ZV:868:36010p1:ZF1:"Enter a number between "ZB" and "ZT"."(3):37030]ZFįCO,0,181:CEL:CO,ZX,ZY:cĐ(Z$,1):Z$"Y"Z$"N"36020$Q STANDARD RANGED NUMERIC INPUT (HI-RES) ZB = MIN, ZT = MAX, ZC = C/R LEGAL (BOOLEAN)(1);:GCP,ZX,ZYZL((ZT))CO,ZX,ZY:INP,(ZL,N,(ZC)),ZN$:ZN(ZN$):ZCZN$""ı:ZNZBZNZTįCO,0,18:u:SPACE::$yENDING ROUTINEV"yWIND:CL$:10:"Do you want to try again? ";a,y36000s6yZ$"Y"::@yCL$:10:"Getting the menu..."::RNH,"MENU" STANDARD YES-NO INPUT(1);:GCP,ZX,ZYCO,ZX,ZY:INP,(3,"YESNO",1),Z$:Z$)x#S$L$(X)R$%#LKLJ:9110,#J3#Kq#13:CA$;:GCP,X,Y:0:50,Y1279,Y1:CEL:L(S$):K1L#A((S$,K,1)):PPCTK,A:A32AA64::GCP,X,Y:BOX,X1,Y1,X5,Y7,3#(A);CA$;:#K:Q$:CTCTL#0uSPACE BAR ROUTINES$"":8020#S$(S$,L1):80206(#SCAN FOR CHR$L2#L(S$):L79120r<#K1L6:(S$,K,5)"CHR$("9110F#JK6L:(S$,J,1)")"9100P#X$(S$,K5,JK5):X((X$))Z#X0X127X0d#L$"":K1L$(S$,K1)n#R$"":LJR$(S$,LJ$"Y"):L1"@STRING INPUT6JS$"":16368,0`TL(S$):C$:A(C$):A13Ĺ16368,0:|^(A8L0)ĺC$Q$;:8020hA88080rA34L198020|A32AA64::GCP,X,Y:BOX,X1,Y1,X5,Y7,3(A);::S$S$C$:8020 C$" "C$;:L1L111:CT1CL215:42L2:6:CA$;:CEW:"PRINT "Q$;:8000kS$""Ģ42L2:1:CA$;:CEW::L25S$""İ9000:CTCT1:PPCT,13L2:CTCT1:PPCT,0:PPCT1,255:PPCT2,25517:"Are the above commands correct? ";:36000 L1(Z1:ZT7:37000:PP,128ZN]v13:"Does your printer require any special commands? ";:36000Z$"N"ĹPP2,0:PP3,255:PP4,255:BOX:CO:"Please type in the special commands for your printer. Type an extra 'RETURN' when you have finished."":32160*n}"*x}(12):CO,0,89R*}"Error "ZE" at line "ZN" in Master Spell."}*}:"Please report this error to MECC."*}SPACE:31000**(1);:GCP,ZX,ZY +CO,ZX,ZY:ELI,(3,"YESNOyesno",1),Z$:Z(Z$):Z$(Z(Z96Z123)32):Z$"Y"Z$2110()}ZUĦ: ZU=USER PROCESSING FLAG.)(}B)2}(12):CO,0,89)F}ZE4ĺ"Please remove the write protect sticker from your diskette.":32160)P}ZE8ĺ"I/O error. Please check your disk drive and diskette.":32160*Z}ZE9ĺ"Your diskette is full."C(|yCL$:CO,0,89:"Insert another diskette."CC$:ES0:30000:CL$^(yP(S)(S)(S1)256y(DzCS(P(P(999))1)16(zCS1CS7CS6( {CS(}( }ZE(222):ZN(218)(219)256:216,0:32000(}WIND:VSP,1:ZE25531000)}(15):ZE153ed or deleted.":30000H'(#RV0:ER0:FG0:BL0:C0:CR0:RO1RO0:1200S'2#31000Y'0un':u(1):SPACE::'y ESC-ESC PROCESSING'yES31100'"yCL$:CO$:CO,0,80:QN$", do you want to practice another word list? ";:36000:Z$"Y"1200(,yQN$"ER2:QO$Y$(L2)QO$:&&D$"CLOSE"F$>&N$("0000"(N),4)r&D$"OPEN"F$:D$"WRITE"F$:N$:D$"CLOSE"F$:9000x&@'JCL$:CO,0,89:"Your disk is almost full or your file is too large. No more results can be saved until records have been transferrn { ^_ ( { R {#egiehj {,0 l,`,L 8n <= eL׭<=<=Ѝ,, ,` { ~`7PL才牍7艍P(L ʊLL &Ly^_ z8򇈱 l ޭ^_ y y _LL쇩L<퇭I ({ ʽ)쇭i>i?퇑>ȭ>ȭ>`L { ^>_? { ^<_= ޭ xȐ :` *[a"{,,,p 0 )m)` )` L ֩PyQ AL qᇝ`ih Ihi` ~LSH)hJJJ` LALNC SAZaz09!/:@[`{~@ @ { 퇍*쎇7 q79ֽ 3 ~L셩 ` ,Yȱ< ͭȱ?ͭȱ> 𽍭 @@ ͭȱ@`12`) * I0L8^ ILĆ, I@A͵ SLڄ̶^`N ݴ 輴߹ S , g 掍 , j) ) ߅ l  L{-   8,(  g RB&'<, zEFhD?@ BEFLς,0هʈ <=>?@A (L | {$0! 掎 ,Ld ^ {$0L^N 卶| r- I   I-P Pxp @H HHhPPP P PP  @@  P@ pxxxxxxpx0H@@@@pxp ` p0`` pبppxxxp@@@@H0hP @ppppx @ @@ @  @p px Pppxxp ppبȨppph𠐈ppp pP AUSCWININjXmemfj4kWkkkkkkkdkkllBmmmm` PPPPPPPP xp(  @@@h @ @@  p p @  @pȈp ` pp0@0p0Pp8@p @@Ɲo) +po9pp Ъ 8pLo ` ֩PyQ AL +pppAp`#p"p p"p#p` ~L pH)hJJJAp`LANCS AZ09!/:@[`{~ @BOHOOUNHOOCECRDFAFPARSNOJUSJUSCNNOCNGCDVSHSSPACCEP40 BOX,0,178,279,191:3:"Enter first name: ";:ELI,(11,"-AZ-az '-.",1),SN$:A$SN$:400:11000:SN$A$:(A$)0A$" "((U64U91))2060*+U0:(A$)U(A$) +U96U123UU32:A$(U)(A$,2)[+4U91))2060*+U0:(A$)U/"Y$(13)") "1110?BOX:CO::"One moment please...";wL113:W$(L)Y$(L)::F$"DEFAULT.DESIGN":E13:600 NAME LISTCL$:WIND:CO:CN$"NAME LIST"CC$CO$:0,18279,18L112:CO,10,(L10)10:L10ĺ" ";L;"."::0,140279,1 before reviews are required? ";:ELI,(2,"-09",1),NR$:((NR$))01732BOX:CO::"What is the maximum number of words that should be presented in a review? ";:ELI,(2,"-09",1),NW$:((NW$))01735 Y$(12)NR$:Y$(13)NW$:WIND:12:33:"("Y$(12)" required."=:" Do you want forced reviews? ";:36000WIND:11:33:Z$"N"ĺ"No ":Y$(9)"No":33:" ":Y$(12)"0":Y$(13)"0":1740"Yes":Y$(9)"Yes":WIND,0,115,279,191:BOXGCO::"How many misspelled words must be on the reviews a MECC program diskette.":39090Z38000:"This is the program diskette for:":ZN$"."::"Please choose another diskette for use.":30000ZU0:S diskette for use.":30000ZU0:U0:00ZU0:QLTS DISKETTE KT1U2:20000# cK? NCOPY A T$(T1) DISKETTEj *NCL$"Copy a "T$(T1)" data diskette"CC$4!4NCO,0,72:"A blank diskette (or one whose contents you no longer need) must be supplied for making a backup copy of the "T$(T1)" data diskette.":14Z$"results of student performance":CO,0,81:CEW::"This data diskette is now ready to store "Z$".":30000:ZU1:ZE0:ZEĺD$"VERIFY LOGO"D1$:GET BACK TO FIRST DRIVE:ZU0:J COPY WORD LIST DISKETTEJT1U1:20000J K COPY RESU0:SET,2:ZD2:39000#:OK15099f:CO,0,27:CEW:CO,0,89:"Creating a "T$(T1)" data diskette...":DT$D2$:29500:ZE15099:S,T1:D$"BSAVE MECC$$DISK,A"S",L$28"D2$:S,0: ADD ANY FEATURES TO NEW T$(T1) DISKETTE HERE':Z$"word lists":T:36000:Z$"N"15099e:CO,0,18::CEW:CO,0,81:"Please insert a blank diskette";:(S36)1ĺ"."k::(S36)3ĺ"in the drive located at:":" Slot: "(S37):" Drive: "(S38):" Volume: "(S39):(S36)2ĺ"in drive 2.":3000:15000 7-: CREATE A T$(T1) DISKETTEZ:CL$"Create a "T$(T1)" data diskette"CC$:CO,0,72:"A blank diskette (or one whose contents you no longer need) must be supplied for creating the "T$(T1)" data diskette."::"Do you want to continue? ";s return. ";."Pressing return alone will accept the current values (or the default values if no current values exist) displayed to the right.":30000.7 CREATE WORD LIST DISKETTE7T1U1:15000w7x7 CREATE RESULTS DISKETTE7T1U2$""DL$DF$*-CO,ZX,ZY:DL$CA$;:CEL:0.L|.HELP FOR SPECIAL SETUPt.CL$"Special Disk Drive Setup"CC$: .:"To change the slot, drive or volume of the drive to hold the "T$(U1)" and "T$(U2)" data diskettes, type the desired number and presr your "T$(U1)" and "T$(U2)" diskettes in:":CO,0,153:"Is this correct? ";:36000:CO,0,144::CEL:Z$"N"11020R+S37,SL:S38,DR:S39,VO[+- SLOT,DRIVE,VOL INPUT -L$CA$;:GCP,ZX,ZY:CO,105,ZY:"["DF$"]":CO,ZX,ZY:INP,(M,I$,0),DL$:DL Slot: ":DF$((956)):11700:SL(DL$)k+M1:I$"12":L$" Drive: ":DF$((957)):11700:DR(DL$)+M3:I$"-09":L$" Volume: ":DF$((958)):11700:VO(DL$):VO255VO254:CO,ZX,ZY:VOq+CEW:CO,0,99:CEL:CO,0,90:CEL:N$" will look foCL$"Special Disk Drive Setup"CC$:::"Your PROGRAM diskette was started from:"::" Slot: "(953):" Drive: "(954):" Volume: "(955) +CO,0,99:CEL:CO,0,90:CEL:"Where will your "T$(U1)" and "T$(U2)" diskettes be?"++:M1:I$"-37":L$"ller card), use "QU$"Select special disk drive setup."QU$*:"This option will ask you for the slot, drive, and volume where your "T$(U1)" and "T$(U2)" data diskettes will be located. ";*30000** SPECIAL DISK DRIVE SETUP*11900+C$::*"This menu asks how many disk drives you are using. The current selection is displayed at the top of the screen.":*"Most users will have either one or two disk drives. ";9*"If you have a different setup (such as more than one controc z# `L 䎱 掲`$8 ߅=<(LLj<{a <`$^NIS3325(3K64):TT1:ZD2:WP0:34500$_N12:"Preparing your backup copy...":SET,2:Z4IS:QSZ(Z35)34(Z34):ZU1:ZE0:ZEįDR,IS,0QS,1516384$aNZE29400:K64ZEįDR,5IS,07IS,1553248%cNZE29400:ZD1:T2:WP1:1516128)#GNZU0:ZE29400:ID(16128)9#HNZD1:39000H#RNOK20090#WNCL$:CO,0,89:"Preparing your backup copy...":DT$D1$:29500:ZE20090#YNIB(ID1)256(ID0):16128,IB:ZU1:SET,1:ZE0:ZEįDW,34,1534,1516128$]NZU0:ZE29400:901,2:CO,0,27:CEW:CO,0,90:"Please insert a blank diskette";:(S36)2ĺ" in drive 1 and your "T$(T1)" data diskette in drive 2";"@N(S36)3DC2ĺ" and your "T$(T1)" diskette";"CN".":30000#ENDC2TT1:ZD2:WP0:34000:ZU1:ZE0:ZEįDR,34,1534,:"Do you want to continue? ";:36000:Z$"N"20090!;NDC(S36):DC3ĺCL$"Special Copy Setup"CC$:Q$"backup":21000:Q$T$(T1):21000:35000:DC(D1$D2$)1!NZU0:ZE29400:000`0x |||| ||x|8l````|| x````8p`````lxx|| |x ````l8|x0x0x| x0`0````0``0``v0`x000||0xxx||````` xxxxlxx x000000xx0x0xx0000 0``0 0xth`lllll~~~0` pvv0`0``0`000`~<~0000`` 0`xx0p0000xx 8` 8 x8x x<`x 0```xxxx| ```0``0`0  rd yes-no input%6(1);:GCP,ZX,ZYk6CO,ZX,ZY:INP,(3,"YESNO",1),Z$:Z$(Z$,1):Z$"Y"Z$"N"36020q66p GET DISK NAME AND TYPE6q ENTRY:ZS6r EXIT: ZN$,ZT6zZN$"":Z16(ZSZ)0Z36ZN$ZN$((ZSZ)):ZZ1:380207ZT(ZS:12:"Please remove the write-protect tab":"from your "T$(T)" diskette.":WP2:30500:34510j5'ZU0::5 GET DRIVE STRINGS5̈D1$",S"((953))",D"((954))",V"((955))5ֈD2$",S"((956))",D"((957))",V"((958))56 standaor "N$;:ZC(S36):ZC2ĺ" in drive "ZD;4↭ZC3ZL953(ZD2)3:" in the drive":"located at:":" Slot: "(ZL):" Drive: "(ZL1);4".":30500:345104 WP345994DR,17,017,016128:ZE0:ZEįDW,17,017,016128]5WP(WP1):ZE4ėZEZE0:ZEįDR,34,1534,1516128e3҆ZEįRFL,"MECC$$DISK"ZS:38000:(T0)(TZT)(N$ZN$)345703ӆ(T2)(((T1ZT)(N$ZN$))ZE6)(16128)IB345703Ԇ(TT1)(T1ZT)(N$ZN$)(16128)ID34570)4؆:11:"Please insert your "T$(T)" diskette":"flease remove the write-protect tab from your "T$(T)" diskette.":WP2:30000:34010]23ZU0:2Ć DISK VERIFY TEXT VERSION USED ONLY FOR COPY2ɆZU1:SET,ZD:ZS6542ΆCPRO,PZ:PZįCPRO,PZ2ІSPRO,PZ(PZ):ZE0:ZT1:ZEįDR,34,1534,1516128#3цS36):ZC2ĺ" in drive "ZD;~1ZC3ZL953(ZD2)3:" in the drive located at:":" Slot: "(ZL):" Drive: "(ZL1);1".":30000:340101WP340991DR,17,017,016128:ZE0:ZEįDW,17,017,016128R2 WP(WP1):ZE4ĺCL$:CO,0,89:"P(PZ):ZE0:ZEįRFL,"MECC$$DISK"ZS:38000:(TZT)(N$ZN$)340700䄺CL$:CO,0,89:ZVZE7ĺ"The volume number of this diskette does not match the current setting.":300001ZV(ZE7):CL$:CO,0,89:"Please insert your "T$(T)" diskette for "N$;:ZC(at line #"ZN".":"in Diskette Support"::"Please report this error to MECC.":30500/U}29700:ZU1:ZE0:ZEĺD$"VERIFY LOGO"D1$/Z}T0:ZD1:WP0:34500::12:31060/Є DISK VERIFY/ՄZU1:SET,ZD:ZS654:ZV0/ڄCPRO,PZ:PZįCPRO,PZC0܄SPRO,PZUNSPELLUTIL.OBJ":RFL,"HPRINT.OBJ":975,255:RNH,"MENU"N.} ERROR PROCESSINGq. }ZE(222):ZN(218)(219)256.}ZUZE0ZE16Ħ: ZU IS THE USER PROCESSING FLAG (FOR DOS ERRORS).(}REENTRY.<}ZE25531000.F}FILT:::12:1T/P}"Error "ZE" RD ENDING ROUTINE (HI-RES))-y(901)ĬX-y29700:(901)2T0:ZD1:WP0:34500::i- y54915:1000-6y29700:ZU1:ZE0:ZEĺD$"VERIFY LOGO"D1$-@yZU1:T0:ZD1:WP0:34000-JyZU0:CL$:CO,0,897.Ty"Getting the menu...":NOFILT::901,0:D$"BR:SPACE::(,$w SPACE-BAR TEXT VERSION[,.wZF0:24:1:868:7:"Press ";:(64435)6Ğ,8w"SPACE BAR";::" to continue";,Lw16368,0:16384,128:ZP(16384):ZF(ZF1)(ZP155):ZF231000,VwZP160ZP14130540,`w16368,0::-y STANDA000`0x |||| ||x|8l````|| x0p000x8pp00000xxx|| |x ````l8|x0x0x| x0`l00000000lll0`x000x|0xxx||00000 xxxxlxx x000000xx0܌x0xx0000 0``0 0xX]`000000lllXXXXX0|x<00` ``t0`0``00 00x0x00000 @0 0`xx0p0000xx 8` 8 x8x x<`x 0```xxxx| 00000`0``0`0  LԢg 5 kde  _ e ?g  G ?g,`Ӝ, 8`Lg8hegiȱehj8ȱL ȱ8쭛8ȱ>? :p"b>c? %p Ŕg^h_^`ȱ^Șe^^_iȑ^^_XC_@`Aa>b?c  # { RPQ ,L ŔLl`Q eDZE[B^C_@`Aa>b?c  )Ŕ e,L׭XLXLX Ɣ$)Ŕb>c? pŔ G ߅$0  c`Lv +Lˑ  , `  , L h?> h=<8?. e<&8>!>> g R>P>Q ?=<`L #H h`STɱST` ST` ܏L \DZE[B^բ )L<đőƑ )ǑȑɑL<' m''㙍(♼䙮( )'((L<Uz_j`S縎X]` ΐL|LKH ) <ȥ?< <H<= H <=̐ I<ː<͐̐`*>%>>*@%@@ E@L~`ɪɭ`8` ` Q < m♍㙍䙍$ Y%λɩ` Zμ ZLG< νЬȽ` <=ʱD>` L`݌$8`U34 1U`pQ34,Pp8`dd`yy z $8` 8Lɪɖ8*-*<%<<Ќ LɌHILVɯL )8ɀ   Lޤȱ 0:,јe湥 :i;i , ,`HIL<=<ȥ?< <H<= H <= I<<`բ 䁠L 䁭 L m⁍ぽ 䁮⁽ぽLUz_j`S=e>e?8<@=Ae <=>?@A 8囅`e懱 Lh懱(8$` ȱHȱh$8`>=?@3<>`=eA=?eA?A@ <><>=?Ц {XRgh " a L >?<=@A { zii` Lԅ01 <=<0=1 WKܥ<0==17>? W<=8<@=A8<>B=?C8Bư $8`>?<= W8@A <JJJJJQ&)Q&&`)( )Q&)Q&&(JJJJQ&)Q&&`)( )Q&)Q&&(JJJQ&)Q&&`)( )Q&)Q&&( JJQ&)Q&&`)( )Q&)Q&&( JQ&)Q&&`=k}}}~~~~H ziȌ^_h}}}}@A }  y} `@ i @ ȱ `,X}`Dx} D`}D}ED`~}~}`L(&`)( )Q&)Q&&(JJJJJJQ&)Q&&`)( )Q&)Q&&(ȱ> |o| ||ȱ p{|8ȱ |>? :}4p >? :}!p ||<|=,`||8쭢|`| p{|x} up Y}D}E}B}C}@}A}>}?'{)?eeȱe,'{`l{m{Nk{8ol{n{pm{o{n{mo{n,k{L8.k{ L1{n{o{op`а ,,i,,`gh`ȱȘeiȑ |%)|>? :}PL||; 8`| | g|h| Hz "zzieHeh`>?荆z ȱ쨊 $8`LȌzi̅z+ɠzʱ݇z̅z 8z$8`g?  "z`Lԭzi#zw`8pwJJJ) }>x捚w&xmww`((((PPPP>?4> x<=8> <=Άx<=`xxx?xxx xxڰx`8 xyyy.yxmɪɖ8*nw-nwnw*<%<<*>%>>*@%@@ nwE@Lv`ɪɭ`8` www`ww xww`w w xwww`xxx8pw.x(wwxmxD>ʱD>` L(v`GvGv݌$8`cvvdv av݅v`pcvvdv,vp8`ddvvv .vv mvvvmvvv``vv v pw$8` 8LmwuOL+uxuyu+uL ɯLu )8ɀ   Lޤȱ 0:,јe湥 iuiu , ,`xuyuL<=PROGRAM:DISKETTE SUPPORT_PROGRAMMER: ANDY HOLLENBECK|(COPYRIGHT (C) MECC 19842LAST UPDATE:85/08/06 RLHd901,0e32000f:(4)"MAXFILES1":16128:230,64 nD$(4):CA$(1):CL$(12):CC$(3):                             u,,I,`0 {{~~{{~~?000000{{~88~~|xx~~~~{{~~~00~~|~~~{~~~f<ff<>>>~~ @ժՖՖխժժժժխՖխժCPRDDFILNOFILRFRNRAWFWFSNOPRSPRFPSEIN|*gϕŖeUđ_őjƑSǑXȑ]ɑP7 ` `hhh ɛ nu,uPLwNu,Ǚ05Ɉhd ,ƙɿɯ 詍0S,řɁɍؙA,Ù ,Ǚ0ٙv) v9ڙ ,Ǚ0 Lژ Lژ ` ֩PyQ AL ڙș` 쨙` ~LH)hJJJș` ` 卟L4 &R-?nƙLݗnřLݗ & & -͞ Lݗ̟^` , g ؙ , ԙ) ՙ ֙י)NÙ ߅ l ) L{u,Ǚ0- HHHٙ 7P(Lܐ ʊLL( 掲 O`L &L`L 䎱 掲` 㩀ÙǙƙřșؙٙ ( Ln {$0$ ٙnǙ ,LG {$0LANE?`G`xx`EpG@Gp`@CAL@`p<NBB 8D08 q\EE .w@``p8BBA88p``@P`xTx`@Hp|H ?? Gp@F|pFAW@HAF|p@G ?? GF@p|J?>,>$f<<`S! ˑ&$H)'h0,(0RL/VWG67  WVXXZ,%5S,%N( )9*I7)*:L+ɑvw+L/ɯL 8ɀ   Lޤȱ 0:,јe湥 %i&i , ,`vwLB 2?F<?F<>* >.    z#  ԮĠӮĠٮĠ  Ϯʠ ŠԠ ԮΠ"ҠĠӠ Ӯ ŠԠ3 ̮ʠŮԠ ҠӮΠ ɠĮԠ ɠĮԠ à Ϡ äˠ ٠Ϡ  ŠŠ ή !Ԯʠ"̮ʠ ̮ʠԮʠ̮ʠ Ҡؠ ٠Ǡ͠%ҠԠŠǠŠ٠ϠŠŠҠ̠ϠՠŠŠϠ0Šp` fffffffffl6iɆpqs 0 000000 0 0Z<|~~6J*NGAGsBcB6cCtwutJUNGAGsBsB63CCnJ*NAsBc600`CFJUOAs``wBfgC{9{{ J*B MBlLC8W0W8JUBBgBlgClk {|J*BBC AC~~|~~JUC8W0W8JUBBgBlgClk {|J*BBC ACFJUNG\AaEgAdGsvC6ACFJ*NG\AE?AdGsBcB6f`CBwJUNG\G~AxdGsBBCFB;FJ*NGAGsB`B0`Ca]a}}JUNGAGsBgB0gC.5B;J*NGAGsBsB63Cwx{JUNGAGsBs600p00CBn<B~BBBYCFJUNG_8030?08dGQF@`Dp`@HB@@_BY_CFJ*NG_BC~dGOG|L|HBFACFJUNGAGOD@CAAGA ~x`FBAQB oBlOCFJUNG\OF@IIDOdGP?D@B`ABpAB8ABAABBLBlOCFJ*NG_CByCdGOaHBAQBBOB`OCFJUNG_ | dGQ|0TAA ~~B@@oBLOCFJ*NG_p`pc`pdGOE@`pG`@GBBYBB3CFJ*NGAGJ`@UCUBUBUUUBUABUCUBOBfFCFJUNGAGN~C*B*B* FBC BBB CFJ*NGAGOCUBWBB@B`@CFJUNGAGOCC@B`ABpAB8ABAABBGlo`OCFJ*NG\IdGO捿ttmtt`BB0xXCFJ*B037B6ACFJUBBC3ACFJ*BA_BBC3ACFJUNA]??B/++*C*BB3?>CFJ*NGAGO?_WUUUBUABUCUBB>0CFJUNGTvGJ??C*B*B***B*AB*C*Bt u@ )` t t t0H)?hJ t t t?Lt t&'&Ȅ``tt ttt`t)tJJ tttt .t .t ntt) 999))14) DC(LL36)M 953,SL:954,1:955,VO:956,SL:957,DC:958,254r DC3āZ02:956Z,(LL37Z):x  :  }: 8192,"LOGO":16304,0:16297,0:16299,0:16302,0z 8192,"SPELLUTIL.OBJ":4000:RFL,"HPRINT.OBJ":975,255:RNH,"MENU" SL1SL7SL6 SL  LL704:P(X)(X)(X1)256:RFL,"MECC$$DISK"LL SL(P(P(999))1)16:VO(P(P(z MASTER SPELL'PROGRAM: HELLOECOPYRIGHT (C) MECC, 1984d(LAST UPDATE: 86/07/16 JJKj::(4)"BRUNHELLO.OBJ"(941)48Ģ11:"THIS DISKETTE NEEDS AT LEAST 48K RAM"::"MEMORY TO RUN.":16384,128:16368,0:30003 230,64:  &H#DL$:CO,ZX8,ZY:9100:Z139070JJ#Z8Z127įCO,ZX,ZY:CEL:9010L#OF1Z48A58:CO,ZX8,ZY:(Z);DL$;CA$;:9040N#9032P#9100:Z139070Z#Z8Z127įCO,ZX8,ZY:CEL:9032d#9040n#AA48:A1A1 x#XX(XX):SEED RANDOM #whenever the computer is waiting for a response."IWIND:VSP:30000:\(#INPUT ROUTINE-#CA$;:16368,0:GCP,ZX,ZY:WIND,ZX,ZY,250,ZY12:DL$(127)2#OF0:DL$:CO,ZX,ZY:9100:AZ:A19070<#A49A(48N1)9010A#A49OF1F#(A);CA$;Lexington Avenue North":"St. Paul, Minnesota 55126":"(612) 481-3527"]R30000:CL$:WINDr ESC ESC SCREENVSP,4:CL$:::"Use of Esc Key"CC$::1"You may want to quit in the middle of a program. If so, press the Escape (Esc) Key twice "A manual to aid in the use of this diskette is available from MECC.":VSP49:" Title: ";CA$;:GCP,ZX,ZY:TI$:PA$""įCO,ZX:PA$>12:" Direct inquiries to:"::" "CC$;:GCP,ZX,ZYGH:WIND,ZX,ZY,279:CO:"MECC Distribution":"3490 CO,X1,Y1:CEW! DESCRIPTIONS^L1NP:GCP,ZX,ZY:ZY150ZYY1İ30000::CO,X1,Y1:CEWAFT,2:CN$MN$(L)CO$::" ";:GCP,ZX,ZY:WIND,ZX,ZY,279,191:L11DP:DS$(L,L1);:L1:WIND:::L:30000 SUPPORT BOOK INFOK*CL$:CO:VSP,10:::"Master Spell is a teacher's utility that allows you to create an independent SPELLING diskette that can:"::" 1) be used by up to 12 students;"" 2) be individualized;":" 3) contain up to 18 word lists;":" 4) store results.":30000:VSPYLX1L,Y1DYLX1DXL,Y1DYLX1DXL,Y1L:1:L02:9,6L432L,6L:2352L,6L269,6L:9,183L392L,183L:2392L,183L269,183L:XGENERAL INFObAFT,2:CN$CL$TI$CC$:PA$""ĺPA$CC$lVE$CC$:CO$::GCP,X1,Y1vVSP,4185:267,6267,32:269,6269,33:267,159267,185:269,158269,185s6:X10:Y10:X2278:Y2191:DX18:DY12:L02/X1DXL,Y1LX2DXL,Y1LX2DXL,Y1DYLX2L,Y1DYLX2L,Y2DYLX2DXL,Y2DYLX2DXL,Y2LX1DXL,Y2LX1DXL,Y2DYLX1L,Y2Dease...":RNH,F2$'END OPTIONSCL$:11:"Insert another diskette."CC$c30000:CL$CS(P(P(999))1)16: SLOT #CS1CS7CS6CSp BORDERz4:21,021,191A1:9,69,33:11,611,32:9,1589,185:11,15911,s":F2$"MANAGEMENT"K AS(3)F1$"Printer Support":F2$"PRINTER SUPPORT" AS(4)F1$"Diskette Support":F2$"DISKETTE SUPPORT" AS(6)5000  D$"MAXFILES1" A0ANPF1$MN$(A):F2$CN$(A)CL$:HSP:VSP:CO,0,89:"One moment plN:N". End" 6 :GCP,ZX,ZY:ZY160įCO,ZX,ZY4^ "Which number? ";:9000:CO$:WINDv AS(1)İ7000:2000 MOA1ĺCL$:VSP,8:CO,0,75:"There are no management options available.":30000:2000 AS(2)A1F1$"the management optionTeacher Utilities:"; :L1NP:2(L9):L". "MN$(L)::K "Other:": NNP1:2(N9):S(1)N:N". General Information"  *NN1:2(N9):S(3)N:N". Printer Support" 4NN1:2(N9):S(4)N:N". Diskette Support" HNN1:2(N9):S(6)STATEMENTS ARE AT 50000) DISPLAY MENUG (975)255Č24768:975,1 230,64:24576:DFT,2,35663:AFT,2:DFT,1,15128:AFT,1:CO$:HSP:VSP:WIND CL$:6000:CO,0,MT:CN$TI$CC$:PA$""ĺPA$CC$ AFT,2:CN$:GCP,ZX,ZY:WIND,ML,ZYSP,270:CO:" P(S)(S)(S1)256S RFL,"ASCII BOLD.PFT"35663:RFL,"HEADLINE.FNT"15128Y Ll VNP6:DP1:MO0 `TITLE$"Master Spell":PART2$"":VE$"Version 1.3" jMN$(NP),CN$(NP),DS$(NP,DP) tL1NP:MN$(L),CN$(L):L11DP:DS$(L,L1):: ~DATA m MASTER SPELL&PROGRAM: MENUCPROGRAMMER: P. BOUCHARDa(COPYRIGHT (C) MECC, 1984}2LASTUPDATE:86/07/14JJKZ32000INITIALIZATION15128CA$(1):CC$(3):D$(13)(4):CL$(12):CN$(14):CO$(15)MT8:ML37:SP0          c QC3ZL953(ZD2)3:" in the drive located at:"::" Slot: "(ZL):" Drive: "(ZL1);".":30000:CL$:34020 WP34099*ZE0:ZEĺD$"BSAVEMECC$$DISK,A"ZS",L$28"ZD$</WP(WP1):ZE4ĺCL$:CO,0,89:"Please remove the write-protISK"ZS:38000:(TZT)(N$ZN$)34080CL$:CO,0,73:ZVZE7ĺ"The volume number of this diskette does not match the current setting.":30000ZV(ZE7):CL$:CO,0,89:"Please insert your "T$(T)" diskette for "N$;:QC(ZS36):QC2ĺ" in drive "ZD;{x}WIND:CL$CO$:CO,0,80:"Error "ZE" at line #"ZN" in program One."::"Please report this error to MECC.":30000:31000Є DISK VERIFYڄZD$D1$:ZD2ZD$D2$ZU1:SET,ZD:ZV0:CPRO,ZP:ZPįCPRO,ZP%SPRO,ZP(ZP):ZE0:ZEįRFL,"MECC$$D600' RNH,"CREATE SPELLING DISKETTE"-yM|y35000:T0:ZD1:WP0:34000]yRNH,"MENU"t} ERROR PROCESSING} USES:CL$,ZE,ZN,ZU }ZE(222):ZN(218)(219)256:216,0:32000}ZUZE0ZE16Ħd} PROGRAMMERS REENTRYn}ZE25531000oment please..."L11C1:L21CL1:WL$W$(L2):WC$W$(L21):LU,WL$:LU,WC$:WL$WC$T$W$(L2):W$(L2)W$(L21):W$(L21)T$::BOX,30,20,279,138L1C:CO,40,L1010:W$(L):BOX:CO::"One moment please..."F$"NAME LIST":EC2:LING diskette."::"Do you want to name the group? ";:36000wR$Z$:W$(C1)R$:R$"N"W$(C1)R$:W$(C2)" ":2220BOX:CO::"Enter group name: ";:ELI,(13,"-AZ-az-09 ,.'-",1),GN$:A$GN$:400:GN$A$:W$(C1)"Y":W$(C2)GN$BOX:CO::"One mA02160+zACāLAC1:W$(L)W$(L1):@CC1:FL1:2045C1W$(C1)"N":W$(C2)SN$" "PN$:(W$(C2))19W$(C2)(SN$,1)". "PN$C12250<BOX:CO:"This group can be given a name which will appear on the title screen of the SPEL:W$(C)HFL02045$\C02050oaFL0įBOX:CO::"Are you done entering names? ";:36000:Z$"N"2045fBOX:CO::"Do you want to make any changes? ";:36000:Z$"N"ī2190 pA1:C1Ģ3:"Which number? ";:ELI,(2,"-09",1),A$:A((A$)):AC2050FD0:WC$W$(C):LU,WC$:L1C1:WL$W$(L):LU,WL$:WC$WL$įBOX:CO:"That name has already been used. Please enter another name.":30000:FD1:FD1CC1:2050 FLįBOX,30,20,279,138:L1C1:CO,40,L1010:W$(L):*CO,40,C1010C0:FL0 C122150 BOX:CO:5:"(Press RETURN to continue)"CC$:2:"Enter last name: ";:ELI,(14,"-AZ-az '.-",0),LN$:A$LN$:400:11000:LN$A$:(LN$)0LN$" "2140CC1:W$(C)LN$", "SN$:C1įBOX,30,20,279,138:PN$LN$:CO,40,20:W$(1):n on the main menu.":30000:31000n BOX:CO::"Are you done designing the lesson? ";:36000:Z$"N"ī1110 L113:W$(L)"": WIND,0,142,279,191:BOX:CO::"The SPELLING diskette being created can be used by as many as 12 students.":30000 inue? ";:36000:Z$"N"31000 CL$:CO,0,40:"Your current Diskette Support setting indicates that you have:"::NM$CC$::"Is this correct? ";:36000" Z$"N"ĺCL$:CO,0,40:"Please indicate the correct setting by running the Diskette Support optioPELLING diskette for use by students. You may design the lesson format and specify the names of the students who will be using this diskette.": "A blank diskette (or one whose contents are no longer needed) must be supplied."::"Do you want to cont5):NM$"one disk drive":SMNM$"two disk drives":DT$D1$S ]T0:ZD1:WP1:34000l T0:ZD1:WP0:34000r  CL$:WIND:CO:3:CN$"CREATE A SPELLING DISKETTE"CC$CO$:0,10275,10275,300,300,10 6:"This utility will create an independent SI " MASTER SPELL " ONE2" SK RUSSELLF(" (C)MECC 1984X2"85/09/21RLHm<(4)"MAXFILES2"F16384:32000KMERGE,"MERGE FILE":MERGE,"COMMON.LIB":(175)(176)2563X(975)255Č24768:975,1: _Y$(15),PY$(15),W$(15),PW$(1      CORDS FOR "ST$(L)::Z$"N"İ30000:WIND:CL$3 KZ$"Y"įPOFF:HOOKWIND:CL$:CN$"CHECK RESULTS"CC$CO$:0,18279,182:"Options:"::" 1. Transfer results to a RESULTS":" data diskette":" 2. Check other results":" 3. Return to mZ$"N"QY0:30000:WIND,0,18,279,191:BOX:CO: Y0ĺ" "Y$(L22L3)" ";:L4(Y$(L22L3))18:"-";::"> "Y$((L23L3)(L31)): QY14Z$"N"QYQY2:3080 Z$"N"İ30000:WIND,0,18,279,191:BOX:CO :Z$"N"İ30000- ::"END OF READ"F$:E$:E((E$)) X01 I1E:Y$(I):IB D$"CLOSE"F$ L11WL:WIND,0,9,279,191:BOX:CO::"Word list: "WL$(L1):C0:QY0:L21E:Y$(L2)WL$(L1)30800 CC1::"Session #"C;:Y((Y$(L21))):" ...(-"Y")":Y0āL31Y:QYQY1:QY140,89:"Please prepare your printer...":30000:UNHOOK:PINIT:PACT[ L1ST:Z$"N"ĺCL$ CO:"Name: ";:ST$(L):F$ST$(L)".RES" FCN,".RES",V$,V:XV101:V$(X1)V$(X)::FD0:I1V:V$(I)ST$(L)FD1 :(FD)3090 D$"OPEN"F$:D$"RE"Do you want to see the results from the review lessons? ";:36000:Z$"Y"WLWL1:WL$(WL)"REVIEW (optional)":WLWL1:WL$(WL)"REVIEW (forced)" PRINT RESULTS 200:WINDB CL$:CO,0,89:"Do you want to use a printer? ";:36000:Z$"Y"ĺCL$:CO,L))7C2(1,X)25,C2(2,X)7,8:LWLL18PG189:2080IWL182025`PGPG1:PG5PG0A((A$)):(APG18)(A18PG18)(AWL)2025 XFG0:L1X:FGFG(WL$(L)Y$(A))::FG2025 XX1:WL$(X)Y$(A):LA:L18LL18 BOX:CO:: to see remaining lists"l1:"Enter numbers of word lists (one at a time) you want results shown for: ";ELI,(3,"alrALR-09",0),A$:LU,A$:(A$)0WLX:2080-L1WL:WL$(L)Y$(L)::L1PG1818PG18:XL(18PG):BOX,C2(1,X)22,C2(2,X)1,(Y$(f you have created one) or delete the results."`FL1:NT2:T(1)3:T(2)4:T6:WP0:ZD2:34000$WD$"see":10600:C0ST05000800:X0BOX:4:"or...":"a) Press RETURN key if finished":"b) Enter ALL to see all results":WL18ĺ"c) Enter Rou to check spelling results. The results can be printed if you have a printer attached and have set the proper printer support options. ";/"After viewing the results, you will be given the options to transfer results to the results data diskette (iWP0:34000( *T$"WORD LISTS":PG0:C06 4400:300F DELETE RES T3:ZD1:WP1:FL0:NT1:T(1)3:34000:F$ST$(L)".RES":D$"DELETE"F$;D1$: CL$:3:CN$"CHECK STUDENT RESULTS"CC$CO$:0,10275,10275,300,300,105:"This program allows y"0000"(NB),4):D$"OPEN"F$:D$"WRITE"F$:NB$:D$"CLOSE"F$@ WQ XFILE WRITER bNB$("0000"(E),4):D$"OPEN"F$;D2$:D$"WRITE"F$:NB$ lL21E:W$(L2)::D$"CLOSE"F$: D$"OPEN"F$;D1$ E0āI1E:Y$(I):I %ZD2:T6:NT2:T(1)3:T(2)4:CT:M(((WL$(L1),(ST$(L))1))):MNNM:F$WL$(L1)< { D$"OPEN"F$;D2$:D$"READ"F$:NB$:D$"CLOSE"F$:NB((NB$)) &NBE120F$ST$(L)(N1)".RES":600:599 DD$"APPEND"F$;D2$:D$"WRITE"F$:L21E:W$(L2)::D$"CLOSE"F$: NNBNBE:NB$((optional)"Y$(X)"REVIEW (forced)"XX1V N:L1L12:N0āL21N2:ER$:L1L11:} :D$"CLOSE"ST$(L)".RES"::WLX:  APPEND FILE CT0:L11Y2:(ST$(L)(Y2$(L1),1,(ST$(L))))CTCT1:WL$(CT)Y2$(L1)".RES" :(CT)5306 N0:L112,1):CH$","LN$(L1)(ST$(L1),1,L21):SN$(L1)(ST$(L1),L22)G :M a FIND WRD LISTS X0:L1ST:D$"OPEN"ST$(L)".RES";D2$:D$"READ"ST$(L)".RES":E L11E:FD0:XX1:Y$(X):X1āL31X1:FD(Y$(L3)Y$(X))FD:) FDY$(X)"REVIEW  " MASTER SPELL!" FIVE3" SK RUSSELLE("85/09/21RLHX2" (c)MECC1984r<MERGE,"MERGE FILE 2"\CO(2,16),W$(120),Y$(120),V$(12),Y2$(15),ST$(12)^T$(6)"SPELLING OR RESULTS"NAMES? L11ST:L21(ST$(L1)):CH$(ST$(L1),L     "his:"%:CN$"The morning sun rose above the hor":"izon and lit the dark room."CO$::"-will appear as:"::CN$"The morning sun rose above the horizon and lit the dark room."CO$:30000:500*N15:BOX:L115'/CO:"(When done entering words, pre8 :"Do you want to enter sentences? ";:36000:R$Z$IR$"N"2090 R$"Y"įWIND:CL$CN$"IMPORTANT NOTE"CO$CC$:3:"When you enter a sentence, do not press the RETURN key until the entire sentence has been entered."::"A sentence entered like t34000:RNH,"MENU";T$"ENTER A NEW WORD LIST":500CO:"The new word list can have up to 15 words. Each word is limited to 14 characters. Sentences using each word in context may also be entered. Each sentence is limited to 70 characters.". See an existing word list":" 3. Edit an existing word list":" 4. Delete an existing word list":" 5. Return to main menu"14:"Which number? ";:ELI,(1,"-15",1),A$:A((A$)):Q1A:A2000,4000,5000,9000,10808NT0:T(1)0:T0:ZD1:WP0:Q10:(Q2$,1)" "LALA1:LA0Q2$(Q2$,LA):9306<pRFL,"ASCII BOLD.PFT"15512:DFT,2,15512:AFT,2CL$:WIND:3:CN$"ENTER OR EDIT A WORD LIST"CC$:6:CO$"Options:":0,10275,10275,300,300,108:" 1. Enter a new word list":" 2.WORD",Y$,X:X0āLX101:Y$(L1)Y$(L):N9EX:PG(X18):ZT0İ400:840W>300HE0FRįBOX:CO::"There are no word lists on this diskette."CC$:30000zLA(Q2$):LA0940(Q2$,1)" "LALA1:LA0Q2$(Q2$,LA):9200$sR$"N"ĺE:R$:L1E:WD$(L):7D$"CLOSE"F$:=MWP0:28000SD$"OPEN"F$,D2$:D$"READ"F$:E:R$:R$"Y"āL1E:WD$(L):S$(L):R$"N"āL1E:WD$(L):D$"CLOSE"F$: %WP1:28000:T$"WORD LISTS":PG0,4FCN,"OCL$:WIND:CO:CN$T$CC$CO$:0,18279,18:L115:COCO(1,L):L9COCO6 CO,CO,CO(2,L):L"."::0,100279,100:WIND,0,115,272,191:X]WP1:28000blD$"OPEN"F$,D2$:D$"WRITE"F$:R$"Y"ĺE:R$:L1E:WD$(L):250:QO$;S$(L);QO$:1,(Y$(L2))7C2(1,X)25,C2(2,X)7,8-r:G|WIND,0,115,279,191:MCL$:WIND:CO:CN$"WORD LISTS"CC$CO$:0,16279,16:L13:CO,C2(1,L),C2(2,L):" "L"."::0,50279,50L1X:CO,C2(1,L)26,C2(2,L):Y$(L):WIND,0,115,272,191:,110:X(1(PG18))330] @L118:CO,C2(1,L)26,C2(2,L):Y$(L(PG18)):X(L(PG18))L18c Ep JC0380 TL11C:L21(PG18)E:(W$(L1),(W$(L1))5)Y$(L2)370 ^XL2:((PG)X18)(PGX19)370 cPGXL218%hBOX,C2(1,X)22,C2(2,X)IND,S$(L),(34),QL:QL02908 QL1QS$(S$(L),QL1)l QS$QS$(123QK):QLQSQS$QS$(S$(L),QSQL) QK2(QK):S$(L)QS$:270 " , 6CL$:WIND:CO:CN$T$CC$CO$:0,18279,18 ;L118:CO,C2(1,L),C2(2,L):(L(PG18))"."::0,110279(QLQA1)):(QM97QM122)((QT$(2))97(QT$(2))122)QF1K QF1210 (QF)įBOX:CO::"The word "QO$QW$QO$" could not be found in the sentence you entered. Please type the sentence again.":30000 QS(S$(L)):QK0 QS$"":FL212:C2(L2,L1):::T$(6)"MASTER SPELL, SPELLING, or WORD LIST":1000N nd sQD1QW$QT$(QD)v xUL,QT$(QD):| QF0:QA(QT$(1)) QT$(2)" "QT$(2)" ":FIND,QT$(2),QT$(1),QL:QL0230= QM((QT$(2),QL1)):QT$(2)(QT$(2),(QT$(2)),11012,74:WIND,20,80,272,191:CO:"Capital letters may be entered by first typing a ^ (Shift-N) and then the letter to be capitalized.":WIND:30000 _CO(2,16),W$(36),S$(16),C2(2,36),Y$(36),WD$(16),QT$(2)H bL1115:L212:CO(L2,L1):::L1118:H. "MASTER SPELL$"TWO 6"S K RUSSELLI("86/07/25 JJK]2"(C)MECC, 1984iF32000~I(4)"MAXFILES1"J35805KMERGE,"COMMON.LIB"Z(64435)695[CL$:CO,0,20:"Apple II and II+ Users"CC$ \12,74271,74271,11012               "NT3:ZD1:WP0:FL1:SMFL1a34000:SET,ZD:ZS645:RFL,"MECC$$DISK"ZS:38000:PFZT1435D$"OPEN"F$;D1$:D$"READ"F$:E:R$:XE:R$"Y"XE2I1X:Y$(I):I:D$"CLOSE"F$FD0:L11EY:FD((F$,(F$)5)EY$(L1))FD::FDİ900:Z$"Y"EY:EY0āLEY101:EY$(L1)EY$(L):<NM3:PT3NM18LPT5NM36EYENMĺCL$:CO,0,50:"There "QR$(EY1)EY" list"QQ$(EY1)"stored on this disk. Only "NMEY" more list"QQ$((NMEY)1)"can be saved.":30000:1900L1C:F$WL$(L)T6:FL1:NT3:WP1:ZD1:34000:EC:F$"TRANSFER WORD LISTS":600:1410Mxt}T6:FL1:NT3:WP1:ZD1:SMFL134000F$"TRANSFER WORD LISTS":700:L1E:WL$(L)Y$(L)::CENT3:ZD1:WP1:FL2:SMZD2'34000:PTZT:FCN,".WORD",EY$,:FD(W$(L)Y$(A)".WORD")FD::FD1060VLCC1:W$(C)Y$(A)".WORD":LA:A18LA18VBOX,C2(1,L)22,C2(2,L)1,(Y$(A))7C2(1,L)25,C2(2,L)7,8:1060CEįBOX:CO::"Are you finished selecting word lists to transfer? ";:36000:Z$"N"1055G)18(PG18):XL:X18XX18o8BOX,C2(1,X)22,C2(2,X)1,(Y$(L))7C2(1,X)25,C2(2,X)7,8:LEL18(PG18){::1200=(A$,1)"R"E18PGPG:200:1055>(A$,1)"R"1060BA((A$)):AEA0(PGA19)(PGA18)1060'GFD0:C0āL1Cer R to see remaining word lists"$1:"Enter word list numbers (one at a time) of the lists to transfer: ";:ELI,(3,"alrALR-09",0),A$:LU,A$)(A$)0C01010.(A$)011700(A$,1)"A"10853CE:L1C:W$(L)Y$(L)".WORD"::L1(PG18"Do you want to continue? ";:360006Z$"N"31000C0:800:E0įBOX:CO::"No word lists exist on this diskette.":30000:1010!BOX:CO:4:"or...":"a) Press RETURN key when finished":"b) Enter ALL to transfer all the lists":E18ĺ"c) EntCL$ DRFL,"ASCII BOLD.PFT"35598:DFT,2,35598:AFT,2CL$:WIND:3:CN$"TRANSFER WORD LISTS"CC$CO$:0,10275,10275,300,300,10$8:"This utility will transfer word lists which have been saved on a diskette to another diskette."::rd list."J:"Would you like to rename the list? ";:36000:Z$"N"940CO,0,120:"New name: ";:ELI,(12,"-AZ-az-09 .-",1),F$:LU,F$:U((F$,1)):(U64U91)ĺ:"Name must begin with a letter A-Z. Please re-enter.":30000:930F$F$".WORD":T$"WORD LISTS":PG0:FCN,".WORD",Y$,E:E0āLE101:Y$(L1)Y$(L):[ 9ZT0İ400:890d >200j zp  CL$:CO,0,30:"The word list "(F$,(F$)5)" already exists on the destination diskette. Using the same name will replace the existing wo26,C2(2,L):Y$(L):ELL3% E0Ă= WIND,0,115,279,191C I X bD$"OPEN"F$,D1$:D$"WRITE"F$:E:I1E:W$(I)::D$"CLOSE"F$:  D$"OPEN"F$,D1$:D$"READ"F$:E:I1E:Y$(I)::D$"CLOSE"F$: G %FL1:NT3:WP0:ZD1:34000:PFZT: cPGXL218P hBOX,C2(1,X)22,C2(2,X)1,(Y$(L2))7C2(1,X)25,C2(2,X)7,8X r:p |WIND,0,115,279,191v }  CL$:WIND:CN$"WORD LISTS"CC$CO$:O,18279,18:L13:CO,C2(1,L),C2(2,L):" "L"."::0,50279,50 E0āL13:CO,C2(1,L)18:CO,C2(1,L),C2(2,L):(L(18PG))".":< 0,110279,110B , 6L118:CO,C2(1,L)26,C2(2,L):Y$(L(PG18)):E(L(PG18))L18 @ JC0380 TL11C:L21(PG18)E:(W$(L1),(W$(L1))5)Y$(L2)370 ^XL2:((PG)X18)(PGX19)370:FL3:T(1)0:T(2)3:T(3)5:QQ$(0)" ":QQ$(1)"s ":QR$(0)"is ":QR$(1)"are ":T$(6)"MASTER SPELL, SPELLING, OR WORD LIST" _L1116:L212:CO(L2,L1):::L1118:L212:C2(L2,L1):: d1000 ) CL$:WIND:CO:CN$T$CC$CO$:0,18279,18:L1o "MASTER SPELL$"THREE 5"SK RUSSELLI(" (C)MECC,1984[2"85/09/21RLHgF32000KMERGE,"COMMON.LIB"::(175)(176)2563:(4)"MAXFILES3":16384ZCO(2,16),W$(36),S$(16),C2(2,18),Y$(36),EY$(36),WL$(36),QQ$(1),QR$(1)z \C0         T$  :F BOX,30,20,279,138:L1C:CO,40,L1010:W$(L)::3015 BOX:CO::"Are you done adding names? ";:36000:Z$"N"3000 W$(C1)R$:W$(C2)GN$ FGC1W$(C1)"N":W$(C2)SN$" "PN$:(W$(C2))19W$(C2)(SN$,1)". "PN$  F$:L1C1:WL$W$(L):LU,WL$:WC$WL$įBOX:CO:"That name has already been used. Please enter another name.":30000:FD1 :FD1CC1:3015 L11C1:L21CL1:WL$W$(L2):WC$W$(L21):LU,WL$:LU,WC$:WL$WC$T$W$(L2):W$(L2)W$(L21):W$(L21)LN$" "3080 BOX,0,178,279,191:3:"Enter first name: ";:ELI,(11,"-AZ-az ,.-'",1),SN$:A$SN$:400:11000:SN$A$:A$" "((U64U91))3030 CC1:W$(C)LN$", "SN$:C1įBOX,30,20,279,138:CO,30,20:W$(1):PN$LN$:3015z FD0:WC$W$(C):LU,WCOX:CO::"One moment please..."DF$"NAME LIST":EC2:600:2000T ADD NAMESb C2FG1q C123085  BOX:CO:5:"(Press RETURN key to continue)"CC$:2:"Enter last name: ";:ELI,(14,"-AZ-az ,-'",0),LN$:A$LN$:400:11000:LN$A$:(LN$)0rBOX:A1:C1Ģ5:"(Press RETURN key to continue)"CC$:3:"Edit which number? ";:ELI,(2,"-09",0),A$:(A$)0ī2190uA((A$)):ACA0ī2162zT$W$(A):ACāLAC1:W$(L)W$(L1):CC1:2050C1R$"N"W$(C1)R$:W$(C2)GN$ B$W$(L2):WC$W$(L21):LU,WL$:LU,WC$:WL$WC$T$W$(L2):W$(L2)W$(L21):W$(L21)T$\*:s4BOX,30,20,279,138>L1C:CO,40,L1010:W$(L):pC0įBOX:CO::"There are no names on this diskette.":30000:2030qC1T$W$(1):CC1:2050u.RES",V$,V:V02076M175:L1V:V$(L)ST$ĺD$"RENAME"ST$".RES,"C$".RES"SrFCN,".REV",V$,V:V02080175:L1V:V$(L)ST$ĺD$"RENAME"ST$".REV,"C$".REV" C1įBOX,30,20,279,138:CO,40,20:W$(1):2190T%L11C1:L21CL1:WL)19GN$(SN$,1)". "LN$(C12072FD0:WC$W$(C):LU,WC$:L1C1:WL$W$(L):LU,WL$:WL$WC$įBOX:CO:"That name has already been used. Please enter another name.":30000:FD1:FD1CC1:2050ST$T$:200:T3:WP1:ZD2:34000:FCN,"nu":"Which option? ";:ELI,(1,"-14",1),A$PA((A$)):A2160,3000,5000,1010BOX:CO::"Enter last name: ";:ELI,(14,"-AZ-az '.-",1),LN$:A$LN$:400:11000:LN$A$:(A$)0A$" "2050CC1:W$(C)LN$", "SN$:C$SN$" "LN$:C1GN$C$:(GN$:36000:Z$"N"ī1110 1010x F$"NAME LIST":700:R$Y$(E1):GN$Y$(E):CE2:C0āL1C:CO,40,(L10)10:Y$(L): L1E:W$(L)Y$(L):*WIND,0,142,279,191:BOX:CO:" 1. Edit names":" 2. Add names":" 3. Delete names":" 4. Return to menu"; :"Which number? ";:ELI,(1,"-14",1),A$:A((A$))n A1A2T3:NT1:T(1)3:ZD2:WP1:FL1:34000 A3ZD2:T6:NT2:T(1)3:T(2)4:FL1:WP1:34000 A1048,2000,8000,31000 BOX:CO::"Are you done editing the ":"lesson design? ";T3:WP0:ZD2:34000 v CL$:WIND:CO:3:CN$" EDIT A SPELLING DISKETTE"CC$CO$:0,10275,10275,300,300,10 5:"Options:"::" 1. Change design of spelling lesson":" 2. Edit name list":" 3. Delete results data":" 4. Return to main meZ03404 ;FCN,".RES",Z$,Z:F$ST$".RES":Z0340[ @150:FD0:L0Z1:ST$Z$(L)FD1s J:FDĺD$"DELETE"F$ TFCN,".REV",Z$,Z:F$ST$".REV":Z0370 ^150:FD0:L0Z1:ST$Z$(L)FD1 h:FDĺD$"DELETE"F$ r ]T3:WP1:ZD2:34000 SULTS":DT$D2$0 LZ101:Z$(L1)Z$(L)::R LV101:V$(L1)V$(L)::_ NAMES L1(ST$):CH$(ST$,L,1):CH$","LN$(ST$,1,L1):SN$(ST$,L2) ST$SN$" "LN$: ,T3:ZD2:WP1:34000 6FCN,".RES",Z$,Z:F$ST$".RES": " MASTER SPELL!" FOUR5" (C)MECC 1984G(" SK RUSSELLY2"85/09/21RLHeK32000NMERGE,"MERGE FILE":MERGE,"COMMON.LIB":(175)(176)2563:(4)"MAXFILES2":16384:3 _Y$(15),PY$(15),W$(15),Z$(12),V$(12):T$(6)"SPELLING or RE       e lists? ";:36000:Z$"Y"2000*31000ٍ卢客䬠荢ɠ订"N"36020+000?{f<f~<~{~3009 HE0įBOX:CO2(1,L),C2(2,L):" "L"."::0,50279,50V X0āL1X:CO,C2(1,L)26,C2(2,L):Y$(L):p WIND,0,115,272,191: XQUOTE FIX bRD$:NS$"":LH(RD$):LHı lEC1LH:MD$(RD$,EC,1):(MD$"{")(MD$"}")NS$NS$(34):650 NS$NS$MD$ : ,  " MASTER SPELL " SIX2" SK RUSSELLD("85/09/21RLHW2" (c)MECC1984q<MERGE,"MERGE FILE 2"\WD$(15),Y$(36)^T$(6)"MASTER SPELL, SPELLING, OR WORD LIST"& CL$:WIND:CO:CN$"WORD LISTS"CC$CO$:0,16279,16:L13:CO,C     :RO1:30000:1524$ MENU SCREENCL$:CO,0,50:"Your choices are:"::" 1. Practice a word list"::" 2. Review missed words"::" 3. Quit"::"Which number? ";ELI,(1,"-13",1),A$:A((A$)):A331000A112407RO2:300:E0ĺCL$(0)%LES1:300:DE$(9)"No"1200A`E((DE$(12)))31200bjM((DE$(13))):EM3ME3tL1M:O%(L)L::200:350CL$::CN$"Review Lesson"CC$::"Before doing a new lesson, let's review some of the words missed in other lessons.":CO$0%.CL$:"Spelling lessons for:":@8L1SL:2:L10ĺ" ";a=L".";:6:SN$(L)" "LN$(L):B20:"Enter the number of your name: ";:ELI,(2,"-09",1),A$:A((A$)):ASLA01090GQN$SN$(A):NM$SN$(A)" "LN$(A):L1SL:SN$(L)"":LN$(L)""::L1SL:L21(Y$(L1)):CH$(Y$(L1),L2,1):CH$","LN$(L1)(Y$(L1),1,L21):SN$(L1)(Y$(L1),L22)i :F$"DEFAULT.DESIGN":700:L1E:DE$(L)Y$(L):DE$(5)"3"įRFL,"FACES.IMA"39168:DFT,7,39168SL1NM$SN$(1)" "LN$(1):QN$SN$(1):110N"āL1E:WD$(L):&D$"CLOSE"F$:6MENUSCREENRFL,"HEADLINE.FNT"36864:DFT,1,36864:AFT,1:CL$:CO,0,89:"One moment please..."F$"NAME LIST":700:E20ĺCL$:CO,0,89:"There are no names on this diskette.":30000:31000aSLE2:L1CO,143,(L9)1020%RL". "Y$(L):+f5 BOXa7:LX,LYRX,RYRX,RY20LX,LY20LX,LYLX1,LY1RX1,RY1RX1,RY21LX1,LY21LX1,LY1: WORD FILE READERD$"OPEN"F$:D$"READ"F$:E:R$:R$"Y"āL1E:WD$(L):S$(L):R$"ID$"CLOSE"F$:%  WORD LISTS[*3:CL$:WIND:CN$"WORD LISTS"CC$CO$:0,20279,204FCN,".WORD",Y$,E:E0įCO,0,89:"There are no word lists on this diskette."CC$:30000:870CLE101:Y$(L1)Y$(L)::L1E:L10įCO,7,10L20:850HLALA1:LA0A$(A$,LA):420O(A$,1)" "LALA1:LA0A$(A$,LA):430UgX FILE WRITERlD$"OPEN"F$:D$"WRITE"F$:E:E0āI1E:QO$;Y$(I);QO$:ID$"CLOSE"F$: FILE READER:D$"OPEN"F$:D$"READ"F$:E:E0āI1E:Y$(I):0IE:D$"OPEN"NM$".REV":D$"WRITE"NM$".REV":"0":D$"CLOSE":E0:340`JF$NM$".REV":700fT^ CHOOSE REVIEW WORDS|L1M:WD$(O%(L))Y$((O%(L)3)2):S$(O%(L))Y$((O%(L)3)1)::R$"Y":XM:REMOVE SPACESLA(A$)(A$,1)" "ND UNDERLINE QVQL1QAH QV(QB$)(QB$,QV,1)" "QVQV1:194N ` RND NUM GEN L1M:R((1)M)1:TO%(R):O%(R)O%(L):O%(L)T:: ," REVIEW FILE 6FCN,".REV",V$,V:V0325 ;FD0:L0V1:V$(L)NM$FD1:LV@:FD033" ",QL:QGQG1:QW(QG)QRQA:WD(QG)QRQL23 1609 J "UNDERLINEU VSP,3 3:QL1QG:QS$(QB$,1,WD(QL)):CO,0,90:QS$CA$;:GCP,QQ,QY::QXQQ8(WD(QL)QW(QL)1):QX1ēQX,QY9QX(QA8)3,QY9 :CO,0,90:QB$:VSP " SET E0 " STRING SEARCH? QR0:QG0:QA(Q1$):QC$" "QC$" "^ FIND,QC$,Q1$,QL:QL0175 QB0:QL1QB((QC$,QL1)): QRQRQLQA1:QD$" ":QC(QC$)(QLQA1):QC0QD$(QC$,QC)* QC$QD$:(QB97QB122)((QC$)97(QC$)122)įFIND,QC$,ed.":WIND:30000 US$(15),Y$(90),DE$(15),O%(30),ER$(90),ER%(90),V$(12),CR%(30),WD$(25),SN$(12),LN$(12),WD%(20),QW%(20),RV%(15),QW$(1) ZCN$(14):CO$(15):U(0):ER0:FL0:FG0:BL0:C0:RO0:CR0:X0:WD(0)1:QR14:QW$(0)"word.":QW$(1)"words.":100(12):CC$(3):QO$(34):3::(64435)685[ QCL$:CO,0,20:"Apple II and II+ Users"CC$ R3:12,74271,74271,12012,12012,74:WIND,20,80,272,191:CO:"Capital letters may be entered by first typing a ^ (Shift-N) and then the letter to be capitaliz#" COPY SPELLING PROGRAM2" (C)MECC 1984E(" S K RUSSELLW2"85/09/21RLHrF(13)(4)"MAXFILES1"K230,64:16384:32000N(975)255Č24768:975,1ORFL,"ASCII BOLD.FNT"38144:DFT,2,38144:AFT,2,2, PES0:D$(4):CA$(1):CL$             14:"Which slot is the communications"::"card in? ";:ZB1:ZT7:37000WPP,ZN:lXNOT A COMM CARDbBOX::4:"The printer interface card may be in any slot 1 - 7. (Most commonly 1 or 2.)"l9:"Which slot is your interface card in? ";:ZB$:LP(P$):LP0ı9nL1LP:PP106L,((P$,L,1))::LpSET COMM CARDzBOX:3:"1. High speed (usually 30 cps)"::"2. Low speed (usually 10 cps)"9:"Which printing speed do you want"::"to use? ";:ZB1:ZT2:37000PP2,128(ZN1)Jfor page length is":"66 lines per page.":6:"What page length is your printer set to produce? ";ZB10:ZT120:ZC0:37000:PP1,ZN:PID FIELDZL120:PP106L,0:d10:"What printer are you making these":"settings for? ";:INP,(20,0),Ptype, etc.)"`::"Which type of printer interface will":"you be using? ";:ZB1:ZT2:37000rZN6000,7000PP1,66:BOX:APLİ51005200:D$;"BSAVEPRINTER COMMANDS.BIN,A"PP",L128"ADJUST PAPER LENGTHb2:"The normal setting WIND,0,20,279,191:(SET NEW OPTIONS3:"1. Apple communications board":" (an obsolete card that is not":" compatible with the Apple //e)": "2. Any other type of printer":" interface card (e.g., parallel":" or serial, Centronics rinter...":30000dCL$:9:"Testing the printer...":D$"IN#0":D$"PR#0":PINIT:"Printer Test":I13:J3295:(J);:::J96127:(J);:::::FEEDPOFF:24576:11:" Printer test complete.":30000WIND:CO:"Printer Support"CC$: RETURN TO DEFAULTS p 8:"Now returning the printer settings to"::"their original state (slot search)..." I0127:PPI,0: D$"BSAVE PRINTER COMMANDS.BIN,A"PP",L128,D1" 30000:TEST THE PRINTERBOX:9:"Please prepare your p4~ 7:"PRINT "(34)CA$;:L211:P(PPCT):CTCT1q P0P13P32PP64::GCP,X,Y:BOX,X1,Y1,X5,Y7,3 L2(P13):PP21L2:(P)CA$;: L2: L1: PRINTER TYPE :" Type of printer:"::7:L120:((PP106L));::: CO:"The current printer settings are:"l :" Slot: ";(PP)128::APLĺ" Page length: ";(PP1): (PP2)0İ2400$ (PP107)0İ2500. 30000:` PRINT SPECIAL COMMANDSj " Commands:"::CT2t L115:(PPCT)0L15:2470d":"in slot #";(PP);".":M SD$"LOW":SD10:(PP2)127SD$"HIGH":SD30 7:"The speed is set to '";SD$;"'":"(usually ";SD;" characters per second)." :APLĺ:" Page length: ";(PP1) :(PP107)0İ2500 30000: USER SET*ntly set to the"::"default setting, which is to search"::"slots 1 and 2 for a recognizable card"::"each time the diskette is started up." H30000: COMM CARD 3:"This diskette is currently set up to":"expect an Apple Communications Boareturn to main menu"F $::"What is your choice? ";:ZB1:ZT5:37000q 8BOX:CO:ZN2000,5000,3000,4000,31040~ BL00:L0 CHECK CURRENT SETTINGS JP1((PP)0)((PP)127) JP2100,2200,2300: 4DEFAULTS >5:"This diskette is curreENU( L011:BOX:CO::"You may:":U " 1. Check current printer settings":{ " 2. Change printer settings": " 3. Return printer settings to their":" original state (slot search)": " 4. Test printer settings": " 5. R }24576:RNH,"PRUTIL.OBJ" D1$",S"((953))",D"((954))",V"((955)):PP(948)(949)256:CA$(1):CC$(3):CL$(12):Q$(34):VSP:HSP D$"BLOAD PRINTER COMMANDS.BIN,A"PP;D1$ WIND:CO:"Printer Support"CC$:WIND,0,20,279,191 Me PROGRAM: PRINTER SUPPORT<PROGRAMMER: P. BOUCHARDYCOPYRIGHT (C) MECC 1983y(LAST UPDATE: 84/08/03 SKR 2HI-RES VERSIONdINITIALIZATIONnAPL0:SET TO 1 TO ALLOW USER TO ADJUST PAPER LENGTH x:(4)"MAXFILES3":16384:D$(4)       34010WP34099.ZT$D1$:ZD2ZT$D2$`ZE0:ZEĺD$"BSAVE MECC$$DISK,A"ZS",L$28"ZT$ WP(WP1):ZE4ĺCL$:CO,0,89:"Please remove the write-protect tab":"from your "T$(T)" diskette.":WP2:30000:340103ZU0: GET DRIVE STRINGSMECC$$DISK"ZS:38000:(TZT)(N$ZN$)34070a䄗:SMĢ11:5:"Insert your "T$((T))" diskette."鄭SMĢ10:5:"Insert your "T$((T))" diskette":5:"in drive "ZD"."30000:T0ė:12:1:"Creating a SPELLING diskette for":"student use...": ZE8ė:12:"I/O Error. Please check disk and drive.":30000:31000<}:12:"Error "ZE" at line #"ZN:"in CREATE SPELLING DISKETTE."::"Please report this error to MECC.":30000:31000ЄDISK VERIFYՄZU1:SET,ZD:ZS654,ڄZE0:ZET0įRFL,"LOGO"D1$b,ySET,1:NOFILT:D$"BRUN SPELLUTIL.OBJ":RFL,"HPRINT.OBJ":975,255:Z$"N"įRNH,"MENU"q6yRNH,"ONE"w} }ZE(222):ZN(218)(219)256}ZUZE0ZE16Ħ: ZU IS THE USER PROCESSING FLAG (FOR DOS ERRORS)(}2}ZE25531000D7}84):ZF(ZF1)(ZP155):ZF231000=SuZP160ZP14130030OXu16368,0::dy ENDING ROUTINE"yT0:ZD1:WP0:34000::11:"Do you want to create another":"SPELLING diskette? ";:36000::12:"One moment please..."'yZU1:ZE0:ZEĺD$"VERIFY EADLINE.FNT,A22058,L1160"6N:T0:ZD1:WP0:34000:rN HELLO,"NAME LIST","SPELLING PROGRAM","DEFAULT.DESIGN"0uSPACEBAR:u24:1:868:7:ZF0:"Press ";Iu(64435)6ĞKu"SPACE BAR";::" to continue";"Nu16368,0:16384,128:ZP(163NT3:ZD2:WP1:34000:300/NWFL,P$:10000NL1ĺD$"BSAVE HPRINT.OBJ,A24768,L4926"D2$:D$"BSAVE ASCII BOLD.FNT,A23896,L776":D$"BSAVE FACES.IMA,A23552,L325"NL2ĺD$"BSAVE LOGO,A28929,L1992"D2$:D$"BSAVE SPELLUTIL.OBJ,A23218,L5711":D$"BSAVE H6NL12:P$.NT0:ZD1:WP0:34000:300UNRAWFL,"COPY "P$12288:F$:11000NL1įRFL,"HPRINT.OBJ"24768:RFL,"ASCII BOLD.FNT"23896:RFL,"FACES.IMA"23552NL2įRFL,"COPY LOGO"28929:RFL,"SPELLUTIL.OBJ"23218:RFL,"HEADLINE.FNT"22058I1521:BF2,I1:DW,17,I17,IBF:IYNS,3:D$"BSAVE MECC$$DISK,A"S",L$28"D2$:S,0NT0:ZD1:WP0:34000:SPRO,1:DR,0,00,1512288:SPRO:DR,1,02,15122884096NT3:ZD2:WP1:34000NSPRO,1:DW,0,00,1512288:SPRO:DW,1,02,15122884090:34000:39000:OK20115R N:12:1:300:SET,2:ZU1:ZE0:ZE:SPRO:FPD,254 NZU0:ZEĴZE832040::12:"Cannot create a "T$(3)" diskette.":"Try again.":30000:20115(NBF24576:DW,17,017,0BF:I0255:BFI,0:I:DW,17,117,1BF:BF1,17:31000 'WRITEFILEu 'T3:ZD2:WP1:34000:D$"OPEN"F$;D2$:D$"WRITE"F$:E:I1E:QO$W$(I)QO$::D$"CLOSE"F$: *READ FILE +T0:ZD1:WP0:34000:D$"OPEN"F$;D1$:D$"READ"F$:E:I1E:W$(I)::D$"CLOSE"F$: NCREATEROUTINE NT6:ZD2:WPave word lists on this new SPELLING":"diskette by using one of these":"utilities:" $:" 1) Enter or Edit a Word List":" 2) Transfer Word Lists"::"This new SPELLING diskette will then":"work by itself to present spelling":"lessons.":30000:RFL,"MECC$$DISK"S:SM((S36)1):ZSS:RFL,"VTOC"24576:38000:N$ZN$:35000:20100 :10:"*** IMPORTANT NOTE ***"::"The SPELLING diskette just created will be ready for student use after word":"lists have been saved on it. ";T "You can":"sNG":T$(4)"RESULTS data":T$(5)"WORD LIST data":T$(6)"BLANK":1000I , 6:12:1:"Creating a SPELLING diskette for":"student use..." @  D$"BRUNCREATEUTIL.OBJ"D1$:UNHOOK:::FILT:11:"One moment please...":U S704:S1654:SET,1: MASTER SPELL3" CREATE SPELLING DISKETTEG" (C)MECC,1984^(" ANDY HOLLENBECKq2" 86/07/14JJK}d32000i(4)"MAXFILES1":12288nD$(13)(4):W$(15):QO$(34)C T$(0)"MASTER SPELL":T$(1)"DATA":T$(2)"BACKUP":T$(3)"SPELLI      HFL a U _ j S X]扭P艭7 y`(A$)- +U96U123UU32:A$(U)(A$,2)3[+0W8JUBBgBlgClk {|J*BBC AC~~|~~JU `Ca]a}}JUNGfss]GsBgB0gC.5B;J*NGf|xyxx|]GsBsB63Cwx{JUNGc|yEsy|]GsBs600p00CBnJ*NGAGsBcB6cCtwutJUNGAGsBsBa]a}}JUNGAGsBgB0gC.5B;J*NGAGsBsB63Cwx{JUNGAGsBs600p00CBnJ*NGAGsBcB6cCtwutJUNGAGsBsB63CCnJ*NAsBc600`CFJUOAs``wBfgC{9{{ J*B MBlLC8WNGAGOFx~J~xHBBX}- CFJ*NGAGOH@NHxBByB{CFJUNGAGsBBqCFJ*NGAGs00{C3ACFJUNGAGsvC6ACFJ*NGAGsBcB6f`CBwJUNGAGsBBCFB;FJ*NGAGsB`B0`COCFJ*NGAGO~x`FGA>B~BBBYCFJUNGAGQF@`Dp`@HB@@_BY_CFJ*NGAGOG|L|HBFACFJUNGAGOD@CAAGA <CFJ*NGAGO?_WUUUBUABUCUBB>0CFJUNGTvGJ??C*B*B***B*AB*C*Bt7 u@ )` t t t0H)?hJ t t t?Lt t&'&Ȅ``tt ttt`t)tJJ tttt .t .t ntt)  O,0,40::CN$"Spelling Diskette"CC$:E33000H "for"CC$:Y$(3)CC$CO$R 3010 Y$(E1)"Y"ĺ"for the"CC$:Y$(E)" Group"CC$CO$ 16304,0:16297,0:16299,0:16302,0 D$"BRUN SPELLUTIL.OBJ,A$7500":RFL,"HPRINT.OBJ":RNH,"SPELLING PROGRAM"( 8975,255:SOUND BYTE; DO NOT DELETEQ CN$(14):CO$(15):CC$(3):Y$(15) D$"BLOAD HEADLINE.FNT,A36864":DFT,1,36864:AFT,1 :D$"BRUN LOGO,A$7400" D$"OPEN NAME LIST":D$"READ NAME LIST":E:L1E:Y$(L):L:D$"CLOSE NAME LIST"- C MASTER SPELL,PROGRAM: COPY HELLOJCOPYRIGHT (C) MECC, 1984i(LAST UPDATE: 84/07/03 SKR{MAIN PROGRAM(4)"MAXFILES3":16384:230,6416372,0:::TURN OFF THE 80-COLUMN CARD16384:D$(13)(4) $D$"BRUN HPRINT.OBJ"   s."::" Save results? ";:36000:WINDN|10:33:Z$"N"ĺ"No ":Y$(8)"No"mZ$"Y"ĺ"Yes":Y$(8)"Yes"w1110 BOX:CO::"9. Once the review list containing ":" misspelled words reaches a specified":" number, forced reviews can be":" or review."::" Do you want a review? ";:36000]J9:33:WIND:Z$"N"ĺ"No ":Y$(7)"No"|TZ$"Y"ĺ"Yes":Y$(7)"Yes"^1110(rBOX:CO::"8. A list of all misspelled words":" can be kept for your records":" and to generate review lesson 4. Two tries and go on ":" 5. No remediation - go to next word":"Which option? ";:ELI,(1,"-15",1),Z$"Z$Y$(6)įWIND:8:33:Z$:Y$(6)Z$,11102@BOX:CO::"7. At the end of the lesson, all":" words missed can be presented again":" f"2Z3Y$(10)"SMILING FACE":Y$(11)"SAD FACE"OZ4Y$(10)"":Y$(11)""Y1110BOX:CO:1:"6. Options (if word missed):":" 1. Repeat sequence until correct":" 2. Compare spellings and try again":" 3. Same as #2 (with blanks)"i" ters.)":1:"Feedback Phrases"CC$:2:"If correct: ";:ELI,(20,"-AZ-az ,.!?'",1),C$4:"If incorrect: ";:ELI,(20,"-AZ-az ,.'!?",1),I$Y$(10)C$:Y$(11)I$1110Z1Y$(10)"Correct":Y$(11)"Incorrect"Z2Y$(10)"Right":Y$(11)"Wronging face)/(Sad face)":" 4. No feedback":" 5. Enter your own feedback phrases""Which option? ";:ELI,(1,"-15",1),Z$:Z$Y$(5)įWIND:7:33:Z$:Y$(5)Z$Z((Z$)):Z5ī1470SWIND,0,115,279,191:BOX:CO:8:"(Phrases limited to 20 characped":" from 0 to 10 times."::" How many times? ";:ELI,(2,"-09",1),Z$fZ((Z$)):Z101250WIND:Z$Y$(4)Ģ6:33:Z$;" ":Y$(4)Z$1110QxBOX:CO:1:"5. Feedback Options:":" 1. Correct/Incorrect":" 2. Right/Wrong":" 3. (Smilr entered ":4:"2. random order"::" Which way? ";:ELI,(1,"-12",1),Z$5:33:WIND:Z$"1"Y$(3)"Random"ĺ"Ordered":Y$(3)"Ordered"Z$"2"Y$(3)"Ordered"ĺ"Random ":Y$(3)"Random"1110LBOX:CO::"4. Each word displayed can be ty displayed with":" each word."::" Display sentences? ";:36000:WIND|4:33:Z$"N"Y$(2)"Yes"ĺ"No ":Y$(2)"No"Z$"Y"Y$(2)"No"Ģ4:33:"Yes":Y$(2)"Yes"1110JBOX:CO::"3. The word list can be presented in:":4:"1. the ordetart of the spelling lesson."::" Display word list? ";:36000:WINDx j3:33:Z$"Y"Y$(1)"No"ĺ"Yes":Y$(1)"Yes" oZ$"N"Y$(1)"Yes"ĺ"No ":Y$(1)"No" t1110K~BOX:CO::"2. If sentences are included with the":" word list, they can beess RETURN to continue)"CC$:2:"Enter option number to change: ";:ELI,(2,"-09",0),A$:(A$)0ī1770 WA((A$)):A0A101110 [A1125,1150,1200,1250,1400,1550,1600,1650,1700G eBOX:CO::"1. The entire word list can be displayed":" at the sview sessions?"" 80,112279,112l LL19:(2L):33:Y$(L):L:Y$(9)"Yes"Ė33:"("Y$(12)"/"Y$(13)") " QWIND,0,115,279,191:BOX:CO::"The current design of the spelling lesson is shown above. ":30000e VWIND,0,115,279,191:BOX:CO:5::"(Pr $3:"1. Show entire list to start?":"2. Show sentences with words?":"3. Words ordered or random?":"4. Spell each word ? times." ."5. Type of feedback:":"6. Type of remediation:":"7. Review at end of lesson?":"8. Save results?":"9. Forced reQO$W$(I)QO$: D$"CLOSE"F$:'  _ D$"OPEN"F$,DT$:D$"READ"F$:E:E0āI1E:Y$(I):r D$"CLOSE"F$: RFL,"ASCII BOLD.PFT"37376:DFT,2,37376:AFT,2 F$"DEFAULT.DESIGN":700 CL$:CO:CN$"SPELLING LESSON DESIGN"CC$CO$:0,14279,14Z(64435)695C[CL$:CO,0,20:"Apple II and II+ Users"CC$Md1000T aLA(A$)(A$,1)" "LALA1:LA0A$(A$,LA):420(A$,1)" "LALA1:LA0A$(A$,LA):430X bD$"OPEN"F$,DT$:D$"WRITE"F$:E:E0āI1E:       客።ɠᮢ덢ɠ뮢።ᮢ򮢍።ɠᮢ።ᮢﮢ卢)0:T(2)3:T(3)5:ZD2:WP0:34000 UNHOOK:PINIT:PACT:L1RN:L11WL:F$WL$(L1):700:TF$(F$,(F$)5):"Word List: "TF$::L31E:WD$(L3):R$"Y"RS$"Y"ĺS$(L3) ::FEED::POFF:HOOKWIND:CL$:CO,0,89:"Do you want to print mor䬠墍΢Ҭ٢Ĭ٢άŢĬ٢ҬŢά΢ȬŢά٢ά΢٢Ӣ89:"Please remove the write-protect tab from your "T$(T)" diskette.":WP2:30000:34010i3WIND:ZU0:000 WP(WP1):ZE4ĺCL$:CO,0,89:"Please remove the write-protect tab from your "T$(T)" diskette.":WP2:30000:340103WIND:ZU0:;1$:ZD2ZT$D2$YZE8ĺ"I/O Error. Please check your disk and drive.":30000:31000 WP(WP1):ZE4ĺCL$:CO,0,89:"Please remove the write-protect tab from your "T$(T)" diskette.":WP2:30000:340103WIND:ZU0:(WP1):ZE4ĺCL$:CO,0,R(ZTT(ZL))R:ZL:RN$ZN$34070n䄺CL$:WIND,13,80,265,191:SMįCO,13,84:"Insert your "T$(T)" diskette."鄭SMįCO,13,80:"Insert your "T$(T)" diskette ";:"in drive "ZD"."0,70279,70279,1100,1100,70:30000:34010WP34099ZT$D Program Five."::"Please report this error to MECC.":30000nZ}WP0:FL1:NT1:T(1)0:T0:ZD1:34000:31000tЄՄZU1:SET,ZD:ZS654:FLFLFL:34020ڄCPRO,ZP:ZPįCPRO,ZP"܄SPRO,ZP(ZP):ZE0:ZEįRFL,"MECC$$DISK"ZS:38000:R0:ZL1NT: }' }ZE(222):ZN(218)(219)2567 }ZUZE16Ħ= (}G -}HOOKY 2}CL$:CO,0,80k <}ZE25532090 F}S$"DOS":ZE15S$"BASIC" K}ZE8ĺ"I/O Error. Please check your disk and drive.":30000:32090=P}S$" error number "ZE" at line #"ZN:"in)1,(Y$(A))7C2(1,L)25,C2(2,L)7,8:2025: *WL05000@  N 0,20,0,30,0,40,0,50,0,60,0,70,0,80,0,90,0,100,130,20,130,30,130,40,130,50,130,60,130,70,130,80,130,90,130,100 y |y35000:FL0:NT1:T0:ZD1:WP0:T(1)0:34000 y:RNH,"MENU"  WRD LIST SCREEN R" V RFL,"ASCII BOLD.PFT"35663:DFT,2,35663:AFT,2 :"Do you want to continue? ";:36000:Z$"N"31000  CHOOSE WORD LISTS (A$,1)"A"2050 (A$,1)"R"2055 300:2020+ BOX,C2(1,L)22,C2(2,L)E:(W$(L1),(W$(L1))5)Y$(L2)370T ^XL2:(X(1(PG18))X(18(18PG)))370e cXL2(18PG) hBOX,C2(1,X)22,C2(2,X)1,(Y$(L2))7C2(1,X)25,C2(2,X)7,8 r: |WIND,0,115,279,191:  FILE READER D$"READ"F$:E D$"CLOSE"F$:RD LISTS5 6CL$:WIND:CO:CN$T$CC$CO$:0,18279,18e @L118:CO,C2(1,L),C2(2,L):PGL10ĺ" ";y E(L(18PG))"." H:0,110279,110 JL118:CO,C2(1,L)26,C2(2,L):Y$(L(PG18)):X(L(PG18))L18 O:C0380& TEX:L11C:L21(PG18.FMERGE,"COMMON.LIB":(175)(176)2563RK(4)"MAXFILES3":16384:32000NRNH,"PRUTIL.OBJ":PP(948)(949)256:(4)"BLOAD PRINTER COMMANDS.BIN,A"PP",D1"ZS$(16),C2(2,18),WL$(120)_L1118:L212:C2(L2,L1):::1000 , DISPLAY W     D# D`-#D.#ED`  ### <= <ȭ<ȭ<ȭ#<ȭ#<><ȥ?< <<= H <=#I<#<##`q" ""ȱ h!"8ȱ ">? "6p"5#>6#? "!p ""<"=`""8쭇"`+#*#)#@A %#  # `@ i @ ȱ ;#`,"`, ,`<=ʱD>` <=5#?6# "!)">? "PLj"" 8` "L L L x@8MɭɊ=Le 2 `,0 (!U XT`I`I0, `n! J! { ^_ ( { R !,`L8n! <!=!< =Ѝ ,    ΍ˍ ect tab from your "T$(T)" diskette.":WP2:30000:CL$:34020G3ZU0:0000:31000|" WP(WP1):ZE4İ10000:"Please remove the write-protect tab from your "T$(T)" diskette.":WP2:30000:34010"3ZU0:󢍢󢍢󢍢󢍢󢍢 2):Z$"Y"Z$"N"36020 % p4 zZN$"":Z1i (ZSZ)0Z36ZN$ZN$((ZSZ)):ZZ1:38020v ZT(ZS)| Ӕ)E BAR :uCA$:SPACE:: T ̈D1$",S"((953))",D"((954))",V"((955)) ֈD2$",S"((956))",D"((957))",V"((958)):D1$D2$SM1 ۈ (1);:GCP,ZX,ZY CO,ZX,ZY:ELI,(3,"YESNOyesno",1),Z$:Z(Z$):Z$(Z(Z96Z123)3~\PD$(13)(4):CA$(1):CL$(12):CC$(3):QO$(34):QK0:CN$(14):CO$(15):U(0):3UT$(0)"MASTER SPELL":T$(1)"DATA":T$(2)"BACKUP":T$(3)"SPELLING":T$(4)"RESULTS":T$(5)"WORD LIST":ZS704:RFL,"MECC$$DISK"ZS:38000:N$ZN$:35000 0u SPAC  QpRpZp[p߹Zp[pIo pIo , g =p ,Ho $pMp) Np OpPp)?p ߅ l Mo ) L{o HHH>p hhh ɛ Moo0LooɈ95ɍ=p7,?p >p h5880`L =p>p?pHoAp ( $pL!o | {$0! >p ,Ln ^ {$0LnNHo Lo|Jo nr- p nKo n p-KoKoKo pLnnJoLoJo^`NHo Qphh,lp` ֩PyQ ALŠҠ僁iimiʈ i i &'iq& iLi N8`f `.f`xmym ` ң Σ  h`+ hR("  LPj,Hk  l  hl`L, HHHHHHHHH k ީl wjlNO,ɍɠ ɛ8nl,lPݩ lhhhhhhhmHihʍ i i i LiL 2k 3kM4k2k g<>=M4k?'<>2k2k3k` H g Rh PQ`L     խ)?` ` @)`,` Rj ެiii g&' i jQ&-iQ&&ii i`*U U*ժ Fj')JMFj)i Q&,iP 0=Kj`Gj`J&)` `L3f̙ujvj ߅$0Hujvj LbLvjj j` hiii h8)h` g R  QP (`L h`L)  @ iiiiiiiii g iii i i g iii i iBi g&' i jQ&-iQ&&ȭi i j& jQ&-iQ&&ii i`i-hhh hJ` &eeieh ghIiVhi 썛h gmh﬜hMhVhPjjjjjjj0jj) h0ȱjhjhhУ`8pPH)8 qȥq-`,f`imimʈ i iiʎ iLi Aggg` gg }ggg` g Ag }gggg`{g|g|g8pug.{g(ugg|gm{gg`8p g)gJJ gg gg .g .g ngg)ggmgg`hH80 " Jfm8h)` dem88eLf` deme` d8` f@ yf yf f`Lb dffL(f ``fʽ`) ` `fH`mS` dS`)We`Ve hWe gVe}`mf8ff`f` dLb,0*`%f 8fHfJhj`mfff` b d` b dI``L defff`) ffffffO,0 `)  d`f(`HHf,Pf88`f d fhLcfHfHff,P d fhf8hfffffff``S`S```f穀f f`f3f'ff ``)    LX8e湥 pHpH L`@ @ʩ WRPT` J  dȱȱȱ` hfH) #,f h`` fffffffh`f fS```emffff f`em (f%%h $20 LPc $ aHaH`dWeceWeeeee'fIfbffffff(bb d cf hf gNOH c h f ghH ,aɈ( cb h) e f g c ebbh`xo 8ɀ`>```L`bbbbp$% `@ GaLa6 ,fLbLcfPa bHaa,aaɠ,wa ` a欇aah`ɀ)?  @IH c$ d e$%0 d!! ! ! ! ! !!!!!!!!!   C10950=+X0FD0:L1X:FD(ST$(L)Y$(A))FD::FD10950$,XX1:ST$(X)Y$(A):BOX,36,A109,(Y$(A))739,A1019,8:10950.\-protect tab from your "T$(T)" diskette.":WP2:30000:34010G63ZU0:ZŮčϮčč"ILNOFILRFRNSNOPRSPRSEהIh0BmU_jSX]kPm7l `^ D`'D(ED`7PLkl7mP(L ʊLL$ &L`L 䎱 掲`ժՖՖխժժժժխՖխժCPRDDFMFh8ȱ>? ͗:p"/>0? ͗%p g^h_^`ȱ^Șe^^_iȑ^^_%$#@A    `@ i @ ȱ w`,` {ݩD 娐eD'E(B+C,@-A.>/?0 i) e,L׭gbhcXghLXLXgh $)/>0? ͗p G 8`L^g8hegiȱehj8ȱLg h gȱhg8<8?. e<&8>!>> g R>P>Q +?=<`L #H h`ST~~ST` ST` L ͐\D'E(B+C,@-A.>/?0 # { RPgQ +h q,L iLl`Q բ YLl YLlW mWW͘X̘ΘX YWߘXޘXLlUz_j`S縎X]` ߅$0  c`Lv [L G, ` M, L( 掲 {` 5?> 5=Jȱ<`Hha {8 $h`а ,,i,,`@@H?e@??h s@ ?88` , <= <ȭ<ȭ<ȭ<ȭ<><ȥ?< <H<= H <= I<<`*>%>>*@%@@ 5E@L`ɪɭ`8`쒩 H` <뒭 m뒨̘͘ȑΘёޘBߘKT %ɩ` Z ZLw< ЬȽ` <=ʱD>` L(`GG݌$8`cd a݅`pcd,p8`dd`Ω  7$8` 8L4ɪɖ8*5-55*<%<<i L+ɐxy+L/ɯL )8ɀ   Lޤȱ 0:,јe湥 ii , ,`xyL<=