' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]L L}BBL] 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` `ee`>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`FG8`0($ p,&"_]` L/浍굺L  !"#$%&'()*+,-./0123456789:;<=>?  1#"""  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0EB H  @H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   vLDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx-k `eϠ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L ` `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(`# d ֠ez# eu`ez#     Ӡ$(I)"":I11:1:868:I:V99V:(P(15)1)16042012:1:868:13:1:868:23:2:"PRESS ";::"LETTER";::" TO SELECT OR DE-SELECT"5);"ANSWER(S), THEN PRESS ";::"CTRL-E";::".";:I0:36,40I$:I$(5)470I(I$)6432(I ANSWERS,":"AT LEAST ONE MUST BE CORRECT:":LL15:HL20:I16:14I:1(64I);" : ";(T$(I3),5);:I:530:LE5:40:HL6:V49:T$"":WP(V11):J0:X540I(WX)128:T$T$(I):JJ(I32):X:JT$(V)(61V)" : "T$:434HLV4:IV9:T|J$;:I$I$J$:3104:1:958:"MULTIPLE CHOICE QUESTION -- ENTER":"THE QUESTION IN THE FRAME BELOW:"::T$(1);T$(2);T$(3)LL7:HL9:LE1:40:V13:T$"":WP(V6):X140:T$T$((WX)128):X:T$(V)T$:VG12:1:"ENTER UP TO 6 POSSIBLE10:T$(I)"":I:V20: ,I$""=6J$:J$(27)I$(27):U@J$(13)I$""310eJJ$(13)ı|TJ$(8)I$""310^J$(8)(I$)1I$"":(8);" ";(8);:310hJ$(8)I$(I$,(I$)1):(8);" ";(8);:310rJ$"0"J$"9"(I$)2310SCRIPTION OF THIS TEST:"::I510:T$(I);:I:LL15:HL20:40V510:T$"":WP(V10):X140:T$T$((WX)128):X:T$(V)T$:V4000:I$(13)200X$(0)"100"T$(1)T$(2)T$(3)T$(4)T$(5):X$(1)"100"T$(6)T$(7)T$(8)T$(9)T$(10)I1 THIS TEST:"::T$(1);T$(2);T$(3):LL3:HL5:LE1:40V13:T$"":WP(V2):X140:T$T$((WX)128):X:T$(V)T$:V:8:1"ENTER YOUR NAME:"::T$(4):LL10:HL10:40:T$(4)"":WP(10):X140:T$(4)T$(4)((WX)128):X=13:1:"ENTER A DEPPEND LESSON.NAMES":D$;"WRITE LESSON.NAMES":(34);T1$;(34):D$:D$;"CLOSE LESSON.NAMES"D$:1250:D$:D$;"OPEN ";T1$:D$;"DELETE ";T1$:D$;"OPEN ";T1$:D$;"WRITE ";T1$I0CH:(34);X$(I);(34):I:D$:D$;"CLOSE":4:1:"ENTER A TITLE FORES,D";DR$;",V99":D$;"READ LESSON.NAMES"=I$:I$T1$164:D$:D$;"CLOSE LESSON.NAMES":10:"LESSON NAME : ";T1$:"ALREADY EXISTS; DO YOU WANT TO":"USE THAT NAME ANYWAY (Y/N)?":100:I01401250:172ZD$:D$;"CLOSE LESSON.NAMES":D$;"AE READY.":3400:I$(27)Ĭ58J$"STUDENT DISK":1240s:6:"ENTER NAME FOR TEST FILE :":LL6:HL6:LE28:40T1$"":X16911703:T1$T1$((X)128):X(T1$)321524000:I$(13)140(T1$"LSN."T1$:1250:D$:D$;"OPEN LESSON.NAM fI78I110I0: g101] n6J2:I112:HM%(SU,J,I);I111);"OF ";LM%(SU,J,I);:~ xD$:D$;"PR#1":(9);"80N": (9);"I":D$:D$;"PR#0"::10:" PLACE A STUDENT DISK IN EITHER DRIVE,":" THEN PRESS ";::"RETURN";::" WHEN YOU AR USING THE":"ARROW KEYS TO EDIT YOUR TEXT. ";::"CTRL-K";::" IS" L" EQUIVALENT TO THE UP ARROW, ";::"CTRL-J";::" TO":"DOWN ARROW. PRESS "; N:"CTRL-E";::" WHEN COMPLETE.";: d24:36,40:16368,0 eI$:I(I$):I13I89I121I1:958:24:7::" W O R K I N G ";::36,40:? D44 F16368,0:HLLLĢ24:7:"ENTER TEXT, THEN PRESS ";::"RETURN";::".";: H(HL18)Ģ24:6:"ENTER TEXT, THEN PRESS ";::"CTRL-E";::".";:D J21:1:"ENTER TEXT IN THE FRAME ABOVE2):42 6A155Ĭ5Q 8A136CPCP1(41LE)(CPLE):CLCL(CP40)(CLLL):44_ :A14942 <(A132)(A138)CLCL(CLHL):44 >A139CLCL(CLLL):44 ?(A141)(LLHL)A133 @A141CPLE:CLCL(CLHL):447 BA133Ģ213(HL18):1:D$(4):DR$"1":1300f (:1:LL1:40);:HL1:40);::70:24:36,40:LELE(LE0):CLLL1:CPLE1 *CPCP1(41LE)(CP40):CLCL(CPLE)(CLHL) ,BP(CL)CP:SA(B) .B,32:A(16384):B,SA:A12752 046 416368,0:A159ĹB,A5(A16k (21)7P(A)895A128((A1)8)984:2300 :(4):(4);"CLOSE":T$(10),SU$(8),FH$(8),BH$(8),HM%(7,5,3),LM%(7,5,3),QQ%(200),TS(7),X$(44) 104,168,104,166,223,154,72,152,72,96,0  :I768778:J:I,J:I:S$"":I140:S$S$" ":I:                                   CF0:K2210,1350,1490,1690,7400,5000,2200,4990,2160,1400,1900,1340M&21300U&<:&FJ$"BLANK QUESTION DISK":1240::20940,96'dD$:D$;"CATALOG,D";DR$::10:"DISK IN DRIVE #";DR$;(" ALREADY CONTAINS DATA, CONTAINS SYSTEM DISK!",1((43622)100CREATE A PRINTED TEST":"G ... PREPARE A STUDENT DISK":"H ... CREATE A COMPUTER TEST":"I ... VIEW A COMPUTER TEST"%#"J ... DELETE SUBJECT AREAS":"K ... EXAMINE FREE STORAGE ON DISK":"L ... EXIT PROGRAM"C&(X13:L2:K1:3200:X((78)256(79)): R K I N G ":13:8:25)::y$:3:1::"A";::" ... MAKE A BACKUP DISK":"B ... PREPARE QUESTION BANK DISK"$"C ... CREATE QUESTION MATERIAL":"D ... EDIT OR REVIEW QUESTION MATERIAL":"E ... PRINT ALL QUESTIONS IN A SUBJECT"t%"F ... T$(7);T$(8);T$(9);T$(10):7#J$"QUESTION BANK DISK"#:8:8);"WHICH DRIVE CONTAINS THE":14(J$)2);J$;" (1 OR 2)? ";DR$:3300#I$:I$(27)Ĭ5#I$(13)1250#I$"1"I$"2"1242#DR$I$:1240$$:11:8::25):12:8:" W O710:T$"":WP(V12):X140:T$T$((WX)128):X:T$S$T$""Q"T$(V)T$:V`"1030:880"4:1:958::"THE FOLLOWING STATEMENT IS FALSE:":::T$(1);T$(2);T$(3)::"INCORRECT PHRASE:":::T$(6)#:"THESE PHRASES WOULD MAKE IT TRUE:":::E STATEMENT FALSE?"::T$(6):LL14:HL14:LE1:40:T$"":WP(14):X140x!T$T$((WX)128):X:T$(6)T$:T$S$1000!16:1:"WHAT WORD(S) COULD YOU SUBSTITUTE":"TO MAKE THE STATEMENT TRUE?"::T$(7);T$(8);T$(9);T$(10):LL19:HL22:LE1:40A"V$(3)::"IF THE STUDENT RESPONDS ";(34);:V21ĺ"TRUE";L V22ĺ"FALSE"; (34);",":"THEN THE PROGRAM WILL RESPOND:":::"YES! THAT IS CORRECT!":::"AN INCORRECT RESPONSE WILL DISPLAY:":::T$(4);T$(5):H!12:1:958:"WHAT WORD(S) MAKE THqW"?"::T$(4);T$(5):LL19:HL20:LE1:40:V45:T$"":WP(V15):X140:T$T$((WX)128):X:T$(V)T$:V\TQ41000f890p4000:I$(13)ıuCH1:800x8888 z4:1:958::"HERE IS THE TRUE-FALSE STATEMENT:":::T$(1);T$(2);T14:25:958:840QDI$"B"I$"b"V22:14:4:" ";:15:958:840ZF832yH4000:I$(13)V20:825M16:1:958:"WHAT FEEDBACK SHOULD BE DISPLAYED IF":"THE STUDENT INCORRECTLY RESPONDS ";::V21ĺ"FALSE";:RV22ĺ"TRUE";:(WX)128):X:T$(V)T$:V:TQ4V22:845912:1:958:12);"THE STATEMENT IS:"::4);" ... TRUE";25);" ... FALSE":23:4:"TYPE THE ";::"LETTER";::" OF YOUR SELECTION.";>V2I$(64V2):834@24:36,40:I$BI$"A"I$"a"V21:4:1:958:I$"TRUE-FALSE":TQ4Ģ12:1:"A MODIFIED T/F QUESTION IS ALWAYS FALSE.":I$"MODIFIED T/F"*4:1:I$;" QUESTION -- ENTER A":"STATEMENT IN THE FRAME BELOW:"::T$(1);T$(2);T$(3):LL7:HL9:LE1:40)4V13:T$"":WP(V6):X140:T$T$(T$T$((WX)128):X:T$S$T$""3T$(V)T$:VN680:4000:I$(13)ı\CH1:6004:1:958::"HERE IS THE FILL-IN-THE-BLANK QUESTION:":::T$(1);T$(2);T$(3)::"THE CORRECT ANSWER(S) TO THE QUESTION:":::I49:T$(I);:I:e DID NOT INCLUDE AT LEAST THREE":"HYPHENS (---) TO DESIGNATE THE BLANK.":3400:60013:1:"NOW ENTER THE CORRECT ANSWER(S) TO THE":"QUESTION (ONLY ONE ANSWER PER LINE):"::I16:T$(I3);:I:LL16:HL21:LE1:40#V49:T$"":WP(V12):X140:USE AT LEAST THREE":"HYPHENS (---) TO DESIGNATE THE BLANK:"::T$(1);T$(2);T$(3)bLL8:HL10:LE1:40:V13:T$"":WP(V7):X140:T$T$((WX)128):X:T$(V)T$:VlI0:V13:X140:II((T$(V),X,3)"---"):X,V:(I)640Sv4:1:958:"YOU ::"AND HERE ARE THE RESPONSES":"(CORRECT ANSWERS IN INVERSE):"v:IV2:J16:14J:1:I2(6J)Ğ:II2(6J)T$(J3)""ĺ(64J);::(T$(J3),39);&:J:QX4:1:958:"FILL IN THE BLANK QUESTION -- ENTER THE":"QUESTION BELOW, AND $"Z"):(I1)(IHL)450USAP(14I)1:J(SA):SA,J192(J192)192(J192):450V20:I05:V2V2((P(20I)1)160)2I:I:V20450520:4000:I$(13)ıCH1:400A4:1:958::"HERE IS YOUR QUESTION:":::T$(1);T$(2);T$(3)::I$(27)1890[662:1:"QUESTION #";LF;", DIFFICULTY LEVEL: ";("LOW MED HIGH",DC43,4);6:3:958:9:2:"PRESS THE ";::"RETURN";::" KEY TO STORE ON DISK."::10);"PRESS THE ";::"SPACE BAR";::" TO"S7?11);"DELETE THIS QUESTION."::11); CAN ADD NEW MATERIAL, YOU":"MUST OPEN A SUBJECT AREA USING OPTION ";::"B";::".":3400:15005I$"ADD TO":3250:K0130050SUK::1:"SUBJECT #";SU;": ";SU$(SU):2705:LFLF1522:1:"QUESTION #";LF;30):3800:I$(27)1890 64DC1:2520:o4I$(TQ)(DC)(V264):D$:D$;"WRITE ";FH$(SU);",R";RN:(34);I$;T$(1);T$(2);T$(3);T$(4);T$(5);(34):D$4D$:D$;"WRITE ";BH$(SU);",R";RN:(34);I$;T$(6);T$(7);T$(8);T$(9);T$(10);(34):D$4270:2:1:958:1750a5NS0Ģ19:1:"BEFORE YOU0,4790Z32:1:"QUESTION #";RN;", DIFFICULTY LEVEL: ";("LOW MED HIGH",DC43,4);:4000m3I$(13)17883KDC:CH1:2500:KDC17803TQ490,660,870,1025,4860:I$(27)17963CH0179642:958:12:7::" W O R K I N G ":13:5:"REVIEW WHICH QUESTION NUMBER? ";:300:I$(27)I$"0"I$"00"ė:D$:D$;"CLOSE":1710x2RN(I$):RNLF175022:1:958:6700:TQCA2D$:D$;"READ ";BH$(SU);",R";RN:J$:D$:I15:T$(I5)(J$,I4036,40):I:CH03TQ520,680,890,1030::"SUBJECT #";SU;": ";SU$(SU):2:1:40)1LF0ĺD$:D$;"CLOSE":12:"NO QUESTIONS FOUND IN THIS SUBJECT AREA.":3400:171013:958:9:1:"SUBJECT CURRENTLY CONTAINS ";LF;" QUESTIONS.":11:2:"ENTER '0' TO CLOSE THIS SUBJECT AREA.":3300_2BJECT AREAS AVAILABLE FOR REVIEW.":3400:130001460:": EDIT/REVIEW QUESTIONS IN SUBJECT AREA":16:1:"B: CHANGE SUBJECT AREA'S NAME"0"C: EXIT THIS OPTION":X4:L14:3200:K213000K215900I$"EDIT/REVIEW":3250:K01300,1SUK:270/^I2(SU$):J((SU$,I,1)):(J47J58)(J64)I$I$(J)/hI:I$(I$,8):J0:I1NS:KIJJ(SU$SU$(I))(("A."I$)FH$(I))/rI:J0Ģ20:1:"SUBJECT NAME IS NOT UNIQUE. TRY AGAIN.":3400:1600/|/1230.02600:NS0ė:12:2:"NO SU218X225)X250Ģ20:1:"FIRST CHARACTER MUST BE LETTER (A TO Z).":3400:1600.J4000:22:958::11::" W O R K I N G "::J40:I$(13)1600.O(1103J)160J7JJ1:1615.TSU$"":WP(17):X7J:SU$SU$((WX)128):X:I$((SU$))=D$:D$;"CLOSE":0-6I$"CHANGE":3250:K01710?-8SU$SU$(K)-::13:1:"ENTER A NEW NAME FOR THE":1600:1250:SU$(K)SU$:1584:1710-@14:1:958:"SUBJECT AREA IN THE FRAME BELOW:":LL17:HL17:LE7:17:K;" ... ";SU$:40P.EX(1110):X193(X",L206":D$;"WRITE ";BH$(NS);",R0":(34);"0";(34):D$;"CLOSE":1584:1500,0D$:D$;"OPEN SUBJECTS,D";DR$;",V101":D$;"DELETE SUBJECTS,D";DR$:D$;"OPEN SUBJECTS,D";DR$:D$;"WRITE SUBJECTS"-2C$",":I1NS:(34);SU$(I);(34);C$;FH$(I);C$;BH$(I):I:810A+12:958:13:1:"ENTER A NAME FOR THE NEW":KNS1:1600y+*NSNS1:SU$(NS)SU$:FH$(NS)"A."I$:BH$(NS)"B."I$+,D$:D$;"OPEN ";FH$(NS);",D";DR$;",V101,L206":D$;"WRITE ";FH$(NS);",R0":(34);"0";(34):D$;"CLOSE"K,.D$:D$;"OPEN ";BH$(NS);SĺSU$(I)=*I:11:1::40):::"OPTIONS:":::"A";::M*1230:2600W*1460*" ... ADD QUESTIONS TO A SUBJECT AREA":"B ... ENTER NAME OF NEW SUBECT AREA":"C ... EXIT THIS OPTION"*X4:L14:3200:(K2NS7)(K2)1300+SU$"":K11E ";FH$(K);",D";DR$:D$;"DELETE ";BH$(K)n)IK7:SU$(I)SU$(I1):FH$(I)SH$(I1):BH$(I)BH$(I1):I:NSNS1)NS0ĺD$:D$;"DELETE SUBJECTS,D";DR$:D$:1300)1584:1405 *::"CURRENT SUBJECT AREAS:"::40);::I17:I3:1:I;" ... ";:INIVE #";DR$;" IS READY.":3400:13003(x1230:2600S(}I$"DELETE":3250:K01300(:K5:1:K;" ... ";SU$(K):14:1:"YOU HAVE ELECTED TO ERASE ALL QUESTION"("MATERIAL STORED IN THIS SUBJECT AREA.":4000:I$(13)1405()1250:D$:D$;"DELET)23,23)'i"PREPARING A NEW QUESTION BANK DISK WILL":"ERASE ALL DATA STORED ON THAT DISK."::"DO YOU WANT TO USE IT ANYWAY (Y OR N)?":100:I01300#(n1250:D$:D$;"INIT HELLO,D";DR$;",V101":D$;"DELETE HELLO,D";DR$::12:"QUESTION BANK DISK IN DR2800F6 14:1:958:4000/F; I$(13)2800VF@ X$(2)"0"(NM64)(NQ64):CH3:F 23:4:"TYPE THE ";::"LETTER";::" OF YOUR SELECTION,":8);"THEN PRESS THE ";F :"RETURN";::" KEY.";:36,40:16368,0:K1F I$:I$(13)ıG I$(27:".":NMNQ:2870E "THE STUDENT MUST CORRECTLY ANSWER ";NQ:"QUESTIONS FOR A GRADE OF ";::"EXCELLENT";::"."::"HOW MANY QUESTIONS MUST BE CORRECT"E "A GRADE OF ";::"SATISFACTORY";::"? ";E 300:I$(27)Ĭ5E NM(I$)F" NM1NMNQ ";FH$(SU);",R0":I$:LF(I$):D$:ED :"CREATING STUDENT PROGRAM"D 4:1:"YOU WILL BE ASKING ";TT;" QUESTIONS ON THE":"TEST YOU HAVE CREATED."::NQTTE NQ3ĺ"THE ONLY GRADES POSSIBLE WILL BE"::"EXCELLENT";::" AND ";::"UNSATISFACTORY";:D";DR$;",V101":D$;"READ SUBJECTS"aC2 SU$,I$,J$:NSNS1:SU$(NS)SU$:FH$(NS)I$:BH$(NS)J$:2610C< 768:D$:D$;"CLOSE SUBJECTS":C 1250C LF0C D$:D$;"OPEN ";FH$(SU);",D";DR$;",L206,V101"C D$:D$;"OPEN ";BH$(SU);",L206"#D D$:D$;"READ:100:IıHB 23:1::"TYPE NUMBER OF CORRECT DIFFICULTY LEVEL":5);B "1=LOWEST 2=MEDIUM 3=HIGHEST";5);::36,40:16368,0B I$:I$(27)ıB I$"1"I$"3"2540B DC(I$):2500B( D$"C- NS18:SU$(NS)"":NS:NS0:D$;"OPEN SUBJECTS, ";(218)256(219);", CONSULT MANUAL."HA 768:222,0:D$:D$;"CLOSE"XA 3400:1300A 23:1:958::" ";(" LOWMEDIUM HIGH",DC65,6);" DIFFICULTY LEVEL ASSUMED FOR " B "THIS QUESTION; IS THAT CORRECT (";::"Y";::"/";::"N";::")? ";:REQUESTED COULD NOT BE":" LOCATED ON DRIVE #";DR$;", TRY AGAIN.":2490@ EN8ĺ3);"DISK I/O ERROR INVOLVING DRIVE #";DR$;".":2490@ EN9ĺ7);"DISK IN DRIVE #";DR$;" IS FULL.":2490(A 6);"ERROR CODE #";EN;" ENCOUNTERED":2);"IN LINE NUMBER;" DOES":"NOT CONTAIN A STUDENT DISK. TRY AGAIN.":3400:140?~ EL2230ĺ" DRIVE #1 DOES NOT CONTAIN TEST IT!":" SYSTEM DISK AS REQUESTED, TRY AGAIN.":2490? EN4ĺ" DISK IN DRIVE #";DR$;" IS WRITE PROTECTED.":2490J@ EN6ĺ" INFORMATION 30:D$:%>D$:EL(218)256(219);> EL164Č768:170M> EL26102620_> EL52505260w>$ EL1380Č768:1390>. (EL1580)(EL1584)(EL1420)(EL2605)(EL2710)2250>` :12:EN(222)>?t EL162Č768:"CANNOT SAVE TEST FILE -- DRIVE #";DR$":778,0:2230=778,2:2220*=778,1H=J$"TEST IT! SYSTEM DISK"a=1240:I$(27)1300=D$:D$;"RUN STUDENT,D";DR$=:12:" DISK #";DR$;" DOES NOT CONTAIN A QUESTION":" DISK. REMOVE THAT DISK AND TRY AGAIN.":3400:I$(27)Ĭ5>12ĺ" DISK IS NOT PART OF TEST IT! SYSTEM.":2000<NS(NS):15:3:"THIS QUESTION BANK DISK IS ";((560NS)5.6);"% FULL":" WITH ";NS;<" FREE SECTORS, OR ENOUGH SPACE":8);"FOR ";(NS0.631);" MORE QUESTIONS."<3400:1300=pJ$"STUDENT DISK;J04:K01:X1(19469(IJ)4K):(8842(X1255));:NSNS(X11)(2):Kb;J4ĺ" ! ";;J::I:VN(43622):15:1:VN100ĺ" THIS DISK IS A TEST IT! SYSTEM DISK.":2000;VN99ĺ" THIS DISK IS A TEST IT! STUDENT DISK.":20000<VN101ONE OF THE OTHER SUBJECT AREAS (Y/N)?":100:I01300?:j1820~:l:J$"DISK TO BE EVALUATED":1240:NS0:20940,96:I$"0"::vD$:D$;"CATALOG,D";DR$::5:6:"FREE SECTOR MAP FOR DRIVE #";DR$::I0345:" TRACKS ";I$;I;"-";I$;I4;" ";:I5I$""QFILE = ";LF1::"ANOTHER QUESTION IN SAME SUBJECT (Y/N)?":100K9dI18429f1250:D$:D$;"WRITE ";FH$(SU);",R0":(34);LF1;(34):D$:D$;"WRITE ";BH$(SU);",R0":(34);LF1;(34):D$5:hD$;"CLOSE"::12:"DO YOU WANT TO ADD QUESTION MATERIAL TO":" $(TQ)(DC)(V264):D$:D$;"WRITE ";FH$(SU);",R";LF:(34);I$;T$(1);T$(2);T$(3);T$(4);T$(5);(34):D$8]D$;"WRITE ";BH$(SU);",R";LF:(34);I$;T$(6);T$(7);T$(8);T$(9);T$(10);(34):D$:LFLF1?9b270:3:1:958:9:1:"TOTAL NUMBER OF QUESTIONS ON "PRESS ";::"ANY OTHER KEY"::4);"TO REVIEW THE INFORMATION ENTERED.":24:36,407DI$:I$(13)Ģ3:958:12:10::" W O R K I N G "::18807II$" "18907N16368,0:TQ490,660,860,1025,4860:I$(13)İ2500:I$(27)18507S1890i8XI4300:I$(13)5100&VTT01300iV1250:I1NS:J15:K13:LM%(I,J,K)HM%(I,J,K):K,J,I:9300VQQ$"":I1GL:(1)0.5QQ$QQ$(I):I:5120VQQ$(I)QQ$:IVTQ15CF:K0:I1NS:J13:KKHM%(I,TQ,J):J,I:K05210W CF0ĴTQJ(J1):5050:U(A132)(A138)İ110:JJ(J5CF):5050{UA136İ110:II13(I1):JJ(I3)(5CF)(I3)(J1):5050U(A141)(A149)İ110:II13(I3):JJ(I1)(5CF)(J5CF)(I1):5050U5055U4200:SUK:SU05020UTT05100V,0:A155ĺD$:D$;"CLOSE":1300tTA172K(HM%(SU,J,I)0):HM%(SU,J,I)HM%(SU,J,I)K:TTTTK:TS(SU)TS(SU)K:5045TA174K(HM%(SU,J,I)LM%(SU,J,I))(TTTP):HM%(SU,J,I)HM%(SU,J,I)K:TTTTK:TS(SU)TS(SU)K:5045TA1335100 U(A139)İ110:JEST IT! FILE."rSJ15CF:6J2:I13:I112:HM%(SU,J,I);:I111:"OF";:I114:LM%(SU,J,I);:I,J:I1:J1S1:16:(SU$(SU),24);:2:16:TS(SU);:3:16:TTS6J2:I112::HM%(SU,J,I);I111);"OF ";LM%(SU,J,I);:TA(16384):16368";33);"HIGH":20:2::" < ";::" AND ";::" > ";::" INCREASE/DECREASE TOTALS,"R"USE ";::"ARROW KEYS";::" TO MOVE CURSOR, ";::"CTRL-E";::" IFALL IS CORRECT, ";::"ESC";::" TO EXIT THIS OPTION."SCFĢ17:"20 QUESTIONS OR LESS IN A T00Q6000:5100Q:1:" SUBJECT:":"SUBJECT TOTAL:":" GRAND TOTAL:":8:" M.C."::" F.B."::" T.F."::"MODTF":CF0ĺ:"ESSAY"Q:I718CF22:I:7:34);:IQI74011:J717CF2:J:I:" ";:J,I:TR6:11);"LOW";22);"MED:"A";::": YOU SELECT QUESTIONS BY NUMBER"::"B: REVIEW/SELECT QUESTIONS INDIVIDUALLY":Q"C: COMPUTER RANDOMLY SELECTS QUESTIONS":" (YOU SELECT NUMBER AND DIFFICULTY":" LEVELS OF QUESTIONS TO BE USED)":X4:L5:3200::K7300,7200,5015:13TUDENT DISK (Y/N)?":100:I01300sO1230:2600:NS0ė:12:2:"NO SUBJECT AREAS HAVE BEEN OPENED.":3400:1300OI17:TS(I)0:J15:K13:LM%(I,J,K)0:HM%(I,J,K)0:K,J,I:QQ%(0)0:TT0:TP200CF180\P:5:" CREATE TEST BY WHICH METHOD?":::5:1:"ENTER AN ESSAY QUESTION BELOW:":I110:I6:1:T$(I):I:LL7:HL16:LE1:40NV110:T$"":WP(V6):X140:T$T$((WX)128):X:T$S$T$""NT$(V)T$:VN4790:4000:I$(13)ıNCH1:4800"O~CF1::10:"HAVE YOU PREPARED A SESTIONS YOU HAVE SELECTED.":^M"QUESTIONS COME FROM THESE SUBJECT AREAS:":I1NS:SU$(I);M(0)37(TS(I)9)ĺ".";:4320M" ";TS(I):I:4000:M3:1:958:5:1::"HERE IS THE ESSAY QUESTION:"::I110:I6:1:T$(I):I:VN3:1:958 A TOTAL OF ";TT;" QUESTIONS."{Lr2:1:"FROM WHICH OF THE SUBJECT AREAS LISTED":"BELOW WILL YOU SELECT TEST QUESTIONS?"L|::"0";::" ... SELECTION COMPLETE -- MAKE TEST":3260M:6:2:"THE TEST WILL NOW BE CONSTRUCTED FROM":" THE ";TT;" QU ";::"RETURN";::" KEY IF ALL IS CORRECT,":" OR ";::"ANY OTHER KEY";::" IF THERE IS AN ERROR.";K36,40:16368,0:I$:I$(27)ıK5Lh:16:"YOU WILL BE ABLE TO SELECT QUESTIONS":"FROM ALL SUBJECT AREAS. THUS FAR, YOU":"HAVE SELECTEDSE ONE OF THESE CATEGORIES:"::::"A";::" ... MULTIPLE CHOICE":"B ... FILL IN THE BLANK"J"C ... TRUE/FALSE QUESTION":"D ... MODIFIED TRUE FALSE":"E ... ESSAY QUESTION":X6:L6:3200JTQK:TQ400,600,800,800,4800JgK23:1:"PRESS THE" KEY.";:36,40:uIH 23:1:I140:"-";:I:5);"PRESS ";::" RETURN ";::" KEY TO CONTINUE.";:36,40:16368,0IR I$:I$(13)I$(27)ıI\ 3410ILF99ė:11:3:"LIMIT: 99 QUESTIONS PER SUBJECT AREA.":3400:LF100:1894]J5:958:"CHOO$(I):I:3300:K0:16368,02H I$:I$(13)Ė1:CH I$(27)Ĭ5]H I$"0"I$(NS)3270H I0NS:P(I5)1,48I128((I)I$):I:K(I$):3270I 22:4:"TYPE THE ";::"NUMBER";::" OF YOUR SELECTION,":8);"THEN PRESS THE ";::"RETURN";::)K99:5G I(I$)32(I$"Z"):I65I63(X)3210G KI64:J1(X)1:P(LJJ(X0))1,192J:J:P(LKK(X0))1,K:3210G :3:"WHICH SUBJECT AREA WILL YOU ";I$;"?":5::"0";::" ... NONE OF THESE SUBJECTS"H I17:I5:1:I;" ... ";SUI$(13)TTTPĺ"ACCEPTED":TTTT1:QQ%(TT)K%:TS(SU)TS(SU)1:7245SfH"REJECTED"]fM:RNwfRD$:D$;"CLOSE":7200fW4300:I$(13)7200f\9300:QQ%(0)1faTQ15CF:K0:I1TT:J(QQ%(I)1000):KK(JTQ):I:K05210gfCF0ĴTQ6100,6200"ANY OTHER KEY";::" TO DELETE IT.";:ce67120:3:1:958:14:16::I$(13)ĺ"RETAINED":7245e8"DELETED":TS(SU)TS(SU)1:TTTPTTTT1:7245e:KJTT1:QQ%(K)QQ%(K1):K:TTTT1:7245e>7100:3:1:958::I$" "RNLF:7245CfC14:16:43,4):TQ520,680,890,1030,4790dd0K%TQ1000SU100RN:J0:K0TT:JJK(K%QQ%(K)):K:J07230d222:1::119);:2039,32:22:3:"THIS IS 1 OF ";TT;" QUESTIONS SELECTED":" PREVIOUSLY. PRESS ";'e4:"RETURN";::" TO RETAIN":" IT, OR ";::2:"DIFFICULTY LEVEL : ":2705:LF0Ģ2:868:12:"NO QUESTIONS FOUND IN THIS SUBJECT AREA.":3400:7250c*RN1LF:6700:TQCA:CFTQ57245c,D$:D$;"READ ";BH$(SU);",R";RN:J$:D$ d.I15:T$(I5)(J$,I4036,40):I:2:20:("LOW MED HIGH",DC:" ";::" ACCEPTED: ";::"SPACE BAR";::" TO CLOSE SUBJ. ";::" ";::" ";TT;b24:36,40:16368,0:I$:I$(27)ıb1250:D$:D$;"CLOSE":5b 4200:SUK:(SU0)(TT0)7200b"SU07255ic%:1:1:"SUBJECT #";SU;": ";SU$(SU):INTER.":3400:1250:120*alYYĺ" ":" "av" ":"Name ";:ZZ140:"_";:ZZ:10);"Test ID Number ";HM%(0,0,0):" ":ZZ5:a22:1:"TO ACCEPT, PRESS ";::"RETURN";::". ";::" ";::" TOTAL NUMBERTO REJECT, ";::"ANY OTHER KEY";:\b" ";::7000`" ":7000:_`,D$:D$;"READ ";FH$(SU);",R";RN:I$:CA((I$,1,1)):DC((I$,2,1))`6V2((I$,3,1))64:I15:T$(I)(I$,I4036,40):I:D$:`XZZXX3ZZZZ1:`]" ":" ":ZZ3abYY0İ130::12:" PLACE A NEW SHEET OF PAPER IN PRK149:"_";:K:" Date ";:K114:"_";:K::7000_"Class ";:K148:"_";:K:" Test ID Number ";:HM%(0,0,0)1000(1)8999:HM%(0,0,0):7000:" ":7000_T1$"@"T1$"ALL QUESTIONS FROM":T2$"SUBJECT AREA: "SU$(SU)`T1$:7000:T2$S$ĺT2$e":7000:"word(s) that make the statement false, and write the word(s)":7000t^ "that would make it true.":6510^d"ESSAY. Discuss the following questions on the back of the page or":7000:"on your own paper."^n7000:" ":7000:4_"Name ";:tatement carefully and supply the":7000:"missing word(s).":6510]"TRUE/FALSE. Read each statement carefully and write a T for true":7000:"or an F for false in the blank.":6510N^"MODIFIED TRUE/FALSE. Read each statement carefully. Circle th1LF:6700:LM%(SU,CA,DC)LM%(SU,CA,DC)1:RN\\zGLGL(LFGL)(LFGL):D$:D$;"CLOSE":SU:\"MULTIPLE CHOICE. Read each question carefully and mark an X":7000:"in the blank before the correct answer(s).":6510B]8"FILL IN THE BLANK. Read each sULD YOU LIKE TO CREATE ANOTHER":3);"RANDOMLY GENERATED TEST USING THE":3);"SAME SET OF SPECIFICATIONS (Y/N)?":100[IāI1NS:J15:K13:HM%(I,J,K)LM%(I,J,K):K,J,I:9400:5116[T1$"":T2$"":1300[pGL0:SU1NS:2700:LF06010,\uRN"53306Z:12:5);"WOULD YOU LIKE TO CREATE A NEW"Z3);"TEST WITH THE SAME QUESTIONS IN A":9);"DIFFERENT ORDER (Y/N)?":100:I05300ZI1TT:J((1)TT)1:K%QQ%(I):QQ%(I)QQ%(J):QQ%(J)K%:I:9400:7265ZQQ%(0)5330v[:12:4);"WOĺ" ":7000:52204YnT1$:7000:T2$S$ĺT2$:7000Yx"ANSWER KEY":7000:" ":7000:D$:D$;"OPEN CASTKEY":D$;"READ CASTKEY"YI$:I$:7000:5250YZZXX2ĺ" ":ZZZZ1:5260ZD$:D$;"CLOSE":D$;"DELETE CASTKEY":130:T1$"ALL QUESTIONS FROMM%(SU,TQ,1)HM%(SU,TQ,2)HM%(SU,TQ,3)05200EXFQQQQ1:QQGL5160{XPD$:D$;"CLOSE ";FH$(SU):D$;"CLOSE ";BH$(SU):SUXZTQ:D$:D$;"CLOSE":CFX$(CH)"500":140::12:"STUDENT FILE READY FOR":"EXECUTION IN FILE NAME : ";T1$:3400:1300YdZZ56100,6200,6300,6400,6500TWSU1NS:HM%(SU,TQ,1)HM%(SU,TQ,2)HM%(SU,TQ,3)05200nW2705:QQ1:LF05200W(RN((QQ$,QQ,1)):RNLF5190W26700:HM%(SU,CA,DC)0CATQ5190W<HM%(SU,TQ,DC)HM%(SU,TQ,DC)1,XAQQ%(QN)TQ1000SU100RN:9000:Hs$VP(13):WP(14):T1$"":T2$"":X140:T1$T1$((VX)128):T2$T2$((WX)128):Xs$11:1:868::"TITLE OF TEST:":s$16:958:4000s$I$(13)9310s$8000:1250:D$:D$;"OPEN CASTKEY":120:ZZ13:" ":ZZ:ZZ3:6600s$QN1: 66";:I$"66":310"rh$I$(27)Ĭ5:rr$XX(I$):XX19310r|$9:1:"PRINT ON CONTINUOUS FORM PAPER (Y/N)?":100:9:39:(78I11):YYI:T1$"@"9380r$11:"ENTER 1 OR 2 LINES OF TITLE TEXT BELOW:":958:13:1:T1$:14:1:T2$:LL13:HL14:LE1:40Y);32);T$(J);(34)q#J:9210Gq#J410:T$(J)""ĺ6);T$(J):7000q#J:D$:D$;"WRITE CASTKEY":I$;"Essay Question";(34)q#D$:" ":7000:QNQN1:270:qT$CFİ270:200:2800:1250:9410r^$:3300:7:1:"HOW MANY LINES PER PAGE ON PRINTER? 59:T$(J)""ĺ(34);32);T$(J);(34)4p#J:9210yp#D$:D$;"WRITE CASTKEY":I$;("True False",V254,5);(34):9210q#D$:D$;"WRITE CASTKEY":I$;"Incorrect Word(s): ";T$(6);(34):(34);15);"Correct Word(s): ";T$(7);(34):J810:T$(J)""ĺ(34Ho#" ":7000:J49:T$(J)""ĺ" ___ ";(93J);". ";(T$(J),5):7000o#J:D$:D$;"WRITE CASTKEY":I$;:KV2:J49:K2(9J)ĺ"(";(93J);") ";:KK2(9J)o#J:(34):9210o#D$:D$;"WRITE CASTKEY":I$;"Correct Answer(s): ";T$(4);(34)'p#J______";>nd#:7000:6);T$(2);9);:TQ2ĺ"Missing Word(s)";\nn#TQ4ĺ"Correct Word(s)";nx#:7000:T$(3)S$ĺ6);T$(3):7000n#I$(SURN100):(I$)4I$I$"0"n#I$(34)"("I$")"(S$,1,4((QN)))(QN)". ":TQ9110,9140,9170,9180,9190J$:CHCH2:270:Zm2#K(TQ1):J13:KK(T$(J)S$):J:J49(TQ5):KK(T$(J)""):J}m<#(TQ1)(TQ5)K3(T$(3)S$)mF#(ZZK)(XX3)ĺ" ":7000:9030mP#3((QN)));QN;". ";T$(1);6);:TQ2TQ4āJ122:"_";:JnZ#TQ3ĺ"True or False? _TER '0' TO CHANGE THE SUBJECT AREA.";:l@:10:" DOUBLE-CHECK TO SEE THAT YOUR PRINTER":" IS ON-LINE AND READY TO RECEIVE COPY.":3400:I$(27)Ĭ5lJm(#D$:D$;"READ ";BH$(SU);",R";RN:J$:J15:T$(J5)(J$,J4036,40):J:CFX$(CH)I$:X$(CH1)08kT1$"@":9310:RN1LF:6700:TQCA:9000:RN:5220kL1:1:"SUBJECT #";SU;": ";SU$(SU):2:1:"CURRENTLY CONTAINS ";LF;" QUESTIONS."'lV22:1:"ENTER QUESTION NUMBER AND PRESS ";::"RETURN";::".":"RE-SELECT A QUESTION NUMBER TO DELETE.":"EN" WAS SELECTED EARLIER. DO"Yj"YOU WANT TO DELETE THAT QUESTION (Y/N)?":100:I07315jIKTT1:QQ%(I)QQ%(I1):I:TTTT1:TS(SU)TS(SU)1:7315j4300:I$(13)7300j7260j1230:2600:I$"PRINT":3250:K01300kSUK:2700:LF0174RN(I$):RN0İ1250:D$:D$;"CLOSE":7300Gi4:24:" ":RNLF7330qi6:1:958:6700:TQCA:TQCF57315iXTQ1000SU100RN:K0:I0TT:KKI(XQQ%(I)):I:(K0)TTTT1:TS(SU)TS(SU)1:QQ%(TT)X:7315j8:1:958:9:1:"QUESTION #";RN;7500#h8:1:958:TS(SU)07330|h8:1:"ITEMS SELECTED:";:I1TT:J$(QQ%(I)):(J$,2,1)(SU)ĺ" ";SU;".";(J$,2);hIh7500:6:1::"TOTAL NUMBER OF QUESTIONS SELECTED: ";TT;::4:1:"SELECT WHICH QUESTION? ";:300hI$(27)Ĭ5*i,6300,6400,6500:gkSU1NS:2705:(LF0)(TS(SU)0)5200agpQQ1TT:(QQ%(QQ)1000)TQ7295gu(((QQ%(QQ)),2,1))SU7295gzRN(((QQ%(QQ)),3,2)):6700:TQCA:9000gQQ:5200g4200:SUK:(SU0)(TT0)7300g(SU0)7390h2700: