Multiple names: EXSORT DEMO, EXSORT.DEMO
FILE INFORMATION
FILENAME(S):
• EXSORT DEMO<br>• EXSORT.DEMO
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-30 01:12:47
APPEARS ON: 2 disk(s)
FILE HASH
e461c537f633ed7e7dd3551e34a3f872779feb561d5dafd83a3cf863f0cf7b7e
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER 11 84 | EXSORT DEMO | PRG | C64er | 26 | 4 | DOWNLOAD FILE |
| SONDERHEFT 6 2 | EXSORT.DEMO | PRG | C64er | 30 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 30 08 00 00 8B 4B B2 30 A7 4B B2 31 3A 93 |..0....K.0.K.1:.| 00000010: 22 45 58 53 4F 52 54 3F 22 2C 38 2C 31 3A 8F 20 |"EXSORT?",8,1:. | 00000020: 4C 41 44 45 4E 20 56 4F 4E 20 45 58 53 4F 52 54 |LADEN VON EXSORT| 00000030: 00 50 08 01 00 9E 34 39 34 30 30 3A 8F 20 53 54 |.P....49400:. ST| 00000040: 41 52 54 45 4E 20 56 4F 4E 20 45 58 53 4F 52 54 |ARTEN VON EXSORT| 00000050: 00 6E 08 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |.n.d.. *********| 00000060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8C |**************..| 00000070: 08 6E 00 8F 20 2A 2A 2A 20 20 20 45 58 53 4F 52 |.n.. *** EXSOR| 00000080: 54 20 44 45 4D 4F 20 20 20 2A 2A 2A 00 AA 08 78 |T DEMO ***...x| 00000090: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************| 000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B0 08 82 00 8F |**********......| 000000B0: 00 C9 08 8C 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...... *********| 000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E2 08 96 00 8F 20 |*********...... | 000000D0: 2A 20 31 2E 42 45 46 45 48 4C 3A 20 22 53 4F 22 |* 1.BEFEHL: "SO"| 000000E0: 20 2A 00 FB 08 A0 00 8F 20 2A 2A 2A 2A 2A 2A 2A | *...... *******| 000000F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 17 09 A5 00 |***********.....| 00000100: 99 22 93 C5 52 53 54 45 52 20 C2 45 46 45 48 4C |."..RSTER .EFEHL| 00000110: 3A 20 27 53 4F 27 22 00 43 09 AA 00 85 22 11 DA |: 'SO'".C...."..| 00000120: 41 48 4C 20 44 45 52 20 5A 55 20 53 4F 52 54 49 |AHL DER ZU SORTI| 00000130: 45 52 45 4E 44 45 4E 20 C5 4C 45 4D 45 4E 54 45 |ERENDEN .LEMENTE| 00000140: 22 3B 41 00 7C 09 AF 00 99 22 11 C1 4E 46 55 45 |";A.|...."..NFUE| 00000150: 4C 4C 45 4E 20 44 45 53 20 C6 45 4C 44 45 53 20 |LLEN DES .ELDES | 00000160: 27 5A 41 27 20 4D 49 54 20 DA 55 46 41 4C 4C 53 |'ZA' MIT .UFALLS| 00000170: 2D 20 20 20 20 5A 41 48 4C 45 4E 22 00 87 09 B4 |- ZAHLEN"....| 00000180: 00 86 5A 41 28 41 29 00 BF 09 BE 00 8F 20 2A 2A |..ZA(A)...... **| 00000190: 2A 20 44 41 53 20 46 45 4C 44 20 5A 41 20 57 49 |* DAS FELD ZA WI| 000001A0: 52 44 20 4D 49 54 20 5A 55 46 41 4C 4C 53 5A 41 |RD MIT ZUFALLSZA| 000001B0: 48 4C 45 4E 20 42 45 4C 45 47 54 20 2A 2A 2A 00 |HLEN BELEGT ***.| 000001C0: CA 09 C8 00 81 53 B2 31 A4 41 00 E5 09 D2 00 3A |.....S.1.A.....:| 000001D0: 5A 41 28 53 29 B2 BB 28 31 29 AC 31 30 30 30 30 |ZA(S)..(1).10000| 000001E0: AB 35 30 30 30 00 EC 09 DC 00 82 53 00 07 0A E6 |.5000......S....| 000001F0: 00 49 54 B2 54 49 3A 8F 20 5A 45 49 54 20 53 50 |.IT.TI:. ZEIT SP| 00000200: 45 49 43 48 45 52 4E 00 1D 0A F0 00 99 22 11 D3 |EICHERN......"..| 00000210: 4F 52 54 49 45 52 42 45 47 49 4E 4E 22 00 23 0A |ORTIERBEGINN".#.| 00000220: FA 00 8F 00 49 0A 04 01 8F 20 2A 2A 2A 20 41 55 |....I.... *** AU| 00000230: 46 52 55 46 20 44 45 53 20 42 45 46 45 48 4C 53 |FRUF DES BEFEHLS| 00000240: 20 22 53 4F 22 20 2A 2A 2A 00 59 0A 0E 01 53 4F | "SO" ***.Y...SO| 00000250: 2C 5A 41 2C 31 2C 41 2C 31 00 71 0A 18 01 8F 20 |,ZA,1,A,1.q.... | 00000260: 20 20 53 4F 20 20 20 3D 20 20 20 42 45 46 45 48 | SO = BEFEH| 00000270: 4C 00 8B 0A 22 01 8F 20 20 20 5A 41 20 20 20 3D |L...".. ZA =| 00000280: 20 20 20 46 45 4C 44 4E 41 4D 45 00 A9 0A 2C 01 | FELDNAME...,.| 00000290: 8F 20 20 20 31 20 20 20 20 3D 20 20 20 41 4E 46 |. 1 = ANF| 000002A0: 41 4E 47 53 49 4E 44 45 58 00 C3 0A 36 01 8F 20 |ANGSINDEX...6.. | 000002B0: 20 20 41 20 20 20 20 3D 20 20 20 45 4E 44 49 4E | A = ENDIN| 000002C0: 44 45 58 00 F5 0A 40 01 8F 20 20 20 31 20 20 20 |DEX...@.. 1 | 000002D0: 20 3D 20 20 20 53 4F 52 54 49 45 52 55 4E 47 53 | = SORTIERUNGS| 000002E0: 52 49 43 48 54 55 4E 47 28 41 55 46 53 54 45 49 |RICHTUNG(AUFSTEI| 000002F0: 47 45 4E 44 29 00 FB 0A 4A 01 8F 00 08 0B 54 01 |GEND)...J.....T.| 00000300: 49 54 B2 54 49 AB 49 54 00 1C 0B 5E 01 99 22 11 |IT.TI.IT...^..".| 00000310: D3 4F 52 54 49 45 52 45 4E 44 45 22 00 2D 0B 63 |.ORTIERENDE".-.c| 00000320: 01 81 53 B2 31 A4 31 30 30 30 3A 82 53 00 5B 0B |..S.1.1000:.S.[.| 00000330: 68 01 8F 20 2A 2A 2A 20 41 55 53 47 41 42 45 20 |h.. *** AUSGABE | 00000340: 44 45 52 20 53 4F 52 54 49 45 52 54 45 4E 20 45 |DER SORTIERTEN E| 00000350: 4C 45 4D 45 4E 54 45 20 2A 2A 2A 00 66 0B 72 01 |LEMENTE ***.f.r.| 00000360: 81 53 B2 31 A4 41 00 77 0B 7C 01 3A 99 53 2C A3 |.S.1.A.w.|.:.S,.| 00000370: 36 29 5A 41 28 53 29 00 7E 0B 86 01 82 53 00 96 |6)ZA(S).~....S..| 00000380: 0B 90 01 99 22 11 DA 45 49 54 3A 22 49 54 AD 36 |...."..EIT:"IT.6| 00000390: 30 22 53 45 43 22 00 B3 0B 9A 01 99 22 11 42 49 |0"SEC"......".BI| 000003A0: 54 54 45 20 D4 41 53 54 45 20 44 52 55 45 43 4B |TTE .ASTE DRUECK| 000003B0: 45 4E 22 00 C6 0B A4 01 A1 54 24 3A 8B 54 24 B2 |EN"......T$:.T$.| 000003C0: 22 22 A7 34 32 30 00 CC 0B AE 01 8F 00 E5 0B B8 |"".420..........| 000003D0: 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************| 000003E0: 2A 2A 2A 2A 2A 00 FE 0B C2 01 8F 20 2A 20 32 2E |*****...... * 2.| 000003F0: 42 45 46 45 48 4C 3A 20 22 53 45 22 20 2A 00 17 |BEFEHL: "SE" *..| 00000400: 0C CC 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********| 00000410: 2A 2A 2A 2A 2A 2A 2A 00 1D 0C D6 01 8F 00 2F 0C |*******......./.| 00000420: E0 01 9C 3A 86 46 45 24 28 31 30 30 30 30 29 00 |...:.FE$(10000).| 00000430: 4B 0C E5 01 99 22 93 DA 57 45 49 54 45 52 20 C2 |K...."..WEITER .| 00000440: 45 46 45 48 4C 20 27 53 45 27 22 00 71 0C EA 01 |EFEHL 'SE'".q...| 00000450: 8F 20 2A 2A 20 49 4E 20 35 30 20 42 45 4C 49 45 |. ** IN 50 BELIE| 00000460: 42 49 47 45 20 45 4C 45 4D 45 4E 54 45 20 20 2A |BIGE ELEMENTE *| 00000470: 2A 00 97 0C F4 01 8F 20 2A 2A 20 44 45 53 20 46 |*...... ** DES F| 00000480: 45 4C 44 45 53 20 46 45 24 20 57 49 52 44 20 44 |ELDES FE$ WIRD D| 00000490: 41 53 20 20 20 2A 2A 00 BD 0C FE 01 8F 20 2A 2A |AS **...... **| 000004A0: 20 57 4F 52 54 20 22 48 41 4C 4C 4F 22 20 47 45 | WORT "HALLO" GE| 000004B0: 53 43 48 52 49 45 42 45 4E 20 20 2A 2A 00 C3 0C |SCHRIEBEN **...| 000004C0: 08 02 8F 00 07 0D 0D 02 99 22 11 C9 4E 20 35 30 |........."..N 50| 000004D0: 20 42 45 4C 49 45 42 49 47 45 20 C5 4C 45 4D 45 | BELIEBIGE .LEME| 000004E0: 4E 54 45 20 56 4F 4E 20 46 45 24 20 57 49 52 44 |NTE VON FE$ WIRD| 000004F0: 20 20 20 27 48 41 4C 4C 4F 27 20 47 45 53 43 48 | 'HALLO' GESCH| 00000500: 52 49 45 42 45 4E 22 00 13 0D 12 02 81 53 B2 31 |RIEBEN"......S.1| 00000510: A4 35 30 00 30 0D 1C 02 3A 46 45 24 28 BB 28 31 |.50.0...:FE$(.(1| 00000520: 29 AC 31 30 30 30 30 29 B2 22 48 41 4C 4C 4F 22 |).10000)."HALLO"| 00000530: 00 37 0D 26 02 82 53 00 65 0D 30 02 99 22 11 C9 |.7.&..S.e.0.."..| 00000540: 4E 20 46 4F 4C 47 45 4E 44 45 4D 20 45 4C 45 4D |N FOLGENDEM ELEM| 00000550: 45 4E 54 45 4E 20 53 54 45 48 54 20 27 48 41 4C |ENTEN STEHT 'HAL| 00000560: 4C 4F 27 3A 22 00 6B 0D 3A 02 8F 00 90 0D 44 02 |LO':".k.:.....D.| 00000570: 8F 20 2A 2A 20 41 55 53 44 52 55 43 4B 45 4E 20 |. ** AUSDRUCKEN | 00000580: 4A 45 44 45 53 20 49 4E 44 45 58 45 53 20 2A 2A |JEDES INDEXES **| 00000590: 00 B5 0D 4E 02 8F 20 2A 2A 20 49 4E 20 44 45 4D |...N.. ** IN DEM| 000005A0: 20 22 48 41 4C 4C 4F 22 20 53 54 45 48 54 20 20 | "HALLO" STEHT | 000005B0: 20 20 20 2A 2A 00 BB 0D 58 02 8F 00 CB 0D 62 02 | **...X.....b.| 000005C0: 49 4E B2 AB 31 3A 49 54 B2 54 49 00 EF 0D 6C 02 |IN..1:IT.TI...l.| 000005D0: 8F 20 2A 2A 20 41 55 46 52 55 46 20 44 45 53 20 |. ** AUFRUF DES | 000005E0: 42 45 46 45 48 4C 53 20 22 53 45 22 20 2A 2A 00 |BEFEHLS "SE" **.| 000005F0: 0D 0E 76 02 53 45 2C 46 45 24 2C 49 4E AA 31 2C |..v.SE,FE$,IN.1,| 00000600: 31 30 30 30 30 2C 22 48 41 4C 4C 4F 22 00 27 0E |10000,"HALLO".'.| 00000610: 80 02 8F 20 20 53 45 20 20 20 20 20 20 3D 20 20 |... SE = | 00000620: 20 42 45 46 45 48 4C 00 43 0E 8A 02 8F 20 20 46 | BEFEHL.C.... F| 00000630: 45 24 20 20 20 20 20 3D 20 20 20 46 45 4C 44 4E |E$ = FELDN| 00000640: 41 4D 45 00 63 0E 94 02 8F 20 20 49 4E 2B 31 20 |AME.c.... IN+1 | 00000650: 20 20 20 3D 20 20 20 41 4E 46 41 4E 47 53 49 4E | = ANFANGSIN| 00000660: 44 45 58 00 7F 0E 9E 02 8F 20 20 31 30 30 30 30 |DEX...... 10000| 00000670: 20 20 20 3D 20 20 20 45 4E 44 49 4E 44 45 58 00 | = ENDINDEX.| 00000680: 9A 0E A8 02 8F 20 20 22 48 41 4C 4C 4F 22 20 3D |..... "HALLO" =| 00000690: 20 20 20 45 4C 45 4D 45 4E 54 00 BE 0E B2 02 8F | ELEMENT......| 000006A0: 20 2A 2A 20 42 45 49 20 52 55 45 43 4B 4B 45 48 | ** BEI RUECKKEH| 000006B0: 52 20 41 55 53 20 22 53 45 22 20 20 2A 2A 00 E2 |R AUS "SE" **..| 000006C0: 0E BC 02 8F 20 2A 2A 20 45 4E 54 48 41 45 4C 54 |.... ** ENTHAELT| 000006D0: 20 22 49 4E 22 20 44 45 4E 20 49 4E 44 45 58 20 | "IN" DEN INDEX | 000006E0: 2A 2A 00 06 0F C6 02 8F 20 2A 2A 20 4F 44 45 52 |**...... ** ODER| 000006F0: 20 28 57 45 4E 4E 20 44 41 53 20 45 4C 45 4D 45 | (WENN DAS ELEME| 00000700: 4E 54 20 20 2A 2A 00 2A 0F D0 02 8F 20 2A 2A 20 |NT **.*.... ** | 00000710: 4E 49 43 48 54 20 47 45 46 55 4E 44 45 4E 20 57 |NICHT GEFUNDEN W| 00000720: 55 52 44 45 29 20 20 20 2A 2A 00 4E 0F DA 02 8F |URDE) **.N....| 00000730: 20 2A 2A 20 44 45 4E 20 57 45 52 54 20 2D 31 20 | ** DEN WERT -1 | 00000740: 20 20 20 20 20 20 20 20 20 20 20 20 2A 2A 00 66 | **.f| 00000750: 0F E4 02 8B 49 4E B2 AB 31 B0 49 4E B2 31 30 30 |....IN..1.IN.100| 00000760: 30 30 A7 37 36 30 00 74 0F EE 02 99 49 4E 2C 3A |00.760.t....IN,:| 00000770: 89 36 33 30 00 93 0F F8 02 99 3A 99 22 11 DA 45 |.630......:."..E| 00000780: 49 54 3A 22 28 54 49 AB 49 54 29 AD 36 30 22 53 |IT:"(TI.IT).60"S| 00000790: 45 43 22 00 B0 0F 02 03 99 22 11 42 49 54 54 45 |EC"......".BITTE| 000007A0: 20 D4 41 53 54 45 20 44 52 55 45 43 4B 45 4E 22 | .ASTE DRUECKEN"| 000007B0: 00 C3 0F 0C 03 A1 54 24 3A 8B 54 24 B2 22 22 A7 |......T$:.T$."".| 000007C0: 37 38 30 00 C9 0F 16 03 8F 00 EC 0F 20 03 8F 20 |780......... .. | 000007D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000007E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0F 10 2A |************...*| 000007F0: 03 8F 20 2A 20 31 2E 42 45 46 45 48 4C 20 27 53 |.. * 1.BEFEHL 'S| 00000800: 4F 27 20 4D 49 54 20 4F 50 54 49 4F 4E 20 2A 00 |O' MIT OPTION *.| 00000810: 32 10 34 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |2.4.. **********| 00000820: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000830: 2A 2A 00 38 10 3E 03 8F 00 59 10 43 03 99 22 93 |**.8.>...Y.C..".| 00000840: C5 52 53 54 45 52 20 C2 45 46 45 48 4C 20 4D 49 |.RSTER .EFEHL MI| 00000850: 54 20 4F 50 54 49 4F 4E 22 00 99 10 48 03 83 4E |T OPTION"...H..N| 00000860: 55 4C 4C 2C 5A 57 45 49 2C 56 49 45 52 2C 53 45 |ULL,ZWEI,VIER,SE| 00000870: 43 48 53 2C 41 43 48 54 2C 5A 45 48 4E 2C 45 49 |CHS,ACHT,ZEHN,EI| 00000880: 4E 53 2C 44 52 45 49 2C 46 55 45 4E 46 2C 53 49 |NS,DREI,FUENF,SI| 00000890: 45 42 45 4E 2C 4E 45 55 4E 00 B5 10 52 03 83 30 |EBEN,NEUN...R..0| 000008A0: 2C 32 2C 34 2C 36 2C 38 2C 31 30 2C 31 2C 33 2C |,2,4,6,8,10,1,3,| 000008B0: 35 2C 37 2C 39 00 CB 10 5C 03 9C 3A 86 4E 52 28 |5,7,9...\..:.NR(| 000008C0: 31 30 29 2C 4E 52 24 28 31 30 29 00 EC 10 66 03 |10),NR$(10)...f.| 000008D0: 8F 20 2A 2A 20 45 49 4E 4C 45 53 45 4E 20 49 4E |. ** EINLESEN IN| 000008E0: 20 46 45 4C 44 20 4E 52 24 20 2A 2A 00 F8 10 70 | FELD NR$ **...p| 000008F0: 03 81 53 B2 30 A4 31 30 00 0B 11 7A 03 3A 87 58 |..S.0.10...z.:.X| 00000900: 24 3A 4E 52 24 28 53 29 B2 58 24 00 12 11 84 03 |$:NR$(S).X$.....| 00000910: 82 53 00 33 11 8E 03 8F 20 2A 2A 20 45 49 4E 4C |.S.3.... ** EINL| 00000920: 45 53 45 4E 20 49 4E 20 46 45 4C 44 20 4E 52 20 |ESEN IN FELD NR | 00000930: 20 2A 2A 00 3F 11 98 03 81 53 B2 30 A4 31 30 00 | **.?....S.0.10.| 00000940: 4F 11 A2 03 3A 87 58 3A 4E 52 28 53 29 B2 58 00 |O...:.X:NR(S).X.| 00000950: 56 11 AC 03 82 53 00 7E 11 B6 03 8F 20 2A 2A 20 |V....S.~.... ** | 00000960: 41 55 53 47 41 42 45 20 46 45 4C 44 20 56 4F 52 |AUSGABE FELD VOR| 00000970: 20 53 4F 52 54 49 45 52 55 4E 47 20 2A 2A 00 AB | SORTIERUNG **..| 00000980: 11 C0 03 99 22 11 C9 4E 44 45 58 20 4E 52 24 20 |...."..NDEX NR$ | 00000990: 56 4F 52 48 45 52 20 4E 52 20 2A 20 4E 52 24 20 |VORHER NR * NR$ | 000009A0: 4E 41 43 48 48 45 52 20 4E 52 22 00 B7 11 CA 03 |NACHHER NR".....| 000009B0: 81 53 B2 30 A4 31 30 00 D2 11 D4 03 3A 99 53 3B |.S.0.10.....:.S;| 000009C0: A3 36 29 4E 52 24 28 53 29 A3 31 36 29 4E 52 28 |.6)NR$(S).16)NR(| 000009D0: 53 29 00 D9 11 DE 03 82 53 00 07 12 E8 03 8F 20 |S)......S...... | 000009E0: 2A 2A 20 41 55 46 52 55 46 20 44 45 53 20 42 45 |** AUFRUF DES BE| 000009F0: 46 45 48 4C 20 22 53 4F 22 20 4D 49 54 20 4F 50 |FEHL "SO" MIT OP| 00000A00: 54 49 4F 4E 20 2A 2A 00 1C 12 F2 03 53 4F 2C 4E |TION **.....SO,N| 00000A10: 52 24 2C 30 2C 31 30 2C 30 2C 4E 52 00 32 12 FC |R$,0,10,0,NR.2..| 00000A20: 03 8F 20 53 4F 20 20 20 3D 20 20 20 42 45 46 45 |.. SO = BEFE| 00000A30: 48 4C 00 4C 12 06 04 8F 20 4E 52 24 20 20 3D 20 |HL.L.... NR$ = | 00000A40: 20 20 46 45 4C 44 4E 41 4D 45 20 31 00 68 12 10 | FELDNAME 1.h..| 00000A50: 04 8F 20 30 20 20 20 20 3D 20 20 20 41 4E 46 41 |.. 0 = ANFA| 00000A60: 4E 47 53 49 4E 44 45 58 00 80 12 1A 04 8F 20 31 |NGSINDEX...... 1| 00000A70: 30 20 20 20 3D 20 20 20 45 4E 44 49 4E 44 45 58 |0 = ENDINDEX| 00000A80: 00 AF 12 24 04 8F 20 30 20 20 20 20 3D 20 20 20 |...$.. 0 = | 00000A90: 53 4F 52 54 49 45 52 55 4E 47 53 52 49 43 48 55 |SORTIERUNGSRICHU| 00000AA0: 54 4E 47 28 41 42 53 54 45 49 47 45 4E 44 29 00 |TNG(ABSTEIGEND).| 00000AB0: C9 12 2E 04 8F 20 4E 52 20 20 20 3D 20 20 20 46 |..... NR = F| 00000AC0: 45 4C 44 4E 41 4D 45 20 32 00 CF 12 38 04 8F 00 |ELDNAME 2...8...| 00000AD0: F4 12 42 04 99 22 11 D3 4F 52 54 49 45 52 45 4E |..B.."..ORTIEREN| 00000AE0: 20 56 4F 4E 20 4E 52 24 20 41 42 53 54 45 49 47 | VON NR$ ABSTEIG| 00000AF0: 45 4E 44 22 00 1D 13 47 04 99 22 11 4E 52 20 57 |END"...G..".NR W| 00000B00: 49 52 44 20 45 4E 54 53 50 52 45 43 48 45 4E 44 |IRD ENTSPRECHEND| 00000B10: 20 4D 49 54 53 4F 52 54 49 45 52 54 22 00 3A 13 | MITSORTIERT".:.| 00000B20: 49 04 99 22 11 42 49 54 54 45 20 D4 41 53 54 45 |I..".BITTE .ASTE| 00000B30: 20 44 52 55 45 43 4B 45 4E 22 00 4E 13 4A 04 A1 | DRUECKEN".N.J..| 00000B40: 54 24 3A 8B 54 24 B2 22 22 A7 31 30 39 38 00 77 |T$:.T$."".1098.w| 00000B50: 13 4C 04 8F 20 2A 2A 20 41 55 53 47 41 42 45 20 |.L.. ** AUSGABE | 00000B60: 46 45 4C 44 20 4E 41 43 48 20 53 4F 52 54 49 45 |FELD NACH SORTIE| 00000B70: 52 55 4E 47 20 2A 2A 00 84 13 56 04 99 22 13 11 |RUNG **...V.."..| 00000B80: 11 11 22 3B 00 90 13 60 04 81 53 B2 30 A4 31 30 |..";...`..S.0.10| 00000B90: 00 AA 13 6A 04 3A 99 A3 32 32 29 4E 52 24 28 53 |...j.:..22)NR$(S| 00000BA0: 29 A3 33 33 29 4E 52 28 53 29 00 B1 13 74 04 82 |).33)NR(S)...t..| 00000BB0: 53 00 BF 13 7E 04 99 22 11 11 11 11 11 11 22 00 |S...~.."......".| 00000BC0: 00 00 FF |... |
..0....K.0.K.1:."EXSORT?",8,1:. LADEN VO
N EXSORT.P....49400:. STARTEN VON EXSORT
.N.D.. ***********************...N.. ***
EXSORT DEMO ***...X.. *************
**********.......I.... *****************
*...... * 1.BEFEHL: "SO" *... .. *******
***********......".ERSTER BEFEHL: 'SO'".
C....".ZAHL DER ZU SORTIERENDEN ELEMENTE
";A.|....".ANFUELLEN DES FELDES 'ZA' MIT
ZUFALLS- ZAHLEN"......ZA(A)...... **
* DAS FELD ZA WIRD MIT ZUFALLSZAHLEN BEL
EGT ***.J.H..S.1.A...R.:ZA(S)..(1).10000
.5000......S.....IT.TI:. ZEIT SPEICHERN.
.....".SORTIERBEGINN".#.....I.... *** AU
FRUF DES BEFEHLS "SO" ***.Y...SO,ZA,1,A,
1.Q.... SO = BEFEHL...".. ZA =
FELDNAME...,.. 1 = ANFANGSINDE
X.C.6.. A = ENDINDEX...@.. 1
= SORTIERUNGSRICHTUNG(AUFSTEIGEND)...
J.....T.IT.TI.IT...^..".SORTIERENDE".-.C
..S.1.1000:.S.[.H.. *** AUSGABE DER SORT
IERTEN ELEMENTE ***.F.R..S.1.A.W.|.:.S,.
6)ZA(S).~....S......".ZEIT:"IT.60"SEC"..
....".BITTE TASTE DRUECKEN".F....T$:.T$.
"".420.L.......... ******************...
B.. * 2.BEFEHL: "SE" *...L.. ***********
*******...V.../....:.FE$(10000).K....".Z
WEITER BEFEHL 'SE'".Q.... ** IN 50 BELIE
BIGE ELEMENTE **...... ** DES FELDES FE
$ WIRD DAS **...... ** WORT "HALLO" GE
SCHRIEBEN **.C..........".IN 50 BELIEBI
GE ELEMENTE VON FE$ WIRD 'HALLO' GESCH
RIEBEN"......S.1.50.0...:FE$(.(1).10000)
."HALLO".7.&..S.E.0..".IN FOLGENDEM ELEM
ENTEN STEHT 'HALLO':".K.:.....D.. ** AUS
DRUCKEN JEDES INDEXES **...N.. ** IN DEM
"HALLO" STEHT **...X...K.B.IN..1:IT
.TI...L.. ** AUFRUF DES BEFEHLS "SE" **.
..V.SE,FE$,IN.1,10000,"HALLO".'.... SE
= BEFEHL.C.... FE$ = FELDN
AME.C.... IN+1 = ANFANGSINDEX....
. 10000 = ENDINDEX...... "HALLO" =
ELEMENT...... ** BEI RUECKKEHR AUS "S
E" **...... ** ENTHAELT "IN" DEN INDEX
**...F.. ** ODER (WENN DAS ELEMENT **.*
.P.. ** NICHT GEFUNDEN WURDE) **.N.Z..
** DEN WERT -1 **.F....IN..
1.IN.10000.760.T....IN,:.630......:.".ZE
IT:"(TI.IT).60"SEC"......".BITTE TASTE D
RUECKEN".C....T$:.T$."".780.I....... ..
****************************...*.. * 1.B
EFEHL 'SO' MIT OPTION *.2.4.. **********
******************.8.>...Y.C..".ERSTER B
EFEHL MIT OPTION"...H..NULL,ZWEI,VIER,SE
CHS,ACHT,ZEHN,EINS,DREI,FUENF,SIEBEN,NEU
N...R..0,2,4,6,8,10,1,3,5,7,9.K.\..:.NR(
10),NR$(10)...F.. ** EINLESEN IN FELD NR
$ **...P..S.0.10...Z.:.X$:NR$(S).X$.....
.S.3.... ** EINLESEN IN FELD NR **.?...
.S.0.10.O...:.X:NR(S).X.V....S.~.... **
AUSGABE FELD VOR SORTIERUNG **......".IN
DEX NR$ VORHER NR * NR$ NACHHER NR"...J.
.S.0.10.R.T.:.S;.6)NR$(S).16)NR(S).Y....
S...... ** AUFRUF DES BEFEHL "SO" MIT OP
TION **.....SO,NR$,0,10,0,NR.2.... SO
= BEFEHL.L.... NR$ = FELDNAME 1.H..
.. 0 = ANFANGSINDEX...... 10 =
ENDINDEX...$.. 0 = SORTIERUNGSRICHU
TNG(ABSTEIGEND).I.... NR = FELDNAME
2.O.8.....B..".SORTIEREN VON NR$ ABSTEIG
END"...G..".NR WIRD ENTSPRECHEND MITSORT
IERT".:.I..".BITTE TASTE DRUECKEN".N.J..
T$:.T$."".1098.W.L.. ** AUSGABE FELD NAC
H SORTIERUNG **...V.."....";...`..S.0.10
...J.:..22)NR$(S).33)NR(S)...T..S...~.."
......"....
> CLICK IMAGE PREVIEW FOR FULL MODAL