> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 01 00 8F 20 2B 2B 2B 20 53 4F 52 54 |....... +++ SORT|
00000010: 45 52 45 4E 20 2B 2B 2B 00 34 08 64 00 97 35 33 |EREN +++.4.d..53|
00000020: 32 38 31 2C 39 3A 97 36 34 36 2C 37 3A 99 C7 28 |281,9:.646,7:..(|
00000030: 31 34 32 29 00 52 08 6E 00 8F 20 3C 3C 20 53 4F |142).R.n.. << SO|
00000040: 52 54 45 45 52 20 50 52 4F 47 52 41 4D 4D 41 20 |RTEER PROGRAMMA |
00000050: 3E 3E 00 77 08 78 00 8F 20 44 49 54 20 50 52 4F |>>.w.x.. DIT PRO|
00000060: 47 52 41 4D 4D 41 20 5A 41 4C 20 56 41 4E 20 4D |GRAMMA ZAL VAN M|
00000070: 41 58 49 4D 41 41 4C 00 9A 08 82 00 8F 20 31 30 |AXIMAAL...... 10|
00000080: 30 20 50 45 52 53 4F 4E 45 4E 20 4E 41 41 52 20 |0 PERSONEN NAAR |
00000090: 41 41 4E 4C 45 49 44 49 4E 47 00 BC 08 8C 00 8F |AANLEIDING......|
000000A0: 20 56 41 4E 20 45 45 4E 20 42 49 4A 42 45 48 4F | VAN EEN BIJBEHO|
000000B0: 52 45 4E 44 45 20 57 41 41 52 44 45 00 D8 08 96 |RENDE WAARDE....|
000000C0: 00 8F 20 49 4E 20 56 4F 4C 47 4F 52 44 45 20 53 |.. IN VOLGORDE S|
000000D0: 4F 52 54 45 52 45 4E 2E 00 FB 08 A0 00 8F 20 42 |ORTEREN....... B|
000000E0: 49 4A 56 4F 4F 52 42 45 45 4C 44 20 57 45 52 4B |IJVOORBEELD WERK|
000000F0: 4E 45 4D 45 52 53 20 4E 41 41 52 00 0C 09 AA 00 |NEMERS NAAR.....|
00000100: 8F 20 49 4E 4B 4F 4D 53 54 45 4E 2E 00 31 09 B4 |. INKOMSTEN..1..|
00000110: 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00000120: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000130: 2D 00 4A 09 BE 00 99 22 93 22 3A 8F 20 53 43 48 |-.J....".":. SCH|
00000140: 45 52 4D 20 53 43 48 4F 4F 4E 00 67 09 C8 00 86 |ERM SCHOON.g....|
00000150: 20 4E 24 28 31 30 30 29 2C 53 28 31 30 30 29 2C | N$(100),S(100),|
00000160: 50 54 28 31 30 30 29 00 7D 09 D2 00 99 22 48 4F |PT(100).}...."HO|
00000170: 45 56 45 45 4C 20 4E 41 4D 45 4E 20 22 00 85 09 |EVEEL NAMEN "...|
00000180: DC 00 85 20 4E 00 A5 09 E6 00 99 22 47 45 45 46 |... N......"GEEF|
00000190: 20 22 4E 22 20 4E 41 4D 45 4E 20 45 4E 20 57 41 | "N" NAMEN EN WA|
000001A0: 41 52 44 45 4E 00 CF 09 F0 00 99 22 44 55 57 20 |ARDEN......"DUW |
000001B0: 4F 50 20 52 45 54 55 52 4E 20 4E 41 20 49 45 44 |OP RETURN NA IED|
000001C0: 45 52 45 20 4E 41 41 4D 2C 57 41 41 52 44 45 00 |ERE NAAM,WAARDE.|
000001D0: DA 09 FA 00 81 49 B2 31 A4 4E 00 EB 09 04 01 85 |.....I.1.N......|
000001E0: 20 4E 24 28 49 29 2C 53 28 49 29 00 F1 09 0E 01 | N$(I),S(I).....|
000001F0: 82 00 16 0A 18 01 8F 20 56 49 4E 44 20 45 45 52 |....... VIND EER|
00000200: 53 54 20 44 45 20 47 52 4F 4F 54 53 54 45 20 57 |ST DE GROOTSTE W|
00000210: 41 41 52 44 45 2E 00 3B 0A 22 01 8F 20 47 45 45 |AARDE..;.".. GEE|
00000220: 46 20 44 41 4E 20 5A 49 4A 4E 20 50 4F 53 49 54 |F DAN ZIJN POSIT|
00000230: 49 45 20 49 4E 20 53 20 41 41 4E 00 5F 0A 2C 01 |IE IN S AAN._.,.|
00000240: 8F 20 44 4F 4F 52 20 44 45 20 4F 4E 44 45 52 53 |. DOOR DE ONDERS|
00000250: 43 48 52 49 4A 56 49 4E 47 20 4F 50 20 54 45 00 |CHRIJVING OP TE.|
00000260: 7F 0A 36 01 8F 20 53 4C 41 41 4E 20 49 4E 20 27 |..6.. SLAAN IN '|
00000270: 50 4F 49 4E 54 45 52 27 20 52 49 4A 20 50 54 00 |POINTER' RIJ PT.|
00000280: A4 0A 40 01 8F 20 56 49 4E 44 20 44 41 41 52 4E |..@.. VIND DAARN|
00000290: 41 20 44 45 20 54 57 45 45 44 45 20 47 52 4F 4F |A DE TWEEDE GROO|
000002A0: 54 53 54 45 00 BD 0A 4A 01 8F 20 45 4E 20 53 4C |TSTE...J.. EN SL|
000002B0: 41 20 44 49 45 20 4F 50 2C 45 54 43 2E 00 C8 0A |A DIE OP,ETC....|
000002C0: 54 01 81 49 B2 31 A4 4E 00 D5 0A 5E 01 4D B2 AB |T..I.1.N...^.M..|
000002D0: 39 39 39 39 39 00 E0 0A 68 01 81 4A B2 31 A4 4E |99999...h..J.1.N|
000002E0: 00 F1 0A 72 01 8B 53 28 4A 29 B3 B2 4D A7 34 30 |...r..S(J)..M.40|
000002F0: 30 00 FC 0A 7C 01 4D B2 53 28 4A 29 00 05 0B 86 |0...|.M.S(J)....|
00000300: 01 49 53 B2 4A 00 0B 0B 90 01 82 00 18 0B 9A 01 |.IS.J...........|
00000310: 50 54 28 49 29 B2 49 53 00 29 0B A4 01 53 28 49 |PT(I).IS.)...S(I|
00000320: 53 29 B2 AB 53 28 49 53 29 00 2F 0B AE 01 82 00 |S)..S(IS)./.....|
00000330: 4D 0B B8 01 99 22 50 4C 41 41 54 53 22 2C 22 4E |M...."PLAATS","N|
00000340: 41 41 4D 22 2C 22 57 41 41 52 44 45 22 00 58 0B |AAM","WAARDE".X.|
00000350: C2 01 81 49 B2 31 A4 4E 00 64 0B CC 01 4B B2 50 |...I.1.N.d...K.P|
00000360: 54 28 49 29 00 77 0B D6 01 99 49 2C 4E 24 28 4B |T(I).w....I,N$(K|
00000370: 29 2C AB 53 28 4B 29 00 7D 0B E0 01 82 00 8A 0B |),.S(K).}.......|
00000380: EA 01 99 22 12 54 4F 45 54 53 00 9D 0B F4 01 A1 |...".TOETS......|
00000390: 41 24 3A 8B 41 24 B2 22 22 A7 35 30 30 00 A3 0B |A$:.A$."".500...|
000003A0: FE 01 80 00 00 00 |...... |
....... +++ SORTEREN +++.4.D..53281,9:.6
46,7:.G(142).R.N.. << SORTEER PROGRAMMA
>>.W.X.. DIT PROGRAMMA ZAL VAN MAXIMAAL.
..... 100 PERSONEN NAAR AANLEIDING......
VAN EEN BIJBEHORENDE WAARDE.X.... IN VO
LGORDE SORTEREN.... .. BIJVOORBEELD WERK
NEMERS NAAR...... INKOMSTEN..1.... -----
-------------------------.J....".":. SCH
ERM SCHOON.G.H.. N$(100),S(100),PT(100).
}.R.."HOEVEEL NAMEN "...... N......"GEEF
"N" NAMEN EN WAARDEN.O...."DUW OP RETUR
N NA IEDERE NAAM,WAARDE.Z....I.1.N......
N$(I),S(I)............ VIND EERST DE GR
OOTSTE WAARDE..;.".. GEEF DAN ZIJN POSIT
IE IN S AAN._.,.. DOOR DE ONDERSCHRIJVIN
G OP TE..6.. SLAAN IN 'POINTER' RIJ PT.
..@.. VIND DAARNA DE TWEEDE GROOTSTE...J
.. EN SLA DIE OP,ETC..H.T..I.1.N.U.^.M..
99999...H..J.1.N...R..S(J)..M.400...|.M.
S(J).....IS.J...........PT(I).IS.)...S(I
S)..S(IS)./.....M...."PLAATS","NAAM","WA
ARDE".X.B..I.1.N.D.L.K.PT(I).W.V..I,N$(K
),.S(K).}..........".TOETS......A$:.A$."
".500.........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL