ER–ÿ”
‰.LIOFF-;AlgorithmeninAssembler(;2;Bubble-Sort<;F;(SortierenderDirectory)P;Z;(p)TpMd-n‰JMPBEGINx;‚ITEMS„.HX00‚GesamtzahlŒFLAG….HX00–POS†.HX00‚AktuellePos. ; ª;BUFwirdamEndedefiniert."´;jedesItemnimmt16Bytesin"¾;Anspruch,sodassItemxbei!È;derAdressex*16+BUFliegt.#Ò;DieAnzahlderBytes,dieein"Ü;IteminAnspruchnimmt,kann"æ;durchinderRoutineCOMPAREð;geandertwerden.ú;
P1=$CB
P2=$CD;"-,BEGIN„JSRREAD_DIR6;@‰LDYITEMSJ‰BEQ.1†Ende,wennT‰DEY‰keinoder^‰BNE.2†nureinh.1‡RTS‰Filer;|.2‡DECITEMS†.3‡LDA#0‡wieder‰STAPOS†vonvorneš‰STAFLAG¤;®.4‡LDAPOS†folgendes¸‰TAYŠElementÂ‰INYŠkleiner?Ì‰JSRCOMPAREÖ‰BEQ.5à;ê‰LDAPOS†ja,dannô‰TAYŠbeideþ‰INYŠtauschen!‰JSRSWAP‰INCFLAG;&.5‡INCPOS„undganz0‰LDAPOS„durch:‰CMPITEMSD‰BNE.4N;“warenkeineX‰LDAFLAGƒSwapsmehrb‰BNE.3…noetig?l;“dannendev‰INCITEMS€‰JMPSHOW_DIR‚undEndeŠ-”‰.IN"D:SORTSUB.INC"ž‰.IN"D:SORTDIR.INC"¨-²BUF