GEIGER COUNTER
FILE INFORMATION
FILENAME(S): GEIGER COUNTER
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-10-20 14:37:21
APPEARS ON: 1 disk(s)
FILE HASH
16199bee213f7ebf28ad046e981307fb1211a1f54452a72336f00bdb55b94932
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 COLLECTION 2 | GEIGER COUNTER | PRG | Treasure Chest - LehrerMIL | 11 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 05 00 97 35 33 32 38 30 2C 31 3A 97 |.......53280,1:.|
00000010: 35 33 32 38 31 2C 31 3A 99 22 90 22 00 61 08 0A |53281,1:.".".a..|
00000020: 00 41 31 24 B2 22 1F DD 11 9D DD 11 9D DD 11 9D |.A1$."..........|
00000030: DD 11 9D DD 11 9D DD 11 9D 9D 9D 9D 9D 9D A4 A4 |................|
00000040: A4 A4 A4 DD 11 9D 9D 9D 9D 9D 9D 12 20 92 A0 A0 |............ ...|
00000050: A0 DB BD 11 9D 9D 9D 9D 9D 9D A3 A3 A3 A3 A3 90 |................|
00000060: 22 00 85 08 14 00 42 24 B2 22 90 C0 C0 C0 C0 C0 |".....B$."......|
00000070: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000080: C0 AE 11 9D 22 00 B9 08 1E 00 43 24 B2 22 1F 11 |....".....C$."..|
00000090: 9D 9D 9D 5E 11 9D DD 11 9D 9D 9D 9D 52 41 44 49 |...^........RADI|
000000A0: 4F 41 43 54 49 56 45 11 9D 9D 9D 9D 9D 9D 9D 9D |OACTIVE.........|
000000B0: 9D 53 45 4E 53 4F 52 90 22 00 FD 08 BE 00 81 49 |.SENSOR."......I|
000000C0: B2 31 A4 35 3A 87 4C 24 28 49 29 3A 82 49 3A 83 |.1.5:.L$(I):.I:.|
000000D0: 50 4C 55 54 4F 4E 49 55 4D 2C 53 54 52 4F 4E 54 |PLUTONIUM,STRONT|
000000E0: 49 55 4D 2C 52 41 44 49 55 4D 2C 50 4F 54 41 53 |IUM,RADIUM,POTAS|
000000F0: 53 49 55 4D 2C 42 41 43 4B 47 52 4E 44 00 46 09 |SIUM,BACKGRND.F.|
00000100: C8 00 99 22 93 46 4F 52 20 48 4F 57 20 4D 41 4E |...".FOR HOW MAN|
00000110: 59 20 53 45 43 4F 4E 44 53 20 44 4F 20 59 4F 55 |Y SECONDS DO YOU|
00000120: 20 57 49 53 48 20 54 4F 20 4D 41 4B 45 4D 45 41 | WISH TO MAKEMEA|
00000130: 53 55 52 45 4D 45 4E 54 53 20 28 54 52 59 20 31 |SUREMENTS (TRY 1|
00000140: 35 29 22 3A 85 54 00 90 09 D2 00 99 22 48 4F 57 |5)":.T......"HOW|
00000150: 20 46 41 52 20 41 57 41 59 20 49 53 20 54 48 45 | FAR AWAY IS THE|
00000160: 20 47 45 49 47 45 52 20 54 55 42 45 20 28 41 4E | GEIGER TUBE (AN|
00000170: 53 57 45 52 20 42 45 54 57 45 45 4E 20 30 2E 35 |SWER BETWEEN 0.5|
00000180: 20 41 4E 44 20 31 30 30 20 43 4D 29 22 3A 85 44 | AND 100 CM)":.D|
00000190: 00 DB 09 D7 00 99 22 44 4F 20 59 4F 55 20 57 49 |......"DO YOU WI|
000001A0: 53 48 20 54 4F 20 50 55 54 20 41 20 4C 45 41 44 |SH TO PUT A LEAD|
000001B0: 20 53 48 49 45 4C 44 20 42 45 54 57 45 45 4E 54 | SHIELD BETWEENT|
000001C0: 48 45 20 54 55 42 45 20 41 4E 44 20 54 48 45 20 |HE TUBE AND THE |
000001D0: 53 4F 55 52 43 45 22 3A 85 41 24 00 FC 09 D8 00 |SOURCE":.A$.....|
000001E0: 41 24 B2 C8 28 41 24 2C 31 29 3A 8B 41 24 B2 22 |A$..(A$,1):.A$."|
000001F0: 4E 22 A7 54 48 B2 30 3A 89 32 32 30 00 28 0A D9 |N".TH.0:.220.(..|
00000200: 00 99 22 11 48 4F 57 20 4D 41 4E 59 20 4D 4D 20 |..".HOW MANY MM |
00000210: 54 48 49 43 4B 20 49 53 20 54 48 45 20 53 48 49 |THICK IS THE SHI|
00000220: 45 4C 44 22 3A 85 54 48 00 65 0A DA 00 8B 54 48 |ELD":.TH.e....TH|
00000230: AD 31 30 AA 2E 31 B1 44 A7 99 22 49 54 20 57 4F |.10..1.D.."IT WO|
00000240: 4E 27 54 20 46 49 54 20 42 45 54 57 45 45 4E 20 |N'T FIT BETWEEN |
00000250: 53 4F 55 52 43 45 20 41 4E 44 20 54 55 42 45 22 |SOURCE AND TUBE"|
00000260: 3A 89 32 31 37 00 86 0A DC 00 99 22 4C 49 53 54 |:.217......"LIST|
00000270: 20 4F 46 20 53 4F 55 52 43 45 20 4D 41 54 45 52 | OF SOURCE MATER|
00000280: 49 41 4C 53 3A 22 00 A1 0A E6 00 99 3A 81 49 B2 |IALS:"......:.I.|
00000290: 31 A4 35 3A 99 4C 24 28 49 29 2C 49 2C 3A 82 3A |1.5:.L$(I),I,:.:|
000002A0: 99 00 B9 0A F0 00 85 22 53 4F 55 52 43 45 20 4E |......."SOURCE N|
000002B0: 55 4D 42 45 52 22 3B 53 4E 00 DE 0A FA 00 8B 53 |UMBER";SN......S|
000002C0: 4E B3 31 B0 53 4E B1 35 A7 99 22 41 4E 53 57 45 |N.1.SN.5.."ANSWE|
000002D0: 52 20 31 20 54 4F 20 35 22 3A 89 32 32 30 00 0F |R 1 TO 5":.220..|
000002E0: 0B 04 01 42 47 B2 2E 31 AC 28 2E 37 AA 2E 33 AD |...BG..1.(.7..3.|
000002F0: 28 31 AA 54 48 29 29 3A 91 53 4E 89 32 37 30 2C |(1.TH)):.SN.270,|
00000300: 32 38 30 2C 32 39 30 2C 33 30 30 2C 33 31 30 00 |280,290,300,310.|
00000310: 32 0B 0E 01 52 41 B2 31 30 30 AC BD 28 AB 31 30 |2...RA.100..(.10|
00000320: AC 54 48 29 AD 28 44 AE 33 29 AA 42 47 3A 89 33 |.TH).(D.3).BG:.3|
00000330: 33 30 00 54 0B 18 01 52 41 B2 31 30 30 AC BD 28 |30.T...RA.100..(|
00000340: AB 54 48 29 AD 28 44 AE 32 2E 35 29 AA 42 47 3A |.TH).(D.2.5).BG:|
00000350: 89 33 33 30 00 75 0B 22 01 52 41 B2 31 30 30 AC |.330.u.".RA.100.|
00000360: BD 28 AB 2E 31 AC 54 48 29 AD 44 AE 32 AA 42 47 |.(..1.TH).D.2.BG|
00000370: 3A 89 33 33 30 00 7B 0B 2C 01 8F 00 85 0B 36 01 |:.330.{.,.....6.|
00000380: 52 41 B2 42 47 00 94 0B 4A 01 43 54 B2 30 3A 99 |RA.BG...J.CT.0:.|
00000390: 22 93 90 22 00 AE 0B 54 01 99 22 20 20 12 A9 20 |".."...T.." .. |
000003A0: 20 20 20 20 20 20 20 20 20 20 92 A9 A5 22 00 C6 | ..."..|
000003B0: 0B 5E 01 99 22 20 A7 20 20 A4 A4 A4 A4 A4 A4 A4 |.^.." . .......|
000003C0: 20 20 A7 20 A5 22 00 E5 0B 68 01 99 22 20 A7 20 | . ."...h.." . |
000003D0: AA 20 20 20 20 20 20 20 A5 20 A7 20 A5 5F 47 45 |. . . ._GE|
000003E0: 49 47 45 52 22 00 04 0C 72 01 99 22 20 A7 20 AA |IGER"...r.." . .|
000003F0: 20 20 20 20 20 20 20 A5 A0 A7 20 A5 43 4F 55 4E | ... .COUN|
00000400: 54 45 52 22 00 1C 0C 7C 01 99 22 20 A7 20 AA A4 |TER"...|.." . ..|
00000410: A4 A4 A4 A4 A4 A4 A5 28 A7 20 A5 22 00 4B 0C 86 |.......(. .".K..|
00000420: 01 99 22 20 A7 20 20 20 1E D7 90 20 20 20 20 20 |.." . ... |
00000430: A0 20 A7 CE 20 20 20 20 20 20 20 20 20 20 20 20 |. .. |
00000440: 20 20 20 20 20 20 20 20 20 20 22 00 78 0C 90 01 | ".x...|
00000450: 99 22 A0 A0 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |."..............|
00000460: A0 A0 A0 A0 A0 A0 A0 20 20 20 20 20 20 20 20 20 |....... |
00000470: 20 20 20 20 20 20 A0 22 00 A5 0C 9A 01 99 22 A0 | ."......".|
00000480: A0 A0 A0 20 20 20 20 20 20 20 20 20 A0 A0 A0 A0 |... ....|
00000490: A0 A0 A0 A0 20 20 20 20 20 20 20 20 20 20 20 20 |.... |
000004A0: 20 20 20 20 22 00 D2 0C A4 01 99 22 A0 A0 A0 A0 | "......"....|
000004B0: 20 20 20 20 20 20 20 20 20 A0 A0 A0 A0 A0 A0 A0 | .......|
000004C0: A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000004D0: 20 22 00 03 0D AE 01 99 22 A0 A0 A0 A0 A4 A4 A4 | "......".......|
000004E0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000004F0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000500: A4 22 3B 00 36 0D B8 01 99 22 A0 A0 A0 CE A0 A0 |.";.6...."......|
00000510: 9E A4 A4 90 A0 20 20 20 20 A0 A0 A0 A0 A0 A0 A0 |..... .......|
00000520: A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000530: 20 20 20 CE 22 3B 00 67 0D C2 01 99 22 A0 A0 CE | .";.g...."...|
00000540: A0 A0 9E CE CE CE A5 90 20 20 20 20 A0 A0 20 20 |........ .. |
00000550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000560: 20 20 20 20 A0 CE 22 00 98 0D CC 01 99 22 A0 CE | .."......"..|
00000570: A0 A0 A0 9E CF D0 CE A5 90 20 20 20 20 20 20 20 |......... |
00000580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000590: 20 20 20 20 20 CE A0 22 00 C9 0D D6 01 99 22 CE | .."......".|
000005A0: A0 A0 A0 A0 9E CC BA CE 90 A0 20 20 20 A0 A0 A0 |.......... ...|
000005B0: A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000005C0: 20 20 20 20 20 CE 20 20 22 00 D9 0D E0 01 99 22 | . "......"|
000005D0: A0 A0 A0 A0 A0 1C 5E 90 22 00 EB 0D EA 01 99 22 |......^."......"|
000005E0: 1C 22 4C 24 28 53 4E 29 22 90 22 00 FA 0D F4 01 |."L$(SN)".".....|
000005F0: 8B 53 4E B2 35 A7 8D 38 32 30 00 1F 0E FE 01 99 |.SN.5..820......|
00000600: 22 13 9E 22 A3 32 35 29 22 44 49 53 54 41 4E 43 |"..".25)"DISTANC|
00000610: 45 3A 22 3A 99 A3 33 30 29 44 22 43 4D 90 22 00 |E:":..30)D"CM.".|
00000620: 47 0E 08 02 99 22 13 90 22 A3 32 34 29 22 DD 11 |G...."..".24)"..|
00000630: 9D DD 11 9D DD 11 9D AD C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000640: C0 C0 C0 C0 C0 C0 22 00 6F 0E 0D 02 99 22 13 11 |......".o...."..|
00000650: 11 11 11 11 22 A3 31 33 29 3B C9 28 42 24 2C 34 |....".13);.(B$,4|
00000660: AA B5 28 44 AD 34 29 29 3B 41 31 24 3B 43 24 00 |..(D.4));A1$;C$.|
00000670: 80 0E 12 02 8B 41 24 B2 22 59 22 A7 8D 37 39 30 |.....A$."Y"..790|
00000680: 00 91 0E 26 02 54 49 24 B2 22 30 30 30 30 30 30 |...&.TI$."000000|
00000690: 22 00 9E 0E 3A 02 81 49 B2 30 A4 54 AB 31 00 A8 |"...:..I.0.T.1..|
000006A0: 0E 44 02 54 32 B2 54 49 00 D6 0E 4E 02 99 22 13 |.D.T2.TI...N..".|
000006B0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000006C0: 11 11 11 11 54 49 4D 45 3A 20 22 49 22 20 53 45 |....TIME: "I" SE|
000006D0: 43 4F 4E 44 53 22 00 DF 0E 58 02 8D 36 38 30 00 |CONDS"...X..680.|
000006E0: F2 0E 62 02 8B 20 54 49 AB 54 32 B3 36 30 A7 36 |..b.. TI.T2.60.6|
000006F0: 30 30 00 F9 0E 6C 02 82 49 00 27 0F 76 02 99 22 |00...l..I.'.v.."|
00000700: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000710: 11 11 11 11 11 54 49 4D 45 3A 20 22 49 22 20 53 |.....TIME: "I" S|
00000720: 45 43 4F 4E 44 53 22 00 49 0F 80 02 99 22 12 11 |ECONDS".I...."..|
00000730: 20 48 49 54 20 41 4E 59 20 4B 45 59 20 54 4F 20 | HIT ANY KEY TO |
00000740: 43 4F 4E 54 49 4E 55 45 22 00 5D 0F 8A 02 A1 43 |CONTINUE".]....C|
00000750: 24 3A 8B 43 24 B3 B1 22 22 89 32 30 30 00 66 0F |$:.C$.."".200.f.|
00000760: 94 02 89 36 35 30 00 7E 0F A8 02 99 22 13 1D 1D |...650.~...."...|
00000770: 1D 1D 1D 11 11 11 11 11 11 1C D1 90 22 3B 00 84 |............";..|
00000780: 0F B2 02 8F 00 91 0F BC 02 99 22 9D 1C D7 90 22 |.........."...."|
00000790: 3B 00 A4 0F C1 02 43 54 B2 43 54 AA 52 41 AC BB |;.....CT.CT.RA..|
000007A0: 28 54 49 29 00 BC 0F C6 02 99 22 13 11 11 11 11 |(TI)......".....|
000007B0: 1D 1D 1D 1D 1D 22 3B B5 28 43 54 29 00 C2 0F D0 |.....";.(CT)....|
000007C0: 02 8E 00 11 10 16 03 99 22 13 11 11 11 11 11 11 |........".......|
000007D0: 11 11 1D 1D 1D 1D 4C 45 41 44 20 C3 3E 96 CE A5 |......LEAD .>...|
000007E0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 11 90 53 48 49 45 4C |...........SHIEL|
000007F0: 44 96 CE 20 A5 9D 9D 9D 9D 11 BA 20 20 CC 9D 9D |D.. ....... ...|
00000800: 9D 9D 11 A7 20 20 A5 9D 9D 9D 9D 11 A7 20 20 22 |.... ....... "|
00000810: 3B 00 31 10 20 03 99 22 A5 9D 9D 9D 9D 11 A7 20 |;.1. .."....... |
00000820: 20 A5 9D 9D 9D 9D 11 A7 20 CE 9D 9D 9D 11 A7 CE | ....... .......|
00000830: 22 00 37 10 2A 03 8E 00 77 10 34 03 99 22 13 11 |".7.*...w.4.."..|
00000840: 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D A4 A4 |................|
00000850: A4 11 9D 9D 9D 20 20 20 20 11 9D 9D 9D 9D 20 20 |..... ..... |
00000860: 20 20 11 9D 9D 9D 9D 20 20 20 20 11 9D 9D 9D 9D | ..... .....|
00000870: 20 20 20 20 20 90 22 00 7D 10 3E 03 8E 00 C4 10 | .".}.>.....|
00000880: 10 27 41 24 B2 22 9F DD 11 9D DD 11 9D DD 11 9D |.'A$."..........|
00000890: DD 11 9D DD 11 9D DD 11 9D DD 11 9D 9D 9D 9D 9D |................|
000008A0: 9D A4 A4 A4 A4 A4 DD 11 9D 9D 9D 9D 9D 9D 12 20 |............... |
000008B0: 92 A0 A0 A0 DB BD 11 9D 9D 9D 9D 9D 9D A3 A3 A3 |................|
000008C0: A3 A3 90 22 00 E7 10 74 27 42 24 B2 22 90 C0 C0 |..."...t'B$."...|
000008D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000008E0: C0 C0 C0 C0 AE 90 22 00 00 00 00 |......".... |
.......53280,1:.53281,1:.".".A...A1$."..
.................................... .
...............".....B$."..............
............".....C$.".....^........RADI
OACTIVE..........SENSOR."......I.1.5:.L$
(I):.I:.PLUTONIUM,STRONTIUM,RADIUM,POTAS
SIUM,BACKGRND.F.H..".FOR HOW MANY SECOND
S DO YOU WISH TO MAKEMEASUREMENTS (TRY 1
5)":.T...R.."HOW FAR AWAY IS THE GEIGER
TUBE (ANSWER BETWEEN 0.5 AND 100 CM)":.D
...W.."DO YOU WISH TO PUT A LEAD SHIELD
BETWEENTHE TUBE AND THE SOURCE":.A$...X.
A$.H(A$,1):.A$."N".TH.0:.220.(.Y..".HOW
MANY MM THICK IS THE SHIELD":.TH.E.Z..TH
.10..1.D.."IT WON'T FIT BETWEEN SOURCE A
ND TUBE":.217......"LIST OF SOURCE MATER
IALS:"......:.I.1.5:.L$(I),I,:.:......."
SOURCE NUMBER";SN......SN.1.SN.5.."ANSWE
R 1 TO 5":.220.....BG..1.(.7..3.(1.TH)):
.SN.270,280,290,300,310.2...RA.100..(.10
.TH).(D.3).BG:.330.T...RA.100..(.TH).(D.
2.5).BG:.330.U.".RA.100..(..1.TH).D.2.BG
:.330.{.,.....6.RA.BG...J.CT.0:.".."...T
.." .. ...".F.^.." . .......
. ."...H.." . . . . ._GEIGER"...
R.." . . . . .COUNTER"...|.." . ..
.......(. .".K...." . .W. .N
".X...." ............
"......"
".R...."
"......
" ...................................
.";.6...." N ....
N";.G.B.." N .NNN..
N"...L.." N .OPN.
. N ".I.V.."N
.L.N. N
".Y...." .^."......"."L$(SN)".".....
.SN.5..820......"..".25)"DISTANCE:":..30
)D"CM.".G...."..".24)"..................
......".O...."......".13);I(B$,4..(D.4))
;A1$;C$......A$."Y"..790...&.TI$."000000
"...:..I.0.T.1...D.T2.TI.V.N..".........
............TIME: "I" SECONDS"...X..680.
..B.. TI.T2.60.600...L..I.'.V.."........
.............TIME: "I" SECONDS".I...."..
HIT ANY KEY TO CONTINUE".]....C$:.C$.."
".200.F....650.~....".............Q.";..
.........."..W.";...A.CT.CT.RA..(TI)...F
.."..........";.(CT).B.P........".......
......LEAD C>.N............SHIELD.N ....
... L...... ....... ";.1. ..".......
....... N.....N".7.*...W.4.."..........
............. ..... ..... .....
.".}.>...D..'A$."..................
....................... . ............
..."...T'B$.".........................".
...
> CLICK IMAGE PREVIEW FOR FULL MODAL