@G@ (2)40&:" O TO 80 COLUMN SCREEN":(27)"X":79\@%::124:3:57@Q$(151),A$(151),B$(151),C$(151),D$(151),E$(151),M$(30):@""::108@3:88:65:89A"NTER NUMBER OF TEST TO LOAD:":N:N0NX"NVALID ANGE":6AN$M$(N):""32)" Ǡ":88:91:15: #1,(N$)" FILE",U(OX):X0:ST0:XX1:2816:L(253):Q$(X)(A$,L):2816:L(253):A$(X)(A$,L):2816:L(253):B$(X)(A$,L):2816:L(253):C$(X)(A$,L):2816:L(253):D$(X)(A$,L)/B2816:L(253):E$(X)(A$,L)::#1:LX:NX:RGB 91:89:79:H057QB H12zB "NTER AME FOR UIZ":N$:67:N0'C NN1:""15)" ":" ! O NOT EXCEED 240 HARACTERS ":" NTER \ TO EXIT ROUTINE ":N150" Š": 4:57=C G$"":G$::H0]C"NTER UESTION #";N|C93:Q$(N)CC$:Q$(N)""15CQ$(N)(92)NN1:50C(Q$(N))24064CH14C"NTER ANSWER A : ":H0C93:A$(N)CC$:A$(N)""20D(A$(N))92NN1:50-D(A$(N))240647DH19]D"NTER ANSWER B : ":H0|D93:B$(N)CC$:B$(N)""25D(B$(N))92NN1:50D(B$(N))24064DH24D"NTER ANSWER C : ":H0D93:C$(N)CC$:C$(N)""30E(C$(N))92NN1:50-E (C$(N))240647E!H29]E""NTER ANSWER D : ":H0|E#93:D$(N)CC$:D$(N)""35E$(D$(N))92NN1:50E%(D$(N))24064E&H34E'"NTER ETTER OF ORRECT NSWER:":H0F(93:E$(N)CC$:E$(N)""40&F)(E$(N))92NN1:50:58:F*(E$(N))164jF+E$(N)"A"E$(N)"B"E$(N)"C"E$(N)"D"45F," RROR: RE-ENTER":39F-H39F.PF/LN:89:N15049F012G127)"ILE CONTAINS 150 NTRIES.":20)"ATA WILL BE STORED. PEN NEW TEXT FILE":83:50:58FG289:30)" AIT, TORING ATA ":91:88G3&:(N$)" FILE",U(OX): #2,(N$)" FILE",U(OX),W:X1L:2,Q$(X):2,A$(X):2,B$(X):2,C$(X):2,D$(X):2,E$(X)::#2:%:91:89:79:!H489:P1:" NTER UMBER OF UESTION";:N:N1NL"UT OF ANGE": 5:nH5105:NN1:12:G$"":" (Y/N)";G$:G$"Y"52xH650:H789:"":40(N$)2);N$:79:"":N1L:Q$(N)"":Ս105H8:H9H0I:89:P0:""25)" ":23)" BY ":15)"NTER CHOICE OF FUNCTION:":18)"A. REATE EW EST":18)"B. OAD A EST FROM ISK":18)"C. DD TO EST ON ISK":18)"D. EVIEW UESTIONS":18)"E. EVIEW A UESTION"J;18)"F. EPLACE A UESTION":18)"G. ELETE A UESTION":18)"H. HANGE THE ORRECT NSWER":18)"I. DIT A UESTION":18)"J. ARD OPY":18)"K. RINT OC ILE":18)"X. ESET THE ONFIGERATION":18)"Z. ":23)"HOICE?":G$J<("ADEFBCGHIXKZJ",G$)11,55,103,52,4,78,84,111,117,125,132,61,131:58J=89: K>(S$)80S$:[K?X80:((S$,X,1)(0))32:XX1::(S$,X):Z(S$):ZZX:S$(S$,Z):62K@"ENTRY TOO LONG: RE-PHRASE":H1: 4:KA17)" WAIT "DLB91:88: #3,"TEST TITLES",U(OX):X0:ST0:XX1:3,M$(X)::#3:91:""14)"TEST TITLES":A1X2:4((A)));(A)". "M$(A);30((A1)));(A1)". "M$(A1)::RLCX1582`LDX15X1lLEX177LF"AS TEST TITLE FILE BEEN INITIATED?(Y/N)"LGG$:G$"N"77LHG$"Y"66:71LI20)""N$:"S YOUR TITLE ORIGINAL?"MJG$:G$""74MKG$"Y"776ML"NTER NEW TITLE FOR TEST:":N$MMM$(X1)N$:89:33)" AVING ITLE ":88:"TEST TITLES",U(OX): #3,"TEST TITLES",U(OX),W:A1X1:3,M$(A)::#3:91:MN:108:R1:5:12:R0:58MO20)" ӠŠҠϠ "NPG$:(G$(0))3280NQ;NR" "ENS 4:NT" ǠƠՠŠǠϠŠŠΠ1 ":"  . "OU"UESTION TO ELETE";N:N1NL"UT OF ANGE": 5:OVXNL:Q$(X)Q$(X1):A$(X)A$(X1):B$(X)B$(X1):C$(X)C$(X1):D$(X)D$(X1):E$(X)E$(X1):X:LL1:"O YOU WANT TO DELETE MORE";G$:G$"Y"85:Ս50OWOX15,OX,15:15,"I0:":15:OY"":PZ" ";S1,S$,S2,S3:"ORRECT RROR CONDITION AND TRY AGAIN":79:57EP[15,OX,15:15,S1,S$,S2,S3:15:S1090^P\"ISK TATUS: "S$:Q]SP$" ":SP$SP$SP$SP$:"":"";SP$"";:"":CC$"":Z$""::Z$:Z$"""Q^Z$(13)1013Q_Z$(20)99NQ`X$Z$:Z$(34)X$"^"nQa(CC$)240CC$CC$Z$:X$;tQbQcCC$""Qd" ";:CC$(CC$,(CC$)1):Qe240(CC$)(SP$,240(CC$));QfQg890Rh" UMBER OF UESTION YOU WANT TO EVIEW";N:Q$(N)"":Ս105:106RiS$(N)". "Q$(N):"":62::S$"A. "A$(N):62:S$"B. "B$(N):62:S$"C. "C$(N):62:S$"D. "D$(N):62:"ORRECT ANSWER IS: ":7)E$(N):89:79:SjG$"":" O YOU WANT TO EVIEW MORE (/)";G$:G$"Y"104"SkSlA$"ABCDEFGHIJKLMNOPQ":A$A$A$A$A$A$:A$A$A$A$:160,2,169,47,162,1,32,116,255,153,248,0,200,192,6:208,241,162,1,32,198,255:32,228,255,201,13,240,23,164,253:162,251,142,185,2,162,1,32,119,255bTm200,132,253,196,250,240,4,165,144,240,226,76,204,255:Z28162870:X:Z,X:AAX:Z:A8145"ERROR IN DATA":kTn124To"HICH ANSWER DO YOU WANT TO CHANGE";N:N1NL"UT OF ANGE": 5:CUpS$(N)". "Q$(N):62:S$" A. "A$(N):62:S$" B. "B$(N):62:S$" C. "C$(N):62:S$" D. "D$(N):62:"HE PRESENT ANSWER IS "E$(N)UqG$"":"HE NEW ANSWER";G$:G$"A"G$"B"G$"C"G$"D"115Ur"NSWER OUT OF RANGE MUST BE A,B,C,D":113UsE$(N)G$:G$"":"O YOU WANT TO CHANGE MORE ANSWERS";G$:G$"Y"111Vt51:QVu"HICH QUESTION DO YOU WANT TO EDIT";N:N1NL"UT OF ANGE": 5:VvS$(N)". "Q$(N):62:G$"":"S THIS THE QUESTION YOU WANT TO EDIT";G$:G$"Y"119:Չ117Vw"NTER NEW QUESTION. O NOT EXCEED 240 CHARACTERS ":93:CC$""WxQ$(N)CC$:(Q$(N))24064%WyH119dWzG$"":"O YOU WANT TO EDIT MORE QUESTIONS";G$:G$"Y"117nW{51:W| #8,"QMDATA,S":8,OX,EA,RA,PG,PL,PS,CP,DP,PT:#8:ST64125:6,EA:5,RA:X}" CREATING CONFIGARATION FILE"::PG66:PL60:PS1:CP0:DP1:PT1EX~"DATA WILL BE STORED ON DRIVE 8 OR 9";OX:OX8OX9126uX"BACKGROUND COLOR 1-16";EA:EA1EA16127X"TEXT COLOR 1-16";RA:RA1RA16RAEA128X6,EA:5,RA:"ARE COLORS CORRECT Y/N";G$:G$"Y"1273Y #8,"@QMDATA,S,W":8,OX:8,EA:8,RA:8,PG:8,PL:8,PS:8,CP:8,DP:8,PT:#8:Z:108:R1:5:R0:""35)" RINTING EST ":3,4,7:3:N1L:S$(N)". "Q$(N):62::S$"A. "A$(N):62:S$"B. "B$(N):62:S$"C. "C$(N):62:S$"D. "D$(N):62::"HE ORRECT NSWER IS --> ";E$(N)::::3:3:57KZ:108: #1,"QUIZ DOC":3,4,7:QR1:2816:ST64QR1qZL(253):3,(A$,L)::#1:3:57