3600 ON
FILE INFORMATION
FILENAME(S): 3600 ON
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-11-30 21:29:19
APPEARS ON: 1 disk(s)
FILE HASH
92ca3762fea6b8fd0657ae659103cd9ae4a4f4c05dff39ed250e516c553d256c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PRIME | 3600 ON | PRG | DuncanTwain | 17 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 10 0E 8B C5 28 43 24 29 B1 43 31 A7 |........(C$).C1.|
00000010: 43 31 24 B2 22 33 22 3A 89 33 36 33 30 00 39 08 |C1$."3":.3630.9.|
00000020: 1A 0E 8B C5 28 43 24 29 B3 43 32 A7 43 31 24 B2 |....(C$).C2.C1$.|
00000030: 22 31 22 3A 89 33 36 33 30 00 45 08 24 0E 43 31 |"1":.3630.E.$.C1|
00000040: 24 B2 22 32 22 00 4B 08 2E 0E 8E 00 6F 08 D8 0E |$."2".K.....o...|
00000050: 99 22 93 12 49 4E 50 55 54 20 4E 41 4D 45 53 20 |."..INPUT NAMES |
00000060: 4F 46 20 52 55 4E 4E 45 52 53 92 3A 2D 11 22 00 |OF RUNNERS.:-.".|
00000070: 7B 08 DC 0E 81 48 B2 31 A4 48 4E 00 96 08 E0 0E |{....H.1.HN.....|
00000080: 99 22 48 4F 52 53 45 20 22 3B 48 3B A3 31 32 29 |."HORSE ";H;.12)|
00000090: 3B 3A 85 48 43 24 00 D4 08 E2 0E 8B C3 28 48 43 |;:.HC$.......(HC|
000000A0: 24 29 B1 31 38 A7 99 22 91 22 3B A3 31 32 29 3B |$).18..".";.12);|
000000B0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 91 22 3A 89 | .":.|
000000D0: 33 38 30 38 00 E8 08 E4 0E 48 24 28 48 2C 31 29 |3808.....H$(H,1)|
000000E0: B2 48 43 24 3A 82 3A 8E 00 12 09 EC 0E 81 41 B2 |.HC$:.:.......A.|
000000F0: 31 A4 34 30 3A 48 24 28 41 2C 31 33 29 B2 22 20 |1.40:H$(A,13)." |
00000100: 22 3A 48 24 28 41 2C 31 34 29 B2 22 20 22 3A 82 |":H$(A,14)." ":.|
00000110: 3A 8E 00 35 09 A0 0F 81 53 46 B2 31 A4 48 4E 3A |:..5....SF.1.HN:|
00000120: 53 46 25 28 53 46 29 B2 C5 28 48 24 28 53 46 2C |SF%(SF)..(H$(SF,|
00000130: 37 29 29 3A 82 00 5D 09 AA 0F 81 53 46 B2 31 A4 |7)):..]....SF.1.|
00000140: 48 4E AB 31 3A 8B 53 46 25 28 53 46 29 B1 B2 53 |HN.1:.SF%(SF)..S|
00000150: 46 25 28 53 46 AA 31 29 A7 34 30 36 30 00 67 09 |F%(SF.1).4060.g.|
00000160: B4 0F 53 53 B2 53 46 00 A0 09 BE 0F 58 25 B2 53 |..SS.SF.....X%.S|
00000170: 46 25 28 53 46 AA 31 29 3A 53 46 25 28 53 46 AA |F%(SF.1):SF%(SF.|
00000180: 31 29 B2 53 46 25 28 53 46 29 3A 53 46 25 28 53 |1).SF%(SF):SF%(S|
00000190: 46 29 B2 58 25 3A 8B 53 46 B2 31 A7 34 30 35 30 |F).X%:.SF.1.4050|
000001A0: 00 C4 09 C8 0F 53 46 B2 53 46 AB 31 3A 8B 53 46 |.....SF.SF.1:.SF|
000001B0: 25 28 53 46 29 B3 53 46 25 28 53 46 AA 31 29 A7 |%(SF).SF%(SF.1).|
000001C0: 34 30 33 30 00 CE 09 D2 0F 53 46 B2 53 53 00 D6 |4030.....SF.SS..|
000001D0: 09 DC 0F 82 3A 8E 00 E0 09 68 10 8D 38 31 31 30 |....:....h..8110|
000001E0: 00 07 0A 72 10 8D 37 38 3A 99 22 1D 1D 1D 1D 1D |...r..78:.".....|
000001F0: 1D 1D 1D 1D 31 2E 20 44 49 53 50 4C 41 59 20 52 |....1. DISPLAY R|
00000200: 55 4E 4E 45 52 53 22 00 35 0A 7C 10 99 22 1D 1D |UNNERS".5.|.."..|
00000210: 1D 1D 1D 1D 1D 1D 1D 32 2E 20 44 49 53 50 4C 41 |.......2. DISPLA|
00000220: 59 20 52 41 43 45 20 41 4E 44 20 46 4F 52 4D 20 |Y RACE AND FORM |
00000230: 44 41 54 41 22 00 6D 0A 86 10 99 22 1D 1D 1D 1D |DATA".m...."....|
00000240: 1D 1D 1D 1D 1D 33 2E 20 52 55 4E 20 46 4F 52 45 |.....3. RUN FORE|
00000250: 43 41 53 54 22 3A 99 22 1D 1D 1D 1D 1D 1D 1D 1D |CAST":."........|
00000260: 1D 34 2E 20 53 41 56 45 20 44 41 54 41 00 94 0A |.4. SAVE DATA...|
00000270: 90 10 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 35 2E 20 |...".........5. |
00000280: 52 45 54 55 52 4E 20 54 4F 20 4D 41 49 4E 20 4D |RETURN TO MAIN M|
00000290: 45 4E 55 22 00 CF 0A 9A 10 8D 38 34 3A 85 22 1D |ENU"......84:.".|
000002A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 57 48 49 43 48 |...........WHICH|
000002B0: 20 4F 50 54 49 4F 4E 92 20 22 3B 59 24 3A 59 B2 | OPTION. ";Y$:Y.|
000002C0: C5 28 59 24 29 3A 8B 59 B3 30 A7 34 32 37 30 00 |.(Y$):.Y.0.4270.|
000002D0: EA 0A A4 10 91 59 89 38 32 30 2C 38 30 30 2C 39 |.....Y.820,800,9|
000002E0: 30 30 2C 35 30 30 30 2C 31 30 00 F8 0A AE 10 8D |00,5000,10......|
000002F0: 36 34 3A 89 34 32 35 30 00 1D 0B 30 11 99 22 12 |64:.4250...0..".|
00000300: 50 52 45 53 53 20 53 50 41 43 45 20 54 4F 20 43 |PRESS SPACE TO C|
00000310: 4F 4E 54 49 4E 55 45 2E 2E 2E 92 22 3B 00 31 0B |ONTINUE....";.1.|
00000320: 32 11 A1 50 52 24 3A 8B 50 52 24 B2 22 20 22 A7 |2..PR$:.PR$." ".|
00000330: 8E 00 3B 0B 34 11 89 34 34 30 32 00 4D 0B 94 11 |..;.4..4402.M...|
00000340: 8B 48 43 24 B2 22 30 22 A7 34 35 31 30 00 63 0B |.HC$."0".4510.c.|
00000350: 99 11 8B C5 28 48 43 24 29 B2 30 A7 48 43 24 B2 |....(HC$).0.HC$.|
00000360: 22 20 22 00 69 0B 9E 11 8E 00 86 0B F8 11 8B C8 |" ".i...........|
00000370: 28 C9 28 48 43 24 2C 32 29 2C 31 29 B3 B1 22 2E |(.(HC$,2),1)..".|
00000380: 22 A7 34 36 32 30 00 AB 0B 02 12 48 43 24 B2 C8 |".4620.....HC$..|
00000390: 28 48 43 24 2C C3 28 48 43 24 29 AB 31 29 AA 22 |(HC$,.(HC$).1)."|
000003A0: 30 22 AA C9 28 48 43 24 2C 31 29 00 C8 0B 0C 12 |0"..(HC$,1).....|
000003B0: 8B C3 28 48 43 24 29 B3 B2 32 A7 48 43 24 B2 48 |..(HC$)..2.HC$.H|
000003C0: 43 24 AA 22 2E 30 30 22 00 CE 0B 16 12 8E 00 DB |C$.".00"........|
000003D0: 0B 88 13 8D 37 38 3A 8D 31 30 30 00 19 0C 8A 13 |....78:.100.....|
000003E0: 8D 37 38 3A 99 22 1D 1D 1D 1D 1D 1D 1D 1D 49 4E |.78:."........IN|
000003F0: 53 45 52 54 20 52 45 57 4F 55 4E 44 20 43 41 53 |SERT REWOUND CAS|
00000400: 53 45 54 54 45 22 3A 99 22 1D 1D 1D 1D 1D 1D 1D |SETTE":.".......|
00000410: 1D 22 3B 3A 8D 34 34 30 30 00 30 0C 8E 13 9F 31 |.";:.4400.0....1|
00000420: 2C 31 2C 32 2C 22 52 41 43 45 20 46 49 4C 45 22 |,1,2,"RACE FILE"|
00000430: 00 50 0C 90 13 58 24 B2 22 53 41 56 49 4E 47 20 |.P...X$."SAVING |
00000440: 52 41 43 45 20 44 41 54 41 22 3A 8D 36 36 30 30 |RACE DATA":.6600|
00000450: 00 66 0C 9C 13 81 52 B2 31 A4 36 3A 98 31 2C 52 |.f....R.1.6:.1,R|
00000460: 24 28 52 29 3A 82 00 71 0C A1 13 98 31 2C 48 4E |$(R):..q....1,HN|
00000470: 24 00 99 0C A6 13 81 48 44 B2 31 A4 48 4E 3A 81 |$......HD.1.HN:.|
00000480: 48 B2 31 A4 31 35 3A 98 31 2C 48 24 28 48 44 2C |H.1.15:.1,H$(HD,|
00000490: 48 29 3A 82 3A 82 3A A0 31 00 C0 0C AB 13 58 24 |H):.:.:.1.....X$|
000004A0: B2 22 52 41 43 45 20 44 41 54 41 20 57 52 49 54 |."RACE DATA WRIT|
000004B0: 54 45 4E 22 3A 8D 36 36 30 30 3A 89 34 32 30 30 |TEN":.6600:.4200|
000004C0: 00 F4 0C EC 13 8D 37 38 3A 8D 31 30 30 3A 8D 37 |......78:.100:.7|
000004D0: 38 3A 99 22 1D 1D 1D 1D 1D 1D 1D 1D 49 4E 53 45 |8:."........INSE|
000004E0: 52 54 20 43 4F 52 52 45 43 54 20 43 41 53 53 45 |RT CORRECT CASSE|
000004F0: 54 54 45 22 00 0B 0D EE 13 99 22 1D 1D 1D 1D 1D |TTE"......".....|
00000500: 1D 1D 1D 22 3B 3A 8D 34 34 30 30 00 22 0D F1 13 |...";:.4400."...|
00000510: 9F 31 2C 31 2C 30 2C 22 52 41 43 45 20 46 49 4C |.1,1,0,"RACE FIL|
00000520: 45 22 00 43 0D FB 13 81 52 B2 31 A4 36 3A 84 31 |E".C....R.1.6:.1|
00000530: 2C 52 24 28 52 29 3A 82 3A 99 22 93 22 3A 8D 35 |,R$(R):.:.".":.5|
00000540: 32 35 30 00 74 0D 05 14 8D 38 34 3A 85 22 12 49 |250.t....84:.".I|
00000550: 53 20 54 48 49 53 20 54 48 45 20 52 41 43 45 20 |S THIS THE RACE |
00000560: 52 45 51 55 49 52 45 44 92 20 28 59 2D 4E 29 20 |REQUIRED. (Y-N) |
00000570: 22 3B 59 24 00 95 0D 0A 14 8B 59 24 B2 22 4E 22 |";Y$......Y$."N"|
00000580: A7 A0 31 3A 8D 38 31 31 30 3A 8D 38 31 39 30 3A |..1:.8110:.8190:|
00000590: 89 35 31 30 30 00 AC 0D 0F 14 8B 59 24 B3 B1 22 |.5100......Y$.."|
000005A0: 59 22 A7 8D 36 34 3A 89 35 31 32 35 00 EB 0D 1E |Y"..64:.5125....|
000005B0: 14 8D 36 34 3A 58 24 B2 22 9D 9D 9D 9D 9D 9D 9D |..64:X$.".......|
000005C0: 9D 9D 4C 4F 41 44 49 4E 47 20 52 41 43 45 20 46 |..LOADING RACE F|
000005D0: 49 4C 45 22 3A 8D 36 36 30 30 3A 84 31 2C 48 4E |ILE":.6600:.1,HN|
000005E0: 24 3A 48 4E B2 C5 28 48 4E 24 29 00 13 0E 20 14 |$:HN..(HN$)... .|
000005F0: 81 48 44 B2 31 A4 48 4E 3A 81 48 B2 31 A4 31 35 |.HD.1.HN:.H.1.15|
00000600: 3A 84 31 2C 48 24 28 48 44 2C 48 29 3A 82 3A 82 |:.1,H$(HD,H):.:.|
00000610: 3A A0 31 00 1D 0E 23 14 89 34 32 30 30 00 47 0E |:.1...#..4200.G.|
00000620: 82 14 99 22 11 31 2E 20 52 41 43 45 43 4F 55 52 |...".1. RACECOUR|
00000630: 53 45 20 20 20 20 20 20 20 20 20 20 20 20 3A 20 |SE : |
00000640: 22 3B 52 24 28 31 29 00 71 0E 96 14 99 22 11 32 |";R$(1).q....".2|
00000650: 2E 20 44 41 54 45 20 4F 46 20 52 41 43 45 20 20 |. DATE OF RACE |
00000660: 20 20 20 20 20 20 20 20 3A 20 22 3B 52 24 28 36 | : ";R$(6|
00000670: 29 00 9B 0E 9B 14 99 22 11 33 2E 20 54 49 4D 45 |)......".3. TIME|
00000680: 20 4F 46 20 52 41 43 45 20 20 20 20 20 20 20 20 | OF RACE |
00000690: 20 20 3A 20 22 3B 52 24 28 32 29 00 C5 0E 9D 14 | : ";R$(2).....|
000006A0: 99 22 11 34 2E 20 50 52 49 5A 45 20 4D 4F 4E 45 |.".4. PRIZE MONE|
000006B0: 59 20 20 20 20 20 20 20 20 20 20 20 3A 20 22 3B |Y : ";|
000006C0: 52 24 28 33 29 00 F1 0E A0 14 99 22 11 35 2E 20 |R$(3)......".5. |
000006D0: 52 41 43 45 20 44 49 53 54 41 4E 43 45 20 28 46 |RACE DISTANCE (F|
000006E0: 55 52 2E 29 20 20 3A 20 22 3B 52 24 28 34 29 3A |UR.) : ";R$(4):|
000006F0: 8E 00 21 0F B4 14 8D 38 38 3A 85 22 12 41 4E 59 |..!....88:.".ANY|
00000700: 20 43 4F 52 52 45 43 54 49 4F 4E 53 20 28 59 2D | CORRECTIONS (Y-|
00000710: 4E 29 92 22 3B 59 24 3A 8B 59 24 B2 22 4E 22 A7 |N).";Y$:.Y$."N".|
00000720: 8E 00 38 0F C8 14 8B 59 24 B3 B1 22 59 22 A7 8D |..8....Y$.."Y"..|
00000730: 36 38 3A 89 35 33 30 30 00 71 0F D2 14 8D 36 38 |68:.5300.q....68|
00000740: 3A 8D 38 38 3A 85 22 12 57 48 49 43 48 20 4C 49 |:.88:.".WHICH LI|
00000750: 4E 45 20 4E 4F 2E 92 22 3B 59 31 24 3A 59 31 B2 |NE NO..";Y1$:Y1.|
00000760: C5 28 59 31 24 29 3A 8B 59 31 B3 30 89 35 33 33 |.(Y1$):.Y1.0.533|
00000770: 36 00 92 0F D6 14 91 59 31 8D 35 33 34 35 2C 35 |6......Y1.5345,5|
00000780: 33 35 30 2C 35 33 36 30 2C 35 33 36 35 2C 35 33 |350,5360,5365,53|
00000790: 37 30 00 A6 0F D8 14 8B 59 31 B1 35 A7 8D 36 38 |70......Y1.5..68|
000007A0: 3A 89 35 33 33 30 00 B0 0F DC 14 89 35 33 30 30 |:.5330......5300|
000007B0: 00 CC 0F E1 14 99 22 13 11 11 11 11 22 3B A3 32 |......".....";.2|
000007C0: 33 29 3B 3A 85 52 24 28 31 29 3A 8E 00 EA 0F E6 |3);:.R$(1):.....|
000007D0: 14 99 22 13 11 11 11 11 11 11 22 3B A3 32 33 29 |..".......";.23)|
000007E0: 3B 3A 85 52 24 28 36 29 3A 8E 00 0A 10 F0 14 99 |;:.R$(6):.......|
000007F0: 22 13 11 11 11 11 11 11 11 11 22 3B A3 32 33 29 |".........";.23)|
00000800: 3B 3A 85 52 24 28 32 29 3A 8E 00 45 10 F5 14 99 |;:.R$(2):..E....|
00000810: 22 13 11 11 11 11 11 11 11 11 11 11 22 3B A3 32 |"...........";.2|
00000820: 33 29 3B 3A 85 52 24 28 33 29 3A 43 24 B2 52 24 |3);:.R$(3):C$.R$|
00000830: 28 33 29 3A 8D 33 36 30 30 3A 52 24 28 35 29 B2 |(3):.3600:R$(5).|
00000840: 43 31 24 3A 8E 00 69 10 FA 14 99 22 13 11 11 11 |C1$:..i...."....|
00000850: 11 11 11 11 11 11 11 11 11 22 3B A3 32 33 29 3B |.........";.23);|
00000860: 3A 85 52 24 28 34 29 3A 8E 00 9B 10 22 15 99 22 |:.R$(4):....".."|
00000870: 11 20 31 2E 20 4E 41 4D 45 20 4F 46 20 48 4F 52 |. 1. NAME OF HOR|
00000880: 53 45 20 20 20 20 20 20 3A 20 22 3B 22 12 22 3B |SE : ";".";|
00000890: 48 24 28 48 2C 31 29 3B 22 92 22 00 C1 10 2C 15 |H$(H,1);"."...,.|
000008A0: 99 22 11 4C 41 53 54 20 34 20 52 45 53 55 4C 54 |.".LAST 4 RESULT|
000008B0: 53 20 28 30 20 4E 4F 54 20 50 4C 41 43 45 44 29 |S (0 NOT PLACED)|
000008C0: 22 00 F0 10 36 15 99 22 20 32 2E 20 4C 41 53 54 |"...6.." 2. LAST|
000008D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008E0: 20 20 20 20 20 3A 20 22 3B 48 24 28 48 2C 32 29 | : ";H$(H,2)|
000008F0: 00 1F 11 40 15 99 22 20 33 2E 20 4C 41 53 54 20 |...@.." 3. LAST |
00000900: 42 55 54 20 4F 4E 45 20 20 20 20 20 20 20 20 20 |BUT ONE |
00000910: 20 20 20 20 3A 20 22 3B 48 24 28 48 2C 33 29 00 | : ";H$(H,3).|
00000920: 4E 11 4A 15 99 22 20 34 2E 20 4C 41 53 54 20 42 |N.J.." 4. LAST B|
00000930: 55 54 20 54 57 4F 20 20 20 20 20 20 20 20 20 20 |UT TWO |
00000940: 20 20 20 3A 20 22 3B 48 24 28 48 2C 34 29 00 7D | : ";H$(H,4).}|
00000950: 11 54 15 99 22 20 35 2E 20 4C 41 53 54 20 42 55 |.T.." 5. LAST BU|
00000960: 54 20 54 48 52 45 45 20 20 20 20 20 20 20 20 20 |T THREE |
00000970: 20 20 3A 20 22 3B 48 24 28 48 2C 35 29 00 AD 11 | : ";H$(H,5)...|
00000980: 5E 15 99 22 11 20 36 2E 20 57 45 49 47 48 54 20 |^..". 6. WEIGHT |
00000990: 41 44 4A 2E 52 41 54 45 2E 20 20 20 20 20 20 20 |ADJ.RATE. |
000009A0: 20 20 3A 20 22 3B 48 24 28 48 2C 36 29 00 DC 11 | : ";H$(H,6)...|
000009B0: 68 15 99 22 20 37 2E 20 53 50 45 45 44 20 46 49 |h.." 7. SPEED FI|
000009C0: 47 55 52 45 53 20 20 20 20 20 20 20 20 20 20 20 |GURES |
000009D0: 20 3A 20 22 3B 48 24 28 48 2C 37 29 00 0B 12 72 | : ";H$(H,7)...r|
000009E0: 15 99 22 20 38 2E 20 47 52 4F 55 50 20 4C 41 53 |.." 8. GROUP LAS|
000009F0: 54 20 52 41 43 45 20 20 20 20 20 20 20 20 20 20 |T RACE |
00000A00: 3A 20 22 3B 48 24 28 48 2C 38 29 00 33 12 7A 15 |: ";H$(H,8).3.z.|
00000A10: 99 22 11 44 49 53 54 41 4E 43 45 53 20 49 4E 20 |.".DISTANCES IN |
00000A20: 46 55 52 4C 4F 4E 47 53 3A 2D 20 20 20 20 20 20 |FURLONGS:- |
00000A30: 3A 20 22 00 62 12 7C 15 99 22 20 39 2E 20 4C 41 |: ".b.|.." 9. LA|
00000A40: 53 54 20 52 41 43 45 20 20 20 20 20 20 20 20 20 |ST RACE |
00000A50: 20 20 20 20 20 20 20 3A 20 22 3B 48 24 28 48 2C | : ";H$(H,|
00000A60: 39 29 00 92 12 86 15 99 22 31 30 2E 20 4C 41 53 |9)......"10. LAS|
00000A70: 54 20 42 55 54 20 4F 4E 45 20 20 20 20 20 20 20 |T BUT ONE |
00000A80: 20 20 20 20 20 20 3A 20 22 3B 48 24 28 48 2C 31 | : ";H$(H,1|
00000A90: 30 29 00 C3 12 90 15 99 22 11 31 31 2E 20 57 45 |0)......".11. WE|
00000AA0: 49 47 48 54 20 54 48 49 53 20 52 41 43 45 20 20 |IGHT THIS RACE |
00000AB0: 20 20 20 20 20 20 20 3A 20 22 3B 48 24 28 48 2C | : ";H$(H,|
00000AC0: 31 32 29 00 F3 12 9A 15 99 22 31 32 2E 20 57 45 |12)......"12. WE|
00000AD0: 49 47 48 54 20 4C 41 53 54 20 52 41 43 45 20 20 |IGHT LAST RACE |
00000AE0: 20 20 20 20 20 20 20 3A 20 22 3B 48 24 28 48 2C | : ";H$(H,|
00000AF0: 31 31 29 00 25 13 A4 15 99 22 31 33 2E 20 54 4F |11).%...."13. TO|
00000B00: 50 20 33 20 4F 46 20 4F 46 20 42 45 54 54 49 4E |P 3 OF OF BETTIN|
00000B10: 47 20 28 59 2D 4E 29 3A 20 22 3B 48 24 28 48 2C |G (Y-N): ";H$(H,|
00000B20: 31 35 29 3A 8E 00 55 13 A9 15 8D 39 31 3A 85 22 |15):..U....91:."|
00000B30: 12 41 4E 59 20 43 4F 52 52 45 43 54 49 4F 4E 53 |.ANY CORRECTIONS|
00000B40: 20 28 59 2D 4E 29 92 22 3B 59 24 3A 8B 59 24 B2 | (Y-N).";Y$:.Y$.|
00000B50: 22 4E 22 A7 8E 00 6C 13 B3 15 8B 59 24 B3 B1 22 |"N"...l....Y$.."|
00000B60: 59 22 A7 8D 37 31 3A 89 35 35 34 35 00 A5 13 B8 |Y"..71:.5545....|
00000B70: 15 8D 37 31 3A 8D 39 31 3A 85 22 12 57 48 49 43 |..71:.91:.".WHIC|
00000B80: 48 20 4C 49 4E 45 20 4E 4F 2E 92 22 3B 59 31 24 |H LINE NO..";Y1$|
00000B90: 3A 59 31 B2 C5 28 59 31 24 29 3A 8B 59 31 B3 30 |:Y1..(Y1$):.Y1.0|
00000BA0: A7 35 35 36 33 00 EE 13 B9 15 91 59 31 8D 35 35 |.5563......Y1.55|
00000BB0: 36 35 2C 35 35 37 30 2C 35 35 37 35 2C 35 35 38 |65,5570,5575,558|
00000BC0: 30 2C 35 35 38 35 2C 35 35 39 30 2C 35 35 39 35 |0,5585,5590,5595|
00000BD0: 2C 35 36 30 30 2C 35 36 30 35 2C 35 36 31 30 2C |,5600,5605,5610,|
00000BE0: 35 36 31 35 2C 35 36 32 30 2C 35 36 32 35 00 03 |5615,5620,5625..|
00000BF0: 14 BB 15 8B 59 31 B1 31 33 A7 8D 37 31 3A 89 35 |....Y1.13..71:.5|
00000C00: 35 36 30 00 0D 14 BC 15 89 35 35 34 35 00 23 14 |560......5545.#.|
00000C10: BD 15 99 22 13 11 11 22 3B A3 31 37 29 3B 3A 85 |..."...";.17);:.|
00000C20: 48 43 24 00 49 14 BE 15 8B C3 28 48 43 24 29 B1 |HC$.I.....(HC$).|
00000C30: 31 38 A7 99 22 13 11 11 22 3B A3 31 37 29 3B 4C |18.."...";.17);L|
00000C40: 4E 24 3B 3A 89 35 35 36 35 00 5B 14 BF 15 48 24 |N$;:.5565.[...H$|
00000C50: 28 48 2C 31 29 B2 48 43 24 3A 8E 00 88 14 C2 15 |(H,1).HC$:......|
00000C60: 99 22 13 11 11 11 11 11 22 3B A3 33 31 29 3B 3A |."......";.31);:|
00000C70: 85 48 43 24 3A 8D 34 35 30 30 3A 48 24 28 48 2C |.HC$:.4500:H$(H,|
00000C80: 32 29 B2 48 43 24 3A 8E 00 B6 14 C7 15 99 22 13 |2).HC$:.......".|
00000C90: 11 11 11 11 11 11 22 3B A3 33 31 29 3B 3A 85 48 |......";.31);:.H|
00000CA0: 43 24 3A 8D 34 35 30 30 3A 48 24 28 48 2C 33 29 |C$:.4500:H$(H,3)|
00000CB0: B2 48 43 24 3A 8E 00 E5 14 CC 15 99 22 13 11 11 |.HC$:......."...|
00000CC0: 11 11 11 11 11 22 3B A3 33 31 29 3B 3A 85 48 43 |.....";.31);:.HC|
00000CD0: 24 3A 8D 34 35 30 30 3A 48 24 28 48 2C 34 29 B2 |$:.4500:H$(H,4).|
00000CE0: 48 43 24 3A 8E 00 15 15 D1 15 99 22 13 11 11 11 |HC$:......."....|
00000CF0: 11 11 11 11 11 22 3B A3 33 31 29 3B 3A 85 48 43 |.....";.31);:.HC|
00000D00: 24 3A 8D 34 35 30 30 3A 48 24 28 48 2C 35 29 B2 |$:.4500:H$(H,5).|
00000D10: 48 43 24 3A 8E 00 52 15 D6 15 99 22 13 11 11 11 |HC$:..R...."....|
00000D20: 11 11 11 11 11 11 11 22 3B A3 33 31 29 3B 3A 85 |.......";.31);:.|
00000D30: 48 24 28 48 2C 36 29 3A 8B C5 28 48 24 28 48 2C |H$(H,6):..(H$(H,|
00000D40: 36 29 29 B2 30 A7 48 24 28 48 2C 36 29 B2 22 39 |6)).0.H$(H,6)."9|
00000D50: 39 22 00 58 15 D7 15 8E 00 95 15 DB 15 99 22 13 |9".X..........".|
00000D60: 11 11 11 11 11 11 11 11 11 11 11 22 3B A3 33 31 |...........";.31|
00000D70: 29 3B 3A 85 48 24 28 48 2C 37 29 3A 8B C5 28 48 |);:.H$(H,7):..(H|
00000D80: 24 28 48 2C 37 29 29 B2 30 A7 48 24 28 48 2C 37 |$(H,7)).0.H$(H,7|
00000D90: 29 B2 22 30 22 00 9B 15 DC 15 8E 00 CA 15 E0 15 |)."0"...........|
00000DA0: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 22 |."............."|
00000DB0: 3B A3 33 31 29 3B 3A 85 43 24 3A 8B C5 28 43 24 |;.31);:.C$:..(C$|
00000DC0: 29 B2 30 A7 43 24 B2 22 30 22 00 EE 15 E1 15 8D |).0.C$."0"......|
00000DD0: 33 36 30 30 3A 48 24 28 48 2C 38 29 B2 43 24 3A |3600:H$(H,8).C$:|
00000DE0: 48 24 28 48 2C 31 34 29 B2 43 31 24 3A 8E 00 15 |H$(H,14).C1$:...|
00000DF0: 16 E5 15 99 22 13 11 11 11 11 11 11 11 11 11 11 |...."...........|
00000E00: 11 11 11 11 11 22 3B A3 33 31 29 3B 3A 85 48 24 |.....";.31);:.H$|
00000E10: 28 48 2C 39 29 00 34 16 E6 15 8B C5 28 48 24 28 |(H,9).4.....(H$(|
00000E20: 48 2C 39 29 29 B2 30 A7 48 24 28 48 2C 39 29 B2 |H,9)).0.H$(H,9).|
00000E30: 22 39 39 22 00 3A 16 E7 15 8E 00 63 16 EA 15 99 |"99".:.....c....|
00000E40: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00000E50: 11 11 22 3B A3 33 31 29 3B 3A 85 48 24 28 48 2C |..";.31);:.H$(H,|
00000E60: 31 30 29 00 84 16 EB 15 8B C5 28 48 24 28 48 2C |10).......(H$(H,|
00000E70: 31 30 29 29 B2 30 A7 48 24 28 48 2C 31 30 29 B2 |10)).0.H$(H,10).|
00000E80: 22 39 39 22 00 8A 16 EC 15 8E 00 C4 16 EF 15 99 |"99"............|
00000E90: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00000EA0: 11 11 11 11 22 3B A3 33 31 29 3B 3A 85 48 43 24 |....";.31);:.HC$|
00000EB0: 3A 8B C5 28 48 43 24 29 B2 30 A7 48 43 24 B2 22 |:..(HC$).0.HC$."|
00000EC0: 30 2E 30 22 00 DD 16 F0 15 8D 34 36 30 30 3A 48 |0.0"......4600:H|
00000ED0: 24 28 48 2C 31 32 29 B2 48 43 24 3A 8E 00 18 17 |$(H,12).HC$:....|
00000EE0: F4 15 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |..."............|
00000EF0: 11 11 11 11 11 11 11 11 22 3B A3 33 31 29 3B 3A |........";.31);:|
00000F00: 85 48 43 24 3A 8B C5 28 48 43 24 29 B2 30 A7 48 |.HC$:..(HC$).0.H|
00000F10: 43 24 B2 22 30 2E 30 22 00 31 17 F5 15 8D 34 36 |C$."0.0".1....46|
00000F20: 30 30 3A 48 24 28 48 2C 31 31 29 B2 48 43 24 3A |00:H$(H,11).HC$:|
00000F30: 8E 00 59 17 F9 15 99 22 13 11 11 11 11 11 11 11 |..Y...."........|
00000F40: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3B A3 |.............";.|
00000F50: 33 31 29 3B 3A 85 48 43 24 00 7D 17 FE 15 8B 48 |31);:.HC$.}....H|
00000F60: 43 24 B2 22 59 22 B0 48 43 24 B2 22 4E 22 A7 48 |C$."Y".HC$."N".H|
00000F70: 24 28 48 2C 31 35 29 B2 48 43 24 3A 8E 00 87 17 |$(H,15).HC$:....|
00000F80: 03 16 89 35 36 32 35 00 B4 17 C8 19 58 31 24 B2 |...5625.....X1$.|
00000F90: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00000FA0: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3A 99 |.............":.|
00000FB0: 58 31 24 3B 00 DB 17 CD 19 81 58 B2 31 A4 33 3A |X1$;......X.1.3:|
00000FC0: 99 58 31 24 3B 22 12 22 3B 58 24 3B 22 92 22 3A |.X1$;".";X$;".":|
00000FD0: 81 58 31 B2 31 A4 32 30 30 3A 82 00 F7 17 D2 19 |.X1.1.200:......|
00000FE0: 99 58 31 24 3B 58 24 3A 81 58 31 B2 31 A4 32 30 |.X1$;X$:.X1.1.20|
00000FF0: 30 3A 82 3A 82 3A 8E 00 24 18 AE 1F 99 22 93 11 |0:.:.:..$...."..|
00001000: 11 11 11 11 20 20 20 20 20 20 20 20 20 20 48 4F |.... HO|
00001010: 52 53 45 20 52 41 43 49 4E 47 20 46 4F 52 45 43 |RSE RACING FOREC|
00001020: 41 53 54 22 00 2A 18 B0 1F 8E 00 00 00 |AST".*....... |
.......E(C$).C1.C1$."3":.3630.9....E(C$)
.C2.C1$."1":.3630.E.$.C1$."2".K.....O.X.
."..INPUT NAMES OF RUNNERS.:-.".{....H.1
.HN......"HORSE ";H;.12);:.HC$.T....C(HC
$).18..".";.12);"
.":.3808.....H$(H,1).HC$:.:.......A.
1.40:H$(A,13)." ":H$(A,14)." ":.:..5. ..
SF.1.HN:SF%(SF).E(H$(SF,7)):..]....SF.1.
HN.1:.SF%(SF)..SF%(SF.1).4060.G...SS.SF.
...X%.SF%(SF.1):SF%(SF.1).SF%(SF):SF%(S
F).X%:.SF.1.4050.D.H.SF.SF.1:.SF%(SF).SF
%(SF.1).4030.N.R.SF.SS.V....:....H..8110
...R..78:.".........1. DISPLAY RUNNERS".
5.|..".........2. DISPLAY RACE AND FORM
DATA".M....".........3. RUN FORECAST":."
.........4. SAVE DATA......".........5.
RETURN TO MAIN MENU".O....84:.".........
...WHICH OPTION. ";Y$:Y.E(Y$):.Y.0.4270.
.....Y.820,800,900,5000,10......64:.4250
...0..".PRESS SPACE TO CONTINUE....";.1.
2..PR$:.PR$." "...;.4..4402.M....HC$."0"
.4510.C....E(HC$).0.HC$." ".I..........H
(I(HC$,2),1)..".".4620.....HC$.H(HC$,C(H
C$).1)."0".I(HC$,1).H....C(HC$)..2.HC$.H
C$.".00".N..........78:.100......78:."..
......INSERT REWOUND CASSETTE":.".......
.";:.4400.0....1,1,2,"RACE FILE".P...X$.
"SAVING RACE DATA":.6600.F....R.1.6:.1,R
$(R):..Q....1,HN$......HD.1.HN:.H.1.15:.
1,H$(HD,H):.:.: 1.....X$."RACE DATA WRIT
TEN":.6600:.4200......78:.100:.78:."....
....INSERT CORRECT CASSETTE"......".....
...";:.4400."....1,1,0,"RACE FILE".C....
R.1.6:.1,R$(R):.:.".":.5250.T....84:.".I
S THIS THE RACE REQUIRED. (Y-N) ";Y$....
..Y$."N". 1:.8110:.8190:.5100......Y$.."
Y"..64:.5125......64:X$.".........LOADIN
G RACE FILE":.6600:.1,HN$:HN.E(HN$)... .
.HD.1.HN:.H.1.15:.1,H$(HD,H):.:.: 1...#.
.4200.G....".1. RACECOURSE :
";R$(1).Q....".2. DATE OF RACE
: ";R$(6)......".3. TIME OF RACE
: ";R$(2).E....".4. PRIZE MONEY
: ";R$(3)... ..".5. RACE DISTANCE (F
UR.) : ";R$(4):..!....88:.".ANY CORRECT
IONS (Y-N).";Y$:.Y$."N"...8.H..Y$.."Y"..
68:.5300.Q.R..68:.88:.".WHICH LINE NO.."
;Y1$:Y1.E(Y1$):.Y1.0.5336...V..Y1.5345,5
350,5360,5365,5370...X..Y1.5..68:.5330..
....5300.L....".....";.23);:.R$(1):.....
..".......";.23);:.R$(6):.......".......
..";.23);:.R$(2):..E...."...........";.2
3);:.R$(3):C$.R$(3):.3600:R$(5).C1$:..I.
...".............";.23);:.R$(4):....".."
. 1. NAME OF HORSE : ";".";H$(H,1);
".".A.,..".LAST 4 RESULTS (0 NOT PLACED)
"...6.." 2. LAST : "
;H$(H,2)...@.." 3. LAST BUT ONE
: ";H$(H,3).N.J.." 4. LAST BUT TWO
: ";H$(H,4).}.T.." 5. LAST BU
T THREE : ";H$(H,5)...^..". 6.
WEIGHT ADJ.RATE. : ";H$(H,6)...
H.." 7. SPEED FIGURES : ";H$(
H,7)...R.." 8. GROUP LAST RACE
: ";H$(H,8).3.Z..".DISTANCES IN FURLONGS
:- : ".B.|.." 9. LAST RACE
: ";H$(H,9)......"10. LAST BUT ON
E : ";H$(H,10).C....".11. WE
IGHT THIS RACE : ";H$(H,12).....
."12. WEIGHT LAST RACE : ";H$(H,
11).%...."13. TOP 3 OF OF BETTING (Y-N):
";H$(H,15):..U....91:.".ANY CORRECTIONS
(Y-N).";Y$:.Y$."N"...L....Y$.."Y"..71:.
5545......71:.91:.".WHICH LINE NO..";Y1$
:Y1.E(Y1$):.Y1.0.5563......Y1.5565,5570,
5575,5580,5585,5590,5595,5600,5605,5610,
5615,5620,5625......Y1.13..71:.5560.....
.5545.#...."...";.17);:.HC$.I....C(HC$).
18.."...";.17);LN$;:.5565.[...H$(H,1).HC
$:....B.."......";.31);:.HC$:.4500:H$(H,
2).HC$:....G..".......";.31);:.HC$:.4500
:H$(H,3).HC$:....L.."........";.31);:.HC
$:.4500:H$(H,4).HC$:....Q..".........";.
31);:.HC$:.4500:H$(H,5).HC$:..R.V.."....
.......";.31);:.H$(H,6):.E(H$(H,6)).0.H$
(H,6)."99".X.W........"............";.31
);:.H$(H,7):.E(H$(H,7)).0.H$(H,7)."0"...
....J....".............";.31);:.C$:.E(C$
).0.C$."0"......3600:H$(H,8).C$:H$(H,14)
.C1$:......."................";.31);:.H$
(H,9).4....E(H$(H,9)).0.H$(H,9)."99".:..
...C....".................";.31);:.H$(H,
10)......E(H$(H,10)).0.H$(H,10)."99"....
...D...."...................";.31);:.HC$
:.E(HC$).0.HC$."0.0"......4600:H$(H,12).
HC$:......."....................";.31);:
.HC$:.E(HC$).0.HC$."0.0".1....4600:H$(H,
11).HC$:..Y....".....................";.
31);:.HC$.}....HC$."Y".HC$."N".H$(H,15).
HC$:.......5625...H.X1$."...............
.............":.X1$;...M..X.1.3:.X1$;"."
;X$;".":.X1.1.200:....R..X1$;X$:.X1.1.20
0:.:.:..$...."...... HORSE RACI
NG FORECAST".*.......
> CLICK IMAGE PREVIEW FOR FULL MODAL