00000000: 01 08 10 08 01 00 8F 20 53 45 51 55 45 4E 43 45 |....... SEQUENCE|
00000010: 00 16 08 02 00 8F 00 34 08 03 00 8F 2A 2A 2A 56 |.......4....***V|
00000020: 41 4E 20 44 45 20 50 45 54 20 55 53 45 52 20 47 |AN DE PET USER G|
00000030: 52 4F 55 50 00 4E 08 04 00 8F 2A 2A 2A 53 4F 46 |ROUP.N....***SOF|
00000040: 54 57 41 52 45 20 45 58 43 48 41 4E 47 45 00 62 |TWARE EXCHANGE.b|
00000050: 08 05 00 8F 2A 2A 2A 50 4F 53 54 42 55 53 20 33 |....***POSTBUS 3|
00000060: 37 31 00 88 08 06 00 8F 2A 2A 2A 4D 4F 4E 54 47 |71......***MONTG|
00000070: 4F 4D 4D 45 52 59 56 49 4C 4C 45 2C 50 41 20 31 |OMMERYVILLE,PA 1|
00000080: 38 39 33 36 20 55 53 41 00 8E 08 07 00 8F 00 94 |8936 USA........|
00000090: 08 08 00 8F 00 A1 08 32 00 86 20 41 24 28 32 36 |.......2.. A$(26|
000000A0: 29 00 C5 08 64 00 5A 24 B2 22 41 42 43 44 45 46 |)...d.Z$."ABCDEF|
000000B0: 47 48 49 4A 4B 4C 4D 4E 4F 50 51 52 53 54 55 56 |GHIJKLMNOPQRSTUV|
000000C0: 57 58 59 5A 22 00 EA 08 6E 00 5A 49 24 B2 22 31 |WXYZ"...n.ZI$."1|
000000D0: 32 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37 |2345678901234567|
000000E0: 38 39 30 31 32 33 34 35 36 22 00 2C 09 C8 00 99 |890123456".,....|
000000F0: 22 5B 93 5D 5B 11 11 5D 4C 45 4E 47 54 45 20 56 |"[.][..]LENGTE V|
00000100: 41 4E 20 44 45 20 53 54 52 49 4E 47 20 20 20 44 |AN DE STRING D|
00000110: 49 45 20 41 46 47 45 5A 4F 43 48 54 20 4D 4F 45 |IE AFGEZOCHT MOE|
00000120: 54 20 57 4F 52 44 45 4E 5B 11 5D 22 00 4C 09 DC |T WORDEN[.]".L..|
00000130: 00 85 22 4D 41 58 49 4D 55 4D 20 4C 45 4E 47 54 |.."MAXIMUM LENGT|
00000140: 45 20 49 53 20 32 36 20 22 3B 53 25 00 61 09 E6 |E IS 26 ";S%.a..|
00000150: 00 8B 53 25 B3 31 B0 52 53 25 B1 32 36 A7 32 30 |..S%.1.RS%.26.20|
00000160: 30 00 6A 09 F0 00 53 B2 53 25 00 76 09 2C 01 81 |0.j...S.S%.v.,..|
00000170: 20 49 B2 31 A4 53 00 8A 09 36 01 41 24 28 49 29 | I.1.S...6.A$(I)|
00000180: B2 CA 28 5A 24 2C 49 2C 31 29 00 92 09 40 01 82 |..(Z$,I,1)...@..|
00000190: 20 49 00 A9 09 90 01 8F 20 52 41 4E 44 4F 4D 49 | I...... RANDOMI|
000001A0: 5A 45 20 53 54 52 49 4E 47 00 B4 09 A4 01 81 49 |ZE STRING......I|
000001B0: B2 31 A4 35 00 C6 09 AE 01 4B B2 B5 28 BB 28 31 |.1.5.....K..(.(1|
000001C0: 29 AC 53 AA 31 29 00 D3 09 B8 01 54 24 B2 41 24 |).S.1).....T$.A$|
000001D0: 28 49 29 00 E3 09 C2 01 41 24 28 49 29 B2 41 24 |(I).....A$(I).A$|
000001E0: 28 4B 29 00 F0 09 CC 01 41 24 28 4B 29 B2 54 24 |(K).....A$(K).T$|
000001F0: 00 F8 09 D6 01 82 20 49 00 02 0A E0 01 8D 20 39 |...... I...... 9|
00000200: 35 30 00 0A 0A 53 02 54 B2 51 00 22 0A 58 02 8F |50...S.T.Q.".X..|
00000210: 20 4B 45 45 52 20 53 55 42 53 54 52 49 4E 47 20 | KEER SUBSTRING |
00000220: 4F 4D 00 2F 0A 5D 02 54 B2 54 AA 31 3A 99 54 00 |OM./.].T.T.1:.T.|
00000230: 50 0A 62 02 85 22 48 4F 45 56 45 45 4C 20 4B 45 |P.b.."HOEVEEL KE|
00000240: 45 52 20 4F 4D 44 52 41 41 49 45 4E 22 3B 52 25 |ER OMDRAAIEN";R%|
00000250: 00 5E 0A 6C 02 8B 52 25 B2 30 A7 39 30 30 00 72 |.^.l..R%.0.900.r|
00000260: 0A 76 02 8B 52 25 B1 30 AF 52 25 B3 B2 53 A7 36 |.v..R%.0.R%..S.6|
00000270: 35 30 00 98 0A 80 02 99 22 4D 4F 45 54 20 54 55 |50......"MOET TU|
00000280: 53 53 45 4E 20 31 20 45 4E 20 22 3B 53 22 5A 49 |SSEN 1 EN ";S"ZI|
00000290: 4A 4E 22 3A 89 36 31 30 00 A6 0A 8A 02 52 B2 B5 |JN":.610.....R..|
000002A0: 28 52 25 AD 32 29 00 B1 0A 94 02 81 49 B2 31 A4 |(R%.2)......I.1.|
000002B0: 52 00 BE 0A 9E 02 54 24 B2 41 24 28 49 29 00 D3 |R.....T$.A$(I)..|
000002C0: 0A A8 02 41 24 28 49 29 B2 41 24 28 52 25 AB 49 |...A$(I).A$(R%.I|
000002D0: AA 31 29 00 E5 0A B2 02 41 24 28 52 25 AB 49 AA |.1).....A$(R%.I.|
000002E0: 31 29 B2 54 24 00 ED 0A BC 02 82 20 49 00 F6 0A |1).T$...... I...|
000002F0: EE 02 8D 39 35 30 00 05 0B 20 03 43 B2 31 3A 81 |...950... .C.1:.|
00000300: 49 B2 32 A4 53 00 1D 0B 2A 03 8B 41 24 28 49 29 |I.2.S...*..A$(I)|
00000310: B2 B1 41 24 28 49 AB 31 29 A7 38 33 30 00 25 0B |..A$(I.1).830.%.|
00000320: 34 03 43 B2 51 00 2C 0B 3E 03 82 49 00 39 0B 48 |4.C.Q.,.>..I.9.H|
00000330: 03 8B 43 B2 30 A7 36 30 30 00 67 0B 52 03 99 22 |..C.0.600.g.R.."|
00000340: 5B 11 5D 55 20 48 45 42 54 20 48 45 54 20 49 4E |[.]U HEBT HET IN|
00000350: 22 3B 54 3B 22 50 4F 47 49 4E 47 28 45 4E 29 20 |";T;"POGING(EN) |
00000360: 47 45 44 41 41 4E 22 00 84 0B 84 03 8F 20 54 45 |GEDAAN"...... TE|
00000370: 53 54 20 56 4F 4F 52 20 56 4F 4C 47 45 4E 44 20 |ST VOOR VOLGEND |
00000380: 53 50 45 4C 00 AD 0B 8E 03 85 22 5B 11 5D 57 49 |SPEL......"[.]WI|
00000390: 4C 20 4A 45 20 45 45 4E 20 41 4E 44 45 52 20 53 |L JE EEN ANDER S|
000003A0: 50 45 4C 20 28 4A 2F 4E 29 22 3B 59 24 00 C3 0B |PEL (J/N)";Y$...|
000003B0: 98 03 8B 20 C8 28 59 24 2C 31 29 B2 22 4A 22 A7 |... .(Y$,1)."J".|
000003C0: 32 30 30 00 C9 0B A2 03 80 00 CF 0B B6 03 99 00 |200.............|
000003D0: DD 0B C0 03 99 C8 28 5A 31 24 2C 53 29 00 F4 0B |......(Z1$,S)...|
000003E0: CA 03 81 20 49 B2 31 A4 53 3A 99 41 24 28 49 29 |... I.1.S:.A$(I)|
000003F0: 3B 3A 82 49 00 00 00 |;:.I... |
....... SEQUENCE.......4....***VAN DE PE
T USER GROUP.N....***SOFTWARE EXCHANGE.B
....***POSTBUS 371......***MONTGOMMERYVI
LLE,PA 18936 USA...............2.. A$(26
).E.D.Z$."ABCDEFGHIJKLMNOPQRSTUVWXYZ"...
N.ZI$."12345678901234567890123456".,.H..
"[.][..]LENGTE VAN DE STRING DIE AFGEZ
OCHT MOET WORDEN[.]".L...."MAXIMUM LENGT
E IS 26 ";S%.A....S%.1.RS%.26.200.J...S.
S%.V.,.. I.1.S...6.A$(I).J(Z$,I,1)...@..
I...... RANDOMIZE STRING......I.1.5.F..
.K..(.(1).S.1).S...T$.A$(I)...B.A$(I).A$
(K)...L.A$(K).T$...V.. I...... 950...S.T
.Q.".X.. KEER SUBSTRING OM./.].T.T.1:.T.
P.B.."HOEVEEL KEER OMDRAAIEN";R%.^.L..R%
.0.900.R.V..R%.0.R%..S.650......"MOET TU
SSEN 1 EN ";S"ZIJN":.610.....R..(R%.2)..
....I.1.R.....T$.A$(I).S...A$(I).A$(R%.I
.1).....A$(R%.I.1).T$...... I......950..
. .C.1:.I.2.S...*..A$(I)..A$(I.1).830.%.
4.C.Q.,.>..I.9.H..C.0.600.G.R.."[.]U HEB
T HET IN";T;"POGING(EN) GEDAAN"...... TE
ST VOOR VOLGEND SPEL......"[.]WIL JE EEN
ANDER SPEL (J/N)";Y$.C.... H(Y$,1)."J".
200.I.....O..........H(Z1$,S)...J.. I.1.
S:.A$(I);:.I...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL