ARRAY.CREATE
FILE INFORMATION
FILENAME(S): ARRAY.CREATE
FILE TYPE(S): PRG
FILE SIZE: 15.2K
FIRST SEEN: 2025-11-02 16:54:27
APPEARS ON: 1 disk(s)
FILE HASH
4d0ca40cf8a61aac511b1d37a4ed325e6e319f3027485e8d6b32ca10dd10036d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MW 29 1 | ARRAY.CREATE | PRG | Treasure Chest - Reamigation | 29 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 64 00 8F 20 3D 3D 3E 43 52 45 41 54 |....d.. ==>CREAT|
00000010: 45 20 50 4C 41 59 45 52 20 41 52 52 41 59 00 39 |E PLAYER ARRAY.9|
00000020: 08 6E 00 97 35 33 32 38 31 2C 30 3A 97 35 33 32 |.n..53281,0:.532|
00000030: 38 30 2C 31 3A 99 22 05 22 00 6D 08 78 00 99 22 |80,1:.".".m.x.."|
00000040: 93 12 20 20 20 20 20 20 20 20 20 20 3C 3C 20 47 |.. << G|
00000050: 4F 4C 46 20 44 41 54 41 20 44 49 53 4B 20 3E 3E |OLF DATA DISK >>|
00000060: 20 20 20 20 20 20 20 20 20 20 92 22 3B 00 A1 08 | .";...|
00000070: 82 00 41 24 B2 22 12 20 20 20 20 20 20 20 20 20 |..A$.". |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 92 | .|
000000A0: 22 00 D7 08 8C 00 99 41 24 22 12 47 4F 4C 46 20 |"......A$".GOLF |
000000B0: 50 4C 41 59 45 52 20 41 52 52 41 59 20 49 4E 49 |PLAYER ARRAY INI|
000000C0: 54 49 41 4C 49 5A 41 54 49 4F 4E 20 50 52 4F 47 |TIALIZATION PROG|
000000D0: 52 41 4D 92 22 41 24 00 00 09 96 00 99 22 11 11 |RAM."A$......"..|
000000E0: 11 11 11 11 20 20 20 20 20 20 20 20 20 20 20 20 |.... |
000000F0: 20 20 49 4E 53 45 52 54 20 59 4F 55 52 22 3A 99 | INSERT YOUR":.|
00000100: 00 31 09 A0 00 99 22 20 20 20 12 50 52 4F 46 45 |.1...." .PROFE|
00000110: 53 53 49 4F 4E 41 4C 20 54 4F 55 52 20 47 4F 4C |SSIONAL TOUR GOL|
00000120: 46 20 50 4C 41 59 45 52 20 44 49 53 4B 92 22 3A |F PLAYER DISK.":|
00000130: 99 00 66 09 AA 00 99 22 20 20 20 20 20 20 20 20 |..f...." |
00000140: 20 20 41 4E 44 20 50 52 45 53 53 20 3C 52 45 54 | AND PRESS <RET|
00000150: 55 52 4E 3E 12 20 92 22 3A 97 31 39 38 2C 30 3A |URN>. .":.198,0:|
00000160: 97 36 33 31 2C 30 00 8C 09 B4 00 81 49 B2 31 A4 |.631,0......I.1.|
00000170: 34 30 3A 82 3A 8B C2 28 36 33 31 29 B3 B1 31 33 |40:.:..(631)..13|
00000180: A7 97 31 39 38 2C 30 3A 89 31 38 30 00 AE 09 BE |..198,0:.180....|
00000190: 00 97 31 39 38 2C 30 3A 9F 20 32 2C 38 2C 32 2C |..198,0:. 2,8,2,|
000001A0: 22 30 3A 50 4C 41 59 45 52 2C 53 2C 52 22 00 B5 |"0:PLAYER,S,R"..|
000001B0: 09 C8 00 A0 32 00 CF 09 D2 00 8D 33 30 30 30 30 |....2......30000|
000001C0: 3A 8B 45 31 24 B3 B1 22 30 30 22 A7 31 32 30 00 |:.E1$.."00".120.|
000001D0: 03 0A E6 00 99 22 93 12 20 20 20 20 20 20 20 20 |.....".. |
000001E0: 20 20 3C 3C 20 47 4F 4C 46 20 44 41 54 41 20 44 | << GOLF DATA D|
000001F0: 49 53 4B 20 3E 3E 20 20 20 20 20 20 20 20 20 20 |ISK >> |
00000200: 92 22 3B 00 39 0A F0 00 99 41 24 22 12 47 4F 4C |.";.9....A$".GOL|
00000210: 46 20 50 4C 41 59 45 52 20 41 52 52 41 59 20 49 |F PLAYER ARRAY I|
00000220: 4E 49 54 49 41 4C 49 5A 41 54 49 4F 4E 20 50 52 |NITIALIZATION PR|
00000230: 4F 47 52 41 4D 92 22 41 24 00 80 0A FA 00 81 49 |OGRAM."A$......I|
00000240: B2 31 A4 35 3A 99 3A 82 3A 99 A6 31 31 29 22 9E |.1.5:.:.:..11)".|
00000250: 49 4E 49 54 49 41 4C 49 5A 49 4E 47 20 41 52 52 |INITIALIZING ARR|
00000260: 41 59 53 22 3A 99 A6 31 31 29 22 2E 2E 2E 20 50 |AYS":..11)"... P|
00000270: 4C 45 41 53 45 20 57 41 49 54 20 2E 2E 2E 05 22 |LEASE WAIT ...."|
00000280: 00 94 0A 04 01 8F 20 41 43 43 55 52 41 43 59 20 |...... ACCURACY |
00000290: 44 41 54 41 00 AA 0A 0E 01 83 20 2E 31 38 2C 2E |DATA...... .18,.|
000002A0: 32 30 2C 2E 32 34 2C 2E 33 30 00 C0 0A 18 01 83 |20,.24,.30......|
000002B0: 20 2E 32 34 2C 2E 32 36 2C 2E 32 39 2C 2E 33 34 | .24,.26,.29,.34|
000002C0: 00 D6 0A 22 01 83 20 2E 33 30 2C 2E 33 32 2C 2E |...".. .30,.32,.|
000002D0: 33 35 2C 2E 33 38 00 EC 0A 2C 01 83 20 2E 33 35 |35,.38...,.. .35|
000002E0: 2C 2E 33 37 2C 2E 33 38 2C 2E 34 31 00 02 0B 36 |,.37,.38,.41...6|
000002F0: 01 83 20 2E 33 38 2C 2E 34 30 2C 2E 34 32 2C 2E |.. .38,.40,.42,.|
00000300: 34 35 00 2A 0B 40 01 86 41 43 28 34 2C 33 29 3A |45.*.@..AC(4,3):|
00000310: 81 49 B2 30 A4 34 3A 81 4A B2 30 A4 33 3A 87 41 |.I.0.4:.J.0.3:.A|
00000320: 43 28 49 2C 4A 29 3A 82 3A 82 00 3A 0B 4A 01 8F |C(I,J):.:..:.J..|
00000330: 20 53 50 49 4E 20 44 41 54 41 00 85 0B 54 01 83 | SPIN DATA...T..|
00000340: 20 32 33 2C 32 32 2C 32 32 2C 32 31 2C 32 34 2C | 23,22,22,21,24,|
00000350: 32 33 2C 32 33 2C 32 32 2C 32 34 2C 32 33 2C 32 |23,23,22,24,23,2|
00000360: 33 2C 32 32 2C 32 34 2C 32 33 2C 32 33 2C 32 32 |3,22,24,23,23,22|
00000370: 2C 32 35 2C 32 34 2C 32 34 2C 32 33 2C 32 35 2C |,25,24,24,23,25,|
00000380: 32 34 2C 32 34 00 A5 0B 59 01 83 32 33 2C 31 35 |24,24...Y..23,15|
00000390: 2C 31 35 2C 31 35 2C 31 35 2C 32 34 2C 32 33 2C |,15,15,15,24,23,|
000003A0: 32 32 2C 32 31 00 CD 0B 5E 01 86 53 50 28 37 2C |22,21...^..SP(7,|
000003B0: 33 29 3A 81 49 B2 30 A4 37 3A 81 4A B2 30 A4 33 |3):.I.0.7:.J.0.3|
000003C0: 3A 87 53 50 28 49 2C 4A 29 3A 82 3A 82 00 EB 0B |:.SP(I,J):.:....|
000003D0: 68 01 8F 20 44 49 53 54 41 4E 43 45 20 56 41 52 |h.. DISTANCE VAR|
000003E0: 49 41 54 49 4F 4E 20 44 41 54 41 00 01 0C 72 01 |IATION DATA...r.|
000003F0: 83 20 2E 32 33 2C 2E 32 35 2C 2E 32 37 2C 2E 32 |. .23,.25,.27,.2|
00000400: 39 00 17 0C 7C 01 83 20 2E 32 36 2C 2E 32 38 2C |9...|.. .26,.28,|
00000410: 2E 33 31 2C 2E 33 36 00 2D 0C 86 01 83 20 2E 33 |.31,.36.-.... .3|
00000420: 32 2C 2E 33 36 2C 2E 34 30 2C 2E 34 34 00 43 0C |2,.36,.40,.44.C.|
00000430: 90 01 83 20 2E 34 30 2C 2E 34 35 2C 2E 35 30 2C |... .40,.45,.50,|
00000440: 2E 35 35 00 59 0C 9A 01 83 20 2E 35 30 2C 2E 35 |.55.Y.... .50,.5|
00000450: 36 2C 2E 36 33 2C 2E 37 30 00 81 0C A4 01 86 44 |6,.63,.70......D|
00000460: 56 28 34 2C 33 29 3A 81 49 B2 30 A4 34 3A 81 4A |V(4,3):.I.0.4:.J|
00000470: B2 30 A4 33 3A 87 44 56 28 49 2C 4A 29 3A 82 3A |.0.3:.DV(I,J):.:|
00000480: 82 00 98 0C AE 01 8F 20 43 4F 4E 53 49 53 54 45 |....... CONSISTE|
00000490: 4E 43 59 20 44 41 54 41 00 C6 0C B8 01 83 20 39 |NCY DATA...... 9|
000004A0: 2C 38 2C 37 2C 36 2C 38 2C 37 2C 36 2C 35 2C 37 |,8,7,6,8,7,6,5,7|
000004B0: 2C 36 2C 35 2C 34 2C 36 2C 35 2C 34 2C 33 2C 35 |,6,5,4,6,5,4,3,5|
000004C0: 2C 34 2C 33 2C 32 00 EE 0C C2 01 86 43 46 28 34 |,4,3,2......CF(4|
000004D0: 2C 33 29 3A 81 49 B2 30 A4 34 3A 81 4A B2 30 A4 |,3):.I.0.4:.J.0.|
000004E0: 33 3A 87 43 46 28 49 2C 4A 29 3A 82 3A 82 00 03 |3:.CF(I,J):.:...|
000004F0: 0D CC 01 8F 20 43 4C 55 42 20 4E 41 4D 45 20 44 |.... CLUB NAME D|
00000500: 41 54 41 00 4E 0D D6 01 83 44 52 49 56 45 52 2C |ATA.N....DRIVER,|
00000510: 32 2D 57 4F 4F 44 2C 33 2D 57 4F 4F 44 2C 34 2D |2-WOOD,3-WOOD,4-|
00000520: 57 4F 4F 44 2C 31 2D 49 52 4F 4E 2C 32 2D 49 52 |WOOD,1-IRON,2-IR|
00000530: 4F 4E 2C 33 2D 49 52 4F 4E 2C 34 2D 49 52 4F 4E |ON,3-IRON,4-IRON|
00000540: 2C 35 2D 49 52 4F 4E 2C 36 2D 49 52 4F 4E 00 7D |,5-IRON,6-IRON.}|
00000550: 0D DB 01 83 37 2D 49 52 4F 4E 2C 38 2D 49 52 4F |....7-IRON,8-IRO|
00000560: 4E 2C 39 2D 49 52 4F 4E 2C 50 2E 57 45 44 2C 43 |N,9-IRON,P.WED,C|
00000570: 48 49 50 2C 2A 2A 2A 2C 53 2E 57 45 44 00 9C 0D |HIP,***,S.WED...|
00000580: E0 01 86 43 4C 24 28 31 37 29 3A 81 49 B2 31 A4 |...CL$(17):.I.1.|
00000590: 31 37 3A 87 43 4C 24 28 49 29 3A 82 00 AC 0D EA |17:.CL$(I):.....|
000005A0: 01 8F 20 56 54 41 42 20 44 41 54 41 00 EF 0D F4 |.. VTAB DATA....|
000005B0: 01 83 31 32 30 2C 31 36 30 2C 32 30 30 2C 32 34 |..120,160,200,24|
000005C0: 30 2C 36 34 2C 31 30 34 2C 31 34 34 2C 32 32 34 |0,64,104,144,224|
000005D0: 2C 38 2C 34 38 2C 31 32 38 2C 31 36 38 2C 32 30 |,8,48,128,168,20|
000005E0: 38 2C 33 32 2C 37 32 2C 31 31 32 2C 31 31 32 00 |8,32,72,112,112.|
000005F0: 17 0E F9 01 83 20 34 2C 34 2C 34 2C 34 2C 35 2C |..... 4,4,4,4,5,|
00000600: 35 2C 35 2C 35 2C 36 2C 36 2C 36 2C 36 2C 36 2C |5,5,5,6,6,6,6,6,|
00000610: 37 2C 37 2C 37 2C 37 00 41 0E FE 01 86 56 54 28 |7,7,7,7.A....VT(|
00000620: 31 37 2C 31 29 3A 81 49 B2 30 A4 31 3A 81 4A B2 |17,1):.I.0.1:.J.|
00000630: 31 A4 31 37 3A 87 56 54 28 4A 2C 49 29 3A 82 3A |1.17:.VT(J,I):.:|
00000640: 82 00 51 0E 08 02 8F 20 48 54 41 42 20 44 41 54 |..Q.... HTAB DAT|
00000650: 41 00 6C 0E 12 02 83 30 2C 36 2C 31 31 2C 31 36 |A.l....0,6,11,16|
00000660: 2C 32 31 2C 32 36 2C 33 31 2C 33 36 00 87 0E 1C |,21,26,31,36....|
00000670: 02 86 48 54 28 38 29 3A 81 49 B2 31 A4 38 3A 87 |..HT(8):.I.1.8:.|
00000680: 48 54 28 49 29 3A 82 00 B7 0E 26 02 86 20 43 25 |HT(I):....&.. C%|
00000690: 28 31 38 2C 34 29 2C 50 55 28 32 2C 38 2C 32 29 |(18,4),PU(2,8,2)|
000006A0: 2C 41 43 25 28 38 29 2C 50 4E 24 28 38 30 29 2C |,AC%(8),PN$(80),|
000006B0: 52 25 28 34 2C 38 29 00 CC 0E 30 02 8F 20 43 4C |R%(4,8)...0.. CL|
000006C0: 55 42 20 54 59 50 45 20 44 41 54 41 00 17 0F 3A |UB TYPE DATA...:|
000006D0: 02 83 44 52 49 56 45 52 2C 57 4F 4F 44 53 2C 4C |..DRIVER,WOODS,L|
000006E0: 4F 4E 47 20 49 52 4F 4E 53 2C 4D 45 44 49 55 4D |ONG IRONS,MEDIUM|
000006F0: 20 49 52 4F 4E 53 2C 53 48 4F 52 54 20 49 52 4F | IRONS,SHORT IRO|
00000700: 4E 53 2C 50 2E 57 45 44 47 45 2C 43 48 49 50 2C |NS,P.WEDGE,CHIP,|
00000710: 53 2E 57 45 44 47 45 00 34 0F 44 02 86 43 54 24 |S.WEDGE.4.D..CT$|
00000720: 28 38 29 3A 81 49 B2 31 A4 38 3A 87 43 54 24 28 |(8):.I.1.8:.CT$(|
00000730: 49 29 3A 82 00 6E 0F 4E 02 86 52 24 28 34 29 3A |I):..n.N..R$(4):|
00000740: 52 24 28 30 29 B2 22 45 58 43 45 4C 4C 45 4E 54 |R$(0)."EXCELLENT|
00000750: 22 3A 52 24 28 31 29 B2 22 47 4F 4F 44 22 3A 52 |":R$(1)."GOOD":R|
00000760: 24 28 32 29 B2 22 41 56 45 52 41 47 45 22 00 95 |$(2)."AVERAGE"..|
00000770: 0F 53 02 52 24 28 33 29 B2 22 42 45 4C 4F 57 20 |.S.R$(3)."BELOW |
00000780: 41 56 45 52 41 47 45 22 3A 52 24 28 34 29 B2 22 |AVERAGE":R$(4)."|
00000790: 50 4F 4F 52 22 00 B0 0F 58 02 8F 20 50 55 54 54 |POOR"...X.. PUTT|
000007A0: 20 44 49 53 54 41 4E 43 45 20 52 41 4E 47 45 53 | DISTANCE RANGES|
000007B0: 00 F5 0F 62 02 83 22 20 30 20 54 4F 20 32 20 20 |...b.." 0 TO 2 |
000007C0: 46 45 45 54 22 2C 22 20 33 20 54 4F 20 35 20 20 |FEET"," 3 TO 5 |
000007D0: 46 45 45 54 22 2C 22 20 36 20 54 4F 20 31 30 20 |FEET"," 6 TO 10 |
000007E0: 46 45 45 54 22 2C 22 31 31 20 54 4F 20 31 36 20 |FEET","11 TO 16 |
000007F0: 46 45 45 54 22 00 3A 10 67 02 83 22 31 37 20 54 |FEET".:.g.."17 T|
00000800: 4F 20 32 34 20 46 45 45 54 22 2C 22 32 35 20 54 |O 24 FEET","25 T|
00000810: 4F 20 33 35 20 46 45 45 54 22 2C 22 33 36 20 54 |O 35 FEET","36 T|
00000820: 4F 20 35 30 20 46 45 45 54 22 2C 22 35 31 20 54 |O 50 FEET","51 T|
00000830: 4F 20 37 35 20 46 45 45 54 22 00 4F 10 68 02 83 |O 75 FEET".O.h..|
00000840: 22 20 4F 56 45 52 20 37 35 20 46 45 45 54 22 00 |" OVER 75 FEET".|
00000850: 6D 10 6C 02 86 20 50 44 24 28 38 29 3A 81 49 B2 |m.l.. PD$(8):.I.|
00000860: 30 A4 38 3A 87 50 44 24 28 49 29 3A 82 00 83 10 |0.8:.PD$(I):....|
00000870: 76 02 8F 20 48 41 4E 44 49 43 41 50 20 52 41 4E |v.. HANDICAP RAN|
00000880: 47 45 53 00 D1 10 80 02 86 48 24 28 34 29 3A 48 |GES......H$(4):H|
00000890: 24 28 30 29 B2 22 30 2D 33 22 3A 48 24 28 31 29 |$(0)."0-3":H$(1)|
000008A0: B2 22 34 2D 38 22 3A 48 24 28 32 29 B2 22 39 2D |."4-8":H$(2)."9-|
000008B0: 31 33 22 3A 48 24 28 33 29 B2 22 31 34 3D 31 38 |13":H$(3)."14=18|
000008C0: 22 3A 48 24 28 34 29 B2 22 4F 56 45 52 20 31 38 |":H$(4)."OVER 18|
000008D0: 22 00 DE 10 8A 02 86 20 4E 25 28 38 30 29 00 FF |"...... N%(80)..|
000008E0: 10 94 02 9F 20 32 2C 38 2C 32 2C 22 30 3A 41 52 |.... 2,8,2,"0:AR|
000008F0: 52 41 59 2E 53 54 41 54 55 53 2C 53 2C 52 22 00 |RAY.STATUS,S,R".|
00000900: 14 11 99 02 81 49 B2 31 A4 38 30 3A 84 32 2C 4E |.....I.1.80:.2,N|
00000910: 25 28 49 29 00 1D 11 9E 02 82 3A A0 32 00 30 11 |%(I)......:.2.0.|
00000920: B2 02 8F 20 50 55 54 54 49 4E 47 20 44 41 54 41 |... PUTTING DATA|
00000930: 00 7B 11 BC 02 83 31 2C 31 2E 31 2C 31 2C 31 2E |.{....1,1.1,1,1.|
00000940: 31 2C 2E 39 39 2C 31 2E 31 2C 2E 39 37 2C 31 2E |1,.99,1.1,.97,1.|
00000950: 31 2C 2E 39 36 2C 31 2E 31 2C 2E 39 2C 31 2E 31 |1,.96,1.1,.9,1.1|
00000960: 2C 2E 38 35 2C 31 2E 31 2C 2E 38 2C 31 2E 31 2C |,.85,1.1,.8,1.1,|
00000970: 2E 37 2C 31 2E 31 2C 2E 35 2C 31 00 C4 11 BE 02 |.7,1.1,.5,1.....|
00000980: 83 2E 36 2C 31 2E 30 35 2C 2E 35 35 2C 31 2E 30 |..6,1.05,.55,1.0|
00000990: 35 2C 2E 35 2C 31 2E 30 35 2C 2E 34 2C 31 2C 2E |5,.5,1.05,.4,1,.|
000009A0: 32 35 34 2C 31 2C 2E 32 39 2C 2E 39 38 2C 2E 32 |254,1,.29,.98,.2|
000009B0: 35 2C 2E 39 38 2C 2E 32 2C 2E 39 36 2C 2E 31 35 |5,.98,.2,.96,.15|
000009C0: 2C 2E 39 36 00 F5 11 C0 02 83 2E 30 38 2C 2E 39 |,.96.......08,.9|
000009D0: 2C 2E 31 38 2C 2E 39 35 2C 2E 31 35 2C 2E 39 35 |,.18,.95,.15,.95|
000009E0: 2C 2E 31 2C 2E 39 35 2C 2E 30 36 2C 2E 39 2C 2E |,.1,.95,.06,.9,.|
000009F0: 30 33 2C 2E 38 00 3E 12 C6 02 83 2E 31 2C 2E 38 |03,.8.>.....1,.8|
00000A00: 35 2C 2E 30 36 2C 2E 38 35 2C 2E 30 33 2C 2E 38 |5,.06,.85,.03,.8|
00000A10: 33 2C 2E 30 31 2C 2E 37 38 2C 2E 30 30 35 2C 2E |3,.01,.78,.005,.|
00000A20: 37 2C 2E 30 34 2C 2E 37 38 2C 2E 30 33 2C 2E 37 |7,.04,.78,.03,.7|
00000A30: 32 2C 2E 30 31 2C 2E 36 37 2C 2E 30 30 35 00 88 |2,.01,.67,.005..|
00000A40: 12 C8 02 83 2E 35 38 2C 2E 30 30 31 2C 2E 34 35 |.....58,.001,.45|
00000A50: 2C 2E 30 31 2C 2E 37 33 2C 2E 30 31 2C 2E 37 2C |,.01,.73,.01,.7,|
00000A60: 2E 30 31 2C 2E 36 35 2C 2E 30 30 35 2C 2E 35 35 |.01,.65,.005,.55|
00000A70: 2C 2E 30 30 31 2C 2E 34 2C 2E 30 30 35 2C 2E 37 |,.001,.4,.005,.7|
00000A80: 2C 2E 30 30 35 2C 2E 37 00 A7 12 CA 02 83 2E 30 |,.005,.7.......0|
00000A90: 30 35 2C 2E 36 35 2C 2E 30 30 35 2C 2E 35 35 2C |05,.65,.005,.55,|
00000AA0: 2E 30 30 31 2C 2E 34 00 EE 12 D0 02 83 31 2C 31 |.001,.4......1,1|
00000AB0: 2E 31 2C 31 2C 31 2E 31 2C 2E 39 39 2C 31 2E 31 |.1,1,1.1,.99,1.1|
00000AC0: 2C 2E 39 37 2C 31 2E 31 2C 2E 39 36 2C 31 2E 31 |,.97,1.1,.96,1.1|
00000AD0: 2C 2E 38 38 2C 31 2E 31 2C 2E 38 35 2C 31 2E 31 |,.88,1.1,.85,1.1|
00000AE0: 2C 2E 38 2C 31 2E 31 2C 2E 37 2C 31 2E 31 00 35 |,.8,1.1,.7,1.1.5|
00000AF0: 13 D2 02 83 2E 35 2C 31 2E 31 2C 2E 33 33 2C 31 |.....5,1.1,.33,1|
00000B00: 2E 31 2C 2E 33 33 2C 31 2E 31 2C 2E 33 33 2C 31 |.1,.33,1.1,.33,1|
00000B10: 2E 31 2C 2E 32 35 2C 31 2E 30 35 2C 2E 32 2C 31 |.1,.25,1.05,.2,1|
00000B20: 2E 30 35 2C 2E 31 32 2C 31 2E 30 35 2C 2E 31 32 |.05,.12,1.05,.12|
00000B30: 2C 31 2E 30 35 00 75 13 D4 02 83 2E 31 32 2C 31 |,1.05.u.....12,1|
00000B40: 2E 30 33 2C 2E 31 2C 31 2E 30 33 2C 2E 30 38 2C |.03,.1,1.03,.08,|
00000B50: 31 2C 2E 30 36 2C 31 2E 30 31 2C 2E 30 36 2C 31 |1,.06,1.01,.06,1|
00000B60: 2C 2E 30 35 2C 31 2C 2E 30 35 2C 2E 39 38 2C 2E |,.05,1,.05,.98,.|
00000B70: 30 31 2C 2E 39 00 C2 13 DA 02 83 2E 30 31 2C 31 |01,.9.......01,1|
00000B80: 2C 2E 30 31 2C 2E 39 35 2C 2E 30 31 2C 2E 39 2C |,.01,.95,.01,.9,|
00000B90: 2E 30 31 2C 2E 38 35 2C 2E 30 30 35 2C 2E 37 35 |.01,.85,.005,.75|
00000BA0: 2C 2E 30 30 35 2C 2E 39 2C 2E 30 30 35 2C 2E 39 |,.005,.9,.005,.9|
00000BB0: 2C 2E 30 30 35 2C 2E 37 35 2C 2E 30 30 31 2C 2E |,.005,.75,.001,.|
00000BC0: 36 35 00 0D 14 DC 02 83 2E 30 30 31 2C 2E 35 32 |65.......001,.52|
00000BD0: 2C 2E 30 30 31 2C 2E 38 35 2C 2E 30 30 31 2C 2E |,.001,.85,.001,.|
00000BE0: 38 2C 2E 30 30 31 2C 2E 36 39 2C 2E 30 30 31 2C |8,.001,.69,.001,|
00000BF0: 2E 36 2C 2E 30 30 31 2C 2E 34 38 2C 2E 30 30 30 |.6,.001,.48,.000|
00000C00: 35 2C 2E 38 2C 2E 30 30 30 35 2C 2E 38 00 2F 14 |5,.8,.0005,.8./.|
00000C10: DE 02 83 2E 30 30 30 35 2C 2E 36 39 2C 2E 30 30 |....0005,.69,.00|
00000C20: 30 35 2C 2E 36 2C 2E 30 30 30 35 2C 2E 34 38 00 |05,.6,.0005,.48.|
00000C30: 7C 14 E4 02 83 31 2C 31 2E 31 2C 31 2C 31 2E 31 ||....1,1.1,1,1.1|
00000C40: 2C 2E 39 39 2C 31 2E 31 2C 2E 39 37 2C 31 2E 31 |,.99,1.1,.97,1.1|
00000C50: 2C 2E 39 36 2C 31 2C 2E 39 35 2C 31 2E 31 2C 2E |,.96,1,.95,1.1,.|
00000C60: 38 38 2C 31 2E 31 2C 2E 38 33 2C 31 2E 31 2C 2E |88,1.1,.83,1.1,.|
00000C70: 37 35 2C 31 2E 31 2C 2E 35 35 2C 31 00 C4 14 E6 |75,1.1,.55,1....|
00000C80: 02 83 2E 37 2C 2E 39 35 2C 2E 36 2C 2E 39 35 2C |...7,.95,.6,.95,|
00000C90: 2E 35 35 2C 2E 39 35 2C 2E 34 35 2C 2E 39 32 2C |.55,.95,.45,.92,|
00000CA0: 2E 33 2C 2E 39 32 2C 2E 34 2C 2E 38 38 2C 2E 33 |.3,.92,.4,.88,.3|
00000CB0: 35 2C 2E 38 35 2C 2E 32 38 2C 2E 38 2C 2E 32 32 |5,.85,.28,.8,.22|
00000CC0: 2C 2E 37 39 00 F7 14 E8 02 83 2E 31 38 2C 2E 37 |,.79.......18,.7|
00000CD0: 35 2C 2E 32 35 2C 2E 37 38 2C 2E 32 2C 2E 37 38 |5,.25,.78,.2,.78|
00000CE0: 2C 2E 31 35 2C 2E 37 38 2C 2E 31 31 2C 2E 37 2C |,.15,.78,.11,.7,|
00000CF0: 2E 30 38 2C 2E 36 38 00 41 15 EE 02 83 2E 31 35 |.08,.68.A.....15|
00000D00: 2C 2E 36 35 2C 2E 31 2C 2E 36 35 2C 2E 30 36 2C |,.65,.1,.65,.06,|
00000D10: 2E 36 32 2C 2E 30 33 2C 2E 36 2C 2E 30 31 2C 2E |.62,.03,.6,.01,.|
00000D20: 36 2C 2E 30 36 2C 2E 35 38 2C 2E 30 35 2C 2E 35 |6,.06,.58,.05,.5|
00000D30: 35 2C 2E 30 33 2C 2E 35 35 2C 2E 30 31 2C 2E 35 |5,.03,.55,.01,.5|
00000D40: 32 00 88 15 F0 02 83 2E 30 31 2C 2E 34 2C 2E 30 |2.......01,.4,.0|
00000D50: 33 2C 2E 35 33 2C 2E 30 32 2C 2E 35 2C 2E 30 32 |3,.53,.02,.5,.02|
00000D60: 2C 2E 35 2C 2E 30 31 2C 2E 35 2C 2E 30 31 2C 2E |,.5,.01,.5,.01,.|
00000D70: 34 2C 2E 30 31 35 2C 2E 35 2C 2E 30 31 2C 2E 35 |4,.015,.5,.01,.5|
00000D80: 2C 2E 30 31 2C 2E 34 38 00 9D 15 F2 02 83 2E 30 |,.01,.48.......0|
00000D90: 31 2C 2E 34 38 2C 2E 30 31 2C 2E 33 38 00 D5 15 |1,.48,.01,.38...|
00000DA0: F8 02 86 50 28 32 2C 38 2C 34 2C 32 29 3A 81 49 |...P(2,8,4,2):.I|
00000DB0: B2 30 A4 32 3A 81 4A B2 30 A4 38 3A 81 4B B2 30 |.0.2:.J.0.8:.K.0|
00000DC0: A4 34 3A 81 4C B2 31 A4 32 3A 87 50 28 49 2C 4A |.4:.L.1.2:.P(I,J|
00000DD0: 2C 4B 2C 4C 29 00 E1 15 FD 02 82 3A 82 3A 82 3A |,K,L)......:.:.:|
00000DE0: 82 00 00 16 02 03 8F 20 2A 2A 20 50 55 54 54 20 |....... ** PUTT |
00000DF0: 44 49 53 54 41 4E 43 45 20 44 41 54 41 20 2A 2A |DISTANCE DATA **|
00000E00: 00 1F 16 0C 03 83 32 2C 35 2C 31 30 2C 31 36 2C |......2,5,10,16,|
00000E10: 32 34 2C 33 35 2C 35 30 2C 37 35 2C 39 39 39 00 |24,35,50,75,999.|
00000E20: 3A 16 16 03 86 50 44 28 38 29 3A 81 49 B2 30 A4 |:....PD(8):.I.0.|
00000E30: 38 3A 87 50 44 28 49 29 3A 82 00 5D 16 20 03 50 |8:.PD(I):..]. .P|
00000E40: 46 24 B2 22 58 22 3A 50 46 B2 30 3A 8F 20 4C 4F |F$."X":PF.0:. LO|
00000E50: 41 44 2F 53 41 56 45 20 46 4C 41 47 53 00 A5 16 |AD/SAVE FLAGS...|
00000E60: 2A 03 43 45 B2 30 3A 50 45 B2 30 3A 43 4A B2 30 |*.CE.0:PE.0:CJ.0|
00000E70: 3A 50 4A B2 30 3A 8F 20 45 44 49 54 2F 4A 55 4D |:PJ.0:. EDIT/JUM|
00000E80: 50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |P |
00000E90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000EA0: 46 4C 41 47 53 00 C8 16 34 03 8F 20 2A 2A 20 4F |FLAGS...4.. ** O|
00000EB0: 4E 45 52 52 20 53 55 42 53 54 2E 20 47 4F 45 53 |NERR SUBST. GOES|
00000EC0: 20 48 45 52 45 20 2A 2A 00 E0 16 3E 03 9F 20 32 | HERE **...>.. 2|
00000ED0: 2C 38 2C 32 2C 22 30 3A 47 50 4E 2C 53 2C 52 22 |,8,2,"0:GPN,S,R"|
00000EE0: 00 EC 16 48 03 81 49 B2 31 A4 38 30 00 FA 16 4A |...H..I.1.80...J|
00000EF0: 03 84 32 2C 50 4E 24 28 49 29 00 00 17 4C 03 82 |..2,PN$(I)...L..|
00000F00: 00 07 17 52 03 A0 32 00 1F 17 57 03 97 35 33 32 |...R..2...W..532|
00000F10: 38 31 2C 31 32 3A 97 35 33 32 38 30 2C 31 35 00 |81,12:.53280,15.|
00000F20: 35 17 5C 03 8F 20 2A 2A 20 20 4F 50 54 49 4F 4E |5.\.. ** OPTION|
00000F30: 53 20 20 2A 2A 00 5A 17 66 03 99 22 93 11 11 11 |S **.Z.f.."....|
00000F40: 11 11 11 22 3A 97 32 31 31 2C 31 35 3A 99 22 4F |...":.211,15:."O|
00000F50: 50 54 49 4F 4E 53 3A 22 3A 99 00 80 17 68 03 97 |PTIONS:":....h..|
00000F60: 32 31 31 2C 38 3A 99 22 31 20 2D 20 43 52 45 41 |211,8:."1 - CREA|
00000F70: 54 45 20 41 20 43 4C 55 42 20 41 52 52 41 59 22 |TE A CLUB ARRAY"|
00000F80: 00 A4 17 69 03 97 32 31 31 2C 38 3A 99 22 32 20 |...i..211,8:."2 |
00000F90: 2D 20 56 49 45 57 20 41 20 43 4C 55 42 20 41 52 |- VIEW A CLUB AR|
00000FA0: 52 41 59 22 00 CD 17 6A 03 97 32 31 31 2C 38 3A |RAY"...j..211,8:|
00000FB0: 99 22 33 20 2D 20 43 52 45 41 54 45 20 41 20 50 |."3 - CREATE A P|
00000FC0: 55 54 54 49 4E 47 20 41 52 52 41 59 22 00 F4 17 |UTTING ARRAY"...|
00000FD0: 6B 03 97 32 31 31 2C 38 3A 99 22 34 20 2D 20 56 |k..211,8:."4 - V|
00000FE0: 49 45 57 20 41 20 50 55 54 54 49 4E 47 20 41 52 |IEW A PUTTING AR|
00000FF0: 52 41 59 22 00 19 18 6C 03 97 32 31 31 2C 38 3A |RAY"...l..211,8:|
00001000: 99 22 35 20 2D 20 4C 4F 41 44 20 41 20 50 4C 41 |."5 - LOAD A PLA|
00001010: 59 45 52 20 46 49 4C 45 22 00 3E 18 6D 03 97 32 |YER FILE".>.m..2|
00001020: 31 31 2C 38 3A 99 22 36 20 2D 20 53 41 56 45 20 |11,8:."6 - SAVE |
00001030: 41 20 50 4C 41 59 45 52 20 46 49 4C 45 22 00 67 |A PLAYER FILE".g|
00001040: 18 7A 03 97 32 31 31 2C 38 3A 99 22 37 20 2D 20 |.z..211,8:."7 - |
00001050: 52 45 56 49 45 57 20 43 48 41 52 41 43 54 45 52 |REVIEW CHARACTER|
00001060: 49 53 54 49 43 53 22 00 8B 18 7F 03 97 32 31 31 |ISTICS"......211|
00001070: 2C 38 3A 99 22 38 20 2D 20 56 49 45 57 20 50 4C |,8:."8 - VIEW PL|
00001080: 41 59 45 52 20 4E 41 4D 45 53 22 00 AF 18 84 03 |AYER NAMES".....|
00001090: 97 32 31 31 2C 38 3A 99 22 39 20 2D 20 54 45 52 |.211,8:."9 - TER|
000010A0: 4D 49 4E 41 54 45 20 50 52 4F 47 52 41 4D 22 00 |MINATE PROGRAM".|
000010B0: DB 18 8E 03 99 3A 41 24 B2 22 2A 22 3A 85 22 20 |.....:A$."*":." |
000010C0: 20 20 20 20 20 20 20 20 20 20 20 45 4E 54 45 52 | ENTER|
000010D0: 20 4F 50 54 49 4F 4E 22 3B 41 24 00 F6 18 98 03 | OPTION";A$.....|
000010E0: 8B C6 28 41 24 29 B3 34 39 B0 C6 28 41 24 29 B1 |..(A$).49..(A$).|
000010F0: 35 37 A7 38 37 30 00 33 19 A2 03 4F 50 B2 C5 28 |57.870.3...OP..(|
00001100: 41 24 29 3A 91 4F 50 89 31 30 30 30 2C 33 30 31 |A$):.OP.1000,301|
00001110: 30 2C 34 30 30 30 2C 35 30 31 30 2C 36 30 30 30 |0,4000,5010,6000|
00001120: 2C 37 30 30 30 2C 38 30 30 30 2C 37 34 37 30 2C |,7000,8000,7470,|
00001130: 39 34 30 00 51 19 AC 03 8F 20 2A 2A 20 54 45 52 |940.Q.... ** TER|
00001140: 4D 49 4E 41 54 45 20 50 52 4F 47 52 41 4D 20 2A |MINATE PROGRAM *|
00001150: 2A 00 59 19 B6 03 A2 3A 80 00 77 19 E8 03 8F 20 |*.Y....:..w.... |
00001160: 2A 2A 20 43 52 45 41 54 45 20 43 4C 55 42 20 41 |** CREATE CLUB A|
00001170: 52 52 41 59 20 2A 2A 00 87 19 F2 03 99 22 93 22 |RRAY **......"."|
00001180: 3A 41 24 B2 22 2A 22 00 AF 19 FC 03 99 22 45 4E |:A$."*"......"EN|
00001190: 54 45 52 20 59 4F 55 52 20 41 56 45 52 41 47 45 |TER YOUR AVERAGE|
000011A0: 20 44 49 53 54 41 4E 43 45 20 46 4F 52 3A 22 00 | DISTANCE FOR:".|
000011B0: CF 19 06 04 85 22 44 52 49 56 45 52 20 3A 22 3B |....."DRIVER :";|
000011C0: 41 24 3A 8B 41 24 B2 22 2A 22 A7 31 30 33 30 00 |A$:.A$."*".1030.|
000011D0: E1 19 10 04 43 25 28 31 2C 31 29 B2 C5 28 41 24 |....C%(1,1)..(A$|
000011E0: 29 00 08 1A 1A 04 41 24 B2 22 2A 22 3A 85 22 57 |).....A$."*":."W|
000011F0: 45 44 47 45 20 20 3A 22 3B 41 24 3A 8B 41 24 B2 |EDGE :";A$:.A$.|
00001200: 22 2A 22 A7 31 30 35 30 00 1B 1A 24 04 43 25 28 |"*".1050...$.C%(|
00001210: 31 34 2C 31 29 B2 C5 28 41 24 29 00 37 1A 2E 04 |14,1)..(A$).7...|
00001220: 41 B2 28 43 25 28 31 2C 31 29 AB 43 25 28 31 34 |A.(C%(1,1).C%(14|
00001230: 2C 31 29 29 AD 31 33 00 43 1A 38 04 81 49 B2 32 |,1)).13.C.8..I.2|
00001240: A4 31 33 00 5F 1A 42 04 43 25 28 49 2C 31 29 B2 |.13._.B.C%(I,1).|
00001250: 43 25 28 31 2C 31 29 AB 28 49 AB 31 29 AC 41 00 |C%(1,1).(I.1).A.|
00001260: A6 1A 4C 04 82 3A 43 25 28 30 2C 31 29 B2 43 25 |..L..:C%(0,1).C%|
00001270: 28 31 34 2C 31 29 3A 43 25 28 31 35 2C 31 29 B2 |(14,1):C%(15,1).|
00001280: 35 30 3A 43 25 28 31 36 2C 31 29 B2 35 30 3A 43 |50:C%(16,1).50:C|
00001290: 25 28 31 37 2C 31 29 B2 35 30 3A 43 25 28 31 38 |%(17,1).50:C%(18|
000012A0: 2C 31 29 B2 35 30 00 DD 1A 56 04 99 22 93 11 20 |,1).50...V..".. |
000012B0: 20 20 20 20 12 57 48 41 54 20 49 53 20 59 4F 55 | .WHAT IS YOU|
000012C0: 52 20 48 41 4E 44 49 43 41 50 20 42 52 41 43 4B |R HANDICAP BRACK|
000012D0: 45 54 92 22 3A 99 3A 41 24 B2 22 2A 22 00 FF 1A |ET.":.:A$."*"...|
000012E0: 60 04 99 22 20 20 20 20 20 20 20 20 30 20 2D 3E |`.." 0 ->|
000012F0: 20 5A 45 52 4F 20 54 4F 20 54 48 52 45 45 22 00 | ZERO TO THREE".|
00001300: 21 1B 6A 04 99 22 20 20 20 20 20 20 20 20 31 20 |!.j.." 1 |
00001310: 2D 3E 20 46 4F 55 52 20 54 4F 20 45 49 47 48 54 |-> FOUR TO EIGHT|
00001320: 22 00 46 1B 74 04 99 22 20 20 20 20 20 20 20 20 |".F.t.." |
00001330: 32 20 2D 3E 20 4E 49 4E 45 20 54 4F 20 54 48 49 |2 -> NINE TO THI|
00001340: 52 54 45 45 4E 22 00 6F 1B 7E 04 99 22 20 20 20 |RTEEN".o.~.." |
00001350: 20 20 20 20 20 33 20 2D 3E 20 46 4F 55 52 54 45 | 3 -> FOURTE|
00001360: 45 4E 20 54 4F 20 45 49 47 48 54 45 45 4E 22 00 |EN TO EIGHTEEN".|
00001370: 91 1B 88 04 99 22 20 20 20 20 20 20 20 20 34 20 |....." 4 |
00001380: 2D 3E 20 4F 56 45 52 20 45 49 47 48 54 45 45 4E |-> OVER EIGHTEEN|
00001390: 22 00 B9 1B 92 04 99 22 11 11 22 3A 85 22 20 20 |"......"..":." |
000013A0: 20 20 20 20 20 20 20 20 20 20 20 42 52 41 43 4B | BRACK|
000013B0: 45 54 20 23 20 22 3B 41 24 00 D5 1B 9C 04 8B C6 |ET # ";A$.......|
000013C0: 28 41 24 29 B3 34 38 B0 C6 28 41 24 29 B1 35 32 |(A$).48..(A$).52|
000013D0: A7 31 31 31 30 00 E1 1B A6 04 48 B2 C5 28 41 24 |.1110.....H..(A$|
000013E0: 29 00 0F 1C B0 04 99 22 93 11 55 53 49 4E 47 20 |)......"..USING |
000013F0: 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 54 41 |THE FOLLOWING TA|
00001400: 42 4C 45 2C 20 52 41 54 45 20 59 4F 55 52 22 00 |BLE, RATE YOUR".|
00001410: 3B 1C BA 04 99 22 44 49 52 45 43 54 49 4F 4E 41 |;...."DIRECTIONA|
00001420: 4C 20 41 43 43 55 52 41 43 59 20 46 4F 52 20 45 |L ACCURACY FOR E|
00001430: 41 43 48 20 53 55 42 53 45 54 22 00 58 1C C4 04 |ACH SUBSET".X...|
00001440: 99 22 4F 46 20 43 4C 55 42 53 20 49 4E 20 59 4F |."OF CLUBS IN YO|
00001450: 55 52 20 42 41 47 3A 22 00 78 1C CE 04 99 3A 97 |UR BAG:".x....:.|
00001460: 32 31 31 2C 31 31 3A 99 22 30 20 2D 3E 20 45 58 |211,11:."0 -> EX|
00001470: 43 45 4C 4C 45 4E 54 22 00 91 1C D8 04 97 32 31 |CELLENT"......21|
00001480: 31 2C 31 31 3A 99 22 31 20 2D 3E 20 47 4F 4F 44 |1,11:."1 -> GOOD|
00001490: 22 00 AD 1C E2 04 97 32 31 31 2C 31 31 3A 99 22 |"......211,11:."|
000014A0: 32 20 2D 3E 20 41 56 45 52 41 47 45 22 00 CF 1C |2 -> AVERAGE"...|
000014B0: EC 04 97 32 31 31 2C 31 31 3A 99 22 33 20 2D 3E |...211,11:."3 ->|
000014C0: 20 42 45 4C 4F 57 20 41 56 45 52 41 47 45 22 00 | BELOW AVERAGE".|
000014D0: 05 1D F6 04 99 3A 81 49 B2 31 A4 38 3A 99 43 54 |.....:.I.1.8:.CT|
000014E0: 24 28 49 29 3B 3A 97 32 31 31 2C 31 32 3A 99 22 |$(I);:.211,12:."|
000014F0: 2D 2D 2D 2D 3E 22 3B 3A 97 31 39 38 2C 30 3A 97 |---->";:.198,0:.|
00001500: 36 33 31 2C 30 00 2B 1D 00 05 8B C2 28 36 33 31 |631,0.+.....(631|
00001510: 29 B3 34 38 B0 C2 28 36 33 31 29 B1 35 31 A7 97 |).48..(631).51..|
00001520: 31 39 38 2C 30 3A 89 31 32 38 30 00 52 1D 0A 05 |198,0:.1280.R...|
00001530: 97 31 39 38 2C 30 3A 4A B2 C2 28 36 33 31 29 AB |.198,0:J..(631).|
00001540: 34 38 3A 99 52 24 28 4A 29 3A 41 43 25 28 49 29 |48:.R$(J):AC%(I)|
00001550: B2 4A 00 65 1D 14 05 52 25 28 30 2C 49 29 B2 41 |.J.e...R%(0,I).A|
00001560: 43 25 28 49 29 00 6B 1D 1E 05 82 00 8C 1D 28 05 |C%(I).k.......(.|
00001570: 43 25 28 31 2C 33 29 B2 43 25 28 31 2C 31 29 AC |C%(1,3).C%(1,1).|
00001580: 41 43 28 48 2C 41 43 25 28 31 29 29 00 B6 1D 32 |AC(H,AC%(1))...2|
00001590: 05 81 49 B2 32 A4 34 3A 43 25 28 49 2C 33 29 B2 |..I.2.4:C%(I,3).|
000015A0: 43 25 28 49 2C 31 29 AC 41 43 28 48 2C 41 43 25 |C%(I,1).AC(H,AC%|
000015B0: 28 32 29 29 3A 82 00 E0 1D 3C 05 81 49 B2 35 A4 |(2)):....<..I.5.|
000015C0: 37 3A 43 25 28 49 2C 33 29 B2 43 25 28 49 2C 31 |7:C%(I,3).C%(I,1|
000015D0: 29 AC 41 43 28 48 2C 41 43 25 28 33 29 29 3A 82 |).AC(H,AC%(3)):.|
000015E0: 00 0B 1E 46 05 81 49 B2 38 A4 31 30 3A 43 25 28 |...F..I.8.10:C%(|
000015F0: 49 2C 33 29 B2 43 25 28 49 2C 31 29 AC 41 43 28 |I,3).C%(I,1).AC(|
00001600: 48 2C 41 43 25 28 34 29 29 3A 82 00 37 1E 50 05 |H,AC%(4)):..7.P.|
00001610: 81 49 B2 31 31 A4 31 33 3A 43 25 28 49 2C 33 29 |.I.11.13:C%(I,3)|
00001620: B2 43 25 28 49 2C 31 29 AC 41 43 28 48 2C 41 43 |.C%(I,1).AC(H,AC|
00001630: 25 28 35 29 29 3A 82 00 6B 1E 5A 05 43 25 28 31 |%(5)):..k.Z.C%(1|
00001640: 34 2C 33 29 B2 43 25 28 31 34 2C 31 29 AC 41 43 |4,3).C%(14,1).AC|
00001650: 28 48 2C 41 43 25 28 36 29 29 3A 43 25 28 30 2C |(H,AC%(6)):C%(0,|
00001660: 33 29 B2 43 25 28 31 34 2C 33 29 00 A0 1E 64 05 |3).C%(14,3)...d.|
00001670: 43 25 28 31 35 2C 33 29 B2 43 25 28 31 35 2C 31 |C%(15,3).C%(15,1|
00001680: 29 AC 41 43 28 48 2C 41 43 25 28 37 29 29 3A 43 |).AC(H,AC%(7)):C|
00001690: 25 28 31 36 2C 33 29 B2 43 25 28 31 35 2C 33 29 |%(16,3).C%(15,3)|
000016A0: 00 D5 1E 6E 05 43 25 28 31 37 2C 33 29 B2 43 25 |...n.C%(17,3).C%|
000016B0: 28 31 37 2C 31 29 AC 41 43 28 48 2C 41 43 25 28 |(17,1).AC(H,AC%(|
000016C0: 38 29 29 3A 43 25 28 31 38 2C 33 29 B2 43 25 28 |8)):C%(18,3).C%(|
000016D0: 31 37 2C 33 29 00 03 1F 78 05 99 22 93 11 55 53 |17,3)...x.."..US|
000016E0: 49 4E 47 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E |ING THE FOLLOWIN|
000016F0: 47 20 54 41 42 4C 45 2C 20 52 41 54 45 20 59 4F |G TABLE, RATE YO|
00001700: 55 52 22 00 30 1F 82 05 99 22 42 41 43 4B 53 50 |UR".0...."BACKSP|
00001710: 49 4E 20 43 41 50 41 42 49 4C 49 54 49 45 53 20 |IN CAPABILITIES |
00001720: 46 4F 52 20 45 41 43 48 20 53 55 42 53 45 54 22 |FOR EACH SUBSET"|
00001730: 00 4D 1F 8C 05 99 22 4F 46 20 43 4C 55 42 53 20 |.M...."OF CLUBS |
00001740: 49 4E 20 59 4F 55 52 20 42 41 47 3A 22 00 6D 1F |IN YOUR BAG:".m.|
00001750: 96 05 99 3A 97 32 31 31 2C 31 31 3A 99 22 30 20 |...:.211,11:."0 |
00001760: 2D 3E 20 45 58 43 45 4C 4C 45 4E 54 22 00 86 1F |-> EXCELLENT"...|
00001770: A0 05 97 32 31 31 2C 31 31 3A 99 22 31 20 2D 3E |...211,11:."1 ->|
00001780: 20 47 4F 4F 44 22 00 A2 1F AA 05 97 32 31 31 2C | GOOD"......211,|
00001790: 31 31 3A 99 22 32 20 2D 3E 20 41 56 45 52 41 47 |11:."2 -> AVERAG|
000017A0: 45 22 00 C4 1F B4 05 97 32 31 31 2C 31 31 3A 99 |E"......211,11:.|
000017B0: 22 33 20 2D 3E 20 42 45 4C 4F 57 20 41 56 45 52 |"3 -> BELOW AVER|
000017C0: 41 47 45 22 00 FA 1F BE 05 99 3A 81 49 B2 31 A4 |AGE"......:.I.1.|
000017D0: 38 3A 99 43 54 24 28 49 29 3B 3A 97 32 31 31 2C |8:.CT$(I);:.211,|
000017E0: 31 32 3A 99 22 2D 2D 2D 2D 3E 22 3B 3A 97 31 39 |12:."---->";:.19|
000017F0: 38 2C 30 3A 97 36 33 31 2C 30 00 20 20 C8 05 8B |8,0:.631,0. ...|
00001800: C2 28 36 33 31 29 B3 34 38 B0 C2 28 36 33 31 29 |.(631).48..(631)|
00001810: B1 35 31 A7 97 31 39 38 2C 30 3A 89 31 34 38 30 |.51..198,0:.1480|
00001820: 00 47 20 D2 05 97 31 39 38 2C 30 3A 4A B2 C2 28 |.G ...198,0:J..(|
00001830: 36 33 31 29 AB 34 38 3A 99 52 24 28 4A 29 3A 41 |631).48:.R$(J):A|
00001840: 43 25 28 49 29 B2 4A 00 5A 20 DC 05 52 25 28 31 |C%(I).J.Z ..R%(1|
00001850: 2C 49 29 B2 41 43 25 28 49 29 00 60 20 E6 05 82 |,I).AC%(I).` ...|
00001860: 00 79 20 F0 05 43 25 28 31 2C 34 29 B2 53 50 28 |.y ..C%(1,4).SP(|
00001870: 30 2C 41 43 25 28 31 29 29 00 9B 20 FA 05 81 49 |0,AC%(1)).. ...I|
00001880: B2 32 A4 34 3A 43 25 28 49 2C 34 29 B2 53 50 28 |.2.4:C%(I,4).SP(|
00001890: 31 2C 41 43 25 28 32 29 29 3A 82 00 BD 20 04 06 |1,AC%(2)):... ..|
000018A0: 81 49 B2 35 A4 37 3A 43 25 28 49 2C 34 29 B2 53 |.I.5.7:C%(I,4).S|
000018B0: 50 28 32 2C 41 43 25 28 33 29 29 3A 82 00 E0 20 |P(2,AC%(3)):... |
000018C0: 0E 06 81 49 B2 38 A4 31 30 3A 43 25 28 49 2C 34 |...I.8.10:C%(I,4|
000018D0: 29 B2 53 50 28 33 2C 41 43 25 28 34 29 29 3A 82 |).SP(3,AC%(4)):.|
000018E0: 00 04 21 18 06 81 49 B2 31 31 A4 31 33 3A 43 25 |..!...I.11.13:C%|
000018F0: 28 49 2C 34 29 B2 53 50 28 34 2C 41 43 25 28 35 |(I,4).SP(4,AC%(5|
00001900: 29 29 3A 82 00 2F 21 22 06 43 25 28 31 34 2C 34 |)):../!".C%(14,4|
00001910: 29 B2 53 50 28 35 2C 41 43 25 28 36 29 29 3A 43 |).SP(5,AC%(6)):C|
00001920: 25 28 30 2C 34 29 B2 43 25 28 31 34 2C 34 29 00 |%(0,4).C%(14,4).|
00001930: 5B 21 2C 06 43 25 28 31 35 2C 34 29 B2 53 50 28 |[!,.C%(15,4).SP(|
00001940: 36 2C 41 43 25 28 37 29 29 3A 43 25 28 31 36 2C |6,AC%(7)):C%(16,|
00001950: 34 29 B2 43 25 28 31 35 2C 34 29 00 87 21 36 06 |4).C%(15,4)..!6.|
00001960: 43 25 28 31 37 2C 34 29 B2 53 50 28 37 2C 41 43 |C%(17,4).SP(7,AC|
00001970: 25 28 38 29 29 3A 43 25 28 31 38 2C 34 29 B2 43 |%(8)):C%(18,4).C|
00001980: 25 28 31 37 2C 34 29 00 B5 21 40 06 99 22 93 11 |%(17,4)..!@.."..|
00001990: 55 53 49 4E 47 20 54 48 45 20 46 4F 4C 4C 4F 57 |USING THE FOLLOW|
000019A0: 49 4E 47 20 54 41 42 4C 45 2C 20 52 41 54 45 20 |ING TABLE, RATE |
000019B0: 59 4F 55 52 22 00 E0 21 4A 06 99 22 41 42 49 4C |YOUR"..!J.."ABIL|
000019C0: 49 54 59 20 54 4F 20 48 49 54 20 53 48 4F 54 53 |ITY TO HIT SHOTS|
000019D0: 20 41 42 4F 55 54 20 54 48 45 20 53 41 4D 45 22 | ABOUT THE SAME"|
000019E0: 00 0D 22 54 06 99 22 44 49 53 54 41 4E 43 45 20 |.."T.."DISTANCE |
000019F0: 45 41 43 48 20 54 49 4D 45 20 46 4F 52 20 45 41 |EACH TIME FOR EA|
00001A00: 43 48 20 53 55 42 53 45 54 20 4F 46 22 00 27 22 |CH SUBSET OF".'"|
00001A10: 5E 06 99 22 43 4C 55 42 53 20 49 4E 20 59 4F 55 |^.."CLUBS IN YOU|
00001A20: 52 20 42 41 47 3A 22 00 47 22 68 06 99 3A 97 32 |R BAG:".G"h..:.2|
00001A30: 31 31 2C 31 31 3A 99 22 30 20 2D 3E 20 45 58 43 |11,11:."0 -> EXC|
00001A40: 45 4C 4C 45 4E 54 22 00 60 22 72 06 97 32 31 31 |ELLENT".`"r..211|
00001A50: 2C 31 31 3A 99 22 31 20 2D 3E 20 47 4F 4F 44 22 |,11:."1 -> GOOD"|
00001A60: 00 7C 22 7C 06 97 32 31 31 2C 31 31 3A 99 22 32 |.|"|..211,11:."2|
00001A70: 20 2D 3E 20 41 56 45 52 41 47 45 22 00 9E 22 86 | -> AVERAGE"..".|
00001A80: 06 97 32 31 31 2C 31 31 3A 99 22 33 20 2D 3E 20 |..211,11:."3 -> |
00001A90: 42 45 4C 4F 57 20 41 56 45 52 41 47 45 22 00 D4 |BELOW AVERAGE"..|
00001AA0: 22 90 06 99 3A 81 49 B2 31 A4 38 3A 99 43 54 24 |"...:.I.1.8:.CT$|
00001AB0: 28 49 29 3B 3A 97 32 31 31 2C 31 32 3A 99 22 2D |(I);:.211,12:."-|
00001AC0: 2D 2D 2D 3E 22 3B 3A 97 31 39 38 2C 30 3A 97 36 |--->";:.198,0:.6|
00001AD0: 33 31 2C 30 00 FA 22 9A 06 8B C2 28 36 33 31 29 |31,0.."....(631)|
00001AE0: B3 34 38 B0 C2 28 36 33 31 29 B1 35 31 A7 97 31 |.48..(631).51..1|
00001AF0: 39 38 2C 30 3A 89 31 36 39 30 00 11 23 A4 06 4A |98,0:.1690..#..J|
00001B00: B2 C2 28 36 33 31 29 AB 34 38 3A 97 31 39 38 2C |..(631).48:.198,|
00001B10: 30 00 25 23 AE 06 99 52 24 28 4A 29 3A 41 43 25 |0.%#...R$(J):AC%|
00001B20: 28 49 29 B2 4A 00 38 23 B8 06 52 25 28 32 2C 49 |(I).J.8#..R%(2,I|
00001B30: 29 B2 41 43 25 28 49 29 00 3E 23 C2 06 82 00 5F |).AC%(I).>#...._|
00001B40: 23 CC 06 43 25 28 31 2C 32 29 B2 43 25 28 31 2C |#..C%(1,2).C%(1,|
00001B50: 31 29 AC 44 56 28 48 2C 41 43 25 28 31 29 29 00 |1).DV(H,AC%(1)).|
00001B60: 89 23 D6 06 81 49 B2 32 A4 34 3A 43 25 28 49 2C |.#...I.2.4:C%(I,|
00001B70: 32 29 B2 43 25 28 49 2C 31 29 AC 44 56 28 48 2C |2).C%(I,1).DV(H,|
00001B80: 41 43 25 28 32 29 29 3A 82 00 B3 23 E0 06 81 49 |AC%(2)):...#...I|
00001B90: B2 35 A4 37 3A 43 25 28 49 2C 32 29 B2 43 25 28 |.5.7:C%(I,2).C%(|
00001BA0: 49 2C 31 29 AC 44 56 28 48 2C 41 43 25 28 33 29 |I,1).DV(H,AC%(3)|
00001BB0: 29 3A 82 00 DE 23 EA 06 81 49 B2 38 A4 31 30 3A |):...#...I.8.10:|
00001BC0: 43 25 28 49 2C 32 29 B2 43 25 28 49 2C 31 29 AC |C%(I,2).C%(I,1).|
00001BD0: 44 56 28 48 2C 41 43 25 28 34 29 29 3A 82 00 0A |DV(H,AC%(4)):...|
00001BE0: 24 F4 06 81 49 B2 31 31 A4 31 33 3A 43 25 28 49 |$...I.11.13:C%(I|
00001BF0: 2C 32 29 B2 43 25 28 49 2C 31 29 AC 44 56 28 48 |,2).C%(I,1).DV(H|
00001C00: 2C 41 43 25 28 35 29 29 3A 82 00 3E 24 FE 06 43 |,AC%(5)):..>$..C|
00001C10: 25 28 31 34 2C 32 29 B2 43 25 28 31 34 2C 31 29 |%(14,2).C%(14,1)|
00001C20: AC 44 56 28 48 2C 41 43 25 28 36 29 29 3A 43 25 |.DV(H,AC%(6)):C%|
00001C30: 28 30 2C 32 29 B2 43 25 28 31 34 2C 32 29 00 73 |(0,2).C%(14,2).s|
00001C40: 24 08 07 43 25 28 31 35 2C 32 29 B2 43 25 28 31 |$..C%(15,2).C%(1|
00001C50: 35 2C 31 29 AC 44 56 28 48 2C 41 43 25 28 37 29 |5,1).DV(H,AC%(7)|
00001C60: 29 3A 43 25 28 31 36 2C 32 29 B2 43 25 28 31 35 |):C%(16,2).C%(15|
00001C70: 2C 32 29 00 A8 24 12 07 43 25 28 31 37 2C 32 29 |,2)..$..C%(17,2)|
00001C80: B2 43 25 28 31 37 2C 31 29 AC 44 56 28 48 2C 41 |.C%(17,1).DV(H,A|
00001C90: 43 25 28 38 29 29 3A 43 25 28 31 38 2C 32 29 B2 |C%(8)):C%(18,2).|
00001CA0: 43 25 28 31 37 2C 32 29 00 D6 24 1C 07 99 22 93 |C%(17,2)..$...".|
00001CB0: 11 55 53 49 4E 47 20 54 48 45 20 46 4F 4C 4C 4F |.USING THE FOLLO|
00001CC0: 57 49 4E 47 20 54 41 42 4C 45 2C 20 52 41 54 45 |WING TABLE, RATE|
00001CD0: 20 59 4F 55 52 22 00 04 25 26 07 99 22 4F 56 45 | YOUR"..%&.."OVE|
00001CE0: 52 41 4C 4C 20 43 4F 4E 53 49 53 54 45 4E 43 59 |RALL CONSISTENCY|
00001CF0: 20 28 43 4F 4D 42 49 4E 45 44 20 44 49 53 54 41 | (COMBINED DISTA|
00001D00: 4E 43 45 22 00 32 25 30 07 99 22 41 4E 44 20 41 |NCE".2%0.."AND A|
00001D10: 43 43 55 52 41 43 59 29 20 46 4F 52 20 45 41 43 |CCURACY) FOR EAC|
00001D20: 48 20 53 55 42 53 45 54 20 4F 46 20 43 4C 55 42 |H SUBSET OF CLUB|
00001D30: 53 22 00 46 25 3A 07 99 22 49 4E 20 59 4F 55 52 |S".F%:.."IN YOUR|
00001D40: 20 42 41 47 3A 22 00 66 25 44 07 99 3A 97 32 31 | BAG:".f%D..:.21|
00001D50: 31 2C 31 31 3A 99 22 30 20 2D 3E 20 45 58 43 45 |1,11:."0 -> EXCE|
00001D60: 4C 4C 45 4E 54 22 00 7F 25 4E 07 97 32 31 31 2C |LLENT"..%N..211,|
00001D70: 31 31 3A 99 22 31 20 2D 3E 20 47 4F 4F 44 22 00 |11:."1 -> GOOD".|
00001D80: 9B 25 58 07 97 32 31 31 2C 31 31 3A 99 22 32 20 |.%X..211,11:."2 |
00001D90: 2D 3E 20 41 56 45 52 41 47 45 22 00 BD 25 62 07 |-> AVERAGE"..%b.|
00001DA0: 97 32 31 31 2C 31 31 3A 99 22 33 20 2D 3E 20 42 |.211,11:."3 -> B|
00001DB0: 45 4C 4F 57 20 41 56 45 52 41 47 45 22 00 F3 25 |ELOW AVERAGE"..%|
00001DC0: 6C 07 99 3A 81 49 B2 31 A4 38 3A 99 43 54 24 28 |l..:.I.1.8:.CT$(|
00001DD0: 49 29 3B 3A 97 32 31 31 2C 31 32 3A 99 22 2D 2D |I);:.211,12:."--|
00001DE0: 2D 2D 3E 22 3B 3A 97 31 39 38 2C 30 3A 97 36 33 |-->";:.198,0:.63|
00001DF0: 31 2C 30 00 19 26 76 07 8B C2 28 36 33 31 29 B3 |1,0..&v...(631).|
00001E00: 34 38 B0 C2 28 36 33 31 29 B1 35 31 A7 97 31 39 |48..(631).51..19|
00001E10: 38 2C 30 3A 89 31 39 31 30 00 30 26 80 07 4A B2 |8,0:.1910.0&..J.|
00001E20: C2 28 36 33 31 29 AB 34 38 3A 97 31 39 38 2C 30 |.(631).48:.198,0|
00001E30: 00 44 26 8A 07 99 52 24 28 4A 29 3A 41 43 25 28 |.D&...R$(J):AC%(|
00001E40: 49 29 B2 4A 00 57 26 94 07 52 25 28 33 2C 49 29 |I).J.W&..R%(3,I)|
00001E50: B2 41 43 25 28 49 29 00 5D 26 9E 07 82 00 76 26 |.AC%(I).]&....v&|
00001E60: A8 07 43 25 28 31 2C 30 29 B2 43 46 28 48 2C 41 |..C%(1,0).CF(H,A|
00001E70: 43 25 28 31 29 29 00 98 26 B2 07 81 49 B2 32 A4 |C%(1))..&...I.2.|
00001E80: 34 3A 43 25 28 49 2C 30 29 B2 43 46 28 48 2C 41 |4:C%(I,0).CF(H,A|
00001E90: 43 25 28 32 29 29 3A 82 00 BA 26 BC 07 81 49 B2 |C%(2)):...&...I.|
00001EA0: 35 A4 37 3A 43 25 28 49 2C 30 29 B2 43 46 28 48 |5.7:C%(I,0).CF(H|
00001EB0: 2C 41 43 25 28 33 29 29 3A 82 00 DD 26 C6 07 81 |,AC%(3)):...&...|
00001EC0: 49 B2 38 A4 31 30 3A 43 25 28 49 2C 30 29 B2 43 |I.8.10:C%(I,0).C|
00001ED0: 46 28 48 2C 41 43 25 28 34 29 29 3A 82 00 01 27 |F(H,AC%(4)):...'|
00001EE0: D0 07 81 49 B2 31 31 A4 31 33 3A 43 25 28 49 2C |...I.11.13:C%(I,|
00001EF0: 30 29 B2 43 46 28 48 2C 41 43 25 28 35 29 29 3A |0).CF(H,AC%(5)):|
00001F00: 82 00 2C 27 DA 07 43 25 28 31 34 2C 30 29 B2 43 |..,'..C%(14,0).C|
00001F10: 46 28 48 2C 41 43 25 28 36 29 29 3A 43 25 28 30 |F(H,AC%(6)):C%(0|
00001F20: 2C 30 29 B2 43 25 28 31 34 2C 30 29 00 58 27 E4 |,0).C%(14,0).X'.|
00001F30: 07 43 25 28 31 35 2C 30 29 B2 43 46 28 48 2C 41 |.C%(15,0).CF(H,A|
00001F40: 43 25 28 37 29 29 3A 43 25 28 31 36 2C 30 29 B2 |C%(7)):C%(16,0).|
00001F50: 43 25 28 31 35 2C 30 29 00 94 27 EE 07 43 25 28 |C%(15,0)..'..C%(|
00001F60: 31 37 2C 30 29 B2 43 46 28 48 2C 41 43 25 28 38 |17,0).CF(H,AC%(8|
00001F70: 29 29 AC 36 AD 39 AA 31 3A 43 25 28 31 38 2C 30 |)).6.9.1:C%(18,0|
00001F80: 29 B2 43 46 28 48 2C 41 43 25 28 38 29 29 AC 35 |).CF(H,AC%(8)).5|
00001F90: AD 39 AA 31 00 AD 27 F8 07 43 45 B2 31 3A 53 44 |.9.1..'..CE.1:SD|
00001FA0: B2 30 3A 8B 44 4C B2 31 A7 44 4C B2 32 00 CB 27 |.0:.DL.1.DL.2..'|
00001FB0: B8 0B 8F 20 2A 2A 20 52 45 56 49 45 57 20 43 4C |... ** REVIEW CL|
00001FC0: 55 42 20 41 52 52 41 59 20 2A 2A 00 DE 27 C2 0B |UB ARRAY **..'..|
00001FD0: 91 43 45 20 89 33 30 33 30 2C 33 30 33 30 00 11 |.CE .3030,3030..|
00001FE0: 28 CC 0B 99 22 93 11 11 11 11 11 11 20 20 20 20 |(..."....... |
00001FF0: 20 20 20 20 20 20 4E 4F 20 43 4C 55 42 20 46 49 | NO CLUB FI|
00002000: 4C 45 20 45 58 49 53 54 53 2E 22 3A 89 35 34 31 |LE EXISTS.":.541|
00002010: 30 00 43 28 D6 0B 99 22 93 20 20 20 20 20 20 20 |0.C(...". |
00002020: 41 56 47 20 20 4D 41 58 20 20 4D 41 58 20 20 44 |AVG MAX MAX D|
00002030: 49 52 20 20 41 56 47 20 20 41 56 47 20 20 20 20 |IR AVG AVG |
00002040: 20 22 3B 00 70 28 E0 0B 99 22 43 4C 55 42 20 20 | ";.p(..."CLUB |
00002050: 20 44 53 54 20 53 48 4F 52 54 20 4C 4F 4E 47 20 | DST SHORT LONG |
00002060: 56 41 52 20 43 41 52 52 59 20 52 4F 4C 4C 20 22 |VAR CARRY ROLL "|
00002070: 00 A2 28 EA 0B 99 22 12 20 20 20 20 20 20 20 20 |..(...". |
00002080: 20 20 44 52 49 56 45 52 20 41 4E 44 20 57 4F 4F | DRIVER AND WOO|
00002090: 44 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |DS |
000020A0: 92 22 00 E9 28 F4 0B 97 32 30 39 2C 32 34 3A 97 |."..(...209,24:.|
000020B0: 32 31 30 2C 35 3A 97 32 31 31 2C 30 3A 99 22 12 |210,5:.211,0:.".|
000020C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 4C 4F 4E | LON|
000020D0: 47 20 49 52 4F 4E 53 20 20 20 20 20 20 20 20 20 |G IRONS |
000020E0: 20 20 20 20 20 20 20 20 22 00 31 29 FE 0B 97 32 | ".1)...2|
000020F0: 30 39 2C 31 38 34 3A 97 32 31 30 2C 35 3A 97 32 |09,184:.210,5:.2|
00002100: 31 31 2C 30 3A 99 22 12 20 20 20 20 20 20 20 20 |11,0:.". |
00002110: 20 20 20 20 4D 45 44 49 55 4D 20 49 52 4F 4E 53 | MEDIUM IRONS|
00002120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002130: 22 00 78 29 08 0C 97 32 30 39 2C 38 38 3A 97 32 |".x)...209,88:.2|
00002140: 31 30 2C 36 3A 97 32 31 31 2C 30 3A 99 22 12 20 |10,6:.211,0:.". |
00002150: 20 20 20 20 20 20 20 20 20 20 20 53 48 4F 52 54 | SHORT|
00002160: 20 20 49 52 4F 4E 53 20 20 20 20 20 20 20 20 20 | IRONS |
00002170: 20 20 20 20 20 20 20 22 00 C1 29 12 0C 97 32 30 | "..)...20|
00002180: 39 2C 32 34 38 3A 97 32 31 30 2C 36 3A 97 32 31 |9,248:.210,6:.21|
00002190: 31 2C 30 3A 99 22 12 20 20 20 20 20 20 20 20 20 |1,0:.". |
000021A0: 20 20 53 50 45 43 49 41 4C 20 20 43 4C 55 42 53 | SPECIAL CLUBS|
000021B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 92 | .|
000021C0: 22 00 F9 29 1C 0C 81 49 B2 31 A4 31 37 3A 97 32 |"..)...I.1.17:.2|
000021D0: 30 39 2C 56 54 28 49 2C 30 29 3A 97 32 31 30 2C |09,VT(I,0):.210,|
000021E0: 56 54 28 49 2C 31 29 3A 97 32 31 31 2C 30 3A 8B |VT(I,1):.211,0:.|
000021F0: 49 B2 31 36 A7 33 32 30 30 00 07 2A 26 0C 99 20 |I.16.3200..*&.. |
00002200: 43 4C 24 28 49 29 3B 00 2E 2A 30 0C 97 32 31 31 |CL$(I);..*0..211|
00002210: 2C 48 54 28 32 29 AB 28 43 25 28 49 2C 31 29 B3 |,HT(2).(C%(I,1).|
00002220: 31 30 30 29 3A 99 43 25 28 49 2C 31 29 3B 00 55 |100):.C%(I,1);.U|
00002230: 2A 3A 0C 97 32 31 31 2C 48 54 28 33 29 AB 28 43 |*:..211,HT(3).(C|
00002240: 25 28 49 2C 32 29 B3 31 30 30 29 3A 99 43 25 28 |%(I,2).100):.C%(|
00002250: 49 2C 32 29 3B 00 88 2A 44 0C 97 32 31 31 2C 48 |I,2);..*D..211,H|
00002260: 54 28 34 29 AA 31 AB 28 B5 28 43 25 28 49 2C 32 |T(4).1.(.(C%(I,2|
00002270: 29 AC 28 2E 34 AB 2E 36 AC 28 49 B1 31 34 29 29 |).(.4..6.(I.14))|
00002280: AA 2E 35 29 B3 31 30 29 00 AB 2A 49 0C 99 B5 28 |..5).10)..*I...(|
00002290: 28 2E 34 AB 2E 36 AC 28 49 B1 31 34 29 29 AC 43 |(.4..6.(I.14)).C|
000022A0: 25 28 49 2C 32 29 AA 2E 35 29 3B 00 DF 2A 4E 0C |%(I,2)..5);..*N.|
000022B0: 97 32 31 31 2C 48 54 28 35 29 AB 28 43 25 28 49 |.211,HT(5).(C%(I|
000022C0: 2C 33 29 B3 31 30 30 29 AB 28 43 25 28 49 2C 33 |,3).100).(C%(I,3|
000022D0: 29 B3 31 30 29 3A 99 43 25 28 49 2C 33 29 3B 00 |).10):.C%(I,3);.|
000022E0: 0F 2B 58 0C 97 32 31 31 2C 48 54 28 36 29 AB 28 |.+X..211,HT(6).(|
000022F0: B5 28 28 43 25 28 49 2C 34 29 AD 32 35 29 AC 43 |.((C%(I,4).25).C|
00002300: 25 28 49 2C 31 29 AA 2E 35 29 B3 31 30 30 29 00 |%(I,1)..5).100).|
00002310: 30 2B 62 0C 99 B5 28 28 43 25 28 49 2C 34 29 AD |0+b...((C%(I,4).|
00002320: 32 35 29 AC 43 25 28 49 2C 31 29 AA 2E 35 29 3B |25).C%(I,1)..5);|
00002330: 00 6B 2B 6C 0C 97 32 31 31 2C 48 54 28 37 29 AA |.k+l..211,HT(7).|
00002340: 31 AB 28 B5 28 43 25 28 49 2C 31 29 AB 28 28 43 |1.(.(C%(I,1).((C|
00002350: 25 28 49 2C 34 29 AD 32 35 29 AC 43 25 28 49 2C |%(I,4).25).C%(I,|
00002360: 31 29 29 AA 2E 35 29 B3 31 30 29 00 96 2B 76 0C |1))..5).10)..+v.|
00002370: 99 B5 28 43 25 28 49 2C 31 29 AB 28 28 43 25 28 |..(C%(I,1).((C%(|
00002380: 49 2C 34 29 AD 32 35 29 AC 43 25 28 49 2C 31 29 |I,4).25).C%(I,1)|
00002390: 29 AA 2E 35 29 3B 00 9E 2B 80 0C 82 3A 99 00 A8 |)..5);..+...:...|
000023A0: 2B 8A 0C 89 35 34 31 30 00 C9 2B A0 0F 8F 20 2A |+...5410..+... *|
000023B0: 2A 20 43 52 45 41 54 45 20 50 55 54 54 49 4E 47 |* CREATE PUTTING|
000023C0: 20 41 52 52 41 59 20 2A 2A 00 FD 2B AA 0F 99 22 | ARRAY **..+..."|
000023D0: 93 12 20 20 20 20 20 43 52 45 41 54 45 20 50 55 |.. CREATE PU|
000023E0: 54 54 49 4E 47 20 43 48 41 52 41 43 54 45 52 49 |TTING CHARACTERI|
000023F0: 53 54 49 43 53 20 20 20 20 20 92 22 3B 00 2A 2C |STICS .";.*,|
00002400: B4 0F 99 22 55 53 49 4E 47 20 54 48 45 20 46 4F |..."USING THE FO|
00002410: 4C 4C 4F 57 49 4E 47 20 54 41 42 4C 45 2C 20 45 |LLOWING TABLE, E|
00002420: 4E 54 45 52 20 59 4F 55 52 22 00 58 2C BE 0F 99 |NTER YOUR".X,...|
00002430: 22 50 55 54 54 49 4E 47 20 43 41 50 41 42 49 4C |"PUTTING CAPABIL|
00002440: 49 54 49 45 53 20 46 4F 52 20 45 41 43 48 20 4F |ITIES FOR EACH O|
00002450: 46 20 54 48 45 53 45 22 00 7A 2C C8 0F 99 22 50 |F THESE".z,..."P|
00002460: 55 54 54 49 4E 47 20 44 49 53 54 41 4E 43 45 20 |UTTING DISTANCE |
00002470: 52 41 4E 47 45 53 3A 22 3A 99 00 98 2C D2 0F 97 |RANGES:":...,...|
00002480: 32 31 31 2C 31 31 3A 99 22 30 20 2D 3E 20 45 58 |211,11:."0 -> EX|
00002490: 43 45 4C 4C 45 4E 54 22 00 B1 2C DC 0F 97 32 31 |CELLENT"..,...21|
000024A0: 31 2C 31 31 3A 99 22 31 20 2D 3E 20 47 4F 4F 44 |1,11:."1 -> GOOD|
000024B0: 22 00 CD 2C E6 0F 97 32 31 31 2C 31 31 3A 99 22 |"..,...211,11:."|
000024C0: 32 20 2D 3E 20 41 56 45 52 41 47 45 22 00 EF 2C |2 -> AVERAGE"..,|
000024D0: F0 0F 97 32 31 31 2C 31 31 3A 99 22 33 20 2D 3E |...211,11:."3 ->|
000024E0: 20 42 45 4C 4F 57 20 41 56 45 52 41 47 45 22 00 | BELOW AVERAGE".|
000024F0: 0A 2D FA 0F 97 32 31 31 2C 31 31 3A 99 22 34 20 |.-...211,11:."4 |
00002500: 2D 3E 20 50 4F 4F 52 22 3A 99 00 33 2D 04 10 81 |-> POOR":..3-...|
00002510: 49 B2 30 A4 38 3A 99 50 44 24 28 49 29 22 20 20 |I.0.8:.PD$(I)" |
00002520: 2D 3E 20 22 3B 3A 97 31 39 38 2C 30 3A 97 36 33 |-> ";:.198,0:.63|
00002530: 31 2C 30 00 59 2D 0E 10 8B C2 28 36 33 31 29 B3 |1,0.Y-....(631).|
00002540: 34 38 B0 C2 28 36 33 31 29 B1 35 32 A7 97 31 39 |48..(631).52..19|
00002550: 38 2C 30 3A 89 34 31 31 30 00 7E 2D 18 10 41 B2 |8,0:.4110.~-..A.|
00002560: C2 28 36 33 31 29 AB 34 38 3A 97 31 39 38 2C 30 |.(631).48:.198,0|
00002570: 3A 97 36 33 31 2C 30 3A 99 52 24 28 41 29 00 8C |:.631,0:.R$(A)..|
00002580: 2D 22 10 52 25 28 34 2C 49 29 B2 41 00 B7 2D 2C |-".R%(4,I).A..-,|
00002590: 10 81 4A B2 30 A4 32 3A 81 4B B2 30 A4 32 3A 50 |..J.0.2:.K.0.2:P|
000025A0: 55 28 4A 2C 49 2C 4B 29 B2 50 28 4A 2C 49 2C 41 |U(J,I,K).P(J,I,A|
000025B0: 2C 4B 29 3A 82 3A 82 00 BD 2D 36 10 82 00 DA 2D |,K):.:...-6....-|
000025C0: 40 10 81 49 B2 30 A4 38 3A 50 55 28 30 2C 49 2C |@..I.0.8:PU(0,I,|
000025D0: 30 29 B2 50 44 28 49 29 3A 82 00 F3 2D 4A 10 50 |0).PD(I):...-J.P|
000025E0: 45 B2 31 3A 53 44 B2 30 3A 8B 44 4C B2 31 A7 44 |E.1:SD.0:.DL.1.D|
000025F0: 4C B2 32 00 14 2E 88 13 8F 20 2A 2A 20 52 45 56 |L.2...... ** REV|
00002600: 49 45 57 20 50 55 54 54 49 4E 47 20 41 52 52 41 |IEW PUTTING ARRA|
00002610: 59 20 2A 2A 00 27 2E 92 13 91 50 45 20 89 35 30 |Y **.'....PE .50|
00002620: 33 30 2C 35 30 33 30 00 5B 2E 9C 13 99 22 93 11 |30,5030.[...."..|
00002630: 11 11 11 11 11 20 20 20 20 20 20 20 20 4E 4F 20 |..... NO |
00002640: 50 55 54 54 49 4E 47 20 46 49 4C 45 20 45 58 49 |PUTTING FILE EXI|
00002650: 53 54 53 2E 22 3A 89 35 34 31 30 00 87 2E A6 13 |STS.":.5410.....|
00002660: 99 22 93 20 20 20 20 20 50 55 54 54 49 4E 47 20 |.". PUTTING |
00002670: 43 48 41 52 41 43 54 45 52 49 53 54 49 43 20 52 |CHARACTERISTIC R|
00002680: 45 56 49 45 57 3A 22 00 BA 2E B0 13 99 22 12 44 |EVIEW:"......".D|
00002690: 49 53 54 41 4E 43 45 20 52 41 4E 47 45 20 20 20 |ISTANCE RANGE |
000026A0: 31 2D 50 55 54 54 20 20 32 2D 50 55 54 54 20 20 |1-PUTT 2-PUTT |
000026B0: 33 2D 50 55 54 54 20 92 22 3B 00 F3 2E BA 13 81 |3-PUTT .";......|
000026C0: 49 B2 30 A4 38 3A 4A B2 31 30 32 34 AA 28 49 AA |I.0.8:J.1024.(I.|
000026D0: 32 29 AC 34 30 3A 4A 31 25 B2 4A AD 32 35 36 3A |2).40:J1%.J.256:|
000026E0: 4A 32 25 B2 32 35 36 AC 28 4A AD 32 35 36 AB 4A |J2%.256.(J.256.J|
000026F0: 31 25 29 00 16 2F C4 13 8B 4A 32 25 B1 32 35 35 |1%)../...J2%.255|
00002700: A7 4A 32 25 B2 4A 32 25 AB 32 35 36 3A 4A 31 25 |.J2%.J2%.256:J1%|
00002710: B2 4A 31 25 AA 31 00 3C 2F CE 13 97 32 30 39 2C |.J1%.1.</...209,|
00002720: 4A 32 25 3A 97 32 31 30 2C 4A 31 25 3A 97 32 31 |J2%:.210,J1%:.21|
00002730: 31 2C 30 3A 99 50 44 24 28 49 29 3B 00 7E 2F D8 |1,0:.PD$(I);.~/.|
00002740: 13 97 32 31 31 2C 31 37 3A 41 B2 30 3A 81 4A B2 |..211,17:A.0:.J.|
00002750: 30 A4 32 3A 41 B2 41 AA 50 55 28 4A 2C 49 2C 31 |0.2:A.A.PU(J,I,1|
00002760: 29 3A 82 3A 41 B2 31 30 30 AC 28 41 AD 33 AA 2E |):.:A.100.(A.3..|
00002770: 30 30 30 30 35 29 3A 41 24 B2 C4 28 41 29 00 A9 |00005):A$..(A)..|
00002780: 2F E2 13 41 24 B2 C9 28 41 24 2C C3 28 41 24 29 |/..A$..(A$,.(A$)|
00002790: AB 31 29 3A 8B 41 B3 31 A7 41 24 B2 22 20 30 22 |.1):.A.1.A$." 0"|
000027A0: AA 41 24 3A 89 35 31 31 30 00 BD 2F EC 13 8B 41 |.A$:.5110../...A|
000027B0: B3 31 30 A7 41 24 B2 22 20 22 AA 41 24 00 D8 2F |.10.A$." ".A$../|
000027C0: F6 13 8B 41 AB B5 28 41 29 B3 2E 30 31 A7 41 24 |...A..(A)..01.A$|
000027D0: B2 41 24 AA 22 2E 30 22 00 F7 2F 00 14 8B 28 31 |.A$.".0"../...(1|
000027E0: 30 AC 28 41 AB B5 28 41 29 29 B3 31 29 A7 41 24 |0.(A..(A)).1).A$|
000027F0: B2 41 24 AA 22 30 22 00 0F 30 0A 14 8B C3 28 41 |.A$."0"..0....(A|
00002800: 24 29 B1 35 A7 41 24 B2 C8 28 41 24 2C 35 29 00 |$).5.A$..(A$,5).|
00002810: 26 30 14 14 99 41 24 3B 3A 97 32 31 31 2C 32 33 |&0...A$;:.211,23|
00002820: 3A 99 22 25 22 3B 00 50 30 1E 14 8B 41 B2 B1 31 |:."%";.P0...A..1|
00002830: 30 30 A7 97 32 31 31 2C 32 35 3A 99 22 12 53 4D |00..211,25:.".SM|
00002840: 41 4C 4C 92 22 3B 3A 43 B2 30 3A 89 35 32 34 30 |ALL.";:C.0:.5240|
00002850: 00 96 30 28 14 97 32 31 31 2C 32 35 3A 42 B2 30 |..0(..211,25:B.0|
00002860: 3A 81 4A B2 30 A4 32 3A 42 B2 42 AA 28 50 55 28 |:.J.0.2:B.B.(PU(|
00002870: 4A 2C 49 2C 32 29 AB 50 55 28 4A 2C 49 2C 31 29 |J,I,2).PU(J,I,1)|
00002880: 29 3A 82 3A 42 B2 31 30 30 AC 28 42 AD 33 AA 2E |):.:B.100.(B.3..|
00002890: 30 30 30 30 35 29 00 AB 30 32 14 8B 41 AA 42 B1 |00005)..02..A.B.|
000028A0: 31 30 30 A7 42 B2 31 30 30 AB 41 00 DD 30 3C 14 |100.B.100.A..0<.|
000028B0: 42 24 B2 C4 28 42 29 3A 42 24 B2 C9 28 42 24 2C |B$..(B):B$..(B$,|
000028C0: C3 28 42 24 29 AB 31 29 3A 8B 42 B3 31 A7 42 24 |.(B$).1):.B.1.B$|
000028D0: B2 22 30 22 AA 42 24 3A 89 35 32 30 30 00 F1 30 |."0".B$:.5200..0|
000028E0: 46 14 8B 42 B3 31 30 A7 42 24 B2 22 20 22 AA 42 |F..B.10.B$." ".B|
000028F0: 24 00 10 31 50 14 8B 28 B6 28 42 AB B5 28 42 29 |$..1P..(.(B..(B)|
00002900: 29 B3 2E 31 29 A7 42 24 B2 42 24 AA 22 2E 30 22 |)..1).B$.B$.".0"|
00002910: 00 30 31 5A 14 8B B6 28 31 30 AC 28 42 AB B5 28 |.01Z...(10.(B..(|
00002920: 42 29 29 29 B3 31 A7 42 24 B2 42 24 AA 22 30 22 |B))).1.B$.B$."0"|
00002930: 00 48 31 64 14 8B C3 28 42 24 29 B1 35 A7 42 24 |.H1d...(B$).5.B$|
00002940: B2 C8 28 42 24 2C 35 29 00 5F 31 6E 14 99 42 24 |..(B$,5)._1n..B$|
00002950: 3B 3A 97 32 31 31 2C 33 31 3A 99 22 25 22 3B 00 |;:.211,31:."%";.|
00002960: 8E 31 78 14 8B 41 AA 42 B1 B2 31 30 30 A7 97 32 |.1x..A.B..100..2|
00002970: 31 31 2C 33 33 3A 99 22 12 53 4D 41 4C 4C 92 22 |11,33:.".SMALL."|
00002980: 3B 3A 99 22 20 20 22 3B 3A 89 35 33 32 30 00 BA |;:." ";:.5320..|
00002990: 31 82 14 44 B2 31 30 30 AB 41 AB 42 AA 2E 30 30 |1..D.100.A.B..00|
000029A0: 35 3A 44 24 B2 C4 28 44 29 3A 44 24 B2 C9 28 44 |5:D$..(D):D$..(D|
000029B0: 24 2C C3 28 44 24 29 AB 31 29 00 D4 31 8C 14 8B |$,.(D$).1)..1...|
000029C0: 44 B3 31 A7 44 24 B2 22 20 30 22 AA 44 24 3A 89 |D.1.D$." 0".D$:.|
000029D0: 35 32 38 30 00 E8 31 96 14 8B 44 B3 31 30 A7 44 |5280..1...D.10.D|
000029E0: 24 B2 22 20 22 AA 44 24 00 0C 32 A0 14 8B B6 28 |$." ".D$..2....(|
000029F0: 44 AB B5 28 44 29 29 B3 2E 30 31 39 39 39 39 39 |D..(D))..0199999|
00002A00: 39 A7 44 24 B2 44 24 AA 22 2E 30 22 00 2C 32 AA |9.D$.D$.".0".,2.|
00002A10: 14 8B B6 28 31 30 AC 28 43 AB B5 28 43 29 29 29 |...(10.(C..(C)))|
00002A20: B3 31 A7 44 24 B2 44 24 AA 22 30 22 00 44 32 B4 |.1.D$.D$."0".D2.|
00002A30: 14 8B C3 28 44 24 29 B1 35 A7 44 24 B2 C8 28 44 |...(D$).5.D$..(D|
00002A40: 24 2C 35 29 00 63 32 BE 14 97 32 31 31 2C 33 33 |$,5).c2...211,33|
00002A50: 3A 99 44 24 3B 3A 97 32 31 31 2C 33 39 3A 99 22 |:.D$;:.211,39:."|
00002A60: 25 22 3B 00 69 32 C8 14 82 00 99 32 D2 14 99 3A |%";.i2.....2...:|
00002A70: 99 22 54 48 45 20 41 42 4F 56 45 20 50 52 4F 42 |."THE ABOVE PROB|
00002A80: 41 42 49 4C 49 54 49 45 53 20 41 52 45 20 41 4E |ABILITIES ARE AN|
00002A90: 20 41 56 45 52 41 47 45 22 00 C6 32 DC 14 99 22 | AVERAGE"..2..."|
00002AA0: 4F 46 20 54 48 45 20 54 48 52 45 45 20 54 59 50 |OF THE THREE TYP|
00002AB0: 45 53 20 4F 46 20 50 55 54 54 49 4E 47 20 53 54 |ES OF PUTTING ST|
00002AC0: 52 4F 4B 45 53 22 00 F2 32 E6 14 99 22 28 4E 4F |ROKES"..2..."(NO|
00002AD0: 52 4D 41 4C 2C 20 4C 41 47 2C 20 41 4E 44 20 43 |RMAL, LAG, AND C|
00002AE0: 48 41 52 47 45 29 2E 20 54 48 45 59 20 57 45 52 |HARGE). THEY WER|
00002AF0: 45 22 00 36 33 F0 14 99 22 43 4F 4D 50 55 54 45 |E".63..."COMPUTE|
00002B00: 44 20 42 41 53 45 44 20 4F 4E 20 41 4E 20 41 56 |D BASED ON AN AV|
00002B10: 45 52 41 47 45 20 47 52 45 45 4E 20 20 20 20 20 |ERAGE GREEN |
00002B20: 20 28 44 49 46 46 49 43 55 4C 54 59 20 3D 20 31 | (DIFFICULTY = 1|
00002B30: 2E 30 30 29 2E 22 00 3F 33 FA 14 50 45 B2 31 00 |.00).".?3..PE.1.|
00002B40: 71 33 04 15 99 3A 99 22 54 48 45 20 57 4F 52 44 |q3...:."THE WORD|
00002B50: 20 12 53 4D 41 4C 4C 92 20 49 4E 53 54 45 41 44 | .SMALL. INSTEAD|
00002B60: 20 4F 46 20 41 20 50 45 52 43 45 4E 54 41 47 45 | OF A PERCENTAGE|
00002B70: 22 00 A0 33 0E 15 99 22 4D 45 41 4E 53 20 54 48 |"..3..."MEANS TH|
00002B80: 41 54 20 54 48 45 52 45 20 49 53 20 41 20 4D 49 |AT THERE IS A MI|
00002B90: 4E 55 54 45 20 28 42 55 54 20 52 45 41 4C 29 22 |NUTE (BUT REAL)"|
00002BA0: 00 E6 33 18 15 99 22 43 48 41 4E 43 45 20 4F 46 |..3..."CHANCE OF|
00002BB0: 20 32 2D 20 4F 52 20 33 2D 50 55 54 54 49 4E 47 | 2- OR 3-PUTTING|
00002BC0: 20 28 55 53 55 41 4C 4C 59 20 4F 4E 20 41 20 4D | (USUALLY ON A M|
00002BD0: 4F 52 45 20 44 49 46 46 49 43 55 4C 54 20 47 52 |ORE DIFFICULT GR|
00002BE0: 45 45 4E 29 2E 22 00 23 34 22 15 97 32 30 39 2C |EEN).".#4"..209,|
00002BF0: 31 39 32 3A 97 32 31 30 2C 37 3A 99 22 20 20 20 |192:.210,7:." |
00002C00: 20 50 52 45 53 53 20 3C 52 45 54 55 52 4E 3E 20 | PRESS <RETURN> |
00002C10: 54 4F 20 52 45 54 55 52 4E 20 54 4F 20 4D 45 4E |TO RETURN TO MEN|
00002C20: 55 22 3B 00 35 34 2C 15 97 31 39 38 2C 30 3A 97 |U";.54,..198,0:.|
00002C30: 36 33 31 2C 30 00 63 34 36 15 81 49 B2 31 A4 35 |631,0.c46..I.1.5|
00002C40: 30 3A 82 3A 8B C2 28 36 33 31 29 B3 B1 31 33 A7 |0:.:..(631)..13.|
00002C50: 97 31 39 38 2C 30 3A 97 36 33 31 2C 30 3A 89 35 |.198,0:.631,0:.5|
00002C60: 34 33 30 00 7A 34 40 15 97 31 39 38 2C 30 3A 97 |430.z4@..198,0:.|
00002C70: 36 33 31 2C 30 3A 89 38 36 30 00 99 34 70 17 8F |631,0:.860..4p..|
00002C80: 20 2A 2A 20 4C 4F 41 44 20 41 20 50 4C 41 59 45 | ** LOAD A PLAYE|
00002C90: 52 20 46 49 4C 45 20 2A 2A 00 D3 34 7A 17 99 22 |R FILE **..4z.."|
00002CA0: 93 12 20 20 20 20 20 20 20 20 20 20 20 4C 4F 41 |.. LOA|
00002CB0: 44 20 41 20 50 4C 41 59 45 52 20 46 49 4C 45 20 |D A PLAYER FILE |
00002CC0: 20 20 20 20 20 20 20 20 20 20 92 22 3A 41 24 B2 | .":A$.|
00002CD0: 22 2A 22 00 07 35 84 17 85 22 50 4C 41 59 45 52 |"*"..5..."PLAYER|
00002CE0: 20 46 49 4C 45 20 4E 55 4D 42 45 52 20 3A 20 22 | FILE NUMBER : "|
00002CF0: 3B 41 24 3A 8B C3 28 41 24 29 B1 32 A7 41 24 B2 |;A$:..(A$).2.A$.|
00002D00: C8 28 41 24 2C 32 29 00 18 35 8E 17 8B 41 24 B2 |.(A$,2)..5...A$.|
00002D10: 22 2A 22 A7 35 34 31 30 00 46 35 98 17 81 49 B2 |"*".5410.F5...I.|
00002D20: 31 A4 C3 28 41 24 29 3A 4A B2 C6 28 CA 28 41 24 |1..(A$):J..(.(A$|
00002D30: 2C 49 2C 31 29 29 3A 8B 4A B3 34 38 B0 4A B1 35 |,I,1)):.J.48.J.5|
00002D40: 37 A7 36 30 31 30 00 70 35 A2 17 82 3A 50 46 B2 |7.6010.p5...:PF.|
00002D50: C5 28 41 24 29 3A 8B 50 46 B1 34 30 AF 50 46 B3 |.(A$):.PF.40.PF.|
00002D60: 38 31 AF 4E 25 28 50 46 29 B2 31 A7 36 30 37 30 |81.N%(PF).1.6070|
00002D70: 00 AB 35 AC 17 99 22 56 41 4C 49 44 20 46 49 4C |..5..."VALID FIL|
00002D80: 45 20 4E 55 4D 42 45 52 53 20 41 52 45 20 12 34 |E NUMBERS ARE .4|
00002D90: 31 20 2D 20 38 30 92 2E 22 3A 81 49 B2 31 A4 32 |1 - 80..":.I.1.2|
00002DA0: 30 30 30 3A 82 3A 89 36 30 31 30 00 CD 35 B6 17 |000:.:.6010..5..|
00002DB0: 8F 20 2A 2A 20 4F 4E 45 52 52 20 53 55 42 53 54 |. ** ONERR SUBST|
00002DC0: 49 54 55 54 45 20 48 45 52 45 20 2A 2A 00 DE 35 |ITUTE HERE **..5|
00002DD0: C0 17 50 46 24 B2 22 50 44 2E 22 AA 41 24 00 FA |..PF$."PD.".A$..|
00002DE0: 35 CA 17 9F 20 32 2C 38 2C 32 2C 22 30 3A 22 AA |5... 2,8,2,"0:".|
00002DF0: 50 46 24 AA 22 2C 53 2C 52 22 00 18 36 D4 17 81 |PF$.",S,R"..6...|
00002E00: 49 B2 30 A4 31 38 3A 81 4A B2 30 A4 34 3A 84 32 |I.0.18:.J.0.4:.2|
00002E10: 2C 43 25 28 49 2C 4A 29 00 20 36 DE 17 82 3A 82 |,C%(I,J). 6...:.|
00002E20: 00 46 36 E8 17 81 49 B2 30 A4 32 3A 81 4A B2 30 |.F6...I.0.2:.J.0|
00002E30: A4 38 3A 81 4B B2 30 A4 32 3A 84 32 2C 50 55 28 |.8:.K.0.2:.2,PU(|
00002E40: 49 2C 4A 2C 4B 29 00 50 36 F2 17 82 3A 82 3A 82 |I,J,K).P6...:.:.|
00002E50: 00 6D 36 FC 17 81 49 B2 30 A4 34 3A 81 4A B2 30 |.m6...I.0.4:.J.0|
00002E60: A4 38 3A 84 32 2C 52 25 28 49 2C 4A 29 00 75 36 |.8:.2,R%(I,J).u6|
00002E70: 06 18 82 3A 82 00 7E 36 10 18 84 32 2C 48 00 85 |...:..~6...2,H..|
00002E80: 36 1A 18 A0 32 00 93 36 24 18 43 45 B2 31 3A 50 |6...2..6$.CE.1:P|
00002E90: 45 B2 31 00 D0 36 2E 18 99 22 50 4C 41 59 45 52 |E.1..6..."PLAYER|
00002EA0: 20 46 49 4C 45 20 4E 55 4D 42 45 52 22 50 46 22 | FILE NUMBER"PF"|
00002EB0: 4C 4F 41 44 45 44 2E 22 3A 99 3A 99 3A 43 45 B2 |LOADED.":.:.:CE.|
00002EC0: 32 3A 50 45 B2 32 3A 44 4C B2 31 3A 53 44 B2 30 |2:PE.2:DL.1:SD.0|
00002ED0: 00 DA 36 38 18 89 35 34 31 30 00 F9 36 58 1B 8F |..68..5410..6X..|
00002EE0: 20 2A 2A 20 53 41 56 45 20 41 20 50 4C 41 59 45 | ** SAVE A PLAYE|
00002EF0: 52 20 46 49 4C 45 20 2A 2A 00 2C 37 62 1B 99 22 |R FILE **.,7b.."|
00002F00: 93 12 20 20 20 20 20 20 20 20 20 20 20 53 41 56 |.. SAV|
00002F10: 45 20 41 20 50 4C 41 59 45 52 20 46 49 4C 45 20 |E A PLAYER FILE |
00002F20: 20 20 20 20 20 20 20 20 20 20 92 22 00 42 37 6C | .".B7l|
00002F30: 1B 8B 43 45 B3 B1 30 AF 50 45 B3 B1 30 A7 37 30 |..CE..0.PE..0.70|
00002F40: 36 30 00 50 37 71 1B 99 22 11 11 11 11 11 11 22 |60.P7q.."......"|
00002F50: 00 79 37 76 1B 8B 43 45 B2 30 A7 97 32 31 31 2C |.y7v..CE.0..211,|
00002F60: 39 3A 99 22 4E 4F 20 43 4C 55 42 20 46 49 4C 45 |9:."NO CLUB FILE|
00002F70: 20 45 58 49 53 54 53 2E 22 00 A5 37 80 1B 8B 50 | EXISTS."..7...P|
00002F80: 45 B2 30 A7 97 32 31 31 2C 39 3A 99 22 4E 4F 20 |E.0..211,9:."NO |
00002F90: 50 55 54 54 49 4E 47 20 46 49 4C 45 20 45 58 49 |PUTTING FILE EXI|
00002FA0: 53 54 53 2E 22 00 AF 37 8A 1B 89 35 34 31 30 00 |STS."..7...5410.|
00002FB0: C6 37 94 1B 41 24 B2 22 2A 22 3A 8B 44 4C B3 B1 |.7..A$."*":.DL..|
00002FC0: 30 A7 37 31 37 30 00 EB 37 9E 1B 8F 20 2A 2A 4E |0.7170..7... **N|
00002FD0: 4F 20 46 49 4C 45 20 57 41 53 20 52 45 41 44 20 |O FILE WAS READ |
00002FE0: 46 52 4F 4D 20 44 49 53 4B 2A 2A 00 23 38 A8 1B |FROM DISK**.#8..|
00002FF0: 85 22 45 4E 54 45 52 20 46 49 4C 45 20 4E 55 4D |."ENTER FILE NUM|
00003000: 42 45 52 20 54 4F 20 53 41 56 45 22 3B 41 24 3A |BER TO SAVE";A$:|
00003010: 8B C3 28 41 24 29 B1 32 A7 41 24 B2 C8 28 41 24 |..(A$).2.A$..(A$|
00003020: 2C 32 29 00 34 38 B2 1B 8B 41 24 B2 22 2A 22 A7 |,2).48...A$."*".|
00003030: 35 34 31 30 00 62 38 BC 1B 81 49 B2 31 A4 C3 28 |5410.b8...I.1..(|
00003040: 41 24 29 3A 4A B2 C6 28 CA 28 41 24 2C 49 2C 31 |A$):J..(.(A$,I,1|
00003050: 29 29 3A 8B 4A B3 34 38 B0 4A B1 35 37 A7 37 30 |)):.J.48.J.57.70|
00003060: 38 30 00 68 38 C6 1B 82 00 87 38 D0 1B 50 46 B2 |80.h8.....8..PF.|
00003070: C5 28 41 24 29 3A 8B 50 46 B1 34 30 AF 50 46 B3 |.(A$):.PF.40.PF.|
00003080: 38 31 A7 37 31 34 30 00 C2 38 DA 1B 99 22 56 41 |81.7140..8..."VA|
00003090: 4C 49 44 20 46 49 4C 45 20 4E 55 4D 42 45 52 53 |LID FILE NUMBERS|
000030A0: 20 41 52 45 20 12 34 31 20 2D 20 38 30 92 2E 22 | ARE .41 - 80.."|
000030B0: 3A 81 49 B2 31 A4 32 30 30 30 3A 82 3A 89 37 30 |:.I.1.2000:.:.70|
000030C0: 38 30 00 D3 38 E4 1B 50 46 24 B2 22 50 44 2E 22 |80..8..PF$."PD."|
000030D0: AA 41 24 00 E4 38 EE 1B 8B 4E 25 28 50 46 29 A7 |.A$..8...N%(PF).|
000030E0: 37 33 30 30 00 EE 38 F8 1B 89 37 32 38 30 00 13 |7300..8...7280..|
000030F0: 39 02 1C 8F 2A 2A 20 41 20 46 49 4C 45 20 57 41 |9...** A FILE WA|
00003100: 53 20 52 45 41 44 20 46 52 4F 4D 20 44 49 53 4B |S READ FROM DISK|
00003110: 20 2A 2A 00 3D 39 0C 1C 99 22 46 49 4C 45 20 4E | **.=9..."FILE N|
00003120: 55 4D 42 45 52 22 50 46 22 57 41 53 20 52 45 41 |UMBER"PF"WAS REA|
00003130: 44 20 46 52 4F 4D 20 44 49 53 4B 2E 22 00 69 39 |D FROM DISK.".i9|
00003140: 16 1C 8B 43 45 B2 31 A7 99 3A 99 22 41 20 4E 45 |...CE.1..:."A NE|
00003150: 57 20 43 4C 55 42 20 46 49 4C 45 20 57 41 53 20 |W CLUB FILE WAS |
00003160: 43 52 45 41 54 45 44 2E 22 00 9E 39 20 1C 8B 50 |CREATED."..9 ..P|
00003170: 45 B2 31 A7 99 3A 99 22 41 20 4E 45 57 20 50 55 |E.1..:."A NEW PU|
00003180: 54 54 49 4E 47 20 46 49 4C 45 20 57 41 53 20 43 |TTING FILE WAS C|
00003190: 52 45 41 54 45 44 2E 22 3A 89 37 32 32 30 00 CA |REATED.":.7220..|
000031A0: 39 2A 1C 99 3A 99 22 4E 4F 20 43 48 41 4E 47 45 |9*..:."NO CHANGE|
000031B0: 53 20 57 45 52 45 20 4D 41 44 45 20 54 4F 20 46 |S WERE MADE TO F|
000031C0: 49 4C 45 22 50 46 3B 22 2E 22 00 E5 39 34 1C 99 |ILE"PF;"."..94..|
000031D0: 3A 99 22 59 4F 55 20 4D 41 59 20 45 49 54 48 45 |:."YOU MAY EITHE|
000031E0: 52 3A 22 3A 99 00 06 3A 3E 1C 97 32 31 31 2C 37 |R:":...:>..211,7|
000031F0: 3A 99 22 31 20 2D 20 53 41 56 45 20 41 53 20 46 |:."1 - SAVE AS F|
00003200: 49 4C 45 22 50 46 00 30 3A 48 1C 97 32 31 31 2C |ILE"PF.0:H..211,|
00003210: 37 3A 99 22 32 20 2D 20 45 4E 54 45 52 20 41 20 |7:."2 - ENTER A |
00003220: 4E 45 57 20 46 49 4C 45 20 4E 55 4D 42 45 52 22 |NEW FILE NUMBER"|
00003230: 00 55 3A 52 1C 99 3A 99 22 59 4F 55 52 20 43 48 |.U:R..:."YOUR CH|
00003240: 4F 49 43 45 3F 22 3B 3A 97 31 39 38 2C 30 3A 97 |OICE?";:.198,0:.|
00003250: 36 33 31 2C 30 00 7B 3A 5C 1C 8B C2 28 36 33 31 |631,0.{:\...(631|
00003260: 29 B3 34 39 B0 C2 28 36 33 31 29 B1 35 30 A7 97 |).49..(631).50..|
00003270: 31 39 38 2C 30 3A 89 37 32 36 30 00 A9 3A 66 1C |198,0:.7260..:f.|
00003280: 4A B2 C2 28 36 33 31 29 AB 34 38 3A 97 31 39 38 |J..(631).48:.198|
00003290: 2C 30 3A 97 36 33 31 2C 30 3A 99 4A 3A 91 4A 89 |,0:.631,0:.J:.J.|
000032A0: 37 33 38 30 2C 37 30 37 30 00 BF 3A 70 1C 8F 20 |7380,7070..:p.. |
000032B0: 2A 2A 20 53 41 56 45 20 46 49 4C 45 20 2A 2A 00 |** SAVE FILE **.|
000032C0: D3 3A 7A 1C 8B 20 4E 25 28 50 46 29 B2 30 A7 37 |.:z.. N%(PF).0.7|
000032D0: 33 38 30 00 F3 3A 84 1C 8F 20 2A 2A 20 46 49 4C |380..:... ** FIL|
000032E0: 45 20 41 4C 52 45 41 44 59 20 49 4E 20 55 53 45 |E ALREADY IN USE|
000032F0: 20 2A 2A 00 21 3B 8E 1C 99 22 50 4C 41 59 45 52 | **.!;..."PLAYER|
00003300: 20 46 49 4C 45 20 4E 55 4D 42 45 52 22 50 46 22 | FILE NUMBER"PF"|
00003310: 20 41 4C 52 45 41 44 59 20 45 58 49 53 54 53 2E | ALREADY EXISTS.|
00003320: 22 00 4F 3B 98 1C 99 3A 99 22 50 52 45 53 53 20 |".O;...:."PRESS |
00003330: 3C 52 45 54 55 52 4E 3E 20 54 4F 20 4F 56 45 52 |<RETURN> TO OVER|
00003340: 57 52 49 54 45 20 54 48 45 20 46 49 4C 45 22 00 |WRITE THE FILE".|
00003350: 7C 3B A2 1C 99 22 57 49 54 48 20 4E 45 57 20 44 ||;..."WITH NEW D|
00003360: 41 54 41 2C 20 4F 52 20 50 52 45 53 53 20 3C 2A |ATA, OR PRESS <*|
00003370: 3E 20 54 4F 20 41 53 53 49 47 4E 22 00 A4 3B AC |> TO ASSIGN"..;.|
00003380: 1C 99 22 41 20 4E 45 57 20 46 49 4C 45 20 4E 55 |.."A NEW FILE NU|
00003390: 4D 42 45 52 2E 22 3A 97 31 39 38 2C 30 3A 97 36 |MBER.":.198,0:.6|
000033A0: 33 31 2C 30 00 CC 3B B6 1C 8B C2 28 36 33 31 29 |31,0..;....(631)|
000033B0: B3 B1 31 33 AF C2 28 36 33 31 29 B3 B1 34 32 A7 |..13..(631)..42.|
000033C0: 97 31 39 38 2C 30 3A 89 37 33 35 30 00 F5 3B C0 |.198,0:.7350..;.|
000033D0: 1C 4A B2 C2 28 36 33 31 29 3A 97 36 33 31 2C 30 |.J..(631):.631,0|
000033E0: 3A 97 31 39 38 2C 30 3A 8B 4A B2 31 33 A7 99 3A |:.198,0:.J.13..:|
000033F0: 89 37 33 38 30 00 01 3C CA 1C 99 3A 89 37 30 37 |.7380..<...:.707|
00003400: 30 00 1E 3C D4 1C 9F 20 32 2C 38 2C 32 2C 22 40 |0..<... 2,8,2,"@|
00003410: 30 3A 22 AA 50 46 24 AA 22 2C 53 2C 57 22 00 3C |0:".PF$.",S,W".<|
00003420: 3C DE 1C 81 49 B2 30 A4 31 38 3A 81 4A B2 30 A4 |<...I.0.18:.J.0.|
00003430: 34 3A 98 32 2C 43 25 28 49 2C 4A 29 00 44 3C E8 |4:.2,C%(I,J).D<.|
00003440: 1C 82 3A 82 00 6A 3C F2 1C 81 49 B2 30 A4 32 3A |..:..j<...I.0.2:|
00003450: 81 4A B2 30 A4 38 3A 81 4B B2 30 A4 32 3A 98 32 |.J.0.8:.K.0.2:.2|
00003460: 2C 50 55 28 49 2C 4A 2C 4B 29 00 74 3C FC 1C 82 |,PU(I,J,K).t<...|
00003470: 3A 82 3A 82 00 91 3C 06 1D 81 49 B2 30 A4 34 3A |:.:...<...I.0.4:|
00003480: 81 4A B2 30 A4 38 3A 98 32 2C 52 25 28 49 2C 4A |.J.0.8:.2,R%(I,J|
00003490: 29 00 99 3C 10 1D 82 3A 82 00 A2 3C 1A 1D 98 32 |)..<...:...<...2|
000034A0: 2C 48 00 A9 3C 24 1D A0 32 00 DE 3C 2E 1D 99 22 |,H..<$..2..<..."|
000034B0: 93 22 3B 3A 81 49 B2 34 31 A4 36 30 3A 41 24 B2 |.";:.I.41.60:A$.|
000034C0: C9 28 C4 28 49 29 2C 32 29 3A 99 41 24 3B 3A 97 |.(.(I),2):.A$;:.|
000034D0: 32 31 31 2C 33 3A 99 50 4E 24 28 49 29 3B 00 12 |211,3:.PN$(I);..|
000034E0: 3D 38 1D 97 32 31 31 2C 32 30 3A 41 24 B2 C9 28 |=8..211,20:A$..(|
000034F0: C4 28 49 AA 32 30 29 2C 32 29 3A 99 41 24 3B 3A |.(I.20),2):.A$;:|
00003500: 97 32 31 31 2C 32 33 3A 99 50 4E 24 28 49 AA 32 |.211,23:.PN$(I.2|
00003510: 30 29 00 23 3D 42 1D 82 3A 8B 4F 50 B2 38 A7 35 |0).#=B..:.OP.8.5|
00003520: 34 31 30 00 4E 3D 4C 1D 99 3A 99 22 57 48 41 54 |410.N=L..:."WHAT|
00003530: 20 4E 41 4D 45 20 49 53 20 50 4C 41 59 45 52 20 | NAME IS PLAYER |
00003540: 46 49 4C 45 20 4E 55 4D 42 45 52 22 50 46 00 81 |FILE NUMBER"PF..|
00003550: 3D 56 1D 85 22 54 4F 20 42 45 20 53 41 56 45 44 |=V.."TO BE SAVED|
00003560: 20 55 4E 44 45 52 20 22 3B 41 24 3A 8B C3 28 41 | UNDER ";A$:..(A|
00003570: 24 29 B1 31 35 A7 41 24 B2 C8 28 41 24 2C 31 35 |$).15.A$..(A$,15|
00003580: 29 00 90 3D 60 1D 50 4E 24 28 50 46 29 B2 41 24 |)..=`.PN$(PF).A$|
00003590: 00 A9 3D 6A 1D 9F 20 32 2C 38 2C 32 2C 22 40 30 |..=j.. 2,8,2,"@0|
000035A0: 3A 47 50 4E 2C 53 2C 57 22 00 BF 3D 74 1D 81 49 |:GPN,S,W"..=t..I|
000035B0: B2 31 A4 38 30 3A 98 32 2C 50 4E 24 28 49 29 00 |.1.80:.2,PN$(I).|
000035C0: C5 3D 7E 1D 82 00 CC 3D 88 1D A0 32 00 D9 3D 92 |.=~....=...2..=.|
000035D0: 1D 4E 25 28 50 46 29 B2 31 00 FB 3D 9C 1D 9F 20 |.N%(PF).1..=... |
000035E0: 32 2C 38 2C 32 2C 22 40 30 3A 41 52 52 41 59 2E |2,8,2,"@0:ARRAY.|
000035F0: 53 54 41 54 55 53 2C 53 2C 57 22 00 10 3E A6 1D |STATUS,S,W"..>..|
00003600: 81 49 B2 31 A4 38 30 3A 98 32 2C 4E 25 28 49 29 |.I.1.80:.2,N%(I)|
00003610: 00 16 3E B0 1D 82 00 1D 3E BA 1D A0 32 00 4B 3E |..>.....>...2.K>|
00003620: C4 1D 99 22 50 4C 41 59 45 52 20 46 49 4C 45 20 |..."PLAYER FILE |
00003630: 4E 55 4D 42 45 52 22 50 46 22 53 41 56 45 44 2E |NUMBER"PF"SAVED.|
00003640: 22 3A 53 44 B2 31 3A 44 4C B2 30 00 55 3E CE 1D |":SD.1:DL.0.U>..|
00003650: 89 35 34 31 30 00 78 3E 40 1F 8F 20 2A 2A 20 52 |.5410.x>@.. ** R|
00003660: 45 56 49 45 57 20 43 48 41 52 41 43 54 45 52 49 |EVIEW CHARACTERI|
00003670: 53 54 49 43 53 20 2A 2A 00 92 3E 4A 1F 99 22 93 |STICS **..>J..".|
00003680: 22 3B 3A 8B 50 45 B2 30 B0 43 45 B2 30 A7 37 30 |";:.PE.0.CE.0.70|
00003690: 32 35 00 C5 3E 54 1F 99 22 12 4E 41 4D 45 3A 20 |25..>T..".NAME: |
000036A0: 4E 4F 4E 45 20 20 20 20 20 20 20 20 20 20 20 20 |NONE |
000036B0: 20 41 52 52 41 59 20 4E 55 4D 42 45 52 3A 20 3F | ARRAY NUMBER: ?|
000036C0: 20 20 92 22 3B 00 F8 3E 5E 1F 99 22 12 48 41 4E | .";..>^..".HAN|
000036D0: 44 49 43 41 50 20 52 41 4E 47 45 3A 20 20 20 20 |DICAP RANGE: |
000036E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000036F0: 20 20 20 20 20 92 22 3B 00 0D 3F 63 1F 8B 44 4C | .";..?c..DL|
00003700: B3 B1 31 AF 53 44 B2 30 A7 38 30 35 30 00 43 3F |..1.SD.0.8050.C?|
00003710: 68 1F 97 32 30 39 2C 30 3A 97 32 31 30 2C 34 3A |h..209,0:.210,4:|
00003720: 97 32 31 31 2C 36 3A 99 22 12 22 50 4E 24 28 50 |.211,6:."."PN$(P|
00003730: 46 29 3B 3A 97 32 31 31 2C 33 36 3A 99 50 46 22 |F);:.211,36:.PF"|
00003740: 92 22 3B 00 6C 3F 72 1F 97 32 30 39 2C 34 30 3A |.";.l?r..209,40:|
00003750: 97 32 31 30 2C 34 3A 97 32 31 31 2C 31 36 3A 99 |.210,4:.211,16:.|
00003760: 22 12 22 48 24 28 48 29 22 92 22 3B 00 8D 3F 7C |"."H$(H)".";..?||
00003770: 1F 97 32 30 39 2C 38 30 3A 97 32 31 30 2C 34 3A |..209,80:.210,4:|
00003780: 97 32 31 31 2C 30 3A 97 32 31 34 2C 32 00 C0 3F |.211,0:.214,2..?|
00003790: 86 1F 99 22 12 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |...".-----------|
000037A0: 2D 2D 2D 2D 2D 2D 43 4C 55 42 53 2D 2D 2D 2D 2D |------CLUBS-----|
000037B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 92 22 3B |-------------.";|
000037C0: 00 F3 3F 90 1F 99 22 12 20 20 43 4C 55 42 20 20 |..?...". CLUB |
000037D0: 20 20 20 20 44 49 52 20 20 20 20 20 20 20 20 44 | DIR D|
000037E0: 53 54 20 20 20 43 4F 4E 53 49 53 54 45 4E 43 59 |ST CONSISTENCY|
000037F0: 92 22 3B 00 26 40 9A 1F 99 22 12 20 20 53 45 54 |.";.&@...". SET|
00003800: 20 20 20 20 20 20 20 56 41 52 20 20 53 50 49 4E | VAR SPIN|
00003810: 20 20 56 41 52 20 20 20 20 20 46 41 43 54 4F 52 | VAR FACTOR|
00003820: 20 20 20 92 22 3B 00 3B 40 A4 1F 81 49 B2 31 A4 | .";.;@...I.1.|
00003830: 38 3A 99 43 54 24 28 49 29 3A 82 00 6E 40 AE 1F |8:.CT$(I):..n@..|
00003840: 99 22 12 20 20 20 20 20 20 20 20 20 20 20 20 20 |.". |
00003850: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003860: 20 20 20 20 20 20 20 20 20 20 20 92 22 3B 00 A1 | .";..|
00003870: 40 B8 1F 99 22 12 50 55 54 54 20 44 49 53 54 20 |@...".PUTT DIST |
00003880: 20 52 41 54 49 4E 47 20 20 20 20 20 20 20 52 41 | RATING RA|
00003890: 54 49 4E 47 20 4B 45 59 20 20 20 20 20 20 92 22 |TING KEY ."|
000038A0: 3B 00 D5 40 C2 1F 99 22 20 30 2D 20 32 20 46 54 |;..@..." 0- 2 FT|
000038B0: 22 3A 99 22 20 33 2D 20 35 20 46 54 22 3A 99 22 |":." 3- 5 FT":."|
000038C0: 20 36 2D 31 30 20 46 54 22 3A 99 22 31 31 2D 31 | 6-10 FT":."11-1|
000038D0: 36 20 46 54 22 00 09 41 CC 1F 99 22 31 37 2D 32 |6 FT"..A..."17-2|
000038E0: 34 20 46 54 22 3A 99 22 32 35 2D 33 35 20 46 54 |4 FT":."25-35 FT|
000038F0: 22 3A 99 22 33 36 2D 35 30 20 46 54 22 3A 99 22 |":."36-50 FT":."|
00003900: 35 31 2D 37 35 20 46 54 22 00 1A 41 D6 1F 99 22 |51-75 FT"..A..."|
00003910: 37 36 2B 20 20 20 46 54 22 3B 00 51 41 E0 1F 81 |76+ FT";.QA...|
00003920: 49 B2 31 35 A4 32 31 3A 4A B2 31 30 32 34 AA 49 |I.15.21:J.1024.I|
00003930: AC 34 30 3A 4A 31 25 B2 4A AD 32 35 36 3A 4A 32 |.40:J1%.J.256:J2|
00003940: 25 B2 32 35 36 AC 28 4A AD 32 35 36 AB 4A 31 25 |%.256.(J.256.J1%|
00003950: 29 00 74 41 EA 1F 8B 4A 32 25 B1 32 35 35 A7 4A |).tA...J2%.255.J|
00003960: 32 25 B2 4A 32 25 AB 32 35 36 3A 4A 31 25 B2 4A |2%.J2%.256:J1%.J|
00003970: 31 25 AA 31 00 AF 41 F4 1F 97 32 30 39 2C 4A 32 |1%.1..A...209,J2|
00003980: 25 3A 97 32 31 30 2C 4A 31 25 3A 97 32 31 31 2C |%:.210,J1%:.211,|
00003990: 31 38 3A 99 22 12 20 20 20 20 20 20 20 20 20 20 |18:.". |
000039A0: 20 20 20 20 20 20 20 20 20 20 20 20 92 22 3B 00 | .";.|
000039B0: C3 41 FE 1F 8B 49 B2 31 35 B0 49 B2 32 31 A7 38 |.A...I.15.I.21.8|
000039C0: 32 31 30 00 F8 41 08 20 97 32 30 39 2C 4A 32 25 |210..A. .209,J2%|
000039D0: 3A 97 32 31 30 2C 4A 31 25 3A 97 32 31 31 2C 32 |:.210,J1%:.211,2|
000039E0: 30 3A 99 22 12 22 49 AB 31 36 22 20 3D 20 22 52 |0:."."I.16" = "R|
000039F0: 24 28 49 AB 31 36 29 3B 00 FE 41 12 20 82 00 34 |$(I.16);..A. ..4|
00003A00: 42 1C 20 81 49 B2 35 A4 31 32 3A 4A B2 31 30 32 |B. .I.5.12:J.102|
00003A10: 34 AA 49 AC 34 30 3A 4A 31 25 B2 4A AD 32 35 36 |4.I.40:J1%.J.256|
00003A20: 3A 4A 32 25 B2 32 35 36 AC 28 4A AD 32 35 36 AB |:J2%.256.(J.256.|
00003A30: 4A 31 25 29 00 57 42 26 20 8B 4A 32 25 B1 32 35 |J1%).WB& .J2%.25|
00003A40: 35 A7 4A 32 25 B2 4A 32 25 AB 32 35 36 3A 4A 31 |5.J2%.J2%.256:J1|
00003A50: 25 B2 4A 31 25 AA 31 00 75 42 30 20 97 32 30 39 |%.J1%.1.uB0 .209|
00003A60: 2C 4A 32 25 3A 97 32 31 30 2C 4A 31 25 3A 97 32 |,J2%:.210,J1%:.2|
00003A70: 31 31 2C 31 32 00 AD 42 3A 20 99 52 25 28 30 2C |11,12..B: .R%(0,|
00003A80: 49 AB 34 29 3B 3A 97 32 31 31 2C 31 37 3A 99 52 |I.4);:.211,17:.R|
00003A90: 25 28 31 2C 49 AB 34 29 3B 3A 97 32 31 31 2C 32 |%(1,I.4);:.211,2|
00003AA0: 33 3A 99 52 25 28 32 2C 49 AB 34 29 3B 00 C5 42 |3:.R%(2,I.4);..B|
00003AB0: 44 20 97 32 31 31 2C 33 33 3A 99 52 25 28 33 2C |D .211,33:.R%(3,|
00003AC0: 49 AB 34 29 3B 00 CB 42 4E 20 82 00 05 43 58 20 |I.4);..BN ...CX |
00003AD0: 81 49 B2 30 A4 38 3A 4A B2 31 30 32 34 AA 34 30 |.I.0.8:J.1024.40|
00003AE0: AC 28 49 AA 31 35 29 3A 4A 31 25 B2 4A AD 32 35 |.(I.15):J1%.J.25|
00003AF0: 36 3A 4A 32 25 B2 32 35 36 AC 28 4A AD 32 35 36 |6:J2%.256.(J.256|
00003B00: AB 4A 31 25 29 00 28 43 62 20 8B 4A 32 25 B1 32 |.J1%).(Cb .J2%.2|
00003B10: 35 35 A7 4A 32 25 B2 4A 32 25 AB 32 35 36 3A 4A |55.J2%.J2%.256:J|
00003B20: 31 25 B2 4A 31 25 AA 31 00 52 43 6C 20 97 32 30 |1%.J1%.1.RCl .20|
00003B30: 39 2C 4A 32 25 3A 97 32 31 30 2C 4A 31 25 3A 97 |9,J2%:.210,J1%:.|
00003B40: 32 31 31 2C 31 32 3A 99 52 25 28 34 2C 49 29 3B |211,12:.R%(4,I);|
00003B50: 3A 82 00 84 43 76 20 97 32 30 39 2C 31 31 32 3A |:...Cv .209,112:|
00003B60: 97 32 31 30 2C 37 3A 97 32 31 31 2C 31 39 3A 99 |.210,7:.211,19:.|
00003B70: 22 50 52 45 53 53 20 3C 52 45 54 55 52 4E 3E 20 |"PRESS <RETURN> |
00003B80: 54 4F 22 3B 00 B6 43 80 20 97 32 30 39 2C 31 35 |TO";..C. .209,15|
00003B90: 32 3A 97 32 31 30 2C 37 3A 97 32 31 31 2C 31 39 |2:.210,7:.211,19|
00003BA0: 3A 99 22 52 45 54 55 52 4E 20 54 4F 20 4D 45 4E |:."RETURN TO MEN|
00003BB0: 55 2E 2E 2E 22 3B 00 C8 43 8A 20 97 31 39 38 2C |U...";..C. .198,|
00003BC0: 30 3A 97 36 33 31 2C 30 00 FA 43 94 20 97 32 30 |0:.631,0..C. .20|
00003BD0: 39 2C 31 31 32 3A 97 32 31 30 2C 37 3A 97 32 31 |9,112:.210,7:.21|
00003BE0: 31 2C 32 36 3A 99 22 20 20 20 20 20 20 22 3B 3A |1,26:." ";:|
00003BF0: 81 49 B2 31 A4 32 35 30 3A 82 00 1C 44 9E 20 8B |.I.1.250:...D. .|
00003C00: C2 28 36 33 31 29 B2 31 33 A7 97 31 39 38 2C 30 |.(631).13..198,0|
00003C10: 3A 97 36 33 31 2C 30 3A 89 38 36 30 00 4E 44 A8 |:.631,0:.860.ND.|
00003C20: 20 97 32 30 39 2C 31 31 32 3A 97 32 31 30 2C 37 | .209,112:.210,7|
00003C30: 3A 97 32 31 31 2C 32 36 3A 99 22 52 45 54 55 52 |:.211,26:."RETUR|
00003C40: 4E 22 3B 3A 81 49 B2 31 A4 32 35 30 3A 82 00 63 |N";:.I.1.250:..c|
00003C50: 44 B2 20 8B C2 28 36 33 31 29 B3 B1 31 33 A7 38 |D. ..(631)..13.8|
00003C60: 33 33 30 00 7A 44 BC 20 97 31 39 38 2C 30 3A 97 |330.zD. .198,0:.|
00003C70: 36 33 31 2C 30 3A 89 38 36 30 00 8E 44 30 75 8F |631,0:.860..D0u.|
00003C80: 20 45 52 52 4F 52 20 43 48 41 4E 4E 45 4C 00 9C | ERROR CHANNEL..|
00003C90: 44 3A 75 9F 20 31 35 2C 38 2C 31 35 00 B4 44 44 |D:u. 15,8,15..DD|
00003CA0: 75 84 31 35 2C 45 31 24 2C 45 32 24 2C 45 33 24 |u.15,E1$,E2$,E3$|
00003CB0: 2C 45 34 24 00 BC 44 4E 75 A0 31 35 00 C2 44 58 |,E4$..DNu.15..DX|
00003CC0: 75 8E 00 00 00 FE FF |u...... |
....D.. ==>CREATE PLAYER ARRAY.9.N..5328
1,0:.53280,1:.".".M.X..".. << G
OLF DATA DISK >> .";.....A$.".
.
".W....A$".GOLF PLAYER ARRAY INITIALIZAT
ION PROGRAM."A$......"......
INSERT YOUR":..1. .." .PROFESSIONAL
TOUR GOLF PLAYER DISK.":..F...."
AND PRESS <RETURN>. .":.198,0:.631,0..
....I.1.40:.:.B(631)..13..198,0:.180....
..198,0:. 2,8,2,"0:PLAYER,S,R"...H. 2.O.
R..30000:.E1$.."00".120......"..
<< GOLF DATA DISK >> .";.9...
.A$".GOLF PLAYER ARRAY INITIALIZATION PR
OGRAM."A$......I.1.5:.:.:..11)".INITIALI
ZING ARRAYS":..11)"... PLEASE WAIT ...."
...... ACCURACY DATA...... .18,.20,.24,.
30...... .24,.26,.29,.34.V.".. .30,.32,.
35,.38...,.. .35,.37,.38,.41...6.. .38,.
40,.42,.45.*.@..AC(4,3):.I.0.4:.J.0.3:.A
C(I,J):.:..:.J.. SPIN DATA...T.. 23,22,2
2,21,24,23,23,22,24,23,23,22,24,23,23,22
,25,24,24,23,25,24,24...Y..23,15,15,15,1
5,24,23,22,21.M.^..SP(7,3):.I.0.7:.J.0.3
:.SP(I,J):.:....H.. DISTANCE VARIATION D
ATA...R.. .23,.25,.27,.29...|.. .26,.28,
.31,.36.-.... .32,.36,.40,.44.C.... .40,
.45,.50,.55.Y.... .50,.56,.63,.70......D
V(4,3):.I.0.4:.J.0.3:.DV(I,J):.:.......
CONSISTENCY DATA.F.... 9,8,7,6,8,7,6,5,7
,6,5,4,6,5,4,3,5,4,3,2...B..CF(4,3):.I.0
.4:.J.0.3:.CF(I,J):.:....L.. CLUB NAME D
ATA.N.V..DRIVER,2-WOOD,3-WOOD,4-WOOD,1-I
RON,2-IRON,3-IRON,4-IRON,5-IRON,6-IRON.}
....7-IRON,8-IRON,9-IRON,P.WED,CHIP,***,
S.WED......CL$(17):.I.1.17:.CL$(I):.....
.. VTAB DATA......120,160,200,240,64,104
,144,224,8,48,128,168,208,32,72,112,112.
..... 4,4,4,4,5,5,5,5,6,6,6,6,6,7,7,7,7.
A....VT(17,1):.I.0.1:.J.1.17:.VT(J,I):.:
..Q.... HTAB DATA.L....0,6,11,16,21,26,3
1,36......HT(8):.I.1.8:.HT(I):....&.. C%
(18,4),PU(2,8,2),AC%(8),PN$(80),R%(4,8).
L.0.. CLUB TYPE DATA...:..DRIVER,WOODS,L
ONG IRONS,MEDIUM IRONS,SHORT IRONS,P.WED
GE,CHIP,S.WEDGE.4.D..CT$(8):.I.1.8:.CT$(
I):..N.N..R$(4):R$(0)."EXCELLENT":R$(1).
"GOOD":R$(2)."AVERAGE"...S.R$(3)."BELOW
AVERAGE":R$(4)."POOR"...X.. PUTT DISTANC
E RANGES...B.." 0 TO 2 FEET"," 3 TO 5
FEET"," 6 TO 10 FEET","11 TO 16 FEET".:.
G.."17 TO 24 FEET","25 TO 35 FEET","36 T
O 50 FEET","51 TO 75 FEET".O.H.." OVER 7
5 FEET".M.L.. PD$(8):.I.0.8:.PD$(I):....
V.. HANDICAP RANGES.Q....H$(4):H$(0)."0-
3":H$(1)."4-8":H$(2)."9-13":H$(3)."14=18
":H$(4)."OVER 18"...... N%(80)...... 2,8
,2,"0:ARRAY.STATUS,S,R"......I.1.80:.2,N
%(I)......: 2.0.... PUTTING DATA.{....1,
1.1,1,1.1,.99,1.1,.97,1.1,.96,1.1,.9,1.1
,.85,1.1,.8,1.1,.7,1.1,.5,1.D.....6,1.05
,.55,1.05,.5,1.05,.4,1,.254,1,.29,.98,.2
5,.98,.2,.96,.15,.96.......08,.9,.18,.95
,.15,.95,.1,.95,.06,.9,.03,.8.>.F...1,.8
5,.06,.85,.03,.83,.01,.78,.005,.7,.04,.7
8,.03,.72,.01,.67,.005...H...58,.001,.45
,.01,.73,.01,.7,.01,.65,.005,.55,.001,.4
,.005,.7,.005,.7...J...005,.65,.005,.55,
.001,.4...P..1,1.1,1,1.1,.99,1.1,.97,1.1
,.96,1.1,.88,1.1,.85,1.1,.8,1.1,.7,1.1.5
.R...5,1.1,.33,1.1,.33,1.1,.33,1.1,.25,1
.05,.2,1.05,.12,1.05,.12,1.05.U.T...12,1
.03,.1,1.03,.08,1,.06,1.01,.06,1,.05,1,.
05,.98,.01,.9.B.Z...01,1,.01,.95,.01,.9,
.01,.85,.005,.75,.005,.9,.005,.9,.005,.7
5,.001,.65.......001,.52,.001,.85,.001,.
8,.001,.69,.001,.6,.001,.48,.0005,.8,.00
05,.8./.....0005,.69,.0005,.6,.0005,.48.
|....1,1.1,1,1.1,.99,1.1,.97,1.1,.96,1,.
95,1.1,.88,1.1,.83,1.1,.75,1.1,.55,1.D..
...7,.95,.6,.95,.55,.95,.45,.92,.3,.92,.
4,.88,.35,.85,.28,.8,.22,.79.......18,.7
5,.25,.78,.2,.78,.15,.78,.11,.7,.08,.68.
A.....15,.65,.1,.65,.06,.62,.03,.6,.01,.
6,.06,.58,.05,.55,.03,.55,.01,.52.......
01,.4,.03,.53,.02,.5,.02,.5,.01,.5,.01,.
4,.015,.5,.01,.5,.01,.48.......01,.48,.0
1,.38.U....P(2,8,4,2):.I.0.2:.J.0.8:.K.0
.4:.L.1.2:.P(I,J,K,L)......:.:.:.......
** PUTT DISTANCE DATA **......2,5,10,16,
24,35,50,75,999.:....PD(8):.I.0.8:.PD(I)
:..]. .PF$."X":PF.0:. LOAD/SAVE FLAGS...
*.CE.0:PE.0:CJ.0:PJ.0:. EDIT/JUMP
FLAGS.H.4.. ** O
NERR SUBST. GOES HERE **...>.. 2,8,2,"0:
GPN,S,R"...H..I.1.80...J..2,PN$(I)...L..
...R. 2...W..53281,12:.53280,15.5.\.. **
OPTIONS **.Z.F..".......":.211,15:."O
PTIONS:":....H..211,8:."1 - CREATE A CLU
B ARRAY"...I..211,8:."2 - VIEW A CLUB AR
RAY".M.J..211,8:."3 - CREATE A PUTTING A
RRAY"...K..211,8:."4 - VIEW A PUTTING AR
RAY"...L..211,8:."5 - LOAD A PLAYER FILE
".>.M..211,8:."6 - SAVE A PLAYER FILE".G
.Z..211,8:."7 - REVIEW CHARACTERISTICS".
....211,8:."8 - VIEW PLAYER NAMES".....
.211,8:."9 - TERMINATE PROGRAM"......:A$
."*":." ENTER OPTION";A$.....
.F(A$).49.F(A$).57.870.3...OP.E(A$):.OP.
1000,3010,4000,5010,6000,7000,8000,7470,
940.Q.... ** TERMINATE PROGRAM **.Y....:
..W.... ** CREATE CLUB ARRAY **......"."
:A$."*"......"ENTER YOUR AVERAGE DISTANC
E FOR:".O...."DRIVER :";A$:.A$."*".1030.
....C%(1,1).E(A$).....A$."*":."WEDGE :"
;A$:.A$."*".1050...$.C%(14,1).E(A$).7...
A.(C%(1,1).C%(14,1)).13.C.8..I.2.13._.B.
C%(I,1).C%(1,1).(I.1).A...L..:C%(0,1).C%
(14,1):C%(15,1).50:C%(16,1).50:C%(17,1).
50:C%(18,1).50...V..".. .WHAT IS YOU
R HANDICAP BRACKET.":.:A$."*"...`.."
0 -> ZERO TO THREE".!.J.." 1
-> FOUR TO EIGHT".F.T.." 2 -> NIN
E TO THIRTEEN".O.~.." 3 -> FOURTE
EN TO EIGHTEEN"......" 4 -> OVER
EIGHTEEN"......"..":." BRACK
ET # ";A$.U....F(A$).48.F(A$).52.1110...
..H.E(A$)......"..USING THE FOLLOWING TA
BLE, RATE YOUR".;...."DIRECTIONAL ACCURA
CY FOR EACH SUBSET".X.D.."OF CLUBS IN YO
UR BAG:".X.N..:.211,11:."0 -> EXCELLENT"
...X..211,11:."1 -> GOOD"......211,11:."
2 -> AVERAGE".O....211,11:."3 -> BELOW A
VERAGE"......:.I.1.8:.CT$(I);:.211,12:."
---->";:.198,0:.631,0.+....B(631).48.B(6
31).51..198,0:.1280.R....198,0:J.B(631).
48:.R$(J):AC%(I).J.E...R%(0,I).AC%(I).K.
......(.C%(1,3).C%(1,1).AC(H,AC%(1))...2
..I.2.4:C%(I,3).C%(I,1).AC(H,AC%(2)):...
.<..I.5.7:C%(I,3).C%(I,1).AC(H,AC%(3)):.
...F..I.8.10:C%(I,3).C%(I,1).AC(H,AC%(4)
):..7.P..I.11.13:C%(I,3).C%(I,1).AC(H,AC
%(5)):..K.Z.C%(14,3).C%(14,1).AC(H,AC%(6
)):C%(0,3).C%(14,3). .D.C%(15,3).C%(15,1
).AC(H,AC%(7)):C%(16,3).C%(15,3).U.N.C%(
17,3).C%(17,1).AC(H,AC%(8)):C%(18,3).C%(
17,3)...X.."..USING THE FOLLOWING TABLE,
RATE YOUR".0...."BACKSPIN CAPABILITIES
FOR EACH SUBSET".M...."OF CLUBS IN YOUR
BAG:".M....:.211,11:."0 -> EXCELLENT"...
..211,11:."1 -> GOOD"......211,11:."2 -
> AVERAGE".D....211,11:."3 -> BELOW AVER
AGE"......:.I.1.8:.CT$(I);:.211,12:."---
->";:.198,0:.631,0. H..B(631).48.B(631)
.51..198,0:.1480.G R..198,0:J.B(631).48:
.R$(J):AC%(I).J.Z ..R%(1,I).AC%(I).` ...
.Y ..C%(1,4).SP(0,AC%(1)).. ...I.2.4:C%(
I,4).SP(1,AC%(2)):... ...I.5.7:C%(I,4).S
P(2,AC%(3)):... ...I.8.10:C%(I,4).SP(3,A
C%(4)):...!...I.11.13:C%(I,4).SP(4,AC%(5
)):../!".C%(14,4).SP(5,AC%(6)):C%(0,4).C
%(14,4).[!,.C%(15,4).SP(6,AC%(7)):C%(16,
4).C%(15,4)..!6.C%(17,4).SP(7,AC%(8)):C%
(18,4).C%(17,4)..!@.."..USING THE FOLLOW
ING TABLE, RATE YOUR"..!J.."ABILITY TO H
IT SHOTS ABOUT THE SAME".."T.."DISTANCE
EACH TIME FOR EACH SUBSET OF".'"^.."CLUB
S IN YOUR BAG:".G"H..:.211,11:."0 -> EXC
ELLENT".`"R..211,11:."1 -> GOOD".|"|..21
1,11:."2 -> AVERAGE".."...211,11:."3 ->
BELOW AVERAGE".T"...:.I.1.8:.CT$(I);:.21
1,12:."---->";:.198,0:.631,0.."...B(631)
.48.B(631).51..198,0:.1690..#..J.B(631).
48:.198,0.%#...R$(J):AC%(I).J.8#..R%(2,I
).AC%(I).>#B..._#L.C%(1,2).C%(1,1).DV(H,
AC%(1))..#V..I.2.4:C%(I,2).C%(I,1).DV(H,
AC%(2)):...#...I.5.7:C%(I,2).C%(I,1).DV(
H,AC%(3)):...#...I.8.10:C%(I,2).C%(I,1).
DV(H,AC%(4)):...$...I.11.13:C%(I,2).C%(I
,1).DV(H,AC%(5)):..>$..C%(14,2).C%(14,1)
.DV(H,AC%(6)):C%(0,2).C%(14,2).S$..C%(15
,2).C%(15,1).DV(H,AC%(7)):C%(16,2).C%(15
,2)..$..C%(17,2).C%(17,1).DV(H,AC%(8)):C
%(18,2).C%(17,2).V$..."..USING THE FOLLO
WING TABLE, RATE YOUR"..%&.."OVERALL CON
SISTENCY (COMBINED DISTANCE".2%0.."AND A
CCURACY) FOR EACH SUBSET OF CLUBS".F%:..
"IN YOUR BAG:".F%D..:.211,11:."0 -> EXCE
LLENT".%N..211,11:."1 -> GOOD"..%X..211
,11:."2 -> AVERAGE"..%B..211,11:."3 -> B
ELOW AVERAGE"..%L..:.I.1.8:.CT$(I);:.211
,12:."---->";:.198,0:.631,0..&V..B(631).
48.B(631).51..198,0:.1910.0&..J.B(631).4
8:.198,0.D&...R$(J):AC%(I).J.W&..R%(3,I)
.AC%(I).]&....V&..C%(1,0).CF(H,AC%(1))..
&...I.2.4:C%(I,0).CF(H,AC%(2)):...&...I.
5.7:C%(I,0).CF(H,AC%(3)):...&F..I.8.10:C
%(I,0).CF(H,AC%(4)):...'P..I.11.13:C%(I,
0).CF(H,AC%(5)):..,'Z.C%(14,0).CF(H,AC%(
6)):C%(0,0).C%(14,0).X'..C%(15,0).CF(H,A
C%(7)):C%(16,0).C%(15,0)..'..C%(17,0).CF
(H,AC%(8)).6.9.1:C%(18,0).CF(H,AC%(8)).5
.9.1..'..CE.1:SD.0:.DL.1.DL.2.K'... ** R
EVIEW CLUB ARRAY **..'B..CE .3030,3030..
(L.."....... NO CLUB FILE EXIST
S.":.5410.C(V..". AVG MAX MAX D
IR AVG AVG ";.P(..."CLUB DST SHO
RT LONG VAR CARRY ROLL "..(...".
DRIVER AND WOODS ."..(...
209,24:.210,5:.211,0:.". LON
G IRONS ".1)...209,184:.
210,5:.211,0:.". MEDIUM IRONS
".X)...209,88:.210,6:.21
1,0:.". SHORT IRONS
".A)...209,248:.210,6:.211,0:.".
SPECIAL CLUBS .
"..)...I.1.17:.209,VT(I,0):.210,VT(I,1):
.211,0:.I.16.3200..*&.. CL$(I);..*0..211
,HT(2).(C%(I,1).100):.C%(I,1);.U*:..211,
HT(3).(C%(I,2).100):.C%(I,2);..*D..211,H
T(4).1.(.(C%(I,2).(.4..6.(I.14))..5).10)
..*I...((.4..6.(I.14)).C%(I,2)..5);..*N.
.211,HT(5).(C%(I,3).100).(C%(I,3).10):.C
%(I,3);..+X..211,HT(6).(.((C%(I,4).25).C
%(I,1)..5).100).0+B...((C%(I,4).25).C%(I
,1)..5);.K+L..211,HT(7).1.(.(C%(I,1).((C
%(I,4).25).C%(I,1))..5).10)..+V...(C%(I,
1).((C%(I,4).25).C%(I,1))..5);..+...:...
+...5410.I+ .. ** CREATE PUTTING ARRAY *
*..+...".. CREATE PUTTING CHARACTERI
STICS .";.*,..."USING THE FOLLOWING
TABLE, ENTER YOUR".X,..."PUTTING CAPABIL
ITIES FOR EACH OF THESE".Z,H.."PUTTING D
ISTANCE RANGES:":...,R..211,11:."0 -> EX
CELLENT"..,...211,11:."1 -> GOOD".M,...2
11,11:."2 -> AVERAGE"..,...211,11:."3 ->
BELOW AVERAGE"..-...211,11:."4 -> POOR"
:..3-...I.0.8:.PD$(I)" -> ";:.198,0:.63
1,0.Y-...B(631).48.B(631).52..198,0:.411
0.~-..A.B(631).48:.198,0:.631,0:.R$(A)..
-".R%(4,I).A..-,..J.0.2:.K.0.2:PU(J,I,K)
.P(J,I,A,K):.:...-6...Z-@..I.0.8:PU(0,I,
0).PD(I):...-J.PE.1:SD.0:.DL.1.DL.2.....
. ** REVIEW PUTTING ARRAY **.'....PE .50
30,5030.[...."....... NO PUTTING
FILE EXISTS.":.5410......". PUTTING
CHARACTERISTIC REVIEW:"......".DISTANCE
RANGE 1-PUTT 2-PUTT 3-PUTT .";......
I.0.8:J.1024.(I.2).40:J1%.J.256:J2%.256.
(J.256.J1%)../D..J2%.255.J2%.J2%.256:J1%
.J1%.1.</N..209,J2%:.210,J1%:.211,0:.PD$
(I);.~/X..211,17:A.0:.J.0.2:A.A.PU(J,I,1
):.:A.100.(A.3..00005):A$.D(A)../..A$.I(
A$,C(A$).1):.A.1.A$." 0".A$:.5110../...A
.10.A$." ".A$.X/...A..(A)..01.A$.A$.".0"
../...(10.(A..(A)).1).A$.A$."0"..0...C(A
$).5.A$.H(A$,5).&0...A$;:.211,23:."%";.P
0...A..100..211,25:.".SMALL.";:C.0:.5240
..0(..211,25:B.0:.J.0.2:B.B.(PU(J,I,2).P
U(J,I,1)):.:B.100.(B.3..00005)..02..A.B.
100.B.100.A..0<.B$.D(B):B$.I(B$,C(B$).1)
:.B.1.B$."0".B$:.5200..0F..B.10.B$." ".B
$..1P..(.(B..(B))..1).B$.B$.".0".01Z...(
10.(B..(B))).1.B$.B$."0".H1D..C(B$).5.B$
.H(B$,5)._1N..B$;:.211,31:."%";..1X..A.B
..100..211,33:.".SMALL.";:." ";:.5320..
1..D.100.A.B..005:D$.D(D):D$.I(D$,C(D$).
1).T1...D.1.D$." 0".D$:.5280..1...D.10.D
$." ".D$..2 ...(D..(D))..01999999.D$.D$.
".0".,2....(10.(C..(C))).1.D$.D$."0".D2.
..C(D$).5.D$.H(D$,5).C2...211,33:.D$;:.2
11,39:."%";.I2H....2R..:."THE ABOVE PROB
ABILITIES ARE AN AVERAGE".F2..."OF THE T
HREE TYPES OF PUTTING STROKES"..2..."(NO
RMAL, LAG, AND CHARGE). THEY WERE".63...
"COMPUTED BASED ON AN AVERAGE GREEN
(DIFFICULTY = 1.00).".?3..PE.1.Q3...:."
THE WORD .SMALL. INSTEAD OF A PERCENTAGE
". 3..."MEANS THAT THERE IS A MINUTE (BU
T REAL)"..3..."CHANCE OF 2- OR 3-PUTTING
(USUALLY ON A MORE DIFFICULT GREEN).".#
4"..209,192:.210,7:." PRESS <RETURN>
TO RETURN TO MENU";.54,..198,0:.631,0.C4
6..I.1.50:.:.B(631)..13..198,0:.631,0:.5
430.Z4@..198,0:.631,0:.860..4P.. ** LOAD
A PLAYER FILE **.S4Z..".. LOA
D A PLAYER FILE .":A$."*"..5..
."PLAYER FILE NUMBER : ";A$:.C(A$).2.A$.
H(A$,2)..5...A$."*".5410.F5...I.1.C(A$):
J.F(J(A$,I,1)):.J.48.J.57.6010.P5...:PF.
E(A$):.PF.40.PF.81.N%(PF).1.6070..5..."V
ALID FILE NUMBERS ARE .41 - 80..":.I.1.2
000:.:.6010.M5... ** ONERR SUBSTITUTE HE
RE **..5..PF$."PD.".A$..5J.. 2,8,2,"0:".
PF$.",S,R"..6T..I.0.18:.J.0.4:.2,C%(I,J)
. 6...:..F6...I.0.2:.J.0.8:.K.0.2:.2,PU(
I,J,K).P6...:.:..M6...I.0.4:.J.0.8:.2,R%
(I,J).U6...:..~6...2,H..6.. 2..6$.CE.1:P
E.1.P6..."PLAYER FILE NUMBER"PF"LOADED."
:.:.:CE.2:PE.2:DL.1:SD.0.Z68..5410..6X..
** SAVE A PLAYER FILE **.,7B.."..
SAVE A PLAYER FILE .".B7L
..CE..0.PE..0.7060.P7Q.."......".Y7V..CE
.0..211,9:."NO CLUB FILE EXISTS."..7...P
E.0..211,9:."NO PUTTING FILE EXISTS."..7
...5410.F7..A$."*":.DL..0.7170..7... **N
O FILE WAS READ FROM DISK**.#8..."ENTER
FILE NUMBER TO SAVE";A$:.C(A$).2.A$.H(A$
,2).48...A$."*".5410.B8...I.1.C(A$):J.F(
J(A$,I,1)):.J.48.J.57.7080.H8F....8P.PF.
E(A$):.PF.40.PF.81.7140.B8Z.."VALID FILE
NUMBERS ARE .41 - 80..":.I.1.2000:.:.70
80.S8..PF$."PD.".A$..8...N%(PF).7300..8.
..7280..9...** A FILE WAS READ FROM DISK
**.=9..."FILE NUMBER"PF"WAS READ FROM D
ISK.".I9...CE.1..:."A NEW CLUB FILE WAS
CREATED."..9 ..PE.1..:."A NEW PUTTING FI
LE WAS CREATED.":.7220.J9*..:."NO CHANGE
S WERE MADE TO FILE"PF;"."..94..:."YOU M
AY EITHER:":...:>..211,7:."1 - SAVE AS F
ILE"PF.0:H..211,7:."2 - ENTER A NEW FILE
NUMBER".U:R..:."YOUR CHOICE?";:.198,0:.
631,0.{:\..B(631).49.B(631).50..198,0:.7
260..:F.J.B(631).48:.198,0:.631,0:.J:.J.
7380,7070..:P.. ** SAVE FILE **.S:Z.. N%
(PF).0.7380..:... ** FILE ALREADY IN USE
**.!;..."PLAYER FILE NUMBER"PF" ALREADY
EXISTS.".O;...:."PRESS <RETURN> TO OVER
WRITE THE FILE".|;..."WITH NEW DATA, OR
PRESS <*> TO ASSIGN"..;..."A NEW FILE NU
MBER.":.198,0:.631,0.L;...B(631)..13.B(6
31)..42..198,0:.7350..;..J.B(631):.631,0
:.198,0:.J.13..:.7380..<J..:.7070..<T..
2,8,2,"@0:".PF$.",S,W".<<...I.0.18:.J.0.
4:.2,C%(I,J).D<...:..J<...I.0.2:.J.0.8:.
K.0.2:.2,PU(I,J,K).T<...:.:...<...I.0.4:
.J.0.8:.2,R%(I,J)..<...:...<...2,H..<$.
2..<...".";:.I.41.60:A$.I(D(I),2):.A$;:.
211,3:.PN$(I);..=8..211,20:A$.I(D(I.20),
2):.A$;:.211,23:.PN$(I.20).#=B..:.OP.8.5
410.N=L..:."WHAT NAME IS PLAYER FILE NUM
BER"PF..=V.."TO BE SAVED UNDER ";A$:.C(A
$).15.A$.H(A$,15)..=`.PN$(PF).A$..=J.. 2
,8,2,"@0:GPN,S,W"..=T..I.1.80:.2,PN$(I).
E=~...L=.. 2.Y=..N%(PF).1..=... 2,8,2,"@
0:ARRAY.STATUS,S,W"..>...I.1.80:.2,N%(I)
..>.....>.. 2.K>D.."PLAYER FILE NUMBER"P
F"SAVED.":SD.1:DL.0.U>N..5410.X>@.. ** R
EVIEW CHARACTERISTICS **..>J..".";:.PE.0
.CE.0.7025.E>T..".NAME: NONE
ARRAY NUMBER: ? .";..>^..".HANDICAP RA
NGE: .";..?C..DL
..1.SD.0.8050.C?H..209,0:.210,4:.211,6:.
"."PN$(PF);:.211,36:.PF".";.L?R..209,40:
.210,4:.211,16:."."H$(H)".";..?|..209,80
:.210,4:.211,0:.214,2..?...".-----------
------CLUBS------------------.";..?...".
CLUB DIR DST CONSISTENCY
.";.&@...". SET VAR SPIN VAR
FACTOR .";.;@...I.1.8:.CT$(I):..N@..
.".
.";..@...".PUTT DIST RATING RA
TING KEY .";.U@B.." 0- 2 FT":." 3-
5 FT":." 6-10 FT":."11-16 FT"..AL.."17-2
4 FT":."25-35 FT":."36-50 FT":."51-75 FT
"..AV.."76+ FT";.QA...I.15.21:J.1024.I
.40:J1%.J.256:J2%.256.(J.256.J1%).TA...J
2%.255.J2%.J2%.256:J1%.J1%.1..A...209,J2
%:.210,J1%:.211,18:.".
.";.CA...I.15.I.21.8210..A. .209,J2%
:.210,J1%:.211,20:."."I.16" = "R$(I.16);
..A. ..4B. .I.5.12:J.1024.I.40:J1%.J.256
:J2%.256.(J.256.J1%).WB& .J2%.255.J2%.J2
%.256:J1%.J1%.1.UB0 .209,J2%:.210,J1%:.2
11,12..B: .R%(0,I.4);:.211,17:.R%(1,I.4)
;:.211,23:.R%(2,I.4);.EBD .211,33:.R%(3,
I.4);.KBN ...CX .I.0.8:J.1024.40.(I.15):
J1%.J.256:J2%.256.(J.256.J1%).(CB .J2%.2
55.J2%.J2%.256:J1%.J1%.1.RCL .209,J2%:.2
10,J1%:.211,12:.R%(4,I);:...CV .209,112:
.210,7:.211,19:."PRESS <RETURN> TO";..C.
.209,152:.210,7:.211,19:."RETURN TO MEN
U...";.HC. .198,0:.631,0..C. .209,112:.2
10,7:.211,26:." ";:.I.1.250:...D. .
B(631).13..198,0:.631,0:.860.ND. .209,11
2:.210,7:.211,26:."RETURN";:.I.1.250:..C
D. .B(631)..13.8330.ZD. .198,0:.631,0:.8
60..D0U. ERROR CHANNEL..D:U. 15,8,15..DD
U.15,E1$,E2$,E3$,E4$..DNU 15.BDXU......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL