RANDOM
FILE INFORMATION
FILENAME(S): RANDOM
FILE TYPE(S): PRG
FILE SIZE: 1K
FIRST SEEN: 2025-11-30 21:12:21
APPEARS ON: 2 disk(s)
FILE HASH
e4a68d5fe297f374ef398bacfbbafc6112e4d5ff14cebb7d41d6f4d9ad61d1d6
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RANS ISK1 | RANDOM | PRG | DuncanTwain | 28 | 5 | DOWNLOAD FILE |
| RANS ISK2 | RANDOM | PRG | DuncanTwain | 28 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 00 00 8F 20 52 41 4E 44 4F 4D 20 28 |..).... RANDOM (| 00000010: 41 55 47 20 32 34 2F 38 34 29 20 20 20 20 20 20 |AUG 24/84) | 00000020: 20 20 20 20 20 20 20 20 3A 00 2F 08 01 00 3A 00 | :./...:.| 00000030: 4F 08 02 00 8F 20 30 20 53 54 41 54 45 4D 45 4E |O.... 0 STATEMEN| 00000040: 54 53 2C 20 20 31 20 46 55 4E 43 54 49 4F 4E 00 |TS, 1 FUNCTION.| 00000050: 55 08 03 00 3A 00 72 08 04 00 8F 20 4B 45 59 57 |U...:.r.... KEYW| 00000060: 4F 52 44 20 43 48 41 52 41 43 54 45 52 53 3A 20 |ORD CHARACTERS: | 00000070: 20 37 00 78 08 05 00 3A 00 A0 08 06 00 8F 20 4B | 7.x...:...... K| 00000080: 45 59 57 4F 52 44 20 20 20 20 20 52 4F 55 54 49 |EYWORD ROUTI| 00000090: 4E 45 20 20 4C 49 4E 45 20 20 20 53 45 52 20 23 |NE LINE SER #| 000000A0: 00 C7 08 07 00 8F 20 46 2F 52 41 4E 44 4F 4D 28 |...... F/RANDOM(| 000000B0: 20 20 20 52 4E 44 4D 20 20 20 20 20 33 32 31 36 | RNDM 3216| 000000C0: 20 20 20 20 30 32 37 00 CD 08 08 00 3A 00 E7 08 | 027.....:...| 000000D0: 09 00 8F 20 55 2F 50 53 48 46 50 31 20 28 33 32 |... U/PSHFP1 (32| 000000E0: 37 30 2F 30 36 33 29 00 00 09 0A 00 8F 20 55 2F |70/063)...... U/| 000000F0: 50 55 4C 35 37 20 28 33 33 30 38 2F 30 36 34 29 |PUL57 (3308/064)| 00000100: 00 06 09 0B 00 3A 00 2D 09 0C 00 8F 20 3D 3D 3D |.....:.-.... ===| 00000110: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================| 00000120: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 33 09 |=============.3.| 00000130: 0D 00 3A 00 44 09 5D 02 2E C6 20 22 52 41 4E 44 |..:.D.]... "RAND| 00000140: 4F 4D A8 22 00 52 09 45 06 2E 57 B0 44 20 BB 4D |OM.".R.E..W.D .M| 00000150: AB 31 00 63 09 90 0C BB 4D 20 4A 53 52 20 24 41 |.1.c....M JSR $A| 00000160: 44 38 41 00 71 09 92 0C 4A 53 52 20 24 42 43 43 |D8A.q...JSR $BCC| 00000170: 43 00 80 09 94 0C 4A 53 52 20 50 53 48 46 50 31 |C.....JSR PSHFP1| 00000180: 00 8E 09 96 0C 4A 53 52 20 24 41 45 46 44 00 9C |.....JSR $AEFD..| 00000190: 09 98 0C 4A 53 52 20 24 41 45 46 34 00 AA 09 9A |...JSR $AEF4....| 000001A0: 0C 4A 53 52 20 24 42 43 43 43 00 B8 09 9C 0C 4A |.JSR $BCCC.....J| 000001B0: 53 52 20 24 42 38 34 39 00 C6 09 9E 0C 4A 53 52 |SR $B849.....JSR| 000001C0: 20 24 42 38 34 39 00 D4 09 A0 0C 4A 53 52 20 50 | $B849.....JSR P| 000001D0: 55 4C 35 37 00 E1 09 A2 0C 4C 44 41 20 23 24 35 |UL57.....LDA #$5| 000001E0: 37 00 EC 09 A4 0C 4C 44 59 20 23 30 00 FA 09 A6 |7.....LDY #0....| 000001F0: 0C 4A 53 52 20 24 42 38 35 30 00 08 0A A8 0C 4A |.JSR $B850.....J| 00000200: 53 52 20 24 42 43 32 42 00 13 0A AA 0C 43 4D 50 |SR $BC2B.....CMP| 00000210: 20 23 31 00 20 0A AC 0C 42 45 51 20 52 44 4D 31 | #1. ...BEQ RDM1| 00000220: 00 2E 0A AE 0C 4A 53 52 20 24 42 43 35 38 00 3C |.....JSR $BC58.<| 00000230: 0A B0 0C 4A 53 52 20 24 42 42 43 37 00 4A 0A B2 |...JSR $BBC7.J..| 00000240: 0C 4A 53 52 20 24 45 30 42 45 00 57 0A B4 0C 4C |.JSR $E0BE.W...L| 00000250: 44 41 20 23 24 35 43 00 62 0A B6 0C 4C 44 59 20 |DA #$5C.b...LDY | 00000260: 23 30 00 70 0A B8 0C 4A 53 52 20 24 42 41 32 38 |#0.p...JSR $BA28| 00000270: 00 7D 0A BA 0C 4C 44 41 20 23 24 35 37 00 88 0A |.}...LDA #$57...| 00000280: BC 0C 4C 44 59 20 23 30 00 96 0A BE 0C 4A 53 52 |..LDY #0.....JSR| 00000290: 20 24 42 38 36 37 00 A4 0A C0 0C 4A 4D 50 20 24 | $B867.....JMP $| 000002A0: 42 43 43 43 00 B7 0A C2 0C 52 44 4D 31 20 4A 4D |BCCC.....RDM1 JM| 000002B0: 50 20 24 42 32 34 38 00 BD 0A C4 0C 3B 00 CF 0A |P $B248.....;...| 000002C0: C6 0C 50 53 48 46 50 31 20 4C 44 41 20 23 33 00 |..PSHFP1 LDA #3.| 000002D0: DD 0A C8 0C 4A 53 52 20 24 41 33 46 42 00 E5 0A |....JSR $A3FB...| 000002E0: CA 0C 50 4C 41 00 F1 0A CC 0C 53 54 41 20 24 37 |..PLA.....STA $7| 000002F0: 31 00 F9 0A CE 0C 50 4C 41 00 05 0B D0 0C 53 54 |1.....PLA.....ST| 00000300: 41 20 24 37 32 00 13 0B D2 0C 4A 53 52 20 24 42 |A $72.....JSR $B| 00000310: 42 43 41 00 1E 0B D4 0C 4C 44 58 20 23 30 00 31 |BCA.....LDX #0.1| 00000320: 0B D6 0C 50 48 46 31 20 4C 44 41 20 24 35 37 2C |...PHF1 LDA $57,| 00000330: 58 00 39 0B D8 0C 50 48 41 00 41 0B DA 0C 49 4E |X.9...PHA.A...IN| 00000340: 58 00 4C 0B DC 0C 43 50 58 20 23 35 00 59 0B DE |X.L...CPX #5.Y..| 00000350: 0C 42 4E 45 20 50 48 46 31 00 6A 0B E0 0C 50 48 |.BNE PHF1.j...PH| 00000360: 46 32 20 4C 44 41 20 24 37 32 00 72 0B E2 0C 50 |F2 LDA $72.r...P| 00000370: 48 41 00 7E 0B E4 0C 4C 44 41 20 24 37 31 00 86 |HA.~...LDA $71..| 00000380: 0B E6 0C 50 48 41 00 8E 0B E8 0C 52 54 53 00 94 |...PHA.....RTS..| 00000390: 0B EA 0C 3B 00 A2 0B EC 0C 50 55 4C 35 37 20 50 |...;.....PUL57 P| 000003A0: 4C 41 00 AE 0B EE 0C 53 54 41 20 24 37 31 00 B6 |LA.....STA $71..| 000003B0: 0B F0 0C 50 4C 41 00 C2 0B F2 0C 53 54 41 20 24 |...PLA.....STA $| 000003C0: 37 32 00 CD 0B F4 0C 4C 44 58 20 23 34 00 DA 0B |72.....LDX #4...| 000003D0: F6 0C 50 4C 35 37 20 50 4C 41 00 E8 0B F8 0C 53 |..PL57 PLA.....S| 000003E0: 54 41 20 24 35 37 2C 58 00 F0 0B FA 0C 44 45 58 |TA $57,X.....DEX| 000003F0: 00 FD 0B FC 0C 42 50 4C 20 50 4C 35 37 00 0A 0C |.....BPL PL57...| 00000400: FE 0C 42 4D 49 20 50 48 46 32 00 10 0C 00 0D 3B |..BMI PHF2.....;| 00000410: 00 00 00 |... |
..).... RANDOM (AUG 24/84) :./...:.O.... 0 STATEMENTS, 1 FUNCTION. U...:.R.... KEYWORD CHARACTERS: 7.X...: . .... KEYWORD ROUTINE LINE SER # .G.... F/RANDOM( RNDM 3216 027. M...:...... U/PSHFP1 (3270/063)...... U/ PUL57 (3308/064).....:.-.... =========== =====================.3...:.D.]..F "RAND OM.".R.E..W.D .M.1.C....M JSR $AD8A.Q... JSR $BCCC.....JSR PSHFP1.....JSR $AEFD.. ...JSR $AEF4.....JSR $BCCC.....JSR $B849 .F...JSR $B849.T. .JSR PUL57.....LDA #$5 7.....LDY #0.....JSR $B850.....JSR $BC2B .....CMP #1. ...BEQ RDM1.....JSR $BC58.< ...JSR $BBC7.J...JSR $E0BE.W...LDA #$5C. B...LDY #0.P...JSR $BA28.}...LDA #$57... ..LDY #0.....JSR $B867.....JMP $BCCC...B .RDM1 JMP $B248...D.;.O.F.PSHFP1 LDA #3. ..H.JSR $A3FB...J.PLA...L.STA $71...N.PL A...P.STA $72...R.JSR $BBCA...T.LDX #0.1 .V.PHF1 LDA $57,X.9.X.PHA.A.Z.INX.L...CP X #5.Y...BNE PHF1.J...PHF2 LDA $72.R...P HA.~...LDA $71.....PHA.....RTS.....;.... .PUL57 PLA.....STA $71.....PLA.B...STA $ 72.M...LDX #4.Z...PL57 PLA.....STA $57,X .....DEX.....BPL PL57.....BMI PHF2.....; ...
> CLICK IMAGE PREVIEW FOR FULL MODAL