_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

INPUTS

FILE INFORMATION

FILENAME(S): INPUTS

FILE TYPE(S): PRG

FILE SIZE: 8.8K

FIRST SEEN: 2025-11-30 18:12:55

APPEARS ON: 1 disk(s)

FILE HASH

a35fc287262bccd291b51a2ba95935096f8ff9b2d6aa1a2ef26951d27ca309b7

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
PUNTER D L S INPUTS PRG Sailor, Ganheden 27 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 26 08 0A 00 8F 20  49 4E 50 55 54 53 20 2D  |..&.... INPUTS -|
00000010: 20 56 45 52 20 4E 46 4C  20 35 2E 30 20 43 4F 4D  | VER NFL 5.0 COM|
00000020: 4D 4F 44 4F 52 45 00 3F  08 0C 00 8F 20 42 59 20  |MODORE.?.... BY |
00000030: 4C 41 52 52 59 20 4D 43  43 41 52 52 4F 4C 4C 00  |LARRY MCCARROLL.|
00000040: 68 08 0E 00 8F 20 43 4F  50 59 52 49 47 48 54 20  |h.... COPYRIGHT |
00000050: 31 39 38 36 20 2D 20 4D  41 52 41 54 48 4F 4E 20  |1986 - MARATHON |
00000060: 53 4F 46 54 57 41 52 45  00 6E 08 10 00 8F 00 80  |SOFTWARE.n......|
00000070: 08 14 00 9C 3A 43 4C 53  24 B2 C7 28 31 34 37 29  |....:CLS$..(147)|
00000080: 00 8A 08 16 00 99 C7 28  38 29 00 B4 08 1E 00 86  |.......(8)......|
00000090: 54 24 28 32 38 29 2C 44  24 28 32 30 29 2C 53 24  |T$(28),D$(20),S$|
000000A0: 28 32 30 29 2C 54 45 24  28 32 38 29 2C 4C 4E 24  |(20),TE$(28),LN$|
000000B0: 28 32 30 29 00 D6 08 22  00 54 56 24 B2 22 11 11  |(20)...".TV$."..|
000000C0: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000000D0: 11 11 11 11 11 22 00 08  09 24 00 4C 43 24 B2 22  |....."...$.LC$."|
000000E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000100: 20 20 20 20 20 20 20 22  00 21 09 32 00 9F 32 2C  |       ".!.2..2,|
00000110: 38 2C 32 2C 22 30 3A 43  4F 55 4E 54 2C 53 2C 52  |8,2,"0:COUNT,S,R|
00000120: 22 00 37 09 36 00 84 32  2C 43 54 2C 59 52 2C 54  |".7.6..2,CT,YR,T|
00000130: 58 2C 42 47 2C 42 44 00  3E 09 38 00 A0 32 00 6A  |X,BG,BD.>.8..2.j|
00000140: 09 3C 00 99 43 4C 53 24  3A 54 56 B2 31 31 3A 8D  |.<..CLS$:TV.11:.|
00000150: 32 35 30 3A 99 A3 31 32  29 22 52 45 41 44 49 4E  |250:..12)"READIN|
00000160: 47 20 44 41 54 41 2E 2E  2E 22 00 8A 09 3E 00 46  |G DATA..."...>.F|
00000170: 4C 24 B2 22 53 43 48 45  44 55 4C 45 2F 59 22 AA  |L$."SCHEDULE/Y".|
00000180: C9 28 C4 28 59 52 29 2C  32 29 00 A5 09 46 00 9F  |.(.(YR),2)...F..|
00000190: 32 2C 38 2C 32 2C 22 30  3A 22 AA 46 4C 24 AA 22  |2,8,2,"0:".FL$."|
000001A0: 2C 53 2C 52 22 00 AF 09  4A 00 84 32 2C 59 52 00  |,S,R"...J..2,YR.|
000001B0: D3 09 4C 00 81 58 B2 31  A4 32 30 3A 84 32 2C 44  |..L..X.1.20:.2,D|
000001C0: 24 28 58 29 2C 53 24 28  58 29 2C 4C 4E 24 28 58  |$(X),S$(X),LN$(X|
000001D0: 29 3A 82 00 DA 09 4E 00  A0 32 00 EF 09 50 00 81  |):....N..2...P..|
000001E0: 58 B2 30 A4 32 38 3A 87  54 24 28 58 29 3A 82 00  |X.0.28:.T$(X):..|
000001F0: F5 09 5A 00 8F 00 04 0A  64 00 8F 20 54 4F 50 20  |..Z.....d.. TOP |
00000200: 4D 45 4E 55 00 2A 0A 6C  00 99 43 4C 53 24 3A 99  |MENU.*.l..CLS$:.|
00000210: A3 39 29 22 53 45 41 53  4F 4E 20 53 43 48 45 44  |.9)"SEASON SCHED|
00000220: 55 4C 45 20 49 4E 50 55  54 22 00 43 0A 70 00 46  |ULE INPUT".C.p.F|
00000230: 4C B2 35 3A 4E 4C B2 31  34 3A 54 42 B2 38 3A 8D  |L.5:NL.14:TB.8:.|
00000240: 32 30 30 00 51 0A 72 00  54 56 B2 37 3A 8D 32 35  |200.Q.r.TV.7:.25|
00000250: 30 00 71 0A 74 00 99 A3  39 29 22 3C 31 3E 20 44  |0.q.t...9)"<1> D|
00000260: 49 53 50 4C 41 59 22 59  52 22 44 41 54 45 53 11  |ISPLAY"YR"DATES.|
00000270: 22 00 91 0A 78 00 99 A3  39 29 22 3C 32 3E 20 44  |"...x...9)"<2> D|
00000280: 49 53 50 4C 41 59 22 59  52 22 53 43 48 45 44 11  |ISPLAY"YR"SCHED.|
00000290: 22 00 B2 0A 7C 00 99 A3  39 29 22 3C 33 3E 20 54  |"...|...9)"<3> T|
000002A0: 45 41 4D 20 43 4F 44 45  20 4E 55 4D 42 45 52 53  |EAM CODE NUMBERS|
000002B0: 11 22 00 D1 0A 80 00 99  A3 39 29 22 3C 34 3E 20  |.".......9)"<4> |
000002C0: 49 4E 50 55 54 20 53 43  48 45 44 55 4C 45 53 11  |INPUT SCHEDULES.|
000002D0: 22 00 F2 0A 84 00 99 A3  39 29 22 3C 35 3E 20 43  |".......9)"<5> C|
000002E0: 4F 52 52 45 43 54 20 53  43 48 45 44 55 4C 45 53  |ORRECT SCHEDULES|
000002F0: 11 22 00 0A 0B 88 00 99  A3 39 29 22 3C 36 3E 20  |.".......9)"<6> |
00000300: 4D 45 4E 55 11 11 11 11  11 22 00 20 0B 8C 00 99  |MENU.....". ....|
00000310: A3 31 35 29 22 43 48 4F  49 43 45 2E 2E 2E 22 3B  |.15)"CHOICE...";|
00000320: 00 30 0B 90 00 A1 51 24  3A 51 B2 C5 28 51 24 29  |.0....Q$:Q..(Q$)|
00000330: 00 41 0B 9C 00 8B 51 B3  31 B0 51 B1 36 A7 31 34  |.A....Q.1.Q.6.14|
00000340: 34 00 66 0B A0 00 91 51  89 31 30 30 30 2C 32 30  |4.f....Q.1000,20|
00000350: 30 30 2C 33 30 30 30 2C  34 30 30 30 2C 35 30 30  |00,3000,4000,500|
00000360: 30 2C 36 30 30 30 00 6C  0B BE 00 8F 00 7B 0B C8  |0,6000.l.....{..|
00000370: 00 8F 20 44 52 41 57 20  42 4F 58 00 AF 0B D2 00  |.. DRAW BOX.....|
00000380: 54 56 B2 46 4C 3A 8D 32  35 30 3A 99 A3 54 42 29  |TV.FL:.250:..TB)|
00000390: 3A 81 58 B2 31 A4 28 32  30 AB 54 42 29 AC 32 3A  |:.X.1.(20.TB).2:|
000003A0: 99 C7 28 31 38 35 29 3B  3A 82 3A 99 22 9D 22 00  |..(185);:.:.".".|
000003B0: CE 0B DC 00 81 58 B2 31  A4 4E 4C AB 31 3A 99 A3  |.....X.1.NL.1:..|
000003C0: 33 39 AB 54 42 29 C7 28  31 38 32 29 3A 82 00 FF  |39.TB).(182):...|
000003D0: 0B E6 00 99 A3 33 39 AB  54 42 29 3A 81 58 B2 31  |.....39.TB):.X.1|
000003E0: A4 28 32 30 AB 54 42 29  AC 32 3A 99 C7 28 31 38  |.(20.TB).2:..(18|
000003F0: 34 29 22 9D 9D 22 3B 3A  82 3A 99 22 91 22 3B 00  |4)"..";:.:.".";.|
00000400: 20 0C F0 00 81 58 B2 31  A4 4E 4C AB 31 3A 99 A3  | ....X.1.NL.1:..|
00000410: 54 42 29 C7 28 31 38 31  29 22 91 9D 22 3B 3A 82  |TB).(181)"..";:.|
00000420: 00 26 0C F4 00 8E 00 2C  0C F8 00 8F 00 42 0C FA  |.&.....,.....B..|
00000430: 00 8F 20 50 4F 53 49 54  49 4F 4E 20 43 55 52 53  |.. POSITION CURS|
00000440: 4F 52 00 4C 0C FE 00 99  22 13 22 3B 00 5C 0C 04  |OR.L....".";.\..|
00000450: 01 99 C8 28 54 56 24 2C  54 56 29 3B 00 62 0C 06  |...(TV$,TV);.b..|
00000460: 01 8E 00 68 0C 22 01 8F  00 7A 0C 2C 01 8F 20 53  |...h."...z.,.. S|
00000470: 54 41 54 53 20 49 4E 4B  45 59 00 88 0C 32 01 43  |TATS INKEY...2.C|
00000480: B2 30 3A 58 24 B2 22 22  00 A8 0C 38 01 A1 49 24  |.0:X$.""...8..I$|
00000490: 3A 8B 49 24 B2 22 22 A7  99 C7 28 31 38 29 22 20  |:.I$.""...(18)" |
000004A0: 9D 22 3B 3A 89 33 31 32  00 B5 0C 3C 01 99 C7 28  |.";:.312...<...(|
000004B0: 31 34 36 29 3B 00 DA 0C  44 01 8B 49 24 B2 C7 28  |146);...D..I$..(|
000004C0: 31 33 29 A7 81 4C B2 31  A4 43 3A 58 24 B2 58 24  |13)..L.1.C:X$.X$|
000004D0: AA 43 24 28 4C 29 3A 82  3A 8E 00 01 0D 4A 01 8B  |.C$(L):.:....J..|
000004E0: 43 B1 30 20 AF 20 49 24  B2 C7 28 32 30 29 A7 99  |C.0 . I$..(20)..|
000004F0: 22 20 9D 9D 22 3B 3A 43  B2 43 AB 31 3A 89 33 31  |" ..";:C.C.1:.31|
00000500: 32 00 20 0D 50 01 8B C6  28 49 24 29 B3 20 42 45  |2. .P...(I$). BE|
00000510: 20 B0 20 C6 28 49 24 29  B1 45 44 20 A7 33 31 32  | . .(I$).ED .312|
00000520: 00 2E 0D 56 01 8B 43 B2  57 4C A7 33 31 32 00 3D  |...V..C.WL.312.=|
00000530: 0D 5C 01 8B 43 B2 30 A7  99 53 50 24 3B 00 5A 0D  |.\..C.0..SP$;.Z.|
00000540: 5E 01 99 49 24 3B 3A 43  B2 43 AA 31 3A 43 24 28  |^..I$;:C.C.1:C$(|
00000550: 43 29 B2 49 24 3A 89 33  31 32 00 60 0D 86 01 8F  |C).I$:.312.`....|
00000560: 00 76 0D 90 01 8F 20 4E  55 4D 42 45 52 20 4F 46  |.v.... NUMBER OF|
00000570: 20 54 45 41 4D 53 00 88  0D 9A 01 4E 54 B2 32 38  | TEAMS.....NT.28|
00000580: 3A 8B 57 B3 31 37 A7 8E  00 9C 0D A4 01 8B 57 B2  |:.W.17........W.|
00000590: 31 37 B0 57 B2 31 39 A7  4E 54 B2 34 00 AB 0D AE  |17.W.19.NT.4....|
000005A0: 01 8B 57 B2 31 38 A7 4E  54 B2 38 00 BA 0D B8 01  |..W.18.NT.8.....|
000005B0: 8B 57 B2 32 30 A7 4E 54  B2 32 00 C0 0D C2 01 8E  |.W.20.NT.2......|
000005C0: 00 C6 0D EA 01 8F 00 E9  0D 58 02 8F 20 43 48 45  |.........X.. CHE|
000005D0: 43 4B 20 46 4F 52 20 54  45 41 4D 20 49 4E 50 55  |CK FOR TEAM INPU|
000005E0: 54 20 41 53 20 5A 45 52  4F 00 F1 0D 62 02 4C B2  |T AS ZERO...b.L.|
000005F0: 31 00 13 0E 6C 02 8B CA  28 53 24 28 57 29 2C 4C  |1...l...(S$(W),L|
00000600: 2C 31 29 B2 22 40 22 A7  5A 46 4C 47 B2 31 3A 89  |,1)."@".ZFLG.1:.|
00000610: 36 35 30 00 25 0E 76 02  4C B2 4C AA 31 3A 8B 4C  |650.%.v.L.L.1:.L|
00000620: B1 4E 54 A7 8E 00 2E 0E  80 02 89 36 32 30 00 68  |.NT........620.h|
00000630: 0E 8A 02 54 56 B2 32 33  3A 8D 32 35 30 3A 99 22  |...TV.23:.250:."|
00000640: 20 20 20 20 4F 4E 45 20  4F 52 20 4D 4F 52 45 20  |    ONE OR MORE |
00000650: 54 45 41 4D 53 20 49 4E  50 55 54 20 41 53 20 5A  |TEAMS INPUT AS Z|
00000660: 45 52 4F 2E 2E 2E 91 22  00 78 0E 94 02 81 4C B2  |ERO....".x....L.|
00000670: 31 A4 33 30 30 30 3A 82  00 7E 0E A8 02 8E 00 84  |1.3000:..~......|
00000680: 0E B2 02 8F 00 A1 0E BC  02 8F 20 43 48 45 43 4B  |.......... CHECK|
00000690: 20 46 4F 52 20 44 55 50  4C 49 43 41 54 49 4F 4E  | FOR DUPLICATION|
000006A0: 53 00 A9 0E C6 02 4C B2  31 00 B7 0E D0 02 81 59  |S.....L.1......Y|
000006B0: B2 4C AA 31 A4 4E 54 00  DD 0E DA 02 8B CA 28 53  |.L.1.NT.......(S|
000006C0: 24 28 57 29 2C 4C 2C 31  29 B2 CA 28 53 24 28 57  |$(W),L,1)..(S$(W|
000006D0: 29 2C 59 2C 31 29 A7 44  46 4C 47 B2 31 00 E3 0E  |),Y,1).DFLG.1...|
000006E0: E4 02 82 00 F3 0E E6 02  8B 44 46 4C 47 B2 31 A7  |.........DFLG.1.|
000006F0: 37 35 30 00 09 0F E8 02  4C B2 4C AA 31 3A 8B 4C  |750.....L.L.1:.L|
00000700: B1 4E 54 AB 31 A7 37 38  30 00 12 0F EC 02 89 37  |.NT.1.780......7|
00000710: 32 30 00 3F 0F EE 02 99  22 20 20 20 20 20 4F 4E  |20.?...."     ON|
00000720: 45 20 4F 52 20 4D 4F 52  45 20 54 45 41 4D 53 20  |E OR MORE TEAMS |
00000730: 44 55 50 4C 49 43 41 54  45 44 2E 2E 2E 91 22 00  |DUPLICATED....".|
00000740: 4F 0F F8 02 81 4C B2 31  A4 33 30 30 30 3A 82 00  |O....L.1.3000:..|
00000750: 55 0F 0C 03 8E 00 5B 0F  DE 03 8F 00 70 0F E8 03  |U.....[.....p...|
00000760: 8F 20 53 43 48 45 44 55  4C 45 20 44 41 54 45 53  |. SCHEDULE DATES|
00000770: 00 7A 0F F2 03 99 43 4C  53 24 00 97 0F FC 03 99  |.z....CLS$......|
00000780: A3 31 30 29 22 11 53 43  48 45 44 55 4C 45 20 44  |.10)".SCHEDULE D|
00000790: 41 54 45 53 22 59 52 00  A2 0F 10 04 8D 31 31 30  |ATES"YR......110|
000007A0: 30 30 00 C7 0F 24 04 54  56 B2 32 31 3A 8D 32 35  |00...$.TV.21:.25|
000007B0: 30 3A 99 A3 31 32 29 22  50 52 45 53 53 20 3C 4D  |0:..12)"PRESS <M|
000007C0: 3E 20 4D 45 4E 55 22 00  CF 0F 2E 04 A1 51 24 00  |> MENU"......Q$.|
000007D0: DF 0F 38 04 8B 51 24 B2  22 4D 22 A7 31 30 30 00  |..8..Q$."M".100.|
000007E0: E9 0F 42 04 89 31 30 37  30 00 EF 0F C6 07 8F 00  |..B..1070.......|
000007F0: 05 10 D0 07 8F 20 57 45  45 4B 4C 59 20 53 43 48  |..... WEEKLY SCH|
00000800: 45 44 55 4C 45 00 0F 10  D4 07 57 24 B2 22 22 00  |EDULE.....W$."".|
00000810: 31 10 D6 07 99 43 4C 53  24 3A 99 A3 31 30 29 22  |1....CLS$:..10)"|
00000820: 53 43 48 45 44 55 4C 45  20 44 41 54 45 53 22 59  |SCHEDULE DATES"Y|
00000830: 52 00 3C 10 DA 07 8D 31  31 30 30 30 00 7C 10 DC  |R.<....11000.|..|
00000840: 07 54 56 B2 32 31 3A 8D  32 35 30 3A 99 22 20 20  |.TV.21:.250:."  |
00000850: 49 4E 50 55 54 20 57 45  45 4B 20 23 20 4F 52 20  |INPUT WEEK # OR |
00000860: 3C 32 31 3E 20 46 4F 52  20 4D 45 4E 55 2E 2E 2E  |<21> FOR MENU...|
00000870: 20 20 20 20 20 9D 9D 9D  9D 9D 22 3B 00 8C 10 DE  |     .....";....|
00000880: 07 85 57 24 3A 57 B2 C5  28 57 24 29 00 9A 10 E0  |..W$:W..(W$)....|
00000890: 07 8B 57 B2 32 31 A7 31  30 30 00 B3 10 E2 07 8B  |..W.21.100......|
000008A0: 57 B3 31 B0 57 B1 32 30  A7 99 22 91 22 3A 89 32  |W.1.W.20..".":.2|
000008B0: 30 31 32 00 D5 10 EE 07  99 43 4C 53 24 3A 99 A3  |012......CLS$:..|
000008C0: 39 29 59 52 22 53 45 41  53 4F 4E 20 53 43 48 45  |9)YR"SEASON SCHE|
000008D0: 44 55 4C 45 22 00 DE 10  20 08 8D 34 30 30 00 E9  |DULE"... ..400..|
000008E0: 10 2A 08 8D 31 33 30 30  30 00 F4 10 34 08 8D 31  |.*..13000...4..1|
000008F0: 34 30 30 30 00 2E 11 7A  08 54 56 B2 32 33 3A 8D  |4000...z.TV.23:.|
00000900: 32 35 30 3A 99 22 20 3C  4E 3E 20 4E 45 58 54 20  |250:." <N> NEXT |
00000910: 20 3C 2D 3E 20 50 52 45  56 20 20 3C 44 3E 20 44  | <-> PREV  <D> D|
00000920: 49 46 46 20 20 3C 4D 3E  20 4D 45 4E 55 22 00 36  |IFF  <M> MENU".6|
00000930: 11 84 08 A1 51 24 00 47  11 86 08 8B 51 24 B2 22  |....Q$.G....Q$."|
00000940: 4E 22 A7 32 31 39 30 00  58 11 87 08 8B 51 24 B2  |N".2190.X....Q$.|
00000950: 22 2D 22 A7 32 31 39 34  00 69 11 88 08 8B 51 24  |"-".2194.i....Q$|
00000960: B2 22 44 22 A7 32 30 30  30 00 79 11 8A 08 8B 51  |."D".2000.y....Q|
00000970: 24 B2 22 4D 22 A7 31 30  30 00 83 11 8C 08 89 32  |$."M".100......2|
00000980: 31 38 30 00 97 11 8E 08  57 B2 57 AA 31 3A 8B 57  |180.....W.W.1:.W|
00000990: B1 32 30 A7 57 B2 31 00  A1 11 90 08 89 32 30 38  |.20.W.1......208|
000009A0: 30 00 B5 11 92 08 57 B2  57 AB 31 3A 8B 57 B3 31  |0.....W.W.1:.W.1|
000009B0: A7 57 B2 32 30 00 BF 11  94 08 89 32 30 38 30 00  |.W.20......2080.|
000009C0: C5 11 AE 0B 8F 00 E5 11  B8 0B 8F 20 44 49 53 50  |........... DISP|
000009D0: 4C 41 59 20 54 45 41 4D  20 43 4F 44 45 20 4E 55  |LAY TEAM CODE NU|
000009E0: 4D 42 45 52 53 00 EF 11  C2 0B 99 43 4C 53 24 00  |MBERS......CLS$.|
000009F0: 0C 12 CC 0B 99 A3 31 31  29 22 54 45 41 4D 20 43  |......11)"TEAM C|
00000A00: 4F 44 45 20 4E 55 4D 42  45 52 53 22 00 22 12 D6  |ODE NUMBERS"."..|
00000A10: 0B 54 56 B2 35 3A 8D 32  35 30 3A 81 58 B2 31 A4  |.TV.5:.250:.X.1.|
00000A20: 31 34 00 48 12 E0 0B 99  A3 32 29 58 A3 36 29 54  |14.H.....2)X.6)T|
00000A30: 24 28 58 29 A3 32 32 29  58 AA 31 34 A3 32 35 29  |$(X).22)X.14.25)|
00000A40: 54 24 28 58 AA 31 34 29  00 4E 12 EA 0B 82 00 76  |T$(X.14).N.....v|
00000A50: 12 F4 0B 99 A3 36 29 22  11 11 11 3C 50 3E 20 50  |.....6)"...<P> P|
00000A60: 52 49 4E 54 20 53 43 52  45 45 4E 20 20 3C 4D 3E  |RINT SCREEN  <M>|
00000A70: 20 4D 45 4E 55 22 00 7E  12 FE 0B A1 51 24 00 8E  | MENU".~....Q$..|
00000A80: 12 08 0C 8B 51 24 B2 22  4D 22 A7 31 30 30 00 9F  |....Q$."M".100..|
00000A90: 12 12 0C 8B 51 24 B2 22  50 22 A7 33 31 33 30 00  |....Q$."P".3130.|
00000AA0: A9 12 1C 0C 89 33 30 37  30 00 AF 12 26 0C 8F 00  |.....3070...&...|
00000AB0: CD 12 30 0C 8F 20 50 52  49 4E 54 20 54 45 41 4D  |..0.. PRINT TEAM|
00000AC0: 20 43 4F 44 45 20 4E 55  4D 42 45 52 53 00 D9 12  | CODE NUMBERS...|
00000AD0: 3A 0C 9F 34 2C 34 3A 9D  34 00 F6 12 44 0C 99 A3  |:..4,4:.4...D...|
00000AE0: 33 32 29 22 54 45 41 4D  20 43 4F 44 45 20 4E 55  |32)"TEAM CODE NU|
00000AF0: 4D 42 45 52 53 22 00 04  13 4E 0C 99 22 20 22 3A  |MBERS"...N.." ":|
00000B00: 99 22 20 22 00 10 13 58  0C 81 58 B2 31 A4 31 34  |." "...X..X.1.14|
00000B10: 00 1C 13 62 0C 99 A3 32  31 29 58 3B 00 33 13 64  |...b...21)X;.3.d|
00000B20: 0C 99 A3 33 AB C3 28 C4  28 58 29 29 29 54 24 28  |...3..(.(X)))T$(|
00000B30: 58 29 3B 00 4B 13 66 0C  99 A3 32 30 AB C3 28 54  |X);.K.f...20..(T|
00000B40: 24 28 58 29 29 29 58 AA  31 34 3B 00 67 13 68 0C  |$(X)))X.14;.g.h.|
00000B50: 99 A3 33 AB C3 28 C4 28  58 AA 31 34 29 29 29 54  |..3..(.(X.14)))T|
00000B60: 24 28 58 AA 31 34 29 00  6D 13 6C 0C 82 00 82 13  |$(X.14).m.l.....|
00000B70: 76 0C 81 4C B2 31 A4 34  38 3A 98 34 2C 22 20 22  |v..L.1.48:.4," "|
00000B80: 3A 82 00 8F 13 80 0C A0  34 3A 89 33 30 37 30 00  |:.......4:.3070.|
00000B90: 95 13 96 0F 8F 00 AA 13  A0 0F 8F 20 53 43 48 45  |........... SCHE|
00000BA0: 44 55 4C 45 20 49 4E 50  55 54 00 E4 13 A4 0F 99  |DULE INPUT......|
00000BB0: 43 4C 53 24 3A 54 56 B2  34 3A 8D 32 35 30 3A 99  |CLS$:TV.4:.250:.|
00000BC0: A3 32 29 22 43 55 52 52  45 4E 54 20 53 43 48 45  |.2)"CURRENT SCHE|
00000BD0: 44 55 4C 45 20 49 4E 20  4D 45 4D 4F 52 59 20 49  |DULE IN MEMORY I|
00000BE0: 53 22 59 52 00 FC 13 AA  0F 46 4C B2 38 3A 4E 4C  |S"YR.....FL.8:NL|
00000BF0: B2 38 3A 54 42 B2 35 3A  8D 32 30 30 00 0B 14 B4  |.8:TB.5:.200....|
00000C00: 0F 54 56 B2 31 30 3A 8D  32 35 30 00 39 14 BE 0F  |.TV.10:.250.9...|
00000C10: 99 A3 36 29 22 3C 31 3E  20 49 4E 50 55 54 20 50  |..6)"<1> INPUT P|
00000C20: 4C 41 59 2D 4F 46 46 53  20 3C 22 C9 28 C4 28 59  |LAY-OFFS <".(.(Y|
00000C30: 52 29 2C 34 29 22 3E 11  22 00 6A 14 C8 0F 99 A3  |R),4)">.".j.....|
00000C40: 36 29 22 3C 32 3E 20 49  4E 50 55 54 20 52 45 47  |6)"<2> INPUT REG|
00000C50: 20 53 45 41 53 4F 4E 20  3C 22 C9 28 C4 28 59 52  | SEASON <".(.(YR|
00000C60: AA 31 29 2C 34 29 22 3E  11 22 00 82 14 D2 0F 99  |.1),4)">."......|
00000C70: A3 36 29 22 3C 4D 3E 20  4D 45 4E 55 11 11 11 11  |.6)"<M> MENU....|
00000C80: 11 22 00 98 14 DC 0F 99  A3 31 34 29 22 43 48 4F  |.".......14)"CHO|
00000C90: 49 43 45 2E 2E 2E 22 3B  00 A8 14 E6 0F A1 51 24  |ICE...";......Q$|
00000CA0: 3A 51 B2 C5 28 51 24 29  00 B8 14 F4 0F 8B 51 24  |:Q..(Q$)......Q$|
00000CB0: B2 22 4D 22 A7 31 30 30  00 CA 14 F6 0F 8B 51 B3  |."M".100......Q.|
00000CC0: 31 B0 51 B1 32 A7 34 30  37 30 00 D3 14 F8 0F 99  |1.Q.2.4070......|
00000CD0: 51 24 3B 00 E4 14 FA 0F  91 51 89 34 31 30 30 2C  |Q$;......Q.4100,|
00000CE0: 34 33 30 30 00 EA 14 00  10 8F 00 05 15 04 10 8F  |4300............|
00000CF0: 20 43 48 4F 4F 53 45 20  50 4C 41 59 2D 4F 46 46  | CHOOSE PLAY-OFF|
00000D00: 20 57 45 45 4B 00 24 15  0E 10 99 43 4C 53 24 3A  | WEEK.$....CLS$:|
00000D10: 46 4C B2 37 3A 4E 4C B2  31 30 3A 54 42 B2 34 3A  |FL.7:NL.10:TB.4:|
00000D20: 8D 32 30 30 00 32 15 10  10 54 56 B2 39 3A 8D 32  |.200.2...TV.9:.2|
00000D30: 35 30 00 5A 15 18 10 99  A3 35 29 22 57 45 45 4B  |50.Z.....5)"WEEK|
00000D40: 20 3C 31 37 3E 20 57 49  4C 44 43 41 52 44 20 50  | <17> WILDCARD P|
00000D50: 4C 41 59 2D 4F 46 46 53  11 22 00 82 15 22 10 99  |LAY-OFFS."..."..|
00000D60: A3 35 29 22 57 45 45 4B  20 3C 31 38 3E 20 44 49  |.5)"WEEK <18> DI|
00000D70: 56 49 53 49 4F 4E 20 50  4C 41 59 2D 4F 46 46 53  |VISION PLAY-OFFS|
00000D80: 11 22 00 AC 15 2C 10 99  A3 35 29 22 57 45 45 4B  |."...,...5)"WEEK|
00000D90: 20 3C 31 39 3E 20 43 4F  4E 46 45 52 45 4E 43 45  | <19> CONFERENCE|
00000DA0: 20 50 4C 41 59 2D 4F 46  46 53 11 22 00 CE 15 36  | PLAY-OFFS."...6|
00000DB0: 10 99 A3 35 29 22 57 45  45 4B 20 3C 32 30 3E 20  |...5)"WEEK <20> |
00000DC0: 53 55 50 45 52 42 4F 57  4C 11 11 11 11 22 00 01  |SUPERBOWL...."..|
00000DD0: 16 40 10 99 A3 35 29 22  49 4E 50 55 54 20 43 48  |.@...5)"INPUT CH|
00000DE0: 4F 49 43 45 20 4F 52 20  3C 4D 3E 20 4D 45 4E 55  |OICE OR <M> MENU|
00000DF0: 2E 2E 2E 20 20 20 20 20  20 9D 9D 9D 9D 9D 9D 22  |...      ......"|
00000E00: 3B 00 11 16 4A 10 85 57  24 3A 57 B2 C5 28 57 24  |;...J..W$:W..(W$|
00000E10: 29 00 22 16 54 10 8B 57  24 B2 22 4D 22 A7 34 30  |).".T..W$."M".40|
00000E20: 30 30 00 3D 16 5E 10 8B  57 B3 31 37 B0 57 B1 32  |00.=.^..W.17.W.2|
00000E30: 30 A7 99 22 91 91 22 3A  89 34 31 36 30 00 47 16  |0.."..":.4160.G.|
00000E40: 68 10 99 43 4C 53 24 00  6D 16 72 10 99 A3 35 29  |h..CLS$.m.r...5)|
00000E50: 22 50 4C 41 59 2D 4F 46  46 20 53 43 48 45 44 55  |"PLAY-OFF SCHEDU|
00000E60: 4C 45 20 49 4E 50 55 54  20 2D 22 59 52 00 76 16  |LE INPUT -"YR.v.|
00000E70: 7C 10 8D 34 30 30 00 81  16 86 10 8D 31 35 30 30  ||..400......1500|
00000E80: 30 00 8C 16 88 10 8D 31  37 30 30 30 00 B9 16 90  |0......17000....|
00000E90: 10 54 56 B2 32 31 3A 8D  32 35 30 3A 99 A3 39 29  |.TV.21:.250:..9)|
00000EA0: 20 22 49 4E 50 55 54 20  54 48 49 53 20 57 45 45  | "INPUT THIS WEE|
00000EB0: 4B 2E 2E 2E 59 2F 4E 91  22 00 C1 16 94 10 A1 51  |K...Y/N."......Q|
00000EC0: 24 00 D2 16 96 10 8B 51  24 B2 22 59 22 A7 34 32  |$......Q$."Y".42|
00000ED0: 36 30 00 E3 16 98 10 8B  51 24 B2 22 4E 22 A7 34  |60......Q$."N".4|
00000EE0: 31 30 30 00 ED 16 9A 10  89 34 32 34 34 00 1A 17  |100......4244...|
00000EF0: A4 10 99 22 20 20 20 20  20 20 20 20 20 20 20 20  |..."            |
00000F00: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000F10: 20 20 20 20 20 20 20 20  20 22 00 25 17 AE 10 8D  |         ".%....|
00000F20: 31 38 30 30 30 00 30 17  B8 10 89 31 30 30 30 30  |18000.0....10000|
00000F30: 00 36 17 C2 10 8F 00 4B  17 CC 10 8F 20 52 45 47  |.6.....K.... REG|
00000F40: 55 4C 41 52 20 53 45 41  53 4F 4E 00 74 17 D6 10  |ULAR SEASON.t...|
00000F50: 99 43 4C 53 24 3A 99 A3  37 29 22 49 4E 50 55 54  |.CLS$:..7)"INPUT|
00000F60: 20 4E 45 57 20 53 43 48  45 44 55 4C 45 20 2D 22  | NEW SCHEDULE -"|
00000F70: 59 52 AA 31 00 7C 17 DA  10 99 3A 99 00 AE 17 E0  |YR.1.|....:.....|
00000F80: 10 99 22 57 48 45 4E 20  49 4E 50 55 54 54 49 4E  |.."WHEN INPUTTIN|
00000F90: 47 20 41 20 4E 45 57 20  52 45 47 55 4C 41 52 20  |G A NEW REGULAR |
00000FA0: 53 45 41 53 4F 4E 2C 20  59 4F 55 11 22 3B 00 E0  |SEASON, YOU.";..|
00000FB0: 17 EA 10 99 22 49 4E 50  55 54 20 54 48 45 20 44  |...."INPUT THE D|
00000FC0: 41 54 45 53 20 4F 46 20  45 41 43 48 20 57 45 45  |ATES OF EACH WEE|
00000FD0: 4B 20 28 32 30 29 20 46  49 52 53 54 2E 11 22 3B  |K (20) FIRST..";|
00000FE0: 00 12 18 F4 10 99 22 54  48 45 4E 20 59 4F 55 20  |......"THEN YOU |
00000FF0: 57 49 4C 4C 20 49 4E 50  55 54 20 54 48 45 20 41  |WILL INPUT THE A|
00001000: 43 54 55 41 4C 20 53 43  48 45 44 55 4C 45 2E 11  |CTUAL SCHEDULE..|
00001010: 22 3B 00 42 18 FE 10 99  22 41 4C 4C 20 31 36 20  |";.B...."ALL 16 |
00001020: 57 45 45 4B 53 20 4F 46  20 54 48 45 20 52 45 47  |WEEKS OF THE REG|
00001030: 55 4C 41 52 20 53 45 41  53 4F 4E 20 57 49 4C 4C  |ULAR SEASON WILL|
00001040: 11 22 00 70 18 00 11 99  22 48 41 56 45 20 54 4F  |.".p...."HAVE TO|
00001050: 20 42 45 20 49 4E 50 55  54 20 41 54 20 4F 4E 45  | BE INPUT AT ONE|
00001060: 20 53 49 54 54 49 4E 47  2E 20 20 54 48 45 11 22  | SITTING.  THE."|
00001070: 00 A2 18 02 11 99 22 50  4C 41 59 2D 4F 46 46 53  |......"PLAY-OFFS|
00001080: 20 57 49 4C 4C 20 42 45  20 49 4E 50 55 54 20 41  | WILL BE INPUT A|
00001090: 54 20 41 20 4C 41 54 45  52 20 44 41 54 45 2E 11  |T A LATER DATE..|
000010A0: 22 3B 00 A8 18 04 11 99  00 D8 18 06 11 99 22 57  |";............"W|
000010B0: 48 45 4E 20 54 48 45 20  4E 45 57 20 53 43 48 45  |HEN THE NEW SCHE|
000010C0: 44 55 4C 45 20 49 53 20  49 4E 50 55 54 2C 20 54  |DULE IS INPUT, T|
000010D0: 48 45 20 4F 4C 44 11 22  00 07 19 08 11 99 22 53  |HE OLD."......"S|
000010E0: 43 48 45 44 55 4C 45 20  57 49 4C 4C 20 4E 4F 54  |CHEDULE WILL NOT|
000010F0: 20 42 45 20 4C 4F 53 54  2D 2D 2D 41 20 4E 45 57  | BE LOST---A NEW|
00001100: 20 46 49 4C 45 11 22 00  37 19 0A 11 99 22 57 49  | FILE.".7...."WI|
00001110: 4C 4C 20 42 45 20 43 52  45 41 54 45 44 20 57 49  |LL BE CREATED WI|
00001120: 54 48 20 41 20 44 49 46  46 45 52 45 4E 54 20 4E  |TH A DIFFERENT N|
00001130: 41 4D 45 2E 11 11 22 00  62 19 0E 11 99 22 20 20  |AME...".b...."  |
00001140: 20 20 20 20 50 52 45 53  53 20 3C 43 3E 20 43 4F  |    PRESS <C> CO|
00001150: 4E 54 49 4E 55 45 20 20  3C 4D 3E 20 4D 45 4E 55  |NTINUE  <M> MENU|
00001160: 22 3B 00 6A 19 12 11 A1  51 24 00 7B 19 14 11 8B  |";.j....Q$.{....|
00001170: 51 24 B2 22 43 22 A7 34  33 39 30 00 8C 19 16 11  |Q$."C".4390.....|
00001180: 8B 51 24 B2 22 4D 22 A7  34 30 30 30 00 96 19 18  |.Q$."M".4000....|
00001190: 11 89 34 33 37 30 00 9C  19 22 11 8F 00 BD 19 26  |..4370...".....&|
000011A0: 11 8F 20 52 45 53 45 54  20 44 41 54 45 53 20 26  |.. RESET DATES &|
000011B0: 20 43 4F 44 45 20 54 4F  20 5A 45 52 4F 00 D4 19  | CODE TO ZERO...|
000011C0: 2A 11 81 58 B2 31 A4 32  30 3A 44 24 28 58 29 B2  |*..X.1.20:D$(X).|
000011D0: 22 22 3A 82 00 07 1A 2E  11 81 58 B2 31 A4 32 30  |"":.......X.1.20|
000011E0: 3A 53 24 28 58 29 B2 22  40 40 40 40 40 40 40 40  |:S$(X)."@@@@@@@@|
000011F0: 40 40 40 40 40 40 40 40  40 40 40 40 40 40 40 40  |@@@@@@@@@@@@@@@@|
00001200: 40 40 40 40 22 3A 82 00  3C 1A 30 11 81 58 B2 31  |@@@@":..<.0..X.1|
00001210: A4 32 30 3A 4C 4E 24 28  58 29 B2 22 50 50 50 50  |.20:LN$(X)."PPPP|
00001220: 50 50 50 50 50 50 50 50  50 50 50 50 50 50 50 50  |PPPPPPPPPPPPPPPP|
00001230: 50 50 50 50 50 50 50 50  50 22 3A 82 00 45 1A 32  |PPPPPPPPP":..E.2|
00001240: 11 43 54 B2 30 00 51 1A  36 11 59 52 B2 59 52 AA  |.CT.0.Q.6.YR.YR.|
00001250: 31 00 57 1A 8A 11 8F 00  63 1A 94 11 8F 20 44 41  |1.W.....c.... DA|
00001260: 54 45 53 00 96 1A 9E 11  99 43 4C 53 24 3A 99 3A  |TES......CLS$:.:|
00001270: 99 22 20 20 20 44 41 54  45 20 49 4E 50 55 54 20  |."   DATE INPUT |
00001280: 46 4F 52 22 59 52 22 52  45 47 55 4C 41 52 20 53  |FOR"YR"REGULAR S|
00001290: 45 41 53 4F 4E 22 00 A0  1A A8 11 99 3A 99 3A 99  |EASON"......:.:.|
000012A0: 00 AC 1A B2 11 81 58 B2  31 A4 31 30 00 DA 1A BC  |......X.1.10....|
000012B0: 11 99 A3 33 29 22 57 45  45 4B 22 C4 28 58 29 3B  |...3)"WEEK".(X);|
000012C0: 22 2D 2D 22 A3 32 32 29  22 57 45 45 4B 22 C4 28  |"--".22)"WEEK".(|
000012D0: 58 AA 31 30 29 3B 22 2D  2D 22 00 E0 1A D0 11 82  |X.10);"--"......|
000012E0: 00 E8 1A D4 11 99 3A 99  00 15 1B DA 11 99 22 20  |......:......." |
000012F0: 20 20 54 48 45 20 44 41  54 45 20 49 53 20 41 4C  |  THE DATE IS AL|
00001300: 57 41 59 53 20 41 20 53  55 4E 44 41 59 2E 20 49  |WAYS A SUNDAY. I|
00001310: 4E 50 55 54 22 00 3F 1B  DC 11 99 22 20 20 20 33  |NPUT".?...."   3|
00001320: 20 4C 45 54 54 45 52 53  20 46 4F 52 20 54 48 45  | LETTERS FOR THE|
00001330: 20 4D 4F 4E 54 48 2C 20  53 4B 49 50 20 41 22 00  | MONTH, SKIP A".|
00001340: 6C 1B DE 11 99 22 20 20  20 53 50 41 43 45 20 41  |l...."   SPACE A|
00001350: 4E 44 20 49 4E 50 55 54  20 31 20 4F 52 20 32 20  |ND INPUT 1 OR 2 |
00001360: 4E 55 4D 42 45 52 53 20  46 4F 52 22 00 92 1B E0  |NUMBERS FOR"....|
00001370: 11 99 22 20 20 20 54 48  45 20 44 41 59 2E 20 20  |.."   THE DAY.  |
00001380: 45 58 41 4D 50 4C 45 3A  20 20 53 45 50 20 31 35  |EXAMPLE:  SEP 15|
00001390: 2E 22 00 9D 1B E4 11 8D  31 32 30 30 30 00 A3 1B  |."......12000...|
000013A0: 52 12 8F 00 C1 1B 5C 12  8F 20 52 45 47 55 4C 41  |R.....\.. REGULA|
000013B0: 52 20 53 45 41 53 4F 4E  20 53 43 48 45 44 55 4C  |R SEASON SCHEDUL|
000013C0: 45 00 CB 1B 66 12 99 43  4C 53 24 00 F7 1B 70 12  |E...f..CLS$...p.|
000013D0: 99 A3 32 29 22 52 45 47  55 4C 41 52 20 53 45 41  |..2)"REGULAR SEA|
000013E0: 53 4F 4E 20 53 43 48 45  44 55 4C 45 20 49 4E 50  |SON SCHEDULE INP|
000013F0: 55 54 20 2D 22 59 52 00  01 1C 74 12 4E 54 B2 32  |UT -"YR...t.NT.2|
00001400: 38 00 0C 1C 78 12 8D 31  35 30 30 30 00 18 1C 7A  |8...x..15000...z|
00001410: 12 81 57 B2 31 A4 31 36  00 35 1C 88 12 54 56 B2  |..W.1.16.5...TV.|
00001420: 34 3A 8D 32 35 30 3A 99  A3 31 32 29 44 24 28 57  |4:.250:..12)D$(W|
00001430: 29 22 20 20 22 00 40 1C  92 12 8D 31 36 30 30 30  |)"  ".@....16000|
00001440: 00 4B 1C 98 12 8D 31 37  30 30 30 00 56 1C A2 12  |.K....17000.V...|
00001450: 8D 31 38 30 30 30 00 5C  1C B4 12 82 00 67 1C B6  |.18000.\.....g..|
00001460: 12 89 31 30 30 30 30 00  6D 1C 7E 13 8F 00 84 1C  |..10000.m.~.....|
00001470: 88 13 8F 20 43 4F 52 52  45 43 54 20 53 43 48 45  |... CORRECT SCHE|
00001480: 44 55 4C 45 00 98 1C 92  13 99 43 4C 53 24 3A 54  |DULE......CLS$:T|
00001490: 56 B2 35 3A 8D 32 35 30  00 BD 1C 9C 13 99 A3 36  |V.5:.250.......6|
000014A0: 29 22 43 4F 52 52 45 43  54 49 4F 4E 20 46 4F 52  |)"CORRECTION FOR|
000014B0: 22 59 52 22 53 43 48 45  44 55 4C 45 22 00 D6 1C  |"YR"SCHEDULE"...|
000014C0: A6 13 46 4C B2 38 3A 4E  4C B2 38 3A 54 42 B2 31  |..FL.8:NL.8:TB.1|
000014D0: 30 3A 8D 32 30 30 00 E5  1C A8 13 54 56 B2 31 30  |0:.200.....TV.10|
000014E0: 3A 8D 32 35 30 00 03 1D  B0 13 99 A3 31 31 29 22  |:.250.......11)"|
000014F0: 3C 31 3E 20 43 4F 52 52  45 43 54 20 44 41 54 45  |<1> CORRECT DATE|
00001500: 53 11 22 00 22 1D BA 13  99 A3 31 31 29 22 3C 32  |S.".".....11)"<2|
00001510: 3E 20 43 4F 52 52 45 43  54 20 43 4F 44 45 20 23  |> CORRECT CODE #|
00001520: 11 22 00 36 1D C4 13 99  A3 31 31 29 22 3C 4D 3E  |.".6.....11)"<M>|
00001530: 20 4D 45 4E 55 22 00 57  1D CE 13 54 56 B2 31 39  | MENU".W...TV.19|
00001540: 3A 8D 32 35 30 3A 99 A3  31 35 29 22 43 48 4F 49  |:.250:..15)"CHOI|
00001550: 43 45 2E 2E 2E 22 3B 00  67 1D D8 13 A1 51 24 3A  |CE...";.g....Q$:|
00001560: 51 B2 C5 28 51 24 29 00  77 1D E2 13 8B 51 24 B2  |Q..(Q$).w....Q$.|
00001570: 22 4D 22 A7 31 30 30 00  89 1D E4 13 8B 51 B3 31  |"M".100......Q.1|
00001580: B0 51 B1 32 A7 35 30 38  30 00 92 1D E6 13 99 51  |.Q.2.5080......Q|
00001590: 24 3B 00 A3 1D E8 13 91  51 89 35 31 30 30 2C 35  |$;......Q.5100,5|
000015A0: 33 30 30 00 A9 1D EA 13  8F 00 BD 1D EC 13 8F 20  |300............ |
000015B0: 43 4F 52 52 45 43 54 20  44 41 54 45 53 00 EA 1D  |CORRECT DATES...|
000015C0: 0A 14 99 43 4C 53 24 3A  99 3A 99 3A 99 A3 36 29  |...CLS$:.:.:..6)|
000015D0: 22 43 4F 52 52 45 43 54  20 53 43 48 45 44 55 4C  |"CORRECT SCHEDUL|
000015E0: 45 20 44 41 54 45 53 22  59 52 00 F5 1D 1E 14 8D  |E DATES"YR......|
000015F0: 31 31 30 30 30 00 21 1E  32 14 54 56 B2 32 33 3A  |11000.!.2.TV.23:|
00001600: 8D 32 35 30 3A 99 A3 31  30 29 22 4F 4E 45 20 4D  |.250:..10)"ONE M|
00001610: 4F 4D 45 4E 54 20 50 4C  45 41 53 45 2E 2E 2E 91  |OMENT PLEASE....|
00001620: 22 00 34 1E 3C 14 81 58  B2 31 A4 32 30 3A 44 41  |".4.<..X.1.20:DA|
00001630: 24 B2 22 22 00 49 1E 46  14 81 59 B2 C3 28 44 24  |$."".I.F..Y..(D$|
00001640: 28 58 29 29 A4 31 A9 AB  31 00 64 1E 50 14 8B CA  |(X)).1..1.d.P...|
00001650: 28 44 24 28 58 29 2C 59  2C 31 29 B2 22 2D 22 A7  |(D$(X),Y,1)."-".|
00001660: 35 32 33 30 00 7D 1E 5A  14 44 41 24 B2 CA 28 44  |5230.}.Z.DA$..(D|
00001670: 24 28 58 29 2C 59 2C 31  29 AA 44 41 24 00 84 1E  |$(X),Y,1).DA$...|
00001680: 64 14 82 59 00 92 1E 6E  14 44 24 28 58 29 B2 44  |d..Y...n.D$(X).D|
00001690: 41 24 00 99 1E 78 14 82  58 00 B9 1E 7A 14 99 A3  |A$...x..X...z...|
000016A0: 31 30 29 22 20 20 20 20  20 20 20 20 20 20 20 20  |10)"            |
000016B0: 20 20 20 20 20 20 20 20  22 00 C4 1E 82 14 8D 31  |        "......1|
000016C0: 32 30 30 30 00 CF 1E 8C  14 89 31 30 30 30 30 00  |2000......10000.|
000016D0: D5 1E AA 14 8F 00 E8 1E  B4 14 8F 20 43 4F 52 52  |........... CORR|
000016E0: 45 43 54 20 43 4F 44 45  00 F2 1E BE 14 57 24 B2  |ECT CODE.....W$.|
000016F0: 22 22 00 FC 1E C8 14 99  43 4C 53 24 00 21 1F D2  |""......CLS$.!..|
00001700: 14 99 3A 99 A3 37 29 22  43 4F 44 45 20 4E 55 4D  |..:..7)"CODE NUM|
00001710: 42 45 52 20 43 4F 52 52  45 43 54 49 4F 4E 22 59  |BER CORRECTION"Y|
00001720: 52 00 2C 1F DC 14 8D 31  31 30 30 30 00 64 1F E6  |R.,....11000.d..|
00001730: 14 54 56 B2 32 33 3A 8D  32 35 30 3A 99 A3 39 29  |.TV.23:.250:..9)|
00001740: 22 43 4F 52 52 45 43 54  20 57 48 49 43 48 20 57  |"CORRECT WHICH W|
00001750: 45 45 4B 2E 2E 2E 20 20  20 20 20 20 9D 9D 9D 9D  |EEK...      ....|
00001760: 9D 9D 22 3B 00 74 1F F0  14 85 57 24 3A 57 B2 C5  |..";.t....W$:W..|
00001770: 28 57 24 29 00 8D 1F FA  14 8B 57 B3 31 B0 57 B1  |(W$)......W.1.W.|
00001780: 32 30 A7 99 22 91 22 3A  89 35 33 35 30 00 B6 1F  |20..".":.5350...|
00001790: 04 15 99 43 4C 53 24 3A  99 A3 36 29 22 43 4F 44  |...CLS$:..6)"COD|
000017A0: 45 20 4E 55 4D 42 45 52  20 43 4F 52 52 45 43 54  |E NUMBER CORRECT|
000017B0: 49 4F 4E 22 59 52 00 C9  1F 18 15 99 A3 31 32 29  |ION"YR.......12)|
000017C0: 22 11 11 22 44 24 28 57  29 00 D2 1F 22 15 8D 34  |".."D$(W)..."..4|
000017D0: 30 30 00 DD 1F 2C 15 8D  31 35 30 30 30 00 E8 1F  |00...,..15000...|
000017E0: 36 15 8D 31 37 30 30 30  00 16 20 40 15 54 56 B2  |6..17000.. @.TV.|
000017F0: 32 33 3A 8D 32 35 30 3A  99 A3 38 29 22 43 4F 52  |23:.250:..8)"COR|
00001800: 52 45 43 54 20 54 48 49  53 20 57 45 45 4B 2E 2E  |RECT THIS WEEK..|
00001810: 2E 59 2F 4E 91 22 00 1E  20 4A 15 A1 51 24 00 2F  |.Y/N.".. J..Q$./|
00001820: 20 4C 15 8B 51 24 B2 22  59 22 A7 35 34 36 30 00  | L..Q$."Y".5460.|
00001830: 40 20 4E 15 8B 51 24 B2  22 4E 22 A7 35 35 30 30  |@ N..Q$."N".5500|
00001840: 00 4A 20 50 15 89 35 34  35 30 00 6C 20 54 15 99  |.J P..5450.l T..|
00001850: A3 38 29 22 20 20 20 20  20 20 20 20 20 20 20 20  |.8)"            |
00001860: 20 20 20 20 20 20 20 20  20 20 20 22 00 77 20 68  |           ".w h|
00001870: 15 8D 31 38 30 30 30 00  A7 20 7C 15 54 56 B2 32  |..18000.. |.TV.2|
00001880: 33 3A 8D 32 35 30 3A 99  A3 36 29 22 43 4F 52 52  |3:.250:..6)"CORR|
00001890: 45 43 54 20 41 4E 4F 54  48 45 52 20 57 45 45 4B  |ECT ANOTHER WEEK|
000018A0: 2E 2E 2E 59 2F 4E 22 00  AF 20 86 15 A1 51 24 00  |...Y/N".. ...Q$.|
000018B0: C0 20 88 15 8B 51 24 B2  22 59 22 A7 35 33 30 30  |. ...Q$."Y".5300|
000018C0: 00 D1 20 8A 15 8B 51 24  B2 22 4E 22 A7 35 35 32  |.. ...Q$."N".552|
000018D0: 30 00 DB 20 8C 15 89 35  35 31 30 00 E6 20 90 15  |0.. ...5510.. ..|
000018E0: 89 31 30 30 30 30 00 EC  20 D6 15 8F 00 02 21 70  |.10000.. .....!p|
000018F0: 17 8F 20 52 45 54 55 52  4E 20 54 4F 20 50 49 4B  |.. RETURN TO PIK|
00001900: 45 4D 00 14 21 7A 17 99  43 4C 53 24 3A 9E 20 36  |EM..!z..CLS$:. 6|
00001910: 35 35 31 37 00 3E 21 84  17 99 22 13 11 11 11 4C  |5517.>!..."....L|
00001920: 4F 41 44 22 3B C7 28 33  34 29 3B 22 50 49 4B 45  |OAD";.(34);"PIKE|
00001930: 4D 22 3B C7 28 33 34 29  3B 22 2C 38 13 22 00 57  |M";.(34);",8.".W|
00001940: 21 8E 17 41 24 B2 C7 28  31 33 29 AA 22 52 55 4E  |!..A$..(13)."RUN|
00001950: 22 AA C7 28 31 33 29 00  83 21 98 17 81 49 B2 31  |"..(13)..!...I.1|
00001960: A4 C3 28 41 24 29 3A 97  36 33 30 AA 49 2C C6 28  |..(A$):.630.I,.(|
00001970: CA 28 41 24 2C 49 29 29  3A 82 3A 97 31 39 38 2C  |.(A$,I)):.:.198,|
00001980: 49 AB 31 00 89 21 A2 17  A2 00 8F 21 06 27 8F 00  |I.1..!.....!.'..|
00001990: A8 21 10 27 8F 20 4F 55  54 50 55 54 20 2D 20 44  |.!.'. OUTPUT - D|
000019A0: 41 54 41 20 46 49 4C 45  00 BD 21 14 27 99 43 4C  |ATA FILE..!.'.CL|
000019B0: 53 24 3A 54 56 B2 31 31  3A 8D 32 35 30 00 DF 21  |S$:TV.11:.250..!|
000019C0: 16 27 99 A3 38 29 22 55  50 44 41 54 49 4E 47 22  |.'..8)"UPDATING"|
000019D0: 59 52 22 53 43 48 45 44  55 4C 45 2E 2E 2E 22 00  |YR"SCHEDULE...".|
000019E0: FF 21 18 27 46 4C 24 B2  22 53 43 48 45 44 55 4C  |.!.'FL$."SCHEDUL|
000019F0: 45 2F 59 22 AA C9 28 C4  28 59 52 29 2C 32 29 00  |E/Y"..(.(YR),2).|
00001A00: 1B 22 1A 27 9F 32 2C 38  2C 32 2C 22 40 30 3A 22  |.".'.2,8,2,"@0:"|
00001A10: AA 46 4C 24 AA 22 2C 53  2C 57 22 00 25 22 24 27  |.FL$.",S,W".%"$'|
00001A20: 98 32 2C 59 52 00 57 22  2E 27 81 58 B2 31 A4 32  |.2,YR.W".'.X.1.2|
00001A30: 30 3A 98 32 2C 44 24 28  58 29 22 2C 22 53 24 28  |0:.2,D$(X)","S$(|
00001A40: 58 29 22 2C 22 C7 28 33  34 29 4C 4E 24 28 58 29  |X)",".(34)LN$(X)|
00001A50: C7 28 33 34 29 3A 82 00  5E 22 56 27 A0 32 00 78  |.(34):..^"V'.2.x|
00001A60: 22 60 27 9F 32 2C 38 2C  32 2C 22 40 30 3A 43 4F  |"`'.2,8,2,"@0:CO|
00001A70: 55 4E 54 2C 53 2C 57 22  00 96 22 6A 27 98 32 2C  |UNT,S,W".."j'.2,|
00001A80: 43 54 22 2C 22 59 52 22  2C 22 54 58 22 2C 22 42  |CT","YR","TX","B|
00001A90: 47 22 2C 22 42 44 00 A2  22 6C 27 A0 32 3A 89 31  |G","BD.."l'.2:.1|
00001AA0: 30 30 00 A8 22 EE 2A 8F  00 BC 22 F8 2A 8F 20 44  |00..".*...".*. D|
00001AB0: 49 53 50 4C 41 59 20 44  41 54 45 53 00 CA 22 02  |ISPLAY DATES..".|
00001AC0: 2B 54 56 B2 36 3A 8D 32  35 30 00 D6 22 16 2B 81  |+TV.6:.250..".+.|
00001AD0: 58 B2 31 A4 31 30 00 F0  22 20 2B 99 A3 33 29 44  |X.1.10.." +..3)D|
00001AE0: 24 28 58 29 A3 32 32 29  44 24 28 58 AA 31 30 29  |$(X).22)D$(X.10)|
00001AF0: 00 F6 22 2A 2B 82 00 FC  22 34 2B 8E 00 02 23 7C  |.."*+..."4+...#||
00001B00: 2E 8F 00 14 23 E0 2E 8F  20 49 4E 50 55 54 20 44  |....#... INPUT D|
00001B10: 41 54 45 53 00 2B 23 E4  2E 53 50 24 B2 22 20 20  |ATES.+#..SP$."  |
00001B20: 20 20 20 20 9D 9D 9D 9D  9D 9D 22 00 4F 23 EA 2E  |    ......".O#..|
00001B30: 57 4C B2 36 3A 43 B2 30  3A 42 45 B2 33 32 3A 45  |WL.6:C.0:BE.32:E|
00001B40: 44 B2 39 30 3A 54 48 B2  31 31 3A 54 56 B2 35 00  |D.90:TH.11:TV.5.|
00001B50: 68 23 F4 2E 81 58 B2 31  A4 32 30 3A 54 56 B2 54  |h#...X.1.20:TV.T|
00001B60: 56 AA 31 3A 8D 32 35 30  00 87 23 FE 2E 97 32 31  |V.1:.250..#...21|
00001B70: 31 2C 54 48 3A 8D 33 30  30 3A 8B 43 B1 30 A7 44  |1,TH:.300:.C.0.D|
00001B80: 24 28 58 29 B2 58 24 00  9F 23 08 2F 97 32 31 31  |$(X).X$..#./.211|
00001B90: 2C 54 48 3A 99 44 24 28  58 29 22 20 20 22 3B 00  |,TH:.D$(X)"  ";.|
00001BA0: AE 23 1C 2F 8B 58 B2 39  A7 54 48 B2 31 32 00 C3  |.#./.X.9.TH.12..|
00001BB0: 23 26 2F 8B 58 B2 31 30  A7 54 48 B2 33 31 3A 54  |#&/.X.10.TH.31:T|
00001BC0: 56 B2 35 00 C9 23 30 2F  82 00 F5 23 3A 2F 54 56  |V.5..#0/...#:/TV|
00001BD0: B2 32 34 3A 8D 32 35 30  3A 99 A3 39 29 22 49 53  |.24:.250:..9)"IS|
00001BE0: 20 54 48 49 53 20 43 4F  52 52 45 43 54 2E 2E 2E  | THIS CORRECT...|
00001BF0: 59 2F 4E 91 22 00 FD 23  44 2F A1 51 24 00 0F 24  |Y/N."..#D/.Q$..$|
00001C00: 46 2F 8B 51 24 B2 22 59  22 A7 31 32 31 32 30 00  |F/.Q$."Y".12120.|
00001C10: 21 24 48 2F 8B 51 24 B2  22 4E 22 A7 31 32 31 31  |!$H/.Q$."N".1211|
00001C20: 30 00 2C 24 4A 2F 89 31  32 31 30 30 00 53 24 4E  |0.,$J/.12100.S$N|
00001C30: 2F 99 A3 39 29 22 20 20  20 20 20 20 20 20 20 20  |/..9)"          |
00001C40: 20 20 20 20 20 20 20 20  20 20 20 22 3A 89 31 32  |           ":.12|
00001C50: 30 30 30 00 5D 24 58 2F  99 43 4C 53 24 00 88 24  |000.]$X/.CLS$..$|
00001C60: 62 2F 81 58 B2 31 A4 32  30 3A 44 24 28 58 29 B2  |b/.X.1.20:D$(X).|
00001C70: 22 57 45 45 4B 22 AA C4  28 58 29 AA 22 2D 2D 22  |"WEEK"..(X)."--"|
00001C80: AA 44 24 28 58 29 3A 82  00 8E 24 6C 2F 8E 00 94  |.D$(X):...$l/...|
00001C90: 24 BE 32 8F 00 AE 24 C8  32 8F 20 43 4C 45 41 52  |$.2...$.2. CLEAR|
00001CA0: 20 4D 49 44 44 4C 45 20  53 43 52 45 45 4E 00 BC  | MIDDLE SCREEN..|
00001CB0: 24 D2 32 54 56 B2 37 3A  8D 32 35 30 00 C8 24 DC  |$.2TV.7:.250..$.|
00001CC0: 32 81 58 B2 31 A4 31 34  00 F2 24 E6 32 99 A3 34  |2.X.1.14..$.2..4|
00001CD0: 29 22 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |)"              |
00001CE0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001CF0: 20 22 00 F8 24 F0 32 82  00 FE 24 FA 32 8E 00 04  | "..$.2...$.2...|
00001D00: 25 A6 36 8F 00 1B 25 B0  36 8F 20 44 49 53 50 4C  |%.6...%.6. DISPL|
00001D10: 41 59 20 53 43 48 45 44  55 4C 45 00 3A 25 BA 36  |AY SCHEDULE.:%.6|
00001D20: 54 56 B2 34 3A 8D 32 35  30 3A 99 A3 31 33 29 44  |TV.4:.250:..13)D|
00001D30: 24 28 57 29 22 20 20 20  20 22 00 57 25 C4 36 54  |$(W)"    ".W%.6T|
00001D40: 48 B2 31 3A 54 56 B2 37  3A 8D 32 35 30 3A 81 58  |H.1:TV.7:.250:.X|
00001D50: B2 31 A4 4E 54 A9 32 00  75 25 CE 36 56 24 B2 54  |.1.NT.2.u%.6V$.T|
00001D60: 24 28 C6 28 CA 28 53 24  28 57 29 2C 58 2C 31 29  |$(.(.(S$(W),X,1)|
00001D70: 29 AB 36 34 29 00 95 25  E2 36 48 24 B2 54 24 28  |).64)..%.6H$.T$(|
00001D80: C6 28 CA 28 53 24 28 57  29 2C 58 AA 31 2C 31 29  |.(.(S$(W),X.1,1)|
00001D90: 29 AB 36 34 29 00 AF 25  F6 36 99 A3 35 29 56 24  |).64)..%.6..5)V$|
00001DA0: 20 A3 31 39 29 22 40 22  20 A3 32 32 29 48 24 00  | .19)"@" .22)H$.|
00001DB0: B5 25 00 37 82 00 BB 25  1E 37 8E 00 C1 25 8E 3A  |.%.7...%.7...%.:|
00001DC0: 8F 00 DB 25 98 3A 8F 20  46 4F 52 4D 20 46 4F 52  |...%.:. FORM FOR|
00001DD0: 20 43 4F 44 45 20 49 4E  50 55 54 00 E9 25 A2 3A  | CODE INPUT..%.:|
00001DE0: 54 56 B2 37 3A 8D 32 35  30 00 F7 25 AC 3A 81 58  |TV.7:.250..%.:.X|
00001DF0: B2 31 A4 4E 54 AD 32 00  1E 26 B6 3A 99 A3 36 29  |.1.NT.2..&.:..6)|
00001E00: 22 47 41 4D 45 22 58 3B  A3 31 34 29 22 56 49 53  |"GAME"X;.14)"VIS|
00001E10: 49 54 4F 52 20 20 20 20  20 48 4F 4D 45 22 00 24  |ITOR     HOME".$|
00001E20: 26 C0 3A 82 00 2A 26 D4  3A 8E 00 30 26 76 3E 8F  |&.:..*&.:..0&v>.|
00001E30: 00 41 26 80 3E 8F 20 43  4C 45 41 52 20 43 4F 44  |.A&.>. CLEAR COD|
00001E40: 45 00 4F 26 8A 3E 54 56  B2 37 3A 8D 32 35 30 00  |E.O&.>TV.7:.250.|
00001E50: 5B 26 8E 3E 81 58 B2 31  A4 31 34 00 72 26 94 3E  |[&.>.X.1.14.r&.>|
00001E60: 99 A3 32 32 29 22 20 20  1D 1D 1D 1D 1D 1D 1D 20  |..22)"  ....... |
00001E70: 20 22 00 7E 26 9E 3E 54  56 B2 54 56 AA 31 00 84  | ".~&.>TV.TV.1..|
00001E80: 26 A8 3E 82 00 8A 26 B2  3E 8E 00 90 26 5E 42 8F  |&.>...&.>...&^B.|
00001E90: 00 A3 26 68 42 8F 20 44  49 53 50 4C 41 59 20 43  |..&hB. DISPLAY C|
00001EA0: 4F 44 45 00 B6 26 72 42  54 56 B2 37 3A 54 48 B2  |ODE..&rBTV.7:TH.|
00001EB0: 30 3A 8D 32 35 30 00 C4  26 7C 42 81 58 B2 31 A4  |0:.250..&|B.X.1.|
00001EC0: 4E 54 A9 32 00 F4 26 86  42 56 B2 C6 28 CA 28 53  |NT.2..&.BV..(.(S|
00001ED0: 24 28 57 29 2C 58 2C 31  29 29 AB 36 34 3A 48 B2  |$(W),X,1)).64:H.|
00001EE0: C6 28 CA 28 53 24 28 57  29 2C 58 AA 31 2C 31 29  |.(.(S$(W),X.1,1)|
00001EF0: 29 AB 36 34 00 0F 27 9A  42 97 32 31 31 2C 32 31  |).64..'.B.211,21|
00001F00: 3A 99 56 3B 3A 97 32 31  31 2C 33 30 3A 99 48 00  |:.V;:.211,30:.H.|
00001F10: 15 27 AE 42 82 00 1B 27  B8 42 8E 00 21 27 46 46  |.'.B...'.B..!'FF|
00001F20: 8F 00 32 27 50 46 8F 20  49 4E 50 55 54 20 43 4F  |..2'PF. INPUT CO|
00001F30: 44 45 00 54 27 54 46 81  4C B2 31 A4 32 38 3A 54  |DE.T'TF.L.1.28:T|
00001F40: 45 24 28 4C 29 B2 CA 28  53 24 28 57 29 2C 4C 2C  |E$(L)..(S$(W),L,|
00001F50: 31 29 3A 82 00 63 27 56  46 53 50 24 B2 22 20 20  |1):..c'VFSP$."  |
00001F60: 9D 9D 22 00 82 27 58 46  57 4C B2 32 3A 42 45 B2  |.."..'XFWL.2:BE.|
00001F70: 34 38 3A 45 44 B2 35 37  3A 54 56 B2 36 3A 54 48  |48:ED.57:TV.6:TH|
00001F80: B2 30 00 9D 27 5A 46 81  58 B2 31 A4 4E 54 A9 32  |.0..'ZF.X.1.NT.2|
00001F90: 3A 54 56 B2 54 56 AA 31  3A 8D 32 35 30 00 C9 27  |:TV.TV.1:.250..'|
00001FA0: 64 46 97 32 31 31 2C 32  32 3A 8D 33 30 30 3A 8B  |dF.211,22:.300:.|
00001FB0: C5 28 58 24 29 B1 32 38  A7 99 22 9D 9D 20 20 20  |.(X$).28.."..   |
00001FC0: 22 3B 3A 89 31 38 30 32  30 00 E5 27 6E 46 8B 43  |";:.18020..'nF.C|
00001FD0: B1 30 A7 54 45 24 28 58  29 B2 C7 28 C5 28 58 24  |.0.TE$(X)..(.(X$|
00001FE0: 29 AA 36 34 29 00 05 28  78 46 97 32 31 31 2C 32  |).64)..(xF.211,2|
00001FF0: 31 3A 99 C6 28 54 45 24  28 58 29 29 AB 36 34 22  |1:..(TE$(X)).64"|
00002000: 9D 20 20 22 3B 00 31 28  8C 46 97 32 31 31 2C 33  |.  ";.1(.F.211,3|
00002010: 31 3A 8D 33 30 30 3A 8B  C5 28 58 24 29 B1 32 38  |1:.300:..(X$).28|
00002020: A7 99 22 9D 9D 20 20 20  22 3B 3A 89 31 38 30 36  |.."..   ";:.1806|
00002030: 30 00 4F 28 96 46 8B 43  B1 30 A7 54 45 24 28 58  |0.O(.F.C.0.TE$(X|
00002040: AA 31 29 B2 C7 28 C5 28  58 24 29 AA 36 34 29 00  |.1)..(.(X$).64).|
00002050: 71 28 A0 46 97 32 31 31  2C 33 30 3A 99 C6 28 54  |q(.F.211,30:..(T|
00002060: 45 24 28 58 AA 31 29 29  AB 36 34 22 9D 20 20 22  |E$(X.1)).64".  "|
00002070: 3B 00 77 28 BE 46 82 00  A3 28 C8 46 54 56 B2 32  |;.w(.F...(.FTV.2|
00002080: 33 3A 8D 32 35 30 3A 99  A3 39 29 22 49 53 20 54  |3:.250:..9)"IS T|
00002090: 48 49 53 20 43 4F 52 52  45 43 54 2E 2E 2E 59 2F  |HIS CORRECT...Y/|
000020A0: 4E 91 22 00 AB 28 D2 46  A1 51 24 00 C4 28 D4 46  |N."..(.F.Q$..(.F|
000020B0: 8B 51 24 B2 22 59 22 B0  51 24 B2 22 4E 22 A7 31  |.Q$."Y".Q$."N".1|
000020C0: 38 31 34 30 00 CF 28 D6  46 89 31 38 31 33 30 00  |8140..(.F.18130.|
000020D0: FD 28 DC 46 99 A3 39 29  22 20 20 20 20 20 20 20  |.(.F..9)"       |
000020E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 22 3A  |              ":|
000020F0: 8B 51 24 B2 22 4E 22 A7  31 38 30 30 38 00 12 29  |.Q$."N".18008..)|
00002100: DE 46 53 24 28 57 29 B2  22 22 3A 81 4C B2 31 A4  |.FS$(W)."":.L.1.|
00002110: 32 38 00 29 29 E2 46 53  24 28 57 29 B2 53 24 28  |28.)).FS$(W).S$(|
00002120: 57 29 AA 54 45 24 28 4C  29 00 2F 29 E4 46 82 00  |W).TE$(L)./).F..|
00002130: 59 29 E5 46 54 56 B2 32  33 3A 8D 32 35 30 3A 99  |Y).FTV.23:.250:.|
00002140: A3 31 31 29 22 56 45 52  49 46 59 49 4E 47 20 49  |.11)"VERIFYING I|
00002150: 4E 50 55 54 2E 2E 2E 91  22 00 74 29 E6 46 8D 36  |NPUT....".t).F.6|
00002160: 30 30 3A 8B 5A 46 B2 31  A7 5A 46 B2 30 3A 89 31  |00:.ZF.1.ZF.0:.1|
00002170: 38 31 38 30 00 8F 29 F0  46 8D 37 30 30 3A 8B 44  |8180..).F.700:.D|
00002180: 46 B2 31 A7 44 46 B2 30  3A 89 31 38 31 38 30 00  |F.1.DF.0:.18180.|
00002190: 9A 29 FA 46 99 4C 43 24  3A 8E 00 AA 29 04 47 99  |.).F.LC$:...).G.|
000021A0: 4C 43 24 3A 89 31 38 30  30 38 00 B0 29 2E 4A 8F  |LC$:.18008..).J.|
000021B0: 00 BB 29 38 4A 8F 20 44  41 54 41 00 CA 29 3C 4A  |..)8J. DATA..)<J|
000021C0: 83 50 4C 41 59 2D 4F 46  46 53 00 02 2A 42 4A 83  |.PLAY-OFFS..*BJ.|
000021D0: 44 41 4C 4C 41 53 2C 50  48 49 4C 41 44 45 4C 50  |DALLAS,PHILADELP|
000021E0: 48 49 41 2C 4E 20 59 20  47 49 41 4E 54 53 2C 57  |HIA,N Y GIANTS,W|
000021F0: 41 53 48 49 4E 47 54 4F  4E 2C 53 54 20 4C 4F 55  |ASHINGTON,ST LOU|
00002200: 49 53 00 35 2A 4C 4A 83  47 52 45 45 4E 20 42 41  |IS.5*LJ.GREEN BA|
00002210: 59 2C 54 41 4D 50 41 20  42 41 59 2C 43 48 49 43  |Y,TAMPA BAY,CHIC|
00002220: 41 47 4F 2C 44 45 54 52  4F 49 54 2C 4D 49 4E 4E  |AGO,DETROIT,MINN|
00002230: 45 53 4F 54 41 00 65 2A  56 4A 83 53 41 4E 20 46  |ESOTA.e*VJ.SAN F|
00002240: 52 41 4E 43 49 53 43 4F  2C 41 54 4C 41 4E 54 41  |RANCISCO,ATLANTA|
00002250: 2C 4C 20 41 20 52 41 4D  53 2C 4E 45 57 20 4F 52  |,L A RAMS,NEW OR|
00002260: 4C 45 41 4E 53 00 9A 2A  60 4A 83 4E 45 57 20 45  |LEANS..*`J.NEW E|
00002270: 4E 47 4C 41 4E 44 2C 42  55 46 46 41 4C 4F 2C 4D  |NGLAND,BUFFALO,M|
00002280: 49 41 4D 49 2C 4E 20 59  20 4A 45 54 53 2C 49 4E  |IAMI,N Y JETS,IN|
00002290: 44 49 41 4E 41 50 4F 4C  49 53 00 C7 2A 6A 4A 83  |DIANAPOLIS..*jJ.|
000022A0: 50 49 54 54 53 42 55 52  47 48 2C 43 49 4E 43 49  |PITTSBURGH,CINCI|
000022B0: 4E 4E 41 54 49 2C 43 4C  45 56 45 4C 41 4E 44 2C  |NNATI,CLEVELAND,|
000022C0: 48 4F 55 53 54 4F 4E 00  FD 2A 74 4A 83 53 41 4E  |HOUSTON..*tJ.SAN|
000022D0: 20 44 49 45 47 4F 2C 44  45 4E 56 45 52 2C 53 45  | DIEGO,DENVER,SE|
000022E0: 41 54 54 4C 45 2C 4B 41  4E 53 41 53 20 43 49 54  |ATTLE,KANSAS CIT|
000022F0: 59 2C 4C 20 41 20 52 41  49 44 45 52 53 00 03 2B  |Y,L A RAIDERS..+|
00002300: 46 C3 8F 00 1B 2B 50 C3  8F 20 53 41 56 45 22 40  |F....+P.. SAVE"@|
00002310: 30 3A 49 4E 50 55 54 53  22 2C 38 00 21 2B 64 C3  |0:INPUTS",8.!+d.|
00002320: 80 00 00 00                                       |....            |
..&.... INPUTS - VER NFL 5.0 COMMODORE.?
.... BY LARRY MCCARROLL.H.... COPYRIGHT 
1986 - MARATHON SOFTWARE.N..........:CLS
$.G(147)......G(8)......T$(28),D$(20),S$
(20),TE$(28),LN$(20).V.".TV$."..........
............."...$.LC$."                
                       ".!.2..2,8,2,"0:C
OUNT,S,R".7.6..2,CT,YR,TX,BG,BD.>.8. 2.J
.<..CLS$:TV.11:.250:..12)"READING DATA..
."...>.FL$."SCHEDULE/Y".I(D(YR),2)...F..
2,8,2,"0:".FL$.",S,R"...J..2,YR.S.L..X.1
.20:.2,D$(X),S$(X),LN$(X):..Z.N. 2...P..
X.0.28:.T$(X):....Z.....D.. TOP MENU.*.L
..CLS$:..9)"SEASON SCHEDULE INPUT".C.P.F
L.5:NL.14:TB.8:.200.Q.R.TV.7:.250.Q.T...
9)"<1> DISPLAY"YR"DATES."...X...9)"<2> D
ISPLAY"YR"SCHED."...|...9)"<3> TEAM CODE
 NUMBERS.".Q.....9)"<4> INPUT SCHEDULES.
".......9)"<5> CORRECT SCHEDULES."......
.9)"<6> MENU.....". .....15)"CHOICE...";
.0....Q$:Q.E(Q$).A....Q.1.Q.6.144.F. ..Q
.1000,2000,3000,4000,5000,6000.L.....{.H
.. DRAW BOX...R.TV.FL:.250:..TB):.X.1.(2
0.TB).2:.G(185);:.:.".".N....X.1.NL.1:..
39.TB)G(182):........39.TB):.X.1.(20.TB)
.2:.G(184)"..";:.:.".";. ....X.1.NL.1:..
TB)G(181)"..";:..&.....,.....B.... POSIT
ION CURSOR.L....".";.\....H(TV$,TV);.B..
...H."...Z.,.. STATS INKEY...2.C.0:X$.""
...8..I$:.I$.""..G(18)" .";:.312...<..G(
146);.Z.D..I$.G(13)..L.1.C:X$.X$.C$(L):.
:....J..C.0 . I$.G(20).." ..";:C.C.1:.31
2. .P..F(I$). BE . F(I$).ED .312...V..C.
WL.312.=.\..C.0..SP$;.Z.^..I$;:C.C.1:C$(
C).I$:.312.`.....V.... NUMBER OF TEAMS..
...NT.28:.W.17........W.17.W.19.NT.4....
..W.18.NT.8......W.20.NT.2...B...F......
.X.. CHECK FOR TEAM INPUT AS ZERO...B.L.
1...L..J(S$(W),L,1)."@".ZFLG.1:.650.%.V.
L.L.1:.L.NT........620.H...TV.23:.250:."
    ONE OR MORE TEAMS INPUT AS ZERO...."
.X....L.1.3000:..~................ CHECK
 FOR DUPLICATIONS...F.L.1...P..Y.L.1.NT.
..Z..J(S$(W),L,1).J(S$(W),Y,1).DFLG.1...
.........DFLG.1.750.....L.L.1:.L.NT.1.78
0......720.?...."     ONE OR MORE TEAMS 
DUPLICATED....".O....L.1.3000:..U.....[.
....P.... SCHEDULE DATES.Z....CLS$......
.10)".SCHEDULE DATES"YR......11000.G.$.T
V.21:.250:..12)"PRESS <M> MENU".O....Q$.
..8..Q$."M".100...B..1070...F.....P.. WE
EKLY SCHEDULE...T.W$."".1.V..CLS$:..10)"
SCHEDULE DATES"YR.<.Z..11000.|...TV.21:.
250:."  INPUT WEEK # OR <21> FOR MENU...
     .....";......W$:W.E(W$)......W.21.1
00......W.1.W.20..".":.2012.U....CLS$:..
9)YR"SEASON SCHEDULE"... ..400...*..1300
0...4..14000...Z.TV.23:.250:." <N> NEXT 
 <-> PREV  <D> DIFF  <M> MENU".6....Q$.G
....Q$."N".2190.X....Q$."-".2194.I....Q$
."D".2000.Y....Q$."M".100......2180.....
W.W.1:.W.20.W.1......2080.....W.W.1:.W.1
.W.20......2080.E.......... DISPLAY TEAM
 CODE NUMBERS...B..CLS$...L...11)"TEAM C
ODE NUMBERS".".V.TV.5:.250:.X.1.14.H....
.2)X.6)T$(X).22)X.14.25)T$(X.14).N.....V
.....6)"...<P> PRINT SCREEN  <M> MENU".~
....Q$......Q$."M".100......Q$."P".3130.
.....3070...&...M.0.. PRINT TEAM CODE NU
MBERS.Y.:..4,4:.4...D...32)"TEAM CODE NU
MBERS"...N.." ":." "...X..X.1.14...B...2
1)X;.3.D...3.C(D(X)))T$(X);.K.F...20.C(T
$(X)))X.14;.G.H...3.C(D(X.14)))T$(X.14).
M.L.....V..L.1.48:.4," ":...... 4:.3070.
........ .. SCHEDULE INPUT......CLS$:TV.
4:.250:..2)"CURRENT SCHEDULE IN MEMORY I
S"YR.....FL.8:NL.8:TB.5:.200.....TV.10:.
250.9.....6)"<1> INPUT PLAY-OFFS <"I(D(Y
R),4)">.".J.H...6)"<2> INPUT REG SEASON 
<"I(D(YR.1),4)">."...R...6)"<M> MENU....
.".......14)"CHOICE...";......Q$:Q.E(Q$)
......Q$."M".100.J....Q.1.Q.2.4070.S....
Q$;......Q.4100,4300............ CHOOSE 
PLAY-OFF WEEK.$....CLS$:FL.7:NL.10:TB.4:
.200.2...TV.9:.250.Z.....5)"WEEK <17> WI
LDCARD PLAY-OFFS."..."...5)"WEEK <18> DI
VISION PLAY-OFFS."...,...5)"WEEK <19> CO
NFERENCE PLAY-OFFS.".N.6...5)"WEEK <20> 
SUPERBOWL...."...@...5)"INPUT CHOICE OR 
<M> MENU...      ......";...J..W$:W.E(W$
).".T..W$."M".4000.=.^..W.17.W.20.."..":
.4160.G.H..CLS$.M.R...5)"PLAY-OFF SCHEDU
LE INPUT -"YR.V.|..400......15000......1
7000.....TV.21:.250:..9) "INPUT THIS WEE
K...Y/N.".A....Q$.R....Q$."Y".4260......
Q$."N".4100......4244......"            
                         ".%....18000.0.
...10000.6.B...K.L.. REGULAR SEASON.T.V.
.CLS$:..7)"INPUT NEW SCHEDULE -"YR.1.|.Z
..:......."WHEN INPUTTING A NEW REGULAR 
SEASON, YOU.";......"INPUT THE DATES OF 
EACH WEEK (20) FIRST..";......"THEN YOU 
WILL INPUT THE ACTUAL SCHEDULE..";.B....
"ALL 16 WEEKS OF THE REGULAR SEASON WILL
.".P...."HAVE TO BE INPUT AT ONE SITTING
.  THE."......"PLAY-OFFS WILL BE INPUT A
T A LATER DATE..";.......X...."WHEN THE 
NEW SCHEDULE IS INPUT, THE OLD."......"S
CHEDULE WILL NOT BE LOST---A NEW FILE.".
7...."WILL BE CREATED WITH A DIFFERENT N
AME...".B...."      PRESS <C> CONTINUE  
<M> MENU";.J....Q$.{....Q$."C".4390.....
.Q$."M".4000......4370...".....&.. RESET
 DATES & CODE TO ZERO.T.*..X.1.20:D$(X).
"":.......X.1.20:S$(X)."@@@@@@@@@@@@@@@@
@@@@@@@@@@@@":..<.0..X.1.20:LN$(X)."PPPP
PPPPPPPPPPPPPPPPPPPPPPPPP":..E.2.CT.0.Q.
6.YR.YR.1.W.....C.... DATES......CLS$:.:
."   DATE INPUT FOR"YR"REGULAR SEASON". 
....:.:.......X.1.10.Z.....3)"WEEK"D(X);
"--".22)"WEEK"D(X.10);"--"...P.....T..:.
...Z.."   THE DATE IS ALWAYS A SUNDAY. I
NPUT".?...."   3 LETTERS FOR THE MONTH, 
SKIP A".L...."   SPACE AND INPUT 1 OR 2 
NUMBERS FOR"......"   THE DAY.  EXAMPLE:
  SEP 15."......12000...R...A.\.. REGULA
R SEASON SCHEDULE.K.F..CLS$...P...2)"REG
ULAR SEASON SCHEDULE INPUT -"YR...T.NT.2
8...X..15000...Z..W.1.16.5...TV.4:.250:.
.12)D$(W)"  ".@....16000.K....17000.V...
.18000.\.....G....10000.M.~........ CORR
ECT SCHEDULE......CLS$:TV.5:.250.......6
)"CORRECTION FOR"YR"SCHEDULE".V...FL.8:N
L.8:TB.10:.200.....TV.10:.250.......11)"
<1> CORRECT DATES.".".....11)"<2> CORREC
T CODE #.".6.D...11)"<M> MENU".W.N.TV.19
:.250:..15)"CHOICE...";.G.X..Q$:Q.E(Q$).
W....Q$."M".100......Q.1.Q.2.5080......Q
$;......Q.5100,5300............ CORRECT 
DATES......CLS$:.:.:..6)"CORRECT SCHEDUL
E DATES"YR......11000.!.2.TV.23:.250:..1
0)"ONE MOMENT PLEASE....".4.<..X.1.20:DA
$."".I.F..Y.C(D$(X)).1..1.D.P..J(D$(X),Y
,1)."-".5230.}.Z.DA$.J(D$(X),Y,1).DA$...
D..Y...N.D$(X).DA$...X..X...Z...10)"    
                ".D....12000.O....10000.
U.......... CORRECT CODE.....W$.""...H..
CLS$.!.R..:..7)"CODE NUMBER CORRECTION"Y
R.,....11000.D...TV.23:.250:..9)"CORRECT
 WHICH WEEK...      ......";.T....W$:W.E
(W$)......W.1.W.20..".":.5350......CLS$:
..6)"CODE NUMBER CORRECTION"YR.I.....12)
".."D$(W).R."..400...,..15000...6..17000
.. @.TV.23:.250:..8)"CORRECT THIS WEEK..
.Y/N.".. J..Q$./ L..Q$."Y".5460.@ N..Q$.
"N".5500.J P..5450.L T...8)"            
           ".W H..18000.. |.TV.23:.250:.
.6)"CORRECT ANOTHER WEEK...Y/N".. ...Q$.
. ...Q$."Y".5300.Q ...Q$."N".5520.. ...5
510.. ...10000.. V....!P.. RETURN TO PIK
EM..!Z..CLS$:. 65517.>!..."....LOAD";G(3
4);"PIKEM";G(34);",8.".W!..A$.G(13)."RUN
".G(13)..!...I.1.C(A$):.630.I,F(J(A$,I))
:.:.198,I.1..!.....!.'...!.'. OUTPUT - D
ATA FILE..!.'.CLS$:TV.11:.250..!.'..8)"U
PDATING"YR"SCHEDULE..."..!.'FL$."SCHEDUL
E/Y".I(D(YR),2)..".'.2,8,2,"@0:".FL$.",S
,W".%"$'.2,YR.W".'.X.1.20:.2,D$(X)","S$(
X)","G(34)LN$(X)G(34):..^"V' 2.X"`'.2,8,
2,"@0:COUNT,S,W".."J'.2,CT","YR","TX","B
G","BD.."L' 2:.100..".*...".*. DISPLAY D
ATES.J".+TV.6:.250.V".+.X.1.10.." +..3)D
$(X).22)D$(X.10).."*+..."4+...#|....#...
 INPUT DATES.+#..SP$."      ......".O#..
WL.6:C.0:BE.32:ED.90:TH.11:TV.5.H#...X.1
.20:TV.TV.1:.250..#...211,TH:.300:.C.0.D
$(X).X$..#./.211,TH:.D$(X)"  ";..#./.X.9
.TH.12.C#&/.X.10.TH.31:TV.5.I#0/...#:/TV
.24:.250:..9)"IS THIS CORRECT...Y/N."..#
D/.Q$..$F/.Q$."Y".12120.!$H/.Q$."N".1211
0.,$J/.12100.S$N/..9)"                  
   ":.12000.]$X/.CLS$..$B/.X.1.20:D$(X).
"WEEK".D(X)."--".D$(X):...$L/...$.2...$H
2. CLEAR MIDDLE SCREEN..$R2TV.7:.250.H$.
2.X.1.14..$.2..4)"                      
         "..$.2...$.2...%.6...%.6. DISPL
AY SCHEDULE.:%.6TV.4:.250:..13)D$(W)"   
 ".W%D6TH.1:TV.7:.250:.X.1.NT.2.U%N6V$.T
$(F(J(S$(W),X,1)).64)..%.6H$.T$(F(J(S$(W
),X.1,1)).64)..%.6..5)V$ .19)"@" .22)H$.
.%.7...%.7..A%.:...%.:. FORM FOR CODE IN
PUT..%.:TV.7:.250..%.:.X.1.NT.2..&.:..6)
"GAME"X;.14)"VISITOR     HOME".$&.:..*&T
:..0&V>..A&.>. CLEAR CODE.O&.>TV.7:.250.
[&.>.X.1.14.R&.>..22)"  .......  ".~&.>T
V.TV.1..&.>...&.>...&^B...&HB. DISPLAY C
ODE..&RBTV.7:TH.0:.250.D&|B.X.1.NT.2..&.
BV.F(J(S$(W),X,1)).64:H.F(J(S$(W),X.1,1)
).64..'.B.211,21:.V;:.211,30:.H..'.B...'
.B..!'FF..2'PF. INPUT CODE.T'TF.L.1.28:T
E$(L).J(S$(W),L,1):..C'VFSP$."  .."..'XF
WL.2:BE.48:ED.57:TV.6:TH.0..'ZF.X.1.NT.2
:TV.TV.1:.250.I'DF.211,22:.300:.E(X$).28
.."..   ";:.18020..'NF.C.0.TE$(X).G(E(X$
).64)..(XF.211,21:.F(TE$(X)).64".  ";.1(
.F.211,31:.300:.E(X$).28.."..   ";:.1806
0.O(.F.C.0.TE$(X.1).G(E(X$).64).Q( F.211
,30:.F(TE$(X.1)).64".  ";.W(.F...(HFTV.2
3:.250:..9)"IS THIS CORRECT...Y/N."..(RF
.Q$.D(TF.Q$."Y".Q$."N".18140.O(VF.18130.
.(.F..9)"                     ":.Q$."N".
18008..).FS$(W)."":.L.1.28.)).FS$(W).S$(
W).TE$(L)./).F..Y).FTV.23:.250:..11)"VER
IFYING INPUT....".T).F.600:.ZF.1.ZF.0:.1
8180..).F.700:.DF.1.DF.0:.18180..).F.LC$
:...).G.LC$:.18008..).J...)8J. DATA.J)<J
.PLAY-OFFS..*BJ.DALLAS,PHILADELPHIA,N Y 
GIANTS,WASHINGTON,ST LOUIS.5*LJ.GREEN BA
Y,TAMPA BAY,CHICAGO,DETROIT,MINNESOTA.E*
VJ.SAN FRANCISCO,ATLANTA,L A RAMS,NEW OR
LEANS..*`J.NEW ENGLAND,BUFFALO,MIAMI,N Y
 JETS,INDIANAPOLIS.G*JJ.PITTSBURGH,CINCI
NNATI,CLEVELAND,HOUSTON..*TJ.SAN DIEGO,D
ENVER,SEATTLE,KANSAS CITY,L A RAIDERS..+
FC...+PC. SAVE"@0:INPUTS",8.!+DC....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL