> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0D 08 0A 00 8B 57 B2 31 A7 36 30 00 53 08 |.......W.1.60.S.|
00000010: 14 00 8F 20 43 4F 50 59 52 49 47 48 54 20 31 39 |... COPYRIGHT 19|
00000020: 38 37 20 43 4F 4D 50 55 54 45 21 20 50 55 42 4C |87 COMPUTE! PUBL|
00000030: 49 43 41 54 49 4F 4E 53 20 49 4E 43 2E 20 2D 20 |ICATIONS INC. - |
00000040: 41 4C 4C 20 52 49 47 48 54 53 20 52 45 53 45 52 |ALL RIGHTS RESER|
00000050: 56 45 44 00 96 08 1E 00 97 35 33 32 38 30 2C 31 |VED......53280,1|
00000060: 30 3A 97 35 33 32 38 31 2C 31 30 3A 99 22 93 90 |0:.53281,10:."..|
00000070: 20 20 20 43 4F 50 59 52 49 47 48 54 20 31 39 38 | COPYRIGHT 198|
00000080: 37 20 43 4F 4D 50 55 54 45 21 20 50 55 42 2E 2C |7 COMPUTE! PUB.,|
00000090: 20 49 4E 43 2E 22 00 B5 08 28 00 99 A3 31 30 29 | INC."...(...10)|
000000A0: 22 41 4C 4C 20 52 49 47 48 54 53 20 52 45 53 45 |"ALL RIGHTS RESE|
000000B0: 52 56 45 44 22 00 CE 08 32 00 57 B2 31 3A 93 22 |RVED"...2.W.1:."|
000000C0: 53 50 45 45 44 53 4F 52 54 22 2C 38 2C 31 00 FB |SPEEDSORT",8,1..|
000000D0: 08 3C 00 85 22 93 11 48 4F 57 20 4D 41 4E 59 20 |.<.."..HOW MANY |
000000E0: 52 41 4E 44 4F 4D 20 53 54 52 49 4E 47 53 20 54 |RANDOM STRINGS T|
000000F0: 4F 20 43 52 45 41 54 45 22 3B 4E 00 2E 09 46 00 |O CREATE";N...F.|
00000100: 86 41 24 28 4E 29 3A 99 22 93 11 43 52 45 41 54 |.A$(N):."..CREAT|
00000110: 49 4E 47 22 4E 22 52 41 4E 44 4F 4D 20 53 54 52 |ING"N"RANDOM STR|
00000120: 49 4E 47 53 22 3A 41 B2 BB 28 AB 54 49 29 00 61 |INGS":A..(.TI).a|
00000130: 09 50 00 81 49 B2 31 A4 4E 3A 99 49 3B C7 28 31 |.P..I.1.N:.I;.(1|
00000140: 34 35 29 3A 4E 31 B2 B5 28 BB 28 31 29 AC 31 30 |45):N1..(.(1).10|
00000150: AA 31 29 3A 41 24 B2 22 22 3A 81 4A B2 31 A4 4E |.1):A$."":.J.1.N|
00000160: 31 00 8F 09 5A 00 42 24 B2 C7 28 B5 28 BB 28 31 |1...Z.B$..(.(.(1|
00000170: 29 AC 32 36 AA 36 35 29 29 3A 41 24 B2 41 24 AA |).26.65)):A$.A$.|
00000180: 42 24 3A 82 3A 41 24 28 49 29 B2 41 24 3A 82 00 |B$:.:A$(I).A$:..|
00000190: B4 09 64 00 99 22 11 11 50 52 45 53 53 20 41 4E |..d.."..PRESS AN|
000001A0: 59 20 4B 45 59 20 54 4F 20 53 54 41 52 54 20 53 |Y KEY TO START S|
000001B0: 4F 52 54 22 00 C7 09 6E 00 A1 53 24 3A 8B 53 24 |ORT"...n..S$:.S$|
000001C0: B2 22 22 A7 31 31 30 00 F0 09 78 00 54 31 B2 54 |."".110...x.T1.T|
000001D0: 49 3A 9E 34 39 31 35 32 2C 41 24 28 30 29 3A 54 |I:.49152,A$(0):T|
000001E0: 32 B2 54 49 3A 99 22 93 11 44 4F 4E 45 11 11 22 |2.TI:."..DONE.."|
000001F0: 00 30 0A 82 00 4D 54 24 B2 C4 28 28 54 32 AB 54 |.0...MT$..((T2.T|
00000200: 31 29 AD 36 30 29 3A 99 20 4E 22 45 4C 45 4D 45 |1).60):. N"ELEME|
00000210: 4E 54 53 20 53 4F 52 54 45 44 20 49 4E 22 C8 28 |NTS SORTED IN".(|
00000220: 4D 54 24 2C 36 29 22 20 53 45 43 4F 4E 44 53 22 |MT$,6)" SECONDS"|
00000230: 00 58 0A 8C 00 99 22 11 11 50 52 45 53 53 20 41 |.X...."..PRESS A|
00000240: 4E 59 20 4B 45 59 20 46 4F 52 20 53 4F 52 54 45 |NY KEY FOR SORTE|
00000250: 44 20 4C 49 53 54 11 22 00 6B 0A 96 00 A1 53 24 |D LIST.".k....S$|
00000260: 3A 8B 53 24 B2 22 22 A7 31 35 30 00 7F 0A A0 00 |:.S$."".150.....|
00000270: 81 49 B2 31 A4 4E 3A 99 41 24 28 49 29 3A 82 00 |.I.1.N:.A$(I):..|
00000280: 00 00 |.. |
.......W.1.60.S.... COPYRIGHT 1987 COMPU
TE! PUBLICATIONS INC. - ALL RIGHTS RESER
VED......53280,10:.53281,10:.".. COPYR
IGHT 1987 COMPUTE! PUB., INC."...(...10)
"ALL RIGHTS RESERVED".N.2.W.1:."SPEEDSOR
T",8,1...<.."..HOW MANY RANDOM STRINGS T
O CREATE";N...F..A$(N):."..CREATING"N"RA
NDOM STRINGS":A..(.TI).A.P..I.1.N:.I;G(1
45):N1..(.(1).10.1):A$."":.J.1.N1...Z.B$
.G(.(.(1).26.65)):A$.A$.B$:.:A$(I).A$:..
..D.."..PRESS ANY KEY TO START SORT".G.N
..S$:.S$."".110...X.T1.TI:.49152,A$(0):T
2.TI:."..DONE..".0...MT$.D((T2.T1).60):.
N"ELEMENTS SORTED IN"H(MT$,6)" SECONDS"
.X...."..PRESS ANY KEY FOR SORTED LIST."
.K....S$:.S$."".150.. ..I.1.N:.A$(I):..
..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL