' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō  H8`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  Lh@(LH9LHH/Hh/ H-З( ܸ(& ¸$8 H` *HVDP (FD Z $0x8x D- ܸDD#HIHHHHhHH݌hHhHh݌H6 h Լ ռ ռ ռ`HJ>݌h Hh݌`HH ᥠ L\  ( 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)(#/-)(#/-,,NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./0123456789:;<=>?&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ穎鷎귭෍ᷩ췩 緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` ``n 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl3L׭Lܫ &RL &QL d L4 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)nooõĵ LLЦ  #-µµ( zegehtpjigh q Ql` z8L`MaEK@>ˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ@ NLi   L` -e L `sr ࣭ml ࣭srLLlۿڿLգ գ ze)rs zrsLq ] Qlr L̦ `8gh ࣥhgL `8LʨM ࣥˤLµH hLħõµ µõL&F`( 80 0 DDLDLDL^ t^`,tP ȟpMt-^^`DH hWLԧ d@` Lꢩ  c ȢL LlLգcl mllm ꢥFLȦAD@ C N cLuɠ% d: L cvc]ܢ @J0G eeʎd d F DUFX ЃDWcДJFgDfLH eeh) tt L [ _HH`]ɍ]ɬ` ɠ``DF ɤ<(LΡ DF`80!  eDeF eDDeFF8`DͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?Lﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` ᥠ hh`ĵµ`ڿ8.ڿ.ۿ`êL`õĵBCõĵ`µµ`L õBĵCصص Qƴ0"BƴЌĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`Lz紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8`  XI볩쳢8 DH E𳈈췍Ȍ X0 ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B / / ]ƴS0Jȴ ȴ)  `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I B߮Z\ @ յյ\BIR Z-^ Jp\IZLLӜv  Ϡ@跻~!Wo*9~~~~ɬƬ~UVERIF!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̵C8p 5,One,Student,Two,Student,Three,Student,Four,Student,Five,Student,N,t` ```````fffffff~l6iɆpq{0`0``0`00000`Z<`~~6f~~~ ~~~~~`````````0``0`00`~>cc>cc>>cc>0000000|~~~w~~~~f<ff<2121000010,111100010,122000010,112100010,"",133000010,133000020,132000020 >2100000100,2110000000,3100000100,3110000000,0100010000,0200010000,0100100000,0200100000,0101000001,0101000000,0102000000,1000000000>"","","","",1200001000,1200001010,1300001000,1300002000?0112220,012110,012130,0222130,013150,014150,413150,414150,413151,414151,4132440,4122540,"",4132441,4122541,"",4122511,"",41235410,"",413344401mW(2)W(2)((1)2)2A1mW(3)D$(1)(((1)4)6):281501mD(2)(D$(2)):L1W(2):L1(W(2)L)((1)2)(D(2)1)(W(7)L)1mD(1)((1)9)1:D(1)D(1)10L1100D(2)D(1)L11028090+2mD$(1)(D(1))D$(1):L:X0:LW(2)11:L1((D$(1),04jD$(2)(" "D$(2),LE)"06jT0`m29360:PT3:L110:W(L)((WM$(WS),L,1)):L0tmD$(1)"":D$(2)(((1)(84(W(2)3)))2):W(8)D$(2)(((1)4)2):D$(1)(((1)4)2):281500~mW(10)D$(1)"10":281500mW(5)D$(2)"0"0mW(6)D$(2)"1"3,0,0,0,0,0,0,0,0,9,8,0,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,25,Multiplication Worksheet,1,1,1,0,0,0,0,0,#t:KT2T7:STT7K1:78000#vDVK1ĺ:S94@#yTNPN:K0:b#~(RECOPY)(AS)İ29000:7300#K3T2T7:STT72:7800:TNPN##FRACTIONS#K0:II1T5#T%(CP)T%(CP)T%(CP)1:KK1:T7T71:WSCP:7650:7640#FIIIT5:7640 $7200:7610)$:KT2T7:STT7K1:9009$TNPN:K0:[$(RECOPY)(AS)İ29000:7300}$K3T2T7:STT72:900:TNPN$$TYPE 3 DIV$K0:J1T3$T%(CP)T%(CP)T%(CP)1:KK1:T7T71:WSCP:7750:7740$#FIJT3:7740%(7200:7710 %<:KT2T7:STT7K1:6000%ATNPN:K0:R%F(RECOPY)(AS)İ29000:7300t%PK4T2T7:STT73:600:TNPNz%Z%xSI$"/":DVSI$" "%700:LSTT2:710:LLL0L1:M$(L,0)SI$M$(L,1)" = ";:7900:DVLLLL3 &750:K3ASĺLI$::K0:LI$"":7850&K3ĺ::K03&:ASKĺ:" "LI$9&?&N&ANS SHEETh&ASĺHL$;:K3ĺ" ";s&ASı&" ";:L23ĺ" ";&M$(L,2);:(S8$,5L2);:N%(L)2&S94S84&LI$LI$" "(S8$S8$,L0L1S8)VL$'S90:L5(LI$):L527LI$LI$(S8$S8$,27L5):O'"L553LI$LI$(S8$S8$,54L5):LI$(LI$,79)_',K3ĺ:LL4e'6u'@PRNT 1ST 5'JFFĺCL$:CO,0,89:"Please prepare your printer...":SPACE:UNHOOK::::12:"PRINTING WORKSHEET";:NC1ĺ"S";'T"...":OA4İ300(^((#RD NAMESU(2#33000:OPEN,CT$".NL":TPTR,0:TREED,TX$,NS$(0):NS(NS$(0))(<#L1NS:TREED,TX$,NS$(L):TREED,TX$,A$:NS$(L)A$" "NS$(L)::QFH:CLOSE(F#NS0:(eGEN)e29360:PT1:L113:W(L)((WA$(WS),L,1))::W(1)W(1)((1)2)19)eW(5)5W(6)((1)3)1:W(5)((1)(4W(6)))W(6)`)eW(5)4W(5)((1)2)2:W(6)W(5)})eW(8)5W(8)((1)2)1)eW(3)5W(3)((1)2)3)eW(10)5W(10)W(3))eC(W(8))W(9):C(W(10))W(11):W(2)5W(2)((1)2)3*eW(2)5W(2)((1)2)3&*eW(5)D$(1)("000",W(5))D*eW(6)D$(2)("000",W(6))*eL1W(3):D$(1)(((1)(11C(L1)W(2)(W(12)1)(LW(4)LW(3))))(LW(4)LW(3))(C(L)0))D$(1)::W(7)D$(2)"0":26160*eL1W(4):X((D$(1),(D$(1))L1W(6),1))L+fX(0)X:C(L)āL12W(2):X(L1)((1)(11X(LW(4))))(LW(4)):X(0)X(0)X(L1):+fC(L)āL12W(2):X(L1)((1)(10(LW(4))))(LW(4)):X(0)X(0)X(L1):",f(C(L)X(0)C(L1)9W(13))(C(L)(X(0)C(L1)C(L)10W(13)X(0)C(L1)(C(L)1)10))(W(12)1XX(2)9)(W(12)2XX(2)10)26120I,&fL114:D$(L1)(X(L1))D$(L1)::,0fL14:D(L)(D$(L)):D$(L)(D(L)):D(0)D(0)D(L)::D$(0)(D(0)):W(1)3D$(0)D$(2):D(0)D(2):D(2)D(1)D(0):D$(2)(D(2)),5fL3:II34:D$(II)"0"LL1-6f:IIL5:D$(II)"":-?fW(1)1ıC-DfLE(D$(L1))2:LE(D$(1))LE(D$(1))W-IfD$(L)(UL$,LE)~-NfD$(L1)"+"(" "D$(L1),LE1)-Sf-xi29360:PT2:L19:W(L)((WS$(WS),L,1)):-}iW(1)W(1)((1)2)1F.iD$(1)"":D$(2)"":L1W(2):D$(1)(((1)(9(LW(3)W(5))))12(W(8)L)(W(8)LL1)(LW(3)W(5)))D$(1):L.iD(1)(D$(1))10W(4):D$(1)(D(1)):W(9)D$(1)"1"D$(1).iW(6)D$(2)"0":27080.iW(7)D$(2)D$(1):27080/iL1W(3):X((D$(1),(D$(1))L1W(5),1)):LW(8)D$(2)(((1)(9XW(9)))X1)D$(2)F/iLW(8)D$(2)(((1)(X1))1)D$(2)g/iL:(D$(2))(D$(1))27010/iD(1)(D$(1)):D(2)(D$(2))10W(5):D$(2)(D(2)):D(0)D(1)D(2):D$(0)(D(0))/'jW(1)1ı/,jD$(2)"- "D$(2):LE(D$(2))/1jD$(3)(UL$,LE) T7T2"*T%(CP)FIı!">7200o"M$(T7,0)D$(0):M$(T7,1)D$(1):M$(T7,2)D$(2):M$(T7,3)D$(3):N%(T7)W(1):"LTYPE 1 DIV"OAST4ĺ"QK0:II1T4"VT%(CP)T%(CP)T%(CP)1:KK1:T7T71:WSCP:7550:7540"[FIIIT4:7540"`7200:7510(S8$S8$S8$,27L5):890)aL527890MfL553LI$LI$(S8$S8$,54L5)_pLI$(LI$,79)eztPRNT FRCTSP$" ":T29SP$""LSTT2L0(M$(L,0)):B$(" "M$(L,0),2)" "B$S8$S8$;:LT2ĺ" ";:1PNTN:QFH:LSTT2:PNPN1:A$" ":NNA$SP$" "(PN)".QL0(M$(L,0)):DA$(VL$,L0)sC$(" "DA$,2):PN8SP$""L2(M$(L,2)):E$(" "M$(L,2),2):A$" "C$" = ";:ASĺ" "E$S8$;:LT2ĺ" ";AS950S8$;:LT2ĺ" ";'::LSTT2:L1(M$(L,1)):B$(" "M$(L,1),2)X" "B$" "VL$" ";:LT2ĺ" ";`:l:K0:vMAINAS0:SP$" ":GL3:NL3:T10:T20:TN0:PN0:ROW0:K0:L0I134:T%(I)O%(I):OA4000,5000,6000,7000FEED:TROWROW1:SAMENC1İ1500/AS(AK1):OA4İ2500:1050=ASİ2000LSAME1100[.NC111008NCNC1:NSNS1:OA4SAME0RECOPY0:1000B300:I08:J08:L$(I,J)"":::1000LENDVPOFF:24576:31000SAMEGL3:NL3:OA1GL5:NL5*-NS1NC1:AS0:OA4İ2600:1560I300:ROW0TROW:400:S2100[:lPRNT ASHEET300::NR8:OA1NR6ROWTROW:T92100L0ROW:J13:L$(J,L):J6NR:L$(J,L):OA1(T15T110T115T120T125T130)ĺ::EL(L)ĺ&OA2OA3ĺ, 94T2İ700J>AS0:FEED:_ PRNT DIV ASHEETj ASı( T20:RECOPY1:I121:T%(I)O%(I)::70002 FEED:ADDGL5:NL5:CP1LASTT%(CP)4100 LZ1T%(CP):WSCP:26000:CP28CP34EL(ROW)1$W(1)1İ500:4050iT2T21:M$(T2,0)D$(0):M$(T2,1)D$(1):M$(T2,2)D$(2):N%(T2)W(1)WS4N%(T21)3N%(T2)0::T24M$(T22,0)"0"M$(T2,0)M$(T2,1):M$(T2,1)"0 T1İ400:ROWROW1T2TNPN:ST1:700:TYPE 2OR3 PROB SUBT%CP1LAST7T%(CP)5100ULZ1T%(CP):WSCP:27000lW(1)1İ500:5050T2T21:M$(T2,0)D$(0):M$(T2,1)D$(1):M$(T2,2)D$(2):N%(T2)W(1)T1İ400:ROWROW1T2TNPN:ST1:700pMULT zCP1LAST T%(CP)6100; LZ1T%(CP):WSCP:28000R W(1)1İ500:6050 T2T21:M$(T2,0)D$(0):M$(T2,1)D$(1):M$(T2,2)D$(2):N%(T2)W(1)   T1İ400:ROWROW1 T2TNPN:ST1::700  XDIV0!b300:FF0:HL$"______":VL$"------":K0:L0:ST0:T70:TN0:PN0:FI0:CP0d!gT8DVT41:T4T8:S86:7500:T4DV1:DV0:FIı}!lS80:T4İ7500:FIı!vT4ASĺ!T5İ7600:FIı!AST5ĺ!T3İ7700!! CPCP1:CP22CPLAST1:NOMORE DIV"%CPLAST1FI1:K(4)"DELETE"Q$(L)".WS":QU14-B;:QUİ11800:HSP,1I-L;QCQC1:11810X-Q;QUįSPACE^-V;-,;Q1QQC15120,$;O%(Q)O%(Q):BOX,140(Q10),39(Q10(Q10)),18140(Q10),119(Q10(Q10)),8:15120,.;CO,0,112:CEW:"Any corrections? ";:30100:Z$"Y"15100-8;QU0:L120:O%(L)ĺ:ZW1:33000:J.QU0:QCİ11610:CO,0,89:"No worksheet designs have been saved yet.":SPACE:QU1Z T.!|.33000:OPEN,Q$(CT)".WS":TPTR,0:TREED,",",Q$:OA(Q$):L14:TREED,",",Q$:DV(L)(Q$)::L134:TREED,",",Q$:O%(L)(Q$)::TREED,",",Q$:NP(Q$):TREED,","0:730?N%(L)0İ800:SY$(OA)M$(L,1)" = "M$(L,2);:750:730mM$(L,1)SY$(OA);:800:" = "M$(L,2);:750K3AS::LI$::K0:LI$"":740K3ĺ::K0:OA4ĺ:ASKĺ:LI$LL9ıB$(S8$,9LL):B$;:K3ĺ" "; ANS SHT*ASĺHL$;:.4" ";:L03ĺ" ";<7M$(L,0);\9K3L04ĺ" ";:L02ĺ" ";>N%(L)2LI$LI$S8$" "(S8$,LL)VL$:860HN%(L)LI$LI$" "VL$:860RLI$LI$S8$" "(S8$,L1)VL$(S8$,L25)\L5(LI$):L527LI$LI$,TI$!.TREED,",",Q$:NL(Q$):TREED,",",Q$:PN(Q$):TREED,",",Q$:NC(Q$):TREED,",",Q$:AK(Q$):TREED,",",Q$:ND(Q$):TREED,",",Q$:PW(Q$):TREED,",",Q$:DN(Q$):TREED,",",Q$:DP(Q$):CLOSE!.DN011500:y".ZW1:33000:OPEN,"WORKSHEET.FILE":TPTR,0:TWRITE,(OA)",":L14:TWRITE,(DV(L))","::L134:TWRITE,(O%(L))","::TWRITE,(NP)",":TWRITE,TI$","#.TWRITE,(NL)",":TWRITE,(PN)",":TWRITE,(NC)",":TWRITE,(AK)",":TWRITE,(ND)",":TWRITE,(PW)",":TWRITE,(DN)",":TWRITE,(DP)",":CLOSE:&#.PW0:975,0@#.SW,TI$,L:11600:VSPl#.CO,0,30:"1. Title:":CO,279L,30:TI$#/SW,Y$(NL),L:CO,0,50:"2. Print line for name?":CO,279L,50:Y$(NL)$/SW,Y$(PN),L:CO,0,70:"3. Print problems numbers?":CO,279L,70:Y$(PN)^$0/SW,(NC),L:CO,0,90:"4. ";:HSP,1:"Number of copies:":NC1įCO,143,90:"("M$(ND)")x$5/HSP:CO,279L,90:NC$D/SW,Y$(AK),L:HSP:CO,0,110:"5. Print answer key(s)?":CO,279L,110:Y$(AK)8%X/SW,Y$(PW),L:CO,0,130:"6. Personalize"W$"s?":CO,240,135:CEL:CO,279L,130:Y$(PW):BOX,0,150,279,150,6%b/CO,0,180:RR$CC$:CO,0,160:"Enter option number to change: ";:INP,(1,"-16",0),A$%l/Q(A$):A$""İ11700:"Are you ready to print the"W$"? ";:30100:Z$"Y"ı&v/Q13000,13010,13020,13030,13060,13120:12010L&2N$KN$"-09":11700:" Title: ";:INP,(21,N$,0),TI$:]&2NL(NL1):n&2PN(PN1):&211700:"How many copies (1-24)? ";:INP,(2,"-09",1),A$:NC(A$):NC1NC2413030'2NC1įHSP,1::"Do you want all copies the same? ";:30100:ND(Z$"N")'2HSP:.'3AK(AK1):W'@3PW(PW1):975,0:PWİ10000:975,CT]'J3q'6CL$:CO:11600'6CO,0,70:"This option allows you to print a"W$" that was previously designed and saved.":'6DD$"continue? ";:30100:Z$"N"A0:(611800:11850:QUA0:m(6CO,QX,QY:CEW:"Which"W$"? "CA$;:INP,(2,"-09",1),Q$:CT(Q$):CT1CTQC14030(611900:11600:CO,0,20:"Operation:"::"Problems:"::"Based on:"(6WIND,85,20,276,191:CO:OP$(OA)::NP::DNĺPG$:14075C)6"W"(OP$(OA),1)" "CA$:WIND,110,47,279,191:CO::Q0:L134:O%(L)Qĺ", ";Z)6O%(L)Q1:L;CA$;b)6:)6WIND:CO,0,140:"Is this the right worksheet? ";:30100:Z$"N"14020*712000:11950:CL$:33000:CO,0,89:"One moment please...":RNH,"PRINT WORKSHEET"G*:WIND:HSP,1:CO:CL$"Delete Designs or Names"CC$:6:0,9279,9*::BOX,0,11:CO,0,20:"Options:"::" 1. Delete worksheet designs":" 2. Delete name lists":" 3. Return to main menu"::"Which number? "CA$;:INP,(1,"123",1),Q$+:Q(Q$):Q3ĴQ15100,15500:15010#+:HSP:b+:BOX,0,11:L120:O%(L)0::11800:11850:HSP,1:QU15190+;CO,0,112:CEW:"Enter the numbers (one at a time) of":"the worksheet designs you want":"to delete: "CA$;:GCP,QX,QY::CO,0,182:RR$CC$*,;:CO,QX,Qp+ƞ0Hepo ʆ8h`x wx` mͳ   ފ v`QFPINIPOFPACFEECLOSSFCRFRNOPESEGTTREETWRITTPTjy-{ww;{i)v׬ ةL@I^AvB[JvK덴x`OA1ASĺ2LI$"":K0:PNTN:QFH:OA4ı?LSTT2tPNPN1:KK1:A$" ":NNA$SP$" "(PN)"."PN8SP$""L0(M$(L,0)):L1(M$(L,1)):L2(M$(L,2)):LLL1L2:A$" ";:OA4ıN%(L)2ĺM$(L,1)SY$(OA)M$(L,2)" = ";:800:75J `<=ʱD>`$8ЍЎТ( АLХ>ѥ?ѥ@ѥAѥBѥCѥDэѥEэѭЅЅА DѭѭѩѩѮ PѰ B` 8`эюѢѥѥѥѥѮ P`ѩѢ P` #ѭххэѭ`ѭххLѠ ё  `юѩѢ .ѐ mѐјmѐѬ`@ @ߩ ie` <=Uԅ?Vԅ Ӫ%)ӥ>? ӰPLӭ; 8` gӥhӠȱ> ӱq ȱ ?vӠ8ȱ ӱ>? Ӱ6p"Uԅ>Vԅ? Ӱ!p ӭӅ<Ӆ=,`ӭ8쭧`KԭJԭIԩ@A Eԑ  5Ԡ `@ i @ ȱ [Ԣ`,`D4 D`MԅDNԅED` ,ԎԌ <= <ȭ<ȭ<ȭԑ<ȭԑ<><ȥ?< <H<= H <= I<Ԑ<Ԯ` 3`L @{ @A<=>?@  @A:<  Ҋqe>>?@ޮ   L3 @ޤ>?Lv @ эfՌgՠhՈi @l @ а/>?a [԰>?2ȱ쨊 [ԐLԠ bձ b խbi#ǍbըLլaթLvcȌd՘idLɠeʱݨ9d00ȩdȢ) [aխihaՐc` Iaբ mfՅmgՅ @ @ @{` @{ @eըeՈ^ ֈ`nv @{ @^_ @( @ @{ @R tҰ"egiehj G,v0 @l` I @!8nv ֥7v >;v?Ȑ۩`?)8鍸ζ`H88HHа ,,i,,`8,nvhhvhvvȱv,v0mvvvH,( ,v0hvHvHH,,(`?<>?>,>$f<<`ww @߅$0ww @ @c` IvSx ux$H)xh0,x0RLwww 6x7  wwwww,x5S,xNx x9xI7xwxwx߭ xčwxww`x`x6xLxxx6H7Hw6w7,w0 xɍ Lyx$Hw8$w$ xx  @ x$whix$w6wh7h6xxx`ɍɌ wͳ w` x`Hxx)hHxɍ xh`J ry` ) ȱȑ𽥡 0ȱ׈iȱȱ` lkFnm ȱHȱeȱeh֊0ȱ ie L^z`sEED,TX$,A$:DV(I)(A$)::I134:TREED,TX$,A$:O%(I)(A$):T%(I)O%(I)::TREED,TX$,A$:LAST(A$) TREED,TX$,TI$:TREED,TX$,A$:NAME(A$):TREED,TX$,A$:NN(A$):TREED,TX$,A$:NC(A$):TREED,TX$,A$:AK(A$):TREED,TX$,A$:SAME(A$):TREED,TX$,A$:PW(A$):CLOSEK PWįFCN,".NL",NT$,NT:CT$NT$((975)):L024:NT$(L)"":9000c I134:T%(I)LNIq :LASTLN OA4İ250:8000: CL$:CO,0,89:"One more moment please...": ALL. DIV PROB LN6DV(3)1 I121 I7TTTTT%(I) T3T3T%(I)::NPT3:TT3ıV T8(DV(4)1):T8DV(1)DV(2)DV(3)T8TT:T30:r DV(1)DV(2)DV(4)ı LN7TT(TT2) D3(TT3):D4(D33):T8T8D43:(DV(1)DV(2))DV(3)T8D433 DV(1)DV(4)T4D43:DV(2)T4D33:T3NPT4:DV(1)ı*DV(2)DV(3)T4NP:T30:XDV(4)DV(3)DV(2)T8D33:T3NPT8T4:DV(2)DV(3)T8DV(1)T8D333:T5T8:T40::T3NPT8T5:DV(2)T5D43:DV(1)T4D43:DV(3)T4T5:T5NPT8T4:DV(1)T5D33:DV(3)T5NP:T30:4 DV(1)DV(2)DV(3)T4(NP5)3:T5NPT8T4:T30O!DV(2)NPTT3T5T53j"DV(1)NPTT5T4T43%DV(3)T3NPT8T5T4',*1PINIT:6" "TI$;:ASPWĺ48)"Name Answer Key":54)DT$::350@PWĺ48)"Name "NS$(NS1):54)DT$:340.JNAMEĺ48)"Name":54)DT$RTPWASĺ58)"(Answer Key)":350gWASNAMEPWĺmY^OA4ĺ:ASĺhASOA1ĺrFFİ8000:FF0OA2OA3ĺLINE1GL:L$(LINE,ROW)""ĺL$(LINE,ROW)EL(ROW)ĺ 84:190 L134:WA$(L)::7 L118:WS$(L)::O L120:WM$(L)::g L121:WD$(L):: S8$" ":UL$"------":VL$"-----":HL$"_____" 1000 DATAa 33000:OPEN,"WORKSHEET.FILE":TPTR,0:TREED,TX$,A$:OA(A$):I14:TR commands correct? ";:360002BOX,0,55,279,191FL1(Z$"Y"):L1L^@STRING INPUTJS$"":16368,0:XQX:YQY:I$"-"(1)(127)TL(S$):CO,X,Y:INP,(0,I$,0),C$:A(C$):A13Ĺ16368,0:^(A8L0)8010hA88080rA34L198020Y|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$:8020XXP(L):BOX,X1,Y1,X9,Y7,0:CEL:L18010S$(S$,L1):8020(#SCAN FOR CHR$2#L(S$):L79120,<#K1L6:(S$,K,5)"CHR$("9110NF#JK6L:(S$,J,1)")"9100pP#X$(S$,K5,JK5):X((X$))Z#X0X127X0d#L$"":K1L$(S$,K1)n#R$"":LJR$(S$,LJ)x#S$L$(X)R$#LKLJ:9110#J#K0#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#(A);CA$;#K:Q$:CTCTL#0uSPACE BAR ROUTINE:u:SPACE::yENDING ROUTINE0"yWIND:CL$:10:"Do you want to try again? ";;,y36000I6yZ$"Y"Ĭ@yCL$:VSP:HSP:CO,0,89:"Getting the main menu...":SET,0:33000:RNH,"MENU"}ERROR PROCESSING }ZE(222):ZN(218)(219)256:216,0:32000}ZUZE0ZE16Ħ}ZE8İ33200:QN$ZN$:33020:3d}PROGRAMMERS REENTRYRn}ZE255Ĵ(919)031000:x}WIND:CL$CO$:CO,0,80:"Error "ZE" at line #"ZN" in "PN$"."::"Please report this error to MECC.":30000:31000耲FULL DISK VERIFY*ZU1:SET,ZD:ZS654:ZL9503ZD:ZC(70436):ZV0:ZT$D1$:ZD2ZT$D2$uZE0:ZEĺD$"BLOAD MECC$$DISK,A"ZS;ZT$:33200:(TZT)(QN$ZN$)33070CL$:CO,0,89:ZVZE7ĺ"The volume number of this diskette must match the volume number as set in diskette support.":30000:31000SZV(ZE7):"Please insert your "QT$(T)" diskette for "QN$;:ZC2ĺ" in drive "ZD;ZC3ĺ" in the drive located at:":" Slot: "(ZL):" Drive: "(ZL1);".":30000:33010.CHECK FOR WRITE-PROTECT TAB0WP33099 8ZE0:ZEĺD$"BSAVE MECC$$DISK,A"ZS",L$28" BWP(WP1):ZE4ĺCL$:CO,0,89:"Please remove the write-protect tab from your "QT$(T)" diskette.":WP2:30000:33010 KZU0: LGET DRIVE STRINGS MENTRY:953 - 958 CONTAIN S,D,V OF DRIVES 1 AND 2 !NEXIT: D1$ = DRIVE 1 STRING,D2$ = DRIVE 2 STRING2!PUSES:D1$,D2$g!VD1$",S"((953))",D"((954))",V"((955))!`D2$",S"((956))",D"((957))",V"((958))!!GET DISK NAME AND TYPE!ZN$"":Z1"ā(ZSZ)0Z36ZN$ZN$((ZSZ)):ZZ1:33220"΁ZT(ZS)"1" STANDARD YES-NO INPUTG"(1);:GCP,ZX,ZY"CO,ZX,ZY:INP,(3,"YESNO",1),Z$:Z$(Z$,1):Z$"Y"Z$"N"36020" I                            7PRNT WKSHTS#RM CHILDERS8((C) 1985 - MECCI285/7/17-RMCT<31700`d32000n919,0:D$(4):CL$(12):TX$(0)","xPN$"Print Worksheets":33100:DT$"---":I13:DT$DT$DT$: ZS704:SET,1:RFL,"MECC$$DISK"704:33200:QN$ZN$ C(9),W1(9),W2(9),D(9),D$(7),NT$(24),NS$(25),L$(8,8),M$(43,3),N%(44),O%(50),T%(50),DV(4),X(15),W(13),WA$(34),WS$(18),WM$(20),WD$(21),SY$(4),EL(8) 919,1:FF1:200:L14:SY$(L): OA1āL13418(OA2)20(OA4):A$: OA181,182,183,1ished."L111:CT1:HSP,2bL215:42L2:6:CA$;:CEW:"PRINT "Q$CA$;:GCP,QX,QY:8000S$""Ģ42L2:1:CA$;:CEW::L25S$""İ9000:CTCT1:PPCT,13L2:CTCT1:PPCT,0:PPCT1,255:PPCT2,255HSP,1:17:"Are the above1,"-17",1),ZN$:ZN(ZN$):PP,128ZNgv13:"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 fin PROGRAM: PRINTER SUPPORT<PROGRAMMER: P. BOUCHARDYCOPYRIGHT (C) MECC 1983y(LAST UPDATE: 85/03/29 RPB 2HI-RES VERSIONd31700n32000 xQT$(0)"program":PN$"Printer Support":D$(4):CL$(12):ZS704:SET,0:RFL,"MECC$$DISK"ZS:33200:QN$ZN$::P(19)\ PP(948)(949)256:CA$(1):CC$(3):Q$(34):VSP:HSP,1g 24576q MENU L011:WIND:CO:PN$CC$:Q10:Q220:Q3279:Q4191:WIND,Q1,Q2,Q3,Q4:BOX,0,10,279,10,6 BOX:CO::"You may:": " 1. Check current printer settings":? " 2. Change printer settings": " 3. Return printer settings to their":CO,38:"original state (slot search)": " 4. Test printer settings": " 5. Return to main menu" $::"Which number? ";:INP,(1,"-15",1),ZN$:ZN(ZN$)A 8BOX:CO:ZN2000,5000,3000,4000,31040N BL00:L0j CHECK CURRENT SETTINGS JP1((PP)0)((PP)127) JP2100,2200,2300: 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 diskette is started up."l H30000:{ COMM CARD 3:"This diskette is currently set up to":"expect an Apple Communications Card":"in slot #";(PP);".": SD$"LOW":SD10:(PP2)127SD$"HIGH":SD30o 7:"The speed is set to '";SD$;"'":"(usually ";SD;" characters per second)." ::(PP107)0İ2500 30000: USER SET  CO:"The current printer settings are:"  :" Slot: ";(PP)128: (PP2)0İ2400$ (PP107)0İ2500*. 30000:F` PRINT SPECIAL COMMANDShj " Commands:"::CT2:HSP,2t L115:(PPCT)0L15:2470~ 7:"PRINT "(34)CA$;:L211:P(PPCT):CTCT1 Z(P0P13P32):ZPP64::GCP,X,Y:BOX,X1,Y1,X6,Y7,34 L2(P13):PP21L2:(P)CA$;::ZįCO,X9,Y> L2:O L1:HSP,1:a PRINTER TYPE :" 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:v WP1:33000:D$"BSAVE PRINTER COMMANDS.BIN,A"PP",L128" 30000:TEST THE PRINTERBOX:9:"Please prepare your printer...":30000*UNHOOK::::9:"Testing the printer...":D$"IN#0":D$"PR#0":PINIT:"Printer Test":hI13:J3295:(J);:::J96127:(J);:::::FEEDPOFF:24576:HOOK:CL$:11:" Printer test complete.":30000WIND:CO:"Printer Support"CC$:WIND,Q1,Q2,Q3,Q4:SET NEW OPTIONS3:"You may use:"::?" 1. An Apple Communications Card":" 2. "CA$;:GCP,ZX,ZY:WIND,ZX,ZY:"Any other type of printer interface card (such as a serial or parallel card)"WIND,Q1,Q2,Q3,Q4:::"Which number? ";:INP,(1,"-12",1),Z$:ZN(Z$)ZN6000,7000&PP1,66:BOXf5200:WP1:33000:D$"BSAVEPRINTER COMMANDS.BIN,A"PP",L128"lzPID FIELDZL120:PP106L,0:d7:"What printer are you making these"::"settings for? ";:INP,(20,"- z",0),P$:LP(P$):LP0ı"nL1LP:PP106L,((P$,L,1))::5pSET COMM CARDzBOX:3:"You may use:"::" 1. High speed (usually 30 cps)"::" 2. Low speed (usually 10 cps)":"Which number? ";:INP,(1,"-12",1),ZN$:ZN(ZN$)PP2,128(ZN1)F14:"Which slot is the communications"::"card in? ";:INP,(1,"-17",1),ZN$:ZN(ZN$)SPP,ZN:hXNOT 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? ";:INP,(          xJ7z#? O Ԡ9ŮԠ!ԮʠҠӮΠҠԠ ԮϮŠՠ1 Ϯʠ ӱԠ ̮ʠ Ԯ̠ ײӠӲԠӳԠ  ӴԠ ̮̠ ӵԠ ӶԠ"ӷԠ ؠ ֠Ӡ ̱Ӡ ӠԠŮ̠ ԮŠȠԮӠ 箮Ӡ  Ӡ ŠԠӮ̠ԠԮӠԠԮӠ Ԡ̠ ԠӠΠ̱ӠΠ̱Ӡ ̠ ӠԠʠӠ ԠҠϠ Ю̠ϠäˠԠԠ9 ԮŠ                     " 6 WORKSHEET%BY:R.M.CHILDERS7(C)MECC,1985P(CURRENT:87/04/20RMCi<31700:919,0:33100uF32000KZ$"program"PD$(4):QT$(2):CL$(12):QT$(0)"program":ZS704:SET,1:RFL,"MECC$$DISK"ZS:33200:QN$ZN$dINITn nW$" worksheet":O$" objective":DD$"Do you want to ":RR$"(Press RETURN if done)":CA$(1):CC$(3):CO$(15):CN$(14) NS$(24,1),Q$(24),NT$(10),S$(1),P(6,20),S(6,20),O%(44),T%(44),OP$(4),W(4),Q(4),DV(4),A(4),T$(6),Y$(2),O$(34),DV$(4),M$(2) I14:OP$(I):W(I):Q(I):Q Y$(0)"No":Y$(1)"Yes":TX$(0)",":KN$"-AZ-az .'`-":S$(1)"s" PN$"Design a Worksheet":M$(1)"all the same":M$(0)"all different" 919,1:1000 FAST SUBS NĢV:H7:INP,(2,"-09",1),A$:O%(I)(A$) NO%(I)0200 VV1:V17V6:HH12! LOI:O ,HSP:WIND::CO:PN$CC$:BOX,0,9,279,9,6i ^BOX,0,10,279,191::~  NUMBER OF PROB( 350:7:"The"W$" can contain a minimum of 15 problems and a maximum of 40 problems. How many problems do you want? ";:INP,(2,"-09",1),A$:NP(A$):NP15NP40420Q B0:OA4āL16:BBO%(L)::Bİ600W  N0:I1MA:O%(I)NN1:O%(I)1:BI :NNPN:N1550 I1MA:O%(I)O%(I)O%(I)1:NN1 NIMA :N0520 &IMA134:O%(I)0: :9 XVSQ1QT:QQQĺQ10)Q". "Q$(Q)CA$;:QQT1QQĖ21:QQT". "Q$(QQT)T,QQTQQĺ,::GCP,QX,QY:6:0,QY5279,QY5:HSP,2:CO,0,139:QY139:,33000:OPEN,"WS"(DN)".TEXT":TPTR,0:TREED,";",Q$:TREED,";",Q$:DP111520F,L1DP1:TREED," WORKSHEET GENERATOR%HELLO9(C) MECC, 1985R(CURRENT:85/06/11PRW^32000:::P(X)(X)(X1)256:LP(P(999)):SL(L1)16:DR(L2):VO(L14):(4)"BRUNHELLO.OBJ":(941)489000b 230,64:8192,"LOGO":16304,0:16297,0:16299,0:16302,0:(4)"MAXFILES1":8192,"WORKUTIL.OVL":8192,"WORKUTIL.OBJ":RFL,"PPRINT.OBJ" RFL,"PRINTER COMMANDS.BIN"P(948):(941)64āZ14000::9000+ LL704:RFL,"MECC$$DISK"LL:DC(LL36):953,SL:954,DR:955,VO:956,SL:957,(DRDC)1:958,0:DC3āZ02:956Z,(LL37Z):F 975,255:RNH,"MENU": (#:11:"THIS PRODUCT REQUIRES AT LEAST 64K OF RAM TO OPERATE."::"THIS APPLE HAS ONLY "(941)"K OF RAM.":16368,0:16384,128:16368,0 }:SL }:SL I }:SL 廲廴廲󻳻堨  軵򻲻򻳻廲련 廱廵堨t^ BC#< |t=>0)?><@=0)?><@=@ |t>0BDHt&cu'Ch&BDBBC`((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP                        ^B0xXCFJ*^037B6ACFJU^BC3ACFJ*XA_BBC3ACFJUN[]??B/++*C*BB3?>CFJ*NGKGO?_WUUUBUABUCUBB>0CFJUNGLH?J^?DAGJ??C*B*B***B*AB*C*BBB3CFJ*NGLDOBI@fMTPAWUTPACGJ`@UCUBUBUUUBUABUCUBOBfFCFJUNGOByMC*( Er2Errr2Fr2rpBGN~C*B*B* FBC BBB CFJ*NGON CLNMEUCgCgA~<CgC<~BGOCUBWBB@B`@CFJUNGOp`gQE*EOLEOOOLNDONLOOBGOCC@B`ABpAB8ABAABBGlo`OCFJ*NGBGB|< @B~BBBYCFJUNGDGggBgBFCA*CxsE|83sp3sNGQF@`Dp`@HB@@_BY_CFJ*NGDGG|~BFCAUCHApf~pgfpNGOG|L|HBFACFJUNGDGLFCA*CCLAB@EsNGOD@CAAGA <>8>>28BF?Dx|y|DGsBcB6f`CBwJUNGDGBCByCBEDA*CCND@JBNNGsBBCFB;FJ*NGDG?? C<|BEDAUCIgCNGsB`B0`Ca]a}}JUNGMA~AxB~`pMA*CssAssGBEONGsBgB0gC.5B;J*NGOB<MAUCssC3BfggBgNGsBsB63Cwx{JUNGO'CfgMAzCffBF|NGsBs600p00CBnJ*NGOxpsZ~|||XGsBcB6cCtwutJUNGKGsBsB63CCnJ*N[sBc600`CFJUOZs``wBfgC{9{{ J*^ MBlLC8W0W8JU^BgBlgC k { J*^BC AC|~}~JU     V17V6:HH12$:V6:H1:IDTbO%(I)İ200:CN:NNO%(I):19:"Problems left: ";:CEL:NtNIMA:SU1z 21:"Is everything correct? ";:30100Z$"Y"SU0Z$"N"SU7120W(NPN)15İ350:8:"Your worksheet must have at (Worksheet Generator 廳滲뻳軵P:700:300:CO,0,19:"Division formats: vY0:800:CO,136,95:"(You must insert":CO,136,106:"the "CN$"-"CO$" symbol) VSP,4:16:RR$CC$:CO,0,140:"Enter the format(s) you want (one at a time): ";:INP,(1,"-14",0),A$:A(A$) A$""670<BA2:A2įBOX,130,B309,240,B3028,8:665\BOX,0,A309,110,A3028,8uDV(A)(DV(A)0):640FO1:I14:DV(I)FO0:FOįHSP:640<300:"Division problems involving"O$"s WD1-WD6 have been selected. These problems can be printed in different formats. The formats are: Y30:800:CO,0,130:"(Note: The "CN$"-"CO$" symbol cannot be produced by most printers. Therefore, a blank is provided for you to fill in the "CN$"-"CO$" symbol.)":SPACE: DIV*CO,8,46Y:"1. 35/7 =l4CO,136,46Y:"3. 7":CO,169,46Y:")":BOX,169,45Y,197,45Y,3:CO,177,46Y:"35"9CO,8,76Y:"2.":CO,40,70Y:"35":BOX,37,78Y,57,79Y,3:CO,45,81Y:"7":CO,67,75Y:"=">CO,136,76Y:"4. 35":CO,179,75Y:CN$"-"CO$:CO,196,76Y:"7 =":7BOX,0,152,279,191:CO,0,160:YN0:I134:O%(I)NN1:MAIiT%(I)O%(I)~:N2O%(MA)NPMAIN PROG5000:6000:7300:74007600300:VSP,12:3:"Operations available:":I14:" "I". "OP$(I):4"Which number? ";:INP,(1,"-14",1),A$:OA(A$):JpPROB TYPESz300:VSP,3:5:"The problem types can be selected by specifying:"::" 1."O$" numbers"::" 2. a program name:"Which number? ";:INP,(1,"-12",1),A$:A(A$):300:A7000,7200:.dCHECK TO SEE IF 1 OBJ WAS CHOSENKnOK1:I134:O%(I)OK0Wx:OKıqFINISH SELECTING OBJ900:HSP,1:"Are you done selecting objectives? ";:30100:OK(Z$"Y")HSP:,SEE IF EVERYTHING IS OK6:"Is everything correct? ";:30100:OK(Z$"Y")(@OKOK2.J@XX8:Y75:OK0A$OP$(OA):A((A$,1)):B$(A32):L(A$):A$B$(A$,L1)B$(A):3:"The available "A$O$"s are W"B$"1 - W"B$W(OA)". Consult your manual for descriptions of each"O$".FBOX,0,70,279,71,6:BOX,278,70,279,113,6:BOX,0,112,279,113,6:BOX,0,70,1,113,612:"Enter"O$" number or range of"O$"s (example: W"B$"1-13). 900:17:RR$CC$:15:"Objective number(s): W"B$;:INP,(9,"-09-",0),A$:A$""įBOX,0,140,279,191:6500:OKİ6700:OKİ7100:.(A$,1)"-"(A$,1)"0"7095fOK2āI134:O%(I)0::A0:ER0:D0:B0:350:7000yOKOK0:70957700:B0:I1T:J(O%(I)0):BBJ::7095300:3:400300:950:N2ıA8:"Do you want the problems equally divided among the selected"O$"s? ";:30100:Z$"Y"TNP:500:TB:NNP:aH1:D1:TMA:NNP:BMA:SU0{I1MA:O%(I)T%(I):SUZ$"N"NNRNRN:SU0:VSP:V6:300:"Enter number of problems per"O$":":I1T:O%(I)ĢV:H:"W"B$I;I10)"-> ":VV1:1:O%(J)O%(J)O%(J)1 (:%9510I(%PW(PW1):975,0:PWİ10000:975,CTO(%\(%NRNPı(%I3411:O%(I)O%(I)O%(I)1:I0(%:(&300:VSP,2:4:T$" programs:"::I1N:" "I". "::WIND,36,40,279:CO::I1N:T$(I):9)&B$"-1"(N):WIobjective? ";:30100:Z$"Y"7120ONRNRN:NNR:ILO134:O%(I)0::NPNR:q N5:OA8000,8100,8200,8300:AK0:NC1:PN1:NL1:PW0:TI$OP$(OA)" Worksheet":975,0SW,TI$,L:300:VSPCO,0,30:"1. Title:":CO,279L,30:TI$<SW,Y$(NL),L:CO,0,50:"2. Print line for name?":CO,279L,50:Y$(NL)SW,Y$(PN),L:CO,0,70:"3. Print problems numbers?":CO,279L,70:Y$(PN)SW,(NC),L:CO,0,90:"4. ";:HSP,1:"Number of copies:":NC1įCO,143,90:"("M$(ND)")HSP:CO,279L,90:NCOSW,Y$(AK),L:HSP:CO,0,110:"5. Print answer key(s)?":CO,279L,110:Y$(AK)SW,Y$(PW),L:CO,0,130:"6. Personalize"W$"s?":CO,240,135:CEL:CO,279L,130:Y$(PW):BOX,0,150,279,150,6CO,0,180:RR$CC$:CO,0,160:"Enter option number to change: ";:INP,(1,"-16",0),A$dQ(A$):A$""İ900:"Are you done designing the"W$"? ";:30100:Z$"Y"ıQ9000,9100,9200,9300,9400,9600:7320900:HSP,1:DD$"save the format of this"W$" for future use? ";:30100:HSP,2ZZ$Z$ LSAVE DATA `VOA$(OA):I14:DV$(I)(DV(I))::I134:O$(I)(O%(I))::NP$(NP):NL$(NL)`T0:F$"WORKSHEET.FILE":12200tZZ$"Y"FI1:12000~EXIT33000:CL$:CO,0,89:"One moment please...":FIįRNH,"MENU"&FCN,".NL",NT$,NT:NTNT1:I0NT:NA$NT$(I)Ĺ975,I,GRNH,"PRINT WORKSHEET"VPROB TYPETW(OA):A(1)15:A(2)0:A(3)0:A(4)0:OA1A(1)10:A(2)25:A(3)29OA3āI14:A(I)12I:#OA4A(1)13:A(2)16:A(3)18:A(4)20(ER0:L(A$):L27750 2I1L:A((A$,I,1))9 <A48A57ER1:IL::7870a ABQ(OA)BT:ER1:A$"":IL::7870 C:D(A$):(DT)ER1:7870 D7900:O%(D)ER1:7870 E7850 FER1:I1L:(A$,I,1)"-"ER0 K PA((A$,2)):A0A((A$,1)):A0ER1!!UC((A$,2)):C1C((A$,1))3!ZC1CTER1B!dERİ7800P!nWIND::g!xDAC:O%(D)7830!O%(D)D:BB1:7850!B(TOA)A$""!:!O%(D)D:I14:ER0:O%(D)A(I)ER1:I4:O%(D)0!"WIND,8,65,265:ERįCO,X,Y:O%(D)" ":XX16:D9XX8("X270X8:YY126"WIND::G"WARNING MSGh"OA1D10D25D29İ7950:w"OA17945"OA2D15İ7950"OA27945"OA3D12D17İ7950:"OA37945"OA4D13D16D18D20İ7950" 5#BOX,0,150,279,191:15:"W"B$D" is not available.":ER1:SPACE:#@6:"The problems can be from:"::" 1. Early Addition"::" 2. Circus Math"::" 3. Addition Logician"#J:"Which number? ";:INP,(1,"-13",1),A$:DN(A$):8500:N5(DN1):9900:9500:V$6:"The problems can be from:"::" 1. Space Subtraction"::" 2. Subtraction Puzzles$:"Which number? ";:INP,(1,"-12",1),A$:DN(A$)3:8500:9900:9500:$ DN6:8500:N6:9900:9500:$l DN7:8500:N6:9900:9500$v DP3DP4İ600% DP6O%(1)O%(1)O%(11):O%(11)0$% 6%4!READ IN DATA%>!33000:OPEN,"WS"(DN)".TEXT":TPTR,0:TREED,";",T$:TREED,";",N$:N(N$):L1N:TREED,";",T$(L)&H!TREED,";",N$:P(L,0)(N$):L11P(L,0):TREED,";",N$:P(L,L1)(N$):TREED,";",N$:S(L,L1)(N$):L1:L:CLOSE&R!O&(#N$"!-#+--z ":900:" Title: ";:INP,(21,N$,0),TI$:`&#NL(NL1):q&#PN(PN1):&T$900:"How many copies (1-24)? ";:INP,(2,"-09",1),A$:NC(A$):NC1NC249300'^$NC1įHSP,1::"Do you want all copies the same? ";:30100:ND(Z$"N")'h$HSP:.'$AK(AK1):'%NR0:J0:TP(A,0):T20:I1T:O%(P(A,I))(NPS(A,I)100):O%(P(A,I))O%(P(A,I))1'!%:A6NP17O%(20)0:O%(1)1:O%(2)1:O%(21)0:O%(15)0'&%I134:NRNR(O%(I)):'+%NRNPİ9700:(0%NR0:JJleast 15 problems. Please re-enter the number of problems per objective.":SPACE:7120!Nİ900:18:"You originally asked for";:HSP,1:" "NP" problems.":HSP:"The above design has "NPN" problems. Do you want to re-enter the number of problems per L$","8/TWRITE,(PN)",":TWRITE,(NC)",":TWRITE,(AK)",":TWRITE,(ND)",":TWRITE,(PW)",":TWRITE,(DN)",":TWRITE,(DP)",":CLOSE:8 0L020:Q$(L)""::FCN,".WS",Q$,QC:QCāLQC11:Q$(L)Q$(L1)::Q$(0)""8080uCO$:SPACE::9uname"S$(QC1)"."::DD$"continue? ";:30100:Z$"N"PW0:975,0:10099e*$'11800:NT1Z$"N":10040*.'QCNC:11000:DD$"use one of the above name lists? ";:30100*8'GCP,QX,QY:Z$"N"İ11100:10099*='NT1CT1:10060S+B'CO,0,QY9:CEW:"Which name list (1-"NT")? ";:INP,(2,"-09",1),Z$:CT(Z$):CT1CTNTįCO,QX,QY:CEW:10050+L'11300:QCNS:BOX:300:11400:"Is this the right name list? ";:30100:Z$"N"10030+V'QCNC:NA$NT$(CT)+s'$,*VSP:BOX:CO:300:"Name lists saved:"::L110:L10)L". "NT$(L):NA$NT$(L)Ĺ975,L.,+::,\+GCP,QX,QY:NS0:L124:L101:NS$(L,L1)"":::BOX:300:11400:L1QC:11250:NSL:11400:,f+CO,0,QY:CEW:DD$"make any":"corrections? ";:30100:Z$"Y"İ112000-p+CO,0,QY:CEW:DD$"save this name list for future use? ";:30100:Z$"Y"İ11500:L-z+CT$"TEMP":NT1:11540R-+-+CO,0,QY:CEW:CO,0,182:RR$CC$:CO,0,QY:"Which number? "CA$;:INP,(2,"-09",0),Z$:L(Z$):Z$""11230-+L0LQCİ11250:11400-+11200-+`.+CO,0,QY:CEW:" Last name: "CA$;:INP,(11,KN$,1),NS$(L,0):CO,2:"First name: "CA$;:INP,(11,KN$,1),NS$(L,1):.$,L124:L101:NS$(L,L1)"":::CT$NT$(CT):33000:OPEN,CT$".NL":TPTR,0:TREED,TX$,NS$(0,0):NS(NS$(0,0))/.,L1NS:TREED,TX$,NS$(L,0):TREED,TX$,NS$(L,1)::CLOSE:4/,Q124:Q$(Q)""::NS11420/,Q1NS:Q$NS$(Q,0)", "NS$(Q,1):(Q$)15Q$NS$(Q,0)", "(NS$(Q,1),1)"."/,Q$(Q)Q$:/,11450:/,HSP,1:BOX,0,11,279,129:CO,0,13:QQQC:NSQQQQNS=0,QT(QQ2.6):Q1QT:QQQĺQ10)Q". "Q$(Q)CA$;:QQT1QQĖ21:QQT10)QQT". "Q$(QQT)L0,QQTQQĺ0,::GCP,QX,QY:6:0,QY5279,QY5:HSP,2:CO,0,139:QY139:0,11000:GCP,QX,QY:NT10İ11600:NT1011560)1,CO,0,QY:CEW:"Enter a new name for your":"name list: "CA$;:INP,(20,"-AZ-az-09.'` -",1),CT$:NA$CT$O1-CT0:L010:CT$NT$(L)CT1:L91 -:CTĺ:"That name has already been used.":30000:115101-Q(CT$):(Q65Q90)(Q97Q122)įCO,QX,QY:11700:11510[2-CTNT1:NTCT:NT$(NT)CT$:ZW1:33000:OPEN,CT$".NL":TPTR,0:TWRITE,(QC)",":L1QC:TWRITE,NS$(L,0)",":TWRITE,NS$(L,1)","::CLOSEz2-CT0İ11800:11000:SPACE2(-2P-"Before you can save your new name list, one of the above lists must be deleted."::DD$"do this? ";:30100:Z$"N"11699d3Z-CO,0,QY:CEW:"Delete which list (1-"NT")? "CA$;:INP,(2,"-09",1),Z$:CT(Z$):CT1CT10116103d-:33000:D$"DELETE"NT$(CT)".NL":NT$(10)"":FCN,".NL",NT$,NT:NTNT1:110003-4-CO,QX,QY:CEW:CO,QX,QY:"You must use a letter for the first character of the name.":30000:Z4.L010:NT$(L)""::33000:FCN,".NL",NT$,NT:NTNT1:4.12300:NS20:BOX,0,11:11450:GCP,QX,QY4.QC20121005.CO,0,120:"Before you can save your new"W$", one of the above"W$"s must be deleted."::DD$"do this? ";:30100:Z$"N"12140w5.CO,0,120:CEW:"Delete which"W$" (1-20)? ";:INP,(2,"-09",1),Q$:Q(Q$):Q1Q20120305/ZW1:33000::(4)"DELETE"Q$(Q)".WS":12000#6D/CO,QX,QY:CEW:HSP,1:"Enter a name for the"W$" that you have designed: "CA$;:INP,(14,"-AZ-az-09.'` -",1),CT$:HSP,26N/L120:LL99(Q$(L)CT$)::L50įCO,QX,QY:CEW:"That name has already been used.":30000:121006X/Q(CT$):(Q65Q90)(Q97Q122)įCO,QX,QY:CEW:11700:121006b/F$CT$".WS":12200:12300:11450`7l/FIįBOX,0,120,279,191:CO,0,130:"Do you want to print the worksheet(s) now? ";:30100:FI(Z$"Y"):m7v/SPACE:8/ZW1:33000:OPEN,F$:TPTR,0:TWRITE,OA$",":I14:TWRITE,DV$(I)","::I134:TWRITE,O$(I)","::TWRITE,NP$",":TWRITE,TI$",":TWRITE,NND::"Which number? ";:INP,(1,B$,1),A$:A(A$):DP(A$)D)&400:)'CT0:QCNC:300::::::"This option allows you to place names on each"W$" printed. Since the current number of"W$"s to be printed is ";F*'QC", you must provide a list of "QC" HSP,1:300000<00u*0:u:SPACE::?0uCA$;:GCP,ZX,ZY0uCO,ZX,ZY:CEL:INP,(3,"YESNOyesno",1),Z$:Z(Z$):Z$(Z32(Z96)):Z$"Y"Z$"N"301100u0yHSP0"y20000,y0}0 }ZE(222):ZN(218)(219)256:216,0:32000Q1}CO$:BOX,0,10,279,191:WIND:HSP:VSP:CO,0,80:ZE6ĺ"Error: File not found.";:32100f1}ZUZE0ZE16Ħv1}ZE8330201d}ZE255Ĵ(919)031000: 2x}WIND:CL$CO$:CO,0,80:"Error "ZE" at line # "ZN" in "PN$::"Please report this error to MECC.":300YES-NO9uCA$;:GCP,ZX,ZY{9uCO,ZX,ZY:CEL:INP,(3,"YESNOyesno",1),Z$:Z(Z$):Z$(Z32(Z96)):Z$"Y"Z$"N"301209u9yCL$:CO,0,89:"Would you like to try again? ";:301009"yZ$"Y"ĺ: :|yCL$:CO,0,89:"One moment please...":33000:R:CL$CO$:CO,0,80:"Error "ZE" at line #"ZN" in "PN$"."::"Please report this error to MECC.":30000:31000;耲FORCE DISK SWITCH AND VERIFY;ZZZU:ZU1:SET,ZD1:ZS704:ZC9533ZD:ZP0:Z0:ZT$D1$:Z$"program"[BZE0:ZFZEĺD$"DELETE MECC$$DISK"!>KZW0:ZUZZ:V>LD1$",S"((953))",D"((954))",V"((955))\>k>ZN$"":Z1>ā(ZSZ)0Z36ZN$ZN$((ZSZ)):ZZ1:33220>΁ZT(ZS)>>`Addition,34,32,Subtraction,18,17,Multiplication,20,16,Division,21,17NH,"MENU";:}ZE(222):ZN(218)(219)256:216,0:32000P:}ZUZE0ZE16Ħr:}ZE8İ33200:QN$ZN$:33020::(}ZE0ZE16ĺ"DOS Error #"ZE" in line #"ZN::"Please report this error to MECC.":30000::d}:n}ZE255Ĵ(919)031000:l;x}WINDZN$((ZSZ)):ZZ1:33220)5΁ZT(ZS)/55PÃDesign a Worksheet,WORKSHEET,This program allows you to design a worksheet to supplement any of the lessons in the Mastering Math Series.a6ZÃ" Worksheets can be designed by specifying objective numbers or indicating a program name. Once designed, the worksheet format can be saved for future use.6dÃPrint a Worksheet,"",This program allows you to print any worksheet that was previously designed and the format was saved.,""n7nÃ"Delete Designs or Names","",This option allows you to delete worksheet designs or student name lists that were previously saved.,""7ÃAddition,Subtraction,Multiplication,Division from your "Z$" diskette.":ZP1:SPACE::33040W4BZE0:ZFZEĺD$"DELETE MECC$$DISK"h4KZW0:ZUZZ:4LGET DRIVE STRINGS4VD1$",S"((953))",D"((954))",V"((955)):44GET DISK NAME AND TYPE4ZN$"":Z15ā(ZSZ)0Z36ZN$MOA1ĺCL$:VSP,8:CO,0,75:"There are no management options available.":30000:2000 AS(3)F1$"Printer Support":F2$"PRINTER SUPPORT" AS(6)5000 RUN THE PROGRAM A2İ14000:A02000 A3İ15000:2000 A0ANPF1$MN$(AL L L x@8MɭɊ=Le 2 `,0 (!U XT`I`I0, `n! J! { ^_ ( { R !,`L8n! <!=!< =Ѝ ,, ,`<=ʱD>` <=5#?6# "!)">? "PLj"" 8` "q" ""ȱ h!"8ȱ ">? "6p"5#>6#? "!p ""<"=`""8쭇"`+#*#)#@A %#  # `@ i @ ȱ ;#`,"`D# D`-#D.#ED`  ### <= <ȭ<ȭ<ȭ#<ȭ#<><ȥ?< <<= H <=#I<#<##`L,0):TREED,TX$,NS$(L,1)::CLOSE:E,Q124:Q$(Q)""::NS11420,Q1NS:Q$NS$(Q,0)", "NS$(Q,1):(Q$)15Q$NS$(Q,0)", "(NS$(Q,1),1)".",Q$(Q)Q$:,11450:,BOX,0,11,279,124:HSP,1:CO,0,13:QQQC:NSQQQQNSE,QT(QQ2.6):                      /#MENU FOR WORKSHEET GENERATOR7((C) MECC, 1985P2CURRENT:85/08/07PRW\Z3200031700:CA$(1):CC$(3):D$(13)(4):CL$(12):CN$(14):CO$(15):DD$"Do you want to ":W$" worksheet" 33100:ZS704:SET,1:RFL,"MECC$$DISK"ZS:33200:QN$ZN$< MT13:ML37:SP0:KN$"-AZ-az .'/-09-":S$(1)"s"W P(S)(S)(S1)256r RFL,"TITLE.PFT"64278 LVE$"Version 1.1":NP3:DP2:MO0:PN$"Menu"g jNT$(10),NS$(24,1),MN$(NP),CN$(NP),DS$(NP,DP),Q$(25),O%(38),DV(4),Y$(1),M$(1),OP$(4):Y$(0)"No":Y$(1)"Yes":M$(1)"all the same":M$(0)"all different":RR$"(Press RETURN if done)":TX$","(0) tL1NP:MN$(L),CN$(L):L11DP:DS$(L,L1):::L14:OP$(L): QCāLQC11:Q$(L)Q$(L1)::Q$(0)""# QU0:NP3:DP2:MO0:TI$"Worksheet Generator":(975)255Č24768:975,1_ 230,64:24576:DFT,1,64278:AFT,1:CO$:HSP:VSP:WIND CL$:6000:CO,0,MT:CN$TI$CC$ CO$:GCP,ZX,ZY:WIND,ML,ZYSP,270:CO:"Programs:" :L1NP:4(L9):L". "MN$(L):: "Options:":) NNP1:4(N9):S(1)N:N". General Information"Y *NN1:4(N9):S(3)N:N". Printer Support"} HNN1:4(N9):S(6)N:N". End" RESPOND TO USER'S CHOICE :GCP,ZX,ZY:ZY160įCO,ZX,ZY4 "Which number? ";:9000:WIND AS(1)İ7000:2000Y    󻵻廲󻲻廳5911,185:267,6267,32:269,6269,33:267,159267,185:269,158269,185y6:X10:Y10:X2278:Y2191:DX18:DY12:L025X1DXL,Y1LX2DXL,Y1LX2DXL,Y1DYLX2L,Y1DYLX2L,Y2DYLX2DXL,Y2DYLX2DXL,Y2LX1DXL,Y2LX1DXL,Y2DYLX1L,Y2DYLX1L,Y1DYLX1DXL,Y1DYLX1DXL,Y1L:1:L02:9,6L432L,6L:2352L,6L269,6L:9,183L392L,183L:2392L,183L269,183L:XGENERAL INFORMATIONbCL$TI$CC$lVE$CC$:::GCP,X1,Y1v8:"The Worksheet Generator package is one of the teacher utility diskettes for use with MECC's Mastering Math Series. This series focuses on the whole number skills normally taught in grades 1-4."{30000:CO,X1,Y1:CEW"This package allows teachers to design and print worksheets to supplement lessons found on any of these diskettes:"::" 1. Early Addition":" 2. Circus Math":" 3. Addition Logician"" 4. Space Subtraction":" 5. Subtraction Puzzles":" 6. Multiplication Puzzles":" 7. Quotient Quest":30000:CO,X1,Y1:CEW?L1NP:GCP,ZX,ZY::CO,X1,Y1:CEWMN$(L)::" ";:GCP,ZX,ZY:WIND,ZX,ZY,279,191:L11DP:DS$(L,L1);:L1:L2L3:WIND:::MN$(L)::" ";:GCP,ZX,ZY:WIND,ZX,ZY,279,191:DS$(3,1)WIND:::30000:L ^*CL$:CO:VSP,10::"A manual to aid in the use of this diskette is available from MECC.":VSP49:" Title: ";CA$;:GCP,ZX,ZY:"Mastering Math":CO,ZX:TI$>12:" Direct inquiries to:"::" "CC$;:GCP,ZX,ZY^H:WIND,ZX,ZY,279:CO:"MECC Distribution":"3490 Lexington Avenue North":"St. Paul, Minnesota 55126":"(612) 481-3500"tR30000:CL$:WINDzVSP,4:CL$:::"Use of ESC Key"CC$::9"You may want to quit in the middle of a program. If so, press the Escape (Esc) key twice whenever the computer is waiting for a response."QWIND:VSP:30000:`(#GCP,ZX,ZY2#CO,ZX,ZY:INP,(1,"-16",1),Z$:A(Z$)x#XX((79))#:5'CT0:QCNC:11600:CO,0,70:"This option allows you to place names on each"W$" printed. Since the current number of"W$"s to be printed is ";'QC", you must provide a list of "QC" name"S$(QC1)"."::DD$"continue? ";:30100:Z$"N"PW0:975,0:10099$'L010:NT$(L)""::33000:FCN,".NL",NT$,NT:NTNT1:NT1Z$"N":100404.'QCNC:11000:DD$"use one of the above name lists? ";:30100Y8'GCP,QX,QY:Z$"N"İ11100:10099o='NT1CT1:10060B'CO,0,QY9:CEW:"Which name list (1-"NT")? ";:INP,(2,"-09",1),Z$:CT(Z$):CT1CTNTįCO,QX,QY:CEW:100506L'11300:BOX:11600:11400:"Is this the right name list? ";:30100:Z$"N"10030Bs'NCQC:[*VSP:BOX:CO:11600+"Name lists saved:"::L110:L10)L". "NT$(L):::\+GCP,QX,QY:NS0:L124:L101:NS$(L,L1)"":::BOX:11600:11400:L1QC:11250:NSL:11400:Ef+CO,0,QY:CEW:DD$"make any":"corrections? ";:30100:Z$"Y"İ11200az+CT$"TEMP":NT1:11550g++CO,0,QY:CEW:CO,0,182:RR$CC$:CO,0,QY:"Which number? "CA$;:INP,(2,"-09",0),Z$:L(Z$):Z$""ı+L0LQCİ11250:11400+11200+q+CO,0,QY:CEW:" Last name: "CA$;:INP,(11,KN$,1),NS$(L,0):CO,2:"First name: "CA$;:INP,(11,KN$,1),NS$(L,1):$,L124:L101:NS$(L,L1)"":::CT$NT$(CT):33000:OPEN,CT$".NL":TPTR,0:TREED,TX$,NS$(0,0):NS(NS$(0,0))#.,L1NS:TREED,TX$,NS$():F2$CN$(A)LCL$:HSP:VSP:CO,0,89:"Getting "F1$"...":33000:RNH,F2$RCL$:CO,0,89:"Insert another diskette."CC$30000:CL$CS(P(P(999))1)16CSp4:21,021,191G1:9,69,33:11,611,32:9,1589,185:11,1󻶻묠󻲻廴件軴  ?npLnnpLn ^p nto n ^p-tototo hpLnsouoso^` , g 掮p ,qo pp) p pp)Np ߅ l vo ) L{Kp,p0- HHHp hhh ɛ nKp,K````L` c cڍb-q$% `@ ?aDa6 ,3gLEcLfHabHaa,,,aaɠ,ua ` a欈aah,`ɀ)?  @IH mc$ =e If$%0 =e zf%%h $20 Lc $ aHaH`