STAT.UPDATE
FILE INFORMATION
FILENAME(S): STAT.UPDATE
FILE TYPE(S): PRG
FILE SIZE: 4.7K
FIRST SEEN: 2025-11-30 19:55:26
APPEARS ON: 1 disk(s)
FILE HASH
22ef94a06ec8c45dcade8cae4a8622ebe7c197d6dd5a7274a80b19bf782828c5
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RENE B CASPERSEN | STAT.UPDATE | PRG | Curtcool, Hans Curt | 6 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 13 08 00 00 8F 20 53 54 41 54 2E 55 50 44 |....... STAT.UPD| 00000010: 41 54 45 00 31 08 64 00 97 35 33 32 38 31 2C 31 |ATE.1.d..53281,1| 00000020: 32 3A 97 35 33 32 38 30 2C 31 35 3A 99 22 93 05 |2:.53280,15:."..| 00000030: 22 00 7A 08 6E 00 86 53 25 28 34 29 2C 47 25 28 |".z.n..S%(4),G%(| 00000040: 34 29 2C 50 25 28 34 29 2C 50 4C 24 28 34 29 2C |4),P%(4),PL$(4),| 00000050: 43 24 28 33 29 2C 49 47 25 28 34 29 2C 43 4E 24 |C$(3),IG%(4),CN$| 00000060: 28 32 30 29 2C 43 53 28 32 30 29 2C 43 52 28 32 |(20),CS(20),CR(2| 00000070: 30 29 2C 43 52 25 28 32 30 29 00 91 08 78 00 86 |0),CR%(20)...x..| 00000080: 20 52 48 24 28 32 30 29 2C 53 54 28 38 30 2C 35 | RH$(20),ST(80,5| 00000090: 29 00 C4 08 82 00 99 22 93 12 20 20 20 20 20 20 |)......".. | 000000A0: 20 20 20 20 20 20 53 54 41 54 49 53 54 49 43 20 | STATISTIC | 000000B0: 55 50 44 41 54 45 20 20 20 20 20 20 20 20 20 20 |UPDATE | 000000C0: 20 20 92 22 00 ED 08 8C 00 99 22 11 11 11 11 11 | ."......".....| 000000D0: 11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 |. I| 000000E0: 4E 53 45 52 54 20 59 4F 55 52 22 3A 99 00 1E 09 |NSERT YOUR":....| 000000F0: 96 00 99 22 20 20 20 12 50 52 4F 46 45 53 53 49 |..." .PROFESSI| 00000100: 4F 4E 41 4C 20 54 4F 55 52 20 47 4F 4C 46 20 50 |ONAL TOUR GOLF P| 00000110: 4C 41 59 45 52 20 44 49 53 4B 92 22 3A 99 00 54 |LAYER DISK.":..T| 00000120: 09 A0 00 99 22 20 20 20 20 20 20 20 20 20 20 41 |...." A| 00000130: 4E 44 20 50 52 45 53 53 20 3C 52 45 54 55 52 4E |ND PRESS <RETURN| 00000140: 3E 20 12 20 92 22 3A 97 31 39 38 2C 30 3A 97 36 |> . .":.198,0:.6| 00000150: 33 31 2C 30 00 7A 09 AA 00 81 49 B2 31 A4 34 30 |31,0.z....I.1.40| 00000160: 3A 82 3A 8B C2 28 36 33 31 29 B3 B1 31 33 A7 97 |:.:..(631)..13..| 00000170: 31 39 38 2C 30 3A 89 31 37 30 00 8C 09 AC 00 9F |198,0:.170......| 00000180: 20 31 2C 38 2C 31 35 2C 22 49 30 22 00 93 09 AE | 1,8,15,"I0"....| 00000190: 00 A0 31 00 AE 09 B4 00 9F 20 32 2C 38 2C 32 2C |..1...... 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 BE 00 A0 32 00 CF 09 C8 00 8D 33 30 30 30 30 |....2......30000| 000001C0: 3A 8B 45 31 24 B3 B1 22 30 30 22 A7 31 33 30 00 |:.E1$.."00".130.| 000001D0: F1 09 D2 00 8B 20 C2 28 34 33 29 AA 32 35 36 AC |..... .(43).256.| 000001E0: C2 28 34 34 29 B3 B1 31 36 33 38 35 A7 31 34 39 |.(44)..16385.149| 000001F0: 30 00 25 0A DC 00 50 31 25 B2 C2 28 34 30 39 36 |0.%...P1%..(4096| 00000200: 29 3A 43 4E 25 B2 C2 28 34 30 39 37 29 3A 43 42 |):CN%..(4097):CB| 00000210: 25 B2 C2 28 34 30 39 38 29 3A 4E 43 25 B2 C2 28 |%..(4098):NC%..(| 00000220: 34 30 39 39 29 00 48 0A E6 00 81 49 B2 31 A4 34 |4099).H....I.1.4| 00000230: 3A 50 4C 24 28 49 29 B2 22 22 3A 8B 49 B3 34 A7 |:PL$(I)."":.I.4.| 00000240: 43 24 28 49 29 B2 22 22 00 4E 0A F0 00 82 00 7F |C$(I)."".N......| 00000250: 0A FA 00 81 49 B2 31 A4 50 31 25 3A 49 31 B2 34 |....I.1.P1%:I1.4| 00000260: 31 31 35 AA 35 AC 28 49 AB 31 29 3A 49 47 25 28 |115.5.(I.1):IG%(| 00000270: 49 29 B2 C2 28 49 31 29 3A 81 4A B2 31 A4 33 00 |I)..(I1):.J.1.3.| 00000280: A0 0A 04 01 50 4C 24 28 49 29 B2 50 4C 24 28 49 |....PL$(I).PL$(I| 00000290: 29 AA C7 28 C2 28 49 31 AA 4A 29 29 3A 82 3A 82 |)..(.(I1.J)):.:.| 000002A0: 00 DF 0A 0E 01 81 49 B2 31 A4 50 31 25 3A 53 25 |......I.1.P1%:S%| 000002B0: 28 49 29 B2 C2 28 34 30 39 39 AA 49 29 3A 47 25 |(I)..(4099.I):G%| 000002C0: 28 49 29 B2 C2 28 34 31 30 34 AA 49 29 3A 50 25 |(I)..(4104.I):P%| 000002D0: 28 49 29 B2 C2 28 34 31 30 39 AA 49 29 3A 82 00 |(I)..(4109.I):..| 000002E0: 0C 0B 18 01 81 49 B2 31 A4 4E 43 25 3A 49 31 B2 |.....I.1.NC%:I1.| 000002F0: 34 31 33 35 AA 33 30 AC 28 49 AB 31 29 3A 4C B2 |4135.30.(I.1):L.| 00000300: C2 28 49 31 29 3A 81 4A B2 31 A4 4C 00 2B 0B 22 |.(I1):.J.1.L.+."| 00000310: 01 43 24 28 49 29 B2 43 24 28 49 29 AA C7 28 C2 |.C$(I).C$(I)..(.| 00000320: 28 49 31 AA 4A 29 29 3A 82 3A 82 00 4B 0B 2C 01 |(I1.J)):.:..K.,.| 00000330: 8F 20 2A 2A 20 55 50 44 41 54 45 20 50 4C 41 59 |. ** UPDATE PLAY| 00000340: 45 52 20 46 49 4C 45 53 20 2A 2A 00 68 0B 36 01 |ER FILES **.h.6.| 00000350: 9F 20 32 2C 38 2C 32 2C 22 30 3A 50 4C 2E 53 54 |. 2,8,2,"0:PL.ST| 00000360: 41 54 53 2C 53 2C 52 22 00 8A 0B 40 01 81 49 B2 |ATS,S,R"...@..I.| 00000370: 31 A4 38 30 3A 81 4A B2 30 A4 35 3A 84 32 2C 53 |1.80:.J.0.5:.2,S| 00000380: 54 28 49 2C 4A 29 3A 82 3A 82 00 91 0B 4A 01 A0 |T(I,J):.:....J..| 00000390: 32 00 9E 0B 54 01 81 49 B2 31 A4 50 31 25 00 BE |2...T..I.1.P1%..| 000003A0: 0B 5E 01 53 54 28 49 47 25 28 49 29 2C 30 29 B2 |.^.ST(IG%(I),0).| 000003B0: 53 54 28 49 47 25 28 49 29 2C 30 29 AA 31 00 E2 |ST(IG%(I),0).1..| 000003C0: 0B 68 01 53 54 28 49 47 25 28 49 29 2C 31 29 B2 |.h.ST(IG%(I),1).| 000003D0: 53 54 28 49 47 25 28 49 29 2C 31 29 AA 53 25 28 |ST(IG%(I),1).S%(| 000003E0: 49 29 00 06 0C 72 01 53 54 28 49 47 25 28 49 29 |I)...r.ST(IG%(I)| 000003F0: 2C 32 29 B2 53 54 28 49 47 25 28 49 29 2C 32 29 |,2).ST(IG%(I),2)| 00000400: AA 50 25 28 49 29 00 2A 0C 7C 01 53 54 28 49 47 |.P%(I).*.|.ST(IG| 00000410: 25 28 49 29 2C 33 29 B2 53 54 28 49 47 25 28 49 |%(I),3).ST(IG%(I| 00000420: 29 2C 33 29 AA 47 25 28 49 29 00 55 0C 86 01 8B |),3).G%(I).U....| 00000430: 53 25 28 49 29 B1 53 54 28 49 47 25 28 49 29 2C |S%(I).ST(IG%(I),| 00000440: 34 29 A7 53 54 28 49 47 25 28 49 29 2C 34 29 B2 |4).ST(IG%(I),4).| 00000450: 53 25 28 49 29 00 80 0C 90 01 8B 53 25 28 49 29 |S%(I)......S%(I)| 00000460: B3 53 54 28 49 47 25 28 49 29 2C 35 29 A7 53 54 |.ST(IG%(I),5).ST| 00000470: 28 49 47 25 28 49 29 2C 35 29 B2 53 25 28 49 29 |(IG%(I),5).S%(I)| 00000480: 00 86 0C 9A 01 82 00 A4 0C A4 01 9F 20 32 2C 38 |............ 2,8| 00000490: 2C 32 2C 22 40 30 3A 50 4C 2E 53 54 41 54 53 2C |,2,"@0:PL.STATS,| 000004A0: 53 2C 57 22 00 C6 0C AE 01 81 49 B2 31 A4 38 30 |S,W"......I.1.80| 000004B0: 3A 81 4A B2 30 A4 35 3A 98 32 2C 53 54 28 49 2C |:.J.0.5:.2,ST(I,| 000004C0: 4A 29 3A 82 3A 82 00 CD 0C B8 01 A0 32 00 F1 0C |J):.:.......2...| 000004D0: C2 01 8F 20 2A 2A 20 55 50 44 41 54 45 20 43 4F |... ** UPDATE CO| 000004E0: 55 52 53 45 20 53 54 41 54 20 46 49 4C 45 20 2A |URSE STAT FILE *| 000004F0: 2A 00 0D 0D CC 01 9F 20 32 2C 38 2C 32 2C 22 30 |*...... 2,8,2,"0| 00000500: 3A 43 2E 53 54 41 54 53 2C 53 2C 52 22 00 19 0D |:C.STATS,S,R"...| 00000510: D6 01 81 49 B2 31 A4 32 30 00 27 0D E0 01 84 32 |...I.1.20.'....2| 00000520: 2C 43 4E 24 28 49 29 00 34 0D EA 01 84 32 2C 43 |,CN$(I).4....2,C| 00000530: 53 28 49 29 00 41 0D F4 01 84 32 2C 43 52 28 49 |S(I).A....2,CR(I| 00000540: 29 00 4F 0D FE 01 84 32 2C 43 52 25 28 49 29 00 |).O....2,CR%(I).| 00000550: 5D 0D 08 02 84 32 2C 52 48 24 28 49 29 00 63 0D |]....2,RH$(I).c.| 00000560: 12 02 82 00 6A 0D 1C 02 A0 32 00 A3 0D 26 02 43 |....j....2...&.C| 00000570: 52 28 43 4E 25 29 B2 43 52 28 43 4E 25 29 AA 50 |R(CN%).CR(CN%).P| 00000580: 31 25 3A 81 49 B2 31 A4 50 31 25 3A 43 53 28 43 |1%:.I.1.P1%:CS(C| 00000590: 4E 25 29 B2 43 53 28 43 4E 25 29 AA 53 25 28 49 |N%).CS(CN%).S%(I| 000005A0: 29 3A 82 00 EB 0D 30 02 46 31 25 B2 30 3A 81 49 |):....0.F1%.0:.I| 000005B0: B2 31 A4 50 31 25 3A 8B 53 25 28 49 29 B3 43 52 |.1.P1%:.S%(I).CR| 000005C0: 25 28 43 4E 25 29 A7 43 52 25 28 43 4E 25 29 B2 |%(CN%).CR%(CN%).| 000005D0: 53 25 28 49 29 3A 52 48 24 28 43 4E 25 29 B2 50 |S%(I):RH$(CN%).P| 000005E0: 4C 24 28 49 29 3A 46 31 25 B2 31 00 FB 0D 3A 02 |L$(I):F1%.1...:.| 000005F0: 82 3A 91 20 46 31 25 89 36 30 30 00 24 0E 44 02 |.:. F1%.600.$.D.| 00000600: 46 31 25 B2 30 3A 81 49 B2 31 A4 50 31 25 3A 8B |F1%.0:.I.1.P1%:.| 00000610: 53 25 28 49 29 B2 43 52 25 28 43 4E 25 29 A7 46 |S%(I).CR%(CN%).F| 00000620: 31 25 B2 32 00 2A 0E 4E 02 82 00 77 0E 58 02 8F |1%.2.*.N...w.X..| 00000630: 2A 2A 20 53 45 45 20 49 46 20 43 4F 55 52 53 45 |** SEE IF COURSE| 00000640: 53 20 46 52 4F 4D 20 44 49 53 4B 20 20 2A 2A 20 |S FROM DISK ** | 00000650: 20 20 20 20 20 20 20 20 2A 2A 20 42 45 49 4E 47 | ** BEING| 00000660: 20 50 4C 41 59 45 44 20 41 52 45 20 49 4E 43 4C | PLAYED ARE INCL| 00000670: 55 44 45 44 20 2A 2A 00 9C 0E 62 02 8F 2A 2A 20 |UDED **...b..** | 00000680: 49 4E 20 50 52 45 53 45 4E 54 20 44 49 53 4B 20 |IN PRESENT DISK | 00000690: 53 54 41 54 49 53 54 49 43 53 2A 2A 00 B3 0E 6C |STATISTICS**...l| 000006A0: 02 8B 43 4E 24 28 43 4E 25 29 B3 B1 22 2A 22 A7 |..CN$(CN%).."*".| 000006B0: 36 34 30 00 D3 0E 76 02 81 49 B2 31 A4 4E 43 25 |640...v..I.1.NC%| 000006C0: 3A 43 4E 24 28 43 42 25 AA 49 29 B2 43 24 28 49 |:CN$(CB%.I).C$(I| 000006D0: 29 3A 82 00 DD 0E 80 02 8D 31 34 35 30 00 FD 0E |):.......1450...| 000006E0: 8A 02 46 25 B2 30 3A 81 49 B2 31 A4 38 30 3A 8B |..F%.0:.I.1.80:.| 000006F0: 53 54 28 49 2C 30 29 B2 30 A7 38 39 30 00 14 0F |ST(I,0).0.890...| 00000700: 94 02 46 25 B2 46 25 AA 31 3A 8B 46 25 B3 32 31 |..F%.F%.1:.F%.21| 00000710: A7 37 33 30 00 26 0F 9E 02 97 31 39 38 2C 30 3A |.730.&....198,0:| 00000720: 97 36 33 31 2C 30 00 6C 0F A8 02 97 32 30 39 2C |.631,0.l....209,| 00000730: 31 39 32 3A 97 32 31 30 2C 37 3A 97 32 31 31 2C |192:.210,7:.211,| 00000740: 31 3A 99 22 20 20 20 20 20 20 50 52 45 53 53 20 |1:." PRESS | 00000750: 3C 52 45 54 55 52 4E 3E 20 54 4F 20 43 4F 4E 54 |<RETURN> TO CONT| 00000760: 49 4E 55 45 20 20 20 20 20 20 22 3B 00 AD 0F B2 |INUE ";....| 00000770: 02 81 4A B2 31 A4 37 35 30 3A 82 3A 97 32 31 31 |..J.1.750:.:.211| 00000780: 2C 31 3A 99 22 20 20 20 20 20 20 20 20 20 20 20 |,1:." | 00000790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000007A0: 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 D3 0F | ";...| 000007B0: BC 02 81 4A B2 31 A4 34 30 3A 8B C2 28 36 33 31 |...J.1.40:..(631| 000007C0: 29 B3 B1 31 33 A7 97 31 39 38 2C 30 3A 82 3A 89 |)..13..198,0:.:.| 000007D0: 36 38 30 00 E0 0F C6 02 4A B2 34 30 3A 82 3A 99 |680.....J.40:.:.| 000007E0: 00 FD 0F D0 02 97 31 39 38 2C 30 3A 97 36 33 31 |......198,0:.631| 000007F0: 2C 30 3A 46 25 B2 31 3A 8D 31 34 35 30 00 46 10 |,0:F%.1:.1450.F.| 00000800: DA 02 52 50 25 B2 53 54 28 49 2C 30 29 3A 54 53 |..RP%.ST(I,0):TS| 00000810: B2 53 54 28 49 2C 31 29 3A 54 50 B2 53 54 28 49 |.ST(I,1):TP.ST(I| 00000820: 2C 32 29 3A 47 50 B2 53 54 28 49 2C 33 29 3A 48 |,2):GP.ST(I,3):H| 00000830: 52 25 B2 53 54 28 49 2C 34 29 3A 4C 52 25 B2 53 |R%.ST(I,4):LR%.S| 00000840: 54 28 49 2C 35 29 00 61 10 E4 02 50 24 B2 22 20 |T(I,5).a...P$." | 00000850: 20 22 AA C4 28 49 29 3A 99 C9 28 50 24 2C 32 29 | "..(I):..(P$,2)| 00000860: 3B 00 86 10 EE 02 50 24 B2 22 20 20 20 22 AA C4 |;.....P$." "..| 00000870: 28 52 50 25 29 3A 97 32 31 31 2C 34 3A 99 C9 28 |(RP%):.211,4:..(| 00000880: 50 24 2C 34 29 3B 00 B8 10 F8 02 97 32 31 31 2C |P$,4);......211,| 00000890: 39 3A 50 B2 47 50 AD 52 50 25 AA 2E 30 30 35 3A |9:P.GP.RP%..005:| 000008A0: 50 24 B2 C4 28 50 29 3A 50 24 B2 C9 28 50 24 2C |P$..(P):P$..(P$,| 000008B0: C3 28 50 24 29 AB 31 29 00 CF 10 02 03 8B 50 B2 |.(P$).1)......P.| 000008C0: B5 28 50 29 A7 50 24 B2 50 24 AA 22 2E 30 22 00 |.(P).P$.P$.".0".| 000008D0: E2 10 0C 03 8B 50 B3 31 A7 50 24 B2 22 30 22 AA |.....P.1.P$."0".| 000008E0: 50 24 00 F6 10 16 03 8B 50 B3 31 30 A7 50 24 B2 |P$......P.10.P$.| 000008F0: 22 20 22 AA 50 24 00 0E 11 20 03 50 24 B2 50 24 |" ".P$... .P$.P$| 00000900: AA 22 30 22 3A 99 C8 28 50 24 2C 35 29 3B 00 41 |."0":..(P$,5);.A| 00000910: 11 2A 03 97 32 31 31 2C 31 37 3A 50 B2 54 50 AD |.*..211,17:P.TP.| 00000920: 52 50 25 AA 2E 30 30 35 3A 50 24 B2 C4 28 50 29 |RP%..005:P$..(P)| 00000930: 3A 50 24 B2 C9 28 50 24 2C C3 28 50 24 29 AB 31 |:P$..(P$,.(P$).1| 00000940: 29 00 58 11 34 03 8B 50 B2 B5 28 50 29 A7 50 24 |).X.4..P..(P).P$| 00000950: B2 50 24 AA 22 2E 30 22 00 70 11 3E 03 50 24 B2 |.P$.".0".p.>.P$.| 00000960: 50 24 AA 22 30 22 3A 99 C8 28 50 24 2C 35 29 3B |P$."0":..(P$,5);| 00000970: 00 A3 11 48 03 97 32 31 31 2C 32 35 3A 50 B2 54 |...H..211,25:P.T| 00000980: 53 AD 52 50 25 AA 2E 30 30 35 3A 50 24 B2 C4 28 |S.RP%..005:P$..(| 00000990: 50 29 3A 50 24 B2 C9 28 50 24 2C C3 28 50 24 29 |P):P$..(P$,.(P$)| 000009A0: AB 31 29 00 BA 11 52 03 8B 50 B2 B5 28 50 29 A7 |.1)...R..P..(P).| 000009B0: 50 24 B2 50 24 AA 22 2E 30 22 00 D2 11 5C 03 50 |P$.P$.".0"...\.P| 000009C0: 24 B2 50 24 AA 22 30 22 3A 99 C8 28 50 24 2C 35 |$.P$."0":..(P$,5| 000009D0: 29 3B 00 F7 11 66 03 97 32 31 31 2C 33 32 3A 50 |);...f..211,32:P| 000009E0: 24 B2 22 20 20 22 AA C4 28 48 52 25 29 3A 99 C9 |$." "..(HR%):..| 000009F0: 28 50 24 2C 33 29 3B 00 1B 12 70 03 97 32 31 31 |(P$,3);...p..211| 00000A00: 2C 33 36 3A 50 24 B2 22 20 20 22 AA C4 28 4C 52 |,36:P$." "..(LR| 00000A10: 25 29 3A 99 C9 28 50 24 2C 33 29 00 40 12 7A 03 |%):..(P$,3).@.z.| 00000A20: 81 4A B2 31 A4 35 30 3A 82 3A 8B C2 28 36 33 31 |.J.1.50:.:..(631| 00000A30: 29 B2 34 32 A7 97 31 39 38 2C 30 3A 49 B2 38 30 |).42..198,0:I.80| 00000A40: 00 4D 12 84 03 97 31 39 38 2C 30 3A 82 00 5F 12 |.M....198,0:.._.| 00000A50: 8E 03 97 31 39 38 2C 30 3A 97 36 33 31 2C 30 00 |...198,0:.631,0.| 00000A60: A4 12 98 03 97 32 30 39 2C 31 39 32 3A 97 32 31 |.....209,192:.21| 00000A70: 30 2C 37 3A 97 32 31 31 2C 31 3A 99 22 20 50 52 |0,7:.211,1:." PR| 00000A80: 45 53 53 20 3C 52 45 54 55 52 4E 3E 20 46 4F 52 |ESS <RETURN> FOR| 00000A90: 20 43 4F 55 52 53 45 20 53 54 41 54 49 53 54 49 | COURSE STATISTI| 00000AA0: 43 53 22 3B 00 E5 12 A2 03 81 49 B2 31 A4 37 35 |CS";......I.1.75| 00000AB0: 30 3A 82 3A 97 32 31 31 2C 31 3A 99 22 20 20 20 |0:.:.211,1:." | 00000AC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000AD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000AE0: 20 20 20 22 3B 00 0B 13 AC 03 81 49 B2 31 A4 34 | ";......I.1.4| 00000AF0: 30 3A 8B C2 28 36 33 31 29 B3 B1 31 33 A7 97 31 |0:..(631)..13..1| 00000B00: 39 38 2C 30 3A 82 3A 89 39 32 30 00 16 13 B6 03 |98,0:.:.920.....| 00000B10: 49 B2 34 30 3A 82 00 34 13 C0 03 8F 20 2A 2A 20 |I.40:..4.... ** | 00000B20: 43 4F 55 52 53 45 20 53 54 41 54 49 53 54 49 43 |COURSE STATISTIC| 00000B30: 53 20 2A 2A 00 55 13 CA 03 8B 20 C2 28 34 33 29 |S **.U.... .(43)| 00000B40: AA 32 35 36 AC C2 28 34 34 29 B2 31 36 33 38 35 |.256..(44).16385| 00000B50: A7 31 30 32 30 00 71 13 D4 03 9F 20 32 2C 38 2C |.1020.q.... 2,8,| 00000B60: 32 2C 22 30 3A 43 2E 53 54 41 54 53 2C 53 2C 52 |2,"0:C.STATS,S,R| 00000B70: 22 00 7D 13 DE 03 81 49 B2 31 A4 32 30 00 A5 13 |".}....I.1.20...| 00000B80: E8 03 84 32 2C 43 4E 24 28 49 29 2C 43 53 28 49 |...2,CN$(I),CS(I| 00000B90: 29 2C 43 52 28 49 29 2C 43 52 25 28 49 29 2C 52 |),CR(I),CR%(I),R| 00000BA0: 48 24 28 49 29 00 AE 13 F2 03 82 3A A0 32 00 E4 |H$(I)......:.2..| 00000BB0: 13 FC 03 99 3A 99 22 93 12 20 20 20 20 20 20 20 |....:.".. | 00000BC0: 20 20 20 20 20 20 20 20 4E 55 4D 2E 20 20 20 41 | NUM. A| 00000BD0: 56 47 20 20 43 4F 55 52 53 45 20 52 45 43 4F 52 |VG COURSE RECOR| 00000BE0: 44 92 22 3B 00 17 14 06 04 99 22 12 43 4F 55 52 |D.";......".COUR| 00000BF0: 53 45 20 4E 41 4D 45 20 20 20 20 52 4E 44 53 20 |SE NAME RNDS | 00000C00: 20 53 43 4F 52 45 20 52 45 43 4F 52 44 20 48 4F | SCORE RECORD HO| 00000C10: 4C 44 45 52 92 22 3B 00 49 14 10 04 5A 5A 25 B2 |LDER.";.I...ZZ%.| 00000C20: 30 3A 81 49 B2 31 A4 32 30 3A 5A 5A 25 B2 5A 5A |0:.I.1.20:ZZ%.ZZ| 00000C30: 25 AB 28 43 52 28 49 29 B1 30 29 3A 8B 43 52 28 |%.(CR(I).0):.CR(| 00000C40: 49 29 B2 30 A7 31 31 32 30 00 5D 14 1A 04 97 32 |I).0.1120.]....2| 00000C50: 31 31 2C 30 3A 99 43 4E 24 28 49 29 3B 00 86 14 |11,0:.CN$(I);...| 00000C60: 24 04 97 32 31 31 2C 31 35 3A 50 24 B2 22 20 20 |$..211,15:P$." | 00000C70: 20 20 22 AA C4 28 43 52 28 49 29 29 3A 99 C9 28 | "..(CR(I)):..(| 00000C80: 50 24 2C 34 29 3B 00 B9 14 2E 04 97 32 31 31 2C |P$,4);......211,| 00000C90: 32 31 3A 50 B2 43 53 28 49 29 AD 43 52 28 49 29 |21:P.CS(I).CR(I)| 00000CA0: 3A 50 24 B2 C4 28 50 29 3A 50 24 B2 C9 28 50 24 |:P$..(P):P$..(P$| 00000CB0: 2C C3 28 50 24 29 AB 31 29 00 D1 14 38 04 8B 50 |,.(P$).1)...8..P| 00000CC0: B2 B5 28 50 29 A7 50 24 B2 50 24 AA 22 2E 30 30 |..(P).P$.P$.".00| 00000CD0: 22 00 EC 14 42 04 50 24 B2 50 24 AA 22 30 30 30 |"...B.P$.P$."000| 00000CE0: 30 22 3A 99 C8 28 50 24 2C 35 29 3B 00 01 15 4C |0":..(P$,5);...L| 00000CF0: 04 97 32 31 31 2C 32 38 3A 99 43 52 25 28 49 29 |..211,28:.CR%(I)| 00000D00: 3B 00 15 15 56 04 97 32 31 31 2C 33 35 3A 99 52 |;...V..211,35:.R| 00000D10: 48 24 28 49 29 00 27 15 60 04 82 3A 8B 5A 5A 25 |H$(I).'.`..:.ZZ%| 00000D20: B1 30 A7 31 31 35 30 00 51 15 6A 04 97 32 30 39 |.0.1150.Q.j..209| 00000D30: 2C 31 34 34 3A 97 32 31 30 2C 35 3A 97 32 31 31 |,144:.210,5:.211| 00000D40: 2C 31 34 3A 99 22 4E 4F 20 43 4F 55 52 53 45 53 |,14:."NO COURSES| 00000D50: 22 00 81 15 74 04 97 32 30 39 2C 31 38 34 3A 97 |"...t..209,184:.| 00000D60: 32 31 30 2C 35 3A 97 32 31 31 2C 31 31 3A 99 22 |210,5:.211,11:."| 00000D70: 48 41 56 45 20 42 45 45 4E 20 50 4C 41 59 45 44 |HAVE BEEN PLAYED| 00000D80: 22 00 93 15 7E 04 97 31 39 38 2C 30 3A 97 36 33 |"...~..198,0:.63| 00000D90: 31 2C 30 00 D1 15 88 04 97 32 30 39 2C 31 39 32 |1,0......209,192| 00000DA0: 3A 97 32 31 30 2C 37 3A 97 32 31 31 2C 34 3A 99 |:.210,7:.211,4:.| 00000DB0: 22 50 52 45 53 53 20 3C 52 45 54 55 52 4E 3E 20 |"PRESS <RETURN> | 00000DC0: 54 4F 20 45 58 49 54 20 50 52 4F 47 52 41 4D 22 |TO EXIT PROGRAM"| 00000DD0: 3B 00 0B 16 92 04 81 49 B2 31 A4 37 35 30 3A 82 |;......I.1.750:.| 00000DE0: 3A 97 32 31 31 2C 34 3A 99 22 20 20 20 20 20 20 |:.211,4:." | 00000DF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000E00: 20 20 20 20 20 20 20 20 20 22 3B 00 32 16 9C 04 | ";.2...| 00000E10: 81 49 B2 31 A4 34 30 3A 8B C2 28 36 33 31 29 B3 |.I.1.40:..(631).| 00000E20: B1 31 33 A7 97 31 39 38 2C 30 3A 82 3A 89 31 31 |.13..198,0:.:.11| 00000E30: 36 30 00 5F 16 A6 04 49 B2 34 30 3A 82 3A 99 22 |60._...I.40:.:."| 00000E40: 93 22 3A 97 31 39 38 2C 30 3A 97 36 33 31 2C 30 |.":.198,0:.631,0| 00000E50: 3A 91 46 31 25 89 31 33 34 30 2C 31 33 30 30 00 |:.F1%.1340,1300.| 00000E60: 7C 16 B0 04 9F 20 32 2C 38 2C 32 2C 22 40 30 3A ||.... 2,8,2,"@0:| 00000E70: 43 2E 53 54 41 54 53 2C 53 2C 57 22 00 88 16 BA |C.STATS,S,W"....| 00000E80: 04 81 49 B2 31 A4 32 30 00 96 16 C4 04 98 32 2C |..I.1.20......2,| 00000E90: 43 4E 24 28 49 29 00 A3 16 CE 04 98 32 2C 43 53 |CN$(I)......2,CS| 00000EA0: 28 49 29 00 B0 16 D8 04 98 32 2C 43 52 28 49 29 |(I)......2,CR(I)| 00000EB0: 00 BE 16 E2 04 98 32 2C 43 52 25 28 49 29 00 CC |......2,CR%(I)..| 00000EC0: 16 EC 04 98 32 2C 52 48 24 28 49 29 00 D2 16 F6 |....2,RH$(I)....| 00000ED0: 04 82 00 D9 16 00 05 A0 32 00 E7 16 0A 05 99 22 |........2......"| 00000EE0: 93 2A 22 3A A2 3A 80 00 21 17 14 05 99 22 93 11 |.*":.:..!...."..| 00000EF0: 11 11 11 11 11 11 11 22 3B 3A 97 32 31 31 2C 31 |.......";:.211,1| 00000F00: 37 AB C3 28 43 4E 24 28 43 4E 25 29 29 AD 32 3A |7..(CN$(CN%)).2:| 00000F10: 99 22 54 48 45 20 22 43 4E 24 28 43 4E 25 29 3A |."THE "CN$(CN%):| 00000F20: 99 00 44 17 1E 05 99 A6 31 31 29 22 43 4F 55 52 |..D.....11)"COUR| 00000F30: 53 45 20 52 45 43 4F 52 44 22 43 52 25 28 43 4E |SE RECORD"CR%(CN| 00000F40: 25 29 3A 99 00 81 17 28 05 99 A6 31 33 29 22 57 |%):....(...13)"W| 00000F50: 41 53 20 54 49 45 44 20 42 59 3A 22 3A 8B C3 28 |AS TIED BY:":..(| 00000F60: 52 48 24 28 43 4E 25 29 29 B2 33 A7 52 48 24 28 |RH$(CN%)).3.RH$(| 00000F70: 43 4E 25 29 B2 52 48 24 28 43 4E 25 29 AA 22 2A |CN%).RH$(CN%)."*| 00000F80: 22 00 8B 17 32 05 89 31 33 37 30 00 C7 17 3C 05 |"...2..1370...<.| 00000F90: 99 22 93 11 11 11 11 11 11 11 11 22 3B 3A 97 32 |.".........";:.2| 00000FA0: 31 31 2C 31 36 AB C3 28 43 4E 24 28 43 4E 25 29 |11,16..(CN$(CN%)| 00000FB0: 29 AD 32 3A 99 22 41 20 4E 45 57 20 22 43 4E 24 |).2:."A NEW "CN$| 00000FC0: 28 43 4E 25 29 3A 99 00 EA 17 46 05 99 A6 31 31 |(CN%):....F...11| 00000FD0: 29 22 43 4F 55 52 53 45 20 52 45 43 4F 52 44 22 |)"COURSE RECORD"| 00000FE0: 43 52 25 28 43 4E 25 29 3A 99 00 0D 18 50 05 99 |CR%(CN%):....P..| 00000FF0: A6 37 29 22 48 41 53 20 42 45 45 4E 20 45 53 54 |.7)"HAS BEEN EST| 00001000: 41 42 4C 49 53 48 45 44 20 42 59 3A 22 00 45 18 |ABLISHED BY:".E.| 00001010: 5A 05 99 3A 46 25 B2 30 3A 81 49 B2 31 A4 50 31 |Z..:F%.0:.I.1.P1| 00001020: 25 3A 8B 53 25 28 49 29 B2 43 52 25 28 43 4E 25 |%:.S%(I).CR%(CN%| 00001030: 29 A7 99 A6 31 38 29 50 4C 24 28 49 29 3A 46 25 |)...18)PL$(I):F%| 00001040: B2 46 25 AA 31 00 5A 18 64 05 82 3A 91 46 31 25 |.F%.1.Z.d..:.F1%| 00001050: 89 31 33 39 30 2C 31 34 30 30 00 7F 18 6E 05 8B |.1390,1400...n..| 00001060: 46 25 B1 31 A7 52 48 24 28 43 4E 25 29 B2 C8 28 |F%.1.RH$(CN%)..(| 00001070: 52 48 24 28 43 4E 25 29 2C 33 29 AA 22 2A 22 00 |RH$(CN%),3)."*".| 00001080: BD 18 78 05 97 32 30 39 2C 31 39 32 3A 97 32 31 |..x..209,192:.21| 00001090: 30 2C 37 3A 97 32 31 31 2C 34 3A 99 22 50 52 45 |0,7:.211,4:."PRE| 000010A0: 53 53 20 3C 52 45 54 55 52 4E 3E 20 54 4F 20 45 |SS <RETURN> TO E| 000010B0: 58 49 54 20 50 52 4F 47 52 41 4D 22 3B 00 E4 18 |XIT PROGRAM";...| 000010C0: 82 05 81 49 B2 31 A4 35 30 30 3A 82 3A 97 32 30 |...I.1.500:.:.20| 000010D0: 39 2C 31 34 34 3A 97 32 31 30 2C 35 3A 97 32 31 |9,144:.210,5:.21| 000010E0: 31 2C 31 31 00 02 19 8C 05 99 22 43 4F 55 52 53 |1,11......"COURS| 000010F0: 45 20 52 45 43 4F 52 44 22 43 52 25 28 43 4E 25 |E RECORD"CR%(CN%| 00001100: 29 3B 00 26 19 96 05 81 49 B2 31 A4 34 30 3A 8B |);.&....I.1.40:.| 00001110: C2 28 36 33 31 29 B2 31 33 A7 97 31 39 38 2C 30 |.(631).13..198,0| 00001120: 3A 89 31 32 30 30 00 64 19 A0 05 97 31 39 38 2C |:.1200.d....198,| 00001130: 30 3A 82 3A 97 32 31 31 2C 31 31 3A 99 22 20 20 |0:.:.211,11:." | 00001140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001150: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 3A 89 | ";:.| 00001160: 31 34 31 30 00 98 19 AA 05 99 22 93 12 20 20 20 |1410......".. | 00001170: 20 4E 55 4D 2E 20 47 52 45 45 4E 53 20 20 20 41 | NUM. GREENS A| 00001180: 56 47 20 20 20 2D 53 43 4F 52 45 20 53 55 4D 4D |VG -SCORE SUMM| 00001190: 41 52 59 2D 20 92 22 3B 00 CB 19 B4 05 99 22 12 |ARY- .";......".| 000011A0: 50 4C 20 20 52 4E 44 53 20 49 4E 20 52 45 47 20 |PL RNDS IN REG | 000011B0: 20 50 55 54 54 53 20 20 41 56 45 52 41 47 45 20 | PUTTS AVERAGE | 000011C0: 20 48 49 20 20 4C 4F 20 92 22 3B 00 03 1A BE 05 | HI LO .";.....| 000011D0: 97 32 30 39 2C 31 39 32 3A 97 32 31 30 2C 37 3A |.209,192:.210,7:| 000011E0: 97 32 31 31 2C 38 3A 99 22 50 52 45 53 53 20 3C |.211,8:."PRESS <| 000011F0: 2A 3E 20 54 4F 20 45 4E 44 20 4C 49 53 54 49 4E |*> TO END LISTIN| 00001200: 47 22 3B 00 26 1A C8 05 97 32 30 39 2C 38 30 3A |G";.&....209,80:| 00001210: 97 32 31 30 2C 34 3A 97 32 31 31 2C 30 3A 97 32 |.210,4:.211,0:.2| 00001220: 31 34 2C 32 3A 8E 00 5D 1A D2 05 99 22 93 11 11 |14,2:..]...."...| 00001230: 11 11 11 11 11 54 48 45 20 53 54 41 54 49 53 54 |.....THE STATIST| 00001240: 49 43 41 4C 20 55 50 44 41 54 45 20 50 52 4F 47 |ICAL UPDATE PROG| 00001250: 52 41 4D 20 43 41 4E 20 4F 4E 4C 59 22 00 8D 1A |RAM CAN ONLY"...| 00001260: DC 05 99 22 42 45 20 52 55 4E 20 41 54 20 54 48 |..."BE RUN AT TH| 00001270: 45 20 43 4F 4D 50 4C 45 54 49 4F 4E 20 4F 46 20 |E COMPLETION OF | 00001280: 41 20 52 4F 55 4E 44 2E 22 3A A2 3A 80 00 A1 1A |A ROUND.":.:....| 00001290: 30 75 8F 20 45 52 52 4F 52 20 43 48 41 4E 4E 45 |0u. ERROR CHANNE| 000012A0: 4C 00 AF 1A 3A 75 9F 20 31 35 2C 38 2C 31 35 00 |L...:u. 15,8,15.| 000012B0: C7 1A 44 75 84 31 35 2C 45 31 24 2C 45 32 24 2C |..Du.15,E1$,E2$,| 000012C0: 45 33 24 2C 45 34 24 00 CF 1A 4E 75 A0 31 35 00 |E3$,E4$...Nu.15.| 000012D0: D5 1A 58 75 8E 00 00 00 10 FE |..Xu...... |
....... STAT.UPDATE.1.D..53281,12:.53280
,15:."..".Z.N..S%(4),G%(4),P%(4),PL$(4),
C$(3),IG%(4),CN$(20),CS(20),CR(20),CR%(2
0)...X.. RH$(20),ST(80,5).D...."..
STATISTIC UPDATE ."....
.."...... INSERT YOUR":....
..." .PROFESSIONAL TOUR GOLF PLAYER DI
SK.":..T. .." AND PRESS <RETURN
> . .":.198,0:.631,0.Z....I.1.40:.:.B(63
1)..13..198,0:.170...... 1,8,15,"I0"....
. 1...... 2,8,2,"0:PLAYER,S,R"..... 2.O.
H..30000:.E1$.."00".130...R.. B(43).256.
B(44)..16385.1490.%...P1%.B(4096):CN%.B(
4097):CB%.B(4098):NC%.B(4099).H....I.1.4
:PL$(I)."":.I.4.C$(I)."".N.........I.1.
P1%:I1.4115.5.(I.1):IG%(I).B(I1):.J.1.3.
...PL$(I).PL$(I).G(B(I1.J)):.:.......I.
1.P1%:S%(I).B(4099.I):G%(I).B(4104.I):P%
(I).B(4109.I):.......I.1.NC%:I1.4135.30.
(I.1):L.B(I1):.J.1.L.+.".C$(I).C$(I).G(B
(I1.J)):.:..K.,.. ** UPDATE PLAYER FILES
**.H.6.. 2,8,2,"0:PL.STATS,S,R"...@..I.
1.80:.J.0.5:.2,ST(I,J):.:....J. 2...T..I
.1.P1%...^.ST(IG%(I),0).ST(IG%(I),0).1..
.H.ST(IG%(I),1).ST(IG%(I),1).S%(I)...R.S
T(IG%(I),2).ST(IG%(I),2).P%(I).*.|.ST(IG
%(I),3).ST(IG%(I),3).G%(I).U....S%(I).ST
(IG%(I),4).ST(IG%(I),4).S%(I)......S%(I)
.ST(IG%(I),5).ST(IG%(I),5).S%(I)........
.... 2,8,2,"@0:PL.STATS,S,W".F....I.1.80
:.J.0.5:.2,ST(I,J):.:..M... 2...B.. ** U
PDATE COURSE STAT FILE **...L.. 2,8,2,"0
:C.STATS,S,R"...V..I.1.20.'....2,CN$(I).
4....2,CS(I).A....2,CR(I).O....2,CR%(I).
]....2,RH$(I).C.....J... 2...&.CR(CN%).C
R(CN%).P1%:.I.1.P1%:CS(CN%).CS(CN%).S%(I
):....0.F1%.0:.I.1.P1%:.S%(I).CR%(CN%).C
R%(CN%).S%(I):RH$(CN%).PL$(I):F1%.1...:.
.:. F1%.600.$.D.F1%.0:.I.1.P1%:.S%(I).CR
%(CN%).F1%.2.*.N...W.X..** SEE IF COURSE
S FROM DISK ** ** BEING PLAYED
ARE INCLUDED **...B..** IN PRESENT DISK
STATISTICS**...L..CN$(CN%).."*".640.S.V.
.I.1.NC%:CN$(CB%.I).C$(I):.......1450...
..F%.0:.I.1.80:.ST(I,0).0.890.....F%.F%.
1:.F%.21.730.&....198,0:.631,0.L....209,
192:.210,7:.211,1:." PRESS <RETURN>
TO CONTINUE ";......J.1.750:.:.211
,1:."
";.S....J.1.40:.B(631)..13..198,0:.:.
680...F.J.40:.:....P..198,0:.631,0:F%.1:
.1450.F.Z.RP%.ST(I,0):TS.ST(I,1):TP.ST(I
,2):GP.ST(I,3):HR%.ST(I,4):LR%.ST(I,5).A
...P$." ".D(I):.I(P$,2);.....P$." ".D
(RP%):.211,4:.I(P$,4);......211,9:P.GP.R
P%..005:P$.D(P):P$.I(P$,C(P$).1).O....P.
.(P).P$.P$.".0"......P.1.P$."0".P$......
P.10.P$." ".P$... .P$.P$."0":.H(P$,5);.A
.*..211,17:P.TP.RP%..005:P$.D(P):P$.I(P$
,C(P$).1).X.4..P..(P).P$.P$.".0".P.>.P$.
P$."0":.H(P$,5);...H..211,25:P.TS.RP%..0
05:P$.D(P):P$.I(P$,C(P$).1)...R..P..(P).
P$.P$.".0".R.\.P$.P$."0":.H(P$,5);...F..
211,32:P$." ".D(HR%):.I(P$,3);...P..211
,36:P$." ".D(LR%):.I(P$,3).@.Z..J.1.50:
.:.B(631).42..198,0:I.80.M....198,0:.._.
...198,0:.631,0......209,192:.210,7:.211
,1:." PRESS <RETURN> FOR COURSE STATISTI
CS";......I.1.750:.:.211,1:."
";......I.1.4
0:.B(631)..13..198,0:.:.920.....I.40:..4
.... ** COURSE STATISTICS **.U.J.. B(43)
.256.B(44).16385.1020.Q.T.. 2,8,2,"0:C.S
TATS,S,R".}....I.1.20......2,CN$(I),CS(I
),CR(I),CR%(I),RH$(I)......: 2......:.".
. NUM. AVG COURSE RECOR
D.";......".COURSE NAME RNDS SCORE R
ECORD HOLDER.";.I...ZZ%.0:.I.1.20:ZZ%.ZZ
%.(CR(I).0):.CR(I).0.1120.]....211,0:.CN
$(I);...$..211,15:P$." ".D(CR(I)):.I(
P$,4);......211,21:P.CS(I).CR(I):P$.D(P)
:P$.I(P$,C(P$).1).Q.8..P..(P).P$.P$.".00
"...B.P$.P$."0000":.H(P$,5);...L..211,28
:.CR%(I);...V..211,35:.RH$(I).'.`..:.ZZ%
.0.1150.Q.J..209,144:.210,5:.211,14:."NO
COURSES"...T..209,184:.210,5:.211,11:."
HAVE BEEN PLAYED"...~..198,0:.631,0.Q...
.209,192:.210,7:.211,4:."PRESS <RETURN>
TO EXIT PROGRAM";......I.1.750:.:.211,4:
." ";.2...
.I.1.40:.B(631)..13..198,0:.:.1160._...I
.40:.:.".":.198,0:.631,0:.F1%.1340,1300.
|.... 2,8,2,"@0:C.STATS,S,W"......I.1.20
...D..2,CN$(I)...N..2,CS(I)...X..2,CR(I)
......2,CR%(I).L....2,RH$(I).R.....Y...
2......".*":.:..!....".........";:.211,1
7.C(CN$(CN%)).2:."THE "CN$(CN%):..D.....
11)"COURSE RECORD"CR%(CN%):....(...13)"W
AS TIED BY:":.C(RH$(CN%)).3.RH$(CN%).RH$
(CN%)."*"...2..1370.G.<..".........";:.2
11,16.C(CN$(CN%)).2:."A NEW "CN$(CN%):..
..F...11)"COURSE RECORD"CR%(CN%):....P..
.7)"HAS BEEN ESTABLISHED BY:".E.Z..:F%.0
:.I.1.P1%:.S%(I).CR%(CN%)...18)PL$(I):F%
.F%.1.Z.D..:.F1%.1390,1400..N..F%.1.RH$
(CN%).H(RH$(CN%),3)."*"...X..209,192:.21
0,7:.211,4:."PRESS <RETURN> TO EXIT PROG
RAM";......I.1.500:.:.209,144:.210,5:.21
1,11......"COURSE RECORD"CR%(CN%);.&....
I.1.40:.B(631).13..198,0:.1200.D. ..198,
0:.:.211,11:."
";:.1410......".. NUM. GREENS A
VG -SCORE SUMMARY- .";.K....".PL RNDS
IN REG PUTTS AVERAGE HI LO .";.....
.209,192:.210,7:.211,8:."PRESS <*> TO EN
D LISTING";.&.H..209,80:.210,4:.211,0:.2
14,2:..].R.."........THE STATISTICAL UPD
ATE PROGRAM CAN ONLY"......"BE RUN AT TH
E COMPLETION OF A ROUND.":.:....0U. ERRO
R CHANNEL...:U. 15,8,15.G.DU.15,E1$,E2$,
E3$,E4$.O.NU 15.U.XU......
> CLICK IMAGE PREVIEW FOR FULL MODAL