' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 7777777 7777JJJJx 77L? L7877777777 776i 7 7867 7`77 777777`x =(`(8`5775I7`B` 76`77`>J><;VU<)?<`8'x0|<&HhHh 8 8 8 8V&` aI꽌ɪVɭ&Y:&<&Y:&;: 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8 9: :' 9: :& :x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?8  1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#000'#07#0:"4<*55**5*%5)1)1)1)'#0/#0*5*75**5*:5/#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh < <݌ < < h < < < <`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 (G FG HZXj 80x D9$xxH` >( Z>h Z>L=.xxH >hh@(LH>9L>HH/Hh/ H?-З( 8(& 8$8 H` *8HNx`* >x$50x*$50xL9JJJJ`HHjf5 >h $50x`HA>VD;;P >(ED Z> ?$0x8x D9- 8DD# H8`?E Vˆʎ55L $ 5 55555 &a*5`*5` "L&5_*b*JL%u**Lz%`** $  Q(lXJ̥KlV $  Q(lV eօ3L e3L &%R*L &%Q*L d' "L4% N'e*)n*5 5 &`@-e*f*f* 5 "L# "5f*`L %.* *t*Q*L$ %L&*L` "O**P**u** d' "L% N'e*)n*o*o*n* &8ɍ` ^&f\*555L& ^&NR* & "R*ΩL&)\*Z* ʽ LH*v 3h`0h8` " ['L & N'С55 &5`*A*@` +5L^6L65`  \* ?*0 '\* '  Q( ^&\*lZl^?*c*q)H c*h`f*5h*5j*555@O*AP*`u*@`@5&`Q*R*`E 'Ls' ' ' @DAE@u*`8` %@ @A@`@`**@*A`M5 ) "L&`8@AW*c*@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@c*h8&ȑ@Hȑ@Ah@L'Hȑ@ȑ@* htphso`hMhL`9V*8U*897T*6S*67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   Ϡ734@~3!+,W,o,*--,,9,-.-~3~3,,,,~3~3,,,,~3_*3 j.5 *H*H`Lc3 (+L3 +55555 1^3_* )3J Q*L_3Ls3443 D23455545554 70 / 7 :/354545455454555535L^/5-5I5555 55` / 4/ 2-5! / 08555454 70L3 (+50+5B5C3 2 70L35 *H*H`Lg3L{3505 *H*H` 3 ,5L3 3 1 ,H 1hBL, 0 BH [1 1h`Lo3 35 ,L3 3 1B , 1L,H 0hB@ 55 [1L133 (+34) 34 70L3 3L3 (+ 055L- (+34L{33454445 70 ^/* / 3B0 HȱBh -355 -8 /L38 25` +5 /3 /. /. 3 E7D B. /. /. 0]34S0J4 4) 3 4D4E B. 4  /. 02L3 Ν3 3`HD٤33DEEhiHLG.h ` /5B5-` /5B-` + X05I33383 33DH /4 E03744Ȍ7 X040 7 J7L35B5C`,5p` / R0-55`50` K/ R0-55`575755` 4/ K/ /( 55L/BȱBL/58` D2BH5BH :/ 75Bȭ5Bhh55 R0B5m55ȱB5m55` /LR0557755`*7*75LR0 E0(33 48`433 R0` E033LR0*7*7`777 555I7575757577** 7757`7 L35555f /55555555 ^/`855 i /B58` 41L 15ȱB5 /5555 /5`3 D23ȑB55B5 / 7 55`5555555555 5555`555`55BC55`5555`L3 /5B5C355 0Q340"B4 3` 02۰Ϭ33B438`3i#`3ЗLw35!50>5555`53 /3m3 3 3733i35 3583 /35ЉLw35`H /5h 25L/~43 533`55555555J5m55m5jn5n5n5ۭ55m5555m55m55`"L? 585H ~.(3` # d ֠z# u*`,5,70,11:PC:CEW:"You can continue to expand the sentence by adding words and phrases.":30000:WIND10,12,70,21JPC:CEW:"The ill-tempered mule stopped in the road.":30000:PC:CEW:"The ill-tempered mule stopped in the middle of the road.":30000rd choices."30000:PC:CEW:"To expand the sentence below, you could begin by adding an adjective before the word "QO$"mule."QO$WIND10,12,70,21:CEW:PC:"The mule stopped.":30000:PC:CEW:"The ill-tempered mule stopped.":30000r1WIND10esting by EXPANDING it to include descriptive words and phrases." P:"It is easy to expand sentences with a word processor. You can insert or delete words until you capture just the tone and content you want! Feel free to experiment with different wo:TI$"Continued Expansions":PA$"":200:F04999E (ZNNO)İ10000K _ " INSTRUCTIONS CL$:13000:"The sentence, "QO$"The mule stopped."QO$" gives you only a minimum amount of ";A "information. You can make this sentence much more inter(1)"The floor boards creaked.":MN$(2)"The runner gasped.":MN$(3)"The door opened.":MN$(4)"Return to Easy Expansions menu":12000:(ZNNO)3999 PA$MN$(ZN):FA$MN$(ZN):IP0:TL0:MWADD,0,0,FA$,IP,TL:PTTL:10000  " CONT1 hSP6:EN$" use"PTTL + " MAINZ LDN11:2100:DN(ZNNO):ZN5000,3000,4000,6000,7000::31100f " MENU 4EN$"":SP8:TI$"Easy Expansions":PA$"":NO6:L1NO:MN$(L)TN$(L)::12000: " EXP  TI$"Program Expansions":PA$"":EN$" use" NO4:MN$ING% ZD1:33000:FCN,".EXP",MN$,Ft CS0:F0ĺCL$:PC,0,12:"No expansions have been started."CC$:30000:299 17000:NOF1:MN$(F1)"Return to Easy Expansions menu":SP5:12000:(ZNNO)299 CS1:NM$MN$(ZN)".EXP":FA$"":MWL,0,0,NM$,IP,TL: " MECC WRITE START0" EASY EXPANSIONSM" PROGRAMMER:SK RUSSELL`(" (C)MECC1985s2" 85/05/10SKRd" INITe18000:APP,"COMMON.LIB"nPN$"Easy Expansions":20000:919,1:NO6:L1NO:TN$(L)::902,2919,1:1000 " EXIST     And only $2.00 at Wirley's garage sale.":MWADD,IP,TL,T$,IR,LT:IP0:TLLT#P1:TI$"Moving Text":500:"It is easy to move words and paragraphs around on the screen by using the delete and retrieve features. To put the second paragraph first, follow the paragraph."!LG$"+XZ":600:TI$"Retrieving Paragraphs":500:"You can retrieve the paragraph by using Control-Z. Retrieve the paragraph you deleted."K"IPIR:TLLT:600:300:T$(13):L170:T$T$" "::T$T$"A hammock. What a wonderful find!ords you deleted by using Control-V. Retrieve the words you deleted.":IPIR:TLLT:600!300:IP0:TI$"Deleting Paragraphs":500:"You can delete an entire paragraph by using Control-X. Move the cursor to the end of your text. Use Control-X to delete 庠 򺠠 庠 󺠠迠忠 󿠠 孭 宠 򠵰 庠 򺠠̧堠 庠 󺠠       p@srEp|?OBpF|Bp@ NKLB@BH3L3G?KI*RB~P~C*HBG*L~N~BaAy~N~xNHffJHIUN?GB?DB?AUMB?DB?B3L3A?L?BH3L N?DI*KPDrDGJBFBEgIUDI*KPDUUCA~z{;KOoB UU*ffBBNfX`WBH*JIU\?NU**D  **UL3LBEBEB8`B3 3EB@N;n;l0@W5GuJI*YQ T  yfBQw]w\p@GBNw]vX`DBxOOIUU?@ppB|DB|Ap@B@JPBGPECB@pB|DB|?PVP|O3LBS;n;l0@DB@RI ?LHUJI*PAUey~GQ!hz>/kz~C*UUFy9)iYYBy UU*fBEB`ExB`ABBHffTIH*JIUPj C/#( BPt}_Wu}?GU**B_Wu}}kzC **U3L3BB|N|pNH 3LX?EHUJI*W xzz{{z~J*BAIRACJIUR?/+D*C*UUQ?B*uB*?B|BBAINHWJI*PWHUCU**NB}ABxBAINH*JIUPI*C*UUJ?n@Z?BpAINHUJI*PHU`CU**GX`CxS]vX`ZBINH*JIUPE*Jr|?#( BPu_UCGsqBs ayy`yyIcCs?I*C ')jz~')Z* bx~MBU\83030SBUBBBAII`CLAsqBsaC~~BIUB|}}sOSTNUACUBBUEq|QB*\pfB~SB*BBBAIICBaBLaJI*FO~^VTUC~U**SBUZAy`yyIcSBUBB38D BOCAByAIUM`?KB*QaLB| LagggSB*BBBAIIpBfpC ypr3sgcBgCI*J')jxb\ IBUQCBy C>SBUBBBAIIA|aO`Cpg`f`CCyIUF ?OSTu}?OSPUQAq|JB*\<?.njzzF~fF~xBUZ~FS~BU~CBBAINHjJIUBM?JB}yyDyUU**DffT`x~DH*JIUID?B0BPC:CEW:"Here are some hints to help you get to the location where you want to type:":WIND20,8,60,24:PC:"Use the arrow keys to move through text and spaces already on the screen.":sW"Use the Space Bar to move the cursor to a new location can also make a word picture that expresses an idea or makes a statement.":30000:PC,20,6:"(four wheel drive)" PC,20,8:"wheel":PC,20,9:"wheel drive":PC,20,10:"wheel":PC,20,11:"wheel":30000:PC,15,6:CEW:L15:PC,10,7L:"REPEAT"CC$::30s the object or the shape.":30000:NM$"TORNADO.SEQ":9500|CL$:13000:"You can start with either the text or the shape first. You will probably go back and forth--";"tailoring the text to fit the shape or vice versa.":30000qPC:CEW:"YouNGLE"CC$:PC,,9:"RECTANGLE"CC$:PC,,10:"RECTANGLE"CC$:PC,,11:"RECTANGLE"CC$p 30000:NM$"APPLE.SEQ":9500:CL$:13000:"You can also experiment with a shape that contains original "QO$"text."QO$" The text could be a poem or saying that describe it easy for you to "; "move and arrange letters and words on the screen. You will be able to experiment with both the content and the shape of your pictures.":30000O PPC:CEW:"You can arrange a word to make its own shape.":30000:PC,,8:"RECTA (ZNNO)İ10000 , " INSTRUCTIONS< CL$:13000 "You may have heard the expression, "QO$"A picture's worth a thousand words."QO$" And with this activity, you will be able to create pictures made up of words. The word processor will make + " MAIN PROGRAMV LDN11:2100:DN(ZN5):ZN5000,6000,4000,7000::31100b " MENU 4SP8:TI$"Picture This!":PA$"":NO5:L1NO:MN$(L)TN$(L)::12000: " EXISTING hEN$" use":TI$"Existing Picture This!":PA$"":200:F04999 庠󠠠 򺠠 庠 󺠠䬠    33000:FCN,".PICT",MN$,Fc CS0:F0ĺCL$:CO,0,12:"No pictures have been saved."CC$:30000:299 17000:NOF1:MN$(F1)"Return to Picture This! menu":SP5:12000:(ZNNO)299 CS1:NM$MN$(ZN)".PICT":MWBUF,B1,B2,B3,B4:MWL,0,0,NM$,IP,TL:PTTL  " MECC WRITE START5" PROGRAM:PICTURE THISR" PROGRAMMER:SK RUSSELLe(" (C)MECC1985x2" 85/05/20SKRd" INITe18000:APP,"COMMON.LIB"nPN$"Picture This!":20000:919,1:L15:TN$(L)::902,2:1000" EXISTING ZD1:   ! &q) ,҃Ӄԃ <= <ȭ<ȭ<ȭ҃<ȭԃ<><ȥ?< <H<= H <=Ӄ I<҃<ԃӃ`բ L!"# $%&L 仠 仠 仠 󮠠 庠 nsert the word "QO$"green."QO$:TLLT:IPIR:6005Dp "PART IIzLG$"-MFLOPQRSWXVZ+BEN":TI$"Beginning of Text":500:"You can use a Control command to move the cursor to the beginning of your text. Hold down the Control Key and press the letter data diskette.":::"Do you want to continue? ";:30100P .CL$:Z$"N"31100 LDN11:2100:DN(ZNNO):(ZNNO)3000::31100 " MENU 4GN0:TI$"Management Options":PA$"":NO11:EN$" use":L110:MN$(L)TN$(L)::MN$(NO)"Return to the MECC W     庠 庠 仠 仠䮠  庠 庠 仠 must begin with a letter.":30000:L0K CF$".FLOW":16000::NM$NM$CF$|l (R)ZD1:ZW1:33000:CS0:MWS,TL,NM$:SD1'#(#"Read directions","Start a new Go with the Flow","Continue a saved Go with the Flow","Print a Go with the Flow","Return print":PA$"":TI$"Saved Go with the Flow":200:F07999N (ZNNO)İ22000T?`@" SAVEmrCS8300&L11:CL$:PC,0,11:"What title do you want to give Go with the Flow? ";:INP,15,"-AZ-09 .-",1,NM$:X((NM$,1)):(X64X91)ĺ:"The title further.":|"You will not have to save what you write unless you want to work on it later. However, you may want to print a copy.":30000:CL$oWIND:CL$:p" NEWCS0:TI$"Go with the Flow":IP0:TL0:PT0:10000:X" PRINT:EN$"in typing anything that comes to mind. Don't worry about punctuation, grammar, or spelling. Just "QO$"go with the flow."QO$: "You can use this activity for fun and to become a more fluid writer. Often you may discover an idea that can be developed about is to use a stream of consciousness approach in which you write to discover your ideas."; P" This approach lets you experiment with words, feelings, and ideas.":30000 PC:CEW::"Give yourself a time limit--5 or 10 minutes is plenty. BegO)İ10000  " INSTR CL$:13000:QO$"What can I write about?"QO$" Have you ever made this comment when asked to write about a topic of your choice? If so, this activity can be both helpful and fun."` :"One way to generate ideas to write+&H)h`ɀ8 , P ҆` Æ`` NM$CN$(ZN):FA$MN$(ZN):300:IP0įMWADD,0,0,FA$,IP,TL:PTTLJ 10000P ] " PRINT EN$" print":2300:(ZNNO)4999 hNM$CN$(ZN):FA$MN$(ZN):300:FD0ĉ::11:"There is no chain for "FA$"."CC$:30000:4999 7000  " INSTRUC00:DN(ZN4):ZN5000,3000,4000::311006 " MENUES 4TI$"Chain Gang":PA$"":EN$"":SP8:N11:NO4:L1NO:MN$(L)TN$(L1N1)::12000: SP6:NO9:N15:L1NO:MN$(L)TN$(L1N1)::12000: " USE PROGRAM  EN$" use":2300:(ZNNO)3999? ),CN$(L)::TN$(13):DI$(23):L123:DI$(L)::902,1:1000L ," FIND FILEo 1ZD1:33000:FCN,".CHAIN",X$,X 6X0FD0:L0X1:FD(X$(L)NM$)FD: @IP0:TL0:TF$NM$".CHAIN":FDįMWL,0,0,TF$,IP,TL:PTTL J " MAIN PROGRAM( LDN11:20  " PRODUCT:THE WRITE START;" PROGRAM:CHAIN GANGSX" PROGRAMMER:SK RUSSELLt(" COPYRIGHT(C)MECC19852" LAST UPDATE:85/04/16SKRd" INITe18000:APP,"COMMON.LIB"; nPN$"Chain Gang":20000:919,1:L14:TN$(L)::L18:TN$(L4 $8h` 0`H$% $%$% "P P h`,0N8 2,0 ]L.NO0ήί, 2`H+8+02LÁh`크+2 `8 0` ǠŠҠ 󺠠 Р Π ! ! o Good to Miss",CHAIN,CLASSnÃTEMPTING,AUTHOR,"TOO GOOD","Go with the Flow","Easy Expansions","Name That Tune","Picture This!","It Could Be Verse",FLOW,EASY,TUNE,PICTURE,VERSEr #"ZE" in line #"ZN:30000:2}"Error #"ZE" in line #"ZN" in The Submenu Program. Please report this error to MECC.":30000:d}" Please check your disk drive and diskette.":30000:PÃ"Chain Gang","Class Journal","Tempting Tidbits",Author!,"To:CL$:M40:UNHOOK::12:"Getting the MECC Write Start menu...":D$"RUN MENU"f}" ERROR PROCESSING }ZE(222):ZN(218)(219)256:ZE255Ĭ}:11:ZE6ĺ"Error: File not found.";:32100}ZE8ĺ"I/O Error.";:32100(}ZE0ZE16ĺ"DOS Erroe a data diskette.":30000:WIND,1:CL$9'#902,0:31000D2" BOXs,3WIND,1:X10:Y10:X279:Y221:14100:PC:y66WINDX1,Y11,X2,Y2:PC:CEW7WIND,1:D8R,X1,Y1,X2,Y2:WINDX15,Y13,X25,Y21:PC:0u":uCA$:SPACE:yN"yWINDof the word "QO$"true."QO$" Press the Return Key to start a new paragraph. Press the Return Key again to put a line between your paragraphs.":TLLT:IPIR:600/500:"Use the arrow keys to move to the right of the word "QO$"blue."QO$" Delete it and ihe word "QO$"sports."QO$" Use the Delete Key to erase the lower case s. Add an upper case S. Move to the l in "QO$"flyer."QO$;" Delete the lower case f and add an upper case F.":TLLT:IPIR:600500:"Use the arrow keys to move to the right N$(L)::EN$(3):EN$(1)" view/edit":EN$(2)" delete":EN$(3)" print":902,0:919,1X r CL$:WIND15,5,65,219 "Management Options"CC$::"The management options allow you to view, edit, delete, or print the files from any of the activities on thetriped sock and one of bright orange."|MWADD,0,0,T$,IP,TL:600:500:"Move to the words "QO$"thismorning."QO$" Use the Space Bar to put a space between the words.":TLLT:IPIR:600500:"Use the arrow keys to move the cursor to the letter p in t  " MECC WRITE START3" MANAGEMENT OPTIONSE" SK RUSSELLX(" (C)MECC1985k2" 85/05/21SKRe10001:APP,"COMMON.LIB"R nPN$"Management Options":20000:MS$" Control-Q to Quit Control-R for Reference":TC$"QR":L110:TN$(L),B   䠠 diskette.":""You or your instructor can create this diskette using a blank diskette or one whose contents you no longer need.":'""Choose the Diskette Support option on the main menu. Then follow the directions on the screen for Option 2--Creatreens while you are using any activity."::"To see the Reference screens, hold down the Control Key and press "QO$"R"QO$" at the same time.":30000:WIND,2:PC:CEW `""Please note:"::"The activities on this diskette require you to use a prepared dataprocessor's commands.":30000:PC:CEW!"Obtain a copy of the Reference Card from the support manual and place it next to the computer. The card summarizes all of the word processor's features and commands.":30000:PC:CEW!"View the Reference scJJJJȱ<`Hha {8 $h`а ,,i,,`@@H?e@??h v@ ?88`   <= <ȭ<ȭ<ȭ<ȭ<><ȥ?< <<= H <= I<<`*>%>>*@%@@ 7E@L`ɪɭ`8` F` < mʒӒDMV %ɩ` Z ZLy< ϬȽ` <=<, X,lӠӠŠҍԠŠŠԠŠ͠ˍĠӠή`Ϋ  9$8` 8L6ɪɖ8*7-77*<%<ʱD>` L&`EE݌$8`ab _݃`pab,~p8`dd<=/0<a {8 /᩶` ,Q,R,T X+JJJJ % "\  L+ɐvw+LcɯL$ 8ɀ   Lޤȱ 0:,јe湥 MiNi , ,`vwL<= CO$:HSP:VSP:WIND:CL$:6000:C " MENU" P.BOUCHARD2(" (C)MECC1985F2" 85/09/27 CPERZ32000n16372,0:33,40:16384:230,64:D$(4):QO$(34):CL$(12):CA$(1):CC$(3):CN$(14):CO$(15):MT13:ML30:SP0:TI$"MECC Write Start"xP(S)(S)(S1)2565 }pace to the right of the word "QO$"happened."QO$" Add a question mark."&rT$"How could this have happened I dressed so carefully thismorning. Yet it was true. I looked down at my new sports flyer tennis shoes and sure enough, I was wearing one blue sLeft and Right Arrow Keys."TT$"Results! Why, man, I have gotten a lot of results. I know several thousand things that won't work.":MWADD,0,0,T$,IP,TL:IPTL:600HhTI$"Putting it All Together":500:"Use the arrow keys to move the cursor to the srrow Keys":500:"Find the arrow keys on the keyboard. You can use the arrow keys to move through characters already on the screen. Press the Up Arrow Key through the quote from Thomas Edison below.";J" Try the Down Arrow Key. Experiment with the rst memory I have is when I was...","My favorite holiday is...","Deep within me, I knew what I was about to do was wrong."o was about to do was wrong."s."rrite holiday is...","Deep within me, I knew what I was about to do was wrong."I  "" " " " " """""      ZW0:ZUZZ:L" DRIVE STRSTVD1$",S"((953))",D"((954))",V"((955))`D2$",S"((956))",D"((957))",V"((958)):D1$D2$SM1ZN$"":Z1ā(ZSZ)0Z36ZN$ZN$((ZSZ)):ZZ1:33220΁ZT(ZS))(ZDZT)(ZDZN$QN$)330204$QDZD:ZW33099c.ZE0:ZEĺD$"BSAVE MECC$$DISK,A"ZS",L$28"8ZE4įWIND:CL$:CO,0,12:"Please remove the write-protect tab from your "Z$" diskette.":ZP1:30000:33040BZE0:ZFZEĺD$"DELETE MECC$$DISK" Kate, ";x "the genre (type of story), notes to spark the interest of your classmates, and your name as the reviewer." :"Several examples are already listed in the activity. Use the arrow keys to scroll up and down through the list.";x " Add ","Return to Experimenting menu""imenting menu"hFormula","Return to Experimentation Menu","Save your formula","Print your formula","Return to Formula Fill-Ins Menu"L  " MECC WRITE START1" GO WITH THE FLOWN" PROGRAMMER:SK RUSSELLa(" (C)MECC1985t2" 85/05/10SKRd" INITe18000:APP,"COMMON.LIB"nPN$"Go With the Flow":20000:919,1:L15:TN$(L)::902,2:1000" EXISTING ZD1:30.1`02 :#;$L` `(p,`6a , P ,TJ,Up  `(` `,8+<88ʱD>`   <= <ȭ<ȭ<ȭ<ȭ<><ȥ?< <<= H <=I<<`or: File not found.";:32100<(}ZE8ĺ"I/O Error.";:321002}"Error #"ZE" in line #"ZN" in Menu Program. Please report this error to MECC.":30000:d}" Please check your disk drive and diskette.":30000:Pò dÃ"Getting Started","Started","u may now use MECC Write Start with one disk drive.":30000ANG0uX:u:SPACE::^yg"y200m} }ZE(222):ZN(218)(219)256:216,0:32000}ZE255Ĭ}:D$"CLOSE":ZE0ZE16ZUĦ}CO$CL$:WIND:HSP:VSP:CO,0,80:ZE6ĺ"Err7,(954):958,(955):D$"BLOADMECC$$DISK,A704":740,1:ZU1hRNZE0:ZEĺD$"BSAVE MECC$$DISK,A704,L$28"\NZE4įBOX:CO,0,83:"Please remove the write-protect tab from your program diskette.":30000:BOX:20050fNZU0:ZE32120;zNCL$:CO,0,83:"Yo60:"MECC Write Start is currently set to use two disk drives."4NCO,0,100:"Do you have two disk drives attached? ";:CEL:INP,(3,"YESNOyesno",1),YN$:YN$(YN$,1):YN$"y"YN$"Y"YN$"n"YN$"N"20020>NYN$"y"YN$"Y"20099:HN956,(953):95>? q*p"ә>ԙ? qp 6`əșǙ@A Ù   `@ i @ ȱ `,` {ݩD ^ D`˙D̙ED`<=ә?ԙ W  e,LLLX 7$)6ә>ԙ? qp6 G 8`L/g8hegiȱehj8ȱ7jU8ȱV8ȱɱ  Ԡ 堨婠 נĠ ؠȠ 堠ǠĠǠ 󺠠 򮠠0%Z#Z8Z127įCO,ZX,ZY:CEL:9010/d#9040Dn#AA48:A1A1Rx#XX(XX)Z#:#ZL11:XX(1):Z(16384):ZL(Z127)::ZZ128:16368,0: NS1(953):D1(954):V1(955):S2(956):D2(957):V2(958):S1S2D1D220099?/N(12):CO,0,o the concepts and skills necessary to live in the Information Age.":WIND:30000:AFT,1:(#CA$;:16368,0:GCP,ZX,ZY:WIND,ZX,ZY,250,ZY12:DL$(127)2#DL$:CO,ZX,ZY:9100:AZ:A19070<#A49A(48N)9010F#(A);DL$;CA$;P#9100:Z13907ion":WIND,30,47,260,171:COJGCP,ZX,ZY:TI$CA$;:GCP,X,ZY:ZX,ZY8X,ZY8:" is a package in the "SN$" series. This series, along with four others, is part of MECC's Computing and Information collection."ZO:"This collection introduces students t::6)"Minnesota":8)"Educational":10)"Computing":12)"Corporation":VSP:CO,20,165:"Copyright 1985"CC$:30000:BOXEWIND:AFT,2:CO,55,12:CN$" !"(34)"#"CO$:WIND,90,17,279,191:COF"Computing and":" Information":3:SN$"Composing Informatpe (Esc) Key twice whenever the computer is waiting for a response.":WIND:VSP:30000:@CL$:Y2180:6000:AFT,1:WIND,20,25,259,176:CO:HSP:CN$"Computing and Information"CO$CC$::3::GCP,ZX,ZY:TI$CC$CA$;:GCP,X,Y::72,ZY9X,ZY9::yAVSP,4 Gang",.CHAIN,"Class Journal",CLASS.SEQ,"Tempting Tidbits",TEMPT.SEQ,Author!,.AUTHOR,"Too Good to Miss",TGTM.SEQ,"Go with the Flow",.FLOW,"Easy Expansions",.EXP,"Name That Tune",.TUNE,"Picture This!",.PICT#"It Could Be Verse",.FORMTe printer...":30000:PINIT:CFPP,4,58,4,5,70,75,0:NB1Ė5:1:FPRT,B1,1,J2,J3:FEED:7999 L1NB:NM$MN$(L)BN$(PC):5:1:MWL,0,0,NM$,IP,TL:FPRT,B1,1,J2,J3:FEED:?POFF:@" SAVE FILEl ZD1:ZW1:33000:MWS,TL,NM$ SD1:(#"ChainZD1:ZW1:33000:CL$:PC,0,12:"Deleting the file...":D$"DELETE"NM$,D2$:GN(NO3)[z8L1NB:NM$MN$(L)BN$(PC)BZD1:33000:CL$:PC,0,12:"Deleting "MN$(L)"...":D$"DELETE"NM$VWX" PRINTZCL$:PC,0,12:"Please prepare your499H CL$:PC,0,12:"There is no file saved for "TN$(PC)"."CC$:30000N V "  PCZN:QN11:2200:(SCNO)QN1:3999 RN11:NB1:2300:(NO0)(FD)SC4 SC10000,6000,7000:RN(SC4)GN:QN0::p" DELETENB16200UNO)SC4:2399? $ MN$(ZN)"All files"NBNO2:GN1:FD1:2399u . NM$MN$(ZN)BN$(PC):MWL,0,0,NM$,IP,TL:PTTL:FD1{ _ ` ZD1:33000:FCN,".SEQ",TP$,NO g NO02480 j FD0:L0NO1:FD(TP$(L)".SEQ"NM$)FD:t FDįMWL,0,0,NM$,IP,TL:PTTL:2ZD1:33000:FCN,BN$(PC),MN$,NOr  NO0ĺCL$:PC,0,12:"There are no files saved for "TN$(PC)"."CC$:30000:2399  FNO:17000:((SC2)(SC3))(NO1)NONO1:MN$(NO)"All files"  NONO1:MN$(NO)"Return to "TN$(PC)" Menu":EN$EN$(SC):12000:(ZNrite Start menu":SP5:12000: SP5:MN$(1)"View/edit a file":MN$(2)"Delete a file":MN$(3)"Print a file":MN$(4)"Return to the Management Options menu":NO4:TI$TN$(PC):EN$"":12000:SCZN: (PC2)(PC3)(PC5)NM$BN$(PC):GN1:2400:2399  `|#{${TN${${U#{,T`((((PPPP,|0|`L|<| |||m|i`|<|=< <<=L{`,,`m|| %{{={{` y |1|L|| h|@AECDBEC8BC<8B>=C? z`8|D|EDE8@A@ADBECDBECeBeC<eB>=eC? z`|>=?,|0 x@?<>5=eA=?eA?A@<>,|0 x<>=?m|| {,0y0  ɍ( )@`)? {` | x |` ky|`0`>?8ȱ> 0Șe>?i`>?>?>> 0J>?>?`B@@eBeC`8@A@A8|D|EDB? xLwx`<=| xRx xw<0=18e>A?x|N {|>$> { ɍ {Șe>>?| {,|0 xxθxЪ``,a0,b)|,||`8|8 x`,0y| x 0 | :w` x { c{ :w`||| |` x |` x x+|mRx xxI8m|0@1A Sx x |`L1y<>=? xxx,x0 xx|>) ߍx x, x x x>0x >>)> x(%8e>>?>? x>,v0pFv,vp08@vзv)|<])<|0 }Gv}Fv< Luʊ8|BC,v0||,}0 H /zh y AwLu|,}0 y AwLu|v|v Luv` x | kyȄ< c{ :w` x |` xBvCvBCBB0 {BC :w`-?vi7v|%"m||#|$ |!m||J!!|<|=<=<< {<=<< |8||J||, " {||||,Ug0SgTg|<|= xw 1y`v||Lv8 xv v||vɛ|ɀ8Lvɍ,}&0ɠ#䬠Ǡ䍠򍠠Ưᠠ̠󍠠󮠠捠ŠҮƯ䠠àō󺠠Ư    kbh !aH bhLNt) Qt,fbgb||8|ȥ| aQt bQt`亠 , tt,t0tNt8 x,t0 ttLtRtt x ut0ttt {,T|,>vi6vtLs ۰ >r` 8`Hfbsgbh asLs) sLs8|B|C BsLs /zeBeCtbsubs ȑ s3,ň剰iLss8BC쥉 y bs`H {+r r {ft s X}|<|= xwLtm t̅tftt`r `rLr, @Af@@ȑ@ B@ȥC@   @rr {`s,t0 m|Lr<=Rt m|<@=A m|s8 mɽ tq>q?qqqq@A q  q `@ i @ ȱ N`,eq`Dq D`qDqED` YrLq, {ؠq r ft s X}Lqm YrLr, phpȱ> pop ppȱ }op8ȱ p>? Gq4p >? Gq!p pp? GqPLpp; 8`p p gnLnޮMn {,On 8 NnMnNn|LmNnMnNn|Mn {LmNn`nn,n0nNn8 x,n0 n]nLnn.n0nnn,ɛ,nNnP,n0L|L`n xn`|| 1y` 1y`o m8 m"|лLl(`(8`PmBeC yPmB /z<=>?B@CA zeBeC`@ ߩ ie` x 1y||`@mA|8 Sx` BC mB@CA| Sx`|||njOn|m|MnLn| {Nn Pnɍ\Ɉ?ɠNn0N ŠҠ嬠Ӡ d||| Pn8 `l lQm豆Eͭl,lp0"lڥʎQmlʎSml)8$l` 1y8 x`mm m>> m ш,m0 >@?Am m mm,m0>?(捿ttmtt`K|p@O@pB|DB|p@B@PPTT^@CpD|Cp@G L3L2P@p|I*N~x`K~N~E*I BE*[`x~N~x`@PTVUFfM`x~CIUR|p@HB?DB?BDBUDBE[?P?D* B N*F3LI@p|GI*U~x`HxDyFDxB*kCDCDB@@At u@ )` t t t0H)?hJ t t t?Lt t&'&Ȅ``tt ttt`t)tJJ tttt .t .t ntt)    kɪɯLk NlkjkQm>? l ,k0v X}Lkk@Ak0 l,k0/Ǡk m8 8lɠ;HSmQm m,k0 y x lk m( 8lkɠ,kL k y xLtm ŠҠ嬠ҠӠj) jNj`8`, ,,`jjj jN ɍNj' jIjLjj j,j j jΕjʭjj jɛjΕjꩀ`,8`j j jΩj`j j jνj`eȢ d`KF:|Ȍ|k m|8 mj8$`,i y,,`΍jȱj`jmj`,j8Lijiiij3A ɠ,i 扈,i0݌i NiɍiL\i8nji0j`jj`ɮXjjj OF;)OLij PiQij 1y\h m .o ,j j LLtm 砨 ŠҠ  i(jjj hjjj j 3i Ci i h %j j,j %i`j`jjj8jjjЭNghMgNgMgOgNgPg KgMgLgNgTgRgSgQgSgTg {`,,`gre >ve?Ȑ۩`?)8鍸ζ`H88HH$8nVg셊텋 e,Vg08劅B勅C [f yLqm$8nVg eLqm`||ƋƊ {H fh `fٰ$8 {` kf셊텋BCB<=8> <=d<=`6d7dddd8[)80P ͜dEHddddd.dddmdddmddhmdddidЦdd` Fdd d d d`d ҆d`dd d ҆d ҆Ld` <=VcLvcȥPȥQ ȱPȱQ`Lc,c,cȱȱ`ȱ`ccc,ccȱȱcȭcȭccmceeLb`ccc .cc mcccmccc`>?4> d902))" menu...":D$"RUN MENU"Ry"Getting "ZM$((902))" menu...":D$"RUNSUBMENU"X} }ZE(222):ZN(218)(219)256:216,0:32000}:D$"CLOSE":ZUZE0ZE16Ħn}ZE255Ĵ(919)031000:110;x}CL$:PC,0,11:"Error "ZE" at line #"ZN" in "o try again? ";:30100:ZZ$"Y"31110+|y7yZZ$"E"^y54915:ZD0:33000:ZZ$"Y"Ľ:110yWIND:CL$:ZD0:33000:ZM$(0)"the MECC Write Start":ZM$(1)"the Sharing":ZM$(2)"the Experimenting"::12y(902)0įM40:UNHOOK::12:"Getting "ZM$(("-09":ZB10ZT10ZL$"-"(ZB)(ZT)W vPC,ZX,ZY:INP,ZL,ZL$,((ZC)),ZN$:ZN(ZN$)v(ZNZBZNZT)(ZCZN$"")įPC,0,24:ZF1:"Enter a number between "ZB" and "ZT"."CC$:30220 vZFįPC,ZX,ZY:*vy%"yWIND:CL$:PC,0,12:"Do you want t,4,58,4,5,70,75,0:5:1:FPRT,B1,1,J2,J3:FEED:POFF:I0uCA$;:SPACE:OuduCA$;:GCP,ZX,ZYuPC,ZX,ZY:CEL:INP,3,"YESNOyesno",1,Z$:Z(Z$):Z$(Z(Z96)32):ZZ$Z$:(Z$"Y"Z$"N")30120uu'vCA$;:GCP,ZX,ZY:ZF0:ZL((ZT)):ZL$CL$:PC,0,12:"Your diskette is almost full. This file will be saved but you should create a new data diskette or delete some files.":30000UUPN$"Too Good to Miss"İ7000:6TVCL$:PC,0,12:"Please prepare your printer...":30000:PINIT:CFPPiskette is full. This file cannot be saved on this diskette."CC$:30000:EN$"":MN$(2)"Continue without saving file":MN$(1)"Insert a new diskette":NO2:12000:(ZNNO)OK0:21999RCL$:PC,0,12:"Insert new data diskette."CC$:30000:21000SX33":QT$(1)"data":QT$(2)"backup"::D$"BLOAD MECC$$DISK,A704":ZS704:33200:QN$ZN$:QC(ZS36)LOPP(948)(949)256:D$"BLOAD PRINTER COMMANDS.BIN,A"PP",D1":ROK1:PLTLPTRZD1:33000:CNT,XlR((PL256)2)X21400RCL$:PC,0,12:"Your d:TC$"QRD":MS$"Control-Q to Quit Control-D for Directions Control-R for Reference"NB153249:B210000:B353249:B45000:B5B1B22:B61800:B7B5B62:B810:MWBUF,B1,B2,B3,B4:FD0:MN$(26),TN$(26),QT$(2),TP$(26),X$(26)^N33100:QT$(0)"program.TEXT":19000:RF$"FIND.TEXT":19000:MWBUF,B1,B2,B3,B4:8JMWL,0,0,RF$,XP,XL:CL$:CFPP,0,24,2,1,70,71,0::FPRT,B5,1,J2,J3:30000: N:919,0:32000[RND$(4):CU$(21):QO$(34):CC$(3):CL$(12):CA$(1):DFW,11,1,80,24:DFW,210,5,70,21:SP81:R1:16999 H?FD0:L11TP:FD(NM$TP$(L1))FD::FDĺCL$:PC,0,12:"That title is already used. Choose another title.":30000:L0 gB hBLF101:MN$(L1)MN$(L):: PF 9FZD0:33000:MWBUF,B5,B6,B7,B8:RF$"CURSOR.TEXT":19000:RF$"DELETE :" DOTTED LINE* :L140:"_ ";:::< >" NAME CHECK\ >ZD1:33000:FCN,CF$,TP$,TPk >TP16999 ?TP23ĺCL$:PC,0,10:"There are already 24 files saved on this diskette for "PN$". This file cannot be saved on this data diskette.":30000:LVT20F 0PC,20,VT:"Which number? ";:ZB1:ZTNO:ZC0:30200:WIND:L 2 ,3X10:Y10:X279:Y221:14100:WIND,1:PC,0,2::" Directions "CC$::WIND,2:PC: 6 6WINDX1,Y11,X2,Y2:PC:CEW 7D8R,X1,Y1,X2,Y2:WINDX15,Y13,X25,Y21:PC:dbeb (b` avbwbvbwbnb`cbvbwbL_b dbcb  nb`ccJ~c)c ,c,c Ȍc Lb ,c 0 , %cLVc,c UmLVc {,c0$0 R,c cPQLVc$LDDhE8 `D>ʱD>`$8aaa(a `La>tb?ub@rbAsbBpbCqbDlbvbEmbwbaa̿a Dhbibjbdbeba (b Bnb` 8`jbkbdbebhbiblbmba (b``*7L+`v`w`+`LMɯL`P 8ɀ   Lޤȱ 0:,јe湥 i`i` , ,`v`w`L ֩PyQ AL<=}q?},}-CU!_"j((((((((((((PPPPCND8FCFPRCFPGFPRFRNMWMWMMWLEMWBUMWTMWFMMWPULMWADMWODMWCCMWDBAPSNOPRSPRSEINPINIPOFPACFEEM4M8UNHOOCCECEDDFGCIPAUSPPSPACWIN &Z L9 L9M0ۍT (!$$6 ` LHQTT),S 678~9 hP,,0U X P) T (!  8n L~ LƓʎ ȓ LƓ LE LᎨ " 𒮨` LEN Tl$% ",,   NNOɛn,P L`Nɍɠթ  hhhhhhL Ӡ N8`( `( 8m ` Lc PP,8 K ޭ8 K`(LWP W , P L`LE  LʎʎLLE ё̠ L͑ɀm֑ɀmL HHHHHHpC` `H)hJJJC`, 0 `jm- ~ @B xB` mͳ   ފ K`LLL L L`ݏ,B0 T T ),  LA , )ɛ nݏ,ݏPLߏNݏ,B09Ɉlhɘ ,Aɿɯ 詍0S,@ɁɍbA,> ,B0Tޏ) ޏ9p ,B0 L  )L ` ֩PyQ AL,  ` BA@CS L a LT8nBN]P^QP_P^PL R-?nALSn@LS  -􎪭 LS^`O) P QR)N> ߅ l ) L{P|eQ` ޥ8|| N ޥ8|| N` { e^_ Wg<=e o o Wgii`L7PLՃ7PL &Ld`L 䎱 掲` 㩀>{ Ly)(0q, ߅  { {qBC yLk ky,L ٌ { {BC /z^<_=>?B@CAeBeC z,L A x,` jnUg`!|` g R|eP|eQ g R|e"|` Ќ` g R|| g R|eP||eQ| f g RKgLgMgNg g RPQg8mKgOgQRgmLgPgKgMg"The word or phrase between the slashes must exactly match a word or part of a word (including upper and lower case letters and spaces) that already has been entered into the database.":30000:WIND,1:CL$oX" PRINTt fiction."QO$" You can continue to look for each reference to "QO$"science fiction"QO$" by following the instructions on the screen.":30000 PC:CEW:"This example shows a search using a specific word. You could use it to look for a book about dogs.another slash. Press the Return Key.":30000PC:CEW:"This example shows how to search for a science fiction story."::"Find:/science fiction/"CC$::"The cursor will appear at the first location (if there is one) ";"of the words "QO$"scienceollow these steps:"::"Press Control-B to place the cursor at the beginning of the database.":-v"Press Control-F and you will see:"::"Find:"CC$::"Follow "QO$"Find:"QO$" with a slash (/), then the word or phrase you are searching for, followed by se for books that interest you. A special word processing command lets you search for books by specific:"::30000X114:Y18:X243:Y212:L116:14000:T$(L1)CC$:30000:X1X13:Y1Y11:X2X23:Y2Y21::WIND,2:PC:CEW`D"To search for a book, fe the Space Bar to move the cursor to a new location or push text across the screen."::"Use the Return Key to start a new line.":"Use the Delete Key to erase letters and spaces.":30000:WIND,2sPC:CEW:"You can also search through the databa0:F04999& h(ZNNO)FA$"":10000, @ " INSTRUCTIONSP CL$:13000 "You can use this activity to:":X19:Y17:X254:Y212:14000:"begin a story using a program story starter.":30000:X1X15:Y1Y12:X2X25:Y2Y22:WIND,2:14000:PC:CE. "SS$(L):: :"Do you want to use one of these? ";:30100:Z$"Y"NM$"BLANK.SEQ":"Which number? ";:ZT4:ZB1:30200:FA$SS$(ZN):MWADD,0,0,FA$,IP,TL:PTTL:10000  " CONTINUE A STORY EN$" use":TI$"To Be Continued Stories":PA$"":20" MAIN PROGRAMQ LDN11:2100:DN(ZN6):ZN5000,3000,4000,6000,7000::31100] " MENU 4EN$"":SP8:TI$"Author!":PA$"":NO6:L1NO:MN$(L)TN$(L)::12000: " PROGRAM STORY STARTER  TI$"Program Story Starters":CL$TI$CC$::L14::L" " SUBMENU"" SK RUSSELL5(" (C)MECC1985H2"85/08/23 CPETZ32000Zdn24576:D$(13)(4):QO$(34):CL$(12):CA$(1):CC$(3)xP(S)(S)(S1)256}DFW,11,1,80,24:DFW,210,5,72,21:MO1 PG$(20):L120:PG$(L)::place them with other words or phrases. To replace the misspelled word "QO$"freind"QO$" with "QO$"friend,"QO$" follow these steps:"CA$;%GCP,ZX,ZY:WIND6,ZY1:PCc&:"1) Press Control-B.":"2) Press Control-F.":"3) Type a slash (/), followed by ning at all, the ill-tempered mule stopped--just stopped--in the middle of the dusty road and refused to budge an inch.":30000:PC:CEWD"Without any warning at all, the ill-tempered mule stopped--just stopped--in ";|v"the middle of the dusty road|PC:CEW:"The ill-tempered mule stopped--just stopped--in the middle of the road.":30000:PC:CEW:"Without any warning at all, the ill-tempered mule stopped--just stopped--in the middle ";"of the dusty road.":30000:PC:CEW:"Without any warnning of the first paragraph."$"4) Press Control-Z to retrieve the second paragraph.":"5) Press the Return Key twice to separate the paragraphs.":WIND:600%TI$"Finding and Replacing Text":500:"You can find words or phrases in your text and rethese steps:"CA$;:GCP,ZX,ZY#WIND6,ZY1:PC::"1) Move the cursor to the end of the second paragraph.":" (The first paragraph will scroll off the screen.)"$"2) Press Control-X to delete the second paragraph.":"3) Move the cursor to the begiPAUSE,5::30000:WIND,1o,X" PRINT9 22000:J@" SAVE FILEtJZD1:ZW1:33000:MWS,TL,NM$".CHAIN"SD1:(#"Read directions","See or use a program Chain Gang","Print a Chain Gang","Return to Sharing menu"W#sell,SELL,lane,LANE,uch as "QO$"love,"QO$" one letter at a time. ";|"Each "QO$"link"QO$" of the chain must be a new word. Try to use as few links as possible."::"In this example "QO$"poor"QO$" is changed to "QO$"rich."QO$PAUSE,20::WIND38,13:L1523:DI$(L):roll through your list.";" You can also use Control-B to go to the beginning of the list and Control-E to go to the end of the list.":300000PC:CEW:"For a twist, try changing one specific word such as "QO$"hate"QO$" to another specific word sX PPC:CEW:"Here is a sample chain:"::WIND38,5::L114:DI$(L):PAUSE,5::30000WIND,2:PC:CEW:"See how long a Chain Gang you can create. You may want to set up teams to construct the longest list."::"Use the Up and Down Arrow Keys to sc3f̙jj ߅$0jj  c`Lvjj j` Fizi{i|i FimHihʍ}i~ii LiL H g Rh PQ`L   )?` `zi{i lgi`ji}i~i lgiZjiíiB|i vg&'i jQ&-iQ&&ȭíi j& jQ&-iQ&&|i|ii`i-ii|i vg&'i jQ&-iQ&&|i|ii`*U U*ժ j')JMj)i Q&,iP 0=j`j`J&)` `LhPjjjjjjj0jj) i0ȱjij iiiР`8pPH)8 qȥq8)h` g R  QP (`L Fi`L)  @ igjiisjiighggmgig`8pggJJJ) }hkggmigjg`((((PPPPiHhii iJ` &eeiei lgiIihi i vgmiiMi@ f f "g`L?c 7e#g$gLtf -`,"g`zim{imʈ}i~i|iʎi$20Li gighg`ggig gjgkg`gg g gjgkghg`ggg8pg.g( F9GI7FG H߭ Dstw`>`>6>L慎煌腥6H7Hs6t7,w0 ɍ Lх$Hu8$v$  @ 酥$vhi$u6sh7h6腮煭`ɍɌ vUz_j`S縎X]`?<>?>,>$f<<`qr ߅$0qr  c`LvS> eC$H)Dh0,E0RLLstd67  tsuuw,B5S,BNE8#gH$gJhj`m#g#g$g` ?c 7e` ?c 7eI``,L 7ee80 " fm8h)` 7eem88eLf` 7eeme` 7e8`,gLf f TIONSr CL$:13000:"Chain Gang is a word game in which you change one letter in a word to make a new word. "; "Then you change one letter in this new word to make a third word, and so forth. You may not use a word twice in a word chain.":30000divide the sentence into two or three sentences that are more effective. ";"Remember to edit for spelling and punctuation.":b "You may want to challenge a classmate to expand the same sentence. Compare the two sentences; the variations will be and refused--despite my earnest pleading and reprisals--to budge an inch further in any direction.":30000:WIND,2:PC:CEWL"When you have finished expanding a sentence, check to see if you have a well-constructed sentence. Perhaps you will want to mPݩ $mhhhhhhhhh,mp` ֩PyQ ALŠҠ僁zi{imiʈ}i~i &',|iq&i,$20Li N8`-g `.-g`mm ` ң Σ @)`,` j ެLj,H%l  (l  h,,(l,`L, HHHHHHHHH k m jmNO,ɍɠ ɛ8nm,  !"QO$"freind."QO$:"4) Type another slash, then the word "QO$"friend."QO$:"5) Type another slash.";&" (Find:/freind/friend/)":"6) Press Return.":WIND\'T$"My parents wondered why of all my freinds I wanted to go to the game with Melissa. After aane,line,tine,fine,poor,boor,book,rook,rock,rack,race,rice,rich$ich,richo,NM$:SD1'#(#"Read directions","See or use the program story starters","Continue to write a saved story","Begin a new story starter","Print a story","Return to Sharing menu"z#"I'd like to tell you about the dream I had the other night.","The fi0L11:CL$:PC,0,11:"What name do you want to give the story? ";:INP,15,"-AZ-09 .-",1,NM$:X((NM$,1)):(X64X91)ĺ:"The name must begin with a letter.":30000:L0 CF$".AUTHOR":16000::NM$NM$CF$ l (R)ZD1:ZW1:33000:CS0:MWS,TL person's permission!":30000)oWIND:?p" WRITE YOUR OWNCS0:FA$"":CS0:TI$"Write Your Own":IP0:TL0:PT0:10000:X" PRINTEN$" print":TI$"Saved Stories":PA$"":200:F07999 (ZNNO)İ22000?@" SAVE FILErCS830you like. You might want to write a "QO$"cliffhanger"QO$" in which each addition ends in suspense. Ask a friend to continue a story where you left off.":30000:"Please note:"::"Try not to delete what someone else has written unless you have that: " INSTRUCTIONS& CL$:13000 "Class Journal encourages class members to share ideas on a common topic. What one person enters into the journal can spark ";H P"a related thought in another person. In this way, Class Journal is similar to0X1:FD(X$(L)"CLASS")FD:] PT0:P0:TL0:NM$"CLASS.SEQ":FDįMWL,0,0,NM$,IP,TL:PTTLc +w " MAIN PROGRAM LGS1:DN11:2000:DN(ZNNO):ZN5000,10000,7000::31100 " MENU 4:L14:MN$(L)::TI$"Class Journal":PA$"":NO4:12000U " MECC WRITE START." CLASS JOURNAL@" SK RUSSELLS(" (C)MECC1985f2" 85/05/10SKRrd" INITe18000:APP,"COMMON.LIB"nPN$"Class Journal":20000:L14:MN$(L)::902,1:919,1:1000ZD1:33000:FCN,".SEQ",X$,X X0āL       interesting! You may later use one of the sentences as a story starter in the Author! activity."z>30000:CL$:WIND,1op" WRITE YOUR OWNCS0:TI$"Write Your Own":FA$"":IP0:TL0:PT0:10000:X" PRINTEN$" print":TI$"Saved Explive,LIVE,made,MADE,rate,RATE,tear,TEAR,bore,BORE,pink,PINK,"Return to Chain Gang menu"%some,same,lame,lime,dime,dome,come,tome,tone,lone,lane,line,tine,fine,poor,boor,book,rook,rock,rack,race,rice,richaok,rook,rock,rack,race,rice,richLne,lone,lW 7"continue a story you or a classmate previously started.":30000:X1X15:Y1Y12:X2X25:Y2Y22:WIND,2:14000:PC:CEW:"write an original story starter, then enter additional text.":30000:WIND,2:PC:CEWP"You can add as much to a story as ~ 00````0`````````0000`0I#????`` ~~3000000~~``````|```````~~~~~0000003f<ff<cc>cc>>cc>0000000|f~l6iɆpq{0`0``0`00000`Z<`~~6f~~~ ~~~ansions":PA$"":200:F079992 (ZNNO)İ220008?I@" SAVE FILEVrCS8300 L11:CL$:PC,0,11:"What name do you want to give the expansion? ";:INP,15,"-AZ-09 .-",1,NM$:X((NM$,1)):(X64X91)ĺ:"The name must begin with a letter.":|x ````l8|x0x0x| x0`0````0``0``v000` ```````ffffffxx x000000xx0x0xx0000 0``0 0x`0x |||| ||x|8l````|| x````8p`````lxx|| ` 8 x8x x<`x 0```xxxx| ```0``0`00`x000||0xxx||````` xxxxlUSJUSCNNOCNGCVSHSCECEPAUSHOOUNHOOSPACCWININkdkkkkkkkkkk#m-gxmmm*lmm5n`lllll~~~0` pvv0`0``0`000`~<~0000`` 0`xx0p0000xx 80,Ɉd`ɿɯ,p 詍0SɍpJ,p ,p0p@p) zp@p9p,p0 ,p0LoLo pLo ` ֩PyQ AL zppp`rpqp Rpqprp` ~L\pH)hJJJp` ` @BODFAFPARSNOJn Rp nco n Rp-cococo \pLnbodobo^` , g 掍p ,`o spp) p pp)p ߅ l eo ) L{?p,p0- HHHp hhh ɛn?p,?p?pPLAp?p,p  Fi`+ FiR("  Fi5880`L ppp`oppp ( spL3o {$0$ 掎pnp ,L o {$0LoN`o doLnbo nH-?npLLɈ􈩫Lɯzn 8ɀ   Lޤȱ 0:,јe湥 HH , LLB ?F<?F<>ݗ >ݛ?Ȑ۩`     :"Do not criticize what others write."CC$:30000 WIND,2:PC,0,14:"You can add to the journal over a period of days or weeks to let your ideas grow and change.":30000:PC:CEW^ |"Here are some topics you might want to write about in the class jou brainstorming."::"Use the guidelines below for this activity:":30000 X116:Y111:X264:Y215:14000:"Aim for quantity of ideas."CC$:30000:PC:CEW:"Try freewheeling."CC$:300001 PC:CEW:"Try to combine and improve ideas."CC$:30000:PC:CEWPC:CEW|"To begin this activity, use a paper and pencil to create a list of six nouns, six verbs, six adjectives, six adverbs, six prepositions, and three articles. These words will be used to construct a formula poem.":"Here are a few hints::"Lopsided triangles walk awkwardly":PC,20,4:"to the park."::"It uses this formula:":PC,20,8:"adjective noun verb adverb"PC,20,9:"preposition article noun."::"By "QO$"filling in"QO$" the formula, you can create an interesting poem.":30000:short nature poem:":PC,20,3:"The cool grass beckons":PC,20,4:"A rabbit hops quickly." :"It uses this formula:":PC,20,8:"article adjective noun verb":PC,20,9:"article noun verb adverb.":30000:PC:CEW P"And here is a crazy poem:":PC,20,331100 " MENUg 4EN$"":TI$"It Could Be Verse":SP8:PA$"":NO5:L1NO:MN$(L)TN$(L)::12000:w " EXISTING hEN$" use":TI$"Continued Formulas":PA$"":200:F04999 (ZNNO)İ10000  " INSTRUCTIONSY CL$:13000:"Here is a 00:NOF1:MN$(F1)"Return to It Could Be Verse":SP5:EN$" use":TI$"Continued Formulas":PA$"":12000:(ZNNO)299 CS1:NM$MN$(ZN)".FORM":MWL,0,0,NM$,IP,TL:IP0:PTTL + " MAIN PROGRAM LDN11:2100:DN(ZN5):ZN5000,6000,4000,7000::rd/":F2$"Press Control-B before you use each Find Command.":20000:919,1:NO5:L1NO:TN$(L)::902,2y 919,1:1000 " EXISTING ZD1:33000:FCN,".FORM",MN$,F CS0:F0ĺCL$:PC,0,12:"No formulas have been saved."CC$:30000:299t 170!  " PRODUCT:THE WRITE STARTA" PROGRAM:IT COULD BE VERSE^" PROGRAMMER:SK RUSSELLz(" COPYRIGHT(C)MECC19852" LAST UPDATE:85/04/17SKRd" INITe18000:APP,"COMMON.LIB"h nPN$"It Could Be Verse":FA$"Example: Find: /noun/your wo       ͳ v` 󅭿`H=D)hH=ɍ h`( цц`PTNU,T`(#:11:"THIS PRODUCT REQUIRES AN APPLE //E WITH 80 COLUMN CARD, //C, OR COMPATIBLE":"MACHINE."::"THIS APPLE IS NOT COMPATIBLE.":16368,0:16384,128:16368,0 } }:BS(P(P(999))1)16:BS1BS7BS6 }BS 6:BS1BS7BS6 }B02,0:902,0:910,1276 (940)129āI11000::9000 LL704:(4)"BLOADMECC$$DISK,A"LL:DC(LL36):953,SL:954,DR:955,VO:956,SL:957,(DRDC)1:958,0:DC3āZ02:956Z,(LL37Z): 975,255:(4)"BLOADSMALLRNH.OBJ,A38912":38912,"MENU":  HELLO(C)MECC,19850(85/09/26 CPE<232000:(4)"MAXFILES1":::P(X)(X)(X1)256:LP(P(999)):SL(L1)16:DR(L2):VO(L14):(4)"BRUNHELLO.OBJ":(941)489000 230,64:8192,"LOGO":16304,0:16297,0:16299,0:163  L0 CHECK CURRENT SETTINGS> JP1((PP)0)((PP)127)W JP2100,2200,2300:e 4DEFAULTS >5:"This diskette is currently set to the"::"default setting, which is to search"::"slots 1 and 2 for a recognizable card"::"each time the disk Return printer settings to their":CO,38:"original state (slot search)":p " 4. Test printer settings": " 5. Return to main menu" $::"Which number? ";:INP,(1,"-15",1),ZN$:ZN(ZN$) 8BOX:CO:ZN2000,5000,3000,4000,31040 BL00:):VSP:HSP,1' PN$"Printer Support"C 24576:BOX:CO:PN$CC$M MENU| Q10:Q220:Q3279:Q4191:WIND,Q1,Q2,Q3,Q4 L011:BOX:CO:"You may:": " 1. Check current printer settings": " 2. Change printer settings":K " 3. PROGRAM: PRINTER SUPPORT<PROGRAMMER: P. BOUCHARDYCOPYRIGHT (C) MECC 1983y(LAST UPDATE: 85/03/29 RPB 2HI-RES VERSIONdINITIALIZATIONxD$(4)::P(19):32000 ZU0:PP(948)(949)256:CA$(1):CC$(3):CL$(12):Q$(34                    :"The title must begin with a letter.":30000:L0W CF$".FORM":16000::NM$NM$CF$l (R)ZD1:ZW1:33000:CS0:MWS,TL,NM$:SD1'# (#"Read directions","See or use a program formula","Continue to fill in a saved formula","Print a formula poemX" PRINTFEN$" print":TI$"Saved Formulas":PA$"":200:F07999Z (ZNNO)İ22000`?q@" SAVE FILE~rCS83002L11:CL$:PC,0,11:"What title do you want to give the formula? ";:INP,15,"-AZ-09 .-",1,NM$:X((NM$,1)):(X64X91)ĺWIND:CL$:#p" PROGRAM FORMULASTI$"Program Formulas":NO3:L12:MN$(L)"Fill in Formula "(L)::MN$(3)"Return to It Could Be Verse menu":12000:(ZNNO)69998NM$"FORM"(ZN)".SEQ":ZD0:33000:MWL,0,0,NM$,IP,TL:IP0:PTTL:10000W an adverb."::"Find: / verb/ jumps/"CC$: "Continue to use the Find Command until you have replaced all the words in the formula poem with words from your list. You will probably end up with an interesting poem. It could even be verse!":30000 od: /noun/leaves/"CC$::"The cursor will jump to the word "QO$"noun"QO$" in the formula poem and you can decide if you want to replace it with your word."*:"To replace a verb, enter a space before the verb. In this way, you will not replace part of ";v"then a part of speech from the formula, then a slash, then a word from your list (from the same part of speech), followed by another slash."::"Press Control-B before you use each Find Command."30000:PC:CEW:"Here is an example: "::"Finreated your list, you can use the activity to "QO$"fill in"QO$" a formula using the Find Command. ";D"To use the Find Command, hold down the Control Key and press the F Key. You will see "::"Find:"CC$::"Starting at the cursor, type a slash (/), If you use singular nouns, use singular verbs; if you use plural nouns, use plural verbs. Use an appropriate number for the verbs (singular or plural). The support manual provides a handout that ";e"you can use.":30000:PC:CEW:"After you have cepare a diskette to hold "T$(U1)" created while using "N$".": "Whenever you need to make copies of a "T$(U1)" diskette, use "QU$"Copy a "T$(U1)" diskette."QU$" You should make backup copies of a "T$(U1)" diskette every time you make significant chane setup."QU$" ";"The rest of "N$" will use this information to make multiple disk operations as easy as possible for you.":30000>CO,0,27:CEW:CRĺ"If you need a new "T$(U1)" diskette, select "QU$"Create a "T$(U1)" diskette."QU$" This will prrive setup, and to ";:CRĺ"create and ";K{"copy "T$(U1)" diskettes.":"The current disk drive setup is displayed at the top of the "QU$"Diskette Support"QU$" menu screen. If that setup is not what you are using, select "QU$"Change the disk drivor help.":CO,ZX,ZYG.INP,(1,"-1"(4(CR))"?",1),Z$:Z$"?"İ19008Z$"?"Ĵ(Z$)((CR)((Z$)1))10000,15000,20000,31030B1000l)vCL$"Diskette Support Help"CC$:::QU$"Diskette Support"QU$" allows you to view and change the disk d Change the disk drive setup":CRĺ" 2. Create a "T$(U1)" diskette"%" "2CR". Copy a "T$(U1)" diskette":" "3CR". "CA$;:GCP,ZX,ZY:WIND,ZX,ZY,279,191:"Return to the "N$" menu":WIND):"Which number? "CA$;:GCP,ZX,ZY:CO,0,180:"Press ? fDV:35000 W XU bPS(953):PD(954):PV(955):DS(956):DD(957):DV(958)[ a  ZE8ė:12:"This "T$(T)" diskette is damaged.":30500:EF1:IS34: 32040  WIND:CL$"Diskette Support"CC$:200E$:"You may:"::" 1.0:ZEĺD$"INITHELLO"DT$:D$"DELETEHELLO" ZU0:ZE8įCO,0,140:"Unable to create a "T$(T1)" diskette from this diskette. Be sure that your disk drive door is shut.":30000: ZE32040   953,PS:954,PD:955,PV:956,DS:957,DD:958,["DF$"]":CO,ZX,ZY:INP,(M,I$,0),DL$:DL$""DL$DF$R @CO,ZX,ZY:DL$CA$;:CEL:X ^  ZU1:ZE0:ZEĺD$"BSAVE JUNK,A0,L1"DT$ ZE4įCO,0,162:CEW:"Please remove the write-protect tab from this diskette.":30000:CO,0,162:CEW:410* ZE disk drive"::3 :" two disk drives":: " "CA$;:GCP,ZX,ZY:WIND,ZX,ZY,279,191:"a special disk drive setup ";:"(data diskette in slot "(S37)", drive "(S38)", volume "(S39)")":WIND + ,4 6L$CA$;:GCP,ZX,ZY:CO,115,ZY:"NDISKUTIL.OBJ"7 S16064:S016000:RFL,"MECC$$DISK"Sc K64((941)63):ZSS:38000:N$ZN$:600 U11:T$(0)"program":T$(1)"data":T$(2)"backup" 901,1:1000  CO,0,27:"The current setup selection is:":(S36)1220,230::" oneZ-" ANDY HOLLENBECK+(" (C)MECC1984?2" 85/08/19 RPBRd901,0:32000xf:(4)"MAXFILES1":16000:230,64iCR1kPN$"MECC Write Start":UP$"COMPOSEUTIL.OBJ"nD$(4):CA$(1):CL$(12):CC$(3):QU$(34) x35000::24576:D$"BRU                РР̠ŠРР̠Š Р̠ŠРР̠Š ŠРР̠ŠР РР̠Р ̠ŠР ŠРР̠ŠР РР̠ŠРР РР̠ŠРР̠Š Р̠ŠРР̠Š ŠРР̠ŠРР̠Š Р̠Š̠Š ̠ŠРР̠ŠРР ̠ŠРР  11:" Printer test complete.":30000]WIND:CO:"Printer Support"CC$:WIND,Q1,Q2,Q3,Q4:rSET NEW OPTIONS3:"You may use:"::" 1. An Apple Communications Card":2" 2. "CA$;:GCP,ZX,ZY:WIND,ZX,ZY:"Any other type of printer i7200 30000:'TEST THE PRINTER\BOX:9:"Please prepare your printer...":30000CL$:9:"Testing the printer...":D$"IN#0":D$"PR#0":PINIT:"Printer Test":I13:J3295:(J);:::J96127:(J);:::::FEED%POFF:24576:,1: PRINTER TYPEe :" Type of printer:":HSP,2::7:L120:((PP106L));:::HSP,1:~ RETURN TO DEFAULTS  8:"Now returning the printer settings to"::"their original state (slot search)..." I0127:PPI,0: SC0:ZU1:" Commands:"::CT2:HSP,2@t L115:(PPCT)0L15:2470u~ 7:"PRINT "(34)CA$;:L211:P(PPCT):CTCT1 Z(P0P13P32):ZPP64::GCP,X,Y:BOX,X1,Y1,X6,Y7,3 L2(P13):PP21L2:(P)CA$;::ZįCO,X9,Y L2: L1:HSPally ";SD;" characters per second)."? ::(PP107)0İ2500L 30000:Z USER SET  CO:"The current printer settings are:"  :" Slot: ";(PP)128:  (PP2)0İ2400 $ (PP107)0İ2500 . 30000: ` PRINT SPECIAL COMMANDSj ette is started up."! H30000:0 COMM CARD 3:"This diskette is currently set up to":"expect an Apple Communications Card":"in slot #";(PP);".": SD$"LOW":SD10:(PP2)127SD$"HIGH":SD30$ 7:"The speed is set to '";SD$;"'":"(usucurrent values (or the default values if no current values exist) displayed to the right.":30000g.m..ZC(S36):ZC3Ĺ956,(S37):957,(S38):958,(S39).ZC3Ĺ956,(953):958,254:ZC2Ĺ957,3(954).ZC1Ĺ957,(954)C/:,SL:S38,DR:S39,VO[+ |.M.CL$"Special Disk Drive Setup Help"CC$:.:"To change the slot, drive or volume of the drive to hold the "T$(U1)" diskette, type the desired number and press return. ";a."Pressing return alone will accept the ume: ":DF$((958)):300:VO(DL$):VO255VO254:CO,ZX,ZY:VO[+DL$"?"İ11900:11010+CEW:CO,0,99:CEL:CO,0,90:CEL:N$" will look for your "T$(U1)" diskette in:":CO,0,153:"Is this correct? ";:36000:CO,0,144::CEL:Z$"N"11015R+S37,CEL::CEL:"Where will your "T$(U1)" diskette be?"+:M1:I$"-37?":L$" Slot: ":DF$((956)):300:SL(DL$):DL$"?"İ11900:11010+M1:I$"12?":L$" Drive: ":DF$((957)):300:DR(DL$):DL$"?"İ11900:11010@+M3:I$"-09?":L$" VolU1)" diskette will be located. ";-*300003*9*+CL$"Special Disk Drive Setup"CC$:::"Your PROGRAM diskette was started from:"::" Slot: "(953):" Drive: "(954):" Volume: "(955)+CO,0,180:"Press ? for help."4 +CO,0,90:er one or two floppy disk drives. ";*"If you have a different setup (such as a hard disk or more than one controller card), use "QU$"Select special disk drive setup."QU$"*:"This option will ask you for the slot, drive, and volume where your "T$( now replace your write-protect tab.":300002s'8*f*CL$"Change Disk Drive Setup Help"CC$::*"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 eithCO,0,180:"Press ? for help.":CO,ZX,ZYWB'INP,(1,"-14?",1),Z$:Z$"?"İ10900:10010jG'(Z$)410099L'SC(Z$):SC3İ11000Q'S36,SC:T0:ZD1:WP1:34000V'D$"BSAVE MECC$$DISK,A"S",L$28"D1$,o'12000:35000:600:WPĺCL$:CO,0,89:"You mayges to it."30000:''CL$"Change disk drive setup"CC$:200::"You may:"::" 1. Select one disk drive":" 2. Select two disk drives":" 3. Select special disk drive setup"'" 4. Make no change"($':"Which number? "CA$;:GCP,ZX,ZY: " WRITE START#" WARM-UP5" SK RUSSELLH(" (C)MECC1985[2" 85/05/10SKRgd" INITe20000:APP,"COMMON.LIB"nPN$"Word Processing Warm-up":20000:919,1:L13:MN$(L)::902,0:P0:1000 ,T$"He laid down his money, tucked thns","Use Tempting Tidbits","Print Tempting Tidbits","Return to Sharing Menu"aeturn to Sharing Menu" ase","Return to Sharing menu"":SD1:;(#"Read directions","Use Tempting Tidbits","Print the data base","Return to Sharing menu","Save your changTempting Tidbits","Return to Sharing menu"ns","Return to Sharing menu" "Return to Sharing menu" "Print Tempting Tidbits","Return to Sharing Menu""Read directions","Use Tempting Tidbits","Print Tempting Tidbits","Return to Sharing Menu""ctioyou know it. ";X "You may want to add your name to your entry.":30000:CL$:WIND,1^ ok X" PRINTx GSİ200 22000: @" SAVE FILE JZD1:ZW1:33000:MWS,TL,"TEMPT.SEQ" SD1:* (#"Read directions","Use Tempting Tidbits","Print this activity to collect and share these insights with your classmates. Two examples are already listed in the activity."; " Use the Down Arrow Key to scroll through the entries."::"When you write entries, include the source of the information if seven times.":"When you finish these directions, press Control-N to go on to the next screen. To press Control-N, hold down the Control Key and press N.":600:IPIR:TLLTOTI$"The Delete Key":500:"It is easy to erase what you typed by using PART I0LG$"-MBEFLOPQRSWXVZ+N":IP0:TL0:P0TI$"The Cursor":500:"To use this word processor, you can just start typing. Each letter will be displayed at the location of the cursor (the blinking rectangle). For now, type the letter "QO$"j"QO$"arm-up shows you how to delete words and paragraphs, how to move words and paragraphs to a new location on the screen, and how to use the Find Command.": H "You may press the Escape (Esc) Key twice at any time to quit the Warm-up.":30000 " ies, word processing will become much easier!": "Part I of the Warm-up shows you how to use the Shift, Caps Lock, Return, Space Bar, Delete, and Arrow Keys. It also demonstrates the wraparound feature of the word processor." :"Part II of the W  CL$:X10:Y10:X279:Y221:14100:PN$CC$::"This Warm-up introduces you to the word processing commands you will use in the activities on this diskette. ";0 N "Don't worry if some of these commands seem confusing at first. As you use the activit1:15000:"Control-N for Next Screen":5:12(2P):MW,70,8(2P),IP,TL,IR,LT,MC:M80:MC2731000h bo " L3000:DN11:2000:DN(ZNNO):ZN4000,6000::31100 " MENU 4TI$PN$:PA$"":NO3:SP8:12000: SD1:NO3:ZN3: " INSTRUCTe hammock under his arm, and headed for his apartment building. What would he do with a hammock in a one-bedroom apartment?":MWADD,0,0,T$,IP,TL: CL$:D$"PR#3"::M80:TI$CC$::b XUNHOOK:X(0):MWTC,"N":MWLEG,LG$:MWDBR,1::10(2P):15000:2ts":PA$"":NO4:12000: " CL$:13000:"Everyone has something worth sharing--a favorite quotation, a song lyric, a discovery or insight, an amusing bumper sticker--";{ P"something that makes you laugh or think.":30000:PC:CEW:"You can use X0āL0X1:FD(X$(L)"TEMPT")FD:E IP0:TL0:(FD)ZD0:33000q MWL,0,0,"TEMPT.SEQ",IP,TL:PTTL:IP0: " MAIN PROGRAM LGS1:DN11:2000:DN(ZNNO):IP0:ZN5000,10000,7000::31100 " MENU 4:L14:MN$(L)::TI$"Tempting Tidbi+ " MECC WRITE START1" TEMPTING TIDBITSC" SK RUSSELLV(" (C)MECC1985i2" 85/05/02SKRud" INITe18000:APP,"COMMON.LIB"nPN$"Tempting Tidbits":20000:L14:MN$(L)::902,1:919,1:1000ZD1:33000:FCN,".SEQ",X$,X$ ZN(902) ZN300,400,8000$ , 6NP5:N6:TI$"Sharing Menu":L1NP:MN$(L)PG$(L):CN$(L)PG$(L5)::MN$(N)"Return to the MECC Write Start menu":2000:24:"or":28:N". "MN$(N):3000:AN31000 @4000  NP5:N6:TI$"Experimenting Menuբ y L9 y `w mwwxx ywxx `Uz_j`S縎X]`Εϕ ߅$0Εϕ  c`Lv { (^_ <= ޤ<=LL ]LEE:ljH`upport":NN1:4(N9):S(6)N:N". End"f :"Which number? "CA$;:GCP,ZX,ZY:9000:WIND:A1Ĺ902,3x AS(1)İ7000 A3Ĺ902,1 AS(2)A1F1$"the management options":F2$"MANAGEMENT":902,0 A4Ĺ902,2Z AS(3)F1$"Printer Support"N$TI$CC$:CO$:GCP,ZX,ZY:WIND,ML,ZYSP,270:CO:"Activities"; ":"::L1NP:4(L9):L". "MN$(L):::"Options:"::NNP1:4(N9):S(1)N:N". General Information"' *NN1:4(N9):S(3)N:N". Printer Support":NN1:4(N9):S(4)N:N". Diskette Sɍ lh`9: ߅$09:  c`Lv ȉ` mͳ   ފ `PINIPOFPACF lÉĉlj``6L6786H7HÉ6ĉ7,lj0 6ɍ L!$Hʼn8$Ɖ$ 96  @ 9$Ɖhi6$ʼn6Éh7h6876`ɍɌ Ɖͳ Ɖ` C`H)hH?)8鍸ζ`H88HH?<>?>,>$f<<`S 8$H)h0,0RLÉĉ67  ĉÉʼnʼnlj,5S,N 󹖋9I7op߭ ties, you need to learn how to use the word processor's commands. To help you learn these commands, you can:":&4!X120:Y18:X260:Y219:14000:"Choose Option 2, Word Processing Warm-up, on the main menu."::"This option shows you how to use the word 4000V : "experiment with language."CC$:30000:X1X13:Y1Y12:Y2Y22:X2X23:14000 l "explore thoughts and ideas."CC$:30000:X1X13:Y1Y12:X2X23:Y2Y22:14000:"expand your creativity."CC$:30000:WIND,2:PC:CEWp "To enjoy doing the activirted "CC$::WIND,2:"The activities on this diskette will help you use word processing in unique ways. You will be able to:"::30000  X110:Y18:X262:Y212:14000:"communicate and share ideas with friends.":30000:X1X13:Y1Y12:X2X23:Y2Y22:1L". "MN$(L)::: S :"Which number? "CA$;:INP,1,"-16",1,A$:A((A$)):^ " RUNi 24576 A0ANPF1$MN$(A):F2$CN$(A) WIND:CL$:PC,0,12:"Getting "F1$"...":RNH,F2$  @ CL$:13000:WIND,1:PC,0,2::" Getting Stare you making these"::"settings for? ";:INP,(20,"- z",0),P$:LP(P$):LP0ıvnL1LP:PP106L,((P$,L,1))::pSET COMM CARDzBOX:3:"You may use:"::" 1. High speed (usually 30 cps)"::" 2. Low speed (usually 10 cps)"*:"Whichnterface card (such as a serial or parallel card)"|WIND,Q1,Q2,Q3,Q4:::"Which number? ";:INP,(1,"-12",1),Z$:ZN(Z$)ZN6000,7000PP1,66:BOX5200:ZU1:SC1:7200PID FIELDZL120:PP106L,0:Od7:"What printer arnal:":30000:::"What would you do today if you got a sudden day off from school?":30000: "What kinds of inventions do you think our world needs?":30000::"What is the best movie you've ever seen? Why?":30000:0D"What if everyone lived to":L1NP:MN$(L)PG$(L10):CN$(L)PG$(L15)::MN$(N)"Return to the MECC Write Start menu":2000:24:"or":28:N". "MN$(N):3000:AN31000 4000  CL$:13000:PC::" "TI$" "CC$: WIND24,4::"Activities"; ":"::L1NP:28(L9):`ժՖՖխժժժժխՖխժCBCPRDDFILNOFILRFRNSNOPRSPRSEϕ/h{U_jSX]P7 ` `@ i @ ȱ z`,#` {ݩD ^ D`_D`ED`7P `7P( ` ʊ C` &L`L 䎱 ȱL ȱ8쭠8ȱ>? :p"g>h? %p ʘg^h_^`ȱ^Șe^^_iȑ^^_]\[@A W  G# { RPQ . ,L ʘLl`Q ːeD_E`BcCd@eAf>g?h $ )ʘ e,L׭XLXLX ˘$)ʘg>h? pʘ G 8`Lg8hegiȱehj8 " J, ` " P, L m?> m=<8?. e<&8>!>> g R>P>Q .?=<`L #H h`STɶST` ST` L ː\D_E`BcCd@eAf>g?h $ erimenting menu""perimenting menu" turn to Experimenting menu"ou",ll, I had a lot of freinds--but Melissa was the craziest freind of all!":MWADD,0,0,T$,IP,TLn'LG$"+F":600t'W'(#"Use Part I","Use Part II","Return to MECC Write Start menu"@IP,TL'LG$"+F":600'W((#"Use Part I","Use Part II","Return d let the screen fill up with two or three lines of D's. Note that the letters automatically wraparound from one line to the next."LG$"-MBEFLOPRSWXVZ":IP0:TL0:600:TI$"The Space Bar":500:u"You have used the Space Bar to put a space betweenIP0:TL0:600:500"Press the Caps Lock Key again so that it is in its upward position. Type the words "QO$"lower case."QO$" The letters will be displayed in lower case.":IP0:TL0:600TI$"Wraparound Feature":500::"Hold down the D Key ane Shift Key and type the letter "QO$"K"QO$" five times. The letters will be displayed in upper case.":IP0:TL0:600TI$"The Caps Lock Key":500:"Press the Caps Lock Key so that it is in its downward position. Type the words "QO$"UPPER CASE."QO$the Delete Key. Find the Delete Key at the top right side of the keyboard. ";"Press the Delete Key to erase the letters that you typed.":600uTI$"The Shift Key":500:"Find the Shift Key on the right or left side of the keyboard. Hold down thes","Print the data base","Return to Tempting Tidbits Menu"e Journal","Print the Class Journal","Return to Sharing Menu"trnal","Return to Sharing Menu"ions","Use the Journal","Print the Class Journal","Return to Sharing Menu","Save your changes","Print the Class Journal","Return to Class Journal Menu"Lu"rnal","Return to Sharing Menu"nu"aeturn to Sharing Menu"Ppare your printer...":30000PINIT:CFPP,4,58,4,5,70,5,0:5:1:FPRT,B1:POFF?@" SAVE FILEWP1:ZD2:T1:33000:MWS,TL,"CLASS.SEQ":SD1:<(#"Read directions","Use therections","Use the Class Journal","Print the Class Journal","Return to Sharing menu"n to Sharing menu"haring menu"turn to Sharing menu"sal","Print the Class Journal","Return to Sharing Menu"Xg Menu":the Class Journal","Print the Class Jou be at least 200 years old?":30000:CL$:WIND,16oCX" PRINTCL$:200:PC,0,12:FDĺ"There is no file saved for Class Journal."CC$:30000:7999 22000?@" SAVE FILEJZD1:ZW1:33000:MWS,TL,"CLASS.SEQ"SD1:T(#"Read di:12:"Reading from "T$(T1)" diskette...":SET,2:QSIS4:QS34QS34m$_NZU1:ZE0:ZEįDR,IS,0QS,1516384$`NZEİ700:20076$aNK64QS34ZEįDR,5IS,07IS,1553248$bNZEİ700:20076$cNZD1:T2:WP1::345002%dN:12:"Writing to backup diskeT$",S"((953))",D"((954))",V"((955)):SPRO,PT:400:ZEİ500:#YNIB(ID1)256(ID0):16128,IB:ZU1:ZE0:ZEįDW,34,1534,1516128#[NZU0:ZEİ700:20078#\NUNHOOK:901,2:::FILT:EF0#]NIS0345(3K64):TT1:ZD2:WP0::34500E$^NC2ĺ" and your "T$(T1)" diskette";3"CN".":30000~"ENDC2TT1:ZD2:WP0:34000:PTZP:ZU1:ZE0:ZEįDR,34,1534,1516128"FNZU0:ZEİ700:20078"GNID(16128)"HNZD1:39000"RNOKİ500:H#WNCL$:CO,0,89:"Preparing your backup diskette...":D)1S!NCO,0,27:CEW:CO,0,90:"Please insert your backup diskette";:(S36)2ĺ" in drive 1 and your "T$(T1)" diskette in drive 2";#"@N(S36)3D0,72:"Copying a "T$(T1)" diskette will erase whatever information is currently on the backup diskette."::"Do you want to continue? ";:36000:Z$"N"İ500:!;NDC(S36):DC3ĺCL$"Special Copy Setup"CC$:Q$"backup":21000:Q$T$(T1):21000:DC(D1$D2$,0AD7:S,T1:D$"BSAVE MECC$$DISK,A"S",L$28"D2$:S,0=::CO,0,81:CEW::"This diskette is now prepared to handle "T$(T1)" from "N$".":30000:ZU1:ZE0:ZEĺD$"VERIFY LOGO"D1$:ZU0: N*NT1U1:CL$"Copy a "T$(T1)" diskette"CC$ 4NCO,O,0,89:"Now creating a "T$(T1)" diskette..."P:DT$D2$:SNOPRO:400:ZE15099:ZSS:38000:CBS,ZN$".",AD:ZU1:ZE0:ZEįDW,0,00,0AD:ZU0:ZEįDW,0,00,0AD:AD16128:DR,17,017,0AD:AD60,255:AD61,255:AD64,255:AD65,255:DW,17,017skette that you will use for storing "T$(T1);:(S36)3ĺ" in the drive":"located at:"::" Slot: "(S37):" Drive: "(S38):" Volume: "(S39);:(S36)2ĺ" in drive 2";:".":30000:ZD2:39000:OK15099-:CO,0,27:CEW:Cto MECC Write Start menu"t menu"Aind"QO$;u($" by pressing the Space Bar. You can stop by pressing S.":600{(W((#Directions,"Part I","Part II","Return to the main menu"P the words "QO$"UPPER"QO$" and "QO$"CASE."QO$" You can also use the Space Bar to push characters across the screen.":"Press the Space Bar to push the sentence across the screen. Then use the Delete Key to erase the spaces."0"T$"A rolling stone30000:L0. CF$".EXP":16000::NM$NM$CF$Zl (R)ZD1:ZW1:33000:CS0:MWS,TL,NM$`'#(#"Read directions","See or use program sentences","Continue to expand a saved sentence","Expand a new sentence","Print an expanded sentence","Return to Exp'B'GSİ200:GS0Gt'Q11:11000:TLLT:IPIR:MC4İ5000:Q0'MC17Q1:CL$:PC,0,12:"Do you want to save your changes? ";:30100:Z$"Y"İ21000:OKİ8000:RR0:10200 (MC17Z$"N"ĺCL$:PC,0,12:"Do you want to print the current fil1000 " EXISTING7 ZD1:33000:FCN,".TUNE",MN$,F CS0:F0ĺCL$:PC,0,12:"No tunes have been revised."CC$:30000:299 17000:NOF1:MN$(F1)"Return to Name That Tune menu":SP5:12000:(ZNNO)299 CS1:NM$MN$(ZN)".TUNE":MWL,0,0,NM$,  " PRODUCT:THE WRITE START>" PROGRAM:NAME THAT TUNE[" PROGRAMMER:SK RUSSELLw(" COPYRIGHT(C)MECC19852" LAST UPDATE:85/05/10SKRd" INITe18000:APP,"COMMON.LIB" nPN$"Name That Tune":20000:919,1:L16:TN$(L)::902,2::T1U1:CL$"Create a "T$(T1)" diskette"CC$:CO,0,72:"Creating a "T$(T1)" diskette will erase whatever information is currently on the diskette."::"Do you want to continue? ";:36000:Z$"N"15099-:CO,0,18::CEW:CO,0,73:"Please insert the di !"      the write-protect tab":"from your "T$(T)" diskette.":WP2:30500:34505S1'ZU0:Y11̈D1$",S"((953))",D"((954))",V"((955))1ֈD2$",S"((956))",D"((957))",V"((958))111(1);:GCP,ZX,ZY@2CO,ZX,ZY:INP,(3,"YES2ĺ" in drive "ZD;y0↭ZC3ZL953(ZD2)3:" in the drive":"located at:"::" Slot: "(ZL):" Drive: "(ZL1);0".":30500:345050 WP345990DR,17,017,016128:ZE0:ZEįDW,17,017,016128H1WP(WP1):ZE4ė:12:"Please remove įDR,34,1534,1516128:ZEįRFL,"MECC$$DISK"ZS:38000:(T0)(TZT)(N$ZN$)34570/ц(T2)((T1ZT)ZE6)(16128)IB34570/Ԇ(TT1)((T1ZT)(ZE6ZP1))(16128)ID345700؆:10:"Please insert your "T$(T)" diskette":"for "N$;:ZC(S36):ZC:ZE0:ZEįDW,17,017,016128. WP(WP1):ZE4ĺCL$:CO,0,89:"Please remove the write-protect tab from your "T$(T)" diskette.":WP2:30000:34005.3ZU0:.Ć.ɆZU1:SET,ZD:ZSS0:CPRO,ZP:ZPįCPRO,ZPT/ΆSPRO,ZP(ZP):ZE0:ZT1:SET,ZD:ZE$:CO,0,89:"Please insert your "T$(T)" diskette for "N$;:ZC(S36):ZC2ĺ" in drive "ZD;-ZC3ZL953(ZD2)3:" in the drive":"located at:"::" Slot: "(ZL):" Drive: "(ZL1);-".":30000:34005-WP34099.DR,17,017,016128ZPįCPRO,ZP[,ڄSPRO,ZP(ZP):ZE0:ZEįRFL,"MECC$$DISK"ZS:38000:(TZT)(N$ZN$)34070,߄(ZE6ZE0)ZP1TT1ZE0:34070,䄺CL$:CO,0,73:ZVZE7ĺ"The volume number of this diskette does not match the current setting.":30000[-ZV(ZE7):CL+F}UNHOOK:FILT:::12:1+P}"Error "ZE" at line #"ZN:"in Diskette Support."::"Please report this error to MECC.":30500+U}500:ZU1:ZE0:ZEĺD$"VERIFY LOGO"D1$+Z}T0:ZD1:WP0:34500::12:31060+Є ,ՄZU1:SET,ZD:ZSS0:ZV0:CPRO,ZP:E0:ZEĺD$"VERIFY LOGO"D1$:*@yZU0:T0:ZD1:WP0:34000Q*JyZU0:CL$:CO,0,89r*Ty"Getting the "PN$" menu..."*^yNOFILT::901,0:(4)"RUNMENU"D1$*}* }ZE(222):ZN(218)(219)256::(4)"CLOSE"*}ZUZE0ZE16Ħ*(}*<}ZE25531000$)8w"SPACE BAR";::" to continue";j)Lw16368,0:16384,128:ZP(16384):ZF(ZF1)(ZP155):ZF231000)VwZP160ZP14130540)`w16368,0::)y)ySPRO:(901)Ĭ)y500:(901)2T0:ZD1:WP0:34500::) y54915:1000*6y500:ZU1:Z,0,(48YY)9:"Copy will look for your "Q$" diskette in:":CO,0,(118YY)9:"Is this correct? ";:36000:CO,0,(118YY)9(DRCEL:Z$"N"įCO,0,(48YY)9:CEW:21010(kR(0u(:u:SPACE::($w(.wZF0:24:1:868:7:"Press ";:(64435)6Ğ":L$" Slot: ":DF$((OS)):300:OS,(DL$)q'&RM1:I$"12":L$" Drive: ":DF$((OS1)):300:OS1,(DL$)'0RM3:I$"-09":L$" Volume: ":DF$((OS2)):300:(DL$)255DL$"254":CO,ZX,ZY:DL$'5ROS2,(DL$){(:RCEW:CO,0,(58YY)9:CEL:CO0:ZD1:WP0::34500::12:"One moment please...":901,1:NOFILT:D$"BRUN PPRINT.OBJ"D1$:D$"BRUN DISKUTIL.OBJ"w&N}&R&RYY(Q$T$(T1)):OS9533YY:CO,0,(108YY)9:CEL:CO,0,(58YY)9:CEL:"Where will your "Q$" diskette be?"/'R:M1:I$"-37tte...":SET,1:ZU1:ZE0:ZEįDW,IS,0QS,1516384F%fNZEİ700:20076r%hNK64QS34ZEįDW,5IS,07IS,1553248%jNZEİ700%lNZU0:IS%nNZ$"is":EFZ$"could not be"%pN:11:"The copy of your "T$(T1)" diskette":Z$" finished.":30500q&zN500:T in the special commands for your printer. Type an extra 'RETURN' when you have finished."sL111:CT1:HSP,2L215:42L2:6:CA$;:CEW:"PRINT "Q$CA$;:GCP,QX,QY:8000S$""Ģ42L2:1:CA$;:CEW::L25S$""İ9000:CTCT1:PPCT,. (Most commonly 1 or 2.)"wl9:"Which slot is your interface card in? ";:INP,(1,"-17",1),ZN$:ZN(ZN$):PP,128ZNv13:"Does your printer require any special commands? ";:36000Z$"N"ĹPP2,0:PP3,255:PP4,255:[BOX:CO:"Please type number? ";:INP,(1,"-12",1),ZN$:ZN(ZN$)?PP2,128(ZN1)14:"Which slot is the communications"::"card in? ";:INP,(1,"-17",1),ZN$:ZN(ZN$)PP,ZN:XNOT A COMM CARDbBOX::4:"The printer interface card may be in any slot 1 - 716:Y18:X262:Y215:14000:"Row, row, row your boat":"Gently down the stream":"Merrily, merrily, merrily, merrily":"Life is but a dream.":30000>PWIND,2:PC:CEW:"You can give old songs a fresh sound by substituting new words. Start by changing Y.SEQ"6 ZD0:33000:MWL,0,0,NM$,IP,TL:PTTL:10000< L " CONTINUE hEN$" use":TI$"Revised Tunes":PA$"":200:F04999 (ZNNO)İ10000  " INSTRUCTIONS CL$:13000:"Here are the lyrics from a song you probably know:" X1 write lyrics for" NO4:MN$(1)"Twinkle, Twinkle, Little Star":MN$(2)"Row, Row, Row Your Boat":MN$(3)"Mary had a Little Lamb":MN$(4)"Return to Name That Tune menu":12000:ZN43999 ZN1NM$"STAR.SEQ" H ZN2NM$"ROW.SEQ" ZN3NM$"MARIP,TL:PTTL +% " MAIN PROGRAMh LDN11:2100:DN(ZNNO):ZN5000,3000,4000,6000,7000::31100t " MENU 4SP8:EN$"":NO6:TI$"Name That Tune":PA$"":L1NO:MN$(L)TN$(L)::12000: " PROGRAM TUNES  TI$"Program Tunes":PA$"":EN$");CA$;#K:Q$:CTCTL#60uSPACE BAR ROUTINEG:u:SPACE::[yENDING ROUTINE"yWIND:CL$:10:"Do you want to try again? ";,y360006yZ$"Y"Ĭ@yCL$:10:"Getting the menu program..."::D$"RUN MENU"}ERROR PROC.& }ZE(22#R$"":LJR$(S$,LJ)*x#S$L$(X)R$<#LKLJ:9110C#JJ#K#XQX:YQY:CO,X,Y:CA$;:0:50,Y1279,Y1:CEL:L(S$):K1L#A((S$,K,1)):PPCTK,A:A32AA64::GCP,X,Y:BOX,X1,Y1,X6,Y7,3:(A);CA$;::CO,X9,Y:9150#(AOX,X1,Y1,X9,Y7,0:CEL:L18010:S$(S$,L1):8020M(#SCAN FOR CHR$c2#L(S$):L79120<#K1L6:(S$,K,5)"CHR$("9110F#JK6L:(S$,J,1)")"9100P#X$(S$,K5,JK5):X((X$))Z#X0X127X0d#L$"":K1L$(S$,K1)n:INP,(0,I$,0),C$:A(C$):A13Ĺ16368,0:?^(A8L0)8010MhA88080arA34L198020|A32AA64::BOX,X1,Y1,X6,Y7,3:(A);CA$;::P(L1)9:XX9:S$S$C$:8020(A);CA$;:GCP,ZX,ZY:P(L1)ZXX:XZX:S$S$C$:8020#XXP(L):Bb from the program diskette.":30000:BOX:SC7200:CO,0,83:"Now returning the printer settings to their original state (slot search)...":72004ZU0:ZE32030>@STRING INPUTJS$"":16368,0:XQX:YQY:I$"-"(1)(127)+TL(S$):CO,X,Yyou want to erase it? ";:36000:OK(Z$"Y")16G6MECC$$DISK FOUND6Ƙ38000:CO,0,73:ZTĺ"This is the "ZN$" diskette.":::"Please choose another diskette for use.":30000:OK0::7И"You are about to erase a "T$(ZT)" diskette for "ZN$".":::"kette for "ZN$".":::"Are you sure you want to do":"this? ";:36000:OK(Z$"Y")X5 sure you want to do":"this? ";:36000:OK(Z$"Y")5 $";:36000:OK(Z$"Y")5 P:::"This appears to be a MECC "Z$" diskette. Are you sure be a MECC "Z$" diskette. Are you sure you want to erase it? ";:36000:OK(Z$"Y")Y4_44Ƙ38000:CO,0,73:ZTĺ"This is the "ZN$" diskette.":::"Please choose another diskette for use.":30000:OK0:R5И"You are about to erase a "T$(ZT)" dis,ZP:ZU1:ZE0:ZS640:ZEįRFL,"MECC$$DISK"ZSN3vCO,0,27:CEW:ZEİ39100:3ZU1:ZE0:Z9503ZD:ZEĺD$"VERIFY LOGO,S"((Z))",D"((Z1))",V"((Z2))3Z$"program":ZEZ$"data":ZP1OK1:S4CO,0,73:"WARNING:":::"This appears toNOyesno",1),Z$:Z$(Z$,1):Z$"Y"Z$"y"Z$"N"Z$"n"36020^2(Z$)100Z$((Z$)32)d2j2py2zZN$"":Z12(ZSZ)0Z36ZN$ZN$((ZSZ)):ZZ1:380202ZT(ZS)2Ӕ2X2bSET,ZD:CPRO,ZP:ZPįCPRO,ZP:ZPOK1:.3lSPRO135L2:CTCT1:PPCT,0:PPCT1,255:PPCT2,255pHSP,1:17:"Are the above commands correct? ";:36000L1(Z$"Y"):L1 ZE0:ZEĺD$"BSAVE PRINTER COMMANDS.BIN,A"PP",L128"*ZE4įBOX:CO,0,83:"Please remove the write protect ta gathers no moss.":MWADD,0,0,T$,IP,TL:IP0:600,TI$"The Return Key":500:"You can use the Return Key to move the cursor to the beginning of the next line. Press the Return Key several times. Then use the Delete Key to erase the lines and return tothis activity, you will see the original words at the top of the screen. It is easy to use the word processor to delete old words and insert new words."h:"You can also use the Find Command to find and replace words in the song. To replace the word "e":30000fJWIND,2:PC:CEW:"Continue in this way until you have a totally new song.":Y215:14000c"Fly, fly, fly my plane":"Quickly through the air":"Zoom, glide, zoom, glide":"I haven't got a care.":30000:WIND,2|PC:CEW:"When you use a single word, then work forward and backward from that word";" until you have a new song."::X118:Y18:X260:Y219:14000 "Row, row, row your boat becomes:"::"Row, row, row your ";:"plane"::"which becomes:"::"Fly";:" fly, fly your plan tf%%h $20 Lc $ aHaH`6eeeWeeefBfsffffgggg(bb, 7e gc,g i"g$20 6hNO0 b@íH bhH ,aɈ5hH gcb% i)H fh "g$20 6h gc Cf,bbh` gD# 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! <!=!< =Ѝ ,    `$```L` ccԍb q$% `@ ?aDa6 ,-gL?cLfHa bHaa,,aaɠ,ra ` a欅aah,`ɀ)?  @IH gc$ 7e Cf$%0 7e ! !!      the starting point."6IP0:TL0:600:500:"Type your name and press the Return Key. The cursor will jump to the far left side of the next line. Add your street address and press Return. Add your city and state and press Return.":600@TI$"The A嬠嬠 ɠ 嬠嬠 ɠ ,0:FPRT,B5:30000:u0:MWBUF,B5,B6,B7,B8:MWL,0,0,NM$,IP,TL:M80,Xwb%CFPP,5,18,2,1,80,5,0:FPRT,B5:30000:M40:Miss","Print Too Good to Miss","Return to Sharing menu",title,author's name,date of publication,genre (type),word or phrase,reviewer's name(phrase,reviewer's nameord or phrase,reviewer's names name)rd or phrase,-reviewer's nametS```%g穀,g +g`%g3&g'%g%g ``) ``%gʽ`) ` `%gH`mS` *eS`)e`e ie 6he}`m%g8#g$g`+g` 7eL?c,0*`%%g ڠȠȠ ҠӠȠ٠Ġ ǠĠ Ǡ (g#g&g$g'g,gh`%g "gS```em#g#g$g)g *g`em)g)g*g`) %g+g)g*g$g#gO,0 `)  7e`+g(`HH%g,P#g88`&g d fhLc%gH+gH(g%g,P d fh+g8h+g%g)g#g*g$g+g``S`!!!ˆ놹6̆` ` N c N`L N O P Q dN` f UmWXYZ l `/>?R N>?2ȱ쨊 NLԠ S S އSi#ǍSLRLNTȌUiULɠVe? ";:30100:Z$"Y"İ220001 <(MC18İ18000:Q0B (MC2731000J *: *UNHOOK::::3:41((TI$))2);TI$:FA$""ĺFA$ *+F2$""ĺF2$ \+15000:21:15000:MS$ +MWBUF,B1,B2,B3,B4:MWTC,TC$:MWLEG,"-MPSLNO+BEFQRWXVZ":1:5:MW,70,16,IP,T ⬠ Ԡ Ԡ  Ǡ ŠĠ Ġ卍c i "g$20 L6h,o 8ɀ   LX8e湥 pHpH ,L`@ @ʩ WRPT` J  *eȱȱȱ` i%gH) #,,g h`` %g a picture","Return to Experimenting menu">%" DISPLAY FILE&%WIND:ZD0:33000:MWBUF,B5,B6,B7,B8:MWL,0,0,NM$,G1,G2:CL$N%CFPP,0,18,2,1,79,79,0:FPRT,B5,1,J2,J3:MWBUF,B1,B2,B3,B4:30000::5,B6,B7,B8:MWL,0,0,NM$,IP,TLN%CFPP,0,18,2,1,80,5to Experimenting menu"umenu"perimenting menu"0rn to Experimenting menu"tu"e a Go with the Flow","Print a Go with the Flow","Return to Experimenting Menu"e"! ,TL,NM$:SD1'#(#"Read directions","See or use program tunes","Continue to revise a saved tune","Use a new tune","Print a tune","Return to Experimenting menu"tCS8300L11:CL$:PC,0,11:"What name do you want to give the tune? ";:INP,15,"-AZ-09 .-",1,NM$:X((NM$,1)):(X64X91)ĺ:"The name must begin with a letter.":30000:L0 CF$".TUNE":16000::NM$NM$CF$ l (R)ZD1:ZW1:33000:CS0:MWSre using each Find Command.":30000:CL$9oWIND:CL$:Op" WRITE YOUR OWNCS0:TI$"Write Your Own":IP0:TL0:PT0:10000WX" PRINTEN$" print":TI$"Saved Tunes":PA$"":200:F07999 (ZNNO)İ22000?@" SAVE FILErQO$"row"QO$" with the word "QO$"fly,"QO$" first press Control-F. Follow "QO$"Find:"QO$" with a slash,";(D" the word "QO$"row,"QO$" a slash, the word "QO$"fly,"QO$" followed by another slash."::"Find:/row/fly/"CC$::"Remember to press Control-B befoD,ZX,ZY,279:CO:"MECC Distribution":"3490 Lexington Avenue North":"St. Paul, Minnesota 55126":"(612) 481-3527":30000:CL$:WINDVSP,4:CL$:::"Use of Esc Key"CC$::X"You may want to quit in the middle of a program. If so, press the Escamanual for further information.":30000 WIND:CL$:CO:VSP,10::"A manual to aid in the use of this diskette is available from MECC.":VSP49:" Title: ";CA$;:GCP,ZX,ZY:TI$:12:" Direct inquiries to:"::" "CC$;:GCP,ZX,ZYH:WIN* Name That Tune":"* Picture This!":"* It Could Be Verse":30000:WIND,0,30,279,191:VSP,4'CO:CEW:::"This diskette contains special management options that enable you to view, edit, delete, or print the files from any activity. See the support IND,0,30,279,191:CO:CEW"Experimenting Activities"::"These activities encourage you to be creative and to experiment with language and ideas."::"The activities are these:"\WIND,20,98,279,191:CO:"* Go With The Flow":"* Easy Expansions":"others."::"Warning: Your ideas may develop or change as you exchange ideas with classmates."::"The activities are these:"{WIND,20,128,279,191:CO:"* Chain Gang":"* Class Journal":"* Tempting Tidbits":"* Author!":"* Too Good to Miss":30000:Words and the relationship between language and ideas."q:"The activities are divided into two groups: sharing activities and experimenting activities.":30000:CO:CEW:VSP}v"Sharing Activities"::"These activities invite you to share ideas with d MECC products include MECC Writer, MECC Speller, and MECC Editor.":300006lWIND,0,30,279,191:CO:CEW:"The ten activities on this diskette enable you to use a word processor to share ideas with friends, communicate information, and experiment with wDXL,Y2LX1DXL,Y2LX1DXL,Y2DYLX1L,Y2DYLX1L,Y1DYLX1DXL,Y1DYLX1DXL,Y1L::XVSP,4:CL$TI$CC$:VE$CC$:Kb"MECC Write Start is part of the Composing Information series in":"the Computing and Information collection."::"Relate:"Insert another diskette."CC$:30000:CL$:::CS(P(P(999))1)16:CS1CS7CS6^CSdpY2180:1:X11:Y10:X2279:DX10:DY8:L02:X1DXL,Y1LX2DXL,Y1LX2DXL,Y1DYLX2L,Y1DYLX2L,Y2DYLaX2L,Y2DYLX2DXL,Y2DYLX20000:910,255T WIND:CL$:CO,0,89:"Getting "F1$"...":AS(3)AS(4)ĺD$"RUN"F2$ UNHOOK:1013,0:24576:D$"BLOAD SMALLRNH.OBJ,A38912":38912,"COMPOSEUTIL.OBJ":RFL,"PRINTER COMMANDS.BIN"P(948)::M80:(12):RNH,F2$ VCL$:WIND:CO,0,89:F2$"PRINTER SUPPORT":D$"BRUN PRUTIL.OBJ":PPP(948):D$"BLOAD PRINTER COMMANDS.BIN,A"PP AS(4)F1$"Diskette Support":F2$"DISKETTE SUPPORT"  A0A4F1$CN$(A):F2$"SUBMENU" A2F2$"WARM-UP":902,0 ((A3)(A4))(910)127İ2L,IR,LT,MC:M80: . D/CL$:X10:Y10:X279:Y221:14100:WIND,1:PC,0,2(NO13)::" "TI$" "CC$:HT12(12(NO13)):SPSP(NO13) /:PC,20,SP:"You may"EN$":"::L1NO:PC,HT(L9)(30(L13)),SPL1(13(L13)):L". "MN$(L):::VTSP3NO:NO13