BASEBALL STATS
FILE INFORMATION
FILENAME(S): BASEBALL STATS
FILE TYPE(S): PRG
FILE SIZE: 9.8K
FIRST SEEN: 2025-11-30 18:05:26
APPEARS ON: 2 disk(s)
FILE HASH
3ef883fbc62c64b06cc0707529d6f965fd0ad77a1e483b4d6a9bfedfad094bf6
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 61 S 2 | BASEBALL STATS | PRG | Xii | 13 | 4 | DOWNLOAD FILE |
| LOADSTAR 61 S 2 | BASEBALL STATS | PRG | Sailor, Ganheden | 13 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 19 1C 05 00 FE 25 3A E7 35 2C 31 3A E7 36 |.......%:.5,1:.6|
00000010: 2C 31 3A 8D 36 30 30 30 30 00 47 1C 0A 00 53 50 |,1:.60000.G...SP|
00000020: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
00000030: 20 20 22 3A 99 22 93 22 C7 28 32 37 29 3B 22 52 | ":.".".(27);"R|
00000040: 22 3B C7 28 31 34 29 00 98 1C 14 00 81 49 B2 30 |";.(14)......I.0|
00000050: A4 31 38 A9 32 3A 4A B2 49 AD 32 3A E7 35 2C 28 |.18.2:J.I.2:.5,(|
00000060: 4A AA 33 29 3A FE 1A 49 2C 4A 2C 35 39 AA 49 2C |J.3):..I,J,59.I,|
00000070: 31 34 AA 4A 2C 31 3A 87 41 24 3A 41 24 B2 22 20 |14.J,1:.A$:A$." |
00000080: 20 D4 45 41 4D 20 D3 54 41 54 53 20 2D 20 22 AA | .EAM .TATS - ".|
00000090: 41 24 3A 99 41 24 3A 82 00 B2 1C 1E 00 E7 35 2C |A$:.A$:.......5,|
000000A0: 31 33 3A FE 1A 32 30 2C 31 30 2C 37 39 2C 32 34 |13:..20,10,79,24|
000000B0: 2C 31 00 24 1D 28 00 E7 35 2C 32 3A 99 22 11 11 |,1.$.(..5,2:."..|
000000C0: 11 22 A6 31 38 29 22 12 20 20 20 20 20 20 20 20 |.".18)". |
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
000000E0: 3A 99 A6 31 38 29 22 12 20 20 C2 C1 D3 C5 C2 C1 |:..18)". ......|
000000F0: CC CC 20 D3 D4 C1 D4 D3 20 C2 CF CF CB 20 20 92 |.. ..... .... .|
00000100: 22 20 20 20 3A 99 A6 31 38 29 22 12 20 20 20 20 |" :..18)". |
00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000120: 20 20 20 22 00 8E 1D 32 00 E7 35 2C 31 36 3A 99 | "...2..5,16:.|
00000130: A6 31 38 29 22 12 20 20 46 4F 52 20 55 50 20 54 |.18)". FOR UP T|
00000140: 4F 20 31 30 20 54 45 41 4D 53 20 20 20 22 3A 99 |O 10 TEAMS ":.|
00000150: A6 31 38 29 22 12 20 20 20 20 20 4F 46 20 31 35 |.18)". OF 15|
00000160: 20 50 4C 41 59 45 52 53 20 20 20 20 20 22 3A 99 | PLAYERS ":.|
00000170: A6 31 38 29 22 12 20 20 20 20 20 20 20 20 20 20 |.18)". |
00000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 C6 | "..|
00000190: 1D 3C 00 E7 35 2C 33 3A 99 A6 31 38 29 22 12 20 |.<..5,3:..18)". |
000001A0: 20 42 59 20 22 3B 3A E7 35 2C 37 3A 99 22 12 20 | BY ";:.5,7:.". |
000001B0: CD 49 43 48 41 45 4C 20 CA 2E 20 D2 45 45 44 20 |.ICHAEL .. .EED |
000001C0: 20 22 3A FE 0B 33 00 27 1E 46 00 83 20 22 C3 41 | ":..3.'.F.. ".A|
000001D0: 52 44 49 4E 41 4C 53 22 2C 22 D9 41 4E 4B 45 45 |RDINALS",".ANKEE|
000001E0: 53 22 2C 22 C2 52 41 56 45 53 22 2C 22 C1 27 53 |S",".RAVES",".'S|
000001F0: 22 2C 22 D2 4F 59 41 4C 53 22 2C 22 CD 45 54 53 |",".OYALS",".ETS|
00000200: 22 2C 22 C1 53 54 52 4F 53 22 2C 22 CF 52 49 4F |",".STROS",".RIO|
00000210: 4C 45 53 22 2C 22 D0 41 44 52 45 53 22 2C 22 D0 |LES",".ADRES",".|
00000220: 49 52 41 54 45 53 22 00 63 1E 50 00 86 20 50 4C |IRATES".c.P.. PL|
00000230: 24 28 38 2C 31 35 29 2C 41 42 28 38 2C 31 35 29 |$(8,15),AB(8,15)|
00000240: 2C 48 28 38 2C 31 35 29 2C 44 42 28 38 2C 31 35 |,H(8,15),DB(8,15|
00000250: 29 2C 54 42 28 38 2C 31 35 29 2C 48 52 28 38 2C |),TB(8,15),HR(8,|
00000260: 31 35 29 00 AF 1E 5A 00 86 20 52 53 28 38 2C 31 |15)...Z.. RS(8,1|
00000270: 35 29 2C 53 4F 28 38 2C 31 35 29 2C 42 42 28 38 |5),SO(8,15),BB(8|
00000280: 2C 31 35 29 2C 41 56 28 38 2C 31 35 29 2C 52 42 |,15),AV(8,15),RB|
00000290: 28 38 2C 31 35 29 2C 41 4C 28 31 35 30 29 2C 41 |(8,15),AL(150),A|
000002A0: 4C 24 28 31 35 30 29 2C 54 24 28 31 35 30 29 00 |L$(150),T$(150).|
000002B0: D0 1E 64 00 FE 0D 23 31 2C 22 4C 45 41 47 55 45 |..d...#1,"LEAGUE|
000002C0: 22 3A 8B 44 53 B1 30 A7 FE 15 3A 89 31 33 36 30 |":.DS.0...:.1360|
000002D0: 00 33 1F 6E 00 84 31 2C 4E 54 3A 81 49 B2 31 A4 |.3.n..1,NT:.I.1.|
000002E0: 4E 54 3A 54 4E 28 49 29 B2 49 3A 84 31 2C 54 4D |NT:TN(I).I:.1,TM|
000002F0: 24 28 49 29 3A 84 31 2C 54 43 28 49 29 3A 84 31 |$(I):.1,TC(I):.1|
00000300: 2C 54 53 24 28 49 29 3A 84 31 2C 57 28 49 29 3A |,TS$(I):.1,W(I):|
00000310: 84 31 2C 4C 28 49 29 3A 84 31 2C 50 43 54 28 49 |.1,L(I):.1,PCT(I|
00000320: 29 3A 84 31 2C 47 42 28 49 29 3A 84 31 2C 54 48 |):.1,GB(I):.1,TH|
00000330: 28 49 29 00 54 1F 78 00 84 31 2C 54 52 28 49 29 |(I).T.x..1,TR(I)|
00000340: 3A 84 31 2C 54 41 28 49 29 3A 84 31 2C 54 28 49 |:.1,TA(I):.1,T(I|
00000350: 29 3A 82 49 00 70 1F 82 00 84 31 2C 44 31 24 3A |):.I.p....1,D1$:|
00000360: FE 0F 23 31 3A 4B B2 31 3A 44 32 24 B2 44 31 24 |..#1:K.1:D2$.D1$|
00000370: 00 A1 1F 8C 00 E7 35 2C 31 3A 99 22 13 13 12 93 |......5,1:."....|
00000380: 22 3A E7 35 2C 34 3A 53 24 B2 22 20 D3 54 41 4E |":.5,4:S$." .TAN|
00000390: 44 49 4E 47 53 20 41 53 20 4F 46 20 22 AA 44 31 |DINGS AS OF ".D1|
000003A0: 24 00 CA 1F 96 00 99 22 91 12 22 3B 53 24 3A E7 |$......"..";S$:.|
000003B0: 35 2C 32 3A FE 1A 31 2C 31 2C 34 30 2C 32 2C 31 |5,2:..1,1,40,2,1|
000003C0: 3A 58 B2 30 3A 8D 31 31 37 30 00 ED 1F A0 00 81 |:X.0:.1170......|
000003D0: 49 B2 31 A4 4E 54 3A FE 0D 23 38 2C 28 54 4D 24 |I.1.NT:..#8,(TM$|
000003E0: 28 49 29 29 3A 84 38 2C 4E 50 28 49 29 00 1D 20 |(I)):.8,NP(I).. |
000003F0: AA 00 81 4A B2 31 A4 4E 50 28 49 29 3A 84 38 2C |...J.1.NP(I):.8,|
00000400: 50 4C 24 28 49 2C 4A 29 3A 84 38 2C 41 42 28 49 |PL$(I,J):.8,AB(I|
00000410: 2C 4A 29 3A 84 38 2C 48 28 49 2C 4A 29 00 4D 20 |,J):.8,H(I,J).M |
00000420: B4 00 84 38 2C 44 42 28 49 2C 4A 29 3A 84 38 2C |...8,DB(I,J):.8,|
00000430: 54 42 28 49 2C 4A 29 3A 84 38 2C 48 52 28 49 2C |TB(I,J):.8,HR(I,|
00000440: 4A 29 3A 84 38 2C 52 53 28 49 2C 4A 29 00 7D 20 |J):.8,RS(I,J).} |
00000450: BE 00 84 38 2C 53 4F 28 49 2C 4A 29 3A 84 38 2C |...8,SO(I,J):.8,|
00000460: 42 42 28 49 2C 4A 29 3A 84 38 2C 41 56 28 49 2C |BB(I,J):.8,AV(I,|
00000470: 4A 29 3A 84 38 2C 52 42 28 49 2C 4A 29 00 8C 20 |J):.8,RB(I,J).. |
00000480: C8 00 82 4A 3A FE 0F 23 38 3A 82 49 00 E0 20 D2 |...J:..#8:.I.. .|
00000490: 00 E7 35 2C 31 3A FE 1A 34 31 2C 30 2C 37 39 2C |..5,1:..41,0,79,|
000004A0: 32 33 2C 31 3A E7 35 2C 32 3A FE 1A 35 31 2C 33 |23,1:.5,2:..51,3|
000004B0: 2C 36 39 2C 31 34 2C 31 3A E7 35 2C 34 3A FE 1A |,69,14,1:.5,4:..|
000004C0: 35 33 2C 34 2C 36 37 2C 31 33 2C 31 3A 99 22 11 |53,4,67,13,1:.".|
000004D0: 1D D7 48 49 43 48 20 CF 50 54 49 4F 4E 3F 11 22 |..HICH .PTION?."|
000004E0: 00 43 21 DC 00 99 22 1D 1D 1D 1D 12 C5 92 44 49 |.C!...".......DI|
000004F0: 54 22 3A 99 22 1D 1D 1D 1D 12 C1 92 44 44 20 C7 |T":.".......DD .|
00000500: 41 4D 45 53 22 3A 99 22 1D 1D 1D 1D 12 D0 92 52 |AMES":.".......R|
00000510: 49 4E 54 22 3A 99 22 1D 1D 1D 1D 12 D3 92 54 4F |INT":.".......TO|
00000520: 52 45 22 3A 99 22 1D 1D 1D 1D 12 D2 92 41 4E 4B |RE":.".......ANK|
00000530: 20 41 56 47 22 3A 99 22 1D 1D 1D 1D 12 D1 92 55 | AVG":.".......U|
00000540: 49 54 22 00 64 21 E6 00 A1 F9 41 24 3A 8B 28 41 |IT".d!....A$:.(A|
00000550: 24 B2 22 C5 22 29 B0 28 41 24 B2 22 45 22 29 A7 |$.".").(A$."E").|
00000560: 31 36 34 30 00 7F 21 F0 00 8B 28 41 24 B2 22 C1 |1640..!...(A$.".|
00000570: 22 29 B0 28 41 24 B2 22 41 22 29 A7 33 30 30 00 |").(A$."A").300.|
00000580: 9A 21 FA 00 8B 28 41 24 B2 22 D0 22 29 B0 28 41 |.!...(A$.".").(A|
00000590: 24 B2 22 50 22 29 A7 36 37 30 00 B5 21 04 01 8B |$."P").670..!...|
000005A0: 28 41 24 B2 22 D3 22 29 B0 28 41 24 B2 22 53 22 |(A$.".").(A$."S"|
000005B0: 29 A7 35 36 30 00 D1 21 0E 01 8B 28 41 24 B2 22 |).560..!...(A$."|
000005C0: D2 22 29 B0 28 41 24 B2 22 52 22 29 A7 31 39 32 |.").(A$."R").192|
000005D0: 30 00 03 22 18 01 8B 28 41 24 B2 22 D1 22 29 B0 |0.."...(A$.".").|
000005E0: 28 41 24 B2 22 51 22 29 A7 E7 35 2C 31 3A FE 1A |(A$."Q")..5,1:..|
000005F0: 34 31 2C 30 2C 37 39 2C 32 33 2C 31 3A E7 35 2C |41,0,79,23,1:.5,|
00000600: 34 3A 80 00 0C 22 22 01 89 32 33 30 00 4D 22 2C |4:...""..230.M",|
00000610: 01 E7 35 2C 31 31 3A FE 1A 34 35 2C 39 2C 37 35 |..5,11:..45,9,75|
00000620: 2C 31 31 2C 31 3A 85 22 C8 4F 57 20 4D 41 4E 59 |,11,1:.".OW MANY|
00000630: 20 47 41 4D 45 53 20 54 4F 20 45 4E 54 45 52 22 | GAMES TO ENTER"|
00000640: 3B 4E 47 3A 8B 4E 47 B2 30 A7 32 31 30 00 65 22 |;NG:.NG.0.210.e"|
00000650: 36 01 85 22 D4 4F 44 41 59 27 53 20 C4 41 54 45 |6..".ODAY'S .ATE|
00000660: 22 3B 44 32 24 00 B6 22 40 01 FE 1A 34 35 2C 31 |";D2$.."@...45,1|
00000670: 30 2C 37 35 2C 31 32 2C 31 3A 99 22 C5 4E 54 45 |0,75,12,1:.".NTE|
00000680: 52 20 4D 41 54 43 48 2D 55 50 53 20 57 49 54 48 |R MATCH-UPS WITH|
00000690: 20 54 45 41 4D 22 3A 99 22 4E 55 4D 42 45 52 53 | TEAM":."NUMBERS|
000006A0: 20 53 45 50 41 52 41 54 45 44 20 42 59 20 41 20 | SEPARATED BY A |
000006B0: 43 4F 4D 4D 41 22 00 E2 22 4A 01 81 51 B2 31 A4 |COMMA".."J..Q.1.|
000006C0: 4E 47 3A E7 35 2C 34 3A FE 1A 34 35 2C 31 32 2C |NG:.5,4:..45,12,|
000006D0: 37 35 2C 31 32 2C 31 3A 85 58 28 51 29 2C 59 28 |75,12,1:.X(Q),Y(|
000006E0: 51 29 00 2A 23 54 01 E7 35 2C 35 3A FE 1A 34 35 |Q).*#T..5,5:..45|
000006F0: 2C 31 36 2C 37 35 2C 31 38 2C 31 3A 99 54 4D 24 |,16,75,18,1:.TM$|
00000700: 28 58 28 51 29 29 22 20 56 53 20 22 54 4D 24 28 |(X(Q))" VS "TM$(|
00000710: 59 28 51 29 29 3A E7 35 2C 34 3A FE 1A 34 35 2C |Y(Q)):.5,4:..45,|
00000720: 31 37 2C 37 35 2C 31 39 2C 31 00 4E 23 5E 01 99 |17,75,19,1.N#^..|
00000730: 54 4D 24 28 58 28 51 29 29 3B 3A 85 53 31 3A 99 |TM$(X(Q));:.S1:.|
00000740: 54 4D 24 28 59 28 51 29 29 3B 3A 85 53 32 00 7D |TM$(Y(Q));:.S2.}|
00000750: 23 68 01 8B 53 31 B1 53 32 A7 57 28 58 28 51 29 |#h..S1.S2.W(X(Q)|
00000760: 29 B2 57 28 58 28 51 29 29 AA 31 3A 4C 28 59 28 |).W(X(Q)).1:L(Y(|
00000770: 51 29 29 B2 4C 28 59 28 51 29 29 AA 31 00 AC 23 |Q)).L(Y(Q)).1..#|
00000780: 72 01 8B 53 32 B1 53 31 A7 57 28 59 28 51 29 29 |r..S2.S1.W(Y(Q))|
00000790: B2 57 28 59 28 51 29 29 AA 31 3A 4C 28 58 28 51 |.W(Y(Q)).1:L(X(Q|
000007A0: 29 29 B2 4C 28 58 28 51 29 29 AA 31 00 E1 23 7C |)).L(X(Q)).1..#||
000007B0: 01 FE 26 3A FE 1A 34 37 2C 32 31 2C 37 33 2C 32 |..&:..47,21,73,2|
000007C0: 32 2C 31 3A 99 22 43 48 41 4E 47 45 20 54 4F 20 |2,1:."CHANGE TO |
000007D0: 34 30 2D 43 4F 4C 55 4D 4E 20 53 43 52 45 45 4E |40-COLUMN SCREEN|
000007E0: 22 00 31 24 86 01 43 B2 58 28 51 29 3A 49 B2 30 |".1$..C.X(Q):I.0|
000007F0: 3A E7 34 2C 54 43 28 43 29 3A 99 C7 28 32 37 29 |:.4,TC(C):..(27)|
00000800: 3B 22 58 22 3A 99 C7 28 31 34 29 3A 99 22 93 11 |;"X":..(14):."..|
00000810: 1D 1D 1D 22 54 4D 24 28 58 28 51 29 29 22 20 56 |..."TM$(X(Q))" V|
00000820: 53 20 22 54 4D 24 28 59 28 51 29 29 3A 8D 39 33 |S "TM$(Y(Q)):.93|
00000830: 30 00 AD 24 90 01 43 B2 59 28 51 29 3A 49 B2 30 |0..$..C.Y(Q):I.0|
00000840: 3A E7 34 2C 54 43 28 43 29 3A 99 22 93 11 1D 1D |:.4,TC(C):."....|
00000850: 1D 22 54 4D 24 28 59 28 51 29 29 22 20 56 53 20 |."TM$(Y(Q))" VS |
00000860: 22 54 4D 24 28 58 28 51 29 29 3A 8D 39 33 30 3A |"TM$(X(Q)):.930:|
00000870: FE 1A 31 2C 32 33 2C 33 38 2C 32 34 2C 31 3A 99 |..1,23,38,24,1:.|
00000880: 22 D2 45 54 55 52 4E 20 54 4F 20 38 30 2D 43 4F |".ETURN TO 80-CO|
00000890: 4C 55 4D 4E 20 53 43 52 45 45 4E 13 13 22 3A FE |LUMN SCREEN..":.|
000008A0: 0B 31 3A 99 C7 28 32 37 29 3B 22 58 22 00 C9 24 |.1:..(27);"X"..$|
000008B0: 9A 01 E7 35 2C 31 3A FE 1A 34 31 2C 31 35 2C 37 |...5,1:..41,15,7|
000008C0: 39 2C 32 33 2C 31 3A 82 51 00 F3 24 A4 01 FE 25 |9,23,1:.Q..$...%|
000008D0: 3A 81 49 B2 31 A4 4E 54 3A 8B 57 28 49 29 AA 4C |:.I.1.NT:.W(I).L|
000008E0: 28 49 29 B2 30 A7 50 43 54 28 49 29 B2 31 3A 89 |(I).0.PCT(I).1:.|
000008F0: 34 34 30 00 0F 25 AE 01 50 43 54 28 49 29 B2 57 |440..%..PCT(I).W|
00000900: 28 49 29 AD 28 57 28 49 29 AA 4C 28 49 29 29 00 |(I).(W(I).L(I)).|
00000910: 16 25 B8 01 82 49 00 2E 25 C2 01 81 49 B2 31 A4 |.%...I..%...I.1.|
00000920: 4E 54 AB 31 3A 81 4A B2 49 AA 31 A4 4E 54 00 45 |NT.1:.J.I.1.NT.E|
00000930: 25 CC 01 8B 50 43 54 28 49 29 B1 50 43 54 28 4A |%...PCT(I).PCT(J|
00000940: 29 A7 34 39 30 00 69 25 D6 01 48 B2 50 43 54 28 |).490.i%..H.PCT(|
00000950: 49 29 3A 50 43 54 28 49 29 B2 50 43 54 28 4A 29 |I):PCT(I).PCT(J)|
00000960: 3A 50 43 54 28 4A 29 B2 48 00 89 25 E0 01 48 B2 |:PCT(J).H..%..H.|
00000970: 54 4E 28 49 29 3A 54 4E 28 49 29 B2 54 4E 28 4A |TN(I):TN(I).TN(J|
00000980: 29 3A 54 4E 28 4A 29 B2 48 00 9F 25 EA 01 82 4A |):TN(J).H..%...J|
00000990: 3A 82 49 3A 47 42 28 54 4E 28 31 29 29 B2 30 00 |:.I:GB(TN(1)).0.|
000009A0: DD 25 F4 01 81 44 B2 32 A4 4E 54 3A 48 B2 28 54 |.%...D.2.NT:H.(T|
000009B0: 4E 28 31 29 29 3A 47 B2 28 54 4E 28 44 29 29 3A |N(1)):G.(TN(D)):|
000009C0: 47 42 28 47 29 B2 28 57 28 48 29 AB 57 28 47 29 |GB(G).(W(H).W(G)|
000009D0: AA 4C 28 47 29 AB 4C 28 48 29 29 AD 32 00 F3 25 |.L(G).L(H)).2..%|
000009E0: FE 01 8B 47 42 28 47 29 B3 2E 35 A7 47 42 28 47 |...GB(G)..5.GB(G|
000009F0: 29 B2 30 00 10 26 08 02 8B 28 47 42 28 47 29 B2 |).0..&...(GB(G).|
00000A00: B5 28 47 42 28 47 29 29 29 A7 4D 28 49 29 B2 30 |.(GB(G))).M(I).0|
00000A10: 00 2E 26 12 02 8B 28 47 42 28 47 29 B3 B1 B5 28 |..&...(GB(G)...(|
00000A20: 47 42 28 47 29 29 29 A7 4D 28 49 29 B2 31 00 6A |GB(G))).M(I).1.j|
00000A30: 26 1C 02 82 44 3A E7 35 2C 31 3A 99 22 13 13 12 |&...D:.5,1:."...|
00000A40: 93 22 3A E7 35 2C 34 3A 53 24 B2 22 20 D3 54 41 |.":.5,4:S$." .TA|
00000A50: 4E 44 49 4E 47 53 20 41 53 20 4F 46 20 22 AA 44 |NDINGS AS OF ".D|
00000A60: 32 24 3A 99 22 91 12 22 53 24 00 8E 26 26 02 E7 |2$:.".."S$..&&..|
00000A70: 35 2C 32 3A FE 1A 31 2C 31 2C 34 30 2C 32 2C 31 |5,2:..1,1,40,2,1|
00000A80: 3A 58 B2 30 3A 4B B2 30 3A 8D 31 31 37 30 00 A6 |:X.0:K.0:.1170..|
00000A90: 26 30 02 E7 35 2C 31 3A FE 1A 34 31 2C 30 2C 37 |&0..5,1:..41,0,7|
00000AA0: 39 2C 32 33 2C 31 00 EC 26 3A 02 FE 0D 23 31 2C |9,23,1..&:...#1,|
00000AB0: 22 40 4C 45 41 47 55 45 22 2C 57 3A 98 31 2C 4E |"@LEAGUE",W:.1,N|
00000AC0: 54 3A E7 35 2C 32 3A FE 1A 34 37 2C 31 30 2C 36 |T:.5,2:..47,10,6|
00000AD0: 36 2C 31 32 2C 30 3A 99 22 12 D3 54 4F 52 49 4E |6,12,0:."..TORIN|
00000AE0: 47 20 D3 54 41 4E 44 49 4E 47 53 22 00 1D 27 44 |G .TANDINGS"..'D|
00000AF0: 02 81 49 B2 31 A4 4E 54 3A 50 B2 54 4E 28 49 29 |..I.1.NT:P.TN(I)|
00000B00: 3A 98 31 2C 54 4D 24 28 50 29 3A 98 31 2C 54 43 |:.1,TM$(P):.1,TC|
00000B10: 28 50 29 3A 98 31 2C 54 53 24 28 50 29 00 67 27 |(P):.1,TS$(P).g'|
00000B20: 4E 02 98 31 2C 57 28 50 29 3A 98 31 2C 4C 28 50 |N..1,W(P):.1,L(P|
00000B30: 29 3A 98 31 2C 50 43 54 28 49 29 3A 98 31 2C 47 |):.1,PCT(I):.1,G|
00000B40: 42 28 50 29 3A 98 31 2C 54 48 28 50 29 3A 98 31 |B(P):.1,TH(P):.1|
00000B50: 2C 54 52 28 50 29 3A 98 31 2C 54 41 28 50 29 3A |,TR(P):.1,TA(P):|
00000B60: 98 31 2C 54 28 50 29 00 7A 27 58 02 82 49 3A 98 |.1,T(P).z'X..I:.|
00000B70: 31 2C 44 32 24 3A FE 0F 23 31 00 B3 27 62 02 E7 |1,D2$:..#1..'b..|
00000B80: 35 2C 31 3A FE 1A 34 32 2C 31 2C 37 39 2C 32 34 |5,1:..42,1,79,24|
00000B90: 2C 31 3A E7 35 2C 34 3A 99 22 12 D3 54 4F 52 49 |,1:.5,4:."..TORI|
00000BA0: 4E 47 20 D4 45 41 4D 20 D3 54 41 54 49 53 54 49 |NG .EAM .TATISTI|
00000BB0: 43 53 22 00 F2 27 6C 02 81 49 B2 31 A4 4E 54 3A |CS"..'l..I.1.NT:|
00000BC0: F2 28 54 4D 24 28 54 4E 28 49 29 29 29 3A FE 0D |.(TM$(TN(I))):..|
00000BD0: 23 38 2C 28 54 4D 24 28 54 4E 28 49 29 29 29 2C |#8,(TM$(TN(I))),|
00000BE0: 57 3A 45 B2 54 4E 28 49 29 3A 98 38 2C 4E 50 28 |W:E.TN(I):.8,NP(|
00000BF0: 45 29 00 22 28 76 02 81 4A B2 31 A4 4E 50 28 45 |E)."(v..J.1.NP(E|
00000C00: 29 3A 98 38 2C 50 4C 24 28 45 2C 4A 29 3A 98 38 |):.8,PL$(E,J):.8|
00000C10: 2C 41 42 28 45 2C 4A 29 3A 98 38 2C 48 28 45 2C |,AB(E,J):.8,H(E,|
00000C20: 4A 29 00 52 28 80 02 98 38 2C 44 42 28 45 2C 4A |J).R(...8,DB(E,J|
00000C30: 29 3A 98 38 2C 54 42 28 45 2C 4A 29 3A 98 38 2C |):.8,TB(E,J):.8,|
00000C40: 48 52 28 45 2C 4A 29 3A 98 38 2C 52 53 28 45 2C |HR(E,J):.8,RS(E,|
00000C50: 4A 29 00 82 28 8A 02 98 38 2C 53 4F 28 45 2C 4A |J)..(...8,SO(E,J|
00000C60: 29 3A 98 38 2C 42 42 28 45 2C 4A 29 3A 98 38 2C |):.8,BB(E,J):.8,|
00000C70: 41 56 28 45 2C 4A 29 3A 98 38 2C 52 42 28 45 2C |AV(E,J):.8,RB(E,|
00000C80: 4A 29 00 A2 28 94 02 82 4A 3A FE 0F 23 38 3A 99 |J)..(...J:..#8:.|
00000C90: 3A 99 22 12 BA 22 3A 82 49 3A FE 0B 32 3A 89 32 |:."..":.I:..2:.2|
00000CA0: 31 30 00 BB 28 9E 02 E7 35 2C 35 3A FE 1A 34 35 |10..(...5,5:..45|
00000CB0: 2C 31 30 2C 37 34 2C 31 32 2C 31 00 F4 28 A8 02 |,10,74,12,1..(..|
00000CC0: 99 22 20 C4 4F 20 59 4F 55 20 57 41 4E 54 20 41 |." .O YOU WANT A|
00000CD0: 20 50 52 49 4E 54 4F 55 54 20 4F 46 22 3A 85 22 | PRINTOUT OF":."|
00000CE0: CC 45 41 47 55 45 20 53 54 41 4E 44 49 4E 47 53 |.EAGUE STANDINGS|
00000CF0: 22 3B 42 24 00 04 29 B2 02 8B 42 24 B2 22 4E 22 |";B$..)...B$."N"|
00000D00: A7 37 32 30 00 3E 29 BC 02 9F 34 2C 34 2C 37 3A |.720.>)...4,4,7:|
00000D10: 98 34 3A 98 34 2C C7 28 31 34 29 3B 22 CC 45 41 |.4:.4,.(14);".EA|
00000D20: 47 55 45 20 D3 54 41 4E 44 49 4E 47 53 20 2D 20 |GUE .TANDINGS - |
00000D30: 22 3B 44 32 24 3A 98 34 2C 5A 24 3A 98 34 00 67 |";D2$:.4,Z$:.4.g|
00000D40: 29 C6 02 81 49 B2 31 A4 4E 54 3A 98 34 2C 54 53 |)...I.1.NT:.4,TS|
00000D50: 24 28 54 4E 28 49 29 29 3A 82 49 3A 98 34 2C C7 |$(TN(I)):.I:.4,.|
00000D60: 28 31 35 29 3A A0 34 00 9A 29 D0 02 85 22 91 C9 |(15):.4..)..."..|
00000D70: 4E 44 49 56 49 44 55 41 4C 20 53 54 41 54 49 53 |NDIVIDUAL STATIS|
00000D80: 54 49 43 53 20 28 59 2F 4E 29 22 3B 42 24 3A 8B |TICS (Y/N)";B$:.|
00000D90: 42 24 B2 22 4E 22 A7 32 31 30 00 BD 29 DA 02 85 |B$."N".210..)...|
00000DA0: 22 D7 48 49 43 48 20 54 45 41 4D 20 28 45 4E 54 |".HICH TEAM (ENT|
00000DB0: 45 52 20 4E 55 4D 42 45 52 29 22 3B 54 00 0B 2A |ER NUMBER)";T..*|
00000DC0: E4 02 9F 34 2C 34 2C 37 3A 98 34 3A 98 34 2C C7 |...4,4,7:.4:.4,.|
00000DD0: 28 31 34 29 3B 54 4D 24 28 54 4E 28 54 29 29 3B |(14);TM$(TN(T));|
00000DE0: 22 20 50 4C 41 59 45 52 20 53 54 41 54 53 20 41 |" PLAYER STATS A|
00000DF0: 53 20 4F 46 20 22 3B 44 32 24 3A 98 34 2C C7 28 |S OF ";D2$:.4,.(|
00000E00: 31 35 29 3A 41 B2 54 4E 28 54 29 00 94 2A EE 02 |15):A.TN(T)..*..|
00000E10: 98 34 2C 22 D0 CC C1 D9 C5 D2 A0 A0 A0 A0 20 20 |.4,".......... |
00000E20: 20 20 20 20 20 C1 C2 A0 A0 20 C8 20 A0 A0 D2 A0 | .... . ....|
00000E30: 20 32 C2 20 20 33 C2 A0 20 C8 D2 A0 20 C2 C2 A0 | 2. 3.. ... ...|
00000E40: 20 D3 CF A0 20 D2 C2 C9 20 20 20 C1 D6 C7 20 20 | ... ... ... |
00000E50: A0 22 3A 98 34 2C 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 |.":.4,".........|
00000E60: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000E70: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000E80: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000E90: A3 A3 A3 22 00 DA 2A F8 02 81 5A B2 31 A4 39 3A |..."..*...Z.1.9:|
00000EA0: 54 54 28 5A 29 B2 30 3A 82 5A 3A 81 49 B2 31 A4 |TT(Z).0:.Z:.I.1.|
00000EB0: 4E 50 28 41 29 3A 4C 4E 24 B2 50 4C 24 28 41 2C |NP(A):LN$.PL$(A,|
00000EC0: 49 29 AA C9 28 53 50 24 2C 28 31 35 AB C3 28 50 |I)..(SP$,(15..(P|
00000ED0: 4C 24 28 41 2C 49 29 29 29 29 00 F2 2A 02 03 54 |L$(A,I))))..*..T|
00000EE0: 54 28 31 29 B2 54 54 28 31 29 AA 41 42 28 41 2C |T(1).TT(1).AB(A,|
00000EF0: 49 29 00 09 2B 0C 03 54 54 28 32 29 B2 54 54 28 |I)..+..TT(2).TT(|
00000F00: 32 29 AA 48 28 41 2C 49 29 00 21 2B 16 03 54 54 |2).H(A,I).!+..TT|
00000F10: 28 33 29 B2 54 54 28 33 29 AA 52 53 28 41 2C 49 |(3).TT(3).RS(A,I|
00000F20: 29 00 39 2B 20 03 54 54 28 34 29 B2 54 54 28 34 |).9+ .TT(4).TT(4|
00000F30: 29 AA 44 42 28 41 2C 49 29 00 51 2B 2A 03 54 54 |).DB(A,I).Q+*.TT|
00000F40: 28 35 29 B2 54 54 28 35 29 AA 54 42 28 41 2C 49 |(5).TT(5).TB(A,I|
00000F50: 29 00 69 2B 34 03 54 54 28 36 29 B2 54 54 28 36 |).i+4.TT(6).TT(6|
00000F60: 29 AA 48 52 28 41 2C 49 29 00 81 2B 3E 03 54 54 |).HR(A,I)..+>.TT|
00000F70: 28 37 29 B2 54 54 28 37 29 AA 42 42 28 41 2C 49 |(7).TT(7).BB(A,I|
00000F80: 29 00 99 2B 48 03 54 54 28 38 29 B2 54 54 28 38 |)..+H.TT(8).TT(8|
00000F90: 29 AA 53 4F 28 41 2C 49 29 00 B1 2B 52 03 54 54 |).SO(A,I)..+R.TT|
00000FA0: 28 39 29 B2 54 54 28 39 29 AA 52 42 28 41 2C 49 |(9).TT(9).RB(A,I|
00000FB0: 29 00 26 2C 5C 03 98 34 2C 4C 4E 24 3B 3A 98 34 |).&,\..4,LN$;:.4|
00000FC0: 2C FB 22 23 23 23 23 22 3B 41 42 28 41 2C 49 29 |,."####";AB(A,I)|
00000FD0: 2C 48 28 41 2C 49 29 2C 52 53 28 41 2C 49 29 2C |,H(A,I),RS(A,I),|
00000FE0: 44 42 28 41 2C 49 29 2C 54 42 28 41 2C 49 29 2C |DB(A,I),TB(A,I),|
00000FF0: 48 52 28 41 2C 49 29 2C 42 42 28 41 2C 49 29 2C |HR(A,I),BB(A,I),|
00001000: 53 4F 28 41 2C 49 29 2C 52 42 28 41 2C 49 29 3B |SO(A,I),RB(A,I);|
00001010: 3A 98 34 2C FB 22 20 20 20 2E 23 23 23 22 3B 41 |:.4,." .###";A|
00001020: 56 28 41 2C 49 29 00 43 2C 66 03 82 49 3A 4C 4E |V(A,I).C,f..I:LN|
00001030: 24 B2 22 54 4F 54 41 4C 53 20 20 20 20 20 20 20 |$."TOTALS |
00001040: 20 20 22 00 85 2C 70 03 47 B2 B5 28 28 54 54 28 | "..,p.G..((TT(|
00001050: 32 29 AD 54 54 28 31 29 29 AC 31 30 30 30 29 3A |2).TT(1)).1000):|
00001060: 47 24 B2 22 20 20 20 2E 22 AA C4 28 47 29 3A 8B |G$." ."..(G):.|
00001070: 47 B3 31 30 30 A7 47 24 B2 22 20 20 20 2E 30 22 |G.100.G$." .0"|
00001080: AA C4 28 47 29 00 D9 2C 7A 03 47 B2 54 54 28 32 |..(G)..,z.G.TT(2|
00001090: 29 AD 54 54 28 31 29 3A 98 34 2C 22 A3 A3 A3 A3 |).TT(1):.4,"....|
000010A0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000010B0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000010C0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000010D0: A3 A3 A3 A3 A3 A3 A3 A3 22 00 45 2D 84 03 98 34 |........".E-...4|
000010E0: 2C 4C 4E 24 3B 3A 98 34 2C FB 22 23 23 23 23 22 |,LN$;:.4,."####"|
000010F0: 3B 54 54 28 31 29 2C 54 54 28 32 29 2C 54 54 28 |;TT(1),TT(2),TT(|
00001100: 33 29 2C 54 54 28 34 29 2C 54 54 28 35 29 2C 54 |3),TT(4),TT(5),T|
00001110: 54 28 36 29 2C 54 54 28 37 29 2C 54 54 28 38 29 |T(6),TT(7),TT(8)|
00001120: 2C 54 54 28 39 29 3B 3A 98 34 2C FB 22 20 20 20 |,TT(9);:.4,." |
00001130: 2E 23 23 23 22 3B 47 3A 98 34 3A 98 34 3A A0 34 |.###";G:.4:.4:.4|
00001140: 3A 89 32 31 30 00 78 2D 8E 03 FE 1A 34 35 2C 31 |:.210.x-....45,1|
00001150: 30 2C 37 39 2C 31 31 2C 31 3A 85 22 C1 4E 4F 54 |0,79,11,1:.".NOT|
00001160: 48 45 52 20 54 45 41 4D 22 3B 42 24 3A 8B 42 24 |HER TEAM";B$:.B$|
00001170: B2 22 59 22 A7 37 33 30 00 9A 2D 98 03 E7 35 2C |."Y".730..-...5,|
00001180: 31 3A FE 1A 34 31 2C 30 2C 37 39 2C 32 33 2C 31 |1:..41,0,79,23,1|
00001190: 3A E7 35 2C 34 3A 89 32 31 30 00 C3 2D A2 03 8F |:.5,4:.210..-...|
000011A0: 20 2A 2A 2A 20 43 48 41 4E 47 45 20 54 4F 20 34 | *** CHANGE TO 4|
000011B0: 30 2D 43 4F 4C 55 4D 4E 20 53 43 52 45 45 4E 20 |0-COLUMN SCREEN |
000011C0: 2A 2A 2A 00 F8 2D AC 03 E7 35 2C 31 3A 99 22 20 |***..-...5,1:." |
000011D0: 23 20 20 D0 CC C1 D9 C5 D2 20 20 20 C1 C2 20 20 |# ...... .. |
000011E0: D2 20 20 C8 20 32 C2 20 33 C2 20 C8 D2 20 C2 C2 |. . 2. 3. .. ..|
000011F0: 20 D3 CF 20 D2 C2 C9 22 00 1E 2E B6 03 99 22 91 | .. ..."......".|
00001200: 11 22 3A E7 35 2C 36 3A 81 56 B2 31 A4 4E 50 28 |.":.5,6:.V.1.NP(|
00001210: 43 29 3A 99 50 4C 24 28 43 2C 56 29 3A 82 00 50 |C):.PL$(C,V):..P|
00001220: 2E C0 03 81 20 57 B2 31 31 39 38 A4 28 31 31 39 |.... W.1198.(119|
00001230: 38 AA 34 30 AC 28 4E 50 28 43 29 AB 31 29 29 A9 |8.40.(NP(C).1)).|
00001240: 34 30 3A 81 5A B2 57 A4 28 57 AA 32 34 29 A9 33 |40:.Z.W.(W.24).3|
00001250: 00 70 2E CA 03 97 5A 2C 34 38 3A 97 28 5A AA 35 |.p....Z,48:.(Z.5|
00001260: 34 32 37 32 29 2C 30 3A 82 3A 82 3A E7 35 2C 34 |4272),0:.:.:.5,4|
00001270: 00 A2 2E D4 03 FE 1A 35 2C 32 31 2C 33 34 2C 32 |.......5,21,34,2|
00001280: 34 2C 31 3A 54 28 43 29 B2 30 3A 54 41 28 43 29 |4,1:T(C).0:TA(C)|
00001290: B2 30 3A 54 52 28 43 29 B2 30 3A 54 48 28 43 29 |.0:TR(C).0:TH(C)|
000012A0: B2 30 00 E6 2E DE 03 99 22 C3 48 41 4E 47 45 20 |.0......".HANGE |
000012B0: 53 54 41 54 53 20 57 2F 43 55 52 53 4F 52 2C 20 |STATS W/CURSOR, |
000012C0: 54 48 45 4E 20 22 3A 85 22 D2 C5 D4 D5 D2 CE 20 |THEN ":."...... |
000012D0: 4F 4E 20 27 3F 27 20 54 4F 20 53 41 56 45 2E 20 |ON '?' TO SAVE. |
000012E0: 13 13 22 3B 41 24 00 13 2F E8 03 49 B2 30 3A 81 |..";A$../..I.0:.|
000012F0: 57 B2 31 31 39 38 A4 28 31 31 39 38 AA 34 30 AC |W.1198.(1198.40.|
00001300: 28 4E 50 28 43 29 AB 31 29 29 A9 34 30 3A 49 B2 |(NP(C).1)).40:I.|
00001310: 49 AA 31 00 2F 2F F2 03 41 42 28 43 2C 49 29 B2 |I.1.//..AB(C,I).|
00001320: 41 42 28 43 2C 49 29 AA C2 28 57 29 AB 34 38 00 |AB(C,I)..(W).48.|
00001330: 4D 2F FC 03 52 53 28 43 2C 49 29 B2 52 53 28 43 |M/..RS(C,I).RS(C|
00001340: 2C 49 29 AA C2 28 57 AA 33 29 AB 34 38 00 69 2F |,I)..(W.3).48.i/|
00001350: 06 04 48 28 43 2C 49 29 B2 48 28 43 2C 49 29 AA |..H(C,I).H(C,I).|
00001360: C2 28 57 AA 36 29 AB 34 38 00 87 2F 10 04 44 42 |.(W.6).48../..DB|
00001370: 28 43 2C 49 29 B2 44 42 28 43 2C 49 29 AA C2 28 |(C,I).DB(C,I)..(|
00001380: 57 AA 39 29 AB 34 38 00 A6 2F 1A 04 54 42 28 43 |W.9).48../..TB(C|
00001390: 2C 49 29 B2 54 42 28 43 2C 49 29 AA C2 28 57 AA |,I).TB(C,I)..(W.|
000013A0: 31 32 29 AB 34 38 00 C5 2F 24 04 48 52 28 43 2C |12).48../$.HR(C,|
000013B0: 49 29 B2 48 52 28 43 2C 49 29 AA C2 28 57 AA 31 |I).HR(C,I)..(W.1|
000013C0: 35 29 AB 34 38 00 E4 2F 2E 04 42 42 28 43 2C 49 |5).48../..BB(C,I|
000013D0: 29 B2 42 42 28 43 2C 49 29 AA C2 28 57 AA 31 38 |).BB(C,I)..(W.18|
000013E0: 29 AB 34 38 00 03 30 38 04 53 4F 28 43 2C 49 29 |).48..08.SO(C,I)|
000013F0: B2 53 4F 28 43 2C 49 29 AA C2 28 57 AA 32 31 29 |.SO(C,I)..(W.21)|
00001400: AB 34 38 00 22 30 42 04 52 42 28 43 2C 49 29 B2 |.48."0B.RB(C,I).|
00001410: 52 42 28 43 2C 49 29 AA C2 28 57 AA 32 34 29 AB |RB(C,I)..(W.24).|
00001420: 34 38 00 37 30 4C 04 8B 41 42 28 43 2C 49 29 B2 |48.70L..AB(C,I).|
00001430: 30 A7 89 31 31 32 30 00 5F 30 56 04 41 56 28 43 |0..1120._0V.AV(C|
00001440: 2C 49 29 B2 B5 28 48 28 43 2C 49 29 AC 31 30 30 |,I)..(H(C,I).100|
00001450: 30 AD 41 42 28 43 2C 49 29 29 AD 31 30 30 30 00 |0.AB(C,I)).1000.|
00001460: 9C 30 60 04 54 48 28 43 29 B2 54 48 28 43 29 AA |.0`.TH(C).TH(C).|
00001470: 48 28 43 2C 49 29 3A 54 52 28 43 29 B2 54 52 28 |H(C,I):TR(C).TR(|
00001480: 43 29 AA 52 53 28 43 2C 49 29 3A 54 28 43 29 B2 |C).RS(C,I):T(C).|
00001490: 54 28 43 29 AA 41 42 28 43 2C 49 29 00 C0 30 6A |T(C).AB(C,I)..0j|
000014A0: 04 82 3A 54 41 28 43 29 B2 B5 28 54 48 28 43 29 |..:TA(C)..(TH(C)|
000014B0: AC 31 30 30 30 AD 54 28 43 29 29 AD 31 30 30 30 |.1000.T(C)).1000|
000014C0: 00 CB 30 74 04 E7 35 2C 32 3A 8E 00 EB 30 7E 04 |..0t..5,2:...0~.|
000014D0: E7 35 2C 31 3A FE 1A 34 33 2C 31 31 2C 37 30 2C |.5,1:..43,11,70,|
000014E0: 31 34 2C 31 3A E7 35 2C 32 3A 8E 00 11 31 88 04 |14,1:.5,2:...1..|
000014F0: 8F 2A 2A 2A 2A 2A 53 54 41 4E 44 49 4E 47 53 20 |.*****STANDINGS |
00001500: 53 55 42 52 4F 55 54 49 4E 45 2A 2A 2A 2A 2A 2A |SUBROUTINE******|
00001510: 2A 00 4C 31 92 04 5A 24 B2 22 11 20 20 20 D4 45 |*.L1..Z$.". .E|
00001520: 41 4D 20 20 20 20 20 D7 20 20 CC 20 20 20 D0 43 |AM . . .C|
00001530: 54 20 20 20 C8 20 20 20 D2 20 20 C1 56 47 20 20 |T . . .VG |
00001540: C7 C2 20 22 3A 99 5A 24 3A 58 B2 30 00 71 31 9C |.. ":.Z$:X.0.q1.|
00001550: 04 81 59 B2 34 A4 32 32 A9 32 3A 58 B2 58 AA 31 |..Y.4.22.2:X.X.1|
00001560: 3A 54 B2 54 4E 28 58 29 3A E7 35 2C 54 43 28 54 |:T.TN(X):.5,TC(T|
00001570: 29 00 93 31 A6 04 57 24 B2 C4 28 57 28 54 29 29 |)..1..W$..(W(T))|
00001580: 3A 8B 57 28 54 29 B3 31 30 A7 57 24 B2 22 20 22 |:.W(T).10.W$." "|
00001590: AA 57 24 00 B5 31 B0 04 4C 24 B2 C4 28 4C 28 54 |.W$..1..L$..(L(T|
000015A0: 29 29 3A 8B 4C 28 54 29 B3 31 30 A7 4C 24 B2 22 |)):.L(T).10.L$."|
000015B0: 20 22 AA 4C 24 00 F3 31 BA 04 50 43 54 24 B2 22 | ".L$..1..PCT$."|
000015C0: 20 20 2E 22 AA C9 28 C4 28 B5 28 31 30 30 30 AC | ."..(.(.(1000.|
000015D0: 50 43 54 28 58 29 29 29 2C 33 29 3A 8B 50 43 54 |PCT(X))),3):.PCT|
000015E0: 28 58 29 B2 30 A7 50 43 54 24 B2 22 20 20 2E 30 |(X).0.PCT$." .0|
000015F0: 30 30 22 00 0D 32 C4 04 8B 4C 28 54 29 B2 30 A7 |00"..2...L(T).0.|
00001600: 50 43 54 24 B2 22 20 31 2E 30 30 30 22 00 32 32 |PCT$." 1.000".22|
00001610: CE 04 47 42 24 B2 C4 28 47 42 28 54 29 29 3A 8B |..GB$..(GB(T)):.|
00001620: 47 42 28 54 29 B2 30 A7 47 42 24 B2 22 20 20 2D |GB(T).0.GB$." -|
00001630: 20 22 00 4B 32 D8 04 8B 4D 28 54 29 B2 30 A7 47 | ".K2...M(T).0.G|
00001640: 42 24 B2 22 20 20 22 AA 47 42 24 00 60 32 E2 04 |B$." ".GB$.`2..|
00001650: 47 42 24 B2 22 20 22 AA C9 28 47 42 24 2C 33 29 |GB$." "..(GB$,3)|
00001660: 00 99 32 EC 04 48 24 B2 C4 28 54 48 28 54 29 29 |..2..H$..(TH(T))|
00001670: 3A 8B 54 48 28 54 29 B3 31 30 30 A7 48 24 B2 22 |:.TH(T).100.H$."|
00001680: 20 22 AA 48 24 3A 8B 54 48 28 54 29 B3 31 30 A7 | ".H$:.TH(T).10.|
00001690: 48 24 B2 22 20 22 AA 48 24 00 D2 32 F6 04 52 24 |H$." ".H$..2..R$|
000016A0: B2 C4 28 54 52 28 54 29 29 3A 8B 54 52 28 54 29 |..(TR(T)):.TR(T)|
000016B0: B3 31 30 30 A7 52 24 B2 22 20 22 AA 52 24 3A 8B |.100.R$." ".R$:.|
000016C0: 54 52 28 54 29 B3 31 30 A7 52 24 B2 22 20 22 AA |TR(T).10.R$." ".|
000016D0: 52 24 00 F9 32 00 05 8B 54 28 54 29 B2 30 A7 54 |R$..2...T(T).0.T|
000016E0: 41 28 54 29 B2 30 3A 41 56 47 24 B2 22 20 2E 30 |A(T).0:AVG$." .0|
000016F0: 30 30 22 3A 89 31 33 31 30 00 38 33 0A 05 54 41 |00":.1310.83..TA|
00001700: 28 54 29 B2 B5 28 31 30 30 30 AC 54 48 28 54 29 |(T)..(1000.TH(T)|
00001710: AD 54 28 54 29 29 AD 31 30 30 30 3A 41 56 47 24 |.T(T)).1000:AVG$|
00001720: B2 22 20 2E 22 AA C9 28 C4 28 31 30 30 30 AC 54 |." ."..(.(1000.T|
00001730: 41 28 54 29 29 2C 33 29 00 5B 33 14 05 8B 54 41 |A(T)),3).[3...TA|
00001740: 28 54 29 B3 2E 31 A7 41 56 47 24 B2 22 20 2E 30 |(T)..1.AVG$." .0|
00001750: 22 AA C9 28 41 56 47 24 2C 32 29 00 9D 33 1E 05 |"..(AVG$,2)..3..|
00001760: 54 53 24 28 54 29 B2 54 4D 24 28 54 29 AA C8 28 |TS$(T).TM$(T)..(|
00001770: 53 50 24 2C 28 31 30 AB C3 28 54 4D 24 28 54 29 |SP$,(10..(TM$(T)|
00001780: 29 29 29 AA 57 24 AA 4C 24 AA 50 43 54 24 AA 48 |))).W$.L$.PCT$.H|
00001790: 24 AA 52 24 AA 41 56 47 24 AA 47 42 24 00 C8 33 |$.R$.AVG$.GB$..3|
000017A0: 28 05 FE 1A 31 2C 28 59 AB 32 29 2C 34 30 2C 59 |(...1,(Y.2),40,Y|
000017B0: 2C 31 3A 99 58 3A 99 54 53 24 28 54 29 3A 8B 4E |,1:.X:.TS$(T):.N|
000017C0: 54 B2 58 A7 31 33 34 30 00 CF 33 32 05 82 59 00 |T.X.1340..32..Y.|
000017D0: F0 33 3C 05 E7 35 2C 31 3A FE 1A 31 2C 59 2C 34 |.3<..5,1:..1,Y,4|
000017E0: 30 2C 59 2C 31 3A 4B B2 30 3A E7 35 2C 34 3A 8E |0,Y,1:K.0:.5,4:.|
000017F0: 00 0C 34 46 05 8F 20 42 55 49 4C 44 20 4E 45 57 |..4F.. BUILD NEW|
00001800: 20 4C 45 41 47 55 45 20 46 49 4C 45 00 50 34 50 | LEAGUE FILE.P4P|
00001810: 05 E7 35 2C 37 3A FE 1A 32 30 2C 37 2C 35 39 2C |..5,7:..20,7,59,|
00001820: 31 34 2C 31 3A E7 35 2C 32 3A FE 1A 32 31 2C 38 |14,1:.5,2:..21,8|
00001830: 2C 35 38 2C 31 33 2C 31 3A E7 35 2C 33 3A FE 1A |,58,13,1:.5,3:..|
00001840: 32 32 2C 39 2C 35 37 2C 31 32 2C 31 3A 4B B2 31 |22,9,57,12,1:K.1|
00001850: 00 8D 34 5A 05 E7 35 2C 34 3A FE 1A 32 33 2C 31 |..4Z..5,4:..23,1|
00001860: 30 2C 35 36 2C 31 31 2C 31 3A 99 22 C8 4F 57 20 |0,56,11,1:.".OW |
00001870: 4D 41 4E 59 20 54 45 41 4D 53 20 49 4E 20 54 48 |MANY TEAMS IN TH|
00001880: 45 20 4C 45 41 47 55 45 22 3A 85 4E 54 00 C4 34 |E LEAGUE":.NT..4|
00001890: 64 05 E7 35 2C 32 3A FE 1A 31 2C 31 2C 31 30 2C |d..5,2:..1,1,10,|
000018A0: 31 30 2C 31 3A 99 22 11 31 3D D2 45 44 22 3A 99 |10,1:.".1=.ED":.|
000018B0: 22 32 3D CD 41 52 4F 4F 4E 22 3A 99 22 33 3D C2 |"2=.AROON":."3=.|
000018C0: 4C 55 45 22 00 02 35 6E 05 99 22 34 3D D9 45 4C |LUE"..5n.."4=.EL|
000018D0: 4C 4F 57 22 3A 99 22 35 3D CF 52 41 4E 47 45 22 |LOW":."5=.RANGE"|
000018E0: 3A 99 22 36 3D C7 52 41 59 22 3A 99 22 37 3D CC |:."6=.RAY":."7=.|
000018F0: 54 20 C2 4C 55 45 22 3A 99 22 38 3D D7 48 49 54 |T .LUE":."8=.HIT|
00001900: 45 22 00 65 35 78 05 FE 1A 32 33 2C 31 30 2C 35 |E".e5x...23,10,5|
00001910: 36 2C 31 31 2C 31 3A 99 22 20 20 20 C5 4E 54 45 |6,11,1:." .NTE|
00001920: 52 20 54 45 41 4D 20 4E 41 4D 45 20 41 4E 44 20 |R TEAM NAME AND |
00001930: 43 4F 4C 4F 52 22 3A 99 22 20 53 45 50 41 52 41 |COLOR":." SEPARA|
00001940: 54 45 44 20 42 59 20 41 20 43 4F 4D 4D 41 20 28 |TED BY A COMMA (|
00001950: 41 54 20 50 52 4F 4D 50 54 29 91 22 3A FE 0B 35 |AT PROMPT).":..5|
00001960: 3A 99 22 93 22 00 BB 35 82 05 81 49 B2 31 A4 4E |:."."..5...I.1.N|
00001970: 54 3A 99 22 D4 45 41 4D 20 23 22 3B 49 3B 22 20 |T:.".EAM #";I;" |
00001980: 20 28 CE 41 4D 45 2C C3 4F 4C 4F 52 23 29 22 3A | (.AME,.OLOR#)":|
00001990: 85 54 4D 24 28 49 29 2C 54 43 28 49 29 3A 54 53 |.TM$(I),TC(I):TS|
000019A0: 24 28 49 29 B2 54 4D 24 28 49 29 AA 22 2A 2A 2A |$(I).TM$(I)."***|
000019B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 EE 35 8C 05 |**********"..5..|
000019C0: 91 54 43 28 49 29 89 31 34 33 30 2C 31 34 34 30 |.TC(I).1430,1440|
000019D0: 2C 31 34 35 30 2C 31 34 36 30 2C 31 34 37 30 2C |,1450,1460,1470,|
000019E0: 31 34 38 30 2C 31 34 39 30 2C 31 35 30 30 00 00 |1480,1490,1500..|
000019F0: 36 96 05 54 43 28 49 29 B2 33 3A 89 31 35 31 30 |6..TC(I).3:.1510|
00001A00: 00 12 36 A0 05 54 43 28 49 29 B2 35 3A 89 31 35 |..6..TC(I).5:.15|
00001A10: 31 30 00 24 36 AA 05 54 43 28 49 29 B2 37 3A 89 |10.$6..TC(I).7:.|
00001A20: 31 35 31 30 00 36 36 B4 05 54 43 28 49 29 B2 38 |1510.66..TC(I).8|
00001A30: 3A 89 31 35 31 30 00 49 36 BE 05 54 43 28 49 29 |:.1510.I6..TC(I)|
00001A40: B2 31 30 3A 89 31 35 31 30 00 5C 36 C8 05 54 43 |.10:.1510.\6..TC|
00001A50: 28 49 29 B2 31 33 3A 89 31 35 31 30 00 6F 36 D2 |(I).13:.1510.o6.|
00001A60: 05 54 43 28 49 29 B2 31 35 3A 89 31 35 31 30 00 |.TC(I).15:.1510.|
00001A70: 7C 36 DC 05 54 43 28 49 29 B2 31 36 00 82 36 E6 ||6..TC(I).16..6.|
00001A80: 05 82 00 A5 36 F0 05 99 22 11 11 D7 48 41 54 20 |....6..."...HAT |
00001A90: 49 53 20 54 4F 44 41 59 27 53 20 44 41 54 45 22 |IS TODAY'S DATE"|
00001AA0: 3A 85 44 31 24 00 FA 36 FA 05 FE 0D 23 31 2C 22 |:.D1$..6....#1,"|
00001AB0: 4C 45 41 47 55 45 22 2C 57 3A 98 31 2C 4E 54 3A |LEAGUE",W:.1,NT:|
00001AC0: 81 49 B2 31 A4 4E 54 3A 98 31 2C 54 4D 24 28 49 |.I.1.NT:.1,TM$(I|
00001AD0: 29 3A 98 31 2C 54 43 28 49 29 3A 98 31 2C 54 53 |):.1,TC(I):.1,TS|
00001AE0: 24 28 49 29 3A 44 B2 30 3A 81 51 B2 31 A4 38 3A |$(I):D.0:.Q.1.8:|
00001AF0: 98 31 2C 44 3A 82 51 3A 82 49 00 0A 37 04 06 98 |.1,D:.Q:.I..7...|
00001B00: 31 2C 44 31 24 3A FE 0F 23 31 00 30 37 0E 06 81 |1,D1$:..#1.07...|
00001B10: 20 58 B2 31 A4 4E 54 3A E7 35 2C 54 43 28 58 29 | X.1.NT:.5,TC(X)|
00001B20: 3A FE 1A 32 33 2C 31 30 2C 35 36 2C 31 31 2C 31 |:..23,10,56,11,1|
00001B30: 00 70 37 18 06 99 54 4D 24 28 58 29 3A 85 22 20 |.p7...TM$(X):." |
00001B40: C8 4F 57 20 4D 41 4E 59 20 50 4C 41 59 45 52 53 |.OW MANY PLAYERS|
00001B50: 22 3B 4E 50 28 58 29 3A FE 0D 23 38 2C 28 54 4D |";NP(X):..#8,(TM|
00001B60: 24 28 58 29 29 2C 57 3A 98 38 2C 4E 50 28 58 29 |$(X)),W:.8,NP(X)|
00001B70: 00 A0 37 22 06 FE 1A 32 32 2C 39 2C 35 37 2C 31 |..7"...22,9,57,1|
00001B80: 32 2C 31 3A 99 22 20 20 20 22 54 4D 24 28 58 29 |2,1:." "TM$(X)|
00001B90: 3A FE 1A 32 33 2C 31 30 2C 35 36 2C 31 31 2C 31 |:..23,10,56,11,1|
00001BA0: 00 D0 37 2C 06 81 4A B2 31 A4 4E 50 28 58 29 3A |..7,..J.1.NP(X):|
00001BB0: 85 22 CE 41 4D 45 3A 22 3B 50 4C 24 28 58 2C 4A |.".AME:";PL$(X,J|
00001BC0: 29 3A 85 22 CE 55 4D 42 45 52 3A 22 3B 41 3A 99 |):.".UMBER:";A:.|
00001BD0: 00 F1 37 36 06 41 24 B2 C4 28 41 29 3A 8B 41 B3 |..76.A$..(A):.A.|
00001BE0: 31 30 A7 41 24 B2 22 30 22 AA C9 28 41 24 2C 31 |10.A$."0"..(A$,1|
00001BF0: 29 00 1A 38 40 06 50 4C 24 28 58 2C 4A 29 B2 41 |)..8@.PL$(X,J).A|
00001C00: 24 AA 22 2D 22 AA 50 4C 24 28 58 2C 4A 29 3A 98 |$."-".PL$(X,J):.|
00001C10: 38 2C 50 4C 24 28 58 2C 4A 29 00 32 38 4A 06 41 |8,PL$(X,J).28J.A|
00001C20: B2 30 3A 81 5A B2 31 A4 31 30 3A 98 38 2C 41 3A |.0:.Z.1.10:.8,A:|
00001C30: 82 5A 00 41 38 54 06 82 4A 3A FE 0F 23 38 3A 82 |.Z.A8T..J:..#8:.|
00001C40: 58 00 58 38 5E 06 FE 0D 23 31 2C 22 4C 45 41 47 |X.X8^...#1,"LEAG|
00001C50: 55 45 22 3A 89 31 31 30 00 88 38 68 06 E7 35 2C |UE":.110..8h..5,|
00001C60: 37 3A FE 1A 34 36 2C 38 2C 37 34 2C 31 35 2C 31 |7:..46,8,74,15,1|
00001C70: 3A 85 22 20 D7 48 49 43 48 20 54 45 41 4D 20 CE |:." .HICH TEAM .|
00001C80: 55 4D 42 45 52 22 3B 49 00 D4 38 72 06 E7 35 2C |UMBER";I..8r..5,|
00001C90: 31 35 3A FE 1A 34 36 2C 39 2C 37 34 2C 31 35 2C |15:..46,9,74,15,|
00001CA0: 31 3A 85 22 D7 48 49 43 48 20 50 4C 41 59 45 52 |1:.".HICH PLAYER|
00001CB0: 20 28 55 4E 49 46 4F 52 4D 20 23 29 22 3B 41 24 | (UNIFORM #)";A$|
00001CC0: 3A 8B C5 28 41 24 29 B3 31 30 A7 41 24 B2 22 30 |:..(A$).10.A$."0|
00001CD0: 22 AA 41 24 00 FA 38 7C 06 81 4A B2 31 A4 4E 50 |".A$..8|..J.1.NP|
00001CE0: 28 49 29 3A 8B 41 24 B2 C8 28 50 4C 24 28 49 2C |(I):.A$..(PL$(I,|
00001CF0: 4A 29 2C 32 29 A7 31 37 34 30 00 2A 39 86 06 82 |J),2).1740.*9...|
00001D00: 4A 3A 85 22 93 C9 53 20 54 48 49 53 20 41 20 4E |J:."..S THIS A N|
00001D10: 45 57 20 50 4C 41 59 45 52 22 3B 42 24 3A 8B 42 |EW PLAYER";B$:.B|
00001D20: 24 B2 22 4E 22 A7 31 36 35 30 00 67 39 90 06 4E |$."N".1650.g9..N|
00001D30: 50 28 49 29 B2 4E 50 28 49 29 AA 31 3A 85 22 D0 |P(I).NP(I).1:.".|
00001D40: 4C 41 59 45 52 27 53 20 4E 41 4D 45 22 3B 50 24 |LAYER'S NAME";P$|
00001D50: 3A 50 4C 24 28 49 2C 4E 50 28 49 29 29 B2 41 24 |:PL$(I,NP(I)).A$|
00001D60: AA 22 2D 22 AA 50 24 00 9F 39 9A 06 85 22 93 C1 |."-".P$..9..."..|
00001D70: 44 44 20 41 4E 4F 54 48 45 52 20 50 4C 41 59 45 |DD ANOTHER PLAYE|
00001D80: 52 20 54 4F 20 54 48 49 53 20 54 45 41 4D 22 3B |R TO THIS TEAM";|
00001D90: 41 24 3A 8B 41 24 B2 22 4E 22 A7 31 37 32 30 00 |A$:.A$."N".1720.|
00001DA0: CE 39 A4 06 85 22 93 D7 48 41 54 20 55 4E 49 46 |.9..."..HAT UNIF|
00001DB0: 4F 52 4D 20 23 20 22 3B 41 24 3A 8B C5 28 41 24 |ORM # ";A$:..(A$|
00001DC0: 29 B3 31 30 A7 41 24 B2 22 30 22 AA 41 24 00 D8 |).10.A$."0".A$..|
00001DD0: 39 AE 06 89 31 36 38 30 00 12 3A B8 06 FE 1A 34 |9...1680..:....4|
00001DE0: 37 2C 39 2C 37 33 2C 31 35 2C 31 3A 85 22 C1 44 |7,9,73,15,1:.".D|
00001DF0: 44 20 54 4F 20 41 4E 4F 54 48 45 52 20 54 45 41 |D TO ANOTHER TEA|
00001E00: 4D 22 3B 41 24 3A 8B 41 24 B2 22 59 22 A7 31 36 |M";A$:.A$."Y".16|
00001E10: 34 30 00 1B 3A C2 06 89 32 31 30 00 3D 3A CC 06 |40..:...210.=:..|
00001E20: E7 35 2C 37 3A FE 1A 34 36 2C 38 2C 37 34 2C 31 |.5,7:..46,8,74,1|
00001E30: 35 2C 31 3A 99 50 4C 24 28 49 2C 4A 29 00 56 3A |5,1:.PL$(I,J).V:|
00001E40: D6 06 E7 35 2C 31 35 3A FE 1A 34 38 2C 39 2C 37 |...5,15:..48,9,7|
00001E50: 32 2C 31 34 2C 31 00 D8 3A E0 06 99 22 20 20 20 |2,14,1..:..." |
00001E60: 20 12 31 92 3D C1 C2 20 20 20 20 12 36 92 3D C8 | .1.=.. .6.=.|
00001E70: D2 22 3A 99 22 20 20 20 20 12 32 92 3D C8 49 54 |.":." .2.=.IT|
00001E80: 53 20 20 12 37 92 3D D3 CF 22 3A 99 22 20 20 20 |S .7.=..":." |
00001E90: 20 12 33 92 3D D2 55 4E 53 20 20 12 38 92 3D D7 | .3.=.UNS .8.=.|
00001EA0: 41 4C 4B 53 22 3A 99 22 20 20 20 20 12 34 92 3D |ALKS":." .4.=|
00001EB0: 32 C2 20 20 20 20 12 39 92 3D D2 C2 C9 22 3A 99 |2. .9.=...":.|
00001EC0: 22 20 20 20 20 12 35 92 3D 33 C2 20 20 20 12 31 |" .5.=3. .1|
00001ED0: 30 92 3D CE 41 4D 45 22 00 EA 3A EA 06 85 43 3A |0.=.AME"..:...C:|
00001EE0: 8B 43 B1 31 30 A7 31 37 37 30 00 23 3B F4 06 91 |.C.10.1770.#;...|
00001EF0: 43 89 31 37 39 30 2C 31 38 30 30 2C 31 38 31 30 |C.1790,1800,1810|
00001F00: 2C 31 38 32 30 2C 31 38 33 30 2C 31 38 34 30 2C |,1820,1830,1840,|
00001F10: 31 38 35 30 2C 31 38 36 30 2C 31 38 37 30 2C 31 |1850,1860,1870,1|
00001F20: 38 38 30 00 5C 3B FE 06 E8 3A 99 22 C3 55 52 52 |880.\;...:.".URR|
00001F30: 45 4E 54 20 C1 C2 22 3A 99 41 42 28 49 2C 4A 29 |ENT ..":.AB(I,J)|
00001F40: 3A 99 22 C3 4F 52 52 45 43 54 20 23 22 3A 85 41 |:.".ORRECT #":.A|
00001F50: 42 28 49 2C 4A 29 3A 89 31 38 39 30 00 95 3B 08 |B(I,J):.1890..;.|
00001F60: 07 E8 3A 99 22 C3 55 52 52 45 4E 54 20 C8 49 54 |..:.".URRENT .IT|
00001F70: 53 22 3A 99 48 28 49 2C 4A 29 3A 99 22 C3 4F 52 |S":.H(I,J):.".OR|
00001F80: 52 45 43 54 20 23 22 3A 85 48 28 49 2C 4A 29 3A |RECT #":.H(I,J):|
00001F90: 89 31 38 39 30 00 D0 3B 12 07 E8 3A 99 22 C3 55 |.1890..;...:.".U|
00001FA0: 52 52 45 4E 54 20 D2 55 4E 53 22 3A 99 52 53 28 |RRENT .UNS":.RS(|
00001FB0: 49 2C 4A 29 3A 99 22 C3 4F 52 52 45 43 54 20 23 |I,J):.".ORRECT #|
00001FC0: 22 3A 85 52 53 28 49 2C 4A 29 3A 89 31 38 39 30 |":.RS(I,J):.1890|
00001FD0: 00 09 3C 1C 07 E8 3A 99 22 C3 55 52 52 45 4E 54 |..<...:.".URRENT|
00001FE0: 20 32 C2 22 3A 99 44 42 28 49 2C 4A 29 3A 99 22 | 2.":.DB(I,J):."|
00001FF0: C3 4F 52 52 45 43 54 20 23 22 3A 85 44 42 28 49 |.ORRECT #":.DB(I|
00002000: 2C 4A 29 3A 89 31 38 39 30 00 42 3C 26 07 E8 3A |,J):.1890.B<&..:|
00002010: 99 22 C3 55 52 52 45 4E 54 20 33 C2 22 3A 99 54 |.".URRENT 3.":.T|
00002020: 42 28 49 2C 4A 29 3A 99 22 C3 4F 52 52 45 43 54 |B(I,J):.".ORRECT|
00002030: 20 23 22 3A 85 54 42 28 49 2C 4A 29 3A 89 31 38 | #":.TB(I,J):.18|
00002040: 39 30 00 7B 3C 30 07 E8 3A 99 22 C3 55 52 52 45 |90.{<0..:.".URRE|
00002050: 4E 54 20 C8 D2 22 3A 99 48 52 28 49 2C 4A 29 3A |NT ..":.HR(I,J):|
00002060: 99 22 C3 4F 52 52 45 43 54 20 23 22 3A 85 48 52 |.".ORRECT #":.HR|
00002070: 28 49 2C 4A 29 3A 89 31 38 39 30 00 B4 3C 3A 07 |(I,J):.1890..<:.|
00002080: E8 3A 99 22 C3 55 52 52 45 4E 54 20 D3 CF 22 3A |.:.".URRENT ..":|
00002090: 99 53 4F 28 49 2C 4A 29 3A 99 22 C3 4F 52 52 45 |.SO(I,J):.".ORRE|
000020A0: 43 54 20 23 22 3A 85 53 4F 28 49 2C 4A 29 3A 89 |CT #":.SO(I,J):.|
000020B0: 31 38 39 30 00 F0 3C 44 07 E8 3A 99 22 C3 55 52 |1890..<D..:.".UR|
000020C0: 52 45 4E 54 20 D7 41 4C 4B 53 22 3A 99 42 42 28 |RENT .ALKS":.BB(|
000020D0: 49 2C 4A 29 3A 99 22 C3 4F 52 52 45 43 54 20 23 |I,J):.".ORRECT #|
000020E0: 22 3A 85 42 42 28 49 2C 4A 29 3A 89 31 38 39 30 |":.BB(I,J):.1890|
000020F0: 00 2B 3D 4E 07 E8 3A 99 22 C3 55 52 52 45 4E 54 |.+=N..:.".URRENT|
00002100: 20 D2 C2 C9 53 22 3A 99 52 42 28 49 2C 4A 29 3A | ...S":.RB(I,J):|
00002110: 99 22 C3 4F 52 52 45 43 54 20 23 22 3A 85 52 42 |.".ORRECT #":.RB|
00002120: 28 49 2C 4A 29 3A 89 31 38 39 30 00 6D 3D 58 07 |(I,J):.1890.m=X.|
00002130: E8 3A 99 22 C3 55 52 52 45 4E 54 20 D3 50 45 4C |.:.".URRENT .PEL|
00002140: 4C 49 4E 47 22 3A 99 50 4C 24 28 49 2C 4A 29 3A |LING":.PL$(I,J):|
00002150: 99 22 C3 4F 52 52 45 43 54 20 23 20 26 20 CE 41 |.".ORRECT # & .A|
00002160: 4D 45 22 3A 85 50 4C 24 28 49 2C 4A 29 00 9D 3D |ME":.PL$(I,J)..=|
00002170: 62 07 E8 3A 85 22 C3 48 41 4E 47 45 20 41 4E 4F |b..:.".HANGE ANO|
00002180: 54 48 45 52 20 53 54 41 54 22 3B 41 24 3A 8B 41 |THER STAT";A$:.A|
00002190: 24 B2 22 59 22 A7 E8 3A 89 31 37 36 30 00 C5 3D |$."Y"..:.1760..=|
000021A0: 6C 07 E8 3A 85 22 C1 4E 4F 54 48 45 52 20 50 4C |l..:.".NOTHER PL|
000021B0: 41 59 45 52 22 3B 41 24 3A 8B 41 24 B2 22 59 22 |AYER";A$:.A$."Y"|
000021C0: A7 31 36 34 30 00 CE 3D 76 07 89 32 31 30 00 03 |.1640..=v..210..|
000021D0: 3E 80 07 E7 35 2C 36 3A FE 1A 34 39 2C 31 32 2C |>...5,6:..49,12,|
000021E0: 37 31 2C 31 33 2C 31 3A 99 22 20 20 20 D3 4F 52 |71,13,1:." .OR|
000021F0: 54 49 4E 47 20 C1 56 45 52 41 47 45 53 22 3A 43 |TING .VERAGES":C|
00002200: 4F B2 30 00 22 3E 8A 07 81 49 B2 31 A4 4E 54 3A |O.0.">...I.1.NT:|
00002210: 81 4A B2 31 A4 4E 50 28 49 29 3A 43 4F B2 43 4F |.J.1.NP(I):CO.CO|
00002220: AA 31 00 5A 3E 94 07 41 4C 24 28 43 4F 29 B2 50 |.1.Z>..AL$(CO).P|
00002230: 4C 24 28 49 2C 4A 29 3A 41 4C 28 43 4F 29 B2 41 |L$(I,J):AL(CO).A|
00002240: 56 28 49 2C 4A 29 3A 54 24 28 43 4F 29 B2 54 4D |V(I,J):T$(CO).TM|
00002250: 24 28 49 29 3A 82 4A 3A 82 49 00 A4 3E 9E 07 E7 |$(I):.J:.I..>...|
00002260: 35 2C 31 33 3A FE 1A 34 39 2C 31 33 2C 37 31 2C |5,13:..49,13,71,|
00002270: 31 35 2C 31 3A 99 22 20 C8 4F 57 20 4D 41 4E 59 |15,1:." .OW MANY|
00002280: 20 D4 4F 50 20 C1 D6 C7 53 20 44 4F 22 3A 85 22 | .OP ...S DO":."|
00002290: 20 59 4F 55 20 57 41 4E 54 20 50 52 49 4E 54 45 | YOU WANT PRINTE|
000022A0: 44 22 3B 41 00 CC 3E A8 07 81 49 B2 31 A4 41 3A |D";A..>...I.1.A:|
000022B0: 81 4A B2 49 AA 31 A4 43 4F 3A 8B 41 4C 28 49 29 |.J.I.1.CO:.AL(I)|
000022C0: B2 B1 41 4C 28 4A 29 A7 31 39 38 30 00 2E 3F B2 |..AL(J).1980..?.|
000022D0: 07 48 24 B2 41 4C 24 28 49 29 3A 48 B2 41 4C 28 |.H$.AL$(I):H.AL(|
000022E0: 49 29 3A 48 31 24 B2 54 24 28 49 29 3A 41 4C 24 |I):H1$.T$(I):AL$|
000022F0: 28 49 29 B2 41 4C 24 28 4A 29 3A 41 4C 28 49 29 |(I).AL$(J):AL(I)|
00002300: B2 41 4C 28 4A 29 3A 54 24 28 49 29 B2 54 24 28 |.AL(J):T$(I).T$(|
00002310: 4A 29 3A 41 4C 28 4A 29 B2 48 3A 41 4C 24 28 4A |J):AL(J).H:AL$(J|
00002320: 29 B2 48 24 3A 54 24 28 4A 29 B2 48 31 24 00 38 |).H$:T$(J).H1$.8|
00002330: 3F BC 07 82 4A 3A 82 49 00 74 3F C6 07 9F 34 2C |?...J:.I.t?...4,|
00002340: 34 2C 37 3A 98 34 2C C7 28 31 34 29 22 D4 4F 50 |4,7:.4,.(14)".OP|
00002350: 22 3B 41 3B 22 C2 41 54 54 49 4E 47 20 C1 56 45 |";A;".ATTING .VE|
00002360: 52 41 47 45 53 20 41 53 20 4F 46 20 22 3B 44 32 |RAGES AS OF ";D2|
00002370: 24 3A 98 34 00 E5 3F D0 07 81 49 B2 31 A4 41 3A |$:.4..?...I.1.A:|
00002380: 98 34 2C A3 36 29 3A 41 4C 24 28 49 29 B2 C9 28 |.4,.6):AL$(I)..(|
00002390: 41 4C 24 28 49 29 2C 28 C3 28 41 4C 24 28 49 29 |AL$(I),(.(AL$(I)|
000023A0: 29 AB 33 29 29 3A 98 34 2C FB 22 23 23 23 23 23 |).3)):.4,."#####|
000023B0: 23 23 23 23 23 23 22 3B 41 4C 24 28 49 29 2C 54 |######";AL$(I),T|
000023C0: 24 28 49 29 3B 3A 98 34 2C FB 22 2E 23 23 23 22 |$(I);:.4,.".###"|
000023D0: 3B 41 4C 28 49 29 3A 8B 49 B2 35 AC B5 28 49 AD |;AL(I):.I.5..(I.|
000023E0: 35 29 A7 98 34 00 FC 3F DA 07 82 49 3A 99 C7 28 |5)..4..?...I:..(|
000023F0: 31 32 39 29 3A A0 34 3A 89 32 31 30 00 41 40 60 |129):.4:.210.A@`|
00002400: EA 4D 38 24 B2 22 9B 12 20 20 20 20 20 20 20 20 |.M8$.".. |
00002410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002440: 22 00 97 40 6A EA 99 22 93 11 11 11 11 11 11 11 |"..@j.."........|
00002450: 11 11 11 11 11 11 11 22 A3 31 32 29 22 05 A2 A2 |.......".12)"...|
00002460: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00002470: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00002480: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00002490: A2 A2 A2 A2 A2 A2 22 00 AD 40 74 EA 81 49 B2 31 |......"..@t..I.1|
000024A0: A4 37 3A 99 A3 31 32 29 4D 38 24 3A 82 00 F2 40 |.7:..12)M8$:...@|
000024B0: 7E EA 99 A3 31 32 29 22 98 B8 B8 B8 B8 B8 B8 B8 |~...12)"........|
000024C0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
000024D0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
000024E0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
000024F0: B8 22 00 13 41 88 EA 4D 39 24 28 30 29 B2 22 42 |."..A..M9$(0)."B|
00002500: 41 53 45 42 41 4C 4C 20 53 54 41 54 53 20 42 4F |ASEBALL STATS BO|
00002510: 4F 4B 22 00 45 41 92 EA 4D 39 24 28 31 29 B2 22 |OK".EA..M9$(1)."|
00002520: 42 59 20 4D 49 43 48 41 45 4C 20 4A 2E 20 52 45 |BY MICHAEL J. RE|
00002530: 45 44 20 20 20 20 43 4F 50 59 52 49 47 48 54 20 |ED COPYRIGHT |
00002540: 31 39 38 39 22 00 6C 41 9C EA 4D 39 24 28 32 29 |1989".lA..M9$(2)|
00002550: B2 22 50 55 42 4C 49 53 48 45 44 20 4F 4E 20 4C |."PUBLISHED ON L|
00002560: 4F 41 44 53 54 41 52 20 23 36 31 22 00 96 41 A6 |OADSTAR #61"..A.|
00002570: EA 4D 39 24 28 33 29 B2 22 53 55 42 53 43 52 49 |.M9$(3)."SUBSCRI|
00002580: 50 54 49 4F 4E 53 20 31 2D 38 30 30 2D 38 33 31 |PTIONS 1-800-831|
00002590: 2D 32 36 39 34 22 00 C3 41 B0 EA 4D 39 24 28 34 |-2694"..A..M9$(4|
000025A0: 29 B2 22 43 48 41 4E 47 49 4E 47 20 54 48 49 53 |)."CHANGING THIS|
000025B0: 20 4E 4F 54 49 43 45 20 49 53 20 49 4C 4C 45 47 | NOTICE IS ILLEG|
000025C0: 41 4C 22 00 FA 41 BA EA 99 22 91 91 91 91 91 91 |AL"..A..."......|
000025D0: 91 91 9B 22 3A 81 49 B2 30 A4 34 3A 99 22 12 22 |...":.I.0.4:."."|
000025E0: A3 34 30 AB 28 C3 28 4D 39 24 28 49 29 29 AD 32 |.40.(.(M9$(I)).2|
000025F0: 29 29 4D 39 24 28 49 29 3A 82 00 1F 42 C4 EA 99 |))M9$(I):...B...|
00002600: 22 13 11 11 22 A3 33 31 29 22 9F 42 41 53 45 42 |"...".31)".BASEB|
00002610: 41 4C 4C 20 53 54 41 54 53 20 42 4F 4F 4B 22 00 |ALL STATS BOOK".|
00002620: 5C 42 CE EA 99 A3 31 37 29 22 11 11 9E 41 20 44 |\B....17)"...A D|
00002630: 41 54 41 42 41 53 45 20 46 4F 52 20 59 4F 55 52 |ATABASE FOR YOUR|
00002640: 20 46 41 56 4F 52 49 54 45 20 54 45 41 4D 53 20 | FAVORITE TEAMS |
00002650: 41 4E 44 20 50 4C 41 59 45 52 53 22 00 9B 42 D8 |AND PLAYERS"..B.|
00002660: EA 99 A3 31 35 29 22 11 96 4F 4E 43 45 20 52 55 |...15)"..ONCE RU|
00002670: 4E 2C 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 |N, THIS PROGRAM |
00002680: 44 4F 45 53 4E 27 54 20 52 45 54 55 52 4E 20 54 |DOESN'T RETURN T|
00002690: 4F 20 4C 4F 41 44 53 54 41 52 22 00 D0 42 E2 EA |O LOADSTAR"..B..|
000026A0: 99 A3 32 30 29 22 11 50 52 45 53 53 20 05 53 50 |..20)".PRESS .SP|
000026B0: 41 43 45 96 20 54 4F 20 52 55 4E 20 42 41 53 45 |ACE. TO RUN BASE|
000026C0: 42 41 4C 4C 20 53 54 41 54 53 20 42 4F 4F 4B 22 |BALL STATS BOOK"|
000026D0: 00 FC 42 EC EA 99 A3 32 35 29 22 11 50 52 45 53 |..B....25)".PRES|
000026E0: 53 20 05 4C 96 20 54 4F 20 52 45 54 55 52 4E 20 |S .L. TO RETURN |
000026F0: 54 4F 20 4C 4F 41 44 53 54 41 52 22 00 05 43 F6 |TO LOADSTAR"..C.|
00002700: EA A1 F9 41 24 00 13 43 00 EB 8B 41 24 B2 22 20 |...A$..C...A$." |
00002710: 22 A7 8E 00 30 43 0A EB F5 22 31 32 38 20 4D 45 |"...0C..."128 ME|
00002720: 4E 55 22 20 A4 20 22 31 32 38 20 4D 45 4E 55 22 |NU" . "128 MENU"|
00002730: 00 4B 43 14 EB 8B 44 53 B3 B1 36 33 A7 80 3A D5 |.KC...DS..63..:.|
00002740: 8A 22 31 32 38 20 4D 45 4E 55 22 00 00 00 |."128 MENU"... |
.......%:.5,1:.6,1:.60000.G...SP$."
":."."G(27);"R";G(14)......I.0
.18.2:J.I.2:.5,(J.3):..I,J,59.I,14.J,1:.
A$:A$." TEAM STATS - ".A$:.A$:.......5,
13:..20,10,79,24,1.$.(..5,2:."...".18)".
":..18)". BASEBA
LL STATS BOOK ." :..18)".
"...2..5,16:..18)". FOR UP T
O 10 TEAMS ":..18)". OF 15 PLAYERS
":..18)". ".F
.<..5,3:..18)". BY ";:.5,7:.". MICHAEL
J. REED ":..3.'.F.. "CARDINALS","YANKEE
S","BRAVES","A'S","ROYALS","METS","ASTRO
S","ORIOLES","PADRES","PIRATES".C.P.. PL
$(8,15),AB(8,15),H(8,15),DB(8,15),TB(8,1
5),HR(8,15)...Z.. RS(8,15),SO(8,15),BB(8
,15),AV(8,15),RB(8,15),AL(150),AL$(150),
T$(150).P.D...#1,"LEAGUE":.DS.0...:.1360
.3.N..1,NT:.I.1.NT:TN(I).I:.1,TM$(I):.1,
TC(I):.1,TS$(I):.1,W(I):.1,L(I):.1,PCT(I
):.1,GB(I):.1,TH(I).T.X..1,TR(I):.1,TA(I
):.1,T(I):.I.P....1,D1$:..#1:K.1:D2$.D1$
......5,1:."....":.5,4:S$." STANDINGS AS
OF ".D1$.J...."..";S$:.5,2:..1,1,40,2,1
:X.0:.1170... ..I.1.NT:..#8,(TM$(I)):.8,
NP(I).. ...J.1.NP(I):.8,PL$(I,J):.8,AB(I
,J):.8,H(I,J).M ...8,DB(I,J):.8,TB(I,J):
.8,HR(I,J):.8,RS(I,J).} ...8,SO(I,J):.8,
BB(I,J):.8,AV(I,J):.8,RB(I,J).. H..J:..#
8:.I.. R..5,1:..41,0,79,23,1:.5,2:..51,3
,69,14,1:.5,4:..53,4,67,13,1:."..WHICH O
PTION?.".C!...".....E.DIT":.".....A.DD G
AMES":.".....P.RINT":.".....S.TORE":."..
...R.ANK AVG":.".....Q.UIT".D!....A$:.(A
$."E").(A$."E").1640.!...(A$."A").(A$."
A").300..!...(A$."P").(A$."P").670..!...
(A$."S").(A$."S").560.Q!...(A$."R").(A$.
"R").1920.."...(A$."Q").(A$."Q")..5,1:..
41,0,79,23,1:.5,4:...""..230.M",..5,11:.
.45,9,75,11,1:."HOW MANY GAMES TO ENTER"
;NG:.NG.0.210.E"6.."TODAY'S DATE";D2$.."
@...45,10,75,12,1:."ENTER MATCH-UPS WITH
TEAM":."NUMBERS SEPARATED BY A COMMA"..
"J..Q.1.NG:.5,4:..45,12,75,12,1:.X(Q),Y(
Q).*#T..5,5:..45,16,75,18,1:.TM$(X(Q))"
VS "TM$(Y(Q)):.5,4:..45,17,75,19,1.N#^..
TM$(X(Q));:.S1:.TM$(Y(Q));:.S2.}#H..S1.S
2.W(X(Q)).W(X(Q)).1:L(Y(Q)).L(Y(Q)).1..#
R..S2.S1.W(Y(Q)).W(Y(Q)).1:L(X(Q)).L(X(Q
)).1..#|..&:..47,21,73,22,1:."CHANGE TO
40-COLUMN SCREEN".1$..C.X(Q):I.0:.4,TC(C
):.G(27);"X":.G(14):."....."TM$(X(Q))" V
S "TM$(Y(Q)):.930..$..C.Y(Q):I.0:.4,TC(C
):."....."TM$(Y(Q))" VS "TM$(X(Q)):.930:
..1,23,38,24,1:."RETURN TO 80-COLUMN SCR
EEN..":..1:.G(27);"X".I$...5,1:..41,15,7
9,23,1:.Q..$...%:.I.1.NT:.W(I).L(I).0.PC
T(I).1:.440..%..PCT(I).W(I).(W(I).L(I)).
.%...I..%B..I.1.NT.1:.J.I.1.NT.E%L..PCT(
I).PCT(J).490.I%V.H.PCT(I):PCT(I).PCT(J)
:PCT(J).H..%..H.TN(I):TN(I).TN(J):TN(J).
H..%...J:.I:GB(TN(1)).0..%...D.2.NT:H.(T
N(1)):G.(TN(D)):GB(G).(W(H).W(G).L(G).L(
H)).2..%...GB(G)..5.GB(G).0..&...(GB(G).
.(GB(G))).M(I).0..&...(GB(G)...(GB(G))).
M(I).1.J&...D:.5,1:."....":.5,4:S$." STA
NDINGS AS OF ".D2$:.".."S$..&&..5,2:..1,
1,40,2,1:X.0:K.0:.1170..&0..5,1:..41,0,7
9,23,1..&:...#1,"@LEAGUE",W:.1,NT:.5,2:.
.47,10,66,12,0:.".STORING STANDINGS"..'D
..I.1.NT:P.TN(I):.1,TM$(P):.1,TC(P):.1,T
S$(P).G'N..1,W(P):.1,L(P):.1,PCT(I):.1,G
B(P):.1,TH(P):.1,TR(P):.1,TA(P):.1,T(P).
Z'X..I:.1,D2$:..#1..'B..5,1:..42,1,79,24
,1:.5,4:.".STORING TEAM STATISTICS"..'L.
.I.1.NT:.(TM$(TN(I))):..#8,(TM$(TN(I))),
W:E.TN(I):.8,NP(E)."(V..J.1.NP(E):.8,PL$
(E,J):.8,AB(E,J):.8,H(E,J).R(...8,DB(E,J
):.8,TB(E,J):.8,HR(E,J):.8,RS(E,J)..(...
8,SO(E,J):.8,BB(E,J):.8,AV(E,J):.8,RB(E,
J)..(...J:..#8:.:."..":.I:..2:.210..(...
5,5:..45,10,74,12,1..(..." DO YOU WANT A
PRINTOUT OF":."LEAGUE STANDINGS";B$..).
..B$."N".720.>)...4,4,7:.4:.4,G(14);"LEA
GUE STANDINGS - ";D2$:.4,Z$:.4.G)F..I.1.
NT:.4,TS$(TN(I)):.I:.4,G(15): 4..)P..".I
NDIVIDUAL STATISTICS (Y/N)";B$:.B$."N".2
10..)Z.."WHICH TEAM (ENTER NUMBER)";T..*
...4,4,7:.4:.4,G(14);TM$(TN(T));" PLAYER
STATS AS OF ";D2$:.4,G(15):A.TN(T)..*..
.4,"PLAYER AB H R 2B 3B
HR BB SO RBI AVG ":.4,".........
........................................
...........".Z*...Z.1.9:TT(Z).0:.Z:.I.1.
NP(A):LN$.PL$(A,I).I(SP$,(15.C(PL$(A,I))
))..*..TT(1).TT(1).AB(A,I)..+..TT(2).TT(
2).H(A,I).!+..TT(3).TT(3).RS(A,I).9+ .TT
(4).TT(4).DB(A,I).Q+*.TT(5).TT(5).TB(A,I
).I+4.TT(6).TT(6).HR(A,I)..+>.TT(7).TT(7
).BB(A,I)..+H.TT(8).TT(8).SO(A,I)..+R.TT
(9).TT(9).RB(A,I).&,\..4,LN$;:.4,."####"
;AB(A,I),H(A,I),RS(A,I),DB(A,I),TB(A,I),
HR(A,I),BB(A,I),SO(A,I),RB(A,I);:.4,."
.###";AV(A,I).C,F..I:LN$."TOTALS
"..,P.G..((TT(2).TT(1)).1000):G$." .
".D(G):.G.100.G$." .0".D(G).Y,Z.G.TT(2
).TT(1):.4,"............................
................................".E-...4
,LN$;:.4,."####";TT(1),TT(2),TT(3),TT(4)
,TT(5),TT(6),TT(7),TT(8),TT(9);:.4,."
.###";G:.4:.4: 4:.210.X-....45,10,79,11,
1:."ANOTHER TEAM";B$:.B$."Y".730..-...5,
1:..41,0,79,23,1:.5,4:.210.C-... *** CHA
NGE TO 40-COLUMN SCREEN ***..-...5,1:."
# PLAYER AB R H 2B 3B HR BB SO RBI"
......"..":.5,6:.V.1.NP(C):.PL$(C,V):..P
.... W.1198.(1198.40.(NP(C).1)).40:.Z.W.
(W.24).3.P.J..Z,48:.(Z.54272),0:.:.:.5,4
...T...5,21,34,24,1:T(C).0:TA(C).0:TR(C)
.0:TH(C).0......"CHANGE STATS W/CURSOR,
THEN ":."RETURN ON '?' TO SAVE. ..";A$..
/..I.0:.W.1198.(1198.40.(NP(C).1)).40:I.
I.1.//..AB(C,I).AB(C,I).B(W).48.M/..RS(C
,I).RS(C,I).B(W.3).48.I/..H(C,I).H(C,I).
B(W.6).48../..DB(C,I).DB(C,I).B(W.9).48.
./..TB(C,I).TB(C,I).B(W.12).48.E/$.HR(C,
I).HR(C,I).B(W.15).48../..BB(C,I).BB(C,I
).B(W.18).48..08.SO(C,I).SO(C,I).B(W.21)
.48."0B.RB(C,I).RB(C,I).B(W.24).48.70L..
AB(C,I).0..1120._0V.AV(C,I)..(H(C,I).100
0.AB(C,I)).1000..0`.TH(C).TH(C).H(C,I):T
R(C).TR(C).RS(C,I):T(C).T(C).AB(C,I)..0J
..:TA(C)..(TH(C).1000.T(C)).1000.K0T..5,
2:...0~..5,1:..43,11,70,14,1:.5,2:...1..
.*****STANDINGS SUBROUTINE*******.L1..Z$
.". TEAM W L PCT H R AVG
GB ":.Z$:X.0.Q1...Y.4.22.2:X.X.1:T.TN(X)
:.5,TC(T)..1..W$.D(W(T)):.W(T).10.W$." "
.W$..1..L$.D(L(T)):.L(T).10.L$." ".L$..1
..PCT$." .".I(D(.(1000.PCT(X))),3):.PCT
(X).0.PCT$." .000"..2D..L(T).0.PCT$." 1
.000".22N.GB$.D(GB(T)):.GB(T).0.GB$." -
".K2X..M(T).0.GB$." ".GB$.`2..GB$." ".
I(GB$,3)..2..H$.D(TH(T)):.TH(T).100.H$."
".H$:.TH(T).10.H$." ".H$.R2..R$.D(TR(T)
):.TR(T).100.R$." ".R$:.TR(T).10.R$." ".
R$..2...T(T).0.TA(T).0:AVG$." .000":.131
0.83..TA(T)..(1000.TH(T).T(T)).1000:AVG$
." .".I(D(1000.TA(T)),3).[3...TA(T)..1.A
VG$." .0".I(AVG$,2)..3..TS$(T).TM$(T).H(
SP$,(10.C(TM$(T)))).W$.L$.PCT$.H$.R$.AVG
$.GB$.H3(...1,(Y.2),40,Y,1:.X:.TS$(T):.N
T.X.1340.O32..Y..3<..5,1:..1,Y,40,Y,1:K.
0:.5,4:...4F.. BUILD NEW LEAGUE FILE.P4P
..5,7:..20,7,59,14,1:.5,2:..21,8,58,13,1
:.5,3:..22,9,57,12,1:K.1..4Z..5,4:..23,1
0,56,11,1:."HOW MANY TEAMS IN THE LEAGUE
":.NT.D4D..5,2:..1,1,10,10,1:.".1=RED":.
"2=MAROON":."3=BLUE"..5N.."4=YELLOW":."5
=ORANGE":."6=GRAY":."7=LT BLUE":."8=WHIT
E".E5X...23,10,56,11,1:." ENTER TEAM N
AME AND COLOR":." SEPARATED BY A COMMA (
AT PROMPT).":..5:."."..5...I.1.NT:."TEAM
#";I;" (NAME,COLOR#)":.TM$(I),TC(I):TS
$(I).TM$(I)."*************"..5...TC(I).1
430,1440,1450,1460,1470,1480,1490,1500..
6..TC(I).3:.1510..6 .TC(I).5:.1510.$6..T
C(I).7:.1510.66..TC(I).8:.1510.I6..TC(I)
.10:.1510.\6H.TC(I).13:.1510.O6R.TC(I).1
5:.1510.|6..TC(I).16..6.....6..."..WHAT
IS TODAY'S DATE":.D1$..6....#1,"LEAGUE",
W:.1,NT:.I.1.NT:.1,TM$(I):.1,TC(I):.1,TS
$(I):D.0:.Q.1.8:.1,D:.Q:.I..7...1,D1$:..
#1.07... X.1.NT:.5,TC(X):..23,10,56,11,1
.P7...TM$(X):." HOW MANY PLAYERS";NP(X):
..#8,(TM$(X)),W:.8,NP(X). 7"...22,9,57,1
2,1:." "TM$(X):..23,10,56,11,1.P7,..J.
1.NP(X):."NAME:";PL$(X,J):."NUMBER:";A:.
..76.A$.D(A):.A.10.A$."0".I(A$,1)..8@.PL
$(X,J).A$."-".PL$(X,J):.8,PL$(X,J).28J.A
.0:.Z.1.10:.8,A:.Z.A8T..J:..#8:.X.X8^...
#1,"LEAGUE":.110..8H..5,7:..46,8,74,15,1
:." WHICH TEAM NUMBER";I.T8R..5,15:..46,
9,74,15,1:."WHICH PLAYER (UNIFORM #)";A$
:.E(A$).10.A$."0".A$..8|..J.1.NP(I):.A$.
H(PL$(I,J),2).1740.*9...J:.".IS THIS A N
EW PLAYER";B$:.B$."N".1650.G9..NP(I).NP(
I).1:."PLAYER'S NAME";P$:PL$(I,NP(I)).A$
."-".P$..9...".ADD ANOTHER PLAYER TO THI
S TEAM";A$:.A$."N".1720.N9...".WHAT UNIF
ORM # ";A$:.E(A$).10.A$."0".A$.X9...1680
..:....47,9,73,15,1:."ADD TO ANOTHER TEA
M";A$:.A$."Y".1640..:B..210.=:L..5,7:..4
6,8,74,15,1:.PL$(I,J).V:V..5,15:..48,9,7
2,14,1.X:..." .1.=AB .6.=HR":."
.2.=HITS .7.=SO":." .3.=RUNS .8.=W
ALKS":." .4.=2B .9.=RBI":." .5.
=3B .10.=NAME"..:...C:.C.10.1770.#;...
C.1790,1800,1810,1820,1830,1840,1850,186
0,1870,1880.\;...:."CURRENT AB":.AB(I,J)
:."CORRECT #":.AB(I,J):.1890..;...:."CUR
RENT HITS":.H(I,J):."CORRECT #":.H(I,J):
.1890.P;...:."CURRENT RUNS":.RS(I,J):."C
ORRECT #":.RS(I,J):.1890..<...:."CURRENT
2B":.DB(I,J):."CORRECT #":.DB(I,J):.189
0.B<&..:."CURRENT 3B":.TB(I,J):."CORRECT
#":.TB(I,J):.1890.{<0..:."CURRENT HR":.
HR(I,J):."CORRECT #":.HR(I,J):.1890..<:.
.:."CURRENT SO":.SO(I,J):."CORRECT #":.S
O(I,J):.1890..<D..:."CURRENT WALKS":.BB(
I,J):."CORRECT #":.BB(I,J):.1890.+=N..:.
"CURRENT RBIS":.RB(I,J):."CORRECT #":.RB
(I,J):.1890.M=X..:."CURRENT SPELLING":.P
L$(I,J):."CORRECT # & NAME":.PL$(I,J)..=
B..:."CHANGE ANOTHER STAT";A$:.A$."Y"..:
.1760.E=L..:."ANOTHER PLAYER";A$:.A$."Y"
.1640.N=V..210..>...5,6:..49,12,71,13,1:
." SORTING AVERAGES":CO.0.">...I.1.NT:
.J.1.NP(I):CO.CO.1.Z>..AL$(CO).PL$(I,J):
AL(CO).AV(I,J):T$(CO).TM$(I):.J:.I..>...
5,13:..49,13,71,15,1:." HOW MANY TOP AVG
S DO":." YOU WANT PRINTED";A.L>...I.1.A:
.J.I.1.CO:.AL(I)..AL(J).1980..?..H$.AL$(
I):H.AL(I):H1$.T$(I):AL$(I).AL$(J):AL(I)
.AL(J):T$(I).T$(J):AL(J).H:AL$(J).H$:T$(
J).H1$.8?...J:.I.T?F..4,4,7:.4,G(14)"TOP
";A;"BATTING AVERAGES AS OF ";D2$:.4..?P
..I.1.A:.4,.6):AL$(I).I(AL$(I),(C(AL$(I)
).3)):.4,."###########";AL$(I),T$(I);:.4
,.".###";AL(I):.I.5..(I.5)..4..?Z..I:.G(
129): 4:.210.A@`.M8$."..
"..@J.."...............".12)"...........
........................................
......"..@T..I.1.7:..12)M8$:...@~...12)"
........................................
................."..A..M9$(0)."BASEBALL
STATS BOOK".EA..M9$(1)."BY MICHAEL J. RE
ED COPYRIGHT 1989".LA..M9$(2)."PUBLIS
HED ON LOADSTAR #61"..A..M9$(3)."SUBSCRI
PTIONS 1-800-831-2694".CA..M9$(4)."CHANG
ING THIS NOTICE IS ILLEGAL"..A..."......
...":.I.0.4:.".".40.(C(M9$(I)).2))M9$(I)
:...BD.."...".31)".BASEBALL STATS BOOK".
\BN...17)"...A DATABASE FOR YOUR FAVORIT
E TEAMS AND PLAYERS"..BX...15)"..ONCE RU
N, THIS PROGRAM DOESN'T RETURN TO LOADST
AR".PB....20)".PRESS .SPACE. TO RUN BASE
BALL STATS BOOK"..B....25)".PRESS .L. TO
RETURN TO LOADSTAR"..C....A$..C...A$."
"...0C..."128 MENU" . "128 MENU".KC...DS
..63..:U."128 MENU"...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL