PY036 DECAY
FILE INFORMATION
FILENAME(S): PY036 DECAY
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-02 16:26:33
APPEARS ON: 4 disk(s)
FILE HASH
56ade63ccb1b2bf991d12c45759d27a2dfe3ffc54806d1655f2c67fccbf4339e
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SCHU LERN 16 | PY036 DECAY | PRG | Treasure Chest - Murdock | 34 | 1 | DOWNLOAD FILE |
| FREEWARE DISK NR | PY036 DECAY | PRG | Treasure Chest - Wolfgang Rauprich | 34 | 1 | DOWNLOAD FILE |
| FREESOFT DISK NR | PY036 DECAY | PRG | Treasure Chest - Wolfgang Rauprich | 34 | 1 | DOWNLOAD FILE |
| L EHRNEN | PY036 DECAY | PRG | Treasure Chest - Wolfgang Rauprich | 34 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 1B 04 01 00 8F 20 44 45 43 41 59 2E 52 2E |....... DECAY.R.|
00000010: 4A 2E 4C 41 4D 42 2E 31 39 38 30 00 29 04 05 00 |J.LAMB.1980.)...|
00000020: 97 35 39 34 36 38 2C 31 34 00 32 04 0A 00 99 22 |.59468,14.2...."|
00000030: 93 22 00 50 04 14 00 99 A3 31 31 29 22 D2 C1 C4 |.".P.....11)"...|
00000040: C9 CF C1 C3 D4 C9 D6 C5 A0 C4 C5 C3 C1 D9 2E 22 |..............."|
00000050: 00 6E 04 19 00 99 A3 31 31 29 22 2D 2D 2D 2D 2D |.n.....11)"-----|
00000060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 9D |-------------"..|
00000070: 04 1E 00 99 3A 99 3A 99 22 D4 48 49 53 20 50 52 |....:.:.".HIS PR|
00000080: 4F 47 52 41 4D 20 57 49 4C 4C 20 44 4F 20 54 48 |OGRAM WILL DO TH|
00000090: 45 20 46 4F 4C 4C 4F 57 49 4E 47 3A 22 00 C9 04 |E FOLLOWING:"...|
000000A0: 23 00 99 3A 99 22 31 2E 11 C3 41 4C 43 55 4C 41 |#..:."1...ALCULA|
000000B0: 54 45 20 41 20 48 41 4C 46 2D 4C 49 46 45 20 46 |TE A HALF-LIFE F|
000000C0: 52 4F 4D 20 54 57 4F 20 22 00 EE 04 28 00 99 22 |ROM TWO "...(.."|
000000D0: 52 45 41 44 49 4E 47 53 20 4F 4E 20 41 20 C7 49 |READINGS ON A .I|
000000E0: 45 47 45 52 20 43 4F 55 4E 54 45 52 2E 22 00 1F |EGER COUNTER."..|
000000F0: 05 2D 00 99 3A 99 22 32 2E 11 C3 41 4C 43 55 4C |.-..:."2...ALCUL|
00000100: 41 54 45 20 48 4F 57 20 4D 55 43 48 20 4F 46 20 |ATE HOW MUCH OF |
00000110: 41 20 52 41 44 49 4F 41 43 54 49 56 45 20 22 00 |A RADIOACTIVE ".|
00000120: 56 05 32 00 99 22 53 41 4D 50 4C 45 20 57 49 4C |V.2.."SAMPLE WIL|
00000130: 4C 20 52 45 4D 41 49 4E 20 41 46 54 45 52 20 41 |L REMAIN AFTER A|
00000140: 20 47 49 56 45 4E 20 41 4D 4F 55 4E 54 20 4F 46 | GIVEN AMOUNT OF|
00000150: 20 54 49 4D 45 2E 00 8A 05 37 00 99 3A 99 22 33 | TIME....7..:."3|
00000160: 2E 11 D0 52 49 4E 54 20 4F 55 54 20 41 20 54 41 |...RINT OUT A TA|
00000170: 42 4C 45 20 28 41 4E 44 20 4F 50 54 49 4F 4E 41 |BLE (AND OPTIONA|
00000180: 4C 20 47 52 41 50 48 29 22 3B 00 D7 05 3C 00 99 |L GRAPH)";...<..|
00000190: 22 53 48 4F 57 49 4E 47 20 4D 41 53 53 20 4F 46 |"SHOWING MASS OF|
000001A0: 20 53 41 4D 50 4C 45 20 56 53 2E 20 54 49 4D 45 | SAMPLE VS. TIME|
000001B0: 20 4F 52 20 20 20 20 20 20 4E 55 4D 42 45 52 20 | OR NUMBER |
000001C0: 4F 46 20 50 41 52 54 49 43 4C 45 53 20 56 53 2E |OF PARTICLES VS.|
000001D0: 20 54 49 4D 45 2E 22 00 FD 05 46 00 99 22 11 11 | TIME."...F.."..|
000001E0: 11 12 D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 |...RESS ANY KEY |
000001F0: 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 22 00 0F 06 |TO CONTINUE."...|
00000200: 50 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 38 30 00 |P..A$:.A$."".80.|
00000210: 18 06 55 00 99 22 93 22 00 46 06 5A 00 99 3A 99 |..U..".".F.Z..:.|
00000220: 22 D0 4C 45 41 53 45 20 4E 4F 54 45 2C 20 46 4F |".LEASE NOTE, FO|
00000230: 52 20 54 48 45 20 54 41 42 4C 45 20 59 4F 55 20 |R THE TABLE YOU |
00000240: 4D 55 53 54 20 22 00 72 06 64 00 99 22 49 4E 50 |MUST ".r.d.."INP|
00000250: 55 54 20 54 4F 54 41 4C 20 54 49 4D 45 20 41 4E |UT TOTAL TIME AN|
00000260: 44 20 54 49 4D 45 20 49 4E 43 52 45 4D 45 4E 54 |D TIME INCREMENT|
00000270: 2E 22 00 B9 06 6E 00 99 22 D9 4F 55 20 57 49 4C |."...n..".OU WIL|
00000280: 4C 20 42 45 20 41 44 56 49 53 45 44 20 4F 4E 20 |L BE ADVISED ON |
00000290: 54 48 45 20 53 4D 41 4C 4C 45 53 54 20 20 20 20 |THE SMALLEST |
000002A0: 20 54 49 4D 45 20 49 4E 43 52 45 4D 45 4E 54 20 | TIME INCREMENT |
000002B0: 41 4C 4C 4F 57 45 44 2E 22 00 FB 06 78 00 99 3A |ALLOWED."...x..:|
000002C0: 99 3A 99 22 C9 46 20 59 4F 55 20 4E 45 45 44 20 |.:.".F YOU NEED |
000002D0: 41 20 43 4F 50 59 20 4F 46 20 54 48 45 20 54 41 |A COPY OF THE TA|
000002E0: 42 4C 45 2C 20 4D 41 4B 45 20 20 20 53 55 52 45 |BLE, MAKE SURE|
000002F0: 20 59 4F 55 20 43 4F 50 59 22 3B 00 37 07 82 00 | YOU COPY";.7...|
00000300: 99 22 20 49 54 20 44 4F 57 4E 20 42 45 46 4F 52 |." IT DOWN BEFOR|
00000310: 45 20 59 4F 55 20 45 58 41 4D 49 4E 45 54 48 45 |E YOU EXAMINETHE|
00000320: 20 43 4F 4D 50 55 54 45 52 20 44 52 41 57 4E 20 | COMPUTER DRAWN |
00000330: 47 52 41 50 48 2E 22 00 55 07 8C 00 99 3A 99 3A |GRAPH.".U....:.:|
00000340: 99 22 34 2E 11 C5 4E 44 20 4F 46 20 50 52 4F 47 |."4...ND OF PROG|
00000350: 52 41 4D 2E 22 00 8A 07 96 00 99 3A 99 3A 99 22 |RAM."......:.:."|
00000360: D0 4C 45 41 53 45 20 4E 4F 54 45 3A 20 49 4E 20 |.LEASE NOTE: IN |
00000370: 41 4E 59 20 4F 4E 45 20 50 52 4F 42 4C 45 4D 20 |ANY ONE PROBLEM |
00000380: 59 4F 55 20 4D 55 53 54 22 3B 00 C0 07 A0 00 99 |YOU MUST";......|
00000390: 22 41 4C 57 41 59 53 20 49 4E 50 55 54 20 54 49 |"ALWAYS INPUT TI|
000003A0: 4D 45 20 56 41 4C 55 45 53 20 49 4E 20 54 48 45 |ME VALUES IN THE|
000003B0: 20 53 41 4D 45 20 20 20 20 55 4E 49 54 53 2E 22 | SAME UNITS."|
000003C0: 00 C8 07 C8 00 99 3A 99 00 E3 07 72 01 99 22 D7 |......:....r..".|
000003D0: 48 41 54 20 49 53 20 59 4F 55 52 20 43 48 4F 49 |HAT IS YOUR CHOI|
000003E0: 43 45 22 00 EB 07 7C 01 85 20 58 00 00 08 86 01 |CE"...|.. X.....|
000003F0: 91 20 58 20 89 34 35 30 2C 35 36 30 2C 36 33 35 |. X .450,560,635|
00000400: 00 11 08 90 01 8B 20 58 B3 B1 34 20 A7 20 33 37 |...... X..4 . 37|
00000410: 30 00 1B 08 9A 01 89 31 32 38 30 00 5F 08 C2 01 |0......1280._...|
00000420: 99 22 93 22 3A 20 99 22 D7 48 41 54 20 49 53 20 |.".": .".HAT IS |
00000430: 54 48 45 20 49 4E 49 54 49 41 4C 20 52 45 41 44 |THE INITIAL READ|
00000440: 49 4E 47 20 4F 4E 20 54 48 45 20 20 20 20 20 20 |ING ON THE |
00000450: 47 45 49 47 45 52 20 43 4F 55 4E 54 45 52 22 00 |GEIGER COUNTER".|
00000460: 68 08 C7 01 99 3A 85 42 00 8D 08 CC 01 99 3A 99 |h....:.B......:.|
00000470: 22 D7 48 41 54 20 49 53 20 54 48 45 20 53 45 43 |".HAT IS THE SEC|
00000480: 4F 4E 44 20 52 45 41 44 49 4E 47 2E 22 00 95 08 |OND READING."...|
00000490: D1 01 85 20 41 00 C1 08 D6 01 99 3A 99 22 D7 48 |... A......:.".H|
000004A0: 41 54 20 49 53 20 54 48 45 20 54 49 4D 45 20 42 |AT IS THE TIME B|
000004B0: 45 54 57 45 45 4E 20 52 45 41 44 49 4E 47 53 2E |ETWEEN READINGS.|
000004C0: 22 00 C9 08 DB 01 85 20 43 00 D9 08 E0 01 8B 20 |"...... C...... |
000004D0: 41 B1 42 20 A7 20 35 31 30 00 19 09 EA 01 99 3A |A.B . 510......:|
000004E0: 99 22 C9 4E 49 54 49 41 4C 20 52 45 41 44 49 4E |.".NITIAL READIN|
000004F0: 47 20 49 53 20 41 4C 57 41 59 53 20 4C 4F 57 45 |G IS ALWAYS LOWE|
00000500: 52 20 54 48 41 4E 20 20 20 20 46 49 4E 41 4C 20 |R THAN FINAL |
00000510: 52 45 41 44 49 4E 47 2E 22 00 2C 09 EF 01 81 20 |READING.".,.... |
00000520: 5A B2 31 20 A4 20 35 30 30 30 3A 82 00 35 09 F4 |Z.1 . 5000:..5..|
00000530: 01 89 34 35 30 00 4C 09 FE 01 44 B2 28 2E 36 39 |..450.L...D.(.69|
00000540: 33 31 AC 43 29 AD BC 28 41 AD 42 29 00 55 09 08 |31.C)..(A.B).U..|
00000550: 02 99 22 93 22 00 73 09 12 02 99 3A 99 22 C9 4E |..".".s....:.".N|
00000560: 49 54 49 41 4C 20 52 45 41 44 49 4E 47 20 3D 20 |ITIAL READING = |
00000570: 22 3B 42 00 90 09 15 02 99 3A 99 22 D3 45 43 4F |";B......:.".ECO|
00000580: 4E 44 20 52 45 41 44 49 4E 47 20 3D 20 22 3B 41 |ND READING = ";A|
00000590: 00 A3 09 19 02 99 3A 99 22 D4 49 4D 45 20 3D 20 |......:.".IME = |
000005A0: 22 3B 43 00 BB 09 1C 02 99 3A 99 22 C8 41 4C 46 |";C......:.".ALF|
000005B0: 2D 4C 49 46 45 20 3D 20 22 3B 44 00 C5 09 21 02 |-LIFE = ";D...!.|
000005C0: 99 3A 99 3A 99 00 CF 09 26 02 89 20 33 37 30 00 |.:.:....&.. 370.|
000005D0: F3 09 30 02 99 22 93 22 3A 85 22 D7 48 41 54 20 |..0..".":.".HAT |
000005E0: 49 53 20 54 48 45 20 48 41 4C 46 2D 4C 49 46 45 |IS THE HALF-LIFE|
000005F0: 22 3B 45 00 21 0A 3A 02 99 3A 85 22 D7 48 41 54 |";E.!.:..:.".HAT|
00000600: 20 49 53 20 54 48 45 20 49 4E 49 54 49 41 4C 20 | IS THE INITIAL |
00000610: 4D 41 53 53 20 4F 46 20 53 41 4D 50 4C 45 22 3B |MASS OF SAMPLE";|
00000620: 46 00 4C 0A 44 02 99 3A 85 22 D7 48 41 54 20 49 |F.L.D..:.".HAT I|
00000630: 53 20 54 48 45 20 54 4F 54 41 4C 20 54 49 4D 45 |S THE TOTAL TIME|
00000640: 20 4F 46 20 44 45 43 41 59 22 3B 47 00 55 0A 49 | OF DECAY";G.U.I|
00000650: 02 99 22 93 22 00 6B 0A 4E 02 48 B2 46 AC BD 28 |..".".k.N.H.F..(|
00000660: AB 2E 36 39 33 31 AC 47 AD 45 29 00 83 0A 62 02 |..6931.G.E)...b.|
00000670: 99 3A 99 22 C8 41 4C 46 2D 4C 49 46 45 20 3D 20 |.:.".ALF-LIFE = |
00000680: 22 3B 45 00 9E 0A 65 02 99 3A 99 22 C9 4E 49 54 |";E...e..:.".NIT|
00000690: 49 41 4C 20 4D 41 53 53 20 3D 20 22 3B 46 00 B7 |IAL MASS = ";F..|
000006A0: 0A 6C 02 99 3A 99 22 D4 4F 54 41 4C 20 54 49 4D |.l..:.".OTAL TIM|
000006B0: 45 20 3D 20 22 3B 47 00 DE 0A 71 02 99 3A 99 22 |E = ";G...q..:."|
000006C0: CD 41 53 53 20 4F 46 20 53 41 4D 50 4C 45 20 52 |.ASS OF SAMPLE R|
000006D0: 45 4D 41 49 4E 49 4E 47 20 3D 20 22 3B 48 00 E8 |EMAINING = ";H..|
000006E0: 0A 73 02 99 3A 99 3A 99 00 F2 0A 76 02 89 20 33 |.s..:.:....v.. 3|
000006F0: 37 30 00 FD 0A 7B 02 99 22 93 22 3A 99 00 32 0B |70...{..".":..2.|
00000700: 80 02 99 22 C4 4F 20 59 4F 55 20 57 41 4E 54 20 |...".O YOU WANT |
00000710: 54 4F 20 57 4F 52 4B 20 57 49 54 48 20 50 41 52 |TO WORK WITH PAR|
00000720: 54 49 43 4C 45 53 20 4F 52 20 20 20 4D 41 53 53 |TICLES OR MASS|
00000730: 3F 22 00 62 0B 8A 02 99 3A 85 22 28 49 4E 50 55 |?".b....:."(INPU|
00000740: 54 20 31 20 46 4F 52 20 50 41 52 54 49 43 4C 45 |T 1 FOR PARTICLE|
00000750: 53 2C 20 32 20 46 4F 52 20 4D 41 53 53 20 29 22 |S, 2 FOR MASS )"|
00000760: 3B 4A 00 6B 0B 94 02 99 22 93 22 00 7B 0B A8 02 |;J.k....".".{...|
00000770: 8B 20 4A B2 31 20 A7 20 38 34 30 00 8D 0B B2 02 |. J.1 . 840.....|
00000780: 8B 20 4A B3 B1 20 32 20 A7 20 36 33 35 00 AF 0B |. J.. 2 . 635...|
00000790: BC 02 99 3A 85 22 D7 48 41 54 20 49 53 20 54 48 |...:.".HAT IS TH|
000007A0: 45 20 48 41 4C 46 20 4C 49 46 45 20 22 3B 45 00 |E HALF LIFE ";E.|
000007B0: DD 0B C6 02 99 3A 85 22 D7 48 41 54 20 49 53 20 |.....:.".HAT IS |
000007C0: 54 48 45 20 49 4E 49 54 49 41 4C 20 4D 41 53 53 |THE INITIAL MASS|
000007D0: 20 4F 46 20 53 41 4D 50 4C 45 22 3B 46 00 0B 0C | OF SAMPLE";F...|
000007E0: D0 02 99 3A 85 22 D7 48 41 54 20 49 53 20 54 48 |...:.".HAT IS TH|
000007F0: 45 20 45 4C 41 50 53 45 44 20 54 49 4D 45 20 46 |E ELAPSED TIME F|
00000800: 4F 52 20 44 45 43 41 59 22 3B 4B 00 3B 0C D5 02 |OR DECAY";K.;...|
00000810: 99 3A 99 22 D7 48 41 54 20 49 53 20 54 48 44 20 |.:.".HAT IS THD |
00000820: 49 4E 43 52 45 4D 45 4E 54 20 4F 46 20 45 4C 41 |INCREMENT OF ELA|
00000830: 50 53 45 44 20 54 49 4D 45 2E 22 00 67 0C DA 02 |PSED TIME.".g...|
00000840: 99 3A 99 22 CD 49 4E 49 4D 55 4D 20 49 4E 43 52 |.:.".INIMUM INCR|
00000850: 45 4D 45 4E 54 20 49 53 20 22 3B B5 28 4B AD 31 |EMENT IS ";.(K.1|
00000860: 35 29 3B 3A 85 20 4D 00 98 0C DF 02 8B 4D B3 B5 |5);:. M......M..|
00000870: 28 4B AD 31 35 29 20 A7 20 99 22 D4 52 59 20 41 |(K.15) . .".RY A|
00000880: 20 4C 41 52 47 45 52 20 49 4E 43 52 45 4D 45 4E | LARGER INCREMEN|
00000890: 54 22 3A 89 20 37 33 30 00 A0 0C E4 02 57 B2 30 |T":. 730.....W.0|
000008A0: 00 A8 0C EE 02 51 B2 4F 00 B0 0C F8 02 5A B2 46 |.....Q.O.....Z.F|
000008B0: 00 B9 0C 02 03 99 22 93 22 00 C3 0C 2A 03 99 22 |......"."...*.."|
000008C0: 11 11 22 00 F1 0C 2F 03 99 22 D4 49 4D 45 2C 20 |..".../..".IME, |
000008D0: CD 41 53 53 2C 20 CD 41 53 53 20 4C 4F 53 53 2C |.ASS, .ASS LOSS,|
000008E0: 20 D4 4F 54 41 4C 20 4D 41 53 53 20 4C 4F 53 53 | .OTAL MASS LOSS|
000008F0: 22 00 FA 0C 3E 03 89 39 34 30 00 03 0D 43 03 99 |"...>..940...C..|
00000900: 22 93 22 00 24 0D 48 03 99 3A 85 22 D7 48 41 54 |".".$.H..:.".HAT|
00000910: 20 49 53 20 54 48 45 20 48 41 4C 46 2D 4C 49 46 | IS THE HALF-LIF|
00000920: 45 22 3B 45 00 6B 0D 52 03 99 3A 85 22 D7 48 41 |E";E.k.R..:.".HA|
00000930: 54 20 49 53 20 54 48 45 20 49 4E 49 54 49 41 4C |T IS THE INITIAL|
00000940: 20 4E 55 4D 42 45 52 20 4F 46 20 50 41 52 54 49 | NUMBER OF PARTI|
00000950: 43 4C 45 53 20 28 4D 41 58 49 4D 55 4D 20 4F 46 |CLES (MAXIMUM OF|
00000960: 20 39 39 39 39 39 39 39 22 3B 46 00 97 0D 5C 03 | 9999999";F...\.|
00000970: 99 3A 85 22 D7 48 41 54 20 49 53 20 54 48 45 20 |.:.".HAT IS THE |
00000980: 54 4F 54 41 4C 20 54 49 4D 45 20 46 4F 52 20 44 |TOTAL TIME FOR D|
00000990: 45 43 41 59 22 3B 4B 00 C7 0D 61 03 99 3A 99 22 |ECAY";K...a..:."|
000009A0: D7 48 41 54 20 49 53 20 54 48 45 20 49 4E 43 52 |.HAT IS THE INCR|
000009B0: 45 4D 45 4E 54 20 4F 46 20 45 4C 41 50 53 45 44 |EMENT OF ELAPSED|
000009C0: 20 54 49 4D 45 2E 22 00 F2 0D 66 03 99 3A 99 22 | TIME."...f..:."|
000009D0: CD 49 4E 49 4D 55 4D 20 49 4E 43 52 45 4D 45 4E |.INIMUM INCREMEN|
000009E0: 54 20 49 53 20 22 3B B5 28 4B AD 31 35 29 3B 3A |T IS ";.(K.15);:|
000009F0: 85 4D 00 22 0E 6B 03 8B 4D B3 B5 28 4B AD 31 35 |.M.".k..M..(K.15|
00000A00: 29 20 A7 99 22 D4 52 59 20 41 20 4C 41 52 47 45 |) ..".RY A LARGE|
00000A10: 52 20 49 4E 43 52 45 4D 45 4E 54 2E 22 3A 89 38 |R INCREMENT.":.8|
00000A20: 37 30 00 37 0E 70 03 99 22 93 22 3A 57 B2 30 3A |70.7.p..".":W.0:|
00000A30: 51 B2 30 3A 5A B2 46 00 41 0E 8E 03 99 22 11 11 |Q.0:Z.F.A...."..|
00000A40: 22 00 6F 0E 98 03 99 22 D4 49 4D 45 2C 20 D0 41 |".o....".IME, .A|
00000A50: 52 54 49 43 4C 45 53 2C 20 D0 41 52 54 2E 4C 4F |RTICLES, .ART.LO|
00000A60: 53 53 20 20 D4 4F 54 41 4C 20 4C 4F 53 53 22 00 |SS .OTAL LOSS".|
00000A70: 75 0E AC 03 99 00 87 0E B6 03 81 20 47 B2 30 20 |u.......... G.0 |
00000A80: A4 20 4B 20 A9 20 4D 00 9D 0E C0 03 48 B2 46 AC |. K . M.....H.F.|
00000A90: BD 28 AB 2E 36 39 33 31 AC 47 AD 45 29 00 AA 0E |.(..6931.G.E)...|
00000AA0: CA 03 57 B2 B6 28 48 AB 5A 29 00 B4 0E D4 03 51 |..W..(H.Z).....Q|
00000AB0: B2 51 AA 57 00 C9 0E DE 03 8B 20 46 B1 31 2E 45 |.Q.W...... F.1.E|
00000AC0: AA 36 20 A7 20 31 30 31 30 00 DA 0E E8 03 8B 20 |.6 . 1010...... |
00000AD0: 4A B2 31 20 A7 20 31 30 33 30 00 04 0F F2 03 99 |J.1 . 1030......|
00000AE0: 47 3B A3 36 29 B5 28 48 AA 2E 35 29 3B A3 31 37 |G;.6).(H..5);.17|
00000AF0: 29 B5 28 57 AA 2E 35 29 3B A3 32 38 29 B5 28 51 |).(W..5);.28).(Q|
00000B00: AA 2E 35 29 00 0F 0F FC 03 89 20 31 30 34 30 00 |..5)...... 1040.|
00000B10: 39 0F 06 04 99 47 3B A3 36 29 B5 28 48 AA 2E 35 |9....G;.6).(H..5|
00000B20: 29 3B A3 31 38 29 B5 28 57 AA 2E 35 29 3B A3 32 |);.18).(W..5);.2|
00000B30: 39 29 B5 28 51 AA 2E 35 29 00 41 0F 10 04 5A B2 |9).(Q..5).A...Z.|
00000B40: 48 00 49 0F 1A 04 82 20 47 00 76 0F 42 04 99 3A |H.I.... G.v.B..:|
00000B50: 99 22 C4 4F 20 59 4F 55 20 57 41 4E 54 20 54 48 |.".O YOU WANT TH|
00000B60: 45 20 41 42 4F 56 45 20 44 41 54 41 20 47 52 41 |E ABOVE DATA GRA|
00000B70: 50 48 45 44 3F 22 00 95 0F 4C 04 85 22 28 31 20 |PHED?"...L.."(1 |
00000B80: 46 4F 52 20 59 45 53 2C 20 30 20 46 4F 52 20 4E |FOR YES, 0 FOR N|
00000B90: 4F 29 22 3B 52 00 A5 0F 56 04 8B 20 52 B2 30 20 |O)";R...V.. R.0 |
00000BA0: A7 20 33 37 30 00 B8 0F 60 04 8B 20 52 B3 B1 20 |. 370...`.. R.. |
00000BB0: 31 20 A7 20 31 30 39 30 00 C1 0F 6A 04 99 22 93 |1 . 1090...j..".|
00000BC0: 22 00 F1 0F 88 04 99 22 D4 49 4D 45 22 3B A3 31 |"......".IME";.1|
00000BD0: 30 29 22 CD 41 53 53 20 28 4F 52 20 50 41 52 54 |0)".ASS (OR PART|
00000BE0: 49 43 4C 45 53 29 20 52 45 4D 41 49 4E 49 4E 47 |ICLES) REMAINING|
00000BF0: 22 00 F9 0F 92 04 99 3A 99 00 09 10 B0 04 81 20 |"......:....... |
00000C00: 47 B2 30 A4 20 4B 20 A9 4D 00 1F 10 BA 04 48 B2 |G.0. K .M.....H.|
00000C10: 46 AC BD 28 AB 2E 36 39 33 31 AC 47 AD 45 29 00 |F..(..6931.G.E).|
00000C20: 33 10 C4 04 48 31 B2 B5 28 48 AD 46 AC 33 30 AA |3...H1..(H.F.30.|
00000C30: 2E 35 29 00 46 10 CE 04 8B 20 48 31 B3 B2 33 30 |.5).F.... H1..30|
00000C40: 20 A7 31 32 35 30 00 50 10 D8 04 48 31 B2 33 30 | .1250.P...H1.30|
00000C50: 00 62 10 E2 04 99 47 3B A3 48 31 AA 36 29 3B 22 |.b....G;.H1.6);"|
00000C60: 2A 22 00 68 10 EC 04 82 00 6E 10 F1 04 99 00 78 |*".h.....n.....x|
00000C70: 10 F6 04 89 20 33 37 30 00 7E 10 00 05 80 00 00 |.... 370.~......|
00000C80: 00 |. |
....... DECAY.R.J.LAMB.1980.)....59468,1
4.2....".".P.....11)"RADIOACTIVE DECAY."
.N.....11)"------------------"......:.:.
"THIS PROGRAM WILL DO THE FOLLOWING:".I.
#..:."1..CALCULATE A HALF-LIFE FROM TWO
"...(.."READINGS ON A GIEGER COUNTER."..
.-..:."2..CALCULATE HOW MUCH OF A RADIOA
CTIVE ".V.2.."SAMPLE WILL REMAIN AFTER A
GIVEN AMOUNT OF TIME....7..:."3..PRINT
OUT A TABLE (AND OPTIONAL GRAPH)";.W.<..
"SHOWING MASS OF SAMPLE VS. TIME OR
NUMBER OF PARTICLES VS. TIME."...F.."..
..PRESS ANY KEY TO CONTINUE."...P..A$:.A
$."".80...U..".".F.Z..:."PLEASE NOTE, FO
R THE TABLE YOU MUST ".R.D.."INPUT TOTAL
TIME AND TIME INCREMENT."...N.."YOU WIL
L BE ADVISED ON THE SMALLEST TIME IN
CREMENT ALLOWED."...X..:.:."IF YOU NEED
A COPY OF THE TABLE, MAKE SURE YOU COP
Y";.7...." IT DOWN BEFORE YOU EXAMINETHE
COMPUTER DRAWN GRAPH.".U....:.:."4..END
OF PROGRAM."......:.:."PLEASE NOTE: IN
ANY ONE PROBLEM YOU MUST";... .."ALWAYS
INPUT TIME VALUES IN THE SAME UNITS."
.H.H..:....R.."WHAT IS YOUR CHOICE"...|.
. X...... X .450,560,635...... X..4 . 37
0......1280._.B..".": ."WHAT IS THE INIT
IAL READING ON THE GEIGER COUNTER".
H.G..:.B...L..:."WHAT IS THE SECOND READ
ING."...Q.. A.A.V..:."WHAT IS THE TIME B
ETWEEN READINGS.".I.... C.Y.... A.B . 51
0......:."INITIAL READING IS ALWAYS LOWE
R THAN FINAL READING.".,.... Z.1 . 50
00:..5....450.L...D.(.6931.C)..(A.B).U..
..".".S....:."INITIAL READING = ";B.....
.:."SECOND READING = ";A......:."TIME =
";C......:."HALF-LIFE = ";D.E.!..:.:..O.
&.. 370...0..".":."WHAT IS THE HALF-LIFE
";E.!.:..:."WHAT IS THE INITIAL MASS OF
SAMPLE";F.L.D..:."WHAT IS THE TOTAL TIME
OF DECAY";G.U.I..".".K.N.H.F..(..6931.G
.E)...B..:."HALF-LIFE = ";E...E..:."INIT
IAL MASS = ";F...L..:."TOTAL TIME = ";G.
..Q..:."MASS OF SAMPLE REMAINING = ";H..
.S..:.:....V.. 370...{..".":..2...."DO Y
OU WANT TO WORK WITH PARTICLES OR MASS
?".B....:."(INPUT 1 FOR PARTICLES, 2 FOR
MASS )";J.K....".".{.... J.1 . 840.....
. J.. 2 . 635......:."WHAT IS THE HALF L
IFE ";E...F..:."WHAT IS THE INITIAL MASS
OF SAMPLE";F...P..:."WHAT IS THE ELAPSE
D TIME FOR DECAY";K.;.U..:."WHAT IS THD
INCREMENT OF ELAPSED TIME.".G.Z..:."MINI
MUM INCREMENT IS ";.(K.15);:. M......M..
(K.15) . ."TRY A LARGER INCREMENT":. 730
. ...W.0.....Q.O.....Z.F......".".C.*.."
..".../.."TIME, MASS, MASS LOSS, TOTAL M
ASS LOSS"...>..940...C..".".$.H..:."WHAT
IS THE HALF-LIFE";E.K.R..:."WHAT IS THE
INITIAL NUMBER OF PARTICLES (MAXIMUM OF
9999999";F...\..:."WHAT IS THE TOTAL TI
ME FOR DECAY";K.G.A..:."WHAT IS THE INCR
EMENT OF ELAPSED TIME."...F..:."MINIMUM
INCREMENT IS ";.(K.15);:.M.".K..M..(K.15
) .."TRY A LARGER INCREMENT.":.870.7.P..
".":W.0:Q.0:Z.F.A...."..".O...."TIME, PA
RTICLES, PART.LOSS TOTAL LOSS".U.......
... G.0 . K . M.....H.F..(..6931.G.E)...
J.W..(H.Z)...T.Q.Q.W.I.... F.1.E.6 . 101
0.Z.... J.1 . 1030......G;.6).(H..5);.17
).(W..5);.28).(Q..5)...... 1040.9....G;.
6).(H..5);.18).(W..5);.29).(Q..5).A...Z.
H.I.... G.V.B..:."DO YOU WANT THE ABOVE
DATA GRAPHED?"...L.."(1 FOR YES, 0 FOR N
O)";R...V.. R.0 . 370...`.. R.. 1 . 1090
.A.J.."."......"TIME";.10)"MASS (OR PART
ICLES) REMAINING"......:....... G.0. K .
M.....H.F..(..6931.G.E).3.D.H1..(H.F.30.
.5).F.N.. H1..30 .1250.P.X.H1.30.B....G;
.H1.6);"*".H.....N.....X.... 370.~......
.
> CLICK IMAGE PREVIEW FOR FULL MODAL