ARRAY.CREATE
FILE INFORMATION
FILENAME(S): ARRAY.CREATE
FILE TYPE(S): PRG
FILE SIZE: 8.2K
FIRST SEEN: 2025-12-02 23:47:24
APPEARS ON: 1 disk(s)
FILE HASH
6dbb1126203d173262e940426ca889643ba954f7023d80283029ac35c6d4e164
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPIELE 23 | ARRAY.CREATE | PRG | swasti, flohmarkt | 29 | 3 |
⚠ CORRUPT 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 97 32 31 31 2C 31 31 3A 99 22 32 20 |l..:.211,11:."2 |
00001DD0: 2D 3E 20 41 56 45 52 41 47 45 22 00 EF 2C F0 0F |-> AVERAGE"..,..|
00001DE0: FF 32 31 31 2C 31 31 3A 99 22 33 20 2D 3E 20 42 |.211,11:."3 -> B|
00001DF0: 45 4C 4F 57 20 41 56 45 52 41 47 45 22 00 0A 2D |ELOW AVERAGE"..-|
00001E00: FA 0F 97 32 31 31 2C 31 31 3A 99 22 34 20 2D 3E |...211,11:."4 ->|
00001E10: 20 50 4F 4F 52 22 3A 99 00 33 2D 04 10 81 49 B2 | POOR":..3-...I.|
00001E20: 30 A4 38 3A 99 50 44 24 28 49 29 22 20 20 2D 3E |0.8:.PD$(I)" ->|
00001E30: 20 22 3B 3A 97 31 39 38 2C 30 3A 97 36 33 31 2C | ";:.198,0:.631,|
00001E40: 30 00 59 2D 0E 10 8B C2 28 36 33 31 29 B3 34 38 |0.Y-....(631).48|
00001E50: B0 C2 28 36 33 31 29 B1 35 32 A7 97 31 39 38 2C |..(631).52..198,|
00001E60: 30 3A 89 34 31 31 30 00 7E 2D 18 10 41 B2 C2 28 |0:.4110.~-..A..(|
00001E70: 36 33 31 29 AB 34 38 3A 97 31 39 38 2C 30 3A 97 |631).48:.198,0:.|
00001E80: 36 33 31 2C 30 3A 99 52 24 28 41 29 00 8C 2D 22 |631,0:.R$(A)..-"|
00001E90: 10 52 25 28 34 2C 49 29 B2 41 00 B7 2D 2C 10 81 |.R%(4,I).A..-,..|
00001EA0: 4A B2 30 A4 32 3A 81 4B B2 30 A4 32 3A 50 55 28 |J.0.2:.K.0.2:PU(|
00001EB0: 4A 2C 49 2C 4B 29 B2 50 28 4A 2C 49 2C 41 2C 4B |J,I,K).P(J,I,A,K|
00001EC0: 29 3A 45 45 21 FF 59 50 45 53 20 4F 46 21 FF 55 |):EE!.YPES OF!.U|
00001ED0: 54 54 49 4E 47 20 53 54 52 4F 4B 45 53 E2 00 F2 |TTING STROKES...|
00001EE0: 32 E6 14 FF 22 28 4E 4F 52 4D 41 4C 2C 20 4C 41 |2..."(NORMAL, LA|
00001EF0: 47 3D 20 41 4E 44 20 43 48 5B 52 47 45 E9 2E 20 |G= AND CH[RGE.. |
00001F00: 54 59 45 59 20 57 45 52 52 21 A3 63 FF 01 49 FF |TYEY WERR!.c..I.|
00001F10: 24 34 F4 D5 FF 55 44 54 42 04 24 15 34 54 4E 1E |$4...UDTB.$.4TN.|
00001F20: F4 E3 BE 14 EE 04 15 64 55 25 B4 FF E3 FB FF 3B |.......dU%.....;|
00001F30: 3B FF 27 27 FF FF FF FF 3B 33 61 F3 F3 61 FF BB |;.''....;3a..a..|
00001F40: 31 FF FF 5E 9D 8F 95 8F 8F FF 95 88 FF 8A 99 AD |1..^............|
00001F50: FF FF FF D9 8F FD 1F 99 FF FF FF 9D FF 98 FF FF |................|
00001F60: FF FF FF 70 79 53 FF FF FF B7 12 FF 13 FF FF 36 |...pyS.........6|
00001F70: 17 FF BB 33 B2 B3 FF 3F 1F FF 32 FF 3A 33 FF FF |...3...?..2.:3..|
00001F80: B3 B7 3B 32 BF B3 FF E2 62 FF A7 2B E4 FF 37 13 |..;2....b..+..7.|
00001F90: B2 B7 FF FF 3B 32 12 BB FF 3B 3E 13 FF 33 FF 36 |....;2...;>..3.6|
00001FA0: FF FF 32 FF 37 16 17 3B BB FF FF FF 78 FF 77 FF |..2.7..;....x.w.|
00001FB0: FF FF FF FF FF 98 FF 51 89 FF F7 FF FF FF FF FF |.......Q........|
00001FC0: 45 45 21 FF 59 50 45 53 20 4F 46 21 FF 55 54 54 |EE!.YPES OF!.UTT|
00001FD0: 49 4E 47 20 53 54 52 4F 4B 45 53 E2 00 F2 32 E6 |ING STROKES...2.|
00001FE0: 14 FF 22 28 4E 4F 52 4D 41 4C 2C 20 4C 41 47 3D |.."(NORMAL, LAG=|
00001FF0: 20 41 4E 44 20 43 48 5B 52 47 45 E9 2E 20 54 59 | AND CH[RGE.. TY|
00002000: 45 59 20 57 45 52 52 21 A3 63 FF 01 49 FF 24 34 |EY WERR!.c..I.$4|
00002010: F4 D5 FF 55 44 54 42 04 24 15 34 54 4E 1E F4 E3 |...UDTB.$.4TN...|
00002020: BE 14 EE 04 15 64 55 25 B4 FF E3 FB FF 3B 3B FF |.....dU%.....;;.|
00002030: 27 27 FF FF FF FF 3B 33 61 F3 F3 61 FF BB 31 FF |''....;3a..a..1.|
00002040: FF 5E 9D 8F 95 8F 8F FF 95 88 FF 8A 99 AD FF FF |.^..............|
00002050: FF D9 8F FD 1F 99 FF FF FF 9D FF 98 FF FF FF FF |................|
00002060: FF 70 79 53 FF FF FF B7 12 FF 13 FF FF 36 17 FF |.pyS.........6..|
00002070: BB 33 B2 B3 FF 3F 1F FF 32 FF 3A 33 FF FF B3 B7 |.3...?..2.:3....|
00002080: 3B 32 BF B3 FF E2 62 FF A7 2B E4 FF 37 13 B2 B7 |;2....b..+..7...|
00002090: FF FF 3B 32 12 BB FF 3B 3E 13 FF 33 FF 36 FF FF |..;2...;>..3.6..|
000020A0: 32 FF 37 16 17 3B BB FF FF FF 78 FF 77 FF FF FF |2.7..;....x.w...|
000020B0: FF FF FF 98 FF 51 89 FF F7 FF FF FF FF FF |.....Q........ |
....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..:.211,11:."2 -> AVERA
GE"..,...211,11:."3 -> BELOW AVERAGE"..-
...211,11:."4 -> POOR":..3-...I.0.8:.PD$
(I)" -> ";:.198,0:.631,0.Y-...B(631).48
.B(631).52..198,0:.4110.~-..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):EE!.YP
ES OF!.UTTING STROKES...2..."(NORMAL, LA
G= AND CH[RGE.. TYEY WERR!.C..I.$4.U.UDT
B.$.4TN........DU%.....;;.''....;3A..A..
1..^...............Y...............PYS..
.......6...3...?..2.:3....;2....B..+..7.
....;2...;>..3.6..2.7..;....X.W........Q
........EE!.YPES OF!.UTTING STROKES...2.
.."(NORMAL, LAG= AND CH[RGE.. TYEY WERR!
.C..I.$4.U.UDTB.$.4TN........DU%.....;;.
''....;3A..A..1..^...............Y......
.........PYS.........6...3...?..2.:3....
;2....B..+..7.....;2...;>..3.6..2.7..;..
..X.W........Q........
> CLICK IMAGE PREVIEW FOR FULL MODAL