BULLET DIST.C
FILE INFORMATION
FILENAME(S): BULLET DIST.C
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-11-30 21:07:08
APPEARS ON: 1 disk(s)
FILE HASH
5f9451b4c71d8531e2fcae51a79fcf3e5de9902ce6534b530603663632083329
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TPUGMORENOV841 C | BULLET DIST.C | PRG | DuncanTwain | 12 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 34 08 64 00 99 22 93 11 12 20 20 20 20 20 |..4.d.."... | 00000010: 20 20 48 4F 57 20 46 41 52 20 57 49 4C 4C 20 4D | HOW FAR WILL M| 00000020: 59 20 47 55 4E 20 53 48 4F 4F 54 3F 20 20 20 20 |Y GUN SHOOT? | 00000030: 20 20 20 22 00 5F 08 6E 00 99 22 44 41 54 41 20 | "._.n.."DATA | 00000040: 46 52 4F 4D 20 4C 59 4D 41 4E 20 52 45 4C 4F 41 |FROM LYMAN RELOA| 00000050: 44 49 4E 47 20 48 41 4E 44 42 4F 4F 4B 11 22 00 |DING HANDBOOK.".| 00000060: 83 08 78 00 4E B2 32 39 3A 86 43 24 28 4E 29 2C |..x.N.29:.C$(N),| 00000070: 42 28 4E 29 2C 56 28 4E 29 2C 59 28 4E 29 2C 4D |B(N),V(N),Y(N),M| 00000080: 28 4E 29 00 C3 08 82 00 81 46 B2 31 A4 4E 3A 87 |(N)......F.1.N:.| 00000090: 43 24 28 46 29 3A 87 42 28 46 29 3A 87 56 28 46 |C$(F):.B(F):.V(F| 000000A0: 29 3A 87 59 28 46 29 3A 4D 28 46 29 B2 28 B5 28 |):.Y(F):M(F).(.(| 000000B0: 59 28 46 29 AC 33 30 AD 35 32 38 29 29 AD 31 30 |Y(F).30.528)).10| 000000C0: 30 3A 82 00 CC 08 8C 00 89 33 35 30 00 13 09 96 |0:.......350....| 000000D0: 00 83 32 32 32 20 52 45 4D 2C 35 30 2C 33 32 30 |..222 REM,50,320| 000000E0: 30 2C 32 35 30 30 2C 32 32 33 20 52 45 4D 2C 35 |0,2500,223 REM,5| 000000F0: 35 2C 33 33 30 30 2C 32 37 36 36 2C 32 32 2F 32 |5,3300,2766,22/2| 00000100: 35 30 20 52 45 4D 2C 35 35 2C 33 38 31 30 2C 32 |50 REM,55,3810,2| 00000110: 39 33 33 00 59 09 A0 00 83 32 34 33 20 57 49 4E |933.Y....243 WIN| 00000120: 2C 38 30 2C 33 35 30 30 2C 33 35 30 30 2C 32 34 |,80,3500,3500,24| 00000130: 33 20 57 49 4E 2C 31 30 30 2C 33 30 37 30 2C 34 |3 WIN,100,3070,4| 00000140: 30 30 30 2C 32 37 30 20 57 49 4E 2C 31 30 30 2C |000,270 WIN,100,| 00000150: 33 34 33 30 2C 33 33 33 33 00 A4 09 AA 00 83 32 |3430,3333......2| 00000160: 37 30 20 57 49 4E 2C 31 33 30 2C 33 31 34 30 2C |70 WIN,130,3140,| 00000170: 34 30 30 30 2C 32 37 30 20 57 49 4E 2C 31 35 30 |4000,270 WIN,150| 00000180: 2C 32 38 30 30 2C 34 33 33 33 2C 37 4D 4D 20 52 |,2800,4333,7MM R| 00000190: 45 4D 20 4D 41 47 2C 31 35 30 2C 33 32 36 30 2C |EM MAG,150,3260,| 000001A0: 34 34 36 36 00 F1 09 B4 00 83 37 4D 4D 20 52 45 |4466......7MM RE| 000001B0: 4D 20 4D 41 47 2C 31 37 35 2C 33 30 37 30 2C 34 |M MAG,175,3070,4| 000001C0: 39 33 33 2C 33 30 2F 33 30 20 57 49 4E 2C 31 35 |933,30/30 WIN,15| 000001D0: 30 2C 32 34 31 30 2C 33 35 30 30 2C 33 30 38 20 |0,2410,3500,308 | 000001E0: 57 49 4E 2C 31 35 30 2C 32 38 36 30 2C 33 36 36 |WIN,150,2860,366| 000001F0: 36 00 3B 0A BE 00 83 33 30 38 20 57 49 4E 2C 31 |6.;....308 WIN,1| 00000200: 38 30 2C 32 36 31 30 2C 34 31 36 36 2C 33 30 38 |80,2610,4166,308| 00000210: 20 57 49 4E 2C 32 30 30 2C 32 34 35 30 2C 34 35 | WIN,200,2450,45| 00000220: 30 30 2C 33 30 2D 30 36 20 47 4F 56 54 2C 31 35 |00,30-06 GOVT,15| 00000230: 30 2C 32 39 37 30 2C 33 36 36 36 00 8D 0A C8 00 |0,2970,3666.....| 00000240: 83 33 30 2D 30 36 20 47 4F 56 54 2C 32 32 30 2C |.30-06 GOVT,220,| 00000250: 32 34 31 30 2C 34 36 36 36 2C 33 30 30 20 48 2B |2410,4666,300 H+| 00000260: 48 20 4D 41 47 2C 31 35 30 2C 33 31 39 30 2C 33 |H MAG,150,3190,3| 00000270: 38 33 33 2C 33 30 30 20 48 2B 48 20 4D 41 47 2C |833,300 H+H MAG,| 00000280: 31 38 30 2C 32 39 32 30 2C 34 36 36 36 00 D9 0A |180,2920,4666...| 00000290: D2 00 83 33 30 30 20 48 2B 48 20 4D 41 47 2C 32 |...300 H+H MAG,2| 000002A0: 32 30 2C 32 36 32 30 2C 34 38 33 33 2C 34 34 34 |20,2620,4833,444| 000002B0: 20 4D 41 52 4C 49 4E 2C 32 34 30 2C 32 34 30 30 | MARLIN,240,2400| 000002C0: 2C 32 35 33 33 2C 34 35 2D 37 30 20 47 4F 56 54 |,2533,45-70 GOVT| 000002D0: 2C 34 30 35 2C 31 33 32 30 00 E3 0A DC 00 83 33 |,405,1320......3| 000002E0: 33 33 33 00 32 0B E6 00 83 33 38 20 53 50 45 43 |333.2....38 SPEC| 000002F0: 49 41 4C 2C 31 35 38 2C 38 35 35 2C 31 38 33 33 |IAL,158,855,1833| 00000300: 2C 33 38 20 53 50 45 43 49 41 4C 2C 31 35 38 2C |,38 SPECIAL,158,| 00000310: 31 30 39 30 2C 32 31 33 33 2C 33 35 37 20 4D 41 |1090,2133,357 MA| 00000320: 47 4E 55 4D 2C 31 35 38 2C 31 34 31 30 2C 32 33 |GNUM,158,1410,23| 00000330: 36 36 00 7C 0B F0 00 83 34 31 20 4D 41 47 4E 55 |66.|....41 MAGNU| 00000340: 4D 2C 32 31 30 2C 31 35 30 30 2C 32 33 36 36 2C |M,210,1500,2366,| 00000350: 34 34 20 4D 41 47 4E 55 4D 2C 32 34 30 2C 31 34 |44 MAGNUM,240,14| 00000360: 37 30 2C 32 35 30 30 2C 34 35 20 41 55 54 4F 2C |70,2500,45 AUTO,| 00000370: 32 31 30 2C 37 31 30 2C 31 34 36 36 00 AB 0B FA |210,710,1466....| 00000380: 00 83 34 35 20 41 55 54 4F 2C 32 33 30 2C 38 35 |..45 AUTO,230,85| 00000390: 30 2C 31 37 30 30 2C 34 35 20 41 55 54 4F 2C 32 |0,1700,45 AUTO,2| 000003A0: 33 30 2C 39 34 35 2C 31 38 33 33 00 DD 0B 04 01 |30,945,1833.....| 000003B0: 81 46 B2 4E 31 A4 4E 32 3A 99 43 24 28 46 29 A3 |.F.N1.N2:.C$(F).| 000003C0: 31 33 29 42 28 46 29 A3 31 39 29 3B 3A 8B 56 28 |13)B(F).19);:.V(| 000003D0: 46 29 B3 31 30 30 30 A7 99 22 20 22 3B 00 02 0C |F).1000.." ";...| 000003E0: 0E 01 99 56 28 46 29 A3 32 36 29 59 28 46 29 A3 |...V(F).26)Y(F).| 000003F0: 33 33 29 3B 3A 8B 4D 28 46 29 B3 31 A7 99 22 20 |33);:.M(F).1.." | 00000400: 22 3B 00 0E 0C 18 01 99 4D 28 46 29 3A 82 00 33 |";......M(F):..3| 00000410: 0C 22 01 99 22 12 20 50 55 53 48 20 41 4E 59 20 |."..". PUSH ANY | 00000420: 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 20 |KEY TO CONTINUE | 00000430: 92 91 22 00 46 0C 2C 01 A1 51 24 3A 8B 51 24 B2 |..".F.,..Q$:.Q$.| 00000440: 22 22 A7 33 30 30 00 4C 0C 36 01 8E 00 7E 0C 40 |"".300.L.6...~.@| 00000450: 01 99 22 12 43 41 52 54 52 49 44 47 45 20 20 20 |..".CARTRIDGE | 00000460: 20 20 20 20 42 55 4C 4C 45 54 20 20 20 20 59 41 | BULLET YA| 00000470: 52 44 53 20 20 20 4D 49 4C 45 53 20 22 3B 00 B3 |RDS MILES ";..| 00000480: 0C 4A 01 99 22 12 20 20 4E 41 4D 45 20 20 20 20 |.J..". NAME | 00000490: 20 20 20 20 47 52 4E 20 20 20 56 45 4C 2E 20 20 | GRN VEL. | 000004A0: 20 20 54 52 41 56 45 4C 45 44 20 20 20 20 92 22 | TRAVELED ."| 000004B0: 3B 3A 8E 00 BC 0C 54 01 99 22 93 22 00 EC 0C 5E |;:....T.."."...^| 000004C0: 01 99 22 11 11 20 54 48 49 53 20 50 52 4F 47 52 |..".. THIS PROGR| 000004D0: 41 4D 20 50 52 49 4E 54 53 20 54 48 45 20 4D 41 |AM PRINTS THE MA| 000004E0: 58 49 4D 55 4D 20 52 41 4E 47 45 22 00 18 0D 68 |XIMUM RANGE"...h| 000004F0: 01 99 22 11 20 46 4F 52 20 47 55 4E 53 20 53 48 |..". FOR GUNS SH| 00000500: 4F 54 20 41 54 20 41 20 33 30 20 44 45 47 52 45 |OT AT A 30 DEGRE| 00000510: 45 20 41 4E 47 4C 45 22 00 40 0D 72 01 99 22 11 |E ANGLE".@.r..".| 00000520: 11 11 20 50 55 53 48 20 4B 45 59 20 46 4F 52 20 |.. PUSH KEY FOR | 00000530: 44 45 53 49 52 45 44 20 46 55 43 54 49 4F 4E 22 |DESIRED FUCTION"| 00000540: 00 81 0D 7C 01 99 22 11 20 20 31 20 20 52 49 46 |...|..". 1 RIF| 00000550: 4C 45 20 44 41 54 41 20 54 4F 20 53 43 52 45 45 |LE DATA TO SCREE| 00000560: 4E 22 3A 99 22 11 20 20 32 20 20 50 49 53 54 4F |N":.". 2 PISTO| 00000570: 4C 20 44 41 54 41 20 54 4F 20 53 43 52 45 45 4E |L DATA TO SCREEN| 00000580: 22 00 BF 0D 86 01 99 22 11 20 20 33 20 20 48 41 |"......". 3 HA| 00000590: 52 44 20 43 4F 50 59 20 4F 46 20 41 4C 4C 20 54 |RD COPY OF ALL T| 000005A0: 4F 20 50 52 49 4E 54 45 52 22 3A 99 22 11 20 20 |O PRINTER":.". | 000005B0: 34 20 20 45 4E 44 20 50 52 4F 47 52 41 4D 22 00 |4 END PROGRAM".| 000005C0: D2 0D 90 01 A1 51 24 3A 8B 51 24 B2 22 22 A7 34 |.....Q$:.Q$."".4| 000005D0: 30 30 00 DB 0D 9A 01 99 22 93 22 00 FC 0D A4 01 |00......".".....| 000005E0: 8B 51 24 B2 22 34 22 A7 99 22 93 11 11 20 47 4F |.Q$."4".."... GO| 000005F0: 4F 44 20 42 59 45 2E 11 11 22 3A 80 00 0D 0E AE |OD BYE...":.....| 00000600: 01 8B 51 24 B2 22 33 22 A7 8D 34 37 30 00 2F 0E |..Q$."3"..470./.| 00000610: B8 01 8B 51 24 B2 22 31 22 A7 3A 4E 32 B2 32 31 |...Q$."1".:N2.21| 00000620: 3A 4E 31 B2 31 3A 8D 33 32 30 3A 8D 32 36 30 00 |:N1.1:.320:.260.| 00000630: 51 0E C2 01 8B 51 24 B2 22 32 22 A7 3A 4E 31 B2 |Q....Q$."2".:N1.| 00000640: 32 32 3A 4E 32 B2 4E 3A 8D 33 32 30 3A 8D 32 36 |22:N2.N:.320:.26| 00000650: 30 00 5A 0E CC 01 89 33 34 30 00 6F 0E D6 01 9F |0.Z....340.o....| 00000660: 34 2C 34 2C 34 3A 54 42 24 B2 C7 28 31 36 29 00 |4,4,4:TB$..(16).| 00000670: AD 0E E0 01 98 34 2C 22 20 20 20 20 20 20 20 20 |.....4," | 00000680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 4F | HO| 00000690: 57 20 46 41 52 20 57 49 4C 4C 20 4D 59 20 47 55 |W FAR WILL MY GU| 000006A0: 4E 20 53 48 4F 4F 54 20 3F 22 3A 98 34 00 F7 0E |N SHOOT ?":.4...| 000006B0: EA 01 98 34 2C 22 20 20 20 20 20 20 20 20 20 20 |...4," | 000006C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 55 | BU| 000006D0: 4C 4C 45 54 20 20 20 20 20 20 20 20 20 20 44 49 |LLET DI| 000006E0: 53 54 41 4E 43 45 20 46 52 4F 4D 20 33 30 20 44 |STANCE FROM 30 D| 000006F0: 45 47 52 45 45 53 22 00 3F 0F F4 01 98 34 2C 22 |EGREES".?....4,"| 00000700: 20 43 41 52 54 52 49 44 47 45 20 4E 41 4D 45 20 | CARTRIDGE NAME | 00000710: 20 20 20 20 47 52 41 49 4E 53 20 20 56 45 4C 4F | GRAINS VELO| 00000720: 43 49 54 59 20 20 20 20 20 20 59 41 52 44 53 20 |CITY YARDS | 00000730: 20 20 20 20 20 20 20 20 20 4D 49 4C 45 53 22 00 | MILES".| 00000740: 8C 0F FE 01 98 34 2C 22 C0 C0 C0 C0 C0 C0 C0 C0 |.....4,"........| 00000750: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000760: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000770: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000780: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 C6 0F 08 |..........."....| 00000790: 02 81 46 B2 31 A4 4E 3A 98 34 2C 43 24 28 46 29 |..F.1.N:.4,C$(F)| 000007A0: 54 42 24 22 32 31 22 42 28 46 29 54 42 24 22 32 |TB$"21"B(F)TB$"2| 000007B0: 39 22 3B 3A 8B 56 28 46 29 B3 31 30 30 30 A7 98 |9";:.V(F).1000..| 000007C0: 34 2C 22 20 22 3B 00 F5 0F 12 02 98 34 2C 56 28 |4," ";......4,V(| 000007D0: 46 29 54 42 24 22 34 31 22 59 28 46 29 54 42 24 |F)TB$"41"Y(F)TB$| 000007E0: 22 35 36 22 3B 3A 8B 4D 28 46 29 B3 31 A7 98 34 |"56";:.M(F).1..4| 000007F0: 2C 22 20 22 3B 00 06 10 1C 02 98 34 2C 4D 28 46 |," ";......4,M(F| 00000800: 29 3A 98 34 3A 82 00 12 10 26 02 A0 34 3A 89 33 |):.4:....&..4:.3| 00000810: 34 30 00 00 00 |40... |
..4.D.."... HOW FAR WILL MY GUN SH
OOT? "._.N.."DATA FROM LYMAN RELOA
DING HANDBOOK."...X.N.29:.C$(N),B(N),V(N
),Y(N),M(N).C....F.1.N:.C$(F):.B(F):.V(F
):.Y(F):M(F).(.(Y(F).30.528)).100:..L...
.350......222 REM,50,3200,2500,223 REM,5
5,3300,2766,22/250 REM,55,3810,2933.Y. .
.243 WIN,80,3500,3500,243 WIN,100,3070,4
000,270 WIN,100,3430,3333......270 WIN,1
30,3140,4000,270 WIN,150,2800,4333,7MM R
EM MAG,150,3260,4466......7MM REM MAG,17
5,3070,4933,30/30 WIN,150,2410,3500,308
WIN,150,2860,3666.;....308 WIN,180,2610,
4166,308 WIN,200,2450,4500,30-06 GOVT,15
0,2970,3666...H..30-06 GOVT,220,2410,466
6,300 H+H MAG,150,3190,3833,300 H+H MAG,
180,2920,4666.Y.R..300 H+H MAG,220,2620,
4833,444 MARLIN,240,2400,2533,45-70 GOVT
,405,1320......3333.2....38 SPECIAL,158,
855,1833,38 SPECIAL,158,1090,2133,357 MA
GNUM,158,1410,2366.|....41 MAGNUM,210,15
00,2366,44 MAGNUM,240,1470,2500,45 AUTO,
210,710,1466......45 AUTO,230,850,1700,4
5 AUTO,230,945,1833......F.N1.N2:.C$(F).
13)B(F).19);:.V(F).1000.." ";......V(F).
26)Y(F).33);:.M(F).1.." ";......M(F):..3
."..". PUSH ANY KEY TO CONTINUE ..".F.,.
.Q$:.Q$."".300.L.6...~.@..".CARTRIDGE
BULLET YARDS MILES ";...J..".
NAME GRN VEL. TRAVELED ."
;:....T.."."...^..".. THIS PROGRAM PRINT
S THE MAXIMUM RANGE"...H..". FOR GUNS SH
OT AT A 30 DEGREE ANGLE".@.R.."... PUSH
KEY FOR DESIRED FUCTION"...|..". 1 RIF
LE DATA TO SCREEN":.". 2 PISTOL DATA T
O SCREEN"......". 3 HARD COPY OF ALL T
O PRINTER":.". 4 END PROGRAM".R....Q$:
.Q$."".400......"."......Q$."4".."... GO
OD BYE...":.......Q$."3"..470./....Q$."1
".:N2.21:N1.1:.320:.260.Q.B..Q$."2".:N1.
22:N2.N:.320:.260.Z.L..340.O.V..4,4,4:TB
$.G(16)......4," HO
W FAR WILL MY GUN SHOOT ?":.4......4,"
BULLET DI
STANCE FROM 30 DEGREES".?....4," CARTRID
GE NAME GRAINS VELOCITY YARDS
MILES"......4,"................
........................................
...........".F....F.1.N:.4,C$(F)TB$"21"B
(F)TB$"29";:.V(F).1000..4," ";......4,V(
F)TB$"41"Y(F)TB$"56";:.M(F).1..4," ";...
...4,M(F):.4:....&. 4:.340...
> CLICK IMAGE PREVIEW FOR FULL MODAL