' +JJJJ ?\>m0M='+l> /+l  ӍԠ٠Ġٮčɭ0LL Լ ռ ռ ռ`HJ>݌h Hh݌`S6`LxQɿu  ة֩JJJJIЅ֠],LWH鷎JJJJx  f5巬 췌`GG FGx (`(8`z𷭷I`B` ``>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,&"ԠĠٮ  !"#$%&'()*+,-./0123456789:;<=>?+ 0+ 0+824+82<<+ 0+ 0*#8*!6*?!5*#<"0#<)#=*4!5(.-:::20 $=-/"0(,&#:-#=-"**'>' -*-#<-*#8- -/"0 +9-+9---+;-"(::3;-#;-3<-38-47!)("4?94=9/,  +-#<-*#<-+--?#:-**$24>:-->--?;680^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HIHHHHhHH݌hHhHh݌H6 VDP (ED f $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`  cpq` [` Y Y LCFG8`0($ p,&" L鷭  d@LҦ{|LFBBbL`y".Q`pNФbptťܥm2<(-Py0\|66e< L鷭巬 췌`x (`(8`z𷭷I`B` ` `Ӝu`y".Q`pNФbptťܥm2<(-Py0\|66e<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 yz a`` L̦̀_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n{ y `@-eff z L }f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\yzL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NСyz `A@` LL`  \ ޿0 \  ȟ Q ^\lZl^?cqH şch`f}h~j@OAP`u@`@g&`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-XԠٿԠŠˠĠ@yy`\ m ͭ \6\ 8 ЊL5`H h L~̮ `{|Jmmjnnnۭ}m~mm`"L 8H (Y`  d̠֠Y)xꪽ)' `LV0^*^*>&` aI꽌ɪVLɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`SSES, AND TENDENCIES OF EACH TEAM."::[" 19:"INPUT YEAR <1983 - "YR"> OR FOR MENU"z"13:22:"CHOICE... ""22:22:X$"X(X$)" X$"M"100"$X1983XCY2062"&XCYCT20"*YRX",10200".10100"0CT0İ10300#2:YRCY:X$"".!:11:2:"RECORDS & RESULTS"b!6:"THIS PART OF THE PROGRAM WILL ALLOW YOU":!"TO LOOK AT THE PERFORMANCE OF EACH TEAM":!"AS THE SEASON PROGRESSES. THIS WILL EN-"!"ABLE YOU TO BETTER EVALUATE STRENGTHS,":'""WEAKNESC$(X)T$ : ' ADJ STATS6 WCT1980k 22:1:" ADJUSTING CURRENT STATISTICS... "t 800 FG0:XV:1820:1898:1930 TSS1:S1S2:S2TS FG1:XH:1820:1898:1930 22:LC$ XN:  REC/RESULTS !CTCW0VPVL:WI30:LO31:TE32LrS1S2VP0SC(24)SC(24)WL:SC(WI)SC(WI)WL~vS1S2VP0SC(25)SC(25)WL:SC(LO)SC(LO)WLzS1S2VP0SC(26)SC(26)WL:SC(TE)SC(TE)WLSC$(X)""L132:T$(SC(L)):(T$)1T$" "T$ SC$(X)1:SC(W)A(X,5)5<L110:D(X,L)D(X,L)A(X,L):;DANfRA(X,5)A(X,10)SC(21)SC(21)WLVA(X,5)A(X,10)SC(22)SC(22)WLZA(X,5)A(X,10)SC(23)SC(23)WL^bf(LN$(W),1)"P"1920jFG1VPHL:WI27:LO28:TE29nFGL):140003FG1:S1A(X,5):S2A(X,10):1800>13000FXN\:CTW:CWW:XXYRg10000m|CAL STATS 1820:1840:1870:1890:1930: C1:L132:SC(L)((SC$(X),C,2)):CC2::04A(X,11)W6D(X,11)D(X,11)Ȃ:1764,10:22:"IS THIS CORRECT...Y/N"9250:Q$QQ$"Y"Q$"N"1704[1698u22:LC$:Q$"N"16805:LC$13000FG0:S1A(X,5):S2A(X,10):1800XH5:"AUTO INPUT ==> "T$(X)L15:A(X,L)A(V,L5):A(X,L5)A(V,"İ30000:100%R10100:CT0İ10300B^N7:HD$" ENTRY ":12000Kd450YjCL3:WL1_prX1NT2:550:430:NX:XVxL110:TA(L)A(X,L):A(X,L)0:~5:LC$5:"TEAM = "T$(X)1400015000X$"---"āL110:A(X,L)TA(L):"250:Q$Q$"Y"15360Q$"N"1240:1522c:8:12:"INPUT ANOTHER WEEK...Y/N"p250:Q$Q$"Y"1200Q$"N"1552153810400PF110000 1006@INPUT STATSFCT20100 L10200:(S$(W),1)"@L22.5:HLHL22.5%TE$(V)(VL80)9TE$(H)(HL80)fLN$(W)"":L129:LN$(W)LN$(W)TE$(L):p1328LF0LF1:WL1:1950:TE$(29)"1":LN$(W)"":L129:LN$(W)LN$(W)TE$(L):1600010:23:"IS THIS CORRECT...Y/N22:LC$hLF1WL1:1950$xJzPP3:VA0:300:LF1:C0VA(X$)sVA22VA22ĖP3:14:" ":1400VA(VA)VA(VA).5VLVA:HLVA:VA0HL(VA)WL1:1950VL0VL(VL)VLVL22.5:HLHL22.5VL0VL(VL)VLV(14:LC$043028P1:14:T$(V)".."VL$" ";L@P2:14:T$(H)".."HL$fF18:L140:"-";::H22:" CHANGE THIS GAME NEXT GAME"P250:Q$QQ$"C"1368RQ$"N"1480T1360XP3:14:" ";ZP4:14:" "`+RRNzӠčϠՠȠϠŠԠٿŠōȠĠՠſĠĠ٠ӍŠӍǍˠӍԠԠōŠΠˍˠӍ٠ӍԍĠΠ͠ԠŠҬƠŠǠӍӠ٠٠ϠŠčӠōP1$)2 L)P2$;:L19(P2$)62 L)P3$;:L15(P3$)B2 L)P4$P2" " ":" "]2$ 0:2556c2& r2( DIV STAND22 :14)"NFL DIVISIONS"24 17000:Q$"M"21002< D727202F :5)YR" DIV STANDINGS THRU "CT" WEEKS":2J L(DV$(D))3N 21L2)2);:T1T134:"=";::" "<1 37)L(1)"-"L(2)"-"L(3):" "U1 24)"WIN"29)"LOSS"1 17)"HOME ROAD"15)"HOME ROAD"1 18)HW;13)RW;18)HL;14)RL1 14)"POINTS FOR AVERAGE"9)"POINTS AGAINST AVERAGE"2 18)P1$;:L14(%0 Q$"L"ĊPS:(9)"80N":0:255660 Q$"M"2100@0 2556F0 [0 PRT W/L REC H/Ao0 PS:(9)"80N"0 P1$(D(X,5)):P2$((D(X,5)DV.5)):P3$(D(X,10)):P4$((D(X,10)DV.5))0 24T2)YR" WIN/LOSS RECORD "T$(X)" THRU WEEK "CT1 24T"35)"AVE"M/ :4)D(X,5)15)(D(X,5)DV.5)24)D(X,10)36)(D(X,10)DV.5)/ 22:" NEXT <-> PREVIOUS DIFFERENT"/ "

PRT SCR LINE FEED MENU"/ 250:Q$/ Q$"N"2445/ Q$"-"2447/ Q$"D"24000 Q$"P"2570:WKW21:400:. V((SC$(O),WK,2)):H((SC$(X),WK,2))Y. HW$"A"VHRLRL1:2540x. HW$"H"VHHLHL1:2540. HW$"A"HVRWRW1:2540. HW$"H"HVHWHW1. . 4:11:HW15)RW24)HL36)RL / 15:" PTS FOR"14)"AVE"22)"PTS AGA)" THRU WEEK "CT0- 8T2:3:T1T127:"=";:Q- 18:5:L(1)"-"L(2)"-"L(3):i- 9)"WIN"29)"LOSS"- :3)"HOME ROAD"23)"HOME ROAD"- :11:15:"ONE MOMENT PLEASE..."- RL0:RW0:HL0:HW0:DVD(X,11):DV1DV1. W1A(X,11)(W):400:O0HW$""R, V$(SC$(O),WK,2):H$(SC$(X),WK,2):T$T$(O)" "p, O0WCTV$" ":H$" ", 27)W$;:4(W$))(T$,13)" "V$" - "H$" "HW$, , L140:" "::0:2432, , W/L REC H/A- :8T2:2:YR" WIN/LOSS "T$(XX1:X1X28+ 2404+ .+ PRT SCR/TMB+ PS:(9)"80N"v+ 25T2)YR" SEASON RECORD "T$(X)" THRU WEEK "CT+ 25T2);:T1T132:"=";::" "+ 34)"RECORD "L(1)"-"L(2)"-"L(3):" "+ 27)"WK OPP", W120:WK2W1:W$1*| 22:" NEXT <-> PREVIOUS DIFFERENT"_*~ "

PRT SCREEN SUMMARY MENU"l* 250:Q$}* Q$"N"2445* Q$"-"2447* Q$"D"2400* Q$"P"2450* Q$"S"2500* Q$"M"2100* 2432* XX1:X28X1* 2404+ X))n L140:"-";::19:T140:"-";::[)p W120:WKW21:W$(W):400:W10W$W$" "n)q T$T$(O)" ")r V$(SC$(O),WK,2):H$(SC$(X),WK,2))t O0WCTV$" ":H$" ")v LI:T:W$" "(T$,8)" "V$"-"H$" "HW$)x LILI1:W10LI9:T22)z CR/TM(b 8200:X292100'(d W1:5004(f LI8:T1b(g C41:L13:L(L)((SC$(X),C,2)):CC2:(h :2:9T2)YR" RECORD-"T$(X)" THRU WEEK "CT(j :14)"RECORD "L(1)"-"L(2)"-"L(3)(l 7:"WK OPP "(T$(X),1)22)"WK OPP "(T$(X),1)Y,' 31D2);:L1D120:"=";::" ":" "N' 26)"VISITOR"18)"HOME":" "W' LN6o' X1NT2:550:800'! 21)T$(V);'# 16(T$(V)))S1;'$ 9((S1)))T$(H);'& 16(T$(H)))S2'( LNLN1'* '. L166LN:" "::0:2262'V (` SNU";&250:Q$"&Q$"N"22843&Q$"-"2288D&Q$"D"2200U&Q$"P"2300f&Q$"M"2100p&2262&WW1:W20W1&2214&WW1:W1W20&2214&&PRT SCR/WK&PS:(9)"80N"' 31D2)"NFL SCORES FOR "D$(W)" "YRN2)"NFL SCORES FOR "D$(W)" "YRNYD%11D2):T1D120:"=";:::P%W16ĺp%7)"VISITOR"28)"HOME"::%X1NT2:550:800%3)T$(V)17)S122)T$(H)36)S2%%6:23:" NEXT <-> PREV DIFF"&6)"

PRINT SCREEN MEIFF YEAR"!$j12:19:" MENU"<$p15:24:"CHOICE... ";Q$v250:Q$:Q(Q$)b$xQ$RT$2160s$|24:24:Q$;$Q$"M"100$Q1Q62160$Q2200,2400,2600,9000,2800,2000$$SCR/WK$8000:W212100$450:X1:500 %:11D##4:12)"RECORDS & RESULTS":/#@18)YRI#FFL5:TB10:NL16:600j#L12:7:"<1> SCORES BY WEEK"#R12:9:"<2> SCORES BY TEAM"#X12:11:"<3> DIV STANDINGS"#\12:13:"<4> RECORD VS LINE"#^12:15:"<5> TEAM STATS" $d12:17:"<6> DR LINE FEED MENU")BN 250:Q$:BR Q$"N"3176KBT Q$"-"3182\BV Q$"D"3100mBZ Q$"P"3200B^ Q$"L"ĊPS:(9)"80N":0:3150Bb Q$"M"3000Bf 3150Bh WW1:W20W1Bl 3110Bn WW1:W1W20Bp 3110Br B PRT SCH/WKSCH/WKA 8000:W213000.A& 450:X1:500]A* :9D2)"TEAM SCHEDULE FOR "D$(W)" "YRNYA. 9D2);:L1D123:"=";::::A2 X1NT2:550A6 6)T$(V)20)"@"23)T$(H)A: AB 22:" NEXT <-> PREVIOUS DIFFERENT"BF "

PRT SC"<2> SCHEDULE BY TEAM"7@ 11:12:"<3> LINE BY WEEK"V@ 11:14:"<4> PREDICTIONS"n@ 11:16:" MENU"@ 15:22:"CHOICE... "@ 250:Q$:Q(Q$)@ 24:22:Q$@ Q$"M"100@ Q1Q43046@ 10200@ Q3100,3300,3500,3600@ A " ":0:2892? $? T10:L110A? T)L(L);:T7((L(L)))P? L5TT3c? L2L7TT1i? w? " ":" "}? ? ? SCH/PRED? :9:2:"SCHEDULE & PREDICTIONS"? FL6:NL12:TB9:600? 11:8:"<1> SCHEDULE BY WEEK"@ 11:10:RUSH PASS RET T-O POINTS">>x L110:L(L)D(X,L)::2968Z>| 33)"AVERAGE PER GAME"> L110:L(L)(D(X,L)D.5)::L(4)(D(X,4)D10.5)10:L(9)(D(X,9)D10.5)10:2968> 35D2)"LAST INPUT: "D$(W)> L110:L(L)A(X,L)::2968 ? " ":=Y 2820=Z XX1:X1X28&=[ 2820-=\ ?=^ PRT TM STATSS=` PS:(9)"80N"}=d 33B2)YR" "T$(X)" STATS THRU "D$(W)=h 33B2):T1B117:"=";::" "=l 21)"OFFENSE"11)"TOTALS"11)"DEFENSE">t " RUSH PASS RET T-O POINTS " NEXT <-> PREVIOUS DIFFERENT"Y PRT SCR LINE FEED MENU"f :1)A(X,1)5)A(X,2)9)A(X,3)14)A(X,4)17)A(X,5)22)A(X,6)26)A(X,7)30)A(X,8)35)A(X,9)38)A(X,10)* NEXT <-> PREV DIFF MENU"4 250:Q$4 Q$"N"27104 Q$"-"27144 Q$"D"26004 Q$"M"21004 26984 DD1:D6D1DV$(D)$3R 21L2);:T1L:"-";:N3V 14:7:"WIN LOSE TIE PF PA APF APA"b3Z X140:"-";:q3^ SP41:700|3b X1N3f DVD(K(X),11):DV1DV13j E3:C41:7604n T$(K(X))15)L(1)19)L(2)24)L(3)27)D(K(X),5)31)D(K(X),10)35)(D(K(X),5)DV.:VX:HO"RHW$"H"FG1:HX:VO;RS1A(X,5):S2A(X,10)DR430fRWL1:1820:1870:1890:1930RL110:D(X,L)D(X,L)A(X,L):RD(X,11)D(X,11)1R22:LC$R15000R22:10:"IS THIS CORRECT...Y/N"R250:Q$:Q$"Y"Q$"N"4310S30$Q6N5:HD$" CORRECTION ":12000;Q@5:"TEAM = "T$(X)FQJ13000QQL14000xQT10:22:"CORRECT THIS TEAM...Y/N"Q^250:Q$Q`Q$"Y"4200QbQ$"N"4450Qd4190QhQr22:6:"ADJUSTING CURRENT STATISTICS..."Q400RHW$"A"FG04:19:"SEE DOCUMENTATION FOR INSTRUCTIONS."YP7:23:"PRESS CONTINUE MENU"fP250:Q$wPQ$"C"4100PQ$"M"100P4084PPCT1İ30200:100P WCT:CL3P10200P10100P"8200:X294460Q,A(X,11)Wİ30100:41:HP0HP0OTO$OCORRECT?O::15)"CORRECTIONS"FO5vO" CORRECTIONS CAN BE MADE ONLY FOR THE":O" LAST WEEK INPUT. PREVIOUS WEEKS CAN":O" NOT BE CORRECTED. LAST INPUT WAS:"OFL12:NL3:TB18:600O20:14:CT.PH2D(H,5)DH:H21H210N0H3H1H2:H37H37hN6H4(D(H,6)D(H,7)D(H,8)(D(H,9)40))DH:H41H41N<H5D(H,10)DH:H51H51NBH6H4H5:H67H67NHVP(((V2H5)(V1H6)(H4V3))4VD.5):VP0VP0 ONHP(((H2V5)(H1V6)(V4H3))4HA.5))D(V,3)(D(V,4)40))DV:V11V11?MV2D(V,5)DV:V21V21WM V3V1V2:V37V37MV4(D(V,6)D(V,7)D(V,8)(D(V,9)40))DV:V41V41MV5D(V,10)DV:V51V51MV6V4V5:V67V67M$H1(D(H,1)D(H,2)D(H,3)(D(H,4)40))DH:H11H11N* L3800%L21)T$(V);:L(T$(V))?L16L)VP;:L((VP))\L10L)T$(H);:L(T$(H))jL16L)HPvLLNLN1|LLL166LN:" "::0:3684LLFORMULAL550LDVD(V,11):DV1DV1LDHD(H,11):DH1DH1#MV1(D(V,1)D(V,2250:Q$KfQ$"P"3700*KhQ$"M"30004Kj3684:KrHKtPRT PRED\KPS:(9)"80N"K28D2)"PIK'EM PREDICTIONS FOR "D$(W)" "YRNYK28D2);:L1D128:"=";::" ":" "K26)"VISITOR HOME":" "KLN6LX1NT2J.X1:450:500?J4:9D2)"PIKEM PREDICT FOR "D$(W)" "YRNYcJ:9D2);:L1D123:"=";:::J@7)"VISITOR HOME"::JFX1NT2JL3800JR3)T$(V)17)VP22)T$(H)36)HPJXJ^4:23:"PRESS

PRINT SCREEN MENU"KdI 20)T$(V);:L(T$(V))4I 15L)VL$;:L(VL$)QI 10L)T$(H);:L(T$(H))`I 15L)HL$lI LNLN1rIIL166LN:" "::0:3530II PREDI8000:W213000I(S$(W),1)"@"İ30000:3600I"W1CT1İ30200:3000I(101000H WW1:W20W1H 35183H WW1:W1W20=H 3518CH UH PRT SCH/LINEiH PS:(9)"80N"rH LN6H 34D2)"LINE FOR "D$(W)" "YRNYH 34D2):L1D114:"=";::" ":" "H 25)"VISITOR";18)"HOME"H " "I X1NT2:550:430:0:3370G G SCH/LINE3G 8000:W213000>G 16000kG 23:" NEXT <-> PREV DIFF"G "

PRINT SCREEN MENU";G 250:Q$G Q$"N"3538G Q$"-"3542G Q$"D"3500G Q$"P"3550G Q$"M"3000H 353 SCH/TMFR PS:(9)"80N"FF\ 29T2)YR" SEASON SCHEDULE FOR "T$(X)wFf 29T2);:L1(T$(X))25:"=";::" ":" "Fp 32)"WK OPPONENT"Fz W120:W$(W):400F 32)W$;:L(W$)F 4L)T$(O);:L(T$(O))F 16L)HW$F G L141:" ":$ 7:22:" NEXT <-> PREV DIFF"OE& 7)"

PRINT SCREEN MENU"\E* 250:Q$mE. Q$"N"3388~E0 Q$"-"3392E2 Q$"D"3300E4 Q$"P"3400E6 Q$"M"3000E: 3370E< XX1:X28X1E> 3312E@ XX1:X1X28EB 3312FH PRT:P24:P318:500?D :9T2:2:YR" SEASON SCHEDULE FOR "T$(X)kD 6:"WK OPPONENT WK OPPONENT"D L140:"-";::18:L140:"-";:D W120:400D P1:LI:W;:P2:T$(O);:P3:HW$;D LILI1D W10LI8:P123:P226:P340D (EC PS:(9)"80N"AC 30D2)"TEAM SCHEDULE FOR "D$(W)" "YRNYlC 30D2);:L1D123:"=";::" ":" "C X1NT2:550C 27)T$(V)16(T$(V)))"@"3)T$(H)C C L13:" "::0:3150C C SCH/TMC 8200:X293000D W1:LI8:P11))L(6);b$7T(6))L(7);-b$5T(7))L(8);?b$5T(8))L(9)Gb$V0Xb$X:DD1:VDwb$21):L152:"-";::" "~b$Yb$" "b$Zb$L117:" "::0:9000b'b'DISK OUT/STATSb'FF110090b':10:12:"UPDATING "YR" STATS..."c" "ah$Y13ar$SP47:700)a$X1N;a$C47:E9:760Xa$L18:T(L)((L(L))):ta$8)DV$(V);:L(DV$(V))a$14L)T$(K(X));:L(T$(K(X)))a$16L)L(1);a$5T(1))L(2);a$5T(2))L(3);a$7T(3))L(4);a$5T(4))L(5);b$5T(5VS LINE..."`$PS:(9)"80N"[`"$20)YR" NFL TEAM RECORDS VS LINE THRU "CT" WEEKS":" "g`6$D1:VDr`:$Z12`@$32)CO$(Z):" "`J$37)"OVERALL HOME AWAY"`T$36)"W L T W L T W L T"a^$21):L152:"-";::D1:D6D1_#9042*_#DD1:D1D64_#9042:_#J_#PRT REC/LN|_#:11:" THE ENTIRE NFL WILL BE PRINTED":_#9)"IS PRINTER READY...Y/N"_$250:Q$_$Q$"Y"9230_$Q$"N"9000_ $9220 `$:11:" PRINTING "YR" TEAM RECORDS )L(1)17)L(2)20)L(3);24)L(4)27)L(5)30)L(6)34)L(7)37)L(8)40)L(9);R^#XNĺX^#l^#L140:"-";:^#22:" NEXT <-> PREV DIFF MENU"^#250:Q$^#Q$"N"9160^#Q$"-"9170^#Q$"D"9000^#Q$"M"2100^#9150 _#DTEAM RECORDS VS LINE THRU "CT" WEEKS":7]Z#L(DV$(D))Z]d#17L2)DV$(D)" DIVISION"::]x#14)"OVERALL HOME AWAY":]z#14)"W L T W L T W L T";]#L140:"-";:]#SP47:700]#X1N]#E9:C47:760G^#(T$(K(X)),11)14 3)X6)T$(X)24)X1427)T$(X14)(\: Y\D 23:" INPUT TEAM # OR <29> FOR MENU... "q\N 35:23:X$:X(X$)\b X1X298260\l :\#\(#REC/LN\2#:" "YR" TEAM RECORDS VS LINE BY DIVISION"\<#17000:Q$"M"2100\P#D79200']R#:YR" @WK #[JW$"".[T:14:2:"WEEK NUMBERS"U[^6:X110:3)D$(X)23)D$(X10):[r20:" INPUT WEEK # OR <21> FOR MENU... "[|35:20:W$:W(W$)[W1W218050[:[[ TM #[ :X$""[ 15)"TEAM NUMBERS"[& 5:X114"\0LN:" ":ZZd"ZnPGPG1+Zx" "lZ1)"PIK'EM "YR" VERSION NFL 5.0 DOCUMENTATION"32)"PAGE "PGZL180:"-";::Z" ":" "ZLN5ZZNZXEND PGMZbZl12:"END OF PROGRAM-REMOVE DISK IF FINISHED.."Zv50020Z6[LN$,1,2)"//"İ6400:6500:6152PY (LN$,1,1)"/"LF((LN$,2,2)):6300:6152vY&(LN$,1,1)"?"NL(LN$)1:6220|Y8YB8)LN$:LNLN1:6152YL41NL2)(LN$,2,(LN$)):LNLN1:6152YYL1LF:" ":YLNLNLFYY Z L166TOP OF PAPER"$X:16)"PRESS

"1X250:Q$CXQ$"P"6104IXqX8:12:"PRINTING DOCUMENTATION..."zXPG0XD$;"OPENDOC"XD$;"READDOC"X0:LN$X(LN$,1,3)"///":D$;"CLOSEDOC":PS:6400:0:6000XPS:(9)"80N";Y(TER IS RE-";W:"QUIRED. IF YOU DO NOT HAVE A PRINTER,"lW:"CONTACT 'MARATHON SOFTWARE' FOR A COPY."W22:"PRESS

PRINT DOCUMENTATION MENU"W250:Q$WQ$"P"6086WQ$"M"100W6062W X4:11:"ALIGN PRINTER HEAD TO V 250:Q$VQ$"C"5170.VQ$"M"1008V(5130cV2:8:12:"RUNNING SCHEDULE UPDATE..."wV<D$;"RUNINPUTS"}VfVpDOCVzV13)"DOCUMENTATION"V8V"THIS PART OF THE PROGRAM WILL PRINT THE" W:"PROGRAM INSTRUCTIONS--A PRIN:13:3:"SCHEDULE UPDATE"NU8:" THIS PART OF THE PROGRAM IS TO INPUT":}U" PLAY-OFF TEAMS FOR THE "YR" SEASON,":U" OR THE ENTIRE "YR1" SEASON SCHEDULE.":U" REFER TO THE DOCUMENTATION..."V7:19:"PRESS CONTINUE MENU",L):T:D(X,11)D(X,11)1HTDL15:A(X,L)A(N,L5):A(X,L5)A(N,L):STN14000wTXWL1:S1A(X,5):S2A(X,10):1800Tb10:22:"CORRECT ANOTHER TEAM...Y/N"Td250:Q$TfQ$"Y"4130ThQ$"N"4460Tj4452Tl10000T~TSCH UPDATEU4300!S22:LC$:Q$"N"4280-S5:LC$8S13000\SWL1:S1A(X,5):S2A(X,10):1800hSNX:XOS5:"AUTO CORRECT ==> "T$(O)SFG0FG1:4370S FG0SS1A(X,5):S2A(X,10)S&WL1:1820:1870:1890:1930T0L110:D(X,L)D(X,L)A(X5rv:12:" ==> NO STATISTICS HAVE BEEN INPUT <=="GrvL13000::MrFòyrPòDELETE PIKEM SAVE PIKEMrdÀR IS RE-"XpNAFC EAST,AFC CENTRAL,AFC WESTMqzNNATIONAL CONFERENCE,AMERICAN CONFERENCESq&u`q0uERR MSGquL13000::qu qu:9(T$(X))2:12:T$(X)" NOT SCHEDULED THIS WEEK"quL13000::ru,DETROIT,MINNESOTABp>NSAN FRANCISCO,ATLANTA,L A RAMS,NEW ORLEANSwpHNNEW ENGLAND,BUFFALO,MIAMI,N Y JETS,INDIANAPOLISpRNPITTSBURGH,CINCINNATI,CLEVELAND,HOUSTONp\NSAN DIEGO,DENVER,SEATTLE,KANSAS CITY,L A RAIDERSpfNNFC EAST,NFC CENTRAL,NFC WEST q PRINT DIV"#oB14:19:" MENU">oB16:24:"CHOICE... ";SoB250:Q$:D(Q$)`oB25:Q$;roBQ$"M"17160oBD1D717100oCoNo NDATAo$NPLAY-OFFo*NDALLAS,PHILADELPHIA,NY GIANTS,WASHINGTON,PHOENIXp4NGREEN BAY,TAMPA BAY,CHICAGO35)HL$n>:n^B)nhBDIV STAND MENUCnrBFL3:NL18:TB11:600^n|B14:5:"<1> NFC-EAST"|nB14:7:"<2> NFC CENTRAL"nB14:9:"<3> NFC WEST"nB14:11:"<4 AFC-EAST"nB14:13:"<5> AFC-CENTRAL"nB14:15:"<6> AFC-WEST" oB14:17:"<7>I1m:YY1:Y11ı m:15030&mv>4m>DIS LINE:m>Lm>X1:500:450qm>14D2)"LINE FOR "D$(W)" "YRNYm>14D2);:L114D1:"=";::::m>6)"VISITOR HOME":m>W16ĺm>X1NT2:550:430n>T$(V);15)VL$;21)T$(H);11l233:7L:" "l2:$l63l6DIS STATS+250:Q$oiH+Q$"Y"11090iJ+Q$"N"11000iL+11070iR+CWCT:CYYR:10054i.i.INPUT FORMi.:i.L1N:"-";::(91)" WEEK # "W" STATS"HD$;(93); j.LDELETE"FL$h(D$;"OPEN"FL$2h(D$;"WRITE"FL$:h(YRFh(X120ph(D$(X);",";S$(X);",";(34)LN$(X)(34)vh(h(D$;"CLOSE"FL$h(h*h* RESET CT/YR/PRT SLOTh+h +"INPUT CURRENT WEEK ";CT:h +"INPUT CURRENT YEAR (YYYY) ";YR:2:"RESETTING "YR" STATS..."GgF(X128:Y111:D(X,Y)0:A(X,Y)0:Y,X_gP(X128:SC$(X)"":igx(XXYRog(ug(g( DISK OUT/SCH g(FF110490g(:9:12:"UPDATING "YR" SCHEDULE..."g(FL$"SCHEDULE/Y"((YR),2)g(D$;"OPEN"FL$ h(D$;"RY..."&f'FL$"SCHEDULE/Y"((YR),2)9f(D$;"OPEN"FL$Lf(D$;"READ"FL$Tf(ZZvf (X120:D$(X),S$(X),LN$(X):f (D$;"CLOSE"FL$f(T$(19)"INDIANAPOLIS"f(YR1983T$(19)"BALTIMORE"f(f2(f<(ZERO STATSf@(D(1,1)010360gB(:9:1"FL$e'D$;"READ"FL$#e'CT,XX7e'X128:Y111Je'D(X,Y),A(X,Y)Se'Y,X_e'X128e'SC$(X):(SC$(X))64SC$(X)" "SC$(X)e'e'D$;"CLOSE"FL$e'e'e'DISK IN/SCHe'ZZYR10260f':5:12:"LOADING "YR" SCHEDULE TO MEMONT"dN'D$;"DELETECOUNT"-dP'D$;"OPENCOUNT"BdR'D$;"WRITECOUNT"XdT'CT;",";YR;",";PSmdV'D$;"CLOSECOUNT"vdj'100|dl'dt'DISK IN/STATSdx'XXYRCT110190d~':6:12:"LOADING "YR" STATS TO MEMORY..."d'FL$"STATS/Y"((YR),2)e'D$;"OPEN'FL$"STATS/Y"((YR),2)c'2c$'D$;"OPEN"FL$Gc&'D$;"DELETE"FL$Zc('D$;"OPEN"FL$nc*'D$;"WRITE"FL$}c,'CT;",";YRc0'X128:Y111c2'D(X,Y);",";A(X,Y)c4'Y,Xc8'X128c:'SC$(X)c<'cB'D$;"CLOSE"FL$cD'cF'dL'D$;"OPENCOU)&66)V$20)"@"23)H$&7%&7+&:E&: FORM FOR CODE INPUTL&:7Z&:X1NT2&:7)"GAME "X;15)"VISITOR HOME"&:&:&v>&> CLEAR CODE&>LI7&>X114&>23:LI:" ":32:LI:" "&>LILI1&>&>&^B 'hB D)"--"D$(X):%l/%24%2 CLEAR MIDDLE SCREEN;%27G%2X114t%25)" "z%2%2%6%6 DISPLAY SCHEDULE%613:4:D$(W)" %67:X1NT2%6V$T$(((S$(W),X,1))64)&6H$T$(((S$(W),X1,1))64C:LI:D$(X)" "$$/LILI1:PPC3$/X9PP1G$&/X10LI6:P32M$0/s$:/10:24:"IS THIS CORRECT...Y/N";$D/250:Q$$F/Q$"Y"12120$H/Q$"N"12110$J/12100$N/10:24:" ";:12010$X/%b/X120:D$(X)"WEEK "(XCOUNT"#h'CT;",";YR;",";PS1#j'D$;"CLOSECOUNT":#l'100@#*T#* DISPLAY DATES[#+6g#+X110# +4)D$(X)23)D$(X10)#*+#4+#|.#. INPUT DATES#.WL6:C0:BG32:ED89:P12:LI6:SP$" "#.X120#.300:C0D$(X)X$$/PLE..."".'D$;"OPEN"FL$."0'D$;"DELETE"FL$A"2'D$;"OPEN"FL$U"4'D$;"WRITE"FL$]"6'YRi"8'X120"B'D$(X);",";S$(X);",";(34)LN$(X)(34)"L'"V'D$;"CLOSE"FL$"Z'"`'D$;"OPENCOUNT""b'D$;"DELETECOUNT""d'D$;"OPENCOUNT"#f'D$;"WRITE250:Q$!Q$"Y"5300)!Q$"N"55203!5510>!10000D!fZ!p RETURN TO PIKEM`!z!7:12:"RETURNING TO MAIN PROGRAM..."!D$;"RUNPIKEM"!'!' DISK OUT/SCHEDULE!'FL$"SCHEDULE/Y"((YR),2)"$':8:12:"UPDATING "YR" SCHEDUR CORRECTION "YR" 13:4:D$(W)+ "4006 ,15000A 617000g @9:23:"CORRECT THIS WEEK...Y/N"t J250:Q$ LQ$"Y"5460 NQ$"N"5500 P5450 T9:23:" " h18000 |7:23:"CORRECT ANOTHER WEEK...Y/N"!A$ xX&z14:23:" "112000<10000BU CORRECT CODE_W$""e8:3:"CODE NUMBER CORRECTION "YR110009:23:"CORRECT WHICH WEEK... "30:23:W$:W(W$)W1W205350 :7)"CODE NUMBE100Q1Q25070&Q5100,5300,@ CORRECT DATESi :7:3:"CORRECT SCHEDULE DATES "YRt11000214:23:"ONE MOMENT..."<X120:DA$""FY(D$(X))11P(D$(X),Y,1)"-"5230ZDA$(D$(X),Y,1)DA$dYnD$(X)DCORRECT SCHEDULE@7:5:"CORRECTION FOR "YR" SCHEDULE"YFL8:NL8:TB10:200z12:10:"<1> CORRECT DATES"12:12:"<2> CORRECT CODE #"12:14:" MENU"15:19:"CHOICE... "250:Q$:Q(Q$)24:19:Q$Q$"M"AY. EXAMPLE: SEP 15.""12000(RG\ REGULAR SEASON SCHEDULEMfyp" REGULAR SEASON SCHEDULE INPUT - "YRtW1:NT28x15000zW11640013:4:D$(W)" "16000170001800010000~ 2:"DATE INPUT FOR "YR" REGULAR SEASON".6:X110b4)"WEEK "X"--"23)"WEEK "X10"--"iX19:" THE DATE IS ALWAYS A SUNDAY. INPUT"" 3 LETTERS FOR THE MONTH, SKIP A"" SPACE AND INPUT 1 OR 2 NUMBERS FOR"" THE DQ$"C"4390Q$"M"100&4370,"O& RESET DATES $ CODE # TO NULLf*X120:D$(X)"":.X120:S$(X)"@@@@@@@@@@@@@@@@@@@@@@@@@@@@":0X120:LN$(X)"PPPPPPPPPPPPPPPPPPPPPPPPPPPPP":2CT06YRYR1 DATES':4:OFFS WILL BE INPUT AT A LATER DATE.";/::b17:"WHEN THE NEW SCHEDULE IS INPUT, THE OLD":"SCHEDULE WILL NOT BE LOST---A NEW FILE" :"WILL BE CREATED WITH A DIFFERENT NAME."6:24:"PRESS CONTINUE MENU";250:Q$ "WHEN INPUTTING A NEW REGULAR SEASON, YOU";_:"INPUT THE DATES OF EACH WEEK (20) FIRST.";:"THEN YOU WILL INPUT THE ACTUAL SCHEDULE.";:"ALL 16 WEEKS OF THE REGULAR SEASON WILL":"HAVE TO BE INPUT AT ONE SITTING. THE"%:"PLAY-4001500017000?10:21:"INPUT THIS WEEK...Y/N"L250:Q$]Q$"Y"4260nQ$"N"4100x424410:21:" "1800010000 REGULAR SEASONR0::8)"INPUT NEW SCHEDULE - "YR1,4:ɠƠϠƠɠƢ֢֢֠֠Ơ΢ԠϢҮӠӠŠŠĠŠӠҢŠϠӠĠŠɠӮӠՠ̠ŬŠŠӠҠɠŠŠŠԭӠҠϬĠŭϠƠ̠ŠĠҠŠӠΠŠŠҮŠӠŠŠȠ̠ӠҠӢ٠̠Ӯ٠̠ŠΠӠӠҠŠӠŠĮŠǠӠŠ͢źǠӠĮǠӠĮΠӠĮέӠĮӠĮέҠӠŠԠҠӠήՠŠŠӠՠ̠ĠŠӠӺźǠӠĮǠӠĮΠӠĮέӠԮӠĮ̠ŠԠӠӠӢĠŠǠӠӠӮźҠŢϠӠԠ٠Ӡ٠ΠԠϠԠӠԠԠӠ٠ˠˠԠ΢ΠӠͬŠŠͬԠ̠ŠĠϠӠŠŮԠΠŢĠΠŠӠΠƠ٠ӠĠҠӢȠٮԠҠŠӠĠ׺ŠŢŠΠԠǢϠŠͺŠŠĠŠӮŠŠӠŠĠԠŠΠϠǢӮԠӠĠȠ٠ԠΠӠӠҠ̢ӠĠӠĠϠӠŠǠŧҠħΠӠύӭӬԠΠŠĠҠŠ٭ӠĠǠӮΠ̢˧͠Ӡՠάˬà͠Ԡ̠٢ΠƠƠנӠŠĮŠŠϠӢƠӠϠԠӠĠŠ͠ӠŠԺӠՠͭŠŠƠӠ͠ՠŠԠˠƠŢԠάӠŠΠŠҠ̠ӬĠƢŠӮĠ٠ΠŠΠҠ̠Πӭ JETS,INDIANAPOLIS?+jJPITTSBURGH,CINCINNATI,CLEVELAND,HOUSTONu+tJSAN DIEGO,DENVER,SEATTLE,KANSAS CITY,L A RAIDERS{+Fò+PòDELETE INPUTS SAVE INPUTS+dÀF";EDdd*F700:DFLG1DFLG0:18008$*F**.J5*8J DATAD*?ABI JL>L?Mhhh`HHH ; ( L -hhh` : :  ,% f f4,$ ɀ@  STRzmWWX` `EF^_ 0^/_ F̞`EF `HHH0/0+>1jj/9hhh`( 12 1㎓0%` f`ST`LȱM`LȭM`EFST ` ` I,`EF^ȹ^Ȍ  F`,0 0S/TEF$-0 ` f` : :   oOɃ  hhhhhh`+t+TPɍɬC+L,)  o : L f f`   t+L:,     `H jjH9mmL[mmhh`  # L# # 3,0ޭS T   ` /H h/ ` % fɽR ʎ`8`HH Uɽ"̦̦88hh` ȹHH`%) ` f `,%0 f `,% f ` f` `  f `hh" XL  ̆ $U+  # o? : L  hh` %)`ʽR08`  `  ?,06 /,0&莤 ,0欧ȌP8``ȈR`  UɽR 莣Ȍ`8`  U$'   hhh`, `Hhݯ`h`# q  ` Y  # LK ` SSTT`S T8`STEF  `iiiRLk SLk H m hLk T%SRsU o00Щ莢ɽదɬUɽ̢ʎ! o : Lm  ɛhhL%H% h% ` ` `HHH  hhh`HHH : 7 , ͭ) ; # ͭ  ; ` o ɱɸ" L; )  o ɱɳ# L_ )`  o ɱɸ" L ) o ɱɳ# L ) ##` L O D   , b Y L> b @   Lvم380` X L !   - `" X    i( ! o , и` X$i( " X ,        ӠĠΠӠΠĠĠĢŠȠŠΠŠϠӬŠ͠ӢΠ٠ŠԠŠŧԠŠŠƠӮŠ͠ӠŠĠĮ٬ՠέԠנ΢ӡՠŠԠĠŠƠŠԠŢ̠ΠӠŠҠŠŮŠҭԠӠ͠ɠӠƠ٠ήӠӠĠ͠ƠŠҬîĠϠΠŠҠŠ٠ΠΠȠ˧̠ͮӠĮӭɯ֠ΠĠΠӠԠ٠٠έ̠ӠĮӭĠӠŠ٠٠̠Ԡ٠ΠŠРϠؠέŬӠ˧͠Π̠Π                                          ;" DISK AND PRESS RETURN";:" ";DK$-9363CPRESS RETURN";:" ";DK$X936^DK$t936z16368,0:K141340:KK176:KLKH330:NKDO16368,0:K141340]PKK176:KLKH330eQNKT20:N;" ":^:22:"DEFAULT = ";:((41)256(40)14),96:hMSSSırMDSDıw:(DK$,1)"D"ĺ#|"INSERT ";DK$16368,0::"DO YOU WISH TO MAKE ANOTHER COPY?";I$:(I$)0300U '(I$,1)"Y"160k ,(I$,1)"N"290s 1: 6:350:N;::1:I$;" SLOT: ";:L1:H7:330:A,N16: @350:N;::4:" DRIVE: ";:L1:H2:330:+JK(16384):K128330:"DUPLICATE":360: GET DUP DISKC 8:24::"WRITING";::" "\ 710: WRITE A HUNKr 8:24:" " (713)2190 (222)255ij 18::"****** UNABLE TO WRITE ******":290 18::"****** UNABLE TO READ ******"@ "19:: ERROR!+ 5:24:" ":(713)1290F FT255: NOT FIRST RDn DK$"DUPLICATE":360: GET DUP DISKx 275 8:24::"FORMATTING": "INIT XXX,S";SS;",D";SD;",V";(714):FT1 8:24:" " 216,0:222,0 256 DK$ "2 704:717,SS16:718,MS16:719,SD:720,MDG 17:34,16:936T :222,0 "-- PRESS 'RETURN' KEY TO BEGIN COPY --";:" ";I$ DK$" ORIGINAL":360: GET ORIG DISK 5:24::"READING": 707: READ A HUNK (713)2280:ON PROGRAM"::% Z704:CS(718)16A d715,(110)1:BUFSTART[ n716,(112)1:BUFEND I$" ORIGINAL":NCS:A718:310:MSN:N(720):320:MDN:A717 I$"DUPLICATE":NMS:310:SSN:N3MD:320:SDN FT0 5:24:" ":8:24:" 4% ************************C* DISK COPY *a* COPYRIGHT 1980 BY *(* APPLE COMPUTER INC. *2* *<************************F"BLOAD COPY.OBJ0": A$2C0 P:" APPLE DISKETTE DUPLICATI      `饠 LLL˹Ɂ <ȱ<L4 0#( 8<  8  `<#`<ȑ<<ȑ<Ƚȑ<Ƚ< <   `LH =<` (-) MINUS."%8:L140:"-";::Q11:" VISITOR HOME"Z450rX1NT2:GG1:NX1:25:W" - GAME "GLF1:(LN$(W),1)"P"LF0550VV(T$(V)):HH(T$(H)) P18VV2:P228HH2:P3P1VV2:P4P2HH2 102008000:W211552;(S$(W),1)"@"İ30000:1200^L129:TE$(L)(LN$(W),L,1):zFF1:WCTPF1:10100:CL5:G0:LI14" LINE INPUT FOR WEEK"4:" THE MAXIMUM LINE IS 22 POINTS": "ALWAYS INPUT FAVORED TEAM AS11:L120:(95);:::GQ" THE 'LINE' CAN BE INPUT OR CORRECTED":kT10)"===> FOR ANY WEEK <===":V" INPUT LINE INPUT STATS MENU";X250:Q$ZQ$"L"1200\Q$"S"1600^Q$"M"100`1112INPUT LINENPUT FOR ALL TEAMS":F&"AT THIS TIME. IF YOU DO NOT HAVE STATS":_2"FOR WEEK NUMBER.."4CT20FL12:NL3:TB14:600:16:14:"ALL INPUT":1098:FL12:NL3:TB18:600B20:14:WJ17:"DO NOT CONTINUE UNTIL THEY ARE AVAILABLE";LSCR9*S1((SC$(V),W21,2)):S2((SC$(H),W21,2)):?OLINE/STATSZWCT1`9)"LINE / STATISTICS INPUT"3:"THIS PART OF THE PROGRAM IS TO INPUT":"TEAM STATS OR THE 'LINE'. IF YOU INPUT":""STATS, THEY MUST BE I5N4 C09L1N:L(L)((SC$(PC),SP,2)):CC1:AC1IB1TL1NnL(L)0L(B)L(L)744vBL|K(C)BP1:L(B)1:CC1:CNı724REC SORTEDL1E:L(L)((SC$(K(X)),C,2)):CC2:: CHOOSE (W),X1,1))64:N$XDRAW BOX.b:FLIlXTB41TB:X:" ";:kvXFLFLNL:X:41TB:" ";:NLFL:X41TBTB1:X:" ";:XNLFLFL1:X:TB:" ";::DIV SORTPD54:D3PP1:D6PP1N5:D3D1:W17ıW17W19NT4,W18NT8EW20NT2:HA0:VD0a(D$(W),10,1)"J"NY1gmzSTR LENT1(T$(X)):T2T12D1(D$(W)):D2D12B1T1D1:B2B12&ASSN VIS/HOME0V((S$(W),X,1))64:H((S$V0VL0:HL0:442/VL((LN$(W),V,1))80JHL((LN$(W),H,1))80kVL22VLVL22.5:HLHL22.5VL22VLVL22.5:HLHL22.5VL$(VL):VL0VL$"+"VL$HL$(HL):HL0HL$"+"HL$# TEAMS NT28:NY0:HA2:VD rAA(16384):AA127ĝ:. tP:LI::" ";7 x370= M CH00SE OPPV 450e L1:HW$"" ((S$(W),L,1))64X422 LL1:LNTO0: 412 OTL1:HW$"A":L2(L2)OTL1:HW$"H" O((S$(W),OT,1))64:  LINE ,STATS INKEY* 2C0:X$"":C$(1)""7 8370:I$c DI$RT$ĖP:" ";:L1C:X$X$C$(L):: JC0I$BA$ĖP:LI:" ":CC1:PP1::312 P(I$)45(I$)57312 VCCL312 \P:LI:I$" "; bPP1:CC1:FF1 hC$(C)I$ n312 pOGRAM"4 7:21:"==> UPDATED THRU "CT" WEEKS <=="O 16:23:"CHOICE... ";d 250:Q$:Q(Q$)u 25:23:Q$; Q$"*"11000 Q1Q7200 Q1000,2000,3000,4000,5000,6000,7000 GET STRING AA(16384):AA127ı 260 "L 5.0" xFL3:NL16:TB9:600B 11:5:"<1> INPUT LINE/STATS"d 11:7:"<2> RECORDS/RESULTS" 11:9:"<3> SCHED/PREDICT" 11:11:"<4> CORRECTIONS" 11:13:"<5> UPDATE SCHEDULE" 11:15:"<6> DOCUMENTATION" 11:17:"<7> END PR$(2)# 0D$(4):RT$(13):BA$(8)V 2LC$" "j 4D$;"OPENCOUNT"~ 6D$;"READCOUNT" 8CT,YR,PS :D$;"CLOSECOUNT" FCWCT:CYYR Z dTOP MENU hCTCW:YRCY:FF0:PF0 n:8)"PIK'EM "YR" - VER. NFj" PIKEM - VER NFL 5.0 APPLE< BY LARRY MCCARROLLf COPYRIGHT 1986 - MARATHON SOFTWARElrT$(28),SC$(28),D$(20),S$(20)LN$(20),A(28,11),D(28,11),SC(32) TE$(29)(X028:T$(X):*X16:DV$(X): ,CO$(1),CO                                 FFS"1,6:11:"WEEK <19> CONFERENCE PLAY-OFFS"S66:13:"WEEK <20> SUPERBOWL"@6:21:"INPUT CHOICE OR MENU... "J33:21:W$:W(W$)TW$"M"100^W17W204160hr5)"PLAY-OFF SCHEDULE INPUT - "YRv13:4:D$(W)|U"15:20:"CHOICE... "1250:Q$:Q(Q$)A24:20:Q$QQ$"M"100cQ1Q24060tQ4100,4300z CHOOSE PLAY-OFF WEEK:FL5:NL10:TB4:2006:7:"WEEK <17> WILDCARD PLAY-OFFS""6:9:"WEEK <18> DIVISION PLAY-OT$(X14)l !v X148:" ":. 0:30704N SCHEDULE INPUT MENU~:4:4:"CURRENT SCHEDULE IN MEMORY IS "YRFL8:NL8:TB5:2007:10:"<1> INPUT PLAY-OFFS <"YR">"7:12:"<2> INPUT REG SEASON <"YR1">"7:14:" MEN Q$"P"3130 Q$"M"100( 3070.& L0 PRINT TEAM CODE NUMBERS`: PS:(9)"80N"}D 32)"TEAM CODE NUMBERS"N " ":" "X X114:X$(X):XX$(X14)b 22)X$;:L(X$)d 4L)T$(X);:L(T$(X))f 22L)XX$;:L(XX$)h 4L)0WW1:W20W120803WW1:W1W20=2080C c DISPLAY TEAM CODE NUMBERSi  12)"TEAM CODE NUMBERS" 5:X114 4)X7)T$(X)24)X1427)T$(X14)  5:23:"PRESS

PRINT SCREEN MENU" 250:Q$36:21:W$:W(W$)#W211006W1W202012V:10)YR" SEASON SCHEDULE"_ 400j*13000u414000z23:" NEXT <-> PREV DIFF MENU"250:Q$Q$"N"2190Q$"-"2194Q$"D"2000Q$"M"100218DATES +11:2:"SCHEDULE DATES "YR611000T$13:21:"PRESS MENU"a.250:Q$q0Q$"M"100{21070 WEEKLY SCHEDULEW$"":11)"SCHEDULE DATES "YR110004:21:"INPUT WEEK # OR <21> FOR MENU... "FYING INPUT..."YL1NTC(S$(W),L,1)(S$(W),Y,1)DFLG1IYDFLG1750oLL1:LNT1770x7205:23:"ONE OR MORE TEAMS DUPLICATED..."L13000:5:23:" "  SCHEDULE ZERO bL1/l(S$(W),L,1)"@"ZFLG1:650AvLL1:LNTıJ620{4:23:"ONE OR MORE TEAMS INPUT AS ZERO..."L13000:4:23:" " CHECK FOR DUPLICATIONSL112:23:"VERI ^C2ĺI$" "! bPP1:CC1. hC$(C)I$7 n312= pZ rAA(16384):AA127ĝ:l tP:LI::" "u x370{   NUMBER OF TEAMS NT28:W17ı W17W19NT4 W18NT8 W20NT2  NX CHECK FOR TEAM INPUT AS GET STRING- AA(16384):AA127ı6 260< "N , STATS INKEY\ 2C0:X$""i 8370:I$ DI$(13)āL1C:X$X$C$(L):: JC0I$(8)ĖP:LI:" ":CC1:PP1::312 P(I$)BG(I$)ED312 VCWL312 \P:LI:C3ĺI$;SP$25:23:Q$; Q(Q$)+ Q1Q6140P Q1000,2000,3000,4000,5000,6000V e DRAW BOXo :FL XTB41TB:X:" ";: XFLFLNL:X:41TB:" ";: NLFL:X41TBTB1:X:" ";: XNLFLFL1:X:TB:" ";: : 00' t10:7:"<1> DISPLAY "YR" DATES"L x10:9:"<2> DISPLAY "YR" SCHED"q |10:11:"<3> TEAM CODE NUMBERS" 10:13:"<4> INPUT SCHEDULES" 10:15:"<5> CORRECT SCHEDULES" 10:17:"<6> MENU" 16:23:"CHOICE... "; 250:Q$ DING DATA..."- >FL$"SCHEDULE/Y"((YR),2)@ FD$;"OPEN"FL$S HD$;"READ"FL$[ JYR} LX120:D$(X),S$(X),LN$(X): ND$;"CLOSE"FL$ VX028:T$(X): Z d TOP MENU l:4)"INPUT PROGRAM FOR SEASON SCHEDULE" pFL5:NL14:TB8:2#  INPUTS VER NFL 5.0 APPLE9 BY LARRY MCCARROLLb COPYRIGHT 1986 - MARATHON SOFTWAREi w:D$(4)T$(28),D$(20),S$(20),TE$(28),LN$(20)2D$;"OPENCOUNT"4D$;"READCOUNT"6CT,YR,PS8D$;"CLOSECOUNT" <:13:12:"REA                       бˠΠаввˠΠЯвˠΠж걢ɬΰҷθˠàǬθDZˠàˬٷԸصȱˠàб̬֠ϳͶɱˠ֠άѶ׶͵ϸﷱˠ֠ѬϷ̷ԴӶƱˠà˱ӸͱˠԠŬж̶뱢ˠԠجɴ۷ӷҲˠ֠ɬ׵ҳ˵궱ˠì곷ڸˠԠЬѷҳ͵֭鱢ˠԠլ鷳ҵܶDZˠԠƬ鷱ˠРĬ˶׳϶ѱˠР۬DZˠРܬ鷵ͱͱˠР          ТˠàТˠΠТˠΠТͬТˠàѬТˠàʬТˠàб֠ѬТˠ֠ˬТˠ֠ڬТˠàҰͶ걢ˠԠȬ촲ֱˠԠӬɶˠ֠׬Тˠ٬긶ԶֳˠԠάͬҷոˠԠ¬ҸɵֳαˠԠҬү񱹸ˠРìӳ̷ԶгʹʱˠРŬͲڳƱǷ鱢ˠР֬ϴ˲ѱˠРжˠàڳдебˠΠвбˠΠибجԶ׶ϴַ̮챢ˠàɬ겶ҶԳˠàѬͰҳˠàб֠ڬ޷̳Ѭͬӱˠ֠άзĶ鸳ɵDZˠ֠ѬõжݬͳˠàȶͲ۩ƱˠԠ̬жǸ̷̷ͷ鷱ˠԠجͷֳѶ͵ʱˠ֠Ĭװַг֬˴췱ˠܬдˠРԬҴ췴鶸̱ˠԠìͷ鷸ٷյ˱ˠԠ٬Դ̷ͱˠРͬ촳ϵˠРˬж׳ɱˠРЬ˷ζͱˠР           ТˠΠТˠΠТˠΠТڬТˠàɬТˠàѬТˠàб֠ĬТˠ֠ѬТˠ֠ˬТˠàТˠԠìТˠ֠ȬТˠ֠֬ТˠŬТˠԠڬТˠԠլТˠԠҬбˠРٶְѯͱˠРԬҿҷҸҶαˠРƬدȷնˠРебˠΠзгˠΠбˠΠбˬԼֶ͵ӱˠàѬ̶ʶԮڰ˱ˠàͬзѱˠàе֠Ĭеȱˠ֠ˬαճ˴ˠàѬȲбȱˠà۵öе϶ˠԠܬʶвˠ֠Ŭܯе̵ѱˠ֠٬Ұζ֯ʷˠԬֲ߷ڲմж鱢ˠԠĬ궴ʵеж뵱ˠԠҬµƱˠԠȬԶDZˠР͵ҶӲˠР֬뿵ӯαˠРڬ޷ӱˠР           ТˠàТˠΠТˠΠТͬТˠàѬТˠàʬТˠàб֠ѬТˠ֠ˬТˠ֠ڬТˠàҰͶ걢ˠԠȬ촲ֱˠԠӬɶˠ֠׬Тˠ٬긶ԶֳˠԠάͬҷոˠԠ¬ҸɵֳαˠԠҬү񱹸ˠРìӳ̷ԶгʹʱˠРŬͲڳƱǷ鱢ˠР֬ϴ˲ѱˠР  !"" " " " " """""""""