|
DataMuseum.dkPresents historical artifacts from the history of: CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1792 (0x700)
Names: »BUBLESOR.CSB«
└─⟦5ca13c6d0⟧ Bits:30004195/disk3.imd Programmer til datalære fra UV-Datateket på Comet
└─⟦this⟧ »BUBLESOR.CSB«
0x000…020 (0,) 07 00 9b 06 0a 4e 00 02 00 9b 06 f8 0a 00 1e 71 f9 16 00 50 52 4f 47 52 41 4d 2d 49 44 45 4e 54 ┆ N q PROGRAM-IDENT┆ 0x020…040 49 46 49 4b 41 54 49 4f 4e f8 14 00 08 71 f9 00 00 f8 1e 00 3f 71 f9 37 00 70 72 6f 67 72 61 6d ┆IFIKATION q ?q 7 program┆ 0x040…060 2d 74 69 74 65 6c 2f 76 65 72 73 69 6f 6e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 75 ┆-titel/version: bu┆ 0x060…080 62 6c 65 73 6f 72 74 65 72 69 6e 67 2f 31 2e 30 f8 28 00 34 71 f9 2c 00 62 65 73 74 69 6c 6c 69 ┆blesortering/1.0 ( 4q , bestilli┆ 0x080…0a0 6e 67 73 6e 75 6d 6d 65 72 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 34 2e ┆ngsnummer: 04.┆ 0x0a0…0c0 33 30 33 33 f8 32 00 3c 71 f9 34 00 73 70 6e 20 6e 72 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆3033 2 <q 4 spn nr: ┆ 0x0c0…0e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 38 36 36 39 2d 38 33 30 38 30 32 2d 33 32 ┆ 88669-830802-32┆ 0x0e0…100 f8 3c 00 08 71 f9 00 00 f8 46 00 41 71 f9 39 00 73 70 72 6f 67 3a 20 20 20 20 20 20 20 20 20 20 ┆ < q F Aq 9 sprog: ┆ 0x100…120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 65 74 61 6e 69 63 20 63 6f 6d ┆ metanic com┆ 0x120…140 61 6c 20 31 2e 36 20 63 61 f8 50 00 32 71 f9 2a 00 6b 69 6c 64 65 6d 61 73 6b 69 6e 65 3a 20 20 ┆al 1.6 ca P 2q * kildemaskine: ┆ 0x140…160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6d 65 74 f8 5a 00 32 71 ┆ comet Z 2q┆ 0x160…180 f9 2a 00 61 66 76 69 6b 6c 69 6e 67 73 6d 61 73 6b 69 6e 65 3a 20 20 20 20 20 20 20 20 20 20 20 ┆ * afviklingsmaskine: ┆ 0x180…1a0 20 20 20 20 20 20 20 20 63 6f 6d 65 74 f8 64 00 08 71 f9 00 00 f8 6e 00 39 71 f9 31 00 66 6f 72 ┆ comet d q n 9q 1 for┆ 0x1a0…1c0 66 61 74 74 65 72 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆fatter: ┆ 0x1c0…1e0 20 20 75 76 2d 64 61 74 61 74 65 6b 65 74 f8 78 00 39 71 f9 31 00 6b 6f 70 69 72 65 74 3a 20 20 ┆ uv-datateket x 9q 1 kopiret: ┆ 0x1e0…200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 76 2d 64 61 ┆ uv-da┆ 0x200…220 (1,) 74 61 74 65 6b 65 74 f8 82 00 39 71 f9 31 00 72 65 74 74 69 67 68 65 64 73 68 61 76 65 72 3a 20 ┆tateket 9q 1 rettighedshaver: ┆ 0x220…240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 76 2d 64 61 74 61 74 65 6b 65 74 ┆ uv-datateket┆ 0x240…260 f8 8c 00 08 71 f9 00 00 f8 96 00 47 71 f9 3f 00 50 52 4f 47 52 41 4d 42 45 53 4b 52 49 56 45 4c ┆ q Gq ? PROGRAMBESKRIVEL┆ 0x260…280 53 45 3a 20 20 45 74 20 70 72 6f 67 72 61 6d 20 74 69 6c 20 69 6c 6c 75 73 74 72 61 74 69 6f 6e ┆SE: Et program til illustration┆ 0x280…2a0 20 61 66 20 65 6e 20 73 7b 72 64 65 6c 65 73 f8 a0 00 46 71 f9 3e 00 65 6c 65 6d 65 6e 74 7b 72 ┆ af en særdeles Fq > elementær┆ 0x2a0…2c0 20 73 6f 72 74 65 72 69 6e 67 73 61 6c 67 6f 72 69 74 6d 65 2c 20 62 6f 62 6c 65 73 6f 72 74 65 ┆ sorteringsalgoritme, boblesorte┆ 0x2c0…2e0 72 69 6e 67 2e 20 44 65 72 20 69 6e 64 6c 7b 73 65 73 20 65 74 f8 aa 00 49 71 f9 41 00 73 7b 74 ┆ring. Der indlæses et Iq A sæt┆ 0x2e0…300 20 61 66 20 74 65 6b 73 74 65 72 2c 20 65 6b 73 65 6d 70 65 6c 76 69 73 20 6e 61 76 6e 65 2c 20 ┆ af tekster, eksempelvis navne, ┆ 0x300…320 6f 67 20 64 69 73 73 65 20 73 6f 72 74 65 72 65 73 20 65 66 74 65 72 20 62 6f 62 6c 65 2d f8 b4 ┆og disse sorteres efter boble- ┆ 0x320…340 00 13 71 f9 0b 00 70 72 69 6e 63 69 70 70 65 74 2e f8 be 00 44 71 f9 3c 00 50 72 6f 67 72 61 6d ┆ q princippet. Dq < Program┆ 0x340…360 6d 65 74 20 6b 61 6e 20 76 7b 72 65 20 75 64 67 61 6e 67 73 70 75 6e 6b 74 20 66 6f 72 20 65 6e ┆met kan være udgangspunkt for en┆ 0x360…380 20 75 64 64 79 62 6e 69 6e 67 20 61 66 20 6f 6d 72 7d 64 65 74 f8 c8 00 2d 71 f9 25 00 73 6f 72 ┆ uddybning af området -q % sor┆ 0x380…3a0 74 65 72 69 6e 67 73 61 6c 67 6f 72 69 74 6d 65 72 20 69 20 61 6c 6d 69 6e 64 65 6c 69 67 68 65 ┆teringsalgoritmer i almindelighe┆ 0x3a0…3c0 64 2e f8 d2 00 10 71 f9 08 00 69 6e 64 64 61 74 61 3a f8 dc 00 08 71 f9 00 00 f8 e6 00 08 71 f9 ┆d. q inddata: q q ┆ 0x3c0…3e0 00 00 f8 f0 00 08 71 f9 00 00 f8 fa 00 08 71 f9 00 00 f8 04 01 17 71 f9 0f 00 66 69 6c 62 65 73 ┆ q q q filbes┆ 0x3e0…400 6b 72 69 76 65 6c 73 65 3a f8 0e 01 08 71 f9 00 00 f8 18 01 08 71 f9 00 00 f8 22 01 0f 71 f9 07 ┆krivelse: q q " q ┆ 0x400…420 (2,) 00 75 64 64 61 74 61 3a f8 2c 01 08 71 f9 00 00 f8 36 01 08 71 f9 00 00 f8 40 01 08 71 f9 00 00 ┆ uddata: , q 6 q @ q ┆ 0x420…440 f8 4a 01 08 71 f9 00 00 f8 54 01 08 71 f9 00 00 f8 5e 01 0a 96 fa 04 41 00 31 f8 68 01 0a 96 fa ┆ J q T q ^ A 1 h ┆ 0x440…460 04 41 01 31 f8 72 01 0a 96 fa 04 41 02 31 f8 7c 01 0a 96 fa 04 41 03 31 f8 86 01 0a 96 fa 04 41 ┆ A 1 r A 1 ø A 1 A┆ 0x460…480 04 31 f8 90 01 0a 96 fa 04 41 03 31 f8 9a 01 05 91 f8 a4 01 09 74 f7 cf ff 00 f8 ae 01 20 73 ff ┆ 1 A 1 t s ┆ 0x480…4a0 05 4a fa 05 47 05 00 31 4b df fa 05 47 1e 00 31 e6 ff 06 df fa 05 47 1e 00 31 f8 b8 01 07 75 ff ┆ J G 1K G 1 G 1 u ┆ 0x4a0…4c0 00 f8 c2 01 09 74 ec cf ff 01 f8 cc 01 05 ac f8 d6 01 29 aa fa 21 45 1c 00 44 75 20 73 6b 61 6c ┆ t ) !E Du skal┆ 0x4c0…4e0 20 6e 75 20 69 6e 64 74 61 73 74 65 20 35 20 6e 61 76 6e 65 2e 31 f7 04 f8 e0 01 35 aa fa 2d 45 ┆ nu indtaste 5 navne.1 5 -E┆ 0x4e0…500 28 00 44 69 73 73 65 20 6e 61 76 6e 65 20 62 6c 69 76 65 72 20 73 6f 72 74 65 72 65 74 2c 20 6f ┆( Disse navne bliver sorteret, o┆ 0x500…520 67 20 64 65 72 65 66 74 65 72 31 f7 04 f8 ea 01 18 aa fa 10 45 0b 00 73 6b 72 65 76 65 74 20 75 ┆g derefter1 E skrevet u┆ 0x520…540 64 2e 31 f7 04 f8 f4 01 05 aa f8 fe 01 05 aa f8 08 02 07 75 ff 01 f8 12 02 09 74 e8 cf ff 02 f8 ┆d.1 u t ┆ 0x540…560 1c 02 1b 8f a4 3a 3a ff 07 ec fa 06 47 01 00 33 31 e0 fa 06 47 05 00 33 31 de f8 26 02 0f 95 fa ┆ :: G 31 G 31 & ┆ 0x560…580 09 38 05 38 07 3b 34 39 31 f8 30 02 0a 90 c6 cf cf ff 07 f8 3a 02 07 75 ff 02 f8 44 02 09 74 e2 ┆ 8 8 ;491 0 : u D t ┆ 0x580…5a0 cf ff 03 f8 4e 02 1b 8f c6 cf cf ff 07 ec fa 06 47 01 00 33 31 e0 fa 06 47 05 00 33 31 de f8 58 ┆ N G 31 G 31 X┆ 0x5a0…5c0 02 12 aa fa 0a 38 05 38 07 3b 34 39 3b 31 f7 04 f8 62 02 0a 90 c6 cf cf ff 07 f8 6c 02 18 aa fa ┆ 8 8 ;49;1 b l ┆ 0x5c0…5e0 10 45 0b 00 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 31 f7 04 f8 76 02 05 aa f8 80 02 05 aa f8 8a 02 07 ┆ E -----------1 v ┆ 0x5e0…600 75 ff 03 f8 94 02 09 74 dd cf ff 04 f8 9e 02 1b 8f a3 3a 3a ff 08 ec fa 06 47 01 00 33 31 e0 fa ┆u t :: G 31 ┆ 0x600…620 (3,) 06 47 05 00 33 31 de f8 a8 02 1f 8f a3 3a 3a ff 09 ec fa 0a 38 08 3b 47 01 00 33 52 31 e0 fa 06 ┆ G 31 :: 8 ;G 3R1 ┆ 0x620…640 47 05 00 33 31 de f8 b2 02 1c 9c d5 cf fa 13 38 05 38 09 3b 34 39 3b 38 05 38 08 3b 34 39 3b 6c ┆G 31 8 8 ;49;8 8 ;49;l┆ 0x640…660 31 dd f8 bc 02 3f a8 fa 04 38 06 31 ec fa 0a 38 05 38 09 3b 34 39 3b 31 e8 fa 09 38 05 38 09 3b ┆1 ? 8 1 8 8 ;49;1 8 8 ;┆ 0x660…680 34 39 31 ec fa 0a 38 05 38 08 3b 34 39 3b 31 e8 fa 09 38 05 38 08 3b 34 39 31 ec fa 05 38 06 3b ┆491 8 8 ;49;1 8 8 ;491 8 ;┆ 0x680…6a0 31 f8 c6 02 05 7b f8 d0 02 0a 90 c2 cf cf ff 09 f8 da 02 0a 90 c4 cf cf ff 08 f8 e4 02 07 75 ff ┆1 æ u ┆ 0x6a0…6c0 04 f8 10 27 00 91 4e 00 03 03 03 03 03 04 04 03 03 03 01 4a 01 49 02 4e 52 0b 4c 49 4c 4c 45 53 ┆ ' N J I NR LILLES┆ 0x6c0…6e0 4b 55 46 46 45 07 53 4b 55 46 46 45 52 04 53 4f 52 54 05 53 4b 52 49 56 03 4c 5b 53 0a 56 45 4a ┆KUFFE SKUFFER SORT SKRIV LÆS VEJ┆ 0x6e0…700 4c 45 44 4e 49 4e 47 0e 49 4e 49 54 49 41 4c 49 53 45 52 49 4e 47 3b 34 39 31 ec fa 05 38 06 76 ┆LEDNING INITIALISERING;491 8 v┆