STATS.OVL
FILE INFORMATION
FILENAME(S): STATS.OVL
FILE TYPE(S): PRG
FILE SIZE: 14.5K
FIRST SEEN: 2025-11-30 16:09:54
APPEARS ON: 1 disk(s)
FILE HASH
d30acb3dbef26a8d0b5022d278e4287430b38f8660428f688a2fd2099540a6e9
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ABSOLUT | STATS.OVL | PRG | BrainSkull, Sammlung | 14 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 00 00 8F 22 20 20 20 20 20 20 20 C4 |..)...." .|
00000010: 52 45 41 4D D4 45 41 4D 20 C6 41 4E 54 41 53 59 |REAM.EAM .ANTASY|
00000020: 20 C6 4F 4F 54 42 41 4C 4C 00 50 08 01 00 8F 22 | .OOTBALL.P...."|
00000030: 20 20 20 20 20 20 20 20 C3 4F 4D 4D 4F 44 4F 52 | .OMMODOR|
00000040: 45 20 36 34 20 D6 45 52 53 49 4F 4E 20 31 2E 30 |E 64 .ERSION 1.0|
00000050: 00 76 08 02 00 8F 22 20 20 20 20 20 20 20 20 28 |.v...." (|
00000060: C3 29 31 39 38 39 20 42 59 20 CD C2 C9 20 D3 4F |.)1989 BY ... .O|
00000070: 46 54 57 41 52 45 00 9D 08 03 00 8F 22 20 20 20 |FTWARE......" |
00000080: 20 20 20 20 D3 54 41 54 49 53 54 49 43 53 2F D2 | .TATISTICS/.|
00000090: 45 53 55 4C 54 53 20 CD 4F 44 55 4C 45 00 A3 08 |ESULTS .ODULE...|
000000A0: 04 00 8F 00 C3 08 05 00 97 38 30 38 2C C2 28 32 |.........808,.(2|
000000B0: 35 32 29 3A 20 8F 20 44 49 53 41 42 4C 45 20 53 |52): . DISABLE S|
000000C0: 54 4F 50 00 FE 08 06 00 8B C2 28 38 30 38 29 B1 |TOP.......(808).|
000000D0: 32 30 30 A7 97 34 35 2C C2 28 31 37 34 29 3A 97 |200..45,.(174):.|
000000E0: 34 36 2C C2 28 31 37 35 29 3A 9C 3A 8F 20 43 36 |46,.(175):.:. C6|
000000F0: 34 20 2D 20 45 4E 44 20 4F 46 20 50 52 47 00 24 |4 - END OF PRG.$|
00000100: 09 0A 00 97 35 33 32 38 31 2C 36 3A 97 35 33 32 |....53281,6:.532|
00000110: 38 30 2C 36 3A 99 22 93 96 22 3B C7 28 31 34 29 |80,6:."..";.(14)|
00000120: C7 28 38 29 00 6A 09 0D 00 43 30 24 B2 C7 28 30 |.(8).j...C0$..(0|
00000130: 29 3A 20 43 51 24 B2 C7 28 33 34 29 3A 20 43 53 |): CQ$..(34): CS|
00000140: 24 B2 22 05 12 20 92 9D 22 3A 20 8F 20 5A 45 52 |$.".. ..": . ZER|
00000150: 4F 2C 20 51 55 4F 54 45 2C 20 41 4E 44 20 57 48 |O, QUOTE, AND WH|
00000160: 49 54 45 20 43 55 52 53 4F 52 00 9F 09 0E 00 42 |ITE CURSOR.....B|
00000170: 4C 24 B2 22 20 20 20 20 22 3A 20 55 53 24 B2 22 |L$." ": US$."|
00000180: A3 A3 A3 A3 A3 22 3A 20 43 44 24 B2 22 11 11 11 |.....": CD$."...|
00000190: 11 11 22 3A 20 43 52 24 B2 22 1D 1D 1D 1D 22 00 |..": CR$."....".|
000001A0: E6 09 0F 00 81 20 49 B2 31 A4 33 3A 20 42 4C 24 |..... I.1.3: BL$|
000001B0: B2 42 4C 24 AA 42 4C 24 3A 20 43 52 24 B2 43 52 |.BL$.BL$: CR$.CR|
000001C0: 24 AA 43 52 24 3A 20 82 3A 20 8F 20 33 32 20 42 |$.CR$: .: . 32 B|
000001D0: 4C 41 4E 4B 53 20 41 4E 44 20 43 55 52 53 4F 52 |LANKS AND CURSOR|
000001E0: 20 52 49 47 48 54 00 10 0A 10 00 55 53 24 B2 55 | RIGHT.....US$.U|
000001F0: 53 24 AA 55 53 24 AA 55 53 24 AA 55 53 24 3A 20 |S$.US$.US$.US$: |
00000200: 8F 20 32 30 20 55 4E 44 45 52 53 43 4F 52 45 53 |. 20 UNDERSCORES|
00000210: 00 49 0A 11 00 43 44 24 B2 22 13 11 11 22 AA 43 |.I...CD$."...".C|
00000220: 44 24 AA 43 44 24 AA 43 44 24 AA 43 44 24 3A 20 |D$.CD$.CD$.CD$: |
00000230: 8F 20 48 4F 4D 45 20 41 4E 44 20 32 32 20 43 55 |. HOME AND 22 CU|
00000240: 52 53 4F 52 20 44 4F 57 4E 00 58 0A 28 00 5A B2 |RSOR DOWN.X.(.Z.|
00000250: 31 3A 8D 36 30 30 30 30 00 88 0A 32 00 99 22 13 |1:.60000...2..".|
00000260: 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 9F C4 52 45 |..............RE|
00000270: 41 4D D4 45 41 4D 20 C6 41 4E 54 41 53 59 20 C6 |AM.EAM .ANTASY .|
00000280: 4F 4F 54 42 41 4C 4C 22 00 AD 0A 3C 00 99 22 1D |OOTBALL"...<..".|
00000290: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D D3 54 41 54 49 53 |...........TATIS|
000002A0: 54 49 43 53 2F D2 45 53 55 4C 54 53 22 00 F7 0A |TICS/.ESULTS"...|
000002B0: 6F 00 86 20 54 50 28 32 2C 33 29 2C 4E 4E 24 28 |o.. TP(2,3),NN$(|
000002C0: 33 35 29 2C 4E 41 24 28 33 35 29 2C 50 4C 28 31 |35),NA$(35),PL(1|
000002D0: 30 30 29 2C 50 58 28 33 30 30 29 2C 50 4E 24 28 |00),PX(300),PN$(|
000002E0: 33 30 30 29 2C 53 54 28 33 35 29 2C 50 53 28 39 |300),ST(35),PS(9|
000002F0: 29 2C 46 57 28 38 29 00 1F 0B 70 00 86 20 44 4E |),FW(8)...p.. DN|
00000300: 24 28 31 35 29 2C 54 53 28 31 35 29 2C 4D 4B 24 |$(15),TS(15),MK$|
00000310: 28 31 35 29 2C 53 43 24 28 31 35 2C 31 35 29 00 |(15),SC$(15,15).|
00000320: 5F 0B 71 00 81 20 49 B2 31 A4 31 37 3A 20 53 54 |_.q.. I.1.17: ST|
00000330: 28 49 29 B2 32 31 3A 20 82 3A 20 81 20 49 B2 31 |(I).21: .: . I.1|
00000340: 38 A4 32 34 3A 20 53 54 28 49 29 B2 31 39 3A 20 |8.24: ST(I).19: |
00000350: 82 3A 20 8F 20 53 45 43 54 4F 52 53 2F 54 4B 00 |.: . SECTORS/TK.|
00000360: 92 0B 72 00 81 20 49 B2 32 35 A4 33 30 3A 20 53 |..r.. I.25.30: S|
00000370: 54 28 49 29 B2 31 38 3A 20 82 3A 20 81 20 49 B2 |T(I).18: .: . I.|
00000380: 33 31 A4 33 35 3A 20 53 54 28 49 29 B2 31 37 3A |31.35: ST(I).17:|
00000390: 20 82 00 C9 0B 73 00 81 20 49 B2 30 A4 37 3A 20 | ....s.. I.0.7: |
000003A0: 46 57 28 49 29 B2 32 3A 20 82 3A 20 8F 20 46 49 |FW(I).2: .: . FI|
000003B0: 45 4C 44 20 57 49 44 54 48 53 20 46 4F 52 20 53 |ELD WIDTHS FOR S|
000003C0: 54 41 54 49 53 54 49 43 53 00 F5 0B 74 00 46 57 |TATISTICS...t.FW|
000003D0: 28 31 29 B2 33 3A 46 57 28 33 29 B2 33 3A 46 57 |(1).3:FW(3).3:FW|
000003E0: 28 34 29 B2 34 3A 46 57 28 35 29 B2 34 3A 46 57 |(4).4:FW(5).4:FW|
000003F0: 28 38 29 B2 33 00 26 0C 75 00 50 4F 24 B2 22 D5 |(8).3.&.u.PO$.".|
00000400: CE D1 C2 D4 C5 CB 20 D7 D2 D2 C2 22 3A 20 8F 20 |...... ....": . |
00000410: 50 4F 53 49 54 49 4F 4E 20 41 42 42 52 45 56 49 |POSITION ABBREVI|
00000420: 41 54 49 4F 4E 53 00 59 0C 76 00 51 55 24 B2 C7 |ATIONS.Y.v.QU$..|
00000430: 28 33 34 29 3A 42 41 24 B2 51 55 24 AA 22 5F 22 |(34):BA$.QU$."_"|
00000440: AA 51 55 24 3A 20 8F 20 51 55 4F 54 45 44 20 42 |.QU$: . QUOTED B|
00000450: 41 43 4B 20 41 52 52 4F 57 00 76 0C 77 00 4E 57 |ACK ARROW.v.w.NW|
00000460: B2 31 36 3A 20 8F 20 4E 55 4D 42 45 52 20 4F 46 |.16: . NUMBER OF|
00000470: 20 57 45 45 4B 53 00 86 0C 78 00 8D 36 30 31 30 | WEEKS...x..6010|
00000480: 30 3A 20 5A B2 31 00 BF 0C 82 00 8D 36 30 30 30 |0: Z.1......6000|
00000490: 30 3A 99 C8 28 43 44 24 2C 31 30 29 3B 22 1D 1D |0:..(CD$,10);"..|
000004A0: 1D 1D 1D 1D 9E D0 4C 45 41 53 45 20 C9 4E 53 45 |......LEASE .NSE|
000004B0: 52 54 20 CC 45 41 47 55 45 20 C4 49 53 4B 22 00 |RT .EAGUE .ISK".|
000004C0: D4 0C 8C 00 8D 20 36 30 31 30 30 3A 20 8D 20 36 |..... 60100: . 6|
000004D0: 30 38 30 30 00 14 0D 8E 00 8B 45 B3 B1 30 A7 54 |0800......E..0.T|
000004E0: 45 24 B2 22 1E 1D 1D 1D 1D C5 D2 D2 CF D2 05 20 |E$."........... |
000004F0: 2D 2D 20 C4 49 53 4B 20 49 53 20 4E 4F 54 20 41 |-- .ISK IS NOT A|
00000500: 20 C4 41 54 41 20 C4 49 53 4B 22 3A 5A B2 32 3A | .ATA .ISK":Z.2:|
00000510: 89 31 33 30 00 42 0D C8 00 5A B2 30 3A 54 45 24 |.130.B...Z.0:TE$|
00000520: B2 22 D3 54 41 54 49 53 54 49 43 53 2F D2 45 53 |.".TATISTICS/.ES|
00000530: 55 4C 54 53 20 CD 45 4E 55 22 3A 8D 20 36 30 30 |ULTS .ENU":. 600|
00000540: 30 30 00 6F 0D DC 00 99 22 11 11 11 1D 1D 1D 1D |00.o....".......|
00000550: 1D 1D 9E 31 2E 20 20 C5 4E 54 45 52 20 D7 45 45 |...1. .NTER .EE|
00000560: 4B 4C 59 20 D3 54 41 54 49 53 54 49 43 53 22 00 |KLY .TATISTICS".|
00000570: 8E 0D E6 00 99 22 11 1D 1D 1D 1D 1D 1D 32 2E 20 |.....".......2. |
00000580: 20 D3 48 4F 57 20 D2 45 53 55 4C 54 53 22 00 B4 | .HOW .ESULTS"..|
00000590: 0D F0 00 99 22 11 1D 1D 1D 1D 1D 1D 33 2E 20 20 |....".......3. |
000005A0: D2 45 54 55 52 4E 20 54 4F 20 CD 41 49 4E 20 CD |.ETURN TO .AIN .|
000005B0: 45 4E 55 22 00 CB 0D FA 00 99 22 11 1D 1D 1D 1D |ENU"......".....|
000005C0: 1D 1D 34 2E 20 20 C5 58 49 54 22 00 F6 0D 0E 01 |..4. .XIT".....|
000005D0: 99 22 11 11 1D 1D 1D 1D 1D 1D 1D C5 4E 54 45 52 |."..........NTER|
000005E0: 20 4F 50 54 49 4F 4E 20 4E 55 4D 42 45 52 20 20 | OPTION NUMBER |
000005F0: 28 31 2D 34 29 22 00 17 0E 18 01 A1 58 24 3A 20 |(1-4)"......X$: |
00000600: 8B 20 58 24 B3 22 31 22 20 B0 20 58 24 B1 22 34 |. X$."1" . X$."4|
00000610: 22 20 A7 20 32 38 30 00 33 0E 22 01 91 20 C5 28 |" . 280.3.".. .(|
00000620: 58 24 29 20 89 20 31 30 30 30 2C 31 31 30 30 2C |X$) . 1000,1100,|
00000630: 33 30 30 00 6C 0E 24 01 5A B2 31 3A 8D 36 30 30 |300.l.$.Z.1:.600|
00000640: 30 30 3A 99 22 11 11 11 11 11 1D 1D 1D 1D 05 C5 |00:."...........|
00000650: D8 C9 D4 9E 20 2D 20 C1 52 45 20 59 4F 55 20 53 |.... - .RE YOU S|
00000660: 55 52 45 3F 20 28 D9 2F CE 29 22 3B 00 88 0E 26 |URE? (./.)";...&|
00000670: 01 8D 20 36 32 35 30 30 3A 20 8B 20 58 24 B2 22 |.. 62500: . X$."|
00000680: CE 22 20 A7 20 32 30 30 00 93 0E 28 01 89 36 33 |." . 200...(..63|
00000690: 39 30 30 00 A2 0E 2C 01 5A B2 31 3A 8D 36 30 30 |900...,.Z.1:.600|
000006A0: 30 30 00 CC 0E 36 01 4C 49 B2 31 30 3A 54 43 24 |00...6.LI.10:TC$|
000006B0: B2 22 05 D0 4C 45 41 53 45 20 49 4E 53 45 52 54 |."..LEASE INSERT|
000006C0: 20 54 48 45 22 3A 8D 36 30 31 35 30 00 F4 0E 40 | THE":.60150...@|
000006D0: 01 54 43 24 B2 22 C4 52 45 41 4D D4 45 41 4D 20 |.TC$.".REAM.EAM |
000006E0: D0 52 4F 47 52 41 4D 20 C4 49 53 4B 22 3A 8D 36 |.ROGRAM .ISK":.6|
000006F0: 30 31 36 30 00 23 0F 4A 01 54 43 24 B2 22 41 4E |0160.#.J.TC$."AN|
00000700: 44 20 50 52 45 53 53 20 3C D3 D0 C1 C3 C5 3E 20 |D PRESS <.....> |
00000710: 54 4F 20 43 4F 4E 54 49 4E 55 45 22 3A 8D 36 30 |TO CONTINUE":.60|
00000720: 31 36 30 00 3B 0F 54 01 A1 58 24 3A 8B 20 58 24 |160.;.T..X$:. X$|
00000730: B3 B1 22 20 22 20 A7 20 33 34 30 00 62 0F 5E 01 |.." " . 340.b.^.|
00000740: 54 43 24 B2 22 11 9E CC 4F 41 44 49 4E 47 20 C6 |TC$."...OADING .|
00000750: C6 C2 20 4D 45 4E 55 2E 2E 2E 22 3A 8D 36 30 31 |.. MENU...":.601|
00000760: 36 30 00 9B 0F 68 01 9F 31 2C 38 2C 31 35 3A 9F |60...h..1,8,15:.|
00000770: 32 2C 38 2C 32 2C 22 46 46 42 2E 4D 45 4E 55 2C |2,8,2,"FFB.MENU,|
00000780: 50 2C 52 22 3A 84 31 2C 45 2C 45 24 3A A0 32 3A |P,R":.1,E,E$:.2:|
00000790: A0 31 3A 8B 45 B2 30 A7 33 38 30 00 DA 0F 72 01 |.1:.E.0.380...r.|
000007A0: 5A B2 31 3A 8D 36 30 30 30 30 3A 4C 49 B2 36 3A |Z.1:.60000:LI.6:|
000007B0: 54 43 24 B2 22 1E C5 D2 D2 CF D2 05 20 2D 20 46 |TC$."....... - F|
000007C0: 49 4C 45 20 4E 4F 54 20 46 4F 55 4E 44 22 3A 8D |ILE NOT FOUND":.|
000007D0: 36 30 31 35 30 3A 89 33 31 30 00 05 10 7C 01 97 |60150:.310...|..|
000007E0: 38 30 38 2C C2 28 32 35 31 29 3A 20 9C 3A 20 93 |808,.(251): .: .|
000007F0: 22 46 46 42 2E 4D 45 4E 55 22 2C 38 3A 20 89 20 |"FFB.MENU",8: . |
00000800: 36 33 39 30 30 00 4A 10 E8 03 8D 37 30 30 30 3A |63900.J....7000:|
00000810: 89 32 30 30 3A 8F 20 53 4B 49 50 20 4B 42 44 2F |.200:. SKIP KBD/|
00000820: 44 49 53 4B 20 53 45 4C 45 43 54 49 4F 4E 2C 20 |DISK SELECTION, |
00000830: 47 4F 20 54 4F 20 4B 42 44 20 45 4E 54 52 59 20 |GO TO KBD ENTRY |
00000840: 41 4E 44 20 52 45 54 55 52 4E 00 8E 10 E9 03 8F |AND RETURN......|
00000850: 20 41 42 4F 56 45 20 4C 49 4E 45 20 49 53 20 54 | ABOVE LINE IS T|
00000860: 45 4D 50 4F 52 41 52 59 20 55 4E 54 49 4C 20 44 |EMPORARY UNTIL D|
00000870: 41 54 41 20 44 49 53 4B 20 53 45 43 54 49 4F 4E |ATA DISK SECTION|
00000880: 20 49 53 20 57 4F 52 4B 45 44 20 4F 55 54 00 BB | IS WORKED OUT..|
00000890: 10 EA 03 5A B2 30 3A 54 45 24 B2 22 C5 4E 54 45 |...Z.0:TE$.".NTE|
000008A0: 52 20 D7 45 45 4B 4C 59 20 D3 54 41 54 49 53 54 |R .EEKLY .TATIST|
000008B0: 49 43 53 22 3A 8D 36 30 30 30 30 00 E6 10 F2 03 |ICS":.60000.....|
000008C0: 99 22 11 11 11 11 11 9E 1D 1D 1D 1D 31 2E 20 20 |."..........1. |
000008D0: D4 59 50 45 20 49 4E 20 46 52 4F 4D 20 CB 45 59 |.YPE IN FROM .EY|
000008E0: 42 4F 41 52 44 22 00 0D 11 FC 03 99 22 11 1D 1D |BOARD"......"...|
000008F0: 1D 1D 32 2E 20 20 D2 45 41 44 20 49 4E 20 46 52 |..2. .EAD IN FR|
00000900: 4F 4D 20 C4 41 54 41 20 C4 49 53 4B 22 00 3C 11 |OM .ATA .ISK".<.|
00000910: 06 04 4F 50 24 B2 22 32 22 3A 20 8D 20 36 32 36 |..OP$."2": . 626|
00000920: 30 30 3A 20 91 20 4F 50 20 8D 20 37 30 30 30 3A |00: . OP . 7000:|
00000930: 20 8F 20 2C 3F 3F 3F 3F 3F 3F 3F 3F 00 55 11 10 | . ,????????.U..|
00000940: 04 89 20 32 30 30 3A 20 8E 20 A4 20 4D 41 49 4E |.. 200: . . MAIN|
00000950: 20 4D 45 4E 55 00 86 11 4C 04 5A B2 30 3A 20 54 | MENU...L.Z.0: T|
00000960: 45 24 B2 22 D3 48 4F 57 20 D2 45 53 55 4C 54 53 |E$.".HOW .ESULTS|
00000970: 22 3A 20 8D 20 36 30 30 30 30 3A 20 99 C8 28 43 |": . 60000: ..(C|
00000980: 44 24 2C 31 30 29 00 BE 11 56 04 8D 20 36 32 34 |D$,10)...V.. 624|
00000990: 30 30 3A 20 8B 20 58 24 B2 22 D3 22 20 A7 20 31 |00: . X$."." . 1|
000009A0: 32 30 30 3A 20 8F 20 41 53 4B 20 22 53 43 52 45 |200: . ASK "SCRE|
000009B0: 45 4E 20 4F 52 20 50 52 49 4E 54 45 52 22 00 D2 |EN OR PRINTER"..|
000009C0: 11 60 04 8B 20 58 24 B2 22 D0 22 20 A7 20 31 33 |.`.. X$."." . 13|
000009D0: 30 30 00 0F 12 6A 04 89 20 32 30 30 3A 20 8F 20 |00...j.. 200: . |
000009E0: 41 4E 53 57 45 52 20 57 41 53 20 22 20 22 2C 20 |ANSWER WAS " ", |
000009F0: 49 2E 45 2E 20 22 D0 22 20 42 55 54 20 43 41 4E |I.E. "." BUT CAN|
00000A00: 27 54 20 4F 50 45 4E 20 50 52 49 4E 54 45 52 00 |'T OPEN PRINTER.|
00000A10: 4B 12 B0 04 81 20 54 58 B2 30 20 A4 20 54 50 28 |K.... TX.0 . TP(|
00000A20: 31 2C 30 29 AB 31 3A 20 5A B2 30 3A 20 8D 20 36 |1,0).1: Z.0: . 6|
00000A30: 30 30 30 30 3A 20 99 C8 28 43 44 24 2C 34 29 3A |0000: ..(CD$,4):|
00000A40: 20 54 53 B2 30 3A 20 54 54 B2 30 00 71 12 BA 04 | TS.0: TT.0.q...|
00000A50: 99 C8 28 43 52 24 2C 34 29 3B 22 9E C4 52 45 41 |..(CR$,4);"..REA|
00000A60: 4D D4 45 41 4D 3A 20 05 22 3B 44 4E 24 28 54 58 |M.EAM: .";DN$(TX|
00000A70: 29 00 A7 12 C4 04 8D 20 35 30 33 31 30 3A 20 8B |)...... 50310: .|
00000A80: 20 4E 50 B2 30 20 A7 20 99 22 11 11 11 1D 1D 1D | NP.0 . ."......|
00000A90: 1D 1D 1D 05 CE 4F 20 50 4C 41 59 45 52 53 22 3A |.....O PLAYERS":|
00000AA0: 20 89 20 31 32 35 30 00 CD 12 C6 04 81 20 50 4C | . 1250...... PL|
00000AB0: B2 30 20 A4 20 4E 50 AB 31 3A 20 50 58 B2 50 4C |.0 . NP.1: PX.PL|
00000AC0: 28 50 4C 29 3A 20 8D 20 35 30 35 30 30 00 03 13 |(PL): . 50500...|
00000AD0: CE 04 99 C8 28 43 52 24 2C 36 29 3B 22 9E 22 3B |....(CR$,6);".";|
00000AE0: 50 4E 24 28 50 58 28 50 58 29 29 3B 22 20 20 05 |PN$(PX(PX));" .|
00000AF0: 22 3B 3A 20 8B 20 50 57 B3 B1 57 4B 20 A7 20 31 |";: . PW..WK . 1|
00000B00: 32 33 38 00 39 13 D0 04 8B 20 50 46 B2 31 20 A7 |238.9.... PF.1 .|
00000B10: 20 54 53 B2 54 53 AA 50 53 28 39 29 3A 20 54 54 | TS.TS.PS(9): TT|
00000B20: B2 54 54 AA 50 53 28 39 29 3A 20 99 50 53 28 39 |.TT.PS(9): .PS(9|
00000B30: 29 3A 20 89 20 31 32 34 30 00 6C 13 D2 04 8B 20 |): . 1240.l.... |
00000B40: 50 46 B2 32 20 A7 20 54 54 B2 54 54 AA 50 53 28 |PF.2 . TT.TT.PS(|
00000B50: 39 29 3A 20 99 50 53 28 39 29 3B 22 5B C2 C5 CE |9): .PS(9);"[...|
00000B60: C3 C8 5D 22 3A 20 89 20 31 32 34 30 00 8C 13 D4 |..]": . 1240....|
00000B70: 04 8B 20 50 46 B2 33 20 A7 20 99 22 C9 CE CA D5 |.. PF.3 . ."....|
00000B80: D2 C5 C4 22 3A 20 89 20 31 32 34 30 00 9D 13 D6 |...": . 1240....|
00000B90: 04 99 22 12 CE CF A0 D3 D4 C1 D4 D3 22 00 A6 13 |.."........."...|
00000BA0: D8 04 82 20 50 4C 00 D7 13 DA 04 99 C8 28 43 52 |... PL.......(CR|
00000BB0: 24 2C 34 29 3B 22 9E D4 45 41 4D 20 53 43 4F 52 |$,4);"..EAM SCOR|
00000BC0: 45 20 2D 20 41 43 54 49 56 45 20 50 4C 41 59 45 |E - ACTIVE PLAYE|
00000BD0: 52 53 05 22 3B 54 53 00 08 14 DC 04 99 C8 28 43 |RS.";TS.......(C|
00000BE0: 52 24 2C 34 29 3B 22 9E 20 20 C1 44 44 20 42 45 |R$,4);". .DD BE|
00000BF0: 4E 43 48 20 28 46 4F 52 20 54 49 45 2D 42 52 45 |NCH (FOR TIE-BRE|
00000C00: 41 4B 29 05 22 3B 54 54 00 22 14 E2 04 8D 20 36 |AK).";TT.".... 6|
00000C10: 30 31 30 30 3A 20 82 20 54 58 3A 20 89 20 31 34 |0100: . TX: . 14|
00000C20: 30 30 00 56 14 14 05 5A B2 30 3A 20 8D 36 30 30 |00.V...Z.0: .600|
00000C30: 30 30 3A 20 4C 49 B2 31 30 3A 20 54 43 24 B2 22 |00: LI.10: TC$."|
00000C40: 9E D0 52 49 4E 54 49 4E 47 2E 2E 2E 22 3A 20 8D |..RINTING...": .|
00000C50: 20 36 30 31 35 30 00 96 14 16 05 4C B2 36 37 3A | 60150.....L.67:|
00000C60: 20 81 20 54 58 B2 30 20 A4 20 54 50 28 31 2C 30 | . TX.0 . TP(1,0|
00000C70: 29 AB 31 3A 20 8B 20 4C B1 36 30 20 A7 20 8D 20 |).1: . L.60 . . |
00000C80: 31 33 36 30 3A 20 8F 20 43 48 45 43 4B 20 50 41 |1360: . CHECK PA|
00000C90: 47 45 20 45 4E 44 00 BD 14 1E 05 98 34 2C C8 28 |GE END......4,.(|
00000CA0: 42 4C 24 2C 31 32 29 3B 44 4E 24 28 54 58 29 3A |BL$,12);DN$(TX):|
00000CB0: 20 98 34 2C 22 22 3A 20 4C B2 4C AA 31 00 F6 14 | .4,"": L.L.1...|
00000CC0: 28 05 8D 20 35 30 33 31 30 3A 20 8B 20 4E 50 B2 |(.. 50310: . NP.|
00000CD0: 30 20 A7 20 98 34 2C C8 28 42 4C 24 2C 31 34 29 |0 . .4,.(BL$,14)|
00000CE0: 3B 22 CE 4F 20 50 4C 41 59 45 52 53 2E 22 3A 20 |;".O PLAYERS.": |
00000CF0: 89 20 31 33 35 30 00 2D 15 2A 05 81 20 50 4C B2 |. 1350.-.*.. PL.|
00000D00: 30 20 A4 20 4E 50 AB 31 3A 20 50 58 B2 50 4C 28 |0 . NP.1: PX.PL(|
00000D10: 50 4C 29 3A 20 8D 20 35 30 35 30 30 3A 20 8B 20 |PL): . 50500: . |
00000D20: 4C B1 36 30 20 A7 20 8D 20 31 33 36 30 00 61 15 |L.60 . . 1360.a.|
00000D30: 32 05 98 34 2C C8 28 42 4C 24 2C 31 34 29 3B 50 |2..4,.(BL$,14);P|
00000D40: 4E 24 28 50 58 28 50 58 29 29 3B 22 20 20 22 3B |N$(PX(PX));" ";|
00000D50: 3A 20 8B 20 50 57 B3 B1 57 4B 20 A7 20 31 33 33 |: . PW..WK . 133|
00000D60: 38 00 99 15 34 05 8B 20 50 46 B2 31 20 A7 20 54 |8...4.. PF.1 . T|
00000D70: 53 B2 54 53 AA 50 53 28 39 29 3A 20 54 54 B2 54 |S.TS.PS(9): TT.T|
00000D80: 54 AA 50 53 28 39 29 3A 20 98 34 2C 50 53 28 39 |T.PS(9): .4,PS(9|
00000D90: 29 3A 20 89 20 31 33 34 30 00 CE 15 36 05 8B 20 |): . 1340...6.. |
00000DA0: 50 46 B2 32 20 A7 20 54 54 B2 54 54 AA 50 53 28 |PF.2 . TT.TT.PS(|
00000DB0: 39 29 3A 20 98 34 2C 50 53 28 39 29 3B 22 5B C2 |9): .4,PS(9);"[.|
00000DC0: C5 CE C3 C8 5D 22 3A 20 89 20 31 33 34 30 00 F8 |....]": . 1340..|
00000DD0: 15 38 05 8B 20 50 46 B2 33 20 A7 20 98 34 2C 22 |.8.. PF.3 . .4,"|
00000DE0: C9 CE CA D5 D2 C5 C4 20 D2 C5 D3 C5 D2 D6 C5 22 |....... ......."|
00000DF0: 3A 20 89 20 31 33 34 30 00 12 16 3A 05 98 34 2C |: . 1340...:..4,|
00000E00: 22 CE CF A0 D3 D4 C1 D4 D3 A0 C5 CE D4 C5 D2 C5 |"...............|
00000E10: C4 22 00 22 16 3C 05 4C B2 4C AA 31 3A 20 82 20 |.".".<.L.L.1: . |
00000E20: 50 4C 00 5A 16 3E 05 98 34 2C C8 28 42 4C 24 2C |PL.Z.>..4,.(BL$,|
00000E30: 31 32 29 3B 22 D4 45 41 4D 20 53 43 4F 52 45 20 |12);".EAM SCORE |
00000E40: 2D 20 41 43 54 49 56 45 20 50 4C 41 59 45 52 53 |- ACTIVE PLAYERS|
00000E50: 20 4F 4E 4C 59 3A 22 3B 54 53 00 99 16 40 05 98 | ONLY:";TS...@..|
00000E60: 34 2C C8 28 42 4C 24 2C 31 32 29 3B 22 20 20 C1 |4,.(BL$,12);" .|
00000E70: 43 54 49 56 45 20 2B 20 42 45 4E 43 48 20 28 46 |CTIVE + BENCH (F|
00000E80: 4F 52 20 54 49 45 2D 42 52 45 41 4B 29 3A 22 3B |OR TIE-BREAK):";|
00000E90: 54 54 3A 20 4C B2 4C AA 32 00 CF 16 46 05 98 34 |TT: L.L.2...F..4|
00000EA0: 2C 22 22 3A 20 4C B2 4C AA 32 3A 20 82 20 54 58 |,"": L.L.2: . TX|
00000EB0: 3A 20 8D 20 36 32 37 32 30 3A 20 89 20 31 34 30 |: . 62720: . 140|
00000EC0: 30 3A 20 8F 20 43 4C 4F 53 45 20 50 52 54 52 00 |0: . CLOSE PRTR.|
00000ED0: 03 17 50 05 8D 20 36 32 37 30 30 3A 20 98 34 2C |..P.. 62700: .4,|
00000EE0: C8 28 42 4C 24 2C 31 30 29 3B 22 D4 45 41 4D 20 |.(BL$,10);".EAM |
00000EF0: D3 43 4F 52 45 53 22 3A 20 8F 20 4E 45 57 20 50 |.CORES": . NEW P|
00000F00: 41 47 45 00 33 17 5A 05 98 34 2C C8 28 42 4C 24 |AGE.3.Z..4,.(BL$|
00000F10: 2C 31 30 29 3B 3A 20 81 20 49 B2 31 A4 36 3A 20 |,10);: . I.1.6: |
00000F20: 98 34 2C 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 3B |.4,"==========";|
00000F30: 3A 20 82 00 4E 17 64 05 98 34 2C 22 22 3A 20 98 |: ..N.d..4,"": .|
00000F40: 34 2C 22 22 3A 20 4C B2 4C AA 33 3A 20 8E 00 6A |4,"": L.L.3: ..j|
00000F50: 17 78 05 5A B2 30 3A 20 8D 20 36 30 30 30 30 3A |.x.Z.0: . 60000:|
00000F60: 20 99 C8 28 43 44 24 2C 36 29 00 8E 17 82 05 99 | ..(CD$,6)......|
00000F70: 22 1D 1D 1D 1D 1D 9E C1 52 45 20 59 4F 55 20 44 |".......RE YOU D|
00000F80: 4F 4E 45 20 57 49 54 48 20 54 48 49 53 22 00 CE |ONE WITH THIS"..|
00000F90: 17 84 05 99 22 1D 1D 1D 1D 1D 57 45 45 4B 27 53 |....".....WEEK'S|
00000FA0: 20 53 54 41 54 49 53 54 49 43 53 3F 20 28 D9 2F | STATISTICS? (./|
00000FB0: CE 29 20 22 3B 3A 20 8D 20 36 32 35 30 30 3A 20 |.) ";: . 62500: |
00000FC0: 8B 20 58 24 B2 22 CE 22 20 A7 20 32 30 30 00 EA |. X$."." . 200..|
00000FD0: 17 8C 05 57 4B B2 57 4B AA 31 3A 20 8B 20 57 4B |...WK.WK.1: . WK|
00000FE0: B2 4E 57 20 A7 20 31 34 34 30 00 11 18 96 05 99 |.NW . 1440......|
00000FF0: 22 11 1D 1D 1D 1D 1D 9E D4 48 45 20 4E 45 58 54 |"........HE NEXT|
00001000: 20 57 45 45 4B 20 49 53 20 23 05 22 3B 57 4B AA | WEEK IS #.";WK.|
00001010: 31 00 52 18 98 05 99 22 1D 1D 1D 1D 1D D0 49 43 |1.R...."......IC|
00001020: 4B 20 41 20 44 49 46 46 45 52 45 4E 54 20 4F 4E |K A DIFFERENT ON|
00001030: 45 3F 20 28 D9 2F CE 29 20 22 3B 3A 8D 36 32 35 |E? (./.) ";:.625|
00001040: 30 30 3A 8B 20 58 24 B2 22 CE 22 20 A7 20 31 34 |00:. X$."." . 14|
00001050: 36 30 00 5D 18 9A 05 89 20 31 34 35 30 00 82 18 |60.].... 1450...|
00001060: A0 05 99 22 11 1D 1D 1D 1D 1D 9E D4 48 41 54 20 |..."........HAT |
00001070: 57 41 53 20 54 48 45 20 4C 41 53 54 20 57 45 45 |WAS THE LAST WEE|
00001080: 4B 22 00 A6 18 A2 05 99 22 1D 1D 1D 1D 1D 4F 46 |K"......".....OF|
00001090: 20 54 48 45 20 53 45 41 53 4F 4E 21 20 20 C7 4F | THE SEASON! .O|
000010A0: 20 42 41 43 4B 22 00 E7 18 A4 05 99 22 1D 1D 1D | BACK"......"...|
000010B0: 1D 1D 54 4F 20 41 4E 20 45 41 52 4C 49 45 52 20 |..TO AN EARLIER |
000010C0: 4F 4E 45 3F 20 28 D9 2F CE 29 20 22 3B 3A 20 8D |ONE? (./.) ";: .|
000010D0: 20 36 32 35 30 30 3A 20 8B 20 58 24 B2 22 CE 22 | 62500: . X$."."|
000010E0: 20 A7 20 31 34 36 30 00 1A 19 AA 05 99 22 11 1D | . 1460......"..|
000010F0: 1D 1D 1D 1D 9E CE 45 57 20 57 45 45 4B 20 23 20 |......EW WEEK # |
00001100: 28 31 2D 22 3B C9 28 C4 28 4E 57 29 2C 32 29 3B |(1-";.(.(NW),2);|
00001110: 22 29 3A 20 22 3B 43 53 24 3B 00 4A 19 AC 05 4C |"): ";CS$;.J...L|
00001120: 45 B2 32 3A 20 8D 20 36 30 32 30 30 3A 20 8B 20 |E.2: . 60200: . |
00001130: C5 28 59 24 29 B1 30 20 AF 20 C5 28 59 24 29 B3 |.(Y$).0 . .(Y$).|
00001140: B2 4E 57 20 A7 20 31 34 36 30 00 5D 19 AE 05 99 |.NW . 1460.]....|
00001150: 22 91 91 22 3B 3A 20 89 20 31 34 35 30 00 6C 19 |"..";: . 1450.l.|
00001160: B0 05 57 4B B2 C5 28 59 24 29 AB 31 00 A2 19 B4 |..WK..(Y$).1....|
00001170: 05 8D 20 35 30 30 30 30 3A 20 89 20 32 30 30 3A |.. 50000: . 200:|
00001180: 20 8F 20 53 41 56 45 20 4E 45 57 20 57 45 45 4B | . SAVE NEW WEEK|
00001190: 20 23 2C 20 52 45 54 55 52 4E 20 54 4F 20 4D 45 | #, RETURN TO ME|
000011A0: 4E 55 00 BD 19 58 1B 54 45 24 B2 22 C5 4E 54 45 |NU...X.TE$.".NTE|
000011B0: 52 20 D3 54 41 54 49 53 54 49 43 53 22 00 FD 19 |R .TATISTICS"...|
000011C0: 62 1B 5A B2 30 3A 8D 36 30 30 30 30 3A 8D 35 30 |b.Z.0:.60000:.50|
000011D0: 36 30 30 3A 8B 50 58 B3 4E 50 A7 37 30 33 30 3A |600:.PX.NP.7030:|
000011E0: 20 8F 20 47 45 54 20 41 4E 44 20 56 45 52 49 46 | . GET AND VERIF|
000011F0: 59 20 50 4C 41 59 45 52 20 4E 41 4D 45 00 20 1A |Y PLAYER NAME. .|
00001200: 6C 1B 99 C8 28 43 52 24 2C 34 29 3B 22 11 1E D0 |l...(CR$,4);"...|
00001210: 4C 41 59 45 52 20 4E 4F 54 20 46 4F 55 4E 44 22 |LAYER NOT FOUND"|
00001220: 00 42 1A 6E 1B 99 C8 28 43 52 24 2C 34 29 3B 22 |.B.n...(CR$,4);"|
00001230: 9E D4 52 59 20 41 47 41 49 4E 3F 20 28 D9 2F CE |..RY AGAIN? (./.|
00001240: 29 22 00 65 1A 70 1B A1 20 58 24 3A 20 8B 20 58 |)".e.p.. X$: . X|
00001250: 24 B2 22 59 22 20 B0 20 58 24 B2 22 D9 22 20 A7 |$."Y" . X$."." .|
00001260: 20 37 30 31 30 00 84 1A 72 1B 8B 20 58 24 B3 B1 | 7010...r.. X$..|
00001270: 22 4E 22 20 AF 20 58 24 B3 B1 22 CE 22 20 A7 20 |"N" . X$.."." . |
00001280: 37 30 32 34 00 A8 1A 76 1B 8B 20 50 4E 24 B2 22 |7024...v.. PN$."|
00001290: 22 20 A7 20 8E 3A 20 8F 20 4E 4F 20 50 4C 41 59 |" . .: . NO PLAY|
000012A0: 45 52 20 47 49 56 45 4E 00 E7 1A 80 1B 54 45 24 |ER GIVEN.....TE$|
000012B0: B2 50 4E 24 28 50 58 29 3A 20 5A B2 30 3A 20 8D |.PN$(PX): Z.0: .|
000012C0: 20 36 30 30 30 30 3A 20 8D 20 35 30 35 30 30 3A | 60000: . 50500:|
000012D0: 20 8D 20 35 31 38 30 30 3A 20 50 44 24 B2 58 24 | . 51800: PD$.X$|
000012E0: 3A 20 58 24 B2 22 22 00 08 1B 8A 1B 57 58 B2 39 |: X$."".....WX.9|
000012F0: 39 3A 20 46 58 B2 39 39 3A 20 8D 20 35 32 30 30 |9: FX.99: . 5200|
00001300: 30 3A 20 99 22 12 22 3B 00 46 1B 94 1B 54 43 24 |0: .".";.F...TC$|
00001310: B2 22 C3 D2 D3 D2 20 CB 45 59 53 20 54 4F 20 CD |.".... .EYS TO .|
00001320: 4F 56 45 20 4F 52 20 22 AA 42 41 24 AA 22 20 54 |OVE OR ".BA$." T|
00001330: 4F 20 45 4E 44 22 3A 20 4C 49 B2 32 33 3A 20 8D |O END": LI.23: .|
00001340: 20 36 30 31 35 30 00 73 1B 9E 1B 57 58 B2 57 4B | 60150.s...WX.WK|
00001350: 3A 20 46 58 B2 30 3A 20 89 20 35 32 32 30 30 3A |: FX.0: . 52200:|
00001360: 20 8F 20 57 52 49 54 45 20 41 4E 44 20 52 45 54 | . WRITE AND RET|
00001370: 55 52 4E 00 A6 1B 50 C3 58 24 B2 22 22 3A 81 20 |URN...P.X$."":. |
00001380: 49 B2 30 A4 31 3A 20 81 20 4A B2 30 A4 33 3A 20 |I.0.1: . J.0.3: |
00001390: 58 24 B2 58 24 AA C7 28 54 50 28 49 2C 4A 29 29 |X$.X$..(TP(I,J))|
000013A0: 3A 82 20 4A 2C 49 00 E5 1B 5A C3 58 B2 54 50 28 |:. J,I...Z.X.TP(|
000013B0: 32 2C 30 29 3A 20 59 24 B2 C7 28 58 AD 32 35 36 |2,0): Y$..(X.256|
000013C0: AA 2E 30 30 31 29 AA C7 28 58 AF 32 35 35 29 AA |..001)..(X.255).|
000013D0: C7 28 54 50 28 32 2C 31 29 29 AA C7 28 54 50 28 |.(TP(2,1))..(TP(|
000013E0: 32 2C 32 29 29 00 19 1C 64 C3 58 B2 54 50 28 32 |2,2))...d.X.TP(2|
000013F0: 2C 33 29 3A 20 59 24 B2 59 24 AA C7 28 58 AD 32 |,3): Y$.Y$..(X.2|
00001400: 35 36 AA 2E 30 30 31 29 AA C7 28 58 20 AF 20 32 |56..001)..(X . 2|
00001410: 35 35 29 AA C7 28 50 53 29 00 4E 1C 6E C3 58 24 |55)..(PS).N.n.X$|
00001420: B2 4C 4E 24 AA 58 24 AA 59 24 AA C7 28 50 44 28 |.LN$.X$.Y$..(PD(|
00001430: 30 29 29 AA C7 28 50 44 28 31 29 29 AA C7 28 53 |0))..(PD(1))..(S|
00001440: 4F 29 AA C7 28 49 52 29 AA C7 28 57 4B 29 00 95 |O)..(IR)..(WK)..|
00001450: 1C 78 C3 54 4B B2 31 3A 20 53 52 B2 30 3A 20 42 |.x.TK.1: SR.0: B|
00001460: 54 B2 30 3A 20 4C 4E B2 34 30 3A 20 89 20 36 33 |T.0: LN.40: . 63|
00001470: 33 30 30 3A 20 8F 20 57 52 49 54 45 20 4C 45 41 |300: . WRITE LEA|
00001480: 47 55 45 20 53 45 43 54 4F 52 20 41 4E 44 20 52 |GUE SECTOR AND R|
00001490: 45 54 55 52 4E 00 D0 1C B4 C3 54 4B B2 31 3A 20 |ETURN.....TK.1: |
000014A0: 53 52 B2 30 3A 20 42 54 B2 30 3A 20 4C 4E B2 34 |SR.0: BT.0: LN.4|
000014B0: 30 3A 20 8D 20 36 33 32 30 30 3A 20 8F 20 52 45 |0: . 63200: . RE|
000014C0: 41 44 20 4C 45 41 47 55 45 20 53 45 43 54 4F 52 |AD LEAGUE SECTOR|
000014D0: 00 F3 1C BE C3 4C 4E 24 B2 C8 28 58 24 2C 32 30 |.....LN$..(X$,20|
000014E0: 29 3A 20 50 53 B2 C6 28 CA 28 58 24 2C 33 35 2C |): PS..(.(X$,35,|
000014F0: 31 29 29 00 20 1D C8 C3 50 44 28 30 29 B2 C6 28 |1)). ...PD(0)..(|
00001500: CA 28 58 24 2C 33 36 2C 31 29 29 3A 20 50 44 28 |.(X$,36,1)): PD(|
00001510: 31 29 B2 C6 28 CA 28 58 24 2C 33 37 2C 31 29 29 |1)..(.(X$,37,1))|
00001520: 00 47 1D D2 C3 53 4F B2 C6 28 CA 28 58 24 2C 33 |.G...SO..(.(X$,3|
00001530: 38 2C 31 29 29 3A 20 49 52 B2 C6 28 CA 28 58 24 |8,1)): IR..(.(X$|
00001540: 2C 33 39 2C 31 29 29 00 6C 1D DC C3 57 4B B2 C6 |,39,1)).l...WK..|
00001550: 28 CA 28 58 24 2C 34 30 2C 31 29 29 3A 20 58 24 |(.(X$,40,1)): X$|
00001560: B2 CA 28 58 24 2C 32 31 2C 31 34 29 00 AA 1D E6 |..(X$,21,14)....|
00001570: C3 58 B2 31 3A 20 81 20 49 B2 30 A4 31 3A 20 81 |.X.1: . I.0.1: .|
00001580: 20 4A B2 30 A4 33 3A 20 54 50 28 49 2C 4A 29 B2 | J.0.3: TP(I,J).|
00001590: C6 28 CA 28 58 24 2C 58 2C 31 29 29 3A 20 58 B2 |.(.(X$,X,1)): X.|
000015A0: 58 AA 31 3A 20 82 20 4A 2C 49 00 DD 1D F0 C3 54 |X.1: . J,I.....T|
000015B0: 50 28 32 2C 30 29 B2 C6 28 CA 28 58 24 2C 58 2C |P(2,0)..(.(X$,X,|
000015C0: 31 29 29 AC 32 35 36 AA C6 28 CA 28 58 24 2C 58 |1)).256..(.(X$,X|
000015D0: AA 31 2C 31 29 29 3A 20 58 B2 58 AA 32 00 1A 1E |.1,1)): X.X.2...|
000015E0: FA C3 54 50 28 32 2C 31 29 B2 C6 28 CA 28 58 24 |..TP(2,1)..(.(X$|
000015F0: 2C 58 2C 31 29 29 3A 20 58 B2 58 AA 31 3A 20 54 |,X,1)): X.X.1: T|
00001600: 50 28 32 2C 32 29 B2 C6 28 CA 28 58 24 2C 58 2C |P(2,2)..(.(X$,X,|
00001610: 31 29 29 3A 20 58 B2 58 AA 31 00 49 1E 04 C4 54 |1)): X.X.1.I...T|
00001620: 50 28 32 2C 33 29 B2 C6 28 CA 28 58 24 2C 58 2C |P(2,3)..(.(X$,X,|
00001630: 31 29 29 AC 32 35 36 AA C6 28 CA 28 58 24 2C 58 |1)).256..(.(X$,X|
00001640: AA 31 2C 31 29 29 3A 20 8E 00 87 1E 18 C4 54 4B |.1,1)): ......TK|
00001650: B2 54 50 28 30 2C 31 29 3A 20 53 52 B2 54 50 28 |.TP(0,1): SR.TP(|
00001660: 30 2C 32 29 3A 20 54 4E 24 B2 4E 4E 24 28 54 58 |0,2): TN$.NN$(TX|
00001670: 29 3A 20 41 42 24 B2 4E 41 24 28 54 58 29 3A 20 |): AB$.NA$(TX): |
00001680: 89 20 35 30 32 32 30 00 BD 1E 22 C4 54 4B B2 54 |. 50220...".TK.T|
00001690: 50 28 31 2C 31 29 3A 20 53 52 B2 54 50 28 31 2C |P(1,1): SR.TP(1,|
000016A0: 32 29 3A 20 54 4E 24 B2 44 4E 24 28 54 58 29 3A |2): TN$.DN$(TX):|
000016B0: 20 41 42 24 B2 C8 28 42 4C 24 2C 34 29 00 E5 1E | AB$..(BL$,4)...|
000016C0: 2C C4 49 58 B2 54 58 3A 20 8D 20 36 33 38 30 30 |,.IX.TX: . 63800|
000016D0: 3A 20 8F 20 47 45 54 20 52 49 47 48 54 20 54 4B |: . GET RIGHT TK|
000016E0: 20 26 20 53 52 00 1D 1F 36 C4 58 24 B2 22 22 3A | & SR...6.X$."":|
000016F0: 20 81 20 49 B2 30 A4 31 35 3A 20 58 24 B2 58 24 | . I.0.15: X$.X$|
00001700: AA C7 28 54 53 28 49 29 AD 32 35 36 29 AA C7 28 |..(TS(I).256)..(|
00001710: 54 53 28 49 29 AF 32 35 35 29 3A 20 82 00 3A 1F |TS(I).255): ..:.|
00001720: 40 C4 59 24 B2 C7 28 4E 50 29 3A 20 8B 20 4E 50 |@.Y$..(NP): . NP|
00001730: B2 30 20 A7 20 35 30 32 36 30 00 6D 1F 4A C4 81 |.0 . 50260.m.J..|
00001740: 20 49 B2 30 A4 4E 50 AB 31 3A 20 59 24 B2 59 24 | I.0.NP.1: Y$.Y$|
00001750: AA C7 28 50 4C 28 49 29 AD 32 35 36 29 AA C7 28 |..(PL(I).256)..(|
00001760: 50 4C 28 49 29 AF 32 35 35 29 3A 20 82 00 94 1F |PL(I).255): ....|
00001770: 54 C4 58 24 B2 54 4E 24 AA 41 42 24 AA C7 28 54 |T.X$.TN$.AB$..(T|
00001780: 58 29 AA C7 28 41 50 29 AA C7 28 44 56 29 AA 58 |X)..(AP)..(DV).X|
00001790: 24 AA 59 24 00 C4 1F 5E C4 42 54 B2 30 3A 20 4C |$.Y$...^.BT.0: L|
000017A0: 4E B2 C3 28 58 24 29 3A 20 89 20 36 33 33 30 30 |N..(X$): . 63300|
000017B0: 3A 20 8F 20 57 52 49 54 45 20 41 4E 44 20 52 45 |: . WRITE AND RE|
000017C0: 54 55 52 4E 00 01 20 7C C4 54 4B B2 54 50 28 30 |TURN.. |.TK.TP(0|
000017D0: 2C 31 29 3A 20 53 52 B2 54 50 28 30 2C 32 29 3A |,1): SR.TP(0,2):|
000017E0: 20 89 20 35 30 33 32 30 20 3A 20 8F 20 52 45 41 | . 50320 : . REA|
000017F0: 44 20 50 52 4F 20 54 45 41 4D 20 53 45 43 54 4F |D PRO TEAM SECTO|
00001800: 52 00 2A 20 86 C4 54 4B B2 54 50 28 31 2C 31 29 |R.* ..TK.TP(1,1)|
00001810: 3A 20 53 52 B2 54 50 28 31 2C 32 29 3A 20 8F 20 |: SR.TP(1,2): . |
00001820: 44 52 45 41 4D 20 54 45 41 4D 00 52 20 90 C4 49 |DREAM TEAM.R ..I|
00001830: 58 B2 54 58 3A 20 8D 20 36 33 38 30 30 3A 20 8F |X.TX: . 63800: .|
00001840: 20 47 45 54 20 52 49 47 48 54 20 54 4B 20 26 20 | GET RIGHT TK & |
00001850: 53 52 00 82 20 95 C4 4C 4E B2 36 30 3A 20 8B 20 |SR.. ..LN.60: . |
00001860: 53 48 B2 31 20 A7 20 4C 4E B2 32 34 3A 20 8F 20 |SH.1 . LN.24: . |
00001870: 43 48 45 43 4B 20 22 53 48 4F 52 54 22 20 46 4C |CHECK "SHORT" FL|
00001880: 41 47 00 AB 20 9A C4 42 54 B2 30 3A 20 8D 20 36 |AG.. ..BT.0: . 6|
00001890: 33 32 30 30 3A 20 8F 20 52 41 57 20 54 45 41 4D |3200: . RAW TEAM|
000018A0: 20 44 41 54 41 20 54 4F 20 58 24 00 CE 20 A4 C4 | DATA TO X$.. ..|
000018B0: 54 4E 24 B2 CA 28 58 24 2C 31 2C 32 30 29 3A 20 |TN$..(X$,1,20): |
000018C0: 41 42 24 B2 CA 28 58 24 2C 32 31 2C 34 29 00 F3 |AB$..(X$,21,4)..|
000018D0: 20 A9 C4 8B 20 53 48 B2 31 20 A7 20 8E 3A 20 8F | ... SH.1 . .: .|
000018E0: 20 53 48 4F 52 54 20 52 45 41 44 20 49 53 20 44 | SHORT READ IS D|
000018F0: 4F 4E 45 00 1A 21 AE C4 41 50 B2 C6 28 CA 28 58 |ONE..!..AP..(.(X|
00001900: 24 2C 32 36 2C 31 29 29 3A 20 44 56 B2 C6 28 CA |$,26,1)): DV..(.|
00001910: 28 58 24 2C 32 37 2C 31 29 29 00 54 21 B8 C4 4A |(X$,27,1)).T!..J|
00001920: B2 32 38 3A 20 81 20 49 B2 30 A4 31 35 3A 20 54 |.28: . I.0.15: T|
00001930: 53 28 49 29 B2 32 35 36 AC C6 28 CA 28 58 24 2C |S(I).256..(.(X$,|
00001940: 4A 2C 31 29 29 AA C6 28 CA 28 58 24 2C 4A AA 31 |J,1))..(.(X$,J.1|
00001950: 2C 31 29 29 00 61 21 BD C4 4A B2 4A AA 32 3A 20 |,1)).a!..J.J.2: |
00001960: 82 00 8C 21 C2 C4 4E 50 B2 C6 28 CA 28 58 24 2C |...!..NP..(.(X$,|
00001970: 36 30 2C 31 29 29 3A 20 8B 20 4E 50 B2 30 20 A7 |60,1)): . NP.0 .|
00001980: 20 8E 3A 20 8F 20 45 4C 53 45 20 2D 00 A8 21 CC | .: . ELSE -..!.|
00001990: C4 42 54 B2 36 30 3A 20 4C 4E B2 32 AC 4E 50 3A |.BT.60: LN.2.NP:|
000019A0: 20 8D 20 36 33 32 30 30 00 E3 21 D6 C4 4A B2 31 | . 63200..!..J.1|
000019B0: 3A 20 81 20 49 B2 30 A4 4E 50 AB 31 3A 20 50 4C |: . I.0.NP.1: PL|
000019C0: 28 49 29 B2 32 35 36 AC C6 28 CA 28 58 24 2C 4A |(I).256..(.(X$,J|
000019D0: 2C 31 29 29 AA C6 28 CA 28 58 24 2C 4A AA 31 2C |,1))..(.(X$,J.1,|
000019E0: 31 29 29 00 F3 21 DB C4 4A B2 4A AA 32 3A 20 82 |1))..!..J.J.2: .|
000019F0: 3A 20 8E 00 3A 22 E0 C4 54 4B B2 50 44 28 30 29 |: ..:"..TK.PD(0)|
00001A00: 3A 20 53 52 B2 50 44 28 31 29 3A 20 49 58 B2 50 |: SR.PD(1): IX.P|
00001A10: 58 28 50 58 29 3A 20 8D 20 36 33 38 30 30 3A 20 |X(PX): . 63800: |
00001A20: 8F 20 43 4F 52 52 20 54 4B 2F 53 52 20 46 4F 52 |. CORR TK/SR FOR|
00001A30: 20 50 4C 59 52 20 44 41 54 41 00 77 22 EA C4 58 | PLYR DATA.w"..X|
00001A40: 24 B2 C7 28 49 58 AD 32 35 36 29 AA C7 28 49 58 |$..(IX.256)..(IX|
00001A50: AF 32 35 35 29 3A 20 8F 20 4C 49 53 54 20 49 44 |.255): . LIST ID|
00001A60: 58 20 26 20 28 46 4F 52 20 4E 4F 57 29 20 41 4C |X & (FOR NOW) AL|
00001A70: 50 48 41 20 50 54 52 00 B3 22 F4 C4 58 24 B2 50 |PHA PTR.."..X$.P|
00001A80: 4E 24 28 49 58 29 AA 58 24 AA 58 24 AA C7 28 54 |N$(IX).X$.X$..(T|
00001A90: 4B 29 AA C7 28 53 52 29 AA C7 28 50 46 29 AA C7 |K)..(SR)..(PF)..|
00001AA0: 28 50 4F 29 AA C7 28 50 57 29 AA C7 28 50 53 28 |(PO)..(PW)..(PS(|
00001AB0: 39 29 29 00 EF 22 FE C4 54 4B B2 54 50 28 32 2C |9)).."..TK.TP(2,|
00001AC0: 31 29 3A 20 53 52 B2 54 50 28 32 2C 32 29 3A 20 |1): SR.TP(2,2): |
00001AD0: 8D 20 36 33 38 31 30 3A 20 8F 20 43 4F 52 52 45 |. 63810: . CORRE|
00001AE0: 43 54 20 54 4B 2F 53 52 20 41 4E 44 20 49 58 00 |CT TK/SR AND IX.|
00001AF0: 28 23 08 C5 42 54 B2 33 32 AC 49 58 3A 20 4C 4E |(#..BT.32.IX: LN|
00001B00: B2 33 30 3A 20 89 20 36 33 33 30 30 3A 20 8F 20 |.30: . 63300: . |
00001B10: 57 52 49 54 45 20 54 4F 20 44 49 53 4B 20 41 4E |WRITE TO DISK AN|
00001B20: 44 20 52 45 54 55 52 4E 00 69 23 44 C5 54 4B B2 |D RETURN.i#D.TK.|
00001B30: 54 50 28 32 2C 31 29 3A 20 53 52 B2 54 50 28 32 |TP(2,1): SR.TP(2|
00001B40: 2C 32 29 3A 20 49 58 B2 50 58 28 50 58 29 3A 20 |,2): IX.PX(PX): |
00001B50: 8D 20 36 33 38 31 30 3A 20 8F 20 43 4F 52 52 20 |. 63810: . CORR |
00001B60: 54 4B 2F 53 52 2C 20 49 58 00 97 23 4E C5 42 54 |TK/SR, IX..#N.BT|
00001B70: B2 33 32 AC 49 58 3A 20 4C 4E B2 33 30 3A 20 8D |.32.IX: LN.30: .|
00001B80: 20 36 33 32 30 30 3A 20 8F 20 4F 50 45 4E 20 41 | 63200: . OPEN A|
00001B90: 4E 44 20 52 45 41 44 00 D4 23 58 C5 50 4E 24 28 |ND READ..#X.PN$(|
00001BA0: 50 58 28 50 58 29 29 B2 C8 28 58 24 2C 32 30 29 |PX(PX))..(X$,20)|
00001BB0: 3A 20 50 46 B2 C6 28 CA 28 58 24 2C 32 37 2C 31 |: PF..(.(X$,27,1|
00001BC0: 29 29 3A 20 50 4F B2 C6 28 CA 28 58 24 2C 32 38 |)): PO..(.(X$,28|
00001BD0: 2C 31 29 29 00 01 24 62 C5 50 57 B2 C6 28 CA 28 |,1))..$b.PW..(.(|
00001BE0: 58 24 2C 32 39 2C 31 29 29 3A 20 50 53 28 39 29 |X$,29,1)): PS(9)|
00001BF0: B2 C6 28 CA 28 58 24 2C 33 30 2C 31 29 29 3A 20 |..(.(X$,30,1)): |
00001C00: 8E 00 2E 24 A8 C5 4C 45 B2 32 30 3A 20 99 C8 28 |...$..LE.20: ..(|
00001C10: 43 44 24 2C 38 29 3B C8 28 43 52 24 2C 34 29 3B |CD$,8);.(CR$,4);|
00001C20: 22 9E D0 4C 41 59 45 52 20 4E 41 4D 45 22 00 47 |"..LAYER NAME".G|
00001C30: 24 B2 C5 99 C8 28 43 52 24 2C 31 36 29 3B C8 28 |$....(CR$,16);.(|
00001C40: 55 53 24 2C 4C 45 29 00 74 24 B4 C5 99 22 91 91 |US$,LE).t$..."..|
00001C50: 22 3B C8 28 43 52 24 2C 31 36 29 3B 43 53 24 3B |";.(CR$,16);CS$;|
00001C60: 3A 20 8D 20 36 30 32 30 30 3A 20 50 4E 24 B2 59 |: . 60200: PN$.Y|
00001C70: 24 3A 20 99 00 A5 24 B6 C5 8B 20 50 4E 24 B2 C8 |$: ...$... PN$..|
00001C80: 28 42 4C 24 2C 4C 45 29 20 A7 20 50 4E 24 B2 22 |(BL$,LE) . PN$."|
00001C90: 22 3A 20 8E 3A 20 8F 20 4E 4F 20 4E 41 4D 45 20 |": .: . NO NAME |
00001CA0: 47 49 56 45 4E 00 BA 24 BC C5 50 58 B2 30 3A 20 |GIVEN..$..PX.0: |
00001CB0: 4E 50 B2 54 50 28 32 2C 30 29 00 E0 24 C6 C5 8B |NP.TP(2,0)..$...|
00001CC0: 20 50 58 B1 B2 4E 50 20 A7 20 50 4E 24 B2 22 22 | PX..NP . PN$.""|
00001CD0: 3A 20 8E 3A 20 8F 20 4E 4F 54 20 46 4F 55 4E 44 |: .: . NOT FOUND|
00001CE0: 00 21 25 D0 C5 8B 20 50 4E 24 28 50 58 28 50 58 |.!%... PN$(PX(PX|
00001CF0: 29 29 B2 22 22 20 A7 20 8D 20 35 30 35 30 30 3A |))."" . . 50500:|
00001D00: 20 8F 20 47 45 54 20 50 4C 41 59 45 52 20 46 52 | . GET PLAYER FR|
00001D10: 4F 4D 20 44 49 53 4B 20 49 46 20 4E 45 45 44 45 |OM DISK IF NEEDE|
00001D20: 44 00 44 25 DA C5 8B 20 50 4E 24 B2 50 4E 24 28 |D.D%... PN$.PN$(|
00001D30: 50 58 28 50 58 29 29 20 A7 20 8E 3A 20 8F 20 46 |PX(PX)) . .: . F|
00001D40: 4F 55 4E 44 00 59 25 E4 C5 50 58 B2 50 58 AA 31 |OUND.Y%..PX.PX.1|
00001D50: 3A 20 89 20 35 30 36 33 30 00 96 25 0C C6 4C 45 |: . 50630..%..LE|
00001D60: B2 34 3A 20 99 C8 28 43 44 24 2C 31 30 29 3B C8 |.4: ..(CD$,10);.|
00001D70: 28 43 52 24 2C 34 29 3B 22 9E D4 45 41 4D 20 41 |(CR$,4);"..EAM A|
00001D80: 42 42 52 45 56 49 41 54 49 4F 4E 20 20 20 20 20 |BBREVIATION |
00001D90: 20 20 20 20 20 22 00 AF 25 16 C6 99 C8 28 43 52 | "..%....(CR|
00001DA0: 24 2C 32 35 29 3B C8 28 55 53 24 2C 4C 45 29 00 |$,25);.(US$,LE).|
00001DB0: DC 25 18 C6 99 22 91 91 22 3B C8 28 43 52 24 2C |.%..."..";.(CR$,|
00001DC0: 32 35 29 3B 43 53 24 3B 3A 20 8D 20 36 30 32 30 |25);CS$;: . 6020|
00001DD0: 30 3A 20 41 42 24 B2 59 24 3A 20 99 00 0D 26 1A |0: AB$.Y$: ...&.|
00001DE0: C6 8B 20 41 42 24 B2 C8 28 42 4C 24 2C 4C 45 29 |.. AB$..(BL$,LE)|
00001DF0: 20 A7 20 41 42 24 B2 22 22 3A 20 8E 3A 20 8F 20 | . AB$."": .: . |
00001E00: 4E 4F 20 54 45 41 4D 20 47 49 56 45 4E 00 22 26 |NO TEAM GIVEN."&|
00001E10: 20 C6 54 58 B2 30 3A 20 4E 54 B2 54 50 28 30 2C | .TX.0: NT.TP(0,|
00001E20: 30 29 00 48 26 2A C6 8B 20 54 58 B1 B2 4E 54 20 |0).H&*.. TX..NT |
00001E30: A7 20 41 42 24 B2 22 22 3A 20 8E 3A 20 8F 20 4E |. AB$."": .: . N|
00001E40: 4F 54 20 46 4F 55 4E 44 00 67 26 34 C6 8B 20 41 |OT FOUND.g&4.. A|
00001E50: 42 24 B2 4E 41 24 28 54 58 29 20 A7 20 8E 3A 20 |B$.NA$(TX) . .: |
00001E60: 8F 20 46 4F 55 4E 44 00 7C 26 3E C6 54 58 B2 54 |. FOUND.|&>.TX.T|
00001E70: 58 AA 31 3A 20 89 20 35 30 37 33 30 00 C3 26 70 |X.1: . 50730..&p|
00001E80: C6 54 4B B2 50 44 28 30 29 3A 20 53 52 B2 50 44 |.TK.PD(0): SR.PD|
00001E90: 28 31 29 3A 20 49 58 B2 50 58 28 50 58 29 3A 20 |(1): IX.PX(PX): |
00001EA0: 8D 20 36 33 38 30 30 3A 20 8F 20 43 4F 52 52 20 |. 63800: . CORR |
00001EB0: 54 4B 2F 53 52 20 46 4F 52 20 50 4C 59 52 20 44 |TK/SR FOR PLYR D|
00001EC0: 41 54 41 00 E9 26 7A C6 58 24 B2 22 22 3A 20 81 |ATA..&z.X$."": .|
00001ED0: 20 49 B2 30 A4 33 3A 20 58 24 B2 58 24 AA C7 28 | I.0.3: X$.X$..(|
00001EE0: 50 53 28 49 29 29 3A 20 82 00 19 27 7C C6 81 20 |PS(I)): ...'|.. |
00001EF0: 49 B2 34 A4 35 3A 20 58 24 B2 58 24 AA C7 28 50 |I.4.5: X$.X$..(P|
00001F00: 53 28 49 29 AD 32 35 36 29 AA C7 28 50 53 28 49 |S(I).256)..(PS(I|
00001F10: 29 AF 32 35 35 29 3A 20 82 00 38 27 7E C6 81 20 |).255): ..8'~.. |
00001F20: 49 B2 36 A4 38 3A 20 58 24 B2 58 24 AA C7 28 50 |I.6.8: X$.X$..(P|
00001F30: 53 28 49 29 29 3A 20 82 00 54 27 84 C6 58 24 B2 |S(I)): ..T'..X$.|
00001F40: C7 28 4E 58 29 AA C7 28 44 58 29 AA C7 28 50 4F |.(NX)..(DX)..(PO|
00001F50: 29 AA 58 24 00 85 27 8E C6 42 54 B2 57 4B AC 31 |).X$..'..BT.WK.1|
00001F60: 36 3A 20 4C 4E B2 31 36 3A 20 89 20 36 33 33 30 |6: LN.16: . 6330|
00001F70: 30 3A 20 8F 20 57 52 49 54 45 20 41 4E 44 20 52 |0: . WRITE AND R|
00001F80: 45 54 55 52 4E 00 CC 27 D4 C6 54 4B B2 50 44 28 |ETURN..'..TK.PD(|
00001F90: 30 29 3A 20 53 52 B2 50 44 28 31 29 3A 20 49 58 |0): SR.PD(1): IX|
00001FA0: B2 50 58 28 50 58 29 3A 20 8D 20 36 33 38 30 30 |.PX(PX): . 63800|
00001FB0: 3A 20 8F 20 43 4F 52 52 20 54 4B 2F 53 52 20 46 |: . CORR TK/SR F|
00001FC0: 4F 52 20 50 4C 59 52 20 44 41 54 41 00 02 28 DE |OR PLYR DATA..(.|
00001FD0: C6 42 54 B2 57 4B AC 31 36 3A 20 4C 4E B2 31 36 |.BT.WK.16: LN.16|
00001FE0: 3A 20 8D 20 36 33 32 30 30 3A 20 8F 20 47 45 54 |: . 63200: . GET|
00001FF0: 20 50 4C 41 59 45 52 20 44 41 54 41 20 49 4E 20 | PLAYER DATA IN |
00002000: 58 24 00 38 28 E8 C6 4E 58 B2 C6 28 CA 28 58 24 |X$.8(..NX..(.(X$|
00002010: 2C 31 2C 31 29 29 3A 20 44 58 B2 C6 28 CA 28 58 |,1,1)): DX..(.(X|
00002020: 24 2C 32 2C 31 29 29 3A 20 50 4F B2 C6 28 CA 28 |$,2,1)): PO..(.(|
00002030: 58 24 2C 33 2C 31 29 29 00 67 28 F2 C6 4A B2 34 |X$,3,1)).g(..J.4|
00002040: 3A 20 81 20 49 B2 30 A4 33 3A 20 50 53 28 49 29 |: . I.0.3: PS(I)|
00002050: B2 C6 28 CA 28 58 24 2C 4A 2C 31 29 29 3A 20 4A |..(.(X$,J,1)): J|
00002060: B2 4A AA 31 3A 20 82 00 A4 28 F4 C6 81 20 49 B2 |.J.1: ...(... I.|
00002070: 34 A4 35 3A 20 50 53 28 49 29 B2 C6 28 CA 28 58 |4.5: PS(I)..(.(X|
00002080: 24 2C 4A 2C 31 29 29 AC 32 35 36 AA C6 28 CA 28 |$,J,1)).256..(.(|
00002090: 58 24 2C 4A AA 31 2C 31 29 29 3A 20 4A B2 4A AA |X$,J.1,1)): J.J.|
000020A0: 31 3A 20 82 00 CE 28 F6 C6 81 20 49 B2 36 A4 38 |1: ...(... I.6.8|
000020B0: 3A 20 50 53 28 49 29 B2 C6 28 CA 28 58 24 2C 4A |: PS(I)..(.(X$,J|
000020C0: 2C 31 29 29 3A 20 4A B2 4A AA 31 3A 20 82 00 D4 |,1)): J.J.1: ...|
000020D0: 28 FC C6 8E 00 EF 28 F4 C9 54 45 24 B2 22 D3 45 |(.....(..TE$.".E|
000020E0: 4C 45 43 54 20 C4 52 45 41 4D D4 45 41 4D 22 00 |LECT .REAM.EAM".|
000020F0: 00 29 FE C9 5A B2 30 3A 20 8D 20 36 30 30 30 30 |.)..Z.0: . 60000|
00002100: 00 22 29 08 CA 99 C8 28 43 44 24 2C 34 29 3A 20 |.")....(CD$,4): |
00002110: 81 20 54 58 B2 30 20 A4 20 54 50 28 31 2C 30 29 |. TX.0 . TP(1,0)|
00002120: AB 31 00 51 29 12 CA 99 C8 28 43 52 24 2C 36 29 |.1.Q)....(CR$,6)|
00002130: 3B 22 05 22 3B C9 28 C4 28 54 58 AA 31 29 2C 32 |;".";.(.(TX.1),2|
00002140: 29 3B 22 20 9E 22 3B 44 4E 24 28 54 58 29 3A 20 |);" .";DN$(TX): |
00002150: 82 00 85 29 1C CA 99 C8 28 43 52 24 2C 34 29 3B |...)....(CR$,4);|
00002160: 22 11 9E C5 4E 54 45 52 20 4E 55 4D 42 45 52 20 |"...NTER NUMBER |
00002170: 20 22 3B 43 53 24 3B 3A 20 4C 45 B2 32 3A 20 8D | ";CS$;: LE.2: .|
00002180: 36 30 32 30 30 00 BB 29 1E CA 54 58 B2 C5 28 59 |60200..)..TX..(Y|
00002190: 24 29 AB 31 3A 20 8B 20 54 58 B3 30 20 B0 20 54 |$).1: . TX.0 . T|
000021A0: 58 B1 B2 54 50 28 31 2C 30 29 20 A7 20 99 22 91 |X..TP(1,0) . .".|
000021B0: 91 22 3A 20 89 20 35 31 37 34 30 00 D7 29 20 CA |.": . 51740..) .|
000021C0: 99 22 91 22 3A 99 C8 28 43 52 24 2C 31 38 29 3B |.".":..(CR$,18);|
000021D0: 44 4E 24 28 54 58 29 00 01 2A 26 CA 99 C8 28 43 |DN$(TX)..*&...(C|
000021E0: 52 24 2C 34 29 3B 22 9E C9 53 20 54 48 49 53 20 |R$,4);"..S THIS |
000021F0: 43 4F 52 52 45 43 54 3F 20 28 D9 2F CE 29 20 22 |CORRECT? (./.) "|
00002200: 3B 00 2C 2A 30 CA 8D 20 36 32 35 30 30 3A 20 8B |;.,*0.. 62500: .|
00002210: 20 58 24 B2 22 CE 22 20 A7 20 35 31 37 31 30 3A | X$."." . 51710:|
00002220: 20 8F 20 54 52 59 20 41 47 41 49 4E 00 32 2A 3A | . TRY AGAIN.2*:|
00002230: CA 8E 00 79 2A 58 CA 54 4B B2 50 44 28 30 29 3A |...y*X.TK.PD(0):|
00002240: 20 53 52 B2 50 44 28 31 29 3A 20 49 58 B2 50 58 | SR.PD(1): IX.PX|
00002250: 28 50 58 29 3A 20 8D 20 36 33 38 30 30 3A 20 8F |(PX): . 63800: .|
00002260: 20 43 4F 52 52 20 54 4B 2F 53 52 20 46 4F 52 20 | CORR TK/SR FOR |
00002270: 50 4C 59 52 20 44 41 54 41 00 B7 2A 62 CA 42 54 |PLYR DATA..*b.BT|
00002280: B2 30 3A 20 4C 4E B2 32 35 34 3A 20 89 20 36 33 |.0: LN.254: . 63|
00002290: 32 30 30 3A 20 8F 20 47 45 54 20 50 4C 41 59 45 |200: . GET PLAYE|
000022A0: 52 20 44 41 54 41 20 49 4E 20 58 24 20 41 4E 44 |R DATA IN X$ AND|
000022B0: 20 52 45 54 55 52 4E 00 CF 2A 20 CB 99 C8 28 43 | RETURN..* ...(C|
000022C0: 44 24 2C 34 29 3B C8 28 43 52 24 2C 35 29 3B 00 |D$,4);.(CR$,5);.|
000022D0: F8 2A 2A CB 99 22 96 12 57 4B 1D 50 4F 1D 54 1D |.**.."..WK.PO.T.|
000022E0: 59 54 1D 50 1D 59 50 1D 1D 59 47 1D 1D 59 50 1D |YT.P.YP..YG..YP.|
000022F0: 58 1D 46 1D 59 46 9E 22 00 13 2B 34 CB 81 57 B2 |X.F.YF."..+4..W.|
00002300: 30 A4 31 35 3A 20 8D 20 35 32 31 30 30 3A 20 82 |0.15: . 52100: .|
00002310: 3A 20 8E 00 3D 2B 84 CB 49 B2 57 AC 31 36 3A 99 |: ..=+..I.W.16:.|
00002320: C8 28 43 52 24 2C 35 29 3B 22 9E 22 3B C9 28 22 |.(CR$,5);".";.("|
00002330: 20 22 AA C4 28 57 AA 31 29 2C 32 29 3B 00 50 2B | "..(W.1),2);.P+|
00002340: 86 CB 8B 20 57 B1 57 4B 20 A7 20 35 32 31 33 30 |... W.WK . 52130|
00002350: 00 8A 2B 8E CB 49 B2 49 AA 33 3A 20 50 4F B2 C6 |..+..I.I.3: PO..|
00002360: 28 CA 28 50 44 24 2C 49 2C 31 29 29 3A 20 99 22 |(.(PD$,I,1)): ."|
00002370: 20 22 3B CA 28 50 4F 24 2C 31 AA 32 AC 50 4F 2C | ";.(PO$,1.2.PO,|
00002380: 32 29 3B 3A 20 49 B2 49 AA 31 00 C0 2B 98 CB 81 |2);: I.I.1..+...|
00002390: 20 4A B2 30 A4 38 3A 20 46 57 B2 46 57 28 4A 29 | J.0.8: FW.FW(J)|
000023A0: 3A 20 99 22 9E 22 3B 3A 20 8B 20 57 B2 57 58 20 |: .".";: . W.WX |
000023B0: A7 20 8B 20 46 58 B2 4A 20 A7 20 99 22 05 22 3B |. . FX.J . .".";|
000023C0: 00 ED 2B 9A CB 8B 20 46 57 B3 34 20 A7 20 58 B2 |..+... FW.4 . X.|
000023D0: C6 28 CA 28 50 44 24 2C 49 2C 31 29 29 3A 20 49 |.(.(PD$,I,1)): I|
000023E0: B2 49 AA 31 3A 20 89 20 35 32 31 32 36 00 1C 2C |.I.1: . 52126..,|
000023F0: 9C CB 58 B2 C6 28 CA 28 50 44 24 2C 49 2C 31 29 |..X..(.(PD$,I,1)|
00002400: 29 AC 32 35 36 AA C6 28 CA 28 50 44 24 2C 49 AA |).256..(.(PD$,I.|
00002410: 31 2C 31 29 29 3A 20 49 B2 49 AA 32 00 5F 2C 9E |1,1)): I.I.2._,.|
00002420: CB 8B 20 50 57 B1 4E 57 20 B0 20 50 57 B3 57 20 |.. PW.NW . PW.W |
00002430: A7 20 58 B2 30 3A 20 8F 20 31 53 54 20 43 52 41 |. X.0: . 1ST CRA|
00002440: 43 4B 20 41 54 20 54 48 49 53 20 57 45 45 4B 20 |CK AT THIS WEEK |
00002450: 46 4F 52 20 54 48 49 53 20 50 4C 41 59 45 52 00 |FOR THIS PLAYER.|
00002460: 79 2C A0 CB 8D 20 36 32 38 30 30 3A 20 50 53 28 |y,... 62800: PS(|
00002470: 4A 29 B2 58 3A 20 82 20 4A 00 82 2C A2 CB 99 3A |J).X: . J..,...:|
00002480: 20 8E 00 B5 2C B6 CB 99 C8 28 43 52 24 2C 35 29 | ...,....(CR$,5)|
00002490: 3B 22 9E 22 3B C9 28 22 20 22 AA C4 28 57 AA 31 |;".";.(" "..(W.1|
000024A0: 29 2C 32 29 3B 3A 20 8B 20 57 B1 57 4B 20 A7 20 |),2);: . W.WK . |
000024B0: 35 32 31 38 30 00 CF 2C C0 CB 99 22 20 22 3B CA |52180..,..." ";.|
000024C0: 28 50 4F 24 2C 31 AA 32 AC 50 4F 2C 32 29 3B 00 |(PO$,1.2.PO,2);.|
000024D0: 05 2D CA CB 81 20 4A B2 30 A4 38 3A 20 46 57 B2 |.-... J.0.8: FW.|
000024E0: 46 57 28 4A 29 3A 20 99 22 9E 22 3B 3A 20 8B 20 |FW(J): .".";: . |
000024F0: 57 B2 57 58 20 A7 20 8B 20 46 58 B2 4A 20 A7 20 |W.WX . . FX.J . |
00002500: 99 22 05 22 3B 00 1F 2D CC CB 58 B2 50 53 28 4A |.".";..-..X.PS(J|
00002510: 29 3A 20 8D 20 36 32 38 30 30 3A 20 82 20 4A 00 |): . 62800: . J.|
00002520: 28 2D D4 CB 99 3A 20 8E 00 51 2D E8 CB 99 C8 28 |(-...: ..Q-....(|
00002530: 43 44 24 2C 57 58 AA 34 29 3A 20 57 B2 57 58 3A |CD$,WX.4): W.WX:|
00002540: 20 8D 20 35 32 31 35 30 3A 20 8D 20 35 32 33 30 | . 52150: . 5230|
00002550: 30 00 6D 2D EA CB 99 C8 28 43 44 24 2C 32 31 29 |0.m-....(CD$,21)|
00002560: 3B C8 28 43 52 24 2C 34 29 3B 42 4C 24 00 A1 2D |;.(CR$,4);BL$..-|
00002570: EC CB 99 C8 28 43 44 24 2C 32 31 29 3B C8 28 43 |....(CD$,21);.(C|
00002580: 52 24 2C 34 29 3B 22 9E D0 4F 49 4E 54 53 20 54 |R$,4);"..OINTS T|
00002590: 48 49 53 20 57 45 45 4B 3A 05 22 3B 50 53 28 39 |HIS WEEK:.";PS(9|
000025A0: 29 00 BD 2D EE CB 99 C8 28 43 44 24 2C 32 32 29 |)..-....(CD$,22)|
000025B0: 3B C8 28 43 52 24 2C 34 29 3B 42 4C 24 00 DA 2D |;.(CR$,4);BL$..-|
000025C0: F0 CB 99 C8 28 43 44 24 2C 32 32 29 3B C8 28 43 |....(CD$,22);.(C|
000025D0: 52 24 2C 34 29 3B 22 05 22 3B 00 21 2E F2 CB 91 |R$,4);".";.!....|
000025E0: 46 58 AA 31 89 35 32 32 31 31 2C 35 32 32 31 32 |FX.1.52211,52212|
000025F0: 2C 35 32 32 31 33 2C 35 32 32 31 34 2C 35 32 32 |,52213,52214,522|
00002600: 31 35 2C 35 32 32 31 36 2C 35 32 32 31 37 2C 35 |15,52216,52217,5|
00002610: 32 32 31 38 2C 35 32 32 31 39 3A 89 35 32 32 34 |2218,52219:.5224|
00002620: 30 00 43 2E F3 CB 99 22 D4 4F 55 43 48 44 4F 57 |0.C....".OUCHDOW|
00002630: 4E 53 20 53 43 4F 52 45 44 22 3B 3A 20 89 35 32 |NS SCORED";: .52|
00002640: 32 32 30 00 68 2E F4 CB 99 22 C1 56 45 52 41 47 |220.h....".VERAG|
00002650: 45 20 59 41 52 44 53 20 50 45 52 20 D4 C4 22 3B |E YARDS PER ..";|
00002660: 3A 20 89 35 32 32 32 30 00 89 2E F5 CB 99 22 D4 |: .52220......".|
00002670: C4 20 50 41 53 53 45 53 20 54 48 52 4F 57 4E 22 |. PASSES THROWN"|
00002680: 3B 3A 20 89 35 32 32 32 30 00 AD 2E F6 CB 99 22 |;: .52220......"|
00002690: C1 56 47 20 59 44 53 20 50 45 52 20 D4 C4 20 50 |.VG YDS PER .. P|
000026A0: 41 53 53 22 3B 3A 20 89 35 32 32 32 30 00 D0 2E |ASS";: .52220...|
000026B0: F7 CB 99 22 D4 4F 54 41 4C 20 59 41 52 44 53 20 |...".OTAL YARDS |
000026C0: 47 41 49 4E 45 44 22 3B 3A 20 89 35 32 32 32 30 |GAINED";: .52220|
000026D0: 00 F3 2E F8 CB 99 22 D4 4F 54 41 4C 20 59 41 52 |......".OTAL YAR|
000026E0: 44 53 20 50 41 53 53 45 44 22 3B 3A 20 89 35 32 |DS PASSED";: .52|
000026F0: 32 32 30 00 17 2F F9 CB 99 22 C5 58 54 52 41 20 |220../...".XTRA |
00002700: 50 4F 49 4E 54 53 20 53 43 4F 52 45 44 22 3B 3A |POINTS SCORED";:|
00002710: 20 89 35 32 32 32 30 00 3A 2F FA CB 99 22 C6 49 | .52220.:/...".I|
00002720: 45 4C 44 20 47 4F 41 4C 53 20 53 43 4F 52 45 44 |ELD GOALS SCORED|
00002730: 22 3B 3A 20 89 35 32 32 32 30 00 57 2F FB CB 99 |";: .52220.W/...|
00002740: 22 C1 56 45 52 41 47 45 20 59 41 52 44 53 20 50 |".VERAGE YARDS P|
00002750: 45 52 20 C6 C7 22 3B 00 8F 2F FC CB 99 22 3A 20 |ER ..";../...": |
00002760: 22 3B 43 53 24 3B 3A 4C 45 B2 46 57 28 46 58 29 |";CS$;:LE.FW(FX)|
00002770: 3A 8D 36 30 33 30 30 3A 46 B2 46 58 3A 46 58 B2 |:.60300:F.FX:FX.|
00002780: AB 31 3A 8B 59 24 B2 22 22 A7 35 32 32 30 30 00 |.1:.Y$."".52200.|
00002790: B5 2F 06 CC 50 53 28 46 29 B2 C5 28 59 24 29 3A |./..PS(F)..(Y$):|
000027A0: 20 89 20 35 32 32 30 30 3A 20 8F 20 4E 45 57 20 | . 52200: . NEW |
000027B0: 56 41 4C 55 45 00 DA 2F 10 CC 46 58 B2 46 3A 20 |VALUE../..FX.F: |
000027C0: 91 20 59 20 89 20 35 32 32 34 32 2C 35 32 32 34 |. Y . 52242,5224|
000027D0: 34 3A 20 89 20 35 32 32 35 30 00 05 30 12 CC 46 |4: . 52250..0..F|
000027E0: 58 B2 46 58 AA 31 3A 20 8B 20 46 58 B1 38 20 A7 |X.FX.1: . FX.8 .|
000027F0: 20 46 58 B2 30 3A 20 8F 20 43 55 52 53 4F 52 20 | FX.0: . CURSOR |
00002800: 52 49 47 48 54 00 11 30 13 CC 89 20 35 32 32 30 |RIGHT..0... 5220|
00002810: 30 00 3B 30 14 CC 46 58 B2 46 58 AB 31 3A 20 8B |0.;0..FX.FX.1: .|
00002820: 20 46 58 B3 30 20 A7 20 46 58 B2 38 3A 20 8F 20 | FX.0 . FX.8: . |
00002830: 43 55 52 53 4F 52 20 4C 45 46 54 00 47 30 15 CC |CURSOR LEFT.G0..|
00002840: 89 20 35 32 32 30 30 00 65 30 1A CC 5A B2 30 3A |. 52200.e0..Z.0:|
00002850: 20 8D 20 36 30 30 30 30 3A 20 99 C8 28 43 44 24 | . 60000: ..(CD$|
00002860: 2C 31 30 29 3B 00 93 30 1C CC 99 C8 28 43 52 24 |,10);..0....(CR$|
00002870: 2C 35 29 3B 22 9E C4 4F 20 59 4F 55 20 57 41 4E |,5);"..O YOU WAN|
00002880: 54 20 54 48 45 53 45 20 53 54 41 54 49 53 54 49 |T THESE STATISTI|
00002890: 43 53 22 00 C1 30 1E CC 99 C8 28 43 52 24 2C 35 |CS"..0....(CR$,5|
000028A0: 29 3B 22 11 57 52 49 54 54 45 4E 20 54 4F 20 54 |);".WRITTEN TO T|
000028B0: 48 45 20 44 49 53 4B 3F 20 28 D9 2F CE 29 20 22 |HE DISK? (./.) "|
000028C0: 3B 00 F1 30 20 CC 8D 20 36 32 35 30 30 3A 20 8B |;..0 .. 62500: .|
000028D0: 20 58 24 B2 22 D9 22 20 A7 20 50 57 B2 57 58 3A | X$."." . PW.WX:|
000028E0: 20 8D 20 35 30 34 30 30 3A 20 8D 20 35 30 38 30 | . 50400: . 5080|
000028F0: 30 00 F7 30 24 CC 8E 00 1D 31 4C CC 50 53 28 39 |0..0$....1L.PS(9|
00002900: 29 B2 30 3A 20 91 20 28 53 4F 20 AF 20 33 29 20 |).0: . (SO . 3) |
00002910: 89 20 35 32 33 30 34 2C 35 32 33 30 36 00 5B 31 |. 52304,52306.[1|
00002920: 4E CC 50 53 28 39 29 B2 50 53 28 39 29 20 AA 20 |N.PS(9).PS(9) . |
00002930: 50 53 28 30 29 AC 36 20 AA 20 50 53 28 32 29 AC |PS(0).6 . PS(2).|
00002940: 33 3A 20 89 20 35 32 33 31 30 3A 20 8F 20 42 41 |3: . 52310: . BA|
00002950: 53 49 43 20 53 43 4F 52 49 4E 47 00 9C 31 50 CC |SIC SCORING..1P.|
00002960: 50 53 28 39 29 B2 50 53 28 39 29 20 AA 20 B5 28 |PS(9).PS(9) . .(|
00002970: 50 53 28 34 29 AD 31 30 20 AA 20 50 53 28 35 29 |PS(4).10 . PS(5)|
00002980: AD 32 30 20 AA 20 2E 30 30 31 29 3A 20 89 20 35 |.20 . .001): . 5|
00002990: 32 33 31 30 3A 20 8F 20 50 45 52 46 00 DB 31 52 |2310: . PERF..1R|
000029A0: CC 8B 20 50 53 28 30 29 B1 30 20 A7 20 50 53 28 |.. PS(0).0 . PS(|
000029B0: 39 29 B2 50 53 28 39 29 20 AA 20 B5 28 50 53 28 |9).PS(9) . .(PS(|
000029C0: 30 29 AC 28 50 53 28 31 29 AD 35 AA 32 2E 30 30 |0).(PS(1).5.2.00|
000029D0: 31 29 29 3A 20 8F 20 44 49 53 54 00 1A 32 54 CC |1)): . DIST..2T.|
000029E0: 8B 20 50 53 28 32 29 B1 30 20 A7 20 50 53 28 39 |. PS(2).0 . PS(9|
000029F0: 29 B2 50 53 28 39 29 20 AA 20 B5 28 50 53 28 32 |).PS(9) . .(PS(2|
00002A00: 29 AC 28 50 53 28 33 29 AD 35 AA 32 2E 30 30 31 |).(PS(3).5.2.001|
00002A10: 29 29 3A 20 8F 20 44 49 53 54 00 5C 32 56 CC 50 |)): . DIST.\2V.P|
00002A20: 53 28 39 29 B2 50 53 28 39 29 20 AA 20 50 53 28 |S(9).PS(9) . PS(|
00002A30: 36 29 3A 20 91 20 28 53 4F 20 AF 20 34 29 20 89 |6): . (SO . 4) .|
00002A40: 20 35 32 33 31 34 3A 20 8F 20 4B 49 43 4B 45 52 | 52314: . KICKER|
00002A50: 20 2D 20 45 58 54 52 41 20 50 54 53 00 9B 32 58 | - EXTRA PTS..2X|
00002A60: CC 50 53 28 39 29 B2 50 53 28 39 29 20 AA 20 50 |.PS(9).PS(9) . P|
00002A70: 53 28 37 29 AC 33 3A 20 89 20 35 32 33 32 30 3A |S(7).3: . 52320:|
00002A80: 20 8F 20 42 41 53 49 43 20 4B 49 43 4B 45 52 20 | . BASIC KICKER |
00002A90: 46 49 45 4C 44 20 47 4F 41 4C 53 00 DB 32 5A CC |FIELD GOALS..2Z.|
00002AA0: 8B 20 50 53 28 37 29 B1 30 20 A7 20 50 53 28 39 |. PS(7).0 . PS(9|
00002AB0: 29 B2 50 53 28 39 29 20 AA 20 B5 28 50 53 28 37 |).PS(9) . .(PS(7|
00002AC0: 29 AC 28 50 53 28 38 29 AD 31 30 AA 31 2E 30 30 |).(PS(8).10.1.00|
00002AD0: 31 29 29 3A 20 8F 20 44 49 53 54 00 E1 32 60 CC |1)): . DIST..2`.|
00002AE0: 8E 00 14 33 60 EA 99 22 93 96 20 12 AC A2 A2 A2 |...3`..".. .....|
00002AF0: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00002B00: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00002B10: A2 BB 22 3B 00 36 33 6A EA 81 58 B2 31 A4 32 32 |..";.63j..X.1.22|
00002B20: 3A 99 22 11 9D 12 A1 92 22 3B 3A 82 3A 99 22 9D |:.".....";:.:.".|
00002B30: 11 12 BE 92 22 3B 00 68 33 74 EA 81 58 B2 31 A4 |....";.h3t..X.1.|
00002B40: 33 36 3A 99 22 9D 9D A2 22 3B 3A 82 3A 99 22 9D |36:."...";:.:.".|
00002B50: 9D 12 BC 92 22 3B 3A 81 58 B2 31 A4 32 32 3A 99 |....";:.X.1.22:.|
00002B60: 22 91 9D A1 22 3B 3A 82 00 A3 33 7E EA 8B 5A B2 |"...";:...3~..Z.|
00002B70: 30 A7 99 22 13 11 11 11 1D 12 96 20 20 20 20 20 |0.."....... |
00002B80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002B90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002BA0: 20 92 22 00 CE 33 88 EA 8B 5A B2 30 B0 5A B2 32 | ."..3...Z.0.Z.2|
00002BB0: A7 99 22 13 11 05 22 3B C8 28 43 52 24 2C 32 30 |.."...";.(CR$,20|
00002BC0: AB C3 28 54 45 24 29 AD 32 29 3B 54 45 24 00 D4 |..(TE$).2);TE$..|
00002BD0: 33 92 EA 8E 00 10 34 C4 EA 99 22 9E 12 22 3B 3A |3.....4..."..";:|
00002BE0: 20 4C 49 B2 32 33 3A 20 54 43 24 B2 22 D0 52 45 | LI.23: TC$.".RE|
00002BF0: 53 53 20 3C D3 D0 C1 C3 C5 3E 20 54 4F 20 43 4F |SS <.....> TO CO|
00002C00: 4E 54 49 4E 55 45 22 3A 20 8D 20 36 30 31 35 30 |NTINUE": . 60150|
00002C10: 00 27 34 CE EA A1 58 24 3A 8B 58 24 B3 B1 22 20 |.'4...X$:.X$.." |
00002C20: 22 A7 36 30 31 31 30 00 2D 34 D8 EA 8E 00 3D 34 |".60110.-4....=4|
00002C30: F6 EA 99 C8 28 43 44 24 2C 4C 49 29 3B 00 5C 34 |....(CD$,LI);.\4|
00002C40: 00 EB 99 C8 28 43 52 24 2C 32 30 AB C3 28 54 43 |....(CR$,20..(TC|
00002C50: 24 29 AD 32 29 3B 54 43 24 3A 20 8E 00 6E 34 28 |$).2);TC$: ..n4(|
00002C60: EB 59 24 B2 22 22 3A 20 97 31 39 38 2C 30 00 92 |.Y$."": .198,0..|
00002C70: 34 32 EB A1 58 24 3A 20 58 B2 C6 28 58 24 AA C7 |42..X$: X..(X$..|
00002C80: 28 30 29 29 3A 20 8B 58 24 B2 22 22 A7 36 30 32 |(0)): .X$."".602|
00002C90: 31 30 00 AC 34 3C EB 8B 58 B1 34 37 AF 58 B3 35 |10..4<..X.47.X.5|
00002CA0: 38 A7 5A B2 30 3A 89 36 30 32 34 30 00 C8 34 3E |8.Z.0:.60240..4>|
00002CB0: EB 8B 58 B1 36 34 AF 58 B3 39 31 A7 5A B2 31 32 |..X.64.X.91.Z.12|
00002CC0: 38 3A 89 36 30 32 34 30 00 E5 34 40 EB 8B 58 B1 |8:.60240..4@..X.|
00002CD0: 39 36 AF 58 B3 31 32 33 A7 5A B2 31 32 38 3A 89 |96.X.123.Z.128:.|
00002CE0: 36 30 32 34 30 00 01 35 42 EB 8B 58 B1 31 39 32 |60240..5B..X.192|
00002CF0: AF 58 B3 32 31 39 A7 5A B2 30 3A 89 36 30 32 34 |.X.219.Z.0:.6024|
00002D00: 30 00 1B 35 44 EB 8B 58 B2 33 32 B0 58 B2 33 39 |0..5D..X.32.X.39|
00002D10: A7 5A B2 30 3A 89 36 30 32 34 30 00 45 35 46 EB |.Z.0:.60240.E5F.|
00002D20: 8B 58 B2 32 30 A7 8B 28 C3 28 59 24 29 B1 30 29 |.X.20..(.(Y$).0)|
00002D30: A7 8D 36 30 33 39 30 3A 89 36 30 32 31 30 3A 20 |..60390:.60210: |
00002D40: 8F 20 44 45 4C 00 5C 35 48 EB 8B 58 B2 31 33 A7 |. DEL.\5H..X.13.|
00002D50: 99 22 20 22 3B 3A 89 36 30 32 36 30 00 67 35 4A |." ";:.60260.g5J|
00002D60: EB 89 36 30 32 31 30 00 7D 35 50 EB 8B 28 C3 28 |..60210.}5P..(.(|
00002D70: 59 24 29 B2 4C 45 29 A7 36 30 32 31 30 00 A2 35 |Y$).LE).60210..5|
00002D80: 5A EB 99 58 24 3B 43 53 24 3B 3A 59 24 B2 59 24 |Z..X$;CS$;:Y$.Y$|
00002D90: AA C7 28 C6 28 58 24 29 B0 5A 29 3A 89 36 30 32 |..(.(X$).Z):.602|
00002DA0: 31 30 00 B9 35 64 EB 59 24 B2 C8 28 59 24 AA 42 |10..5d.Y$..(Y$.B|
00002DB0: 4C 24 2C 4C 45 29 3A 20 8E 00 CE 35 8C EB 59 24 |L$,LE): ...5..Y$|
00002DC0: B2 22 22 3A 97 31 39 38 2C 30 3A 59 B2 31 00 EE |."":.198,0:Y.1..|
00002DD0: 35 96 EB A1 58 24 3A 58 B2 C6 28 58 24 AA C7 28 |5...X$:X..(X$..(|
00002DE0: 30 29 29 3A 8B 58 B2 30 A7 36 30 33 31 30 00 0F |0)):.X.0.60310..|
00002DF0: 36 98 EB 8B 58 B1 34 37 AF 58 B3 35 38 A7 8B 28 |6...X.47.X.58..(|
00002E00: C3 28 59 24 29 B3 4C 45 29 A7 36 30 33 35 30 00 |.(Y$).LE).60350.|
00002E10: 39 36 9A EB 8B 58 B2 32 30 A7 8B 28 C3 28 59 24 |96...X.20..(.(Y$|
00002E20: 29 B1 30 29 A7 8D 36 30 33 39 30 3A 89 36 30 33 |).0)..60390:.603|
00002E30: 31 30 3A 20 8F 20 44 45 4C 00 56 36 9C EB 8B 58 |10: . DEL.V6...X|
00002E40: B2 31 33 A7 99 22 20 22 3B 3A 89 36 30 33 34 30 |.13.." ";:.60340|
00002E50: 3A 20 8F 20 43 52 00 72 36 9E EB 8B 58 B2 39 35 |: . CR.r6...X.95|
00002E60: A7 59 B2 30 3A 89 36 30 33 33 30 3A 20 8F 20 22 |.Y.0:.60330: . "|
00002E70: 5F 22 00 AD 36 A0 EB 59 B2 30 AB 28 58 B2 32 39 |_"..6..Y.0.(X.29|
00002E80: 29 AB 32 AC 28 58 B2 31 35 37 29 3A 8B 59 B2 30 |).2.(X.157):.Y.0|
00002E90: A7 59 B2 31 3A 89 36 30 33 31 30 3A 20 8F 20 43 |.Y.1:.60310: . C|
00002EA0: 55 52 53 4F 52 20 49 46 20 59 3C 3E 30 00 D3 36 |URSOR IF Y<>0..6|
00002EB0: AA EB 8B 28 C3 28 59 24 29 B1 30 29 A7 8D 36 30 |...(.(Y$).0)..60|
00002EC0: 33 39 30 3A 89 36 30 33 33 30 3A 20 8F 20 45 52 |390:.60330: . ER|
00002ED0: 41 53 45 00 D9 36 B4 EB 8E 00 00 37 BE EB 99 58 |ASE..6.....7...X|
00002EE0: 24 3B 43 53 24 3B 3A 59 24 B2 59 24 AA 58 24 3A |$;CS$;:Y$.Y$.X$:|
00002EF0: 89 36 30 33 31 30 3A 20 8F 20 4E 55 4D 42 45 52 |.60310: . NUMBER|
00002F00: 00 26 37 E6 EB 99 22 9D 20 20 9D 9D 22 3B 43 53 |.&7...". ..";CS|
00002F10: 24 3B 3A 59 24 B2 C8 28 59 24 2C C3 28 59 24 29 |$;:Y$..(Y$,.(Y$)|
00002F20: AB 31 29 3A 20 8E 00 41 37 80 ED 5A B2 30 3A 54 |.1): ..A7..Z.0:T|
00002F30: 45 24 B2 22 CC 4F 41 44 49 4E 47 20 C4 41 54 41 |E$.".OADING .ATA|
00002F40: 22 00 77 37 8A ED 54 4B B2 31 38 3A 20 53 52 B2 |".w7..TK.18: SR.|
00002F50: 30 3A 20 42 54 B2 30 3A 20 8D 20 36 33 30 30 30 |0: BT.0: . 63000|
00002F60: 3A 20 84 31 2C 45 3A 20 A1 23 32 2C 58 24 3A 20 |: .1,E: .#2,X$: |
00002F70: 8D 20 36 33 31 31 30 00 94 37 8C ED 8B 20 45 B3 |. 63110..7... E.|
00002F80: B1 30 20 A7 20 8E 3A 20 8F 20 44 49 53 4B 20 45 |.0 . .: . DISK E|
00002F90: 52 52 4F 52 00 C0 37 8E ED 8B 20 58 24 B3 B1 22 |RROR..7... X$.."|
00002FA0: 22 20 A7 20 45 B2 39 39 3A 20 8E 3A 20 8F 20 4E |" . E.99: .: . N|
00002FB0: 4F 54 20 41 20 4C 45 41 47 55 45 20 44 49 53 4B |OT A LEAGUE DISK|
00002FC0: 00 F1 37 94 ED 8D 20 36 30 30 30 30 3A 20 99 22 |..7... 60000: ."|
00002FD0: 13 9E 11 11 11 11 11 1D 1D 1D 1D 1D 1D D2 45 41 |..............EA|
00002FE0: 44 49 4E 47 20 CC 45 41 47 55 45 20 C4 41 54 41 |DING .EAGUE .ATA|
00002FF0: 22 00 1C 38 96 ED 8D 20 35 30 31 30 30 3A 20 8F |"..8... 50100: .|
00003000: 20 52 45 41 44 20 41 4E 44 20 55 4E 50 41 43 4B | READ AND UNPACK|
00003010: 20 4C 45 41 47 55 45 20 44 41 54 41 00 3A 38 98 | LEAGUE DATA.:8.|
00003020: ED 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D CC 45 41 47 |.."..........EAG|
00003030: 55 45 3A 20 05 22 3B 4C 4E 24 00 55 38 9A ED 99 |UE: .";LN$.U8...|
00003040: 22 1D 1D 1D 1D 1D 1D 1D 1D 9E D7 45 45 4B 05 22 |"..........EEK."|
00003050: 3B 57 4B AA 31 00 77 38 9E ED 53 48 B2 31 3A 20 |;WK.1.w8..SH.1: |
00003060: 8F 20 4B 45 45 50 20 54 45 41 4D 20 52 45 41 44 |. KEEP TEAM READ|
00003070: 53 20 53 48 4F 52 54 00 AA 38 A0 ED 4E 54 B2 54 |S SHORT..8..NT.T|
00003080: 50 28 30 2C 30 29 3A 20 99 22 11 1D 1D 1D 1D 1D |P(0,0): ."......|
00003090: 1D 9E D2 45 41 44 49 4E 47 05 22 3B 4E 54 3B 22 |...EADING.";NT;"|
000030A0: 9E D0 52 4F D4 45 41 4D 53 22 00 D5 38 A2 ED 8B |..RO.EAMS"..8...|
000030B0: 20 4E 54 B2 30 20 A7 20 36 30 38 34 30 3A 20 8F | NT.0 . 60840: .|
000030C0: 20 43 48 45 43 4B 20 50 52 4F 20 54 45 41 4D 20 | CHECK PRO TEAM |
000030D0: 43 4F 55 4E 54 00 13 39 A4 ED 81 54 58 B2 30 A4 |COUNT..9...TX.0.|
000030E0: 4E 54 AB 31 3A 8D 35 30 33 30 30 3A 4E 4E 24 28 |NT.1:.50300:NN$(|
000030F0: 54 58 29 B2 54 4E 24 3A 4E 41 24 28 54 58 29 B2 |TX).TN$:NA$(TX).|
00003100: 41 42 24 3A 82 3A 20 8F 20 54 45 41 4D 20 4E 41 |AB$:.: . TEAM NA|
00003110: 4D 45 53 00 47 39 A8 ED 4E 54 B2 54 50 28 31 2C |MES.G9..NT.TP(1,|
00003120: 30 29 3A 20 99 22 11 1D 1D 1D 1D 1D 1D D2 45 41 |0): ."........EA|
00003130: 44 49 4E 47 05 22 3B 4E 54 3B 22 9E C4 52 45 41 |DING.";NT;"..REA|
00003140: 4D D4 45 41 4D 53 22 00 7D 39 AA ED 4E 47 B2 4E |M.EAMS".}9..NG.N|
00003150: 54 AD 32 3A 20 8B 20 4E 54 B2 30 20 A7 20 36 30 |T.2: . NT.0 . 60|
00003160: 38 35 30 3A 20 8F 20 43 48 45 43 4B 20 44 52 45 |850: . CHECK DRE|
00003170: 41 4D 20 54 45 41 4D 20 43 4F 55 4E 54 00 B4 39 |AM TEAM COUNT..9|
00003180: AC ED 81 20 54 58 B2 30 A4 4E 54 AB 31 3A 20 8D |... TX.0.NT.1: .|
00003190: 20 35 30 33 31 30 3A 20 44 4E 24 28 54 58 29 B2 | 50310: DN$(TX).|
000031A0: 54 4E 24 3A 20 82 3A 20 8F 20 54 45 41 4D 20 4E |TN$: .: . TEAM N|
000031B0: 41 4D 45 53 00 D3 39 B2 ED 99 22 11 1D 1D 1D 1D |AMES..9...".....|
000031C0: 1D 1D D2 45 41 44 49 4E 47 20 D3 43 48 45 44 55 |...EADING .CHEDU|
000031D0: 4C 45 22 00 F4 39 B4 ED 8D 20 36 31 32 30 30 3A |LE"..9... 61200:|
000031E0: 20 8F 20 53 43 48 45 44 55 4C 45 20 54 4F 20 53 | . SCHEDULE TO S|
000031F0: 43 24 28 29 00 25 3A BC ED 4E 50 B2 54 50 28 32 |C$().%:..NP.TP(2|
00003200: 2C 30 29 3A 20 99 22 11 1D 1D 1D 1D 1D 1D D2 45 |,0): ."........E|
00003210: 41 44 49 4E 47 05 22 3B 4E 50 3B 22 9E D0 4C 41 |ADING.";NP;"..LA|
00003220: 59 45 52 53 22 00 4E 3A BE ED 8B 20 4E 50 B2 30 |YERS".N:... NP.0|
00003230: 20 A7 20 36 30 38 37 30 3A 20 8F 20 43 48 45 43 | . 60870: . CHEC|
00003240: 4B 20 50 4C 41 59 45 52 20 43 4F 55 4E 54 00 85 |K PLAYER COUNT..|
00003250: 3A C0 ED 81 20 50 58 B2 30 A4 4E 50 AB 31 3A 20 |:... PX.0.NP.1: |
00003260: 50 58 28 50 58 29 B2 50 58 3A 20 8D 20 35 30 35 |PX(PX).PX: . 505|
00003270: 30 30 3A 20 82 3A 20 8F 20 50 4C 41 59 45 52 20 |00: .: . PLAYER |
00003280: 4E 41 4D 45 53 00 BB 3A C2 ED 8F 20 50 58 28 50 |NAMES..:... PX(P|
00003290: 58 29 20 57 49 4C 4C 20 42 45 20 55 53 45 44 20 |X) WILL BE USED |
000032A0: 46 4F 52 20 41 4C 50 48 41 42 45 54 49 5A 49 4E |FOR ALPHABETIZIN|
000032B0: 47 2C 20 53 4F 4D 45 20 44 41 59 00 EB 3A C6 ED |G, SOME DAY..:..|
000032C0: 53 48 B2 30 3A 20 8E 3A 20 8F 20 46 55 54 55 52 |SH.0: .: . FUTUR|
000032D0: 45 20 52 45 41 44 53 20 57 49 4C 4C 20 42 45 20 |E READS WILL BE |
000032E0: 46 55 4C 4C 20 4C 45 4E 47 54 48 00 21 3B 10 EF |FULL LENGTH.!;..|
000032F0: 54 4B B2 31 3A 20 53 52 B2 31 3A 20 42 54 B2 30 |TK.1: SR.1: BT.0|
00003300: 3A 20 8D 20 36 33 30 30 30 3A 20 8F 20 4F 50 45 |: . 63000: . OPE|
00003310: 4E 20 53 43 48 45 44 55 4C 45 20 53 45 43 54 4F |N SCHEDULE SECTO|
00003320: 52 00 5D 3B 1A EF 81 20 57 B2 30 A4 31 35 3A 20 |R.];... W.0.15: |
00003330: 81 20 54 B2 30 A4 31 35 3A 20 A1 23 32 2C 58 24 |. T.0.15: .#2,X$|
00003340: 3A 20 53 43 24 28 57 2C 54 29 B2 C8 28 58 24 AA |: SC$(W,T)..(X$.|
00003350: 43 30 24 2C 31 29 3A 20 82 20 54 2C 57 00 7D 3B |C0$,1): . T,W.};|
00003360: 24 EF 89 20 36 33 31 31 30 3A 20 8F 20 43 4C 4F |$.. 63110: . CLO|
00003370: 53 45 20 41 4E 44 20 52 45 54 55 52 4E 00 C3 3B |SE AND RETURN..;|
00003380: 5C F3 91 20 50 4F 20 89 20 36 32 33 32 30 2C 20 |\.. PO . 62320, |
00003390: 36 32 33 33 30 2C 20 36 32 33 34 30 2C 20 36 32 |62330, 62340, 62|
000033A0: 33 35 30 2C 20 36 32 33 36 30 3A 20 8F 20 50 52 |350, 62360: . PR|
000033B0: 49 4E 54 20 50 4F 53 49 54 49 4F 4E 20 50 45 52 |INT POSITION PER|
000033C0: 20 50 4F 00 DE 3B 66 F3 99 22 D5 4E 4B 4E 4F 57 | PO..;f..".NKNOW|
000033D0: 4E 20 D0 4F 53 49 54 49 4F 4E 22 3A 20 8E 00 F4 |N .OSITION": ...|
000033E0: 3B 70 F3 99 22 D1 55 41 52 54 45 52 42 41 43 4B |;p..".UARTERBACK|
000033F0: 22 3A 20 8E 00 08 3C 7A F3 99 22 D4 49 47 48 54 |": ...<z..".IGHT|
00003400: 20 C5 4E 44 22 3A 20 8E 00 19 3C 84 F3 99 22 CB | .ND": ...<...".|
00003410: 49 43 4B 45 52 22 3A 20 8E 00 31 3C 8E F3 99 22 |ICKER": ..1<..."|
00003420: D7 49 44 45 20 D2 45 43 45 49 56 45 52 22 3A 20 |.IDE .ECEIVER": |
00003430: 8E 00 48 3C 98 F3 99 22 D2 55 4E 4E 49 4E 47 20 |..H<...".UNNING |
00003440: C2 41 43 4B 22 3A 20 8E 00 59 3C C0 F3 5A B2 31 |.ACK": ..Y<..Z.1|
00003450: 3A 20 8D 20 36 30 30 30 30 00 91 3C CA F3 99 C8 |: . 60000..<....|
00003460: 28 43 44 24 2C 31 30 29 3B C8 28 43 52 24 2C 37 |(CD$,10);.(CR$,7|
00003470: 29 3B 22 9E D3 43 52 45 45 4E 20 4F 52 20 D0 52 |);"..CREEN OR .R|
00003480: 49 4E 54 45 52 3F 20 20 3C D3 2F D0 3E 20 05 22 |INTER? <./.> ."|
00003490: 3B 00 AD 3C CC F3 A1 20 58 24 3A 20 8B 20 58 24 |;..<... X$: . X$|
000034A0: B2 22 53 22 20 A7 20 58 24 B2 22 D3 22 00 C3 3C |."S" . X$."."..<|
000034B0: CE F3 8B 20 58 24 B2 22 50 22 20 A7 20 58 24 B2 |... X$."P" . X$.|
000034C0: 22 D0 22 00 E3 3C D0 F3 8B 20 58 24 B3 B1 22 D3 |"."..<... X$..".|
000034D0: 22 20 AF 20 58 24 B3 B1 22 D0 22 20 A7 20 36 32 |" . X$.."." . 62|
000034E0: 34 31 30 00 0B 3D D4 F3 8B 20 58 24 B2 22 D3 22 |410..=... X$."."|
000034F0: 20 A7 20 8E 3A 20 8F 20 45 4C 53 45 20 43 48 45 | . .: . ELSE CHE|
00003500: 43 4B 20 50 52 49 4E 54 45 52 2D 00 2E 3D DE F3 |CK PRINTER-..=..|
00003510: 9F 34 2C 34 2C 37 3A 20 A0 34 3A 20 8B 20 53 54 |.4,4,7: .4: . ST|
00003520: B2 30 20 A7 20 9F 34 2C 34 2C 37 3A 20 8E 00 5B |.0 . .4,4,7: ..[|
00003530: 3D E8 F3 99 3A 20 99 22 11 1D 1D 1D 1D 1D 1D 05 |=...: ."........|
00003540: D0 52 49 4E 54 45 52 20 49 53 20 4E 4F 54 20 52 |.RINTER IS NOT R|
00003550: 45 53 50 4F 4E 44 49 4E 47 2E 22 00 83 3D EA F3 |ESPONDING."..=..|
00003560: 99 22 1D 1D 1D 1D 1D 1D D0 4C 45 41 53 45 20 43 |.".......LEASE C|
00003570: 48 45 43 4B 20 59 4F 55 52 20 48 41 52 44 57 41 |HECK YOUR HARDWA|
00003580: 52 45 22 00 C4 3D EC F3 99 22 1D 1D 1D 1D 1D 1D |RE"..=..."......|
00003590: 41 4E 44 20 54 52 59 20 41 47 41 49 4E 2E 22 3A |AND TRY AGAIN.":|
000035A0: 20 58 24 B2 22 22 3A 20 89 20 36 30 31 30 30 3A | X$."": . 60100:|
000035B0: 20 8F 20 57 41 49 54 2C 20 54 48 45 4E 20 52 45 | . WAIT, THEN RE|
000035C0: 54 55 52 4E 00 E0 3D 24 F4 A1 20 58 24 3A 20 8B |TURN..=$.. X$: .|
000035D0: 20 58 24 B2 22 59 22 20 A7 20 58 24 B2 22 D9 22 | X$."Y" . X$."."|
000035E0: 00 F6 3D 2E F4 8B 20 58 24 B2 22 4E 22 20 A7 20 |..=... X$."N" . |
000035F0: 58 24 B2 22 CE 22 00 16 3E 38 F4 8B 20 58 24 B3 |X$."."..>8.. X$.|
00003600: B1 22 CE 22 20 AF 20 58 24 B3 B1 22 D9 22 20 A7 |."." . X$.."." .|
00003610: 20 36 32 35 30 30 00 25 3E 42 F4 99 22 05 22 3B | 62500.%>B..".";|
00003620: 58 24 3A 20 8E 00 5F 3E 88 F4 99 22 9E 22 3B 3A |X$: .._>...".";:|
00003630: 20 4C 49 B2 32 31 3A 20 54 43 24 B2 22 C5 4E 54 | LI.21: TC$.".NT|
00003640: 45 52 20 CE 55 4D 42 45 52 20 28 31 2D 22 AA 4F |ER .UMBER (1-".O|
00003650: 50 24 AA 22 29 22 3A 20 8D 20 36 30 31 35 30 00 |P$.")": . 60150.|
00003660: 80 3E 92 F4 54 43 24 B2 22 CF D2 20 D0 52 45 53 |.>..TC$.".. .RES|
00003670: 53 20 22 AA 42 41 24 3A 20 8D 20 36 30 31 36 30 |S ".BA$: . 60160|
00003680: 00 AF 3E 9C F4 54 43 24 B2 22 20 54 4F 20 D2 45 |..>..TC$." TO .E|
00003690: 54 55 52 4E 20 54 4F 20 D0 52 45 56 49 4F 55 53 |TURN TO .REVIOUS|
000036A0: 20 CD 45 4E 55 22 3A 20 8D 20 36 30 31 36 30 00 | .ENU": . 60160.|
000036B0: C9 3E A6 F4 A1 58 24 3A 20 8B 20 58 24 B2 22 5F |.>...X$: . X$."_|
000036C0: 22 20 A7 20 36 32 36 35 30 00 E7 3E B0 F4 8B 20 |" . 62650..>... |
000036D0: 58 24 B3 22 31 22 20 B0 20 58 24 B1 4F 50 24 20 |X$."1" . X$.OP$ |
000036E0: A7 20 36 32 36 33 30 00 F7 3E BA F4 4F 50 B2 C5 |. 62630..>..OP..|
000036F0: 28 58 24 29 3A 20 8E 00 17 3F EC F4 8B 20 4C B3 |(X$): ...?... L.|
00003700: 36 36 20 A7 20 81 20 4C B2 4C A4 36 36 3A 20 98 |66 . . L.L.66: .|
00003710: 34 2C 22 22 3A 20 82 00 30 3F F6 F4 81 20 4C B2 |4,"": ..0?... L.|
00003720: 31 A4 32 3A 20 98 34 2C 22 22 3A 20 82 3A 20 8E |1.2: .4,"": .: .|
00003730: 00 52 3F 00 F5 81 20 4C B2 4C A4 36 36 3A 20 98 |.R?... L.L.66: .|
00003740: 34 2C 22 22 3A 20 82 3A 20 98 34 3A 20 A0 34 3A |4,"": .: .4: .4:|
00003750: 20 8E 00 6C 3F 50 F5 99 C9 28 22 20 20 20 22 AA | ..l?P...(" ".|
00003760: C4 28 58 29 2C 46 57 29 3B 3A 20 8E 00 84 3F 18 |.(X),FW);: ...?.|
00003770: F6 9F 31 2C 38 2C 31 35 3A 20 9F 32 2C 38 2C 32 |..1,8,15: .2,8,2|
00003780: 2C 22 23 22 00 AB 3F 22 F6 98 31 2C 22 55 31 22 |,"#"..?"..1,"U1"|
00003790: 3B 32 3B 30 3B 54 4B 3B 53 52 3A 98 31 2C 22 42 |;2;0;TK;SR:.1,"B|
000037A0: 2D 50 22 3B 32 3B 42 54 3A 20 8E 00 C1 3F 7C F6 |-P";2;BT: ...?|.|
000037B0: 98 31 2C 22 55 32 22 3B 32 3B 30 3B 54 4B 3B 53 |.1,"U2";2;0;TK;S|
000037C0: 52 00 CF 3F 86 F6 A0 32 3A 20 A0 31 3A 20 8E 00 |R..?...2: .1: ..|
000037D0: F6 3F E0 F6 8D 36 33 30 30 30 3A 20 58 24 B2 22 |.?...63000: X$."|
000037E0: 22 3A 20 8F 20 4F 50 45 4E 20 41 4E 44 20 50 4F |": . OPEN AND PO|
000037F0: 53 49 54 49 4F 4E 00 1D 40 EA F6 81 20 58 B2 31 |SITION..@... X.1|
00003800: A4 4C 4E 3A 20 A1 23 32 2C 59 24 3A 20 8B 20 59 |.LN: .#2,Y$: . Y|
00003810: 24 B2 22 22 20 A7 20 59 24 B2 43 30 24 00 4A 40 |$."" . Y$.C0$.J@|
00003820: F4 F6 58 24 B2 58 24 AA 59 24 3A 20 82 3A 20 89 |..X$.X$.Y$: .: .|
00003830: 20 36 33 31 31 30 3A 20 8F 20 43 4C 4F 53 45 20 | 63110: . CLOSE |
00003840: 41 4E 44 20 52 45 54 55 52 4E 00 84 40 44 F7 8D |AND RETURN..@D..|
00003850: 36 33 30 30 30 3A 20 8B 20 C3 28 58 24 29 B1 4C |63000: . .(X$).L|
00003860: 4E 20 A7 20 58 24 B2 C8 28 58 24 2C 4C 4E 29 3A |N . X$..(X$,LN):|
00003870: 20 8F 20 4F 50 45 4E 20 41 4E 44 20 50 4F 53 49 | . OPEN AND POSI|
00003880: 54 49 4F 4E 00 B3 40 4E F7 98 32 2C 58 24 3B 3A |TION..@N..2,X$;:|
00003890: 20 89 20 36 33 31 30 30 3A 20 8F 20 57 52 49 54 | . 63100: . WRIT|
000038A0: 45 2C 20 43 4C 4F 53 45 20 41 4E 44 20 52 45 54 |E, CLOSE AND RET|
000038B0: 55 52 4E 00 F8 40 38 F9 53 52 B2 53 52 AA 49 58 |URN..@8.SR.SR.IX|
000038C0: 3A 20 89 20 36 33 38 32 30 3A 20 8F 20 43 41 4C |: . 63820: . CAL|
000038D0: 43 55 4C 41 54 45 20 54 45 41 4D 20 4E 41 4D 45 |CULATE TEAM NAME|
000038E0: 20 4F 52 20 50 4C 41 59 45 52 20 44 41 54 41 20 | OR PLAYER DATA |
000038F0: 4C 4F 43 41 54 49 4F 4E 00 3F 41 42 F9 58 58 B2 |LOCATION.?AB.XX.|
00003900: B5 28 49 58 AD 38 29 3A 20 53 52 B2 53 52 AA 58 |.(IX.8): SR.SR.X|
00003910: 58 3A 20 49 58 B2 49 58 AB 38 AC 58 58 3A 20 8F |X: IX.IX.8.XX: .|
00003920: 20 43 41 4C 43 55 4C 41 54 45 20 50 4C 41 59 45 | CALCULATE PLAYE|
00003930: 52 20 4E 41 4D 45 20 4C 4F 43 41 54 49 4F 4E 00 |R NAME LOCATION.|
00003940: 71 41 4C F9 8B 20 53 54 28 54 4B 29 B3 B2 53 52 |qAL.. ST(TK)..SR|
00003950: 20 A7 20 53 52 B2 53 52 AB 53 54 28 54 4B 29 3A | . SR.SR.ST(TK):|
00003960: 20 54 4B B2 54 4B AA 31 3A 20 89 20 36 33 38 32 | TK.TK.1: . 6382|
00003970: 30 00 A4 41 56 F9 8B 20 54 4B B1 31 37 20 A7 20 |0..AV.. TK.17 . |
00003980: 53 52 B2 53 52 AA 31 3A 20 8B 20 53 52 B1 53 54 |SR.SR.1: . SR.ST|
00003990: 28 54 4B 29 20 A7 20 53 52 B2 30 3A 20 54 4B B2 |(TK) . SR.0: TK.|
000039A0: 54 4B AA 31 00 AA 41 60 F9 8E 00 D7 41 9C F9 99 |TK.1..A`....A...|
000039B0: 22 93 22 3A 20 97 38 30 38 2C C2 28 32 35 31 29 |".": .808,.(251)|
000039C0: 3A 20 9C 3A 20 A2 3A 20 8F 20 45 58 49 54 20 54 |: .: .: . EXIT T|
000039D0: 4F 20 42 41 53 49 43 00 00 00 |O BASIC... |
..)...." DREAMTEAM FANTASY FOOTBAL
L.P...." COMMODORE 64 VERSION 1.0
.V...." (C)1989 BY MBI SOFTWARE..
...." STATISTICS/RESULTS MODULE...
....C....808,B(252): . DISABLE STOP.....
.B(808).200..45,B(174):.46,B(175):.:. C6
4 - END OF PRG.$....53281,6:.53280,6:.".
.";G(14)G(8).J...C0$.G(0): CQ$.G(34): CS
$.".. ..": . ZERO, QUOTE, AND WHITE CURS
OR.....BL$." ": US$.".....": CD$."...
..": CR$."...."...... I.1.3: BL$.BL$.BL$
: CR$.CR$.CR$: .: . 32 BLANKS AND CURSOR
RIGHT.....US$.US$.US$.US$.US$: . 20 UND
ERSCORES.I...CD$."...".CD$.CD$.CD$.CD$:
. HOME AND 22 CURSOR DOWN.X.(.Z.1:.60000
...2.."..............DREAMTEAM FANTASY F
OOTBALL"...<.."...........STATISTICS/RES
ULTS"...O.. TP(2,3),NN$(35),NA$(35),PL(1
00),PX(300),PN$(300),ST(35),PS(9),FW(8).
..P.. DN$(15),TS(15),MK$(15),SC$(15,15).
_.Q.. I.1.17: ST(I).21: .: . I.18.24: ST
(I).19: .: . SECTORS/TK...R.. I.25.30: S
T(I).18: .: . I.31.35: ST(I).17: ..I.S..
I.0.7: FW(I).2: .: . FIELD WIDTHS FOR S
TATISTICS...T.FW(1).3:FW(3).3:FW(4).4:FW
(5).4:FW(8).3.&.U.PO$."UNQBTEK WRRB": .
POSITION ABBREVIATIONS.Y.V.QU$.G(34):BA$
.QU$."_".QU$: . QUOTED BACK ARROW.V.W.NW
.16: . NUMBER OF WEEKS...X..60100: Z.1..
....60000:.H(CD$,10);".......PLEASE INSE
RT LEAGUE DISK".T.... 60100: . 60800....
..E..0.TE$.".....ERROR. -- DISK IS NOT A
DATA DISK":Z.2:.130.B.H.Z.0:TE$."STATIS
TICS/RESULTS MENU":. 60000.O....".......
...1. ENTER WEEKLY STATISTICS"......"..
.....2. SHOW RESULTS"......".......3.
RETURN TO MAIN MENU".K....".......4. EX
IT"......".........ENTER OPTION NUMBER
(1-4)"......X$: . X$."1" . X$."4" . 280.
3.".. E(X$) . 1000,1100,300.L.$.Z.1:.600
00:."..........EXIT. - ARE YOU SURE? (Y/
N)";...&.. 62500: . X$."N" . 200...(..63
900...,.Z.1:.60000.L.6.LI.10:TC$.".PLEAS
E INSERT THE":.60150...@.TC$."DREAMTEAM
PROGRAM DISK":.60160.#.J.TC$."AND PRESS
<SPACE> TO CONTINUE":.60160.;.T..X$:. X$
.." " . 340.B.^.TC$."..LOADING FFB MENU.
..":.60160...H..1,8,15:.2,8,2,"FFB.MENU,
P,R":.1,E,E$: 2: 1:.E.0.380.Z.R.Z.1:.600
00:LI.6:TC$.".ERROR. - FILE NOT FOUND":.
60150:.310...|..808,B(251): .: ."FFB.MEN
U",8: . 63900.J....7000:.200:. SKIP KBD/
DISK SELECTION, GO TO KBD ENTRY AND RETU
RN...... ABOVE LINE IS TEMPORARY UNTIL D
ATA DISK SECTION IS WORKED OUT.....Z.0:T
E$."ENTER WEEKLY STATISTICS":.60000.....
."..........1. TYPE IN FROM KEYBOARD"..
....".....2. READ IN FROM DATA DISK".<.
..OP$."2": . 62600: . OP . 7000: . ,????
????.U.... 200: . . MAIN MENU...L.Z.0: T
E$."SHOW RESULTS": . 60000: .H(CD$,10)..
.V.. 62400: . X$."S" . 1200: . ASK "SCRE
EN OR PRINTER".R.`.. X$."P" . 1300...J..
200: . ANSWER WAS " ", I.E. "P" BUT CAN
'T OPEN PRINTER.K.... TX.0 . TP(1,0).1:
Z.0: . 60000: .H(CD$,4): TS.0: TT.0.Q...
.H(CR$,4);".DREAMTEAM: .";DN$(TX)...D..
50310: . NP.0 . ."..........NO PLAYERS":
. 1250.M.F.. PL.0 . NP.1: PX.PL(PL): .
50500...N..H(CR$,6);".";PN$(PX(PX));" .
";: . PW..WK . 1238.9.P.. PF.1 . TS.TS.P
S(9): TT.TT.PS(9): .PS(9): . 1240.L.R..
PF.2 . TT.TT.PS(9): .PS(9);"[BENCH]": .
1240...T.. PF.3 . ."INJURED": . 1240...V
..".NO STATS"...X.. PL.W.Z..H(CR$,4);".T
EAM SCORE - ACTIVE PLAYERS.";TS......H(C
R$,4);". ADD BENCH (FOR TIE-BREAK).";TT
.".... 60100: . TX: . 1400.V...Z.0: .600
00: LI.10: TC$.".PRINTING...": . 60150..
...L.67: . TX.0 . TP(1,0).1: . L.60 . .
1360: . CHECK PAGE END......4,H(BL$,12);
DN$(TX): .4,"": L.L.1...(.. 50310: . NP.
0 . .4,H(BL$,14);"NO PLAYERS.": . 1350.-
.*.. PL.0 . NP.1: PX.PL(PL): . 50500: .
L.60 . . 1360.A.2..4,H(BL$,14);PN$(PX(PX
));" ";: . PW..WK . 1338...4.. PF.1 . T
S.TS.PS(9): TT.TT.PS(9): .4,PS(9): . 134
0.N.6.. PF.2 . TT.TT.PS(9): .4,PS(9);"[B
ENCH]": . 1340...8.. PF.3 . .4,"INJURED
RESERVE": . 1340...:..4,"NO STATS ENTERE
D".".<.L.L.1: . PL.Z.>..4,H(BL$,12);"TEA
M SCORE - ACTIVE PLAYERS ONLY:";TS...@..
4,H(BL$,12);" ACTIVE + BENCH (FOR TIE-B
REAK):";TT: L.L.2.O.F..4,"": L.L.2: . TX
: . 62720: . 1400: . CLOSE PRTR...P.. 62
700: .4,H(BL$,10);"TEAM SCORES": . NEW P
AGE.3.Z..4,H(BL$,10);: . I.1.6: .4,"====
======";: ..N.D..4,"": .4,"": L.L.3: ..J
.X.Z.0: . 60000: .H(CD$,6)......"......A
RE YOU DONE WITH THIS".N....".....WEEK'S
STATISTICS? (Y/N) ";: . 62500: . X$."N"
. 200.....WK.WK.1: . WK.NW . 1440......
".......THE NEXT WEEK IS #.";WK.1.R...."
.....PICK A DIFFERENT ONE? (Y/N) ";:.625
00:. X$."N" . 1460.].... 1450... .."....
...THAT WAS THE LAST WEEK"......".....OF
THE SEASON! GO BACK"......".....TO AN
EARLIER ONE? (Y/N) ";: . 62500: . X$."N"
. 1460......".......NEW WEEK # (1-";I(D
(NW),2);"): ";CS$;.J...LE.2: . 60200: .
E(Y$).0 . E(Y$)..NW . 1460.]...."..";: .
1450.L...WK.E(Y$).1...... 50000: . 200:
. SAVE NEW WEEK #, RETURN TO MENU...X.T
E$."ENTER STATISTICS"...B.Z.0:.60000:.50
600:.PX.NP.7030: . GET AND VERIFY PLAYER
NAME. .L..H(CR$,4);"..PLAYER NOT FOUND"
.B.N..H(CR$,4);".TRY AGAIN? (Y/N)".E.P..
X$: . X$."Y" . X$."Y" . 7010...R.. X$..
"N" . X$.."N" . 7024...V.. PN$."" . .: .
NO PLAYER GIVEN.....TE$.PN$(PX): Z.0: .
60000: . 50500: . 51800: PD$.X$: X$."".
....WX.99: FX.99: . 52000: .".";.F...TC$
."CRSR KEYS TO MOVE OR ".BA$." TO END":
LI.23: . 60150.S...WX.WK: FX.0: . 52200:
. WRITE AND RETURN...PCX$."":. I.0.1: .
J.0.3: X$.X$.G(TP(I,J)):. J,I...ZCX.TP(
2,0): Y$.G(X.256..001).G(X.255).G(TP(2,1
)).G(TP(2,2))...DCX.TP(2,3): Y$.Y$.G(X.2
56..001).G(X . 255).G(PS).N.NCX$.LN$.X$.
Y$.G(PD(0)).G(PD(1)).G(SO).G(IR).G(WK)..
.XCTK.1: SR.0: BT.0: LN.40: . 63300: . W
RITE LEAGUE SECTOR AND RETURN.P..CTK.1:
SR.0: BT.0: LN.40: . 63200: . READ LEAGU
E SECTOR....CLN$.H(X$,20): PS.F(J(X$,35,
1)). .HCPD(0).F(J(X$,36,1)): PD(1).F(J(X
$,37,1)).G.RCSO.F(J(X$,38,1)): IR.F(J(X$
,39,1)).L..CWK.F(J(X$,40,1)): X$.J(X$,21
,14)....CX.1: . I.0.1: . J.0.3: TP(I,J).
F(J(X$,X,1)): X.X.1: . J,I....CTP(2,0).F
(J(X$,X,1)).256.F(J(X$,X.1,1)): X.X.2...
.CTP(2,1).F(J(X$,X,1)): X.X.1: TP(2,2).F
(J(X$,X,1)): X.X.1.I..DTP(2,3).F(J(X$,X,
1)).256.F(J(X$,X.1,1)): .....DTK.TP(0,1)
: SR.TP(0,2): TN$.NN$(TX): AB$.NA$(TX):
. 50220..."DTK.TP(1,1): SR.TP(1,2): TN$.
DN$(TX): AB$.H(BL$,4)...,DIX.TX: . 63800
: . GET RIGHT TK & SR...6DX$."": . I.0.1
5: X$.X$.G(TS(I).256).G(TS(I).255): ..:.
@DY$.G(NP): . NP.0 . 50260.M.JD. I.0.NP.
1: Y$.Y$.G(PL(I).256).G(PL(I).255): ....
TDX$.TN$.AB$.G(TX).G(AP).G(DV).X$.Y$.D.^
DBT.0: LN.C(X$): . 63300: . WRITE AND RE
TURN.. |DTK.TP(0,1): SR.TP(0,2): . 50320
: . READ PRO TEAM SECTOR.* .DTK.TP(1,1)
: SR.TP(1,2): . DREAM TEAM.R .DIX.TX: .
63800: . GET RIGHT TK & SR.. .DLN.60: .
SH.1 . LN.24: . CHECK "SHORT" FLAG.. .DB
T.0: . 63200: . RAW TEAM DATA TO X$.N .D
TN$.J(X$,1,20): AB$.J(X$,21,4).. .D. SH.
1 . .: . SHORT READ IS DONE..!.DAP.F(J(X
$,26,1)): DV.F(J(X$,27,1)).T!.DJ.28: . I
.0.15: TS(I).256.F(J(X$,J,1)).F(J(X$,J.1
,1)).A!.DJ.J.2: ...!BDNP.F(J(X$,60,1)):
. NP.0 . .: . ELSE -..!LDBT.60: LN.2.NP:
. 63200..!VDJ.1: . I.0.NP.1: PL(I).256.
F(J(X$,J,1)).F(J(X$,J.1,1))..!.DJ.J.2: .
: ..:".DTK.PD(0): SR.PD(1): IX.PX(PX): .
63800: . CORR TK/SR FOR PLYR DATA.W".DX
$.G(IX.256).G(IX.255): . LIST IDX & (FOR
NOW) ALPHA PTR..".DX$.PN$(IX).X$.X$.G(T
K).G(SR).G(PF).G(PO).G(PW).G(PS(9))..".D
TK.TP(2,1): SR.TP(2,2): . 63810: . CORRE
CT TK/SR AND IX.(#.EBT.32.IX: LN.30: . 6
3300: . WRITE TO DISK AND RETURN.I#DETK.
TP(2,1): SR.TP(2,2): IX.PX(PX): . 63810:
. CORR TK/SR, IX..#NEBT.32.IX: LN.30: .
63200: . OPEN AND READ.T#XEPN$(PX(PX)).
H(X$,20): PF.F(J(X$,27,1)): PO.F(J(X$,28
,1))..$BEPW.F(J(X$,29,1)): PS(9).F(J(X$,
30,1)): ...$.ELE.20: .H(CD$,8);H(CR$,4);
".PLAYER NAME".G$.E.H(CR$,16);H(US$,LE).
T$.E."..";H(CR$,16);CS$;: . 60200: PN$.Y
$: ...$.E. PN$.H(BL$,LE) . PN$."": .: .
NO NAME GIVEN..$.EPX.0: NP.TP(2,0)..$FE.
PX..NP . PN$."": .: . NOT FOUND.!%PE. P
N$(PX(PX))."" . . 50500: . GET PLAYER FR
OM DISK IF NEEDED.D%ZE. PN$.PN$(PX(PX))
. .: . FOUND.Y%.EPX.PX.1: . 50630..%.FLE
.4: .H(CD$,10);H(CR$,4);".TEAM ABBREVIAT
ION "..%.F.H(CR$,25);H(US$,LE).
.%.F."..";H(CR$,25);CS$;: . 60200: AB$.Y
$: ...&.F. AB$.H(BL$,LE) . AB$."": .: .
NO TEAM GIVEN."& FTX.0: NT.TP(0,0).H&*F.
TX..NT . AB$."": .: . NOT FOUND.G&4F. A
B$.NA$(TX) . .: . FOUND.|&>FTX.TX.1: . 5
0730.C&PFTK.PD(0): SR.PD(1): IX.PX(PX):
. 63800: . CORR TK/SR FOR PLYR DATA..&ZF
X$."": . I.0.3: X$.X$.G(PS(I)): ...'|F.
I.4.5: X$.X$.G(PS(I).256).G(PS(I).255):
..8'~F. I.6.8: X$.X$.G(PS(I)): ..T'.FX$.
G(NX).G(DX).G(PO).X$..'.FBT.WK.16: LN.16
: . 63300: . WRITE AND RETURN.L'TFTK.PD(
0): SR.PD(1): IX.PX(PX): . 63800: . CORR
TK/SR FOR PLYR DATA..(.FBT.WK.16: LN.16
: . 63200: . GET PLAYER DATA IN X$.8(.FN
X.F(J(X$,1,1)): DX.F(J(X$,2,1)): PO.F(J(
X$,3,1)).G(.FJ.4: . I.0.3: PS(I).F(J(X$,
J,1)): J.J.1: ...(.F. I.4.5: PS(I).F(J(X
$,J,1)).256.F(J(X$,J.1,1)): J.J.1: ..N(.
F. I.6.8: PS(I).F(J(X$,J,1)): J.J.1: ..T
(.F...(.ITE$."SELECT DREAMTEAM"..).IZ.0:
. 60000.").J.H(CD$,4): . TX.0 . TP(1,0)
.1.Q).J.H(CR$,6);".";I(D(TX.1),2);" .";D
N$(TX): ...).J.H(CR$,4);"..ENTER NUMBER
";CS$;: LE.2: .60200..).JTX.E(Y$).1: .
TX.0 . TX..TP(1,0) . ."..": . 51740.W) J
.".":.H(CR$,18);DN$(TX)..*&J.H(CR$,4);".
IS THIS CORRECT? (Y/N) ";.,*0J. 62500: .
X$."N" . 51710: . TRY AGAIN.2*:J..Y*XJT
K.PD(0): SR.PD(1): IX.PX(PX): . 63800: .
CORR TK/SR FOR PLYR DATA..*BJBT.0: LN.2
54: . 63200: . GET PLAYER DATA IN X$ AND
RETURN.O* K.H(CD$,4);H(CR$,5);..**K."..
WK.PO.T.YT.P.YP..YG..YP.X.F.YF."..+4K.W.
0.15: . 52100: .: ..=+.KI.W.16:.H(CR$,5)
;".";I(" ".D(W.1),2);.P+.K. W.WK . 52130
..+.KI.I.3: PO.F(J(PD$,I,1)): ." ";J(PO$
,1.2.PO,2);: I.I.1..+.K. J.0.8: FW.FW(J)
: .".";: . W.WX . . FX.J . .".";..+.K. F
W.4 . X.F(J(PD$,I,1)): I.I.1: . 52126..,
.KX.F(J(PD$,I,1)).256.F(J(PD$,I.1,1)): I
.I.2._,.K. PW.NW . PW.W . X.0: . 1ST CRA
CK AT THIS WEEK FOR THIS PLAYER.Y, K. 62
800: PS(J).X: . J..,.K.: ...,.K.H(CR$,5)
;".";I(" ".D(W.1),2);: . W.WK . 52180.O,
.K." ";J(PO$,1.2.PO,2);..-JK. J.0.8: FW.
FW(J): .".";: . W.WX . . FX.J . .".";..-
LKX.PS(J): . 62800: . J.(-TK.: ..Q-.K.H(
CD$,WX.4): W.WX: . 52150: . 52300.M-.K.H
(CD$,21);H(CR$,4);BL$..-.K.H(CD$,21);H(C
R$,4);".POINTS THIS WEEK:.";PS(9)..-.K.H
(CD$,22);H(CR$,4);BL$.Z-.K.H(CD$,22);H(C
R$,4);".";.!..K.FX.1.52211,52212,52213,5
2214,52215,52216,52217,52218,52219:.5224
0.C..K."TOUCHDOWNS SCORED";: .52220.H..K
."AVERAGE YARDS PER TD";: .52220....K."T
D PASSES THROWN";: .52220....K."AVG YDS
PER TD PASS";: .52220.P..K."TOTAL YARDS
GAINED";: .52220....K."TOTAL YARDS PASSE
D";: .52220../.K."EXTRA POINTS SCORED";:
.52220.:/.K."FIELD GOALS SCORED";: .522
20.W/.K."AVERAGE YARDS PER FG";../.K.":
";CS$;:LE.FW(FX):.60300:F.FX:FX..1:.Y$."
".52200../.LPS(F).E(Y$): . 52200: . NEW
VALUE.Z/.LFX.F: . Y . 52242,52244: . 522
50..0.LFX.FX.1: . FX.8 . FX.0: . CURSOR
RIGHT..0.L. 52200.;0.LFX.FX.1: . FX.0 .
FX.8: . CURSOR LEFT.G0.L. 52200.E0.LZ.0:
. 60000: .H(CD$,10);..0.L.H(CR$,5);".DO
YOU WANT THESE STATISTICS".A0.L.H(CR$,5
);".WRITTEN TO THE DISK? (Y/N) ";..0 L.
62500: . X$."Y" . PW.WX: . 50400: . 5080
0..0$L...1LLPS(9).0: . (SO . 3) . 52304,
52306.[1NLPS(9).PS(9) . PS(0).6 . PS(2).
3: . 52310: . BASIC SCORING..1PLPS(9).PS
(9) . .(PS(4).10 . PS(5).20 . .001): . 5
2310: . PERF..1RL. PS(0).0 . PS(9).PS(9)
. .(PS(0).(PS(1).5.2.001)): . DIST..2TL
. PS(2).0 . PS(9).PS(9) . .(PS(2).(PS(3)
.5.2.001)): . DIST.\2VLPS(9).PS(9) . PS(
6): . (SO . 4) . 52314: . KICKER - EXTRA
PTS..2XLPS(9).PS(9) . PS(7).3: . 52320:
. BASIC KICKER FIELD GOALS..2ZL. PS(7).
0 . PS(9).PS(9) . .(PS(7).(PS(8).10.1.00
1)): . DIST..2`L...3`..".. .............
..........................";.63J..X.1.22
:.".....";:.:.".....";.H3T..X.1.36:."...
";:.:.".....";:.X.1.22:."...";:...3~..Z.
0..".......
.".N3...Z.0.Z.2.."...";H(CR$,20
.C(TE$).2);TE$.T3.....4D.."..";: LI.23:
TC$."PRESS <SPACE> TO CONTINUE": . 60150
.'4N..X$:.X$.." ".60110.-4X...=4...H(CD$
,LI);.\4...H(CR$,20.C(TC$).2);TC$: ..N4(
.Y$."": .198,0..42..X$: X.F(X$.G(0)): .X
$."".60210..4<..X.47.X.58.Z.0:.60240.H4>
..X.64.X.91.Z.128:.60240..4@..X.96.X.123
.Z.128:.60240..5B..X.192.X.219.Z.0:.6024
0..5D..X.32.X.39.Z.0:.60240.E5F..X.20..(
C(Y$).0)..60390:.60210: . DEL.\5H..X.13.
." ";:.60260.G5J..60210.}5P..(C(Y$).LE).
60210..5Z..X$;CS$;:Y$.Y$.G(F(X$).Z):.602
10..5D.Y$.H(Y$.BL$,LE): ..N5..Y$."":.198
,0:Y.1..5...X$:X.F(X$.G(0)):.X.0.60310..
6...X.47.X.58..(C(Y$).LE).60350.96...X.2
0..(C(Y$).0)..60390:.60310: . DEL.V6...X
.13.." ";:.60340: . CR.R6...X.95.Y.0:.60
330: . "_"..6 .Y.0.(X.29).2.(X.157):.Y.0
.Y.1:.60310: . CURSOR IF Y<>0.S6...(C(Y$
).0)..60390:.60330: . ERASE.Y6.....7...X
$;CS$;:Y$.Y$.X$:.60310: . NUMBER.&7...".
..";CS$;:Y$.H(Y$,C(Y$).1): ..A7..Z.0:T
E$."LOADING DATA".W7..TK.18: SR.0: BT.0:
. 63000: .1,E: .#2,X$: . 63110..7... E.
.0 . .: . DISK ERROR..7... X$.."" . E.99
: .: . NOT A LEAGUE DISK..7... 60000: ."
.............READING LEAGUE DATA"..8...
50100: . READ AND UNPACK LEAGUE DATA.:8.
..".........LEAGUE: .";LN$.U8...".......
..WEEK.";WK.1.W8..SH.1: . KEEP TEAM READ
S SHORT..8 .NT.TP(0,0): ."........READIN
G.";NT;".PROTEAMS".U8... NT.0 . 60840: .
CHECK PRO TEAM COUNT..9...TX.0.NT.1:.50
300:NN$(TX).TN$:NA$(TX).AB$:.: . TEAM NA
MES.G9..NT.TP(1,0): .".......READING.";N
T;".DREAMTEAMS".}9..NG.NT.2: . NT.0 . 60
850: . CHECK DREAM TEAM COUNT..9... TX.0
.NT.1: . 50310: DN$(TX).TN$: .: . TEAM N
AMES.S9...".......READING SCHEDULE"..9..
. 61200: . SCHEDULE TO SC$().%:..NP.TP(2
,0): .".......READING.";NP;".PLAYERS".N:
... NP.0 . 60870: . CHECK PLAYER COUNT..
:... PX.0.NP.1: PX(PX).PX: . 50500: .: .
PLAYER NAMES..:B.. PX(PX) WILL BE USED
FOR ALPHABETIZING, SOME DAY..:F.SH.0: .:
. FUTURE READS WILL BE FULL LENGTH.!;..
TK.1: SR.1: BT.0: . 63000: . OPEN SCHEDU
LE SECTOR.];... W.0.15: . T.0.15: .#2,X$
: SC$(W,T).H(X$.C0$,1): . T,W.};$.. 6311
0: . CLOSE AND RETURN.C;\.. PO . 62320,
62330, 62340, 62350, 62360: . PRINT POSI
TION PER PO..;F.."UNKNOWN POSITION": ...
;P.."QUARTERBACK": ...<Z.."TIGHT END": .
..<..."KICKER": ..1<..."WIDE RECEIVER":
..H<..."RUNNING BACK": ..Y<..Z.1: . 6000
0..<J..H(CD$,10);H(CR$,7);".SCREEN OR PR
INTER? <S/P> .";..<L.. X$: . X$."S" . X
$."S".C<N.. X$."P" . X$."P"..<P.. X$.."S
" . X$.."P" . 62410..=T.. X$."S" . .: .
ELSE CHECK PRINTER-..=...4,4,7: 4: . ST
.0 . .4,4,7: ..[=...: ."........PRINTER
IS NOT RESPONDING."..=..."......PLEASE C
HECK YOUR HARDWARE".D=..."......AND TRY
AGAIN.": X$."": . 60100: . WAIT, THEN RE
TURN..=$.. X$: . X$."Y" . X$."Y"..=... X
$."N" . X$."N"..>8.. X$.."N" . X$.."Y" .
62500.%>B..".";X$: .._>...".";: LI.21:
TC$."ENTER NUMBER (1-".OP$.")": . 60150.
.>..TC$."OR PRESS ".BA$: . 60160..>..TC$
." TO RETURN TO PREVIOUS MENU": . 60160.
I>...X$: . X$."_" . 62650..>... X$."1" .
X$.OP$ . 62630..>..OP.E(X$): ...?... L.
66 . . L.L.66: .4,"": ..0?... L.1.2: .4,
"": .: ..R?... L.L.66: .4,"": .: .4: 4:
..L?P..I(" ".D(X),FW);: ...?...1,8,15
: .2,8,2,"#"..?"..1,"U1";2;0;TK;SR:.1,"B
-P";2;BT: ..A?|..1,"U2";2;0;TK;SR.O?.. 2
: 1: ...?...63000: X$."": . OPEN AND PO
SITION..@... X.1.LN: .#2,Y$: . Y$."" . Y
$.C0$.J@..X$.X$.Y$: .: . 63110: . CLOSE
AND RETURN..@D..63000: . C(X$).LN . X$.H
(X$,LN): . OPEN AND POSITION..@N..2,X$;:
. 63100: . WRITE, CLOSE AND RETURN..@8.
SR.SR.IX: . 63820: . CALCULATE TEAM NAME
OR PLAYER DATA LOCATION.?AB.XX..(IX.8):
SR.SR.XX: IX.IX.8.XX: . CALCULATE PLAYE
R NAME LOCATION.QAL.. ST(TK)..SR . SR.SR
.ST(TK): TK.TK.1: . 63820..AV.. TK.17 .
SR.SR.1: . SR.ST(TK) . SR.0: TK.TK.1..A`
...WA...".": .808,B(251): .: .: . EXIT T
O BASIC...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL