."S$ "ENTER 999999 WHEN FINISHED"S, XSO X999999 #2, H$: 1200Se YYIB(1)X:ZXXSZZPR(VP(1),VP(1)):ZZ1(1N):Z(Z)SPISE(NM):PI(PI):ZZPITVS٬ #2,X;20) Y;40) YZ;",";YZS! 44035SP LX0 U0 : ULXTZ UX0 V0 : VUXT3dXH245(VU):XK5XHUTLn LY0 S0 : SLYTex UY0 T0 : TUYTÂXL182(ST):XM5(XLT)TÌ 4,1:: 1,1TÖ(XK,0)(XK,192),Tà(XK,0)(XK2.82843,2.82843),Tê (XK,0)(XK2.82843,2.82843),U ô(0,XM)(255,XM),U0þ(256,XM)(253.17157,XM2.82843),UWȻ(256,XM)(253.17157,XM2.82843),UsSX(VU)28:SY(TS)18U܀ Q1 18UGYXLQSYXM: GY5 50180U GY187 50180U(XK3,GY)(XK3,GY),UGYXLQSYXM: GY187 50210V  GY5 50210V&(XK3,GY)(XK3,GY),V." QV=, Q1 28V`6GXXHQSXXK: GX251 50260Vs@ GX5 50260VJ(GX,XM3)(GX,XM3),VTGXXHQSXXK: GX5 50290V^ GX251 50290Vh(GX,XM3)(GX,XM3),Vr QV|VĆ 4,1: 1,1WĐ(XHGXXK,XLGYXM)WĚW-Ĥ 4,1: 1,1W?ĮSX(UXLX)14WIķGXUXWcĸGYABGX:GYXLGYXMWĺ GY0 50365 : 50370WĽ GY195 50375 WGXGXSX: 50360WZXLXWZYABZX:ZYXLZYXMW΅ ZY0 50385 : 50390Xх ZY195 50395XZXZXSX: 50380X=ۻ(XHZXXK,ZY)(XHGXXK,GY),XCXi阞: "NAME OF GRAPHICS FILE ";A$Xy 4,1: 1,1XM A$,3584,9727,3584XSX(UXLX)28:SY(UYLY)18X鬇 #2,(10)X鱇 #2,"LIZPACK GRAPHICS FILE ";A$Y鶇 #2, "SCALE, X-AXIS: ONE UNIT=";(SX10)10YO黇 #2, "SCALE. Y-AXIS: ONE UNIT=";(SY10)10Y} #2, "MAXIMUM X";UX;40) "MINIMUM X";LXYŇ #2, "MAXIMUM Y";UY;40) "MINIMUM Y";LYYʇ #2, "SCREEN COORDINATES OF ORIGIN OF GRAPH ";(XK);",";(XM)YϐZ`(3): "NUMBER OF CROSS TERMS";QZ'bKYQZIe VN$(KQ): CT(2Q): O(KQ)Zhj(3): "NAME OF VARIABLES"Zvo I1 KZt "NAME OF VARIABLE";I: VN$(I)Zv IZwVN$(KQ)VN$(K): Q0 60085Zy(3): "NAME OF CROSS TERMS"Z~ IK KQ1[%ꃇ "NAME OF CROSS TERM";IK1: VN$(I): I[/KKQ[O꒞(3): "DEFINE CROSS TERMS"[mꗀ I1 2Q 2:J(I1)2[꜇ "CROSS TERM";J;"VAR. NAME ";VN$(KJQ1)[ "ENTER VAR. NAMES";H$,I$[X$H$: 60100[ꨅ PI999 60060\CT(I)PI:X$I$: 60100\ꭅ PI999 60060\*CT(I1)PI: I\O굞(3): "LOG OPTION (YES/NO)";LN$\Z꺞(3):\oĀ II1 KJ2Q\Ʌ X$VN$(II) PIII : 60115\ΐ\Ӌ II\؇ "INVALID DEFINITION"\PI999:\ II1 Q\ X$VN$(II) PIII : 60145\] II]' "VARIABLE NOT AVAILABLE"]4PI999:]n(3): "IS THIS RUN FROM A CUSTOM FILE";VN$(0)]| CP(KQ)] I1 KQ:CP(I)I1: I]X$VN$(0):TZKQ] "INPUT COVARIANCE MATRIX";VN$(0): VN$(0)"YES" 63200 : 63250^0 "TOTAL NUMBER OF COLUMNS IN THE AGGREGATE FILE";TZ^@" I1 KQ^z' "ENTER FILE COL. NUMBER FOR VARIABLE ";VN$(I)^, CP(I):CP(I)CP(I)1: I^1^JCP(0)0: II1 KQ^O #1,ICP(II):O(II)(Z$)^T O(II)999999 CP(0)999999_^ II_c CP(0)999999 NN1_#h_L "D",#1,"COVAR.MAT",5: #1, 5 Z$_e #1,1:N(Z$):RN2_z PR(K,K),R(K,K)_ I1 K_ J1 K_ #1,RN:RNRN1:D(Z$)_R(I,J)D:PR(I,J)D: J,I_ I1 K` #1,RN:RNRN1:R(0,I)(Z$)`& #1,RN:RNRN1:R(I,0)(Z$): I`E: X$"YES" 63007 : Z$_e #1,1:N(Z$):RN2_z PR(K,K),R(K,K)_ I1 K_ J1 K_ #1,RN:RNRN1:D(Z$)_R(I,J)D:PR(I,J)D: J,I_ I1 K` #1,RN:RNRN1:R(0,I)(Z$: #1,5 Z$:RN1AK #2, ((32765));((32766)): #2, (130,45)Ax "D",#2,"RESID/DAT",5: #2,5 W$:SN1B, #2,"CASE";6) "Y, OBSERVED";20) "Y, COMPUTED";35) "RESIDUAL";50) "NORMAL DEV.";65) "STUD. RES.";80) "V(I,I)";95) "COOK'S DIST.";110) "T FOR OUTLIER": #2,(130,45)BD II1 (1) TZBLY0BY 40215Bt CP(0)999999 34292Bʀ I1 M1BYYB(I)O(VP(I)): IBYYYI:ZYB̅ W$(Y): #2,SN:SNSN1Bއ #2,CS;6) O(VP(M));20) Y;C&YO(VP(M))Y: 34305: SZ0 GH999999 : GHYSZC@ #2,35) Y;50) GH;C_ W$(Y): #2,SN:SNSN1Cl큦 34600CxCSCS1C IIC #2,((32761));((32762)): #2,H$C 34400C˅: 1200C݆ ZL1 L1ZC ZU1 U1ZD YU2 U2YD YL2 L2YD#D1YYZD1D1D2YZD2DAD3YZZD3DO$D4YYD4Dj) D599999999 D5Y:D.ZYD5:ZZZ:D0D0Z:D5YD3D` D40 D0999999 : D0D0D4Db #2,"DF FOR T-TEST FOR CASE BEING OUTLIER: ";NM1Ee #2,"T(2,1)=";D1Ej #2,"T(1,1)=";D2E/o #2,"T(1,2)=";D3Eyt #2,"STATISTIC FOR DURBIN-WATSON TEST: D=";D0;" 4-D=";4D0Ev #2, "SUM OF SQUARES OF RESIDUALS";D4Ew #2,H$EyEՇ( I1 M1:C(I,0)0: IEއ-V20E7 J1 M1E< L1 M1F/AC(J,0)C(J,0)C(J,L)(O(VP(L))R(0,VP(L))N)F9B L,JFrF I1 M1:V2V2C(I,0)(O(VP(I))R(0,VP(I))N): IFHV2V21NFKV3SZ((1V2)): V30 V3999999 : V3YV3FP V21 V3999999 V4999999 : V4V3V3V2M:V4V4(1V2)GCU V3999999 V5999999 : V5(NM1)(NMV3V3):V5((V5)):V5V3V5GnZ #2,65) V3;80) V2;95) V4;110) V5Gt_GAVP(M)GSSPR(A,A):YIR(0,A)N:SESSG I1 M1GPIVP(I)G߈HRR(0,PI)N:YIYI(B(I)HR)GSESE(PR(PI,A)B(I)): IH SE0 SE0HSSRSSSE:MESE(NM):MRSR(M1): ME0 FR999999 : FRMRMEHaH$(10)Ho #2, H$H #2, "ANOVA TABLE FOR REGRESSION-DEPENDENT VARIABLE: "; VN$(VP(M))Hʉ&H$(80,45)H׉b #2,H$Il #2,"SOURCE";20) "DF";35) "SS";50) "MSS";65) "F RATIO"I%v #2,H$I] #2,"REGRESSION";20) M1;35) SR;50) MR;65) FRIy I1 M:D(I)B(I): II #2,"ERROR";20) NM;35) SE;50) MEI #2,H$IԊ #2,"TOTAL";20) N1;35) SSI #2,H$I* #2,(10);(10)J*4 #2,24) "PARTIAL REGRESSION COEFFICIENTS"J;> #2,(10)Jp #2,"VAR. #";8) "COEFFICIENT, B";24) "STD ERROR";44) "MEAN";60) "T (FOR B=0)"Jz #2,H$J I1 M1J튎ZC(I,I)ME:Z(Z):Z(Z): Z0 Q999999 : QD(I)ZK.PIVP(I): #2,VN$(PI);8) D(I);24) Z;44) R(0,PI)N;60) QK6 IKC #2,H$KQA$(10)Kn #2, "Y-INTERCEPT ";YIK{ʇ #2,H$KSZ(SE(NM))KNJч #2,"DF FOR T-TEST ON REGRESSION COEFFS.: ";NMKԇ #2,"STANDARD ERROR OF ESTIMATE: ";SZL%ه #2,"MEAN OF DEPENDENT VARIABLE: ";R(0,A)NLuއ #2,"STD. ERROR OF EST. AS PCT OF MEAN OF DEP. VAR.: ";(SZN100)R(0,A)L #2,"PCT OF VARIANCE EXPLAINED BY REGRESSION: ";(SR100)SSL #2,"NUMBER OF OBSERVATIONS: ";NL #2,H$LMpUXU1:LXL1:UYU2:LYL2Mu 50000MJz "D",#1,"RESID/DAT",5: #1,5 Z$:RN1Mh #1,RN:GX(Z$):RNRN1M #1,RN:GY(Z$):RNRN1M 50310M RN(1) 38015MA$MΔ A$"" : 32200M۔ 38035MUXU2:LXL2:UYU2:LYL2Nف 50000N2ޙ "D",#1,"RESID/DAT",5: #1, 5 Z$:RN2NX #1,RN:GX(Z$):RNRN2: #1,RNNoGY(Z$): 50310N RN(1) 38115NA$N A$"" : 32200N 38130Nĕ8 59800Nѕ= 32200Nd "D",#1,D$,5: #1, 5 Z$Oi "D",#2,"RESID/DAT",5: #2,5 W$:SN2O-n IJ1 MO;sPIVP(IJ)OcxUXPR(PI,0):LXPR(0,PI):UYU2:LYL2Op} 50000O II1 (1) TZO 40215O CP(0)999999 38545OۖGXO(VP(IJ)): #2,SN:SNSN2:GY(W$)O薌 50310O񖑋 IIOA$P A$"" 38565P 38550P5 A$"S" 59800PO A$"X" : 32200P]SN2: IJPl: 32200P@(3): @232, "LIZANAL RUN"PB 35000PJ 1200PCP(0)0: I1 KKYP۝ #1,IICP(I):O(I)(Z$)P O(I)999999 CP(0)999999Q IQ! KY0 40250QD&O(K)O(KKY): LN$"YES" O(K)(O(K))QY+ L1 2KY 2Q{0J(L1)2:PICT(L):PJCT(L1)Q5O(KKY1J)O(PI)O(PJ): LQ:Q J1 KQѤ O(J)PR(J,0) PR(J,0)O(J)Q O(J)PR(0,J) PR(0,J)O(J)Q JR$R: M2 1200R0 #2,(10): #2,H$R #2,"INDEPENDENT VAR.";20) "PREDICTED VALUE";40) "CONFIDENCE INTERVAL"R #2,H$R "ENTER VALUE OF T FROM TABLE"Rԫ "DEGREE OF FREEDOM IS: "; N2Rݫ TVS: "VALUE OF INDEPENDENT VAR,0):UYPR(Z,0):LXPR(0,Q):LYPR(0,Z):QQQ: 50000/P "D",#1,D$,5: #1,5 Z$/h II1 (1) TZ/u 40215/ CP(0)999999 1540/GXO(VP(QQ)):GYO(VP(Z))/ 50310/ II/ QQQ:BPR(Q,Z)PR(Q,Q):A(R(0,Z)N)B(R(0,Q)N)0: 503400A$0$ A$"" 120000" 15600:,A$0N1 A$"" 15000Z6 15800h@ I1 M0EPIVP(I): VN$(PI)Q$ QI0J I0O Q0 1660 16600TZ00Y I1 M0^PIVP(I): VN$(PI)Z$ ZI0c I0h Z0 16601m 15251'|: "VARIABLE NOT AVAILABLE"1< 12) "OPTIONS"1\ "1. CHOOSE NEW VARIABLES"1 "2. RETURN TO OPTIONS LISTING"1A$1 A$"1" 15001 A$"2" 1 16801lMQP1:(3): @232,"LIZANAL RUN"1q I1 M1v J1 M2{R(I,J)PR(I,J): J,I2" 11652.4 14002A6 M12 21302b9 "DELETE WHICH VARIABLE";Q$2v> Q$"NONE" 2C I1 M2HPIVP(I): Q$VN$(PI) 21672M I2R "NOT AN AVAILABLE VARIABLE"2W 13) "OPTIONS"3 \ "1. RETURN TO OPTIONS ROUTINE"3,a "2. DELETE ANOTHER VARIABLE"36fA$3Gk A$"1" 3[p A$"2" 21003gu 21503w(3): @232, "LIZANAL RUN"3z I1 M3PIVP(I): Q$VN$(PI) JI3 I3 JM 22073 LJ M13VP(L)VP(L1): L3MM14  I1 M4PIVP(I)4& J1 M43PLVP(J)4NR(I,J)PR(PI,PL): J,I4XMM14e 300004rŁ 304104ƀ I1 M:X(I)PR(VP(I),VP(M1)): I4ǁ 302704MM14ϐ4 ` 15004 t 12004 21004 12004 ( 2405N* VN$(0)"YES" 200185#N/ R(K,K),PR(K,K)51N2 I0 K5?N4 J0 K5\N>R(I,J)0:PR(I,J)0: J,I5jNH I1 K5NMPR(I,0)0:PR(0,I)0: I5Nf "D",#1,D$,5: #1,5 Z$5Nz I1 (1) TZ5N 630505N CP(0)999999 201805N Q0 201236"NO(K)O(KQ): LN$"YES" O(K)(O(K))66N L1 2Q 26XNJ(L1)2:PICT(L):PJCT(L1)6wNO(KQ1J)O(PI)O(PJ): L6N 420006N VN$(0)"YES" 201806N J1 K6NC(0,J)R(0,J):R(0,J)((N1)R(0,J)O(J))N: J6N N1 201807N J1 K7N LJ K7tNR(J,L)(N2)R(J,L):D(O(J)C(0,J))(O(L)C(0,L)):DD(N1)N:R(J,L)R(J,L)D:R(J,L)R(J,L)(N1)7~N L,J7Nԋ I7Nޚ #17N߅ VN$(0)"YES" 11607N I2 K7N J1 I17NR(I,J)R(J,I): J,I7N I1 K:R(0,I)NR(0,I)8 N J1 K86NR(I,J)(N1)R(I,J):PR(I,J)R(I,J): J8LNR(I,0)R(1,1): I8XOB 11608qu0 I1 M:P(I)I: I8u5 M1 8u: I1 M18uD LI M8uNPLP(L):W(R(PL,I))8uX JI1 M8ubQ(R(PL,J))8ul QW WQ8uv J9u W0 302609uD(L)(R(PL,I)W): L9-uTI:QD(I)9;u LI M9Nu D(L)Q TL9du D(L)Q QD(L)9lu L9uWP(I):P(I)P(T):P(T)W: Q0 302609uPIP(I)9u LI1 M9uPLP(L):RTR(PL,I)R(PI,I):R(PL,I)RT9u JI1 M: vR(PL,J)R(PL,J)(RTR(PI,J)):v J,L:v I:7v R(PL,M)0 30260:=v*:v4(3): "SINGULAR COVARIANCE MATRIX**** PROGRAM WILL CRASH**SORRY"::v> M1 30290:vHB(1)X(1)R(1,1):vM:vR L2 M:v\PLP(L):vf J1 L1:vpPJP(J);vzX(PL)X(PL)(R(PL,J)X(PJ)): J,L;&vB(M)X(PL)R(PL,M);;v IM1 1 1;RvPIP(I):B(I)X(PI);bv JI1 M;vB(I)B(I)(R(PI,J)B(J)): J;vB(I)B(I)R(PI,I): I;v;vʁ 30420;vԀ II1 M;vPIVP(II);vހ I1 M:X(I)0: I;vX(II)1: 30270<v J1 M:C(II,J)B(J): J,II<#v} "S. SHOWPACK">}A$>-} A$"S" 38200>B} A$"1" 38000>W} A$"8" 38500>l} A$"2" 32600>} A$"3" 32700>} A$"4" 32000>} A$"7" 38100>} A$"5" 2600>~ A$"6" 1200>~ 32231>X 1400>ZMM1?] "ADD WHICH VARIABLE";Q$?3^(3): @232, "LIZANAL RUN"?F_ IM 2 1?\`VP(I)VP(I1): I?sbQK:X$Q$: 60130?d PI999 32605?fVP(1)PI?g 2210?l 32200? 2100? 32200?О: "NUMBER OF VARIABLES";M?Հ I1 M@ډ "ENTER VARIABLE NAME";X$@&QK: 60130@;܅ PI999 34010@LVP(I)PI: I@kޞ(3): @232, "LIZCORR RUN"@w߁ 2210@䁥 1200@(3): @232, "LIZCORR RUN":CS1@D599999999@텚U10:L10:U20:L20:SN1:D00:D10:D20:D30:D40A "D",#1,D$,5P$P$":"Q$ P$,R=: "NAME OF FILE? ";D$O "D",#1,D$,5l "D",#2,"SCRATCH/PAD",5~ #1, 5 Z$ #2, 5 W$RN1 #1,RN:D(Z$)Å D979797 4055 W$Z$: #2,RNRNRN1: RN(1) 4055ҁ 4030ך D$* "SCRATCH/PAD" D$5끥 105 &HE01,&HBD: &HE02,&HB3: &HE03,&HED: &HE04,&H1F: &HE05,&H02: &HE06,&H7E: &HE07,&H96: (38565)147 &HE08,&HA5 : &HE08,&HA7 0&HE01:X0(&HE09) 100阞(3): @480,""颇 @491, "LIZPACK"!鬁 600908鶇 @480,"": 60090l @481,"A STATISTICAL PACKAGE FOR THE": 60090ʇ @ 487,"MICROPROCESSOR"ԁ 60090އ @480,"": 60090 @480,"": 60090 @494,"BY": 60090 @488,"WILLIAM J. GRAY" 60090- @484,"PROFESSOR OF MATHEMATICS": 60090b$ @483, "THE UNIVERSITY OF ALABAMA"o. 600908 @480,"": 60090B @490, "PRODUCED BY": 60090L @488, "CRIMSON SOFTWARE": 60090V @482, "THE RESEARCH ASSOCIATES GROUP": 600900` @486, "32 BEVERLY HEIGHTS": 60090cj @483, "TUSCALOOSA, ALABAMA 35401": 60090zt @480,"": 60090~ @480,"": 60090ꈀ I1 12ꒇ @480,"": 60090꜋ Iꦞ(3): "END LIZPACK"갊꺀 X1 125: XĐP": 60090:F& 500,32760&d(0)&Dn Y18 31: X0 1: (X,Y,5): X,Y&ox Y18 31: X62 63:(X,Y,5): X,Y& X2 61: Y18 19:(X,Y,5): Y,X& X2 61: Y30 31:(X,Y,5): Y,X& I0 8 2: Y20 29'(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'Q(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I'ȇ:: " LIZANAL"'Ҁ T1 500: T'܁ 241'' @13, "MENU"( "1. REGRESSION-FORWARD MODE"(- "D. LIZPACK DIRECTORY"(Q "2. REGRESSION-BACKWARD MODE"(d "E. END RUN"(n"A$(' A$"Z" 500,32760: 290(- A$"D" 500(@ A$"1" 710(J A$"E" 350(O A$"2" 700(T 290)^(3): @ 10,"END LIZPACK") h)M(32767)))H$(M))9H$(H$,1))UH$"LIZPACK/DIR"":"H$)` H$,R){& 'BEGIN MAIN PROGRAM')FG1: 1005)FG2: 1005)(3): "NAME OF STUDY";A$) "NAME OF INVESTIGATOR";B$) "DATE OF RUN";C$* "NAME OF DATA FILE";D$*- "NUMBER OF VARIABLES";K*6KZK*C 60000*P 63000*o #2,"NAME OF STUDY: ";A$* #2,"NAME OF INVESTIGATOR: ";B$* #2,"DATE OF RUN: ";C$* #2,"NAME OF DATA FILE: ";D$*(3): @232, "LIZANAL RUN"+/[MK:N0: X(M): B(M): C(M,M): P(M): D(M): VP(M)+;] PC(M)+b` VN$(0)"YES" 20040 : 20010+qMK1:QPK+ I1 K:VP(I)1: I+ FG 1165,32000+ 30000+ I1 K:VP(I)I: I+ 30410+ I1 M:X(I)PR(I,K): I, 30270, MK, 1400,+ 10) "OPTIONS",I "1. STRAIGHT LINE PLOT",d "2. DELETE VARIABLE",ć "3. RESTORE ALL VARIABLES",ɇ "4. STRAIGHT LINE PREDICTIONS",· "5. SET VARIABLE POINTERS",Ӈ "6. RESIDUAL ANALYSIS"-؇ "7. TO FORWARD MODE"-݇ "8. REGRESSION RUN"-1 "S. SHOWPACK"-;A$-O A$"1" 2400-c A$"2" 2440-w( A$"3" 1900-- A$"4" 44000-2 A$"5" 34000-7 A$"6" 34200-< A$"7" 32200-A A$"8" 40000-F A$"S" 38200.s 1300.x: "VARIABLES AVAILABLE".-} I1 M.IPIVP(I): VN$(PI);" ";.^ 32(0)6 .f I.l.r.ܞ: "NAME OF INDEPENDENT VARIABLE"; Q$.ޅ Q$"" . "NAME OF DEPENDENT VARIABLE";Z$. Z$"" .Q0: 1600/1UXPR(Q20) TQ(K,I)C;8 / IC 122808D/ #2, 40) E$;I;60) B(K,I)R;8U/ #2,"": I8b0 #2,H$80 #2, "GRAND MEAN";G(RC);40) "STD DEVIATION";(TS(RC1))80 #2,H$80 86 5900086: 30086M(32767):H$(M):H$(H$,1)96H$"LIZPACK/DIR"":"H$96 H$,R92x: "FILE?";D$9J悉 "READ MULTIPLE";M9[挙"D",#1,D$,59m #1, 5 Z$9vRN19SNRN:9檀 I1 M9 #1,RN:D(Z$)9澇 RN;D9RNRN1: RN(1) 591409ҋ I9A$9 A$"C" 59040: A$"E" 59190: 59100:"A$:7 A$"C" 59180:L A$"E" 59190:Y" 59140:d, #1::{6: 11) "OPTIONS":@ "1. CHANGE RECORDS":J "2. DELETE RECORDS":T "3. INSERT RECORDS":^ "4. RETURN TO LISTING":h "5. EXIT";rA$;| A$"1" 59320;*熅 A$"2" 59360;?琅 A$"3" 59410;]皅 A$"4" RNSN: 59040;r礅 A$"5" 59180;箁 59250;縞: "ENTER RECORD #,NEW RECORD";RN,D; Z$(D): #1,RN;̻ "MORE CHANGES? YES OR NO";A$<օ A$"NO" 59190 : 59320<%: "DELETE WHICH RECORD";RN<< RN(1) 59385J "4. LIZPACK DIRECTORY"(VT "E. EXIT LIZPACK"(`^A$(c A$"Z" 600,32760: 350(h A$"1" 1000(m A$"3" 14000(r A$"2" 1100(w A$"4" 14010( A$"E" 410( 350)(3): "END LIZPACK"))8(3): "NUMBER OF TREATMENTS";R)S "NUMBER OF BLOCKS";C)m "NAME OF FILE";A$)RN1: "D",#1,A$,5:K2RC) #1, 5 Z$) I1 K) "RECORD NUMBER";RN) "DATA";D) Z$(D)) #1,RN)RNRN1: I*  #1 *(3): 300*9L(3): "NAME OF STUDY: ";A$*[Q "NAME OF INVESTIGATOR: ";B$*tV "DATE OF RUN: ";C$*[ "NAME OF TREATMENTS";D$*` "NAME OF BLOCKS";E$*b "NAME OF COVARIATE";FF$*e "NAME OF VARIABLE";F$+j "NAME OF DATA FILE";G$+"o "NUMBER OF TREATMENTS";R+=t "NUMBER OF BLOCKS";C+\y(3): @232,"LIZANCOV RUN"+{~ #2,"NAME OF STUDY: ";A$+ #2,"NAME OF INVESTIGATOR: ";B$+ #2,"DATE OF RUN: ",C$+ #2,"RUN FROM LIZPACK DATA FILE: ";G$,  B(2,C): TQ(2,R): TB(2,7),, "D",#1,G$,5: #1, 5 Z$,AK0:RN1:FA$FF$,O I0 2,lĀ J1 C:B(I,J)0: J,I,yɁ 10000,΁ 11000,Ӂ 12000,K1:RN2:FA$F$,݁ 10000,⁦ 11000,灦 12000,K2:RN1, 10500, 11000, #1-EXTB(0,1)TB(0,2)TB(0,3)-<EYTB(1,1)TB(1,2)TB(1,3)-[ECTB(2,1)TB(2,2)TB(2,3)-g 5000-yxH$(132,45)- #2, ((32765));((32766))- #2, "ANALYSIS OF COVARIANCE TABLE FOR ";FF$;",";F$;" DATA"- #2, H$. #2, "SOURCE";15) "DF";30) "SS(X,X)";45) "SS(X,Y)";60) "SS(Y,Y)";75) "DF";90) "ADJ. SS(Y,Y)";105) "ADJ. MSS(Y,Y)";120) "F RATIO". #2, H$. #2, "TOTAL";15) RC1;30) TB(0,1);45) TB(2,1);60) TB(1,1). #2, H$/ #2, E$;15) C1;30) TB(0,3);45) TB(2,3);60) TB(1,3)/\Ç #2, D$;15) R1;30) TB(0,2);45) TB(2,2);60) TB(1,2)/ȇ #2, "ERROR";15) (R1)(C1);30) EX;45) EC;60) EY;75) (R1)(C1)1;90) AEY;105) MEY/͇ #2, H$/҇ #2, D$;" +"0Jׇ #2, " ERROR";15) C(R1);30) TB(0,2)EX;45) TB(2,2)EC;60) TB(1,2)EY;75) C(R1)1;90) YPE0X܇ #2, H$0f #2, D$0 #2, "ADJUSTED";75) R1;90) SPE;Q$;105) MPE;120) FY0 #2, H$0: 3000BXECEX:REBXEC0AEYEYRE:MEYAEY((R1)(C1)1)1YPETB(1,2)EY:DNTB(2,2)EC1GDNDNDN:DNDN(EXTB(0,2)):YPEYPEDN1eSPEYPEAEY:MPESPE(R1)1 MEY0 FY999999 : FYMPEMEY11'G0:SS0:ST0:E2C1' I1 R1'$T01'. J1 E 21'8 #1,RN:RNRN21'BD(Z$)2'LQ((J1)2)20'VSSSS(DD):TTD:B(K,Q)B(K,Q)D:GGD28'` J2F'jTQ(K,I)T2V'tSTST(TT)2^'~ I2g'SB02' J1 C:SBSB(B(K,J)B(K,J)): J2'H(GG)(RC)2'STSTC:STSTH:TSSSH2'SBSBR:SBSBH2'SETSSTSB3'MTST(R1):MBSB(C1):MESE((R1)(C1))34'΅ ME0 FB999999 : FBMBME3W'Ӆ ME0 FT999999 : FTMTME3]'ؐ3u)G0:SS0:ST0:E2C3) I1 R3)T03)" J1 E 23), #1,RN:D(Z$):RNRN13)6 #1,RN:DY(Z$):RNRN13)JSSSS(DDY)3)T J3)h I4)rSB04*)| J1 C:SBSB(B(0,J)B(1,J)): J4H)H(TB(0,0)TB(1,0))(RC)4Q)ST04_) I1 R4)STST(TQ(0,I)TQ(1,I)): I4)STSTC:STSTH:TSSSH4)SBSBR:SBSBH4)SETSSTSB4)MTST(R1):MBSB(C1):MESE((R1)(C1))5)օ ME0 FT999999 : FTMTME55)ۅ ME0 FB999999 : FBMBME5;)5u*TB(K,0)G:TB(K,1)TS:TB(K,2)ST:TB(K,3)SB:TB(K,4)SE5*TB(K,5)MT:TB(K,6)MB:TB(K,7)ME:5.H$(10)5. #2,H$;H$5. #2, "ANOVA TABLE FOR ";FA$;" DATA"5.H$(80,45)6/ #2, ((32761));((32762))6)/ #2,H$6n/D #2,"SOURCE";20) " DF";35) " SS";50) " MSS";65) " F RATIO"6|/N #2, H$6/X #2,D$;20) R1;35) ST;50) MT;65) FT6/b #2,E$;20) C1;35) SB;50) MB;65) FB7 /l #2,"ERROR";20) (R1)(C1);35) SE;50) ME7/v #2,H$7?/ #2,"TOTAL";20) (RC)1;35) TS7L/ #2,H$7e/ #2, (10);(10)7r/ #2,H$7/ #2,"FACTOR";20) "MEAN";40) "FACTOR";60)"MEAN"7/ #2, H$7/ CR JC : JR7/ƀ I1 J7/Ѕ IR 122608/ڇ #2,D$;I;DF";24) "SS";36) "MSS";48) "F(FIXED)";60) "F(RANDOM)";72) "F(CR,RF)";84) "F(CF,RR)"8f) #2, G$8)" #2,D$;12) R1;24) SR;36) MR;48) RF;60) RR;72) RR;84) RF8), #2,E$;12) C1;24) SC;36) MC;48) CF;60) CR;72) CF;84) CR9)1 #2,D$;" X"9W)6 #2,E$;12) (R1)(C1);24) RC;36) RMC;48) RXC;60) RXC;72) RXC;84) RXC9)J #2,"ERROR";12) RC(N1);24) SE;36) ME9)T #2, G$9)^ #2,"TOTAL";12) RCN1;24) TS9)h #2,G$9)rH$G$9)| #2, (10);(10)9) #2,H$:3) #2,"FACTOR";20) "MEAN";40) "FACTOR";60) "MEAN":A) #2, H$:X) CR JC : JR:f) I1 J:x)… IR 10710:)̇ #2,D$;I;20) T(I,0)(CN);:)օ IC 10730:) #2, 40) E$;I;60) T(0,I)(RN);:) #2,"": I:) #2,H$;:) #2, "GRAND MEAN";G(RCN);40) "STD DEVIATION";(TS(RCN1));G* #2,H$;Y*H$(132,45);* #2, ((32765));((32766));*! #2, (10);*& #2, H$<7*+ #2, "CELL";6) "MEAN";20) "CELL";26) "MEAN";40) "CELL";46) "MEAN";60) "CELL";66) "MEAN";80) "CELL";86) "MEAN";100) "CELL";106) "MEAN"-TQ(I,J)TQ(I,J)DY:T(I,J)T(I,J)D:SSSSDDY>"-RNRN2>*-ȋ K>X-T(I,0)T(I,0)T(I,J):T(0,J)T(0,J)T(I,J)>-TQ(I,0)TQ(I,0)TQ(I,J):TQ(0,J)TQ(0,J)TQ(I,J): J,I>.HTB(0,0)TB(1,0):HH(RCN)>.TSSSH>.SR0:SC0:BX0:BY0:BC0?." I1 R:SRSRT(I,0)TQ(I,0): I?+., J1 C:SCSCT(0,J)TQ(0,J): J?a.. K1 N:BXBXB(0,K)B(0,K):BYBYB(1,K)B(1,K)?}./BCBCB(0,K)B(1,K): K?.0BXBX(RC):BXBX(TB(0,0)TB(0,0))(RCN)?.1BYBY(RC):BYBY(TB(1,0)TB(1,0))(RCN)?.2BCBC(RC):BCBCH@ .6SRSR(CN):SRSRH@%.@SCSC(RN):SCSCH@..JCS0@<.T I1 R@J.^ J1 C@c.hCSCST(I,J)TQ(I,J)@m.r J,I@.|CSCSN:CSCSH@.RCCSSRSC@.SETSCS@.MRSR(R1):MCSC(C1):RMCRC((R1)(C1))@.MERC(N1):MESEMEA. ME0 RXC999999 : RXCRMCMEA2. ME0 CF999999 : CFMCMEAU.… ME0 RF999999 : RFMRMEAz.̅ RMC0 RR999999 : RRMRRMCA.օ RMC0 CR999999 : CRMCRMCA.ېA.KKK:TB(K,0)G:TB(K,1)TS:TB(K,2)SR:TB(K,3)SC:TB(K,4)CSB9.TB(K,5)RC:TB(K,6)SE:TB(K,7)MR:TB(K,8)MC:TB(K,9)RMC:TB(K,10)ME:TB(K,11)RXCB?.BL6 59000BZ6: 1055B6M(32767):H$(M):H$(H$,1)B6H$"LIZPACK/DIR"":"H$B6 H$,RBP(3): "END LIZPACK":Bx: "FILE?";D$B悉 "READ MULTIPLE";MB挙"D",#1,D$,5C #1, 5 Z$CRN1C$SNRN:C2檀 I1 MCG #1,RN:D(Z$)CR澇 RN;DCqRNRN1: RN(1) 59140Cyҋ ICA$C A$"C" 59040C A$"E" 59190C 59100CA$C A$"C" 59180C A$"E" 59190C" 59140D, #1:D6: 11) "OPTIONS"D7@ "1. CHANGE RECORDS"DQJ "2. DELETE RECORDS"DkT "3. INSERT RECORDS"D^ "4. RETURN TO LISTING"Dh "5. EXIT"DrA$D| A$"1" 59320D熅 A$"2" 59360D琅 A$"3" 59410D皅 A$"4" RNSN: 59040E礅 A$"5" 59180E!箁 59250EJ縞: "ENTER RECORD #,NEW RECORD";RN,DEa Z$(D): #1,RNE̻ "MORE CHANGES? YES OR NO";A$Eօ A$"NO" 59190 : 59320E: "DELETE WHICH RECORD";RNE RN(1) 59385E IRN1 (1)F #1,I: #1,I1: IF+ Z$(979797): #1, (1)FS "MORE DELETIONS? YES OR NO"; A$Fs A$"YES" 59360 : 59190F: "ENTER RECORD NUMBER AT WHICH"F "INSERTION IS TO BE MADE";RNF& I(1)1 RN1 1F0 #1,I1: #1,I: IG: "RECORD";DGD Z$(D): #1,RNGAN "MORE INSERTIONS? YES OR NO";A$GaX A$"YES" 59410 : 59190 59360 : 59190F: "ENTER RECORD NUMBER AT WHICH"F "INSERTION IS TO BE MADE";RNF& I(1)1 RN1 1F0 #1,I1: #1,I: IG: "RECORD "MORE DELETIONS? YES OR NO"; A$6B A$"YES" 59360 : 591906i: "ENTER RECORD NUMBER AT WHICH"6 "INSERTION IS TO BE MADE";RN6& I(1)1 RN1 160 #1,I1: #1,I: I6: "RECORD";D6D Z$(D): #1,RN7N "MORE INSERTIONS? YES OR NO";A$70X A$"YES" 59410 : 59190 59360 : 591906i: "ENTER RECORD NUMBER AT WHICH"6 "INSERTION IS TO BE MADE";RN6& I(1)1 RN1 160 #1,I1: #1,I: I6: "RECORD";D6D Z$(D): #1,RN7N "MORE INSERTIO!b&d 600,32760&(0)&D& Y18 31: X0 1: (X,Y,5): X,Y&oX Y18 31: X62 63:(X,Y,5): X,Y& X2 61: Y18 19:(X,Y,5): Y,X& X2 61: Y30 31:(X,Y,5): Y,X& I0 8 2: Y20 29' (26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'QR(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I':: " LIZANCOV"' T1 500: T' @14,"MENU"'$ "1. CREATE DATA FILES"() "2. TWO WAY ANCOVA"(). "3. MINI-EDITOR"(F0 "4. LIZPACK DIRECTORY"(^3 "E. EXIT LIZPACK"(h8A$(}: A$"1" 1100(; A$"3" 14000(< A$"2" 3600(> A$"4" 14010(@ A$"E" 50000(A A$"Z" 600,32760: 1080)B 1080) L(3))+~ "OBSERVATIONS PER CELL?";N)E "NUMBER OF ROWS?";R)b "NUMBER OF COLUMNS?";C)܉ "NAME OF OBSERVATION FILE?";A$) "D",#1,A$,5:RN1:SS0) #1, 5 Z$)@ I1 R)r J1 C) K1 2N*և "CELL NUMBER ";I;" ";J;" RECORD NUMBER ";RN*# "DATA?";D*2: Z$(D)*>l #1,RN*JRNRN1*R K*\4 J,I*ef #1*s ": 1055*|(3)*B "NAME OF STUDY";A$*t "NAME OF INVESTIGATOR";B$* "DATE OF RUN";C$*؉ "NAME OF ROW FACTOR";D$+  "NAME OF COLUMN FACTOR";E$+& "NAME OF BLOCKS";BK$+D# "NAME OF COVARIATE";FF$+`< "NAME OF VARIABLE";F$+ #2, "NAME OF STUDY: ";A$+ #2, "NAME OF INVESTIGATOR: ";B$+ #2, "DATE OF RUN: ";C$+ "OBSERVATIONS PER CELL"; N, "NUMBER OF ROWS";R,ĉ "NUMBER OF COLUMNS";C,[Ɍ J$(10): T(R,C): TB(2,12): TQ(R,C): M(5,5): B(1,N), "NAME OF OBSERVATION FILE";A$, #2,"RUN FROM LIZPACK DATA FILE: ";A$,(3): @232, "LIZANCOV RUN", "D",#1,A$,5:RN1:SS0, #1, 5 Z$-KK0:FA$FF$: 10000-! 12000-?FA$F$:RN2:KK1: 10000-L 12000-c#RN1:KK2: 11610-p( 12000--EXTB(0,6)BX:EYTB(1,6)BY:ECTB(2,6)BC:XBBX-/DF(N1)(RC1)-2BXECEX:REBXEC:AEYEYRE:MEYAEY(DF1)-7 9000.( J1 C5Q( GGT(0,J): J5c(HGG(RCN)5o(TSSSH5}((SR0:SC05(2 I1 R:SRSRT(I,0)T(I,0): I5(< J1 C:SCSCT(0,J)T(0,J): J5(FSRSR(CN):SRSRH5(PSCSC(RN):SCSCH6(ZCS06(d I1 R6(n J1 C66(xCSCST(I,J)T(I,J)6@( J,I6T(CSCSN:CSCSH6d(RCCSSRSC6q(SETSCS6(MRSR(R1):MCSC(C1):RMCRC((R1)(C1))6(MERC(N1):MESEME6( ME0 RXC999999 : RXCRMCME7(ȅ ME0 CF999999 : CFMCME7((҅ ME0 RF999999 : RFMRME7M(܅ RMC0 RR999999 : RRMRRMC7r( RMC0 CR999999 : CRMCRMC7( #2,(10);(10);((32763));((32764))7( #2,"TWO-WAY ANOVA TABLE FOR ";FA$;" DATA"7) #2, G$8X) #2,"SOURCE";12) "18 19:(X,Y,5): Y,X& X2 61: Y30 31:(X,Y,5): Y,X' I0 8 2: Y20 29'>(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'v(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I'ȇ:: " LIZPOLY"'Ҁ T1 500: T(: @13, "MENU"::($ "1. CREATE DATA FILES"(? "2. EDIT DATA FILES"(` "3. POLYNOMIAL REGRESSION"(w "4. SCREEN DUMP"( "E. END THIS RUN"("A$(, A$"1" 370(6 A$"2" 480(@ A$"3" 1005(E A$"4" 60000(J A$"E" 350)T 290)'^(8): @ 10, "END LIZPOLY")-h)Nr(3): "NAME OF FILE?"; A$)d| A$"NONE" 240)w "D",#1,A$,12)N0:(4))NN1) "ENTER RECORD; WHEN FINISHED TYPE 0909; RECORD NUMBER IS";N) Q) Q0909 470) #1,Q* #1,N: 410*֚ #1: 370*:(3): "NAME OF FILE?"; A$*P A$"NONE" 240*c "D",#1,A$,12* "ENTER RECORD NUMBER, NEW RECORD; WHEN FINISHED, TYPE 0909,0"; Q,R* Q0909 550* #1,R* #1,Q: 510*& #1: 480+(3): "NAME OF STUDY";BA$+0 "NAME OF INVESTIGATOR";B$+I "DATE OF RUN";C$+h "DEGREE OF POLYNOMIAL";K+MK:KK1: X(M): B(M): C(M,M): P(M): D(M)+ 20000+ I1 M+ J1 I1+R(I,J)R(J,I): J,I+ 29999+$ 30410,& I1 M:X(I)R(I,K): I,#) 30270,J.SSPR(K,K)PR(K,K):YIR(0,K):SESS,X3 I1 M,p8YIYI(B(I)R(0,I)),:SESE(PR(I,K)B(I)): I,=SRSSSE:MESE(NM1):MRSRM:FRMRME,>B(0)YI: 9290,B MK1 1110-H #2,"NAME OF STUDY: ";BA$-)L #2, "NAME OF INVESTIGATOR: ";B$-GQ #2, "DATE OF RUN: ";C$-UVH$(10)-f[ #2, H$,H$-` #2, "ANOVA TABLE FOR POLYNOMIAL REGRESSION, DEGREE ";M-eH$(28)(80)(45)-jI$(27)(16)-oJ$I$(0)(120).tK$I$(0)(210).yL$I$(1)(44).4~M$I$(1)(134).A #2,H$.z #2,"SOURCE";J$;"DF";K$;"SS";L$;"MSS";M$;"F RATIO". #2,H$. #2,"REGRESSION";J$;M;K$;SR;L$;MR;M$;FR. #2,"ERROR";J$;NM1;K$;SE;L$;ME. #2,H$/ #2,"TOTAL";J$;N1;K$;SS/ #2,H$/- #2,(10);(10)/x #2,I$;(0);(144);(15);"PARTIAL REGRESSION COEFFICIENTS";(14)/ #2,(10),(10)/J$I$(0)(156)/K$I$(1)(8)/L$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFICIENT, B";J$;"STD ERROR";K$;"DF";L$;"T (FOR B=0)"0F+ #2,H$0T0 I1 M0u5ZC(I,I)ME:Z(Z):QB(I)Z0? #2,I;M$;B(I);J$;Z;K$;NM1;L$;Q0D I0H #2,H$0IA$(10)0$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFICIENT, B";J$;"STD ERROR";K$;"DF";L$;"T (FOR B=0)"0F+ #2,H$0T0 I1 M0u5ZC(I,I)ME:Z(Z):QB(I)Z0? #2,I;M$;B(I);J$;Z;K$;NM1;L$;Q0D I0ǁ 22408G0:SS0:ST0:N08,π I1 R8_PIVP(I):GGT(PI,3):SSSST(PI,2):NNT(PI,0)8STST(T(PI,1)T(PI,1)T(PI,0)): I8HGG:HHN:TSSSH:STSTH8MTST(R1):SETSST:MESE(NR)8 ME0 FT999999 : FTMTME89(3): "SET SAMPLE POINTERS"9$  I1 R96  "POINTER";I9R "SAMPLE NUMBER";VP(I)9Z  I9 (3): "DEGREE OF POLYNOMIAL";CN9  CNR1 23229 (3): @232,"LIZANAL RUN":MCN9  I1 R:X(I)I1: I9  300009 $ 20509 ) 10000: . 1200: : "DF": 8) "SS":? ‡ R1;: 8) "BETWEEN ";ST:^ LJ NR;: 8) "WITHIN ";SE:| ̇ N1;: 8) "TOTAL "; TS: ч: "DF";: 8);"MSS": և R1;: 8) "MST ";MT: ۇ NR;: 8) "MSE ";ME: : "F RATIO=";FT: "DF";R1;NR; A$; A$"" 1205;! 3050;@ (3): @232, "LIZANAL RUN";L 2050;Y 10000;e 1205;u H: I1 R; M "ENTER ABSCISSA";I; W "DATA";X(I): I; Y(3): @232,"LIZANAL RUN"; \ 2322; 1400; 11) "OPTIONS"< "1. TUKEY'S TEST" 3755>LC0: I> 3600>*LC0:A$>>Ʌ A$"" 3750>J΁ 3780>q: "SIGNIFICANCE LEVEL,PERCENT";Q>QQ100: "ENTER F(";R1;NR;Q;")"> "F=";Q:LC0>: "CONTR.";: 9) "CONFIDENCE INTERVAL"> I1 CN>MD0:DN0:PIVP(I)? J1 R:PJVP(J)?;DNDN(C(PI,PJ)C(PI,PJ)T(PJ,0))?ZMDMDC(PI,PJ)T(PJ,1): J?yDNDNME(R1)Q:DN(DN)?AMDDN:BMDDN?ׇ I;: 6) A;B?LCLC1: LC15 4080 : I?A$? A$"" 3600?끥 4065?LC0:A$@ A$"" 4060@ 4080@:@ #2,"NAME OF STUDY: ";A$@`E #2,"NAME OF INVESTIGATOR: ";B$@}J #2,"DATE OF RUN: ";C$@L #2,"RUN FROM LIZPACK DATA FILE: ";F$@O 1200@#(: 300@'H$(10)@' #2,H$;H$A '$ #2, "ANOVA TABLE FOR ";E$;" DATA"A'.H$(80,45)A('8 #2,H$Am't #2,"SOURCE";20) " DF";35) " SS";50) " MSS";65) " F RATIO"Az'~ #2,H$A' #2,"BETWEEN";20) R1;35) ST;50) MT;65) FTA' #2," (";D$;")": #2,H$A' I1 CN:PIVP(I)B0' #2,"CONTR";I;20) 1;35) C(0,PI);50) C(0,PI);65) C(0,PI)ME: IB\' #2,"REM";20) RCN1;35) C(VP(1),0)B' #2,"WITHIN";20) NR;35) SE;50) MEB'ć #2," (ERROR)"B'· #2,H$B'؇ #2,"TOTAL";20) N1;35) TSB' #2,H$B'Bu0SOR:BI0:VP(0)0Cu5 I1 R:BIBIX(I):C(0,I)1: IC2u:BIBIR:PIVP(1)Chu J1 R:PJVP(J):C(PI,PJ)X(J)BI:C(0,PJ)1: JCvu I2 MCuSI0:BI0:PIVP(I1)Cu J1 R:PJVP(J):SISIC(PI,PJ)C(PI,PJ):BIBIX(J)C(PI,PJ)C(PI,PJ)Cu JD uBIBISI:CISISO:QIVP(I):MIVP(I2)Dbu J1 R:PJVP(J):C(QI,PJ)(X(J)BI)C(PI,PJ):C(QI,PJ)C(QI,PJ)CIC(MI,PJ): JDpuSOSI: IDvuDx: "FILE?";D$D悉 "READ MULTIPLE";MD挙"D",#1,D$,5D #1, 5 Z$DRN1DSNRN:D檀 I1 MD #1,RN:D(Z$)E澇 RN;DE&RNRN1: RN(1) 59140E.ҋ IE8A$EM A$"C" 59040Eb A$"E" 59190Eo 59100EyA$E A$"C" 59180E A$"E" 59190E" 59140E, #1:E6: 11) "OPTIONS"E@ "1. CHANGE RECORDS"FJ "2. DELETE RECORDS"F T "3. INSERT RECORDS"F=^ "4. RETURN TO LISTING"FMh "5. EXIT"FWrA$Fl| A$"1" 59320F熅 A$"2" 59360F琅 A$"3" 59410F皅 A$"4" RNSN: 59040F礅 A$"5" 59180F箁 59250F縞: "ENTER RECORD #,NEW RECORD";RN,DG Z$(D): #1,RNG;̻ "MORE CHANGES? YES OR NO";A$GZօ A$"NO" 59190 : 59320G|: "DELETE WHICH RECORD";RNG RN(1) 59385G IRN1 (1)G #1,I: #1,I1: IG Z$(979797): #1, (1)H "MORE DELETIONS? YES OR NO"; A$H( A$"YES" 59360 : 59190HO: "ENTER RECORD NUMBER AT WHICH"Hr "INSERTION IS TO BE MADE";RNH& I(1)1 RN1 1H0 #1,I1: #1,I: IH: "RECORD";DHD Z$(D): #1,RNHN "MORE INSERTIONS? YES OR NO";A$IX A$"YES" 59410 : 59190;" DF";K$;" SS";L$;" MSS";M$;" F RATIO"-+ #2,H$."- #2#& 200,31699&( 150,41&6< #2,(27);(52)&?d(0)&in Y18 31: X0 1: (X,Y,5): X,Y&x Y18 31: X62 63:(X,Y,5): X,Y& X2 61: Y.&2 200,32760&(0)&D Y18 31: X0 1: (X,Y,5): X,Y&oȀ Y18 31: X62 63:(X,Y,5): X,Y&Ҁ X2 61: Y18 19:(X,Y,5): Y,X&܀ X2 61: Y30 31:(X,Y,5): Y,X& I0 8 2: Y20 29'(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'Q(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I':: " LIZANAL"'" T1 500: T', @14,"MENU"'6 "1. CREATE DATA FILES"(@ "2. MEANS COMPARISON PROCEDURES"(5E "3. MINI-EDITOR"(RJ "4. LIZPACK DIRECTORY"(jT "E. EXIT LIZPACK"(t^A$(c A$"Z" 200,32760: 350(h A$"1" 1000(m A$"3" 600(r A$"2" 1100(w A$"4" 610( A$"E" 410) 350) (3): "END LIZPACK")&)3X 59000)@]: 300)ebM(32767):H$(M):H$(H$,1))gH$"LIZPACK/DIR"":"H$)l H$,R)(3): "NUMBER OF SAMPLES";R)N0:RN2:SN1:L0) "NAME OF DATA FILE";A$* "D",#1,A$,5: #1,5 Z$* I1 R*1 "SAMPLE ";I: 120,3: 180,3*W "ENTER 999999 AT END OF SAMPLE"*p "RECORD NUMBER";RN* "DATA";D* D999999 1057* Z$(D): #1,RN:RNRN1:LL1: 1040*! Z$(L): #1,SN:SNRN:RNRN1*$L0: I*) #1+ .: 300+*L(3): "NAME OF STUDY: ";A$+LQ "NAME OF INVESTIGATOR: ";B$+eV "DATE OF RUN: ";C$+[ "NAME OF POPULATION UNIT";D$+e "NAME OF VARIABLE";E$+j "NAME OF DATA FILE";F$+o "NUMBER OF SAMPLES";R, pG0: T(R,4):SS0:RN1:ST0: C(R,R): X(R),,r(3): @232, "LIZANAL RUN",:t I0 R,Wv J0 4:T(I,J)0: J,I,wy "D",#1,F$,5: #1, 5 Z$, I1 R, #1,RN:L(Z$):RNRN1:T(I,0)L, J1 L, #1,RN:D(Z$):RNRN1,T(I,1)T(I,1)D:T(I,2)T(I,2)DD- J-*T(I,3)T(I,1):T(I,1)T(I,1)L: I-3 #1-_ I1 R:T(I,4)(T(I,3)T(I,3))T(I,0)-T(I,4)T(I,2)T(I,4):T(I,4)T(I,4)(T(I,O)1): I-QPR- I1 R:VP(I)I: I- 2250- 2145- 1400- 11) "OPTIONS".  "1. DISPLAY MEANS".# "2. COMPARE MEANS".= "3. ANOVA (SCREEN)".V‡ "4. DELETE SAMPLE".uć "5. RESTORE ALL SAMPLES".Ƈ "6. ENTER CONTRASTS".ȇ "7. ANOVA W/CONTRASTS".ʇ "8. POLYNOMIAL TRENDS".̇ "9. POLY. TRENDS, UNEVEN SPACING"/ · "P. PRINT HEADER"/Ї "E. END RUN"/B҇ "M. MULTIPLE COMPARISON TESTS"/LA$/` A$"1" 2200/t A$"2" 1430/ A$"3" 3000/ A$"4" 1550/ A$"5" 1700/ A$"6" 2000/ A$"7" 3200/ A$"8" 23000 A$"E" 90000 A$"P" 80000( A$"9" 34000< A$"M" 36000H 12600hx: 7) "SAMPLES AVAILABLE"0v} I1 R0 VP(I);: 32(0)5 ""0 I0 "":0 I1 R10LC00: "SAMPLES";: 10) "DF";: 16) "F RATIO"1PIVP(I)1 JR I1 11>PJVP(J):DN(1T(PI,0))(1T(PJ,0))1YSP(T(PI,0)1)T(PI,4)1wSPSP(T(PJ,0)1)T(PJ,4)1SPSP(T(PI,0)T(PJ,0)2)1NRT(PI,1)T(PJ,1):NR(NRNR)DN1ͅ SP0 NR999999 : NRNRSP2҇ PI;PJ;: 10) T(PI,0)T(PJ,0)2;2ׇ 18) NR2-LCLC1: LC16 153525 J2?A$2S A$"" 15252_ 15102g I2s 12052LC0:A$2 A$"" 15002 15352 14002 R12 15852 "DELETE WHICH SAMPLE";Q2 QQP Q1 15853" I1 R3' QVP(I) 16253", I3?1 "SAMPLE NOT AVAILABLE"3T6 13) "OPTIONS"3d; "1. EXIT"3@ "2. DELETE ANOTHER SAMPLE"3EA$3J A$"1" 12053O A$"2" 15503T 16053Y(3): @232, "LIZANAL RUN"3^ I1 R4c QVP(I) JI4 h I4m JR 16604-r LJ R14CwVP(L)VP(L1): L4M|RR14Y 22504e 12054RQP:(3): @ 232, "LIZANAL RUN"4 11954Ё 14004Չ "NUMBER OF CONTRASTS";CN4ׅ CNR1 20054ڀ II1 CN4PIVP(II)5߇ "CONTRAST NUMBER";II5 J1 R5<PJVP(J): "COEFFICIENT"; J5V "DATA";C(PI,PJ): J5b 14005k II5w 12055 I0 R:C(I,0)0:C(0,I)0: I5 II1 CN5 PIVP(II)5 J1 R5PJVP(J):C(0,PI)(C(PI,PJ)T(PJ,1))C(0,PI)6)C(PI,0)C(PI,0)((C(PI,PJ)C(PI,PJ))T(PJ,0))61 J6{%C(0,PI)C(0,PI)C(0,PI):C(0,PI)C(0,PI)C(PI,0):C(0,0)C(0,0)C(0,PI)6* II6/C(VP(1),0)STC(0,0)6>6a I1 R16fPIVP(I)6p JI1 R6uPJVP(J)6z T(PI,1)T(PJ,1) 21807 DVP(I):VP(I)PJ:VP(J)D: 21457* J,I707B: "SAMPLE";7T 10) "MEAN"7]LC07k I1 R7PIVP(I): PI;: 10) T(PI,1)7LCLC1: LC16 2240 : I7A$7 A$"" 12057 22257LC0:A$7Ņ A$"" 22208"4" RNSN: 590408)礅 A$"5" 5918086箁 592508_縞: "ENTER RECORD #,NEW RECORD";RN,D8v Z$(D): #1,RN8̻ "MORE CHANGES? YES OR NO";A$8օ A$"NO" 59190 : 593208: "DELETE WHICH RECORD";RN8 RN(1) 593859 IRN1 (1)9 #1,I: #1,I1: I9@ Z$(979797): #1, (1)9h "MORE DELETIONS? YES OR NO"; A$9 A$"YES" 59360 : 591909: "ENTER RECORD NUMBER AT WHICH"9 "INSERTION IS TO BE MADE";RN9& I(1)1 RN1 1:0 #1,I1: #1,I: I:: "RECORD";D:.D Z$(D): #1,RN:VN "MORE INSERTIONS? YES OR NO";A$:vX A$"YES" 59410 : 59190 #2,"": #2,H$5W I1 R5i J1 C 55|* K1 10 254E(K1)2: J1EC 59705> #2,J$(K);I;J1E;J$(K1);T(I,J1E)N;5H K5R #2,""5\ J,I6 f #2,H$: #2,(0);(10)7/ #2,H$7U/J$I$(0)(120):K$I$(0)(240):L$I$(1)(104)7/ #2,"FACTOR";J$;"MEAN";K$;"FACTOR";L$;"MEAN"7/ #2, H$7/ CR JC : JR7/ƀ I1 J7/Ѕ IR 122607/ڇ #2,D$;I;J$;TQ(K,I)C;7/ IC 122808IF ME=0 THEN CF=999999 ELSE CF=MC/ME 11970 IF ME=0 THEN RF=999999 ELSE RF=MR/ME 11980 IF RMC=0 THEN RR=999999 ELSE RR=MR/RMC 11990 IF RMC=0 THEN CR=999999 ELSE CR=MC/RMC 11995 RETURN 12000 TB(K,0)=G:TB(K,1)=TS:TB(K,2)=SR:TB(K,3)=SC:TB(K,4)=CS 12010 TB(K,5)=RC:TB(K,6)=SE:TB(K,7)=MR:TB(K,8)=MC:TB(K,9)=RMC:TB(K,10)=ME:TB(K,11)=RXC 12020 RETURN F RMC=0 THEN RR=999999 ELSE RR=MR/RMC 11990 IF RMC=0 THEN CR=999999 ELSE CR=MC/RMC 11995 RETURN 12000 TB(K,0)=G:TB(K,1)=TS:TB(K,2)=SR:TB(K,3)=SC:TB(K,4)=CS 12010 TB(K,5)z&2 400,32760&"}G$(96,45)&+(0)&U& Y18 31: X0 1: (X,Y,5): X,Y&X Y18 31: X62 63:(X,Y,5): X,Y& X2 61: Y18 19:(X,Y,5): Y,X& X2 61: Y30 31:(X,Y,5): Y,X& I0 8 2: Y20 29'* (26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'bR(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I':: " LIZANOVA"' T1 500: T' @14,"MENU"( $ "1. CREATE DATA FILES"(") "2. TWO WAY ANOVA"(9* "3. MINI-EDITOR"(V+ "4. LIZPACK DIRECTORY"(n3 "E. EXIT LIZPACK"(x8A$(: A$"1" 1100(; A$"3" 6000(< A$"2" 3600(= A$"4" 6015(@ A$"E" 6010)A A$"Z" 400,32760: 1080)B 1080)L(3))8~ "OBSERVATIONS PER CELL?";N)R "NUMBER OF ROWS?";R)o "NUMBER OF COLUMNS?";C)ܻ "NAME OF OBSERVATION FILE?";A$) "D",#1,A$,5:RN1:SS0) #1, 5 Z$)@ I1 R)r J1 C) K1 N* և "CELL NUMBER ";I;" ";J;" RECORD NUMBER ";RN*0 "DATA?";D*?: Z$(D)*Kl #1,RN*WRNRN1*_ K*i4 J,I*rf #1* ": 1055*(3)*B "NAME OF STUDY";A$*t "NAME OF INVESTIGATOR";B$*G$(96,45)* "DATE OF RUN";C$+؉ "NAME OF ROW FACTOR";D$+) "NAME OF COLUMN FACTOR";E$+E< "NAME OF VARIABLE";F$+f #2, "NAME OF STUDY: ";A$+ #2, "NAME OF INVESTIGATOR: ";B$+ #2, "DATE OF RUN: ";C$+ "OBSERVATIONS PER CELL"; N+ "NUMBER OF ROWS";R,ĉ "NUMBER OF COLUMNS";C,Ɍ T(R,C),΀ I0 R,,؀ J0 C,?T(I,J)0: J,I,c "NAME OF OBSERVATION FILE";A$, #2,"RUN FROM LIZPACK DATA FILE: ";A$,(3): @232, "LIZANOVA RUN", "D",#1,A$,5:RN1:SS0, #1, 5 Z$, I1 R, J1 C- K1 N-( #1,RN-!2D(Z$)-?@AACK DIRLIZDESC DES$LIZANOVANEQLIZ2WAY TWO}LIZANOVARAN(LIZ1WAY ONE*LIZSAMP FRQ LIZPACK SETLIZPACK DIRLIZDESC DES$LIZANOVANEQLIZ2WAY TWO}LIZANOVARAN(LIZ1WAY ONE*LIZMEAN MCPLIZBLOCK2WY-BLIZ2WAY ANC1LIZANCOVBLKeLIZ1WAY ANC5LIZANCOVRAN LIZANAL RES IDELETE VAR:LIZPOLY RES;TRANSPAKREG=4EDITOR BIG?52508P0:QZP: 600083LSN:P0:QZQ: 60008GSNSNL: 53008_PPZQ:QZP: 60008kU 53008PZP:QZQ: 60008 53008FD(I)OSSN:RPRPLI: I8 #2, (10)8 #2, "TABLE FOR THEORETICAL FREQUENCY DISTRIBUTION"9Á 22709Ȟ: 3009p Q8 Q896zZ(QP):AP:SN09W II1 Z1: QA0 61609l IIZ ILQA9~ IIZ IL19 A1 SD209 A1 SD109HILSD:BAIL9PB((AA)2)((BB)2):AAH9ʀ JJ1 SD1 2:PBPB4((AA)2):AAH:&ޅ JJSD1 6140:EPBPB2((AA)2):AAH:N JJ:gPB(H3)PB:SNSNPB:tAB: II:SN(.3989423)SN::' 4,1:: 1,1:' (0,184)(255,184),:' (8,0)(8,195),:'DFD(1):'$ I2 CI;') FD(I)D DFD(I); '+ I;;'.A180D:PXLX(LI2):QXUX(LI2)PX:PX0;H'3B244QX;W'8 I1 CI;'=GXBPX8:GYAFD(I)184:QXB(PXLI)8;'B (GX,184)(QX,GY),,BF;'LPXPXLI;'N (GX,184)(GX,GY),: I;'QA$;'V A$"" : 300;'[ 10065< N 4,1:: 1,1<$N% (0,184)(255,184),<:N* (8,0)(8,195),A180D:PXLXLI:QXUXLIPX:PX0ҋ I>A$>& A$"C" 59040>; A$"E" 59190>H 59100>RA$>g A$"C" 59180>| A$"E" 59190>" 59140>, #1:>6: 11) "OPTIONS">@ "1. CHANGE RECORDS">J "2. DELETE RECORDS">T "3. INSERT RECORDS"?^ "4. RETURN TO LISTING"?&h "5. EXIT"?0rA$?E| A$"1" 59320?Z熅 A$"2" 59360?o琅 A$"3" 59410?皅 A$"4" RNSN: 59040?礅 A$"5" 59180?箁 59250?縞: "ENTER RECORD #,NEW RECORD";RN,D? Z$(D): #1,RN@̻ "MORE CHANGES? YES OR NO";A$@3օ A$"NO" 59190 : 59320@U: "DELETE WHICH RECORD";RN@l RN(1) 59385@ IRN1 (1)@ #1,I: #1,I1: I@ Z$(979797): #1, (1)@ "MORE DELETIONS? YES OR NO"; A$A A$"YES" 59360 : 59190A(: "ENTER RECORD NUMBER AT WHICH"AK "INSERTION IS TO BE MADE";RNAg& I(1)1 RN1 1A0 #1,I1: #1,I: IA: "RECORD";DAD Z$(D): #1,RNAN "MORE INSERTIONS? YES OR NO";A$AX A$"YES" 59410 : 59190B阞: "NAME OF GRAPHICS FILE ";A$B% 4,1: 1,1B>M A$,3584,9727,3584BK颞: 300B(3): "IS THIS RUN FROM A CUSTOM FILE";LN$B CP(1)BCP(1)0B LN$"YES" TZ1:B "TOTAL NUMBER OF COLUMNS IN THE AGGREGATE FILE";TZC)" "ENTER FILE COL. NUMBER FOR VAR.";CP(1):CP(1)CP(1)1C/1CIJ #1,ICP(1):D(Z$)COhC "THIS OPTION IS NOT AVAILABLE FROM AN AGGREGATE FILE"C T1 700: TC: 300;" DF";K$;" SS";L$;" MSS";M$;" F RATIO"-+ #2,H$."- #2#& 200,31699&( 150,41&6< #2,(27);(52)&?d(0)&in Y18 31: X0 1: (X,Y,5): X,Y&x Y18 31: X62 63:(X,Y,5): X,Y& X2 61: Y18 19:(X,Y,5): Y,X& X2 61: Y30 31:(X,Y,5): Y,X' I0 8 2: Y20 29'>(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'v(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I'ȇ:: " LIZPOLY"'Ҁ T1 500: T(: @13, "MENU"::($ "1. CREATE DATA FILES"(? "2. EDIT DATA FILES"(` "3. POLYNOMIAL REGRESSION"(w "4. SCREEN DUMP"( "E. END THIS RUN"("A$(, A$"1" 370(6 A$"2" 480(@ A$"3" 1005(E A$"4" 60000(J A$"E" 350)T 290)'^(8): @ 10, "END LIZPOLY")-h)Nr(3): "NAME OF FILE?"; A$)d| A$"NONE" 240)w "D",#1,A$,12)N0:(4))NN1) "ENTER RECORD; WHEN FINISHED TYPE 0909; RECORD NUMBER IS";N) Q) Q0909 470) #1,Q* #1,N: 410*֚ #1: 370*:(3): "NAME OF FILE?"; A$*P A$"NONE" 240*c "D",#1,A$,12* "ENTER RECORD NUMBER, NEW RECORD; WHEN FINISHED, TYPE 0909,0"; Q,R* Q0909 550* #1,R* #1,Q: 510*& #1: 480+(3): "NAME OF STUDY";BA$+0 "NAME OF INVESTIGATOR";B$+I "DATE OF RUN";C$+h "DEGREE OF POLYNOMIAL";K+MK:KK1: X(M): B(M): C(M,M): P(M): D(M)+ 20000+ I1 M+ J1 I1+R(I,J)R(J,I): J,I+ 29999+$ 30410,& I1 M:X(I)R( 200,32760"(0)L Y18 31: X0 1: (X,Y,5): X,YwȀ Y18 31: X62 63:(X,Y,5): X,YҀ X2 61: Y18 19:(X,Y,5): Y,X܀ X2 61: Y30 31:(X,Y,5): Y,X I0 8 2: Y20 29!(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)Y(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4) Y,I:: " LIZDESC"" T1 500: T, @14,"MENU"6 "1. CREATE DATA FILES"!@ "2. DESCRIPTIVE STATISTICS"5E "3. Z-SCORES"LJ "4. MINI-EDITOR"iO "D. LIZPACK DIRECTORY"T "E. EXIT LIZPACK"^A$h A$"1" 1000r A$"2" 1100t A$"Z" 200,32760: 350w A$"4" 600| A$"D" 700 A$"3" 2000& A$"E" 4101 350J(3): "END LIZPACK"P]X 59000jb: 300M(32767):H$(M):H$(H$,1)H$"LIZPACK/DIR"":"H$ H$,R(3): "NUMBER OF SAMPLES";RN0:RN2:SN1:L0  "NAME OF DATA FILE";A$ "D",#1,A$,5/#1, 5 Z$= I1 R_ "SAMPLE ";I: 120,3: 180,3 "ENTER 999999 AT END OF SAMPLE" "RECORD NUMBER";RN "DATA";D D999999 1057 Z$(D): #1,RN:RNRN1:LL1: 1040! Z$(L): #1,SN:SNRN:RNRN1"$L0: I+) #18.: 300`L 200:(3): "NAME OF STUDY: ";A$Q "NAME OF INVESTIGATOR: ";B$V "DATE OF RUN: ";C$j "NAME OF DATA FILE";F$o "NUMBER OF SAMPLES";RpG0: T(R,15):SS0:RN1:ST0r(3): @232, "LIZDESC RUN"&t I0 RCv J0 4:T(I,J)0: J,Icy "D",#1,F$,5: #1, 5 Z$q I1 R #1,RN:L(Z$):RNRN1 J1 L #1,RN:D(Z$):RNRN1:T(I,0)T(I,0)1 J1 T(I,14)D : DT(I,14) T(I,14)D+ J1 T(I,15)D : DT(I,15) T(I,15)DCEET(I,2):FFT(I,5)T(I,1)(T(I,0)1)T(I,1)D:T(I,1)T(I,1)T(I,0): T(I,0)1 1180D(DT(I,7))T(I,0):NT(I,0):T(I,3)DD:T(I,2)T(I,2)N(N1)T(I,3)T(I,5)T(I,5)3DEEN(N1)(N2)T(I,3)DQT(I,6)T(I,6)4DFF6T(I,3)EE(N1)(1(N1)(N1)(N1))T(I,3)T(I,3)gT(I,7)T(I,1): Jo Ix #1 I1 R:NT(I,0):T(I,4)T(I,2)(N1)T(I,11)(T(I,4)):T(I,12)T(I,11)(N)T(I,3)T(I,11)T(I,11)T(I,11). T(I,3)0 T(I,9)999999 : T(I,9)T(I,5)(T(I,3)N)HT(I,3)T(I,3)T(I,11) T(I,3)0 T(I,10)999999 : T(I,10)T(I,6)(T(I,3)N)T(I,10)T(I,10)3T(I,13)(100T(I,11))T(I,1): IH$(96,45) #2, "NAME OF STUDY: ";A$ #2, "NAME OF INVESTIGATOR: ";B$6 #2, "DATE OF RUN: ";C$d #2, "RUN FROM LIZPACK DATA FILE: ";F$r I1 R #2,((32763));((32764)) #2,29) "SAMPLE";I;", ";T(I,0);"CASES"# #2, H$"( #2, "MINIMUM";20) "MAXIMUM";40) "RANGE";60) "MEAN";80) "VARIANCE"o- #2, T(I,15);20) T(I,14);40) T(I,14)T(I,15);60) T(I,1);80) T(I,4)}2 #2, H$7 #2, "STANDARD DEV.";20) "COEFF. OF VAR.";40) "STD. ERROR";60) "SKEWNESS";80) "KURTOSIS"'< #2, T(I,11);20) T(I,13);40) T(I,12);60) T(I,9);80) T(I,10)5A #2, H$FF #2,(10)NK I[P: 300~RN1:(3): @232,"LIZDESC RUN"ՙ "D",#1,F$,5: #1, 5 Z$ڀ I1 R߇ #2,35) "SAMPLE";I #2,H$% #2,"SAMPLE";20) "SAMPLE MEAN";40) "CASE";60) "RAW SCORE";80) "Z-SCORE"2 #2,H$O #1,RN:L(Z$):RNRN1] J1 L{ #1, RN:D(Z$):RNRN1ZDT(I,1):ZZT(I,11) #2,I;20) T(I,1);40) J;60) D;80) Z J #2,H$: #2,(10);(10) I #1  : 300x: "FILE?";D$7悉 "READ MULTIPLE";MH挙"D",#1,D$,5Z #1, 5 Z$cRN1oSNRN:}檀 I1 M #1,RN:D(Z$)澇 RN;DRNRN1: RN(1) 59140ҋ IA$ A$"C" 59040 A$"E" 59190 59100A$$ A$"C" 591809 A$"E" 59190F" 59140Q, #1:h6: 11) "OPTIONS"@ "1. CHANGE RECORDS"J "2. DELETE RECORDS"T "3. INSERT RECORDS"^ "4. RETURN TO LISTING"h "5. EXIT"rA$| A$"1" 59320熅 A$"2" 59360,琅 A$"3" 59410J皅 A$"4" RNSN: 59040_礅 A$"5" 59180l箁 59250縞: "ENTER RECORD #,NEW RECORD";RN,D Z$(D): #1,RN̻ "MORE CHANGES? YES OR NO";A$օ A$"NO" 59190 : 59320: "DELETE WHICH RECORD";RN) RN(1) 59385> IRN1 (1)V #1,I: #1,I1: Iv Z$(979797): #1, (1) "MORE DELETIONS? YES OR NO"; A$ A$"YES" 59360 : 59190: "ENTER RECORD NUMBER AT WHICH"  "INSERTION IS TO BE MADE";RN $& I(1)1 RN1 1 <0 #1,I1: #1,I: I M: "RECORD";D dD Z$(D): #1,RN N "MORE INSERTIONS? YES OR NO";A$ X A$"YES" 59410 : 59190;" DF";K$;" SS";L$;" MSS";M$;" F RATIO"-+ #2,H$."- #2#& 200,31699&( 150,41&6< #2,(27);(52)&?d(0)&in Y18 31: X0 1: (X,Y,5): X,Y&x Y18 31: X62 63:(X,Y,5): X,Y& X2 61: Y18 19:(X,Y,5): Y,X& X2 61: Y30 31:(X,Y,5): Y,X' I0 8 2: Y20 29'>(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'v(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I'ȇ:: " LIZPOLY"'Ҁ T1 500: T(: @13, "MENU"::($ "1. CREATE DATA FILES"(? "2. EDIT DATA FILES"(` "3. POLYNOMIAL REGRESSION"(w "4. SCREEN DUMP"( "E. END THIS RUN"("A$(, A$"1" 370(6 A$"2" 480(@ A$"3" 1005(E A$"4" 60000(J A$"E" 350)T 290)'^(8): @ 10, "END LIZPOLY")-h)Nr(3): "NAME OF FILE?"; A$)d| A$"NONE" 240)w "D",#1,A$,12)N0:(4))NN1) "ENTER RECORD; WHEN FINISHED TYPE 0909; RECORD NUMBER IS";N) Q) Q0909 470) #1,Q* #1,N: 410*֚ #1: 370*:(3): "NAME OF FILE?"; A$*P A$"NONE" 240*c "D",#1,A$,12* "ENTER RECORD NUMBER, NEW RECORD; WHEN FINISHED, TYPE 0909,0"; Q,R* Q0909 550* #1,R* #1,Q: 510*& #1: 480+(3): "NAME OF STUDY";BA$+0 "NAME OF INVESTIGATOR";B$+I "DATE OF RUN";C$+h "DEGREE OF POLYNOMIAL";K+MK:KK1: X(M): B(M): C(M,M): P(M): D(M)+ 20000+ I1 M+ J1 I1+R(I,J)R(J,I): J,I+ 29999+$ 30410,& I1 M:X(I)R(I,K): I,#) 30270,J.SSPR(K,K)PR(K,K):YIR(0,K):SESS,X3 I1 M,p8YIYI(B(I)R(0,I)),:SESE(PR(I,K)B(I)): I,=SRSSSE:MESE(NM1):MRSRM:FRMRME,>B(0)YI: 9290,B MK1 1110-H #2,"NAME OF STUDY: ";BA$-)L #2, "NAME OF INVESTIGATOR: ";B$-GQ #2, "DATE OF RUN: ";C$-UVH$(10)-f[ #2, H$,H$-` #2, "ANOVA TABLE FOR POLYNOMIAL REGRESSION, DEGREE ";M-eH$(28)(80)(45)-jI$(27)(16)-oJ$I$(0)(120).tK$I$(0)(210).yL$I$(1)(44).4~M$I$(1)(134).A #2,H$.z #2,"SOURCE";J$;"DF";K$;"SS";L$;"MSS";M$;"F RATIO". #2,H$. #2,"REGRESSION";J$;M;K$;SR;L$;MR;M$;FR. #2,"ERROR";J$;NM1;K$;SE;L$;ME. #2,H$/ #2,"TOTAL";J$;N1;K$;SS/ #2,H$/- #2,(10);(10)/x #2,I$;(0);(144);(15);"PARTIAL REGRESSION COEFFICIENTS";(14)/ #2,(10),(10)/J$I$(0)(156)/K$I$(1)(8)/L$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFICIENT, B";J$;"STD ERROR";K$;"DF";L$;"T (FOR B=0)"0F+ #2,H$0T0 I1 M0u5ZC(I,I)ME:Z(Z):QB(I)Z0? #2,I;M$;B(I);J$;Z;K$;NM1;L$;Q0D I0H #2,H$0IA$(10)0$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFICIENT, B";J$;"STD0IA$(10)0$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFICIENT, B";J$;"STD ERROR";K$;"DF";L$;"T (FOR B=0)"0F+ #2,H$0T0 I1 M0u5ZC(I,I)ME:Z(Z):QB(I)Z0? #2,I;M$;B(I);J$;Z;K$;NM1;L$;Q0D I0H #2,H$2 200,32760"(0)L Y18 31: X0 1: (X,Y,5): X,YwȀ Y18 31: X62 63:(X,Y,5): X,YҀ X2 61: Y18 19:(X,Y,5): Y,X܀ X2 61: Y30 31:(X,Y,5): Y,X I0 8 2: Y20 29!(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)Y(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4) Y,I:: " LIZANOVA"" T1 500: T, @14,"MENU"6 "1. CREATE DATA FILE"@ "2. ANOVA"'E "3. MINI-EDITOR"DJ "4. LIZPACK DIRECTORY"\T "E. EXIT LIZPACK"f^A${h A$"1" 1000j A$"Z" 405m A$"3" 600r A$"2" 1100w A$"4" 615 A$"E" 410 350 200,32760: 350(3): "END LIZPACK"+X 590008b: 300]gM(32767):H$(M):H$(H$,1)ylH$"LIZPACK/DIR"":"H$q H$,R(3): "NUMBER OF TREATMENTS";R "NUMBER OF BLOCKS";C "NAME OF FILE";A$RN1: "D",#1,A$,5:KRC  #1, 5 Z$ I1 K3 "RECORD NUMBER";RNB "DATA";DQ Z$(D)] #1,RNmRNRN1: Iw #1 (3): 300L(3): "NAME OF STUDY: ";A$Q "NAME OF INVESTIGATOR: ";B$V "DATE OF RUN: ";C$[ "NAME OF TREATMENTS";D$ ` "NAME OF BLOCKS";E$<e "NAME OF VARIABLE";F$Yj "NAME OF DATA FILE";G$xo "NUMBER OF TREATMENTS";Rt "NUMBER OF BLOCKS";Cy(3): @232,"LIZANOVA RUN"~ "D",#1,G$,5: #1, 5 Z$G0:SS0:ST0: B(C): TQ(R):RN1 I1 C:B(I)0: I I1 R'T05 J1 CI #1,RN:RNRN1VD(Z$)~SSSS(DD):TTD:B(J)B(J)D:GGD JTQ(I)TSTST(TT) I #1:SB0 J1 C:SBSB(B(J)B(J)): JH(GG)(RC) STSTC:STSTH:TSSSHSBSBR:SBSBH.SETSSTSB^MTST(R1):MBSB(C1):MESE((R1)(C1)) ME0 FT999999 : FTMTME ME0 FB999999 : FBMBME #2,"NAME OF STUDY: ";A$ #2,"NAME OF INVESTIGATOR: ";B$ #2,"DATE OF RUN: ",C$3 #2,"RUN FROM LIZPACK DATA FILE: ";G$AH$(10)Q #2,H$;H$z #2, "ANOVA TABLE FOR ";F$;" DATA"H$(80,45) #2,H$I$(27)(16)* #2,"SOURCE";20) " DF";35) " SS";50) " MSS";65) " F RATIO"+ #2, H$.- #2,D$;20) R1;35) ST;50) MT;65) FT\2 #2,E$;20) C1;35) SB;50) MB;65) FB7 #2,"ERROR";20) (R1)(C1);35) SE;50) ME< #2,H$A #2,"TOTAL";20) (RC)1;35) TSF #2,H$K #2,(10);(10)P #2,H$.Z #2,"FACTOR";20) "MEAN";40) "FACTOR";60) "MEAN"<\ #2, H$S] RC JR : JCa_ I1 Jrd IR 1390i #2,D$;I;20) TQ(I)C;n IC 1400s #2, 40) E$;I;60) B(I)R;x #2,"": I} #2,H$$ #2, "GRAND MEAN";G(RC);40) "STD DEVIATION";(TS(RC1))1 #2,H$>: 300Qx: "FILE?";D$i悉 "READ MULTIPLE";Mz挙"D",#1,D$,5 #1, 5 Z$RN1SNRN:檀 I1 M #1,RN:D(Z$)澇 RN;DRNRN1: RN(1) 59140ҋ IA$ A$"C" 59040* A$"E" 591907 59100AA$V A$"C" 59180k A$"E" 59190x" 59140, #1:6: 11) "OPTIONS"@ "1. CHANGE RECORDS"J "2. DELETE RECORDS"T "3. INSERT RECORDS"^ "4. RETURN TO LISTING"h "5. EXIT"rA$4| A$"1" 59320I熅 A$"2" 59360^琅 A$"3" 59410|皅 A$"4" RNSN: 59040礅 A$"5" 59180箁 59250縞: "ENTER RECORD #,NEW RECORD";RN,D Z$(D): #1,RN̻ "MORE CHANGES? YES OR NO";A$"օ A$"NO" 59190 : 59320D: "DELETE WHICH RECORD";RN[ RN(1) 59385p IRN1 (1) #1,I: #1,I1: I Z$(979797): #1, (1) "MORE DELETIONS? YES OR NO"; A$ A$"YES" 59360 : 59190: "ENTER RECORD NUMBER AT WHICH": "INSERTION IS TO BE MADE";RNV& I(1)1 RN1 1n0 #1,I1: #1,I: I: "RECORD";DD Z$(D): #1,RNN "MORE INSERTIONS? YES OR NO";A$X A$"YES" 59410 : 59190 59360 : 59190: "ENTER RECORD : 59190 59360 : 59190#@: "ENTER RECORD NUMBER AT WHICH"#c "INSERTION IS TO BE MADE";RN#& I(1)1 RN1 1#0 #1,I1: #1,I: I#: "RECORD";D#D Z$(D): #1,RN#N "MORE INSERTIONS? YES OR NO";A$$X A$"YES" 59410 &2 200, 32760&(0)&E Y18 31: X0 1: (X,Y,5): X,Y&pȀ Y18 31: X62 63:(X,Y,5): X,Y&Ҁ X2 61: Y18 19:(X,Y,5): Y,X&܀ X2 61: Y30 31:(X,Y,5): Y,X& I0 8 2: Y20 29'(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'R(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I':: " LIZANOVA"'" T1 500: T', @14,"MENU"'6 "1. CREATE DATA FILES"(@ "2. ONE WAY ANOVA"()E "3. MINI-EDITOR"(FJ "4. LIZPACK DIRECTORY"(^T "E. END THIS RUN"(h^A$(}h A$"1" 1000(j A$"Z" 200,32760: 350(m A$"3" 600(r A$"2" 1100(w A$"4" 610( A$"E" 410( 350)(3): "END LIZPACK"))'X 59000)4]: 300)YbM(32767):H$(M):H$(H$,1))ugH$"LIZPACK/DIR"":"H$)l H$,R)(3): "NUMBER OF SAMPLES";R)N0:RN1) "NAME OF DATA FILE";A$) "D",#1,A$,5: #1, 5 Z$) I1 R* "SAMPLE ";I: 120,3: 180,3*> "NUMBER OF OBSERVATIONS";L*c Z$(L): #1,RN:RNRN1:NNL*q J1 L* "SAMPLE ";I;" RECORD ";RN* "DATA";D* Z$(D): #1,RN:RNRN1: J*! I*) #1*.: 300+ L 200:(3): "NAME OF STUDY: ";A$+-Q "NAME OF INVESTIGATOR: ";B$+HV "DATE OF RUN: ";C$+k[ "NAME OF POPULATION UNIT";D$+e "NAME OF VARIABLE";E$+j "NAME OF DATA FILE";F$+o "NUMBER OF SAMPLES";R+pG0: T(R):SS0:RN1:ST0:N0,r(3): @232, "LIZANOVA RUN",t I0 R:T(I)0: I,;y "D",#1,F$,5: #1, 5 Z$,I I1 R,l #1,RN:L(Z$):RNRN1:NNL,z J1 L, #1,RN:D(Z$):RNRN1,SSSS(DD):GGD:T(I)T(I)D, J,T(I)T(I)L:STST(T(I)T(I)L): I, #1-GMGN:HGG:HHN:SSSSH:STSTH->MTST(R1):SESSST:MESE(NR)-a ME0 FT999999 : FTMTME- #2,"NAME OF STUDY: ";A$- #2,"NAME OF INVESTIGATOR: ";B$- #2,"DATE OF RUN: ",C$- #2,"RUN FROM LIZPACK DATA FILE: ";F$-H$(10). #2,H$;H$.7 #2, "ANOVA TABLE FOR ";E$;" DATA".HH$(80,45).U #2,H$.* #2,"SOURCE";20) " DF";35) " SS";50) " MSS";65) " F RATIO".+ #2,H$.- #2,"BETWEEN";20) R1;35) ST;50) MT;65) FT.2 #2," (";D$;")"/7 #2,"WITHIN";20) NR;35) SE;50) ME/58 #2," (ERROR)"/B< #2,H$/eA #2,"TOTAL";20) N1;35) SS/rF #2,H$/K #2,(10)/P #2,H$/U #2, "UNIT";40) "MEAN"/Z #2, H$/_ I1 R/d #2, D$;I;40) T(I)/f I/i #2,H$0n #2, "GRAND MEAN";40) GM0&p #2,H$03s: 3000Hx: "FILE?";D$0`悉 "READ MULTIPLE";M0q挙"D",#1,D$,50 #1, 5 Z$0RN10SNRN:0檀 I1 M0 #1,RN:D(Z$)0澇 RN;D0RNRN1: RN(1) 591400ҋ I0A$1 A$"C" 590401! A$"E" 591901. 5910018A$1M A$"C" 591801b A$"E" 591901o" 591401z, #1:16: 11) "OPTIONS"1@ "1. CHANGE RECORDS"1J "2. DELETE RECORDS"1T "3. INSERT RECORDS"1^ "4. RETURN TO LISTING"2 h "5. EXIT"2rA$2+| A$"1" 593202@熅 A$"2" 593602U琅 A$"3" 594102j皅 A$"4" 590402礅 A$"5" 591802箁 592502縞: "ENTER RECORD #,NEW RECORD";RN,D2 Z$(D): #1,RN2̻ "MORE CHANGES? YES OR NO";A$3օ A$"NO" 59190 : 5932032: "DELETE WHICH RECORD";RN3G IRN1 (1)3_ #1,I: #1,I1: I3 Z$(979797): #1, (1)3 "MORE DELETIONS? YES OR NO"; A$3 A$"YES" 59360 : 591903: "ENTER RECORD NUMBER AT WHICH"4 "INSERTION IS TO BE MADE";RN4-& I(1)1 RN1 14E0 #1,I1: #1,I: I4V: "RECORD";D4mD Z$(D): #1,RN4N "MORE INSERTIONS? YES OR NO";A$4X A$"YES" 59410 : 59190;" DF";K$;" SS";L$;" MSS";M$;" F RATIO"-+ #2,H$."- #2#& 200,31699&( 150,41&6< #2,(27);(52)&?d(0)&in Y18 31: X0 1: (X,Y,5): X,Y&x Y18 31: X62 63:(X,Y,5): X,Y& X2 61: Y18 19:(X,Y,5): Y,X& X2 61: Y30 31:(X,Y,5): Y,X' I0 8 2: Y20 29'>(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'v(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I'ȇ:: " LIZPOLY"'Ҁ T1 500: T(: @13, "MENU"::($ "1. CREATE DATA FILES"(? "2. EDIT DATA FILES"(` "3. POLYNOMIAL REGRESSION"(w "4. SCREEN DUMP"( "E. END THIS RUN"("A$(, A$"1" 370(6 A$"2" 480(@ A$"3" 1005(E A$"4" 60000(J A$"E" 350)T 290)'^(8): @ 10, "END LIZPOLY")-h)Nr(3): "NAME OF FILE?"; A$)d| A$"NONE" 240)w "D",#1,A$,12)N0:(4))NN1) "ENTER RECORD; WHEN FINISHED TYPE 0909; RECORD NUMBER IS";N) Q) Q0909 470) #1,Q* #1,N: 410*֚ #1: 370*:(3): "NAME OF FILE?"; A$*P A$"NONE" 240*c "D",#1,A$,12* "ENTER RECORD NUMBER, NEW RECORD; WHEN FINISHED, TYPE 0909,0"; Q,R* Q0909 550* #1,R* #1,Q: 510*& #1: 480+(3): "NAME OF STUDY";BA$+0 "NAME OF INVESTIGATOR";B$+I "DATE OF RUN";C$+h "DEGREE OF POLYNOMIAL";K+MK:KK1: X(M): B(M): C(M,M): P(M): D(M)+ 20000+ I1 M+ J1 I1+R(I,J)R(J,I): J,I+ 29999+$ 30410,& I1 M:X(I)R(I,K): I,#) 30270,J.SSPR(K,K)PR(K,K):YIR(0,K):SESS,X3 I1 M,p8YIYI(B(I)R(0,I)),:SESE(PR(I,K)B(I)): I,=SRSSSE:MESE(NM1):MRSRM:FRMRME,>B(0)YI: 9290,B MK1 1110-H #2,"NAME OF STUDY: ";BA$-)L #2, "NAME OF INVESTIGATOR: ";B$-GQ #2, "DATE OF RUN: ";C$-UVH$(10)-f[ #2, H$,H$-` #2, "ANOVA TABLE FOR POLYNOMIAL REGRESSION, DEGREE ";M-eH$(28)(80)(45)-jI$(27)(16)-oJ$I$(0)(120).tK$I$(0)(210).yL$I$(1)(44).4~M$I$(1)(134).A #2,H$.z #2,"SOURCE";J$;"DF";K$;"SS";L$;"MSS";M$;"F RATIO". #2,H$. #2,"REGRESSION";J$;M;K$;SR;L$;MR;M$;FR. #2,"ERROR";J$;NM1;K$;SE;L$;ME. #2,H$/ #2,"TOTAL";J$;N1;K$;SS/ #2,H$/- #2,(10);(10)/x #2,I$;(0);(144);(15);"PARTIAL REGRESSION COEFFICIENTS";(14)/ #2,(10),(10)/J$I$(0)(156)/K$I$(1)(8)/L$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFICIENT, B";J$;"STD ERROR";K$;"DF";L$;"T (FOR B=0)"0F+ #2,H$0T0 I1 M0u5ZC(I,I)ME:Z(Z):QB(I)Z0? #2,I;M$;B(I);J$;Z;K$;NM1;L$;Q0D I0H #2,H$0IA$(10)0$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFI ?&2 400,32760&7‡ #2,((32763));((32764))&@(0)&j& Y18 31: X0 1: (X,Y,5): X,Y&X Y18 31: X62 63:(X,Y,5): X,Y& X2 61: Y18 19:(X,Y,5): Y,X& X2 61: Y30 31:(X,Y,5): Y,X' I0 8 2: Y20 29'? (26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'wR(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I':: " LIZANOVA"' T1 500: T( @14,"MENU"($ "1. CREATE DATA FILES"(F) "2. ANOVA-TWO WAY (BLOCK DESIGN)"(]+ "3. MINI-EDITOR"(z. "4. LIZPACK DIRECTORY"(3 "E. END THIS RUN"(8A$(: A$"1" 1100(; A$"3" 7000(< A$"2" 3600(> A$"4" 7010)@ A$"E" 6010)&A A$"Z" 400,32760: 1080)2B 1080);L(3))\~ "OBSERVATIONS PER CELL?";N)v "NUMBER OF ROWS?";R) "NUMBER OF COLUMNS?";C)ܻ "NAME OF OBSERVATION FILE?";A$) "D",#1,A$,5:RN1:SS0) #1, 5 Z$)@ I1 R*r J1 C* K1 N*Dև "CELL NUMBER ";I;" ";J;" RECORD NUMBER ";RN*T "DATA?";D*c: Z$(D)*ol #1,RN*{RNRN1* K*4 J,I*f #1* ": 1055*(3)*B "NAME OF STUDY";A$*GG$(96,45)*t "NAME OF INVESTIGATOR";B$+ "DATE OF RUN";C$+,؉ "NAME OF ROW FACTOR";D$+M "NAME OF COLUMN FACTOR";E$+i "NAME OF BLOCKS"; BK$+< "NAME OF VARIABLE";F$+ #2, "NAME OF STUDY: ";A$+ #2, "NAME OF INVESTIGATOR: ";B$+ #2, "DATE OF RUN: ";C$, "OBSERVATIONS PER CELL"; N,' "NUMBER OF ROWS";R,Cĉ "NUMBER OF COLUMNS";C,WɌ T(R,C): B(N),e΀ I0 R,pB(I)0,~؀ J0 C,T(I,J)0: J,I, "NAME OF OBSERVATION FILE";A$, #2,"RUN FROM LIZPACK DATA FILE: ";A$-(3): @232, "LIZANOVA RUN"-# "D",#1,A$,5:RN1:SS0:BX0-5 #1, 5 Z$-C I1 R-Q J1 C-_ K1 N-k( #1,RN-x2D(Z$)-7B(K)B(K)D-TSSSH.LSR0:SC0.r I1 R:SRSRT(I,0)T(I,0): I.À K1 N:BXBXB(K)B(K): K.Ȁ J1 C:SCSCT(0,J)T(0,J): J.BXBX(RC):BXBXH.SRSR(CN):SRSRH/SCSC(RN):SCSCH/ CS0/ I1 R/' J1 C/?CSCST(I,J)T(I,J)/I J,I/]CSCSN:CSCSH/m"RCCSSRSC/},SETSCSBX/6MRSR(R1):MCSC(C1):RMCRC((R1)(C1))/@ME(RC1)(N1):MESEME/J ME0 RXC999999 : RXCRMCME0T ME0 CF999999 : CFMCME08Y ME0 RF999999 : RFMRME0]^ RMC0 RR999999 : RRMRRMC0c RMC0 CR999999 : CRMCRMC0h #2,(10);(10)0r #2,"TWO-WAY ANOVA TABLE FOR ";F$;" DATA"0| #2, G$1K #2,"SOURCE";12) "DF";24) "SS";36) "MSS";48) "F(FIXED)";60) "F(RANDOM)";72) "F(CR,RF)";84) "F(CF,RR)"1Y #2, G$1x #2,BK$;12) N1;24) BX1 #2, G$1 #2,D$;12) R1;24) SR;36) MR;48) RF;60) RR;72) RR;84) RF2 #2,E$;12) C1;24) SC;36) MC;48) CF;60) CR;72) CF;84) CR2k #2,D$;" X";12) (R1)(C1);24) RC;36) RMC;48) RXC;60) RXC;72) RXC;84) RXC2x #2,E$2‡ #2,"ERROR";12) (RC1)(N1);24) SE;36) ME2̇ #2, G$2և #2,"TOTAL";12) RCN1;24) TS2 #2,G$2H$G$3 #2, (10);(10)3 #2,H$3X #2,"FACTOR";20) "MEAN";40) "FACTOR";60) "MEAN"3f #2, H$3} CR JC : JR3& I1 J30 IR 57003: #2,D$;I;20) T(I,0)(CN);3D IC 57203N #2, 40) E$;I;60) T(0,I)(RN);4X #2,"": I4b #2,H$4]l #2, "GRAND MEAN";G(RCN);40) "STD DEVIATION";(TS(RCN1))4jv #2,H$4|H$(132,45)4 #2,((32765));((32766))4 #2,H$5E #2,"CELL";6) "MEAN";20) "CELL";26) "MEAN";40) "CELL";46) "MEAN";60) "CELL";66) "MEAN";80) "CELL";86) "MEAN";100) "CELL";106) "MEAN"5R #2,H$5` I1 R5nRN0:SN65| J1 C5 #2,RN) I;J;SN) T(I,J)N;5RNRN20:SNSN205 RN100 58805RN0:SN6: #2,""5 J5 #2,""5 I6  #2,H$6p: 105564z(3): "END LIZANOVA":6AX 590006O]: 10556tbM(32767):P$(M):P$(P$,1)6gP$"LIZPACK/DIR"":"P$6l P$,R6x: "FILE?";D$6悉 "READ MULTIPLE";M6挙"D",#1,D$,56 #1, 5 Z$6RN16SNRN:7 檀 I1 M7! #1,RN:D(Z$)7,澇 RN;D7KRNRN1: RN(1) 591407Sҋ I7]A$7r A$"C" 590407 A$"E" 591907 591007A$7 A$"C" 591807 A$"E" 591907" 591407, #1:76: 11) "OPTIONS"8@ "1. CHANGE RECORDS"8+J "2. DELETE RECORDS"8ET "3. INSERT RECORDS"8b^ "4. RETURN TO LISTING"8rh "5. EXIT"8|rA$8| A$"1" 593208熅 A$"2" 593608琅 A$"3" 594108皅 A$"4" RNSN: 590408礅 A$"5" 591808箁 592509$縞: "ENTER RECORD #,NEW RECORD";RN,D9; Z$(D): #1,RN9`̻ "MORE CHANGES? YES OR NO";A$9օ A$"NO" 59190 : 593209: "DELETE WHICH RECORD";RN9 RN(1) 593859 IRN1 (1)9 #1,I: #1,I1: I: Z$(979797): #1, (1):- "MORE DELETIONS? YES OR NO"; A$:M A$"YES" 59360 : 59190:t: "ENTER RECORD NUMBER AT WHICH": "INSERTION IS TO BE MADE";RN:& I(1)1 RN1 1:0 #1,I1: #1,I: I:: "RECORD";D:D Z$(D): #1,RN;N "MORE INSERTIONS? YES OR NO";A$;;X A$"YES" 59410 : 59190 #2,"": #2,H$5W I1 R5i J1 C 55|* K1 10 254E(K1)2: J1EC 59705> #2,J$(K);I;J1E;J$(K1);T(I,J1E)N;5H K5R #2,""5\ J,I6 f #2,H$: #2,(0);(10)7/ #2,H$7U/J$I$(0)(120):K$I$(0)(240):L$I$(1)(104)7/ #2,"FACTOR";J$;"MEAN";K$;"FACTOR";L$;"MEAN"7/ #2, H$7/ CR JC : JR7/ƀ I1 J7/Ѕ IR 122607/ڇ #2,D$;I;J$;TQ(K,I)C;7/ IC 122808IF ME=0 THEN CF=999999 ELSE CF=MC/ME 11970 IF ME=0 THEN RF=999999 ELSE RF=MR/ME 11980 IF RMC=0 THEN RR=999999 ELSE RR=MR/RMC 11990 IF RMC=0 THEN CR=999999 ELSE CR=MC/RMC 11995 RETURN 12000 TB(K,0)=G:TB(K,1)=TS:TB(K,2)=SR:TB(K,3)=SC:TB(K,4)=CS 12010 TB(K,5)=RC:TB(K,6)=SE:TB(K,7)=MR:TB(K,8)=MC:TB(K,9)=RMC:TB(K,10)=ME:TB(K,11)=RXC 12020 RETURN F RMC=0 THEN RR=999999 ELSE RR=MR/RMC 11990 IF RMC=0 THEN CR=999999 ELSE CR=MC/RMC 11995 RETURN 12000 TB(K,0)=G:TB(K,1)=TS:TB(K,2)=SR:TB(K,3)=SC:TB(K,4)=CS 12010 TB(K,5)&d 600,32760&(0)&D& Y18 31: X0 1: (X,Y,5): X,Y&oX Y18 31: X62 63:(X,Y,5): X,Y& X2 61: Y18 19:(X,Y,5): Y,X& X2 61: Y30 31:(X,Y,5): Y,X& I0 8 2: Y20 29' (26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'QR(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I':: " LIZANCOV"' T1 500: T' @14,"MENU"'$ "1. CREATE DATA FILES"() "2. TWO WAY ANCOVA"(). "3. MINI-EDITOR"(F0 "4. LIZPACK DIRECTORY"(^3 "E. EXIT LIZPACK"(h8A$(}: A$"1" 1100(; A$"3" 14000(< A$"2" 3600(= A$"4" 14010(@ A$"E" 50000(A A$"Z" 600,32760: 1080)B 1080) L(3))+~ "OBSERVATIONS PER CELL?";N)E "NUMBER OF ROWS?";R)b "NUMBER OF COLUMNS?";C)܉ "NAME OF OBSERVATION FILE?";A$) "D",#1,A$,5:RN1:SS0) #1, 5 Z$)@ I1 R)r J1 C) K1 2N*և "CELL NUMBER ";I;" ";J;" RECORD NUMBER ";RN*# "DATA?";D*2: Z$(D)*>l #1,RN*JRNRN1*R K*\4 J,I*ef #1*s ": 1055*|(3)*B "NAME OF STUDY";A$*t "NAME OF INVESTIGATOR";B$* "DATE OF RUN";C$*؉ "NAME OF ROW FACTOR";D$+  "NAME OF COLUMN FACTOR";E$+)# "NAME OF COVARIATE";FF$+E< "NAME OF VARIABLE";F$+f #2, "NAME OF STUDY: ";A$+ #2, "NAME OF INVESTIGATOR: ";B$+ #2, "DATE OF RUN: ";C$+ "OBSERVATIONS PER CELL"; N+ "NUMBER OF ROWS";R,ĉ "NUMBER OF COLUMNS";C,7Ɍ J$(10): T(R,C): TB(2,12): TQ(R,C): M(5,5),[ "NAME OF OBSERVATION FILE";A$, #2,"RUN FROM LIZPACK DATA FILE: ";A$,(3): @232, "LIZANCOV RUN", "D",#1,A$,5:RN1:SS0, #1,5 Z$,KK0:FA$FF$: 10000, 12000-FA$F$:RN2:KK1: 10000-' 12000->#RN1:KK2: 11610-K( 12000-p-EXTB(0,6):EYTB(1,6):ECTB(2,6)-/DF(N1)RC-2BXECEX:REBXEC:AEYEYRE:MEYAEY(DF1)-7 9000-)̇ #2,D$;I;20) T(I,0)(CN);:P)օ IC 10730:x) #2, 40) E$;I;60) T(0,I)(RN);:) #2,"": I:) #2,H$:) #2, "GRAND MEAN";G(RCN);40) "STD DEVIATION";(TS(RCN1)):* #2,H$:*H$(132,45);* #2,(10);5* #2, ((32765));((32766));B*! #2,H$;*& #2,"CELL";6) "MEAN";20) "CELL";26) "MEAN";40) "CELL";46) "MEAN";60) "CELL";66) "MEAN";80) "CELL";86) "MEAN";100) "CELL";106) "MEAN";*+ #2,H$;*0 I1 R<*5RN0:SN6<*: J1 C<2*? #2, RN) I;J;SN) T(I,J)N;.HTB(0,0)TB(1,0):HH(RCN)>.TSSSH>.SR0:SC0>E." I1 R:SRSRT(I,0)TQ(I,0): I>l., J1 C:SCSCT(0,J)TQ(0,J): J>.6SRSR(CN):SRSRH>.@SCSC(RN):SCSCH>.JCS0>.T I1 R>.^ J1 C>.hCSCST(I,J)TQ(I,J)>.r J,I>.|CSCSN:CSCSH?.RCCSSRSC?.SETSCS?F.MRSR(R1):MCSC(C1):RMCRC((R1)(C1))?`.MERC(N1):MESEME?. ME0 RXC999999 : RXCRMCME?. ME0 CF999999 : CFMCME?.… ME0 RF999999 : RFMRME?.̅ RMC0 RR999999 : RRMRRMC@.օ RMC0 CR999999 : CRMCRMC@.ې@[.KKK:TB(K,0)G:TB(K,1)TS:TB(K,2)SR:TB(K,3)SC:TB(K,4)CS@.TB(K,5)RC:TB(K,6)SE:TB(K,7)MR:TB(K,8)MC:TB(K,9)RMC:TB(K,10)ME:TB(K,11)RXC@.@6 59000@6: 1055@6M(32767):H$(M):H$(H$,1)A6H$"LIZPACK/DIR"":"H$A6 H$,RA8P(3): "END LIZPACK":AKx: "FILE?";D$Ac悉 "READ MULTIPLE";MAt挙"D",#1,D$,5A #1, 5 Z$ARN1ASNRN:A檀 I1 MA #1,RN:D(Z$)A澇 RN;DARNRN1: RN(1) 59140Aҋ IAA$B A$"C" 59040B$ A$"E" 59190B1 59100B;A$BP A$"C" 59180Be A$"E" 59190Br" 59140B}, #1:B6: 11) "OPTIONS"B@ "1. CHANGE RECORDS"BJ "2. DELETE RECORDS"BT "3. INSERT RECORDS"B^ "4. RETURN TO LISTING"Ch "5. EXIT"CrA$C.| A$"1" 59320CC熅 A$"2" 59360CX琅 A$"3" 59410Cv皅 A$"4" RNSN: 59040C礅 A$"5" 59180C箁 59250C縞: "ENTER RECORD #,NEW RECORD";RN,DC Z$(D): #1,RNC̻ "MORE CHANGES? YES OR NO";A$Dօ A$"NO" 59190 : 59320D>: "DELETE WHICH RECORD";RNDU RN(1) 59385Dj IRN1 (1)D #1,I: #1,I1: ID Z$(979797): #1, (1)D "MORE DELETIONS? YES OR NO"; A$D A$"YES" 59360 : 59190E: "ENTER RECORD NUMBER AT WHICH"E4 "INSERTION IS TO BE MADE";RNEP& I(1)1 RN1 1Eh0 #1,I1: #1,I: IEy: "RECORD";DED Z$(D): #1,RNEN "MORE INSERTIONS? YES OR NO";A$EX A$"YES" 59410 : 59190 59360 : 59190E: "ENTER RECOR RECORD";RN4! RN(1) 5938546 IRN1 (1)4N #1,I: #1,I1: I4n Z$(979797): #1, (1)4 "MORE DELETIONS? YES OR NO"; A$4 A$"YES" 59360 : 591904: "ENTER RECORD NUMBER AT WHICH"5 "INSERTION IS TO BE MADE";RN5& I(1)1 RN1 1540 #1,I1: #1,I: I5E: "RECORD";D5\D Z$(D): #1,RN5N "MORE INSERTIONS? YES OR NO";A$5X A$"YES" 59410 : 59190 59360 : 591904: "ENTER RECORD NUMBER AT WHICH"5 "INSERTION IS TO BE MADE";R2 600,32760"(0)L Y18 31: X0 1: (X,Y,5): X,YwȀ Y18 31: X62 63:(X,Y,5): X,YҀ X2 61: Y18 19:(X,Y,5): Y,X܀ X2 61: Y30 31:(X,Y,5): Y,X I0 8 2: Y20 29!(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)Y(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4) Y,I:: " LIZANCOV"" T1 500: T, @14,"MENU"6 "1. CREATE DATA FILES"@ "2. ONE WAY ANCOVA"1E "3. MINI-EDITOR"NJ "4. LIZPACK DIRECTORY"fT "E. EXIT LIZPACK"p^A$c A$"Z" 600,32760: 350h A$"1" 1000r A$"2" 1100w A$"3" 450| A$"4" 600 A$"E" 410 350(3): "END LIZPACK" - 59000:̞: 300_XM(32767):H$(M):H$(H$,1){]H$"LIZPACK/DIR"":"H$b H$,R(3): "NUMBER OF SAMPLES";RN0:RN1 "NAME OF DATA FILE";A$ "D",#1,A$,5: #1,5 Z$ I1 R" "SAMPLE ";I: 120,3: 180,3C "NUMBER OF OBSERVATIONS";Lh Z$(L): #1,RN:RNRN1:NNLx J1 2L "SAMPLE ";I;" RECORD ";RN "DATA";D Z$(D): #1,RN:RNRN1: J! I) #1:: 300L(3): "NAME OF STUDY: ";A$&Q "NAME OF INVESTIGATOR: ";B$?V "DATE OF RUN: ";C$b[ "NAME OF POPULATION UNIT";D$` "NAME OF COVARIATE"; FA$e "NAME OF VARIABLE";E$j "NAME OF DATA FILE";F$o "NUMBER OF SAMPLES";Rr(3): @232, "LIZANCOV RUN"y "D",#1,F$,5: #1, 5 Z$5 #2,"NAME OF STUDY: ";A$[ #2,"NAME OF INVESTIGATOR: ";B$x #2,"DATE OF RUN: ",C$ #2,"RUN FROM LIZPACK DATA FILE: ";F$H$(10) #2,H$;H$G0: T(R):SS0:RN1:ST0:N0: Q(2,5) I1 R:T(I)0: I I1 R8 #1,RN:L(Z$):RNRN1:NNLL J1 2L 2i #1,RN:D(Z$):RNRN2SSSS(DD):GGD:T(I)T(I)D" J,T(I)T(I)L:STST(T(I)T(I)L): I6HGG:HHN:SSSSH:STSTH@MTST(R1):SESSST:MESE(NR)?JQ(0,0)SS:Q(0,1)ST:Q(0,2)MT:Q(0,3)SE:Q(0,4)ME:Q(0,5)GZG0:SS0:RN1:ST0:N0sڀ I1 R:T(I)0: I I1 R #1,RN:L(Z$):RNRN2:NNL J1 2L 2 #1,RN:D(Z$):RNRN2 SSSS(DD):GGD:T(I)T(I)D J/ RNRN1:T(I)T(I)L:STST(T(I)T(I)L): IO*HGG:HHN:SSSSH:STSTHt4MTST(R1):SESSST:MESE(NR)>Q(1,0)SS:Q(1,1)ST:Q(1,2)MT:Q(1,3)SE:Q(1,4)ME:Q(1,5)G 0 S(R):G0:SS0:RN1:ST0:N0 : I1 R:T(I)0:S(I)0: I D I1 R& N #1,RN:L(Z$):RNRN1:NNL: X J1 2L 2W b #1,RN:D(Z$):RNRN1u l #1,RN:DY(Z$):RNRN1 vSSSS(DDY):T(I)T(I)D:S(I)S(I)DY J T(I)T(I)L:S(I)S(I)L:STSTT(I)S(I)L: I HQ(0,5)Q(1,5):HHN:SSSSH:STSTH( MTST(R1):SESSST:MESE(NR)g Q(2,0)SS:Q(2,1)ST:Q(2,2)MT:Q(2,3)SE:Q(2,4)ME:Q(2,5)Gp #1BEQ(2,3)Q(0,3):BYQ(2,0)Q(0,0)AEQ(1,3)BEQ(2,3)TYQ(1,0)BYQ(2,0)EMAE(NR1):AY(TYAE):MYAY(R1) EM0 FT999999 : FTMYEM$H$(132,45)K؇ #2, ((32765));((32766)) #2, "ANALYSIS OF COVARIANCE TABLE FOR ";FA$;",";E$;" DATA" #2, H$* #2, "SOURCE";20) "DF";35) "SS(X,X)";50) "SS(X,Y)";65) "SS(Y,Y)";80) "DF";90) "ADJ. SS(Y,Y)";105) "ADJ. MSS(Y,Y)";120) "F RATIO"8 #2, H$ #2, "TOTAL";20) N1;35) Q(0,0);50) Q(2,0);65) Q(1,0);80) N2;90) TY #2, H$ #2, D$;20) R1;35) Q(0,1);50) Q(2,1);65) Q(1,1).( #2, "ERROR";20) NR;35) Q(0,3);50) Q(2,3);65) Q(1,3);80) NR1;90) AE;105) EM<2 #2, H$I7 #2,D$< #2, "ADJUSTED";80) R1;90) AY;105) MY;120) FTF #2, H$P #2, "REGRESSION COEFF., ERROR ";BEZ #2, H$d #2, "REGRESSION COEFF., ";D$;" ";BYn #2, H$: 300#x: "FILE?";D$;悉 "READ MULTIPLE";ML挙"D",#1,D$,5^ #1, 5 Z$gRN1sSNRN:檀 I1 M #1,RN:D(Z$)澇 RN;DRNRN1: RN(1) 59140ҋ IA$ A$"C" 59040 A$"E" 59190 59100A$( A$"C" 59180= A$"E" 59190J" 59140U, #1:l6: 11) "OPTIONS"@ "1. CHANGE RECORDS"J "2. DELETE RECORDS"T "3. INSERT RECORDS"^ "4. RETURN TO LISTING"h "5. EXIT"rA$| A$"1" 59320熅 A$"2" 593600琅 A$"3" 59410N皅 A$"4" RNSN: 59040c礅 A$"5" 59180p箁 59250縞: "ENTER RECORD #,NEW RECORD";RN,D Z$(D): #1,RN̻ "MORE CHANGES? YES OR NO";A$օ A$"NO" 59190 : 59320 : "DELETE WHICH RECORD";RN - RN(1) 59385 B IRN1 (1) Z #1,I: #1,I1: I z Z$(979797): #1, (1) "MORE DELETIONS? YES OR NO"; A$  A$"YES" 59360 : 59190 : "ENTER RECORD NUMBER AT WHICH"!  "INSERTION IS TO BE MADE";RN!(& I(1)1 RN1 1!@0 #1,I1: #1,I: I!Q: "RECORD";D!hD Z$(D): #1,RN!N "MORE INSERTIONS? YES OR NO";A$!X A$"YES" 59410 : 59190;" DF";K$;" SS";L$;" MSS";M$;" F RATIO"-+ #2,H$."- #2#& 200,31699&( 150,41&6< #2,(27);(52)&?d(0)&in Y18 31: X0 1: (X,Y,5): X,Y&x Y18 31: X62 63:(X,Y,5): X,Y& X2 61: Y18 19:(X,Y,5): Y,X& X2 61: Y30 31:(X,Y,5): Y,X' I0 8 2: Y20 29'>(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'v(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I'ȇ:: " LIZPOLY"'Ҁ T1 500: T(: @13, "MENU"::($ "1. CREATE DATA FILES"(? "2. EDIT DATA FILES"(` "3. POLYNOMIAL REGRESSION"(w "4. SCREEN DUMP"( "E. END THIS RUN"("A$(, A$"1" 370(6 A$"2" 480(@ A$"3" 1005(E A$"4" 60000(J A$"E" 350)T 290)'^(8): @ 10, "END LIZPOLY")-h)Nr(3): "NAME OF FILE?"; A$)d| A$"NONE" 240)w "D",#1,A$,12)N0:(4))NN1) "ENTER RECORD; WHEN FINISHED TYPE 0909; RECORD NUMBER IS";N) Q) Q0909 470) #1,Q* #1,N: 410*֚ #1: 370*:(3): "NAME OF FILE?"; A$*P A$"NONE" 240*c "D",#1,A$,12* "ENTER RECORD NUMBER, NEW RECORD; WHEN FINISHED, TYPE 0909,0"; Q,R* Q0909 550* #1,R* #1,Q: 510*& #1: 480+(3): "NAME OF STUDY";BA$+0 "NAME OF INVESTIGATOR";B$+I "DATE OF RUN";C$+h "DEGREE OF POLYNOMIAL";K+MK:KK1: X(M): B(M): C(M,M): P(M): D(M)+ 20000+ I1 M+ J1 I1+R(I,J)R(J,I): J,I+ 29999+$ 30410,& I1 M:X(I)R(I,K): I,#) 30270,J.SSPR(K,K)PR(K,K):YIR(0,K):SESS,X3 I1 M,p8YIYI(B(I)R(0,I)),:SESE(PR(I,K)B(I)): I,=SRSSSE:MESE(NM1):MRSRM:FRMRME,>B(0)YI: 9290,B MK1 1110-H #2,"NAME OF STUDY: ";BA$-)L #2, "NAME OF INVESTIGATOR: ";B$-GQ #2, "DATE OF RUN: ";C$-UVH$(10)-f[ #2, H$,H$-` #2, "ANOVA TABLE FOR POLYNOMIAL REGRESSION, DEGREE ";M-eH$(28)(80)(45)-jI$(27)(16)-oJ$I$(0)(120).tK$I$(0)(210).yL$I$(1)(44).4~M$I$(1)(134).A #2,H$.z #2,"SOURCE";J$;"DF";K$;"SS";L$;"MSS";M$;"F RATIO". #2,H$. #2,"REGRESSION";J$;M;K$;SR;L$;MR;M$;FR. #2,"ERROR";J$;NM1;K$;SE;L$;ME. #2,H$/ #2,"TOTAL";J$;N1;K$;SS/ #2,H$/- #2,(10);(10)/x #2,I$;(0);(144);(15);"PARTIAL REGRESSION COEFFICIENTS";(14)/ #2,(10),(10)/J$I$(0)(156)/K$I$(1)(8)/L$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFICIENT, B";J$;"STD ERROR";K$;"DF";L$;"T (FOR B=0)"0F+ #2,H$0T0 I1 M0u5ZC(I,I)ME:Z(Z):QB(I)Z0? #2,I;M$;B(I);J$;Z;K$;NM1;L$;Q0D I0H #2,H$0IA$(10)0$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFICIENT, B";J$;M1;L$;Q0D I0H #2,H$0IA$(10)0$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFICIENT, B";J$;"STD ERROR";K$;"DF";L$;"T (FOR B=0)"0F+ #2,H$0T0 I1 M0u5ZC(I,I)ME:Z(Z):QB(I)Z0? #2,I;M$;B(I);J$;Z;K$;NI,K): I,#) 30270,J.SSPR(K,K)PR(K,K):YIR(0,K):SESS,X3 I1 M,p8YIYI(B(I)R(0,I)),:SESE(PR(I,K)B(I)): I,=SRSSSE:MESE(NM1):MRSRM:FRMRME,>B(0)YI: 9290,B MK1 1110-H #2,"NAME OF STUDY: ";BA$-)L #2, "NAME OF INVESTIGATOR: ";B$-GQ #2, "DATE OF RUN: ";C$-UVH$(10)-f[ #2, H$,H$-` #2, "ANOVA TABLE FOR POLYNOMIAL REGRESSION, DEGREE ";M-eH$(28)(80)(45)-jI$(27)(16)-oJ$I$(0)(120).tK$I$(0)(210).yL$I$(1)(44).4~M$I$(1)(134).A #2,H$.z #2,"SOURCE";J$;"DF";K$;"SS";L$;"MSS";M$;"F RATIO". #2,H$. #2,"REGRESSION";J$;M;K$;SR;L$;MR;M$;FR. #2,"ERROR";J$;NM1;K$;SE;L$;ME. #2,H$/ #2,"TOTAL";J$;N1;K$;SS/ #2,H$/- #2,(10);(10)/x #2,I$;(0);(144);(15);"PARTIAL REGRESSION COEFFICIENTS";(14)/ #2,(10),(10)/J$I$(0)(156)/K$I$(1)(8)/L$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFICIENT, B";J$;"STD ERROR";K$;"DF";L$;"T (FOR B=0)"0F+ #2,H$0T0 I1 M0u5ZC(I,I)ME:Z(Z):QB(I)Z0? #2,I;M$;B(I);J$;Z;K$;NM1;L$;Q0D I0H #2,H$0IA$(10)0$I$(1)(84)/!M$I$(0)(48)09& #2,"TERM";M$;"COEFFICIENT,&2 200,32760&$d: "NAME OF:"&;e " SOURCE FILE"&Lf " ";D$&hg " DESTINATION FILE"&yh " ";F$&i: "TOTAL NUMBER OF COLUMNS IN FILE ";D$&j K&k "NUMBER OF VARIABLES (COLUMNS) TO BE DELETED";M&s VP(KM): DV(M)'Jx: "ENTER COLUMN NUMBERS FROM FILE ";D$: "OF VARIALBES TO BE DELETED"'X} I1 M'w "VAR. TO BE DELETED: ";I' "COLUMN NUMBER";DV(I)' I'(3): @232,"DELETION RUN"'L1' I1 K' J1 M' DV(J)I 180' J( VP(L)I:LL1( I(3 "D",#1,D$,5: #1,5 Z$(] "D",#2,F$,5: #2,5 W$:RN(2)1(sÀ I1 (1) K(Ȁ J1 KM( #1,VP(J)I1: W$Z$( #2,RN:RNRN1(׋ J,I(ܚ:: "OPTIONS"( "1. LIZPACK DIRECTORY") "2. END RUN") A$) A$"" 250)( 235); A$"1" 260)T(3): "END LIZPACK")Z)jM(32767))w H$(M))H$(H$,1))H$"LIZPACK/DIR"":"H$) H$,R1(׋ J,I(ܚ:: "OPTIONS"( "1. LIZPACK DIRECTORY") "2. END RUN  200,31699"d(0)Ln Y18 31: X0 1: (X,Y,5): X,Ywx Y18 31: X62 63:(X,Y,5): X,Y X2 61: Y18 19:(X,Y,5): Y,X X2 61: Y30 31:(X,Y,5): Y,X I0 8 2: Y20 29!(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)Y(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4) Y,Iȇ:: " LIZCORR"Ҁ T1 500: T܁ 241 @13, "MENU"  "1. RESIDUALS"+ "2. PREDICTED VALUES OF Y"H "D. LIZPACK DIRECTORY"` "E. END THIS RUN"j"A$}- A$"D" 5006 A$"Z" 200,32760: 290@ A$"1" FG1: 1005E A$"2" FG2: 1005J A$"E" 350T 290^(3): @ 10,"END LIZPACK"h*M(32767)7H$(M)GH$(H$,1)cH$"LIZPACK/DIR"":"H$n H$,R& 'BEGIN MAIN PROGRAM'RN1: O(2):(3): "NAME OF STUDY";BA$ "NAME OF INVESTIGATOR";B$ "DATE OF RUN";C$ FG2 1025 "NAME OF DATA FILE";D$' 63000G #2,"NAME OF STUDY: ";BA$n #2, "NAME OF INVESTIGATOR: ";B$ #2, "DATE OF RUN: ";C$ #2,"RUN FROM LIZPACK DATA FILE: ";D$H$(10) #2, H$,H$GH$(80,45):B$(10,42)I FG2 1105,L: "NAME FOR RESIDUAL FILE";F$KQ "DEGREE OF POLYNOMIAL";K{R "IS THIS AN EXPONENTIAL REGRES- SION";L$S FG2 1110 : "COMPUTE RESIDUALS BY SUBTRACTION";C$V B(K)[: "ENTERING CONSTANTS"` "ENTER CONSTANT TERM";B(0)e I1 K.j "ENTER COEFF. OF TERM";I=o B(I): I\t(3): @232, "LIZCORR/RUN"y #2,"INDEPENDENT VAR.";20) "OBSERVED Y";40) "COMPUTED Y";60) "RESIDUAL"~ #2,H$ FG2 1165 "D",#1,D$,5: #1,5 Z$  "D",#2,F$,5: #2, 5 W$! FG 1170,20008 I1 (1) TZE 63050kXO(1): W$(X): #2,RN:RNRN1 CP(0)999999 ZCP(0): 1200 1500WO(2) C$"YES" ZWY : ZWY #2,X;20) W;40) Y;60) Z W$(Z): #2,RN:RNRN1 I% #2,H$:: 2400YB(K)E JK1 0 1XYYXB(J): Jq L$"YES" Y(Y)wО: "ENTER VALUE OF INDEPENDENT VARIABLE (X)";XՅ X999999 : #2,H$: 240ځ 1500߇ #2,X;20) B$;40) Y;60) B$䁥 2000E(3): "IS THIS RUN FROM A CUSTOM FILE";LN$Q CP(2)m I1 2:CP(I)I1: I LN$"YES" TZ2: "TOTAL NUMBER OF COLUMNS IN THE AGGREGATE FILE";TZ" "ENTER FILE COL. NUMBER FOR IND. VAR.";CP(1):CP(1)CP(1)1B' "ENTER FILE COL. NUMBER FOR DEP. VAR.";CP(2):CP(2)CP(2)1H1WJ II1 2vO #1,ICP(II):O(II)(Z$)TCP(0)O(II): O(II)999999 ^ IIcNN1hTE FILE";TZ" "ENTER FILE COL. NUMBER FOR IND. VAR.";CP(1):CP(1)CP(1)1B'1& 200,32760&d(0)&Dn Y18 31: X0 1: (X,Y,5): X,Y&ox Y18 31: X62 63:(X,Y,5): X,Y& X2 61: Y18 19:(X,Y,5): Y,X& X2 61: Y30 31:(X,Y,5): Y,X& I0 8 2: Y20 29'(26I,Y,3):(36I,Y,3):(66I,Y,7):(76I,Y,7)'Q(46I,Y,2):(56I,Y,2):(86I,Y,8):(96I,Y,8)'(106I,Y,6):(116I,Y,6):(126I,Y,4):(136I,Y,4)' Y,I'ȇ:: " TRANSPAK"'Ҁ T1 500: T'܁ 241'' @13, "MENU"( "1. MINI-EDITOR"(, "2. TRANSFORMATION OF VARIABLES"(I "D. LIZPACK DIRECTORY"(a "E. END THIS RUN"(k"A$(~- A$"D" 500(A A$"1" 370(H A$"2" 1005(O A$"E" 350(T 290(^(3): "END LIZPACK":(r 59000(s 240) 59000)ꁥ 240)M(32767))+H$(M));H$(H$,1))WH$"LIZPACK/DIR"":"H$)b H$,R)}& 'BEGIN MAIN PROGRAM')(3): "NAME OF SOURCE FILE";E$) "TOTAL NUMBER OF COLUMNS";TC) "NAME OF DESTINATION FILE";D$*(3): @232,"TRANSPAK RUN"*& "D",#1,E$,5: #1,5 Z$*E "D",#2,D$,5: #2,5 W$*W I1 (1)*u #1,I: W$Z$: #2,I: I*: "D",#1,D$,5: #1,5 Z$*L(3): 10) "OPTIONS": "1. SIN(X)";19) "2. COS(X)"*Q "3. TAN(X)";19) "4. ARCSIN(X)"+V "5. ARCCOS(X)";19) "6. ATN(X)"+=[ "7. LN(X)";19) "8. EXP(X)"+_` "9. LOG(X)";19) "10. 10^X"+j "11. EXPONENTIATE";19) "12. SQRT(X)"+o "13. ADD CONSTANT";19) "14. ABS(X)"+t "15. MUL. CONST";19) "16. INT(X)",y "17. RECIPROCAL";19) "18. ROUND",~ "19. LN((1/X)-1)",7LX0:UX0:LY0:UY0,` "20. ((Y^L)-1)/L,L<>0; LN(X), L=0",q "21. EXIT", "SELECT ONE";A$- (A$) 1200,1200,1200,1200,1200,1200,1200,1200,1200,1200,1500,1200,1550,1200,1600,1200,1200,1200,1200,1650,1700-9: "COL. # OF VARIABLE BEING TRANSFORMED";CN-X(3): @232,"TRANSPAK RUN"-dCNCN1-{ I1 (1) TC- #1,ICN:Y(Z$)-ƅ Y999999 1227.Ɉ (A$) 5001,5002,5003,5004,5005,5006,5007,5008,5009,5010,5011,5012,5013,5014,5015,5016,5017,5018,5019,5020.5 Z$(Y): #1,ICN.=΋ I.IӁ 1100.wܞ: "ENTER EXPONENTIATION CONSTANT ";EX.ၥ 1200.: "ENTER ADDITIVE CONSTANT";EX. 1200.@: "ENTER MULTIPLICATIVE CONSTANT";EX.E 1200/r: "ENTER LAMBA";EX/w 1200/: 240/+Y(Y):/9Y(Y):/GY(Y):/cYY(1YY):Y(Y):/YY(1YY):Y(Y): Y0 YY4(1):/Y(Y):/Y(Y):/Y(Y):/Y(Y)(10):/Y10Y:/YYEX:/Y(Y):0YYEX:0Y(Y):0"YYEX:00Y(Y):0<Y1Y:0MY(Y.5):0aYLN((1Y)1):0x EX0 YLN(Y):0Y(YEX)1:YYEX:0x: "FILE?";D$0悉 "READ MULTIPLE";M0挙"D",#1,D$,50 #1, 5 Z$0RN10SNRN:1檀 I1 M1 #1,RN:D(Z$)1!澇 RN;D1@RNRN1: RN(1) 591401Hҋ I1RA$1g A$"C" 590401| A$"E" 591901 591001A$1 A$"C" 591801 A$"E" 591901" 591401, #1:16: 11) "OPTIONS"2@ "1. CHANGE RECORDS"2 J "2. DELETE RECORDS"2:T "3. INSERT RECORDS"2W^ "4. RETURN TO LISTING"2gh "5. EXIT"2qrA$2| A$"1" 593202熅 A$"2" 593602琅 A$"3" 594102皅 A$"4" RNSN: 590402礅 A$"5" 591802箁 592503縞: "ENTER RECORD #,NEW RECORD";RN,D30 Z$(D): #1,RN3U̻ "MORE CHANGES? YES OR NO";A$3tօ A$"NO" 59190 : 593203: "DELETE WHICH RECORD";RN3 RN(1) 593853 IRN1 (1)3 #1,I: #1,I1: I3 Z$(979797): #1, (1)4" "MORE DELETIONS? YES OR NO"; A$4B A$"YES" 59360 : 591904i: "ENTER RECORD NUMBER AT WHICH"4 "INSERTION IS TO BE MADE";RN4& I(1)1 RN1 140 #1,I1: #1,I: I4: "RECORD";D4D Z$(D): #1,RN5N "MORE INSERTIONS? YES OR NO";A$50X A$"YES" 59410 : 59190 59360 : 591904i: "ENTER RECORD NUMBER AT WHICH"4 "INSERTION IS TO BE MADE";RN4& I(1)1 RN1 140 #1,I1: #1,I: I4: "RECORD";D4D Z$(D): #1,RN5N "MORE INSERTIO&U 400,32760&6WM$(32,175):N$(175)"READY"&\XN$(175)N$N$N$N$N$(175)&Z: "EDITOR-ENTER FILE NAME ";D$&\ "DRIVE NUMBER ";DR&_ "D",#1,D$,5: #1, 5 Z$&d: "SYSTEM LIZPACK-CUSTOM FILE MODE"&i 12) "EDITOR"'n 9) "CONTROL KEYS"',s "I. INPUT RECORDS"'Tu "S. INPUT RECORDS-AUTO SAMPLE CT"'lx "L. LIST RECORDS"'} "P. PRINT FILE"' "D. DELETE RECORDS"' "R. REMOVE DELETION FLAGS"' "H. HELP!"' "X. LIZPACK DIRECTORY"( "J. INSERT RECORDS"($ "A. AGGREGATE FILE MODE"(> "C. CHANGE RECORDS"(O "B. BEGIN"(YA$(mʅ A$"A" 2000(ͅ A$"B" FG1: 300(ҁ 200(,(3): "FREE RECORD SPACE";((DR)23045)(1 "FILE ";D$;" CONTAINS ": 10) (1); " RECORDS")6 M$:@128, N$:@160, M$)-8 FG 315,2315)7;A$)J@ A$"I" 400)]E A$"L" 450)qJ A$"P" 1200)O A$"D" 800)T A$"R" 1000)Y A$"E" 1150)^ A$"X" 1100)c A$"J" 900)h A$"C" 700)m A$"H" 100* r A$"S" 1400* 315*):RN(1)1*9 RN;" ";*A D*W D989898 300*f Z$(D)*r #1,RN*RNRN1: 405*ž: "FIRST RCD, LAST RCD";RN,LR*Dž LR(1) LR(1)*̅ RNLR RNLR*щ "READ MULTIPLE";M*ց 500+ہ 300+:SNRN:LC0+$ I1 M+9 #1,RN:D(Z$)+D RN;D+^RNRN1: RNLR 530+x LCLC1: LC14 530+ I+A$+ A$"L" RNLR 300 : 500+ A$"X" 300+! A$"C" 600+& A$"D" 610++ A$"J" 620, 0 530,X 710,%]RNSN: 500,0b 810,AgRNSN: 500,Ll 910,]qRNSN: 500,h 710,s 300,ƞ: "FIRST RCD, LAST RCD";RN,RR,˅ RR(1) RR(1),Ѕ RNRR RNRR,Ձ 750,ڐ,, RN;" ";: D- Z$(D): #1, RN-#RNRN1: RNRR 752-)-4 810-?% 300-f*: "FIRST RCD, LAST RECORD";RN,RR-/ RR(1) RR(1)-4 RNRR RNRR-6TRRN-9 RR(1) 845-> IRR1 (1)-C #1, I: #1,RN-HRNRN1: I. M I(1) (1)RRTR 1.(R Z$(979797): #1,I.0W I.6\.A 910.L 300.s: "FIRST RCD, # OF INSERTS";RN,K. RN(1) 910. K0 300. I(1) RN 1. #1,I: #1,IK. I.RRRNK1. 750..聦 1010/큥 300/ (1)0 /- #1, (1):D(Z$)/A D979797 /}(3): "WILL BE BACK SHORTLY":: "D",#2,"SCRATCH/PAD",5/ #2, 5 W$:RN1/ #1,RN:D(Z$)/ D979797 1045/ W$(D): #2,RN/RNRN1: 1030/ / D$0 "SCRATCH/PAD" D$0%$ "D",#1,D$,507) #1, 5 Z$0=.0KL: 10100QN0vQM(32767):H$(M):H$(H$,1)0VH$"LIZPACK/DIR"":"H$0[ H$,R0~(3): 101000(3): "END LIZPACK":0 #2, ((32765));((32766))1$ #2,"LISTING OF LIZPACK DATA FILE ";D$16H$(132,45)1C #2,H$1VRN1:SN0:TN61dĀ I0 51ɇ #2,20I) "RECORD #,RECORD";: I1· #2,"": #2,H$1 #1,RN:D(Z$):RNRN11؇ #2,SN) RN1;TN) D;1SNSN20:TNTN202 SN100 12602SN0:TN6: #2,""24 RN(1) 12352J #2,"": #2,H$2U 3002fx:RN(1)12t}SNRN:L02RNRN12 RN;: D2 D989898 3002 D999999 14402 Z$(D): #1,RN:LL12RNRN1: 14153 Z$(L): #1,SN3  SN;L3 140531@: "CASE NUMBER";CN3:JKNM3PO I1 (1) K3dT #1,I:D(Z$)3wY DCN 16503^ I3c "NO SUCH CASE"3h T0 500: T3mFE9999:3rFE0:RNI:3|MNM:LRIK1: 4704О: "# COLUMNS PER CASE ";NM40Ҟ:FG2: "SYSTEM LIZPACK-AGGREGATE FILES"4DՇ 12) "EDITOR"4]ڇ 9) "CONTROL KEYS"4r "L. LIST CASE"4 "D. DELETE CASE"4 "R. REMOVE DELETION FLAGS"4 "H. HELP!"4 "E. EXIT LIZPACK"4 "P. PRINT FILE"5 "C. CUSTOM FILE MODE"5 "B. BEGIN"5/ "N. EDIT NEW FILE"59A$5L A$"C" 1005_ A$"B" 3005k 22005u A$5  A$"L" 24005  A$"D" 24105  A$"R" 24255  A$"H" 20025 $ A$"E" 11505 ) A$"P" 26006 . A$"N" 28006 8 23156 ` 16006. b FE9999 3006: e 16606F j 16006[ l FE9999 3006q oRRRNNM1: 8156| t 3006 y 10006 ~ 3006 (MNM: #2,((32765));((32766))6 - #2,"LISTING OF LIZPACK DATA FILE ";D$6 / 80007 2H$(132,45)7 7 #2,H$7$ < I0 570 >RN20I7V A #2,RN) "RECORD #,RECORD";: I7l C #2,"": #2,H$7 FRN1:SN0:TN67 K I1 M7 P #1,RN:D(Z$):RNRN17 U #2,SN) RN1;TN) D;7 ZSNSN20:TNTN207 _ SN100 26658 dSN0:TN6: #2,""8 i I8' n #2,"":SN0:TN684 p #2,H$8J s RN(1) 26358U x 3008j #2,"": 27108v 10108| 8 908@ #2,"NUMBER OF COLUMNS:";NM8E #2,"TOTAL NUMBER OF RECORDS:";(1)9J: "DO YOU WISH TO ENTER LABELS FOR COLUMNS";A$9O A$"YES" 80609.T I1 NM9IY "LABEL FOR COLUMN";I9R^ A$9zc #2,"COLUMN";I;20) "LABEL: ";A$9h I9|(3): @232,"LISTING FILE"9E #2,"TOTAL NUMBER OF RECORDS:";(1)9J: "DO YOU WISH TO ENTER LABELS FOR CO