|
DataMuseum.dkPresents historical artifacts from the history of: ICL Comet |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about ICL Comet Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 3200 (0xc80)
Names: »EDITLINE.CSB«
└─⟦b8c2906c0⟧ Bits:30004180 METANIC COMAL v. 1.6 og en del COMAL programmer (Comet)
└─⟦this⟧ »EDITLINE.CSB«
0x000…020 (0,) 07 00 6d 0b 16 d0 00 02 00 6d 0b f8 0a 00 08 71 f9 00 00 f8 14 00 28 71 f9 20 00 20 61 66 20 68 ┆ m m q (q af h┆
0x020…040 2e 67 2e 70 72 6f 73 62 7c 6c 6c 2d 50 6f 55 4c 53 45 4e 2c 20 47 4c 2e 52 59 45 f8 1e 00 2e 71 ┆.g.prosbøll-PoULSEN, GL.RYE .q┆
0x040…060 f9 26 00 20 42 52 45 53 4b 52 49 56 45 4c 53 45 20 41 46 20 50 52 4f 43 45 44 55 52 45 4e 20 27 ┆ & BRESKRIVELSE AF PROCEDUREN '┆
0x060…080 45 44 49 54 4c 49 4e 45 27 f8 28 00 35 71 f9 2d 00 20 50 52 4f 43 45 44 55 52 45 4e 20 45 52 20 ┆EDITLINE' ( 5q - PROCEDUREN ER ┆
0x080…0a0 4c 55 4b 4b 45 54 2c 20 53 5d 20 44 45 4e 20 55 4d 49 44 44 45 4c 42 41 52 54 20 4b 41 4e f8 32 ┆LUKKET, SÅ DEN UMIDDELBART KAN 2┆
0x0a0…0c0 00 23 71 f9 1b 00 49 4e 44 47 5d 20 49 20 42 52 55 47 45 52 45 4e 53 20 42 49 42 4c 49 4f 54 45 ┆ #q INDGÅ I BRUGERENS BIBLIOTE┆
0x0c0…0e0 4b f8 3c 00 38 71 f9 30 00 20 46 4f 52 4d 5d 4c 20 41 54 20 45 44 49 54 45 52 45 20 45 4e 20 54 ┆K < 8q 0 FORMÅL AT EDITERE EN T┆
0x0e0…100 45 4b 53 54 56 41 52 49 41 42 45 4c 20 55 44 53 4b 52 45 56 45 54 20 50 5d f8 46 00 32 71 f9 2a ┆EKSTVARIABEL UDSKREVET PÅ F 2q *┆
0x100…120 00 20 53 4b 5b 52 4d 45 4e 2e 20 50 52 4f 43 45 44 55 52 45 4e 20 45 52 20 49 20 56 49 52 4b 45 ┆ SKÆRMEN. PROCEDUREN ER I VIRKE┆
0x120…140 4c 49 47 48 45 44 45 4e 20 45 4e f8 50 00 20 71 f9 18 00 20 4c 49 4e 49 45 4f 52 49 45 4e 54 45 ┆LIGHEDEN EN P q LINIEORIENTE┆
0x140…160 52 45 54 20 45 44 45 54 4f 52 2e f8 5a 00 2d 71 f9 25 00 20 50 41 52 41 4d 45 54 52 45 3a 20 4f ┆RET EDETOR. Z -q % PARAMETRE: O┆
0x160…180 52 47 5f 58 23 20 4f 47 20 4f 52 47 5f 23 20 45 52 20 48 45 4c 54 41 4c f8 64 00 33 71 f9 2b 00 ┆RG_X# OG ORG_# ER HELTAL d 3q + ┆
0x180…1a0 20 28 56 5b 52 44 49 50 41 52 41 4d 45 54 52 45 29 20 53 4f 4d 20 41 4e 47 49 56 45 52 20 4b 4f ┆ (VÆRDIPARAMETRE) SOM ANGIVER KO┆
0x1a0…1c0 4f 52 44 49 4e 41 54 45 52 4e 45 f8 6e 00 2f 71 f9 27 00 20 46 4f 52 20 44 45 4e 20 50 4f 53 49 ┆ORDINATERNE n /q ' FOR DEN POSI┆
0x1c0…1e0 54 49 4f 4e 2c 20 48 56 4f 52 20 20 54 45 4b 53 54 56 41 52 49 41 42 4c 45 4e f8 78 00 20 71 f9 ┆TION, HVOR TEKSTVARIABLEN x q ┆
0x1e0…200 18 00 20 4f 50 52 49 4e 44 45 4c 49 47 20 56 41 52 20 53 4b 52 45 56 45 54 2e f8 82 00 3b 71 f9 ┆ OPRINDELIG VAR SKREVET. ;q ┆
0x200…220 (1,) 33 00 20 52 45 46 20 4c 49 4e 45 24 20 45 52 20 45 4e 20 54 45 4b 53 54 56 41 52 49 41 42 45 4c ┆3 REF LINE$ ER EN TEKSTVARIABEL┆
0x220…240 2e 20 44 45 52 20 45 52 20 45 4e 20 52 45 46 45 52 45 4e 43 45 f8 8c 00 36 71 f9 2e 00 20 50 41 ┆. DER ER EN REFERENCE 6q . PA┆
0x240…260 52 41 4d 45 54 45 52 2c 20 53 5d 20 5b 4e 44 52 49 4e 47 45 52 20 46 5c 52 45 53 20 54 49 4c 42 ┆RAMETER, SÅ ÆNDRINGER FØRES TILB┆
0x260…280 41 47 45 20 54 49 4c 20 44 45 4e f8 96 00 1b 71 f9 13 00 20 4b 41 4c 44 45 4e 44 45 20 56 41 52 ┆AGE TIL DEN q KALDENDE VAR┆
0x280…2a0 49 41 42 45 4c 2e f8 a0 00 30 71 f9 28 00 20 52 45 46 20 4b 45 59 42 4f 41 52 44 24 20 45 52 20 ┆IABEL. 0q ( REF KEYBOARD$ ER ┆
0x2a0…2c0 45 54 20 48 45 4c 54 41 4c 2c 20 48 56 49 53 20 46 4f 52 4d 5d 4c f8 aa 00 31 71 f9 29 00 20 45 ┆ET HELTAL, HVIS FORMÅL 1q ) E┆
0x2c0…2e0 52 20 41 54 20 46 5c 52 20 44 45 4e 20 53 49 44 53 54 45 20 49 4e 44 54 41 53 54 4e 49 4e 47 20 ┆R AT FØR DEN SIDSTE INDTASTNING ┆
0x2e0…300 54 49 4c 42 41 47 45 f8 b4 00 31 71 f9 29 00 20 46 4f 52 20 59 44 45 52 4c 49 47 45 52 45 20 42 ┆TILBAGE 1q ) FOR YDERLIGERE B┆
0x300…320 45 48 41 4e 44 4c 49 4e 47 20 49 20 44 45 54 20 4b 41 4c 44 45 4e 44 45 f8 be 00 34 71 f9 2c 00 ┆EHANDLING I DET KALDENDE 4q , ┆
0x320…340 20 50 52 4f 47 52 41 4d 2e 20 49 4e 44 47 41 4e 47 53 56 5b 52 44 49 45 4e 20 45 52 20 55 44 45 ┆ PROGRAM. INDGANGSVÆRDIEN ER UDE┆
0x340…360 4e 20 42 45 54 59 44 4e 49 4e 47 2e f8 c8 00 08 71 f9 00 00 f8 d2 00 12 71 f9 0a 00 20 45 4b 53 ┆N BETYDNING. q q EKS┆
0x360…380 45 4d 50 45 4c 3a f8 dc 00 18 71 f9 10 00 20 20 20 20 43 55 52 53 4f 52 20 32 30 2c 31 35 f8 e6 ┆EMPEL: q CURSOR 20,15 ┆
0x380…3a0 00 1b 71 f9 13 00 20 20 20 20 50 52 49 4e 54 20 54 45 58 54 24 28 49 29 3b f8 f0 00 2c 71 f9 24 ┆ q PRINT TEXT$(I); ,q $┆
0x3a0…3c0 00 20 20 20 20 45 58 45 43 20 45 44 49 54 4c 49 4e 45 28 32 30 2c 31 35 2c 54 45 58 54 24 28 49 ┆ EXEC EDITLINE(20,15,TEXT$(I┆
0x3c0…3e0 29 2c 41 23 29 f8 fa 00 08 71 f9 00 00 f8 04 01 40 71 f9 38 00 20 20 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆),A#) q @q 8 ---------┆
0x3e0…400 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆--------------------------------┆
0x400…420 (2,) 04 17 af fa 0a 38 14 3b 47 02 00 33 52 31 e6 fa 05 47 0e 00 31 f8 9c 04 17 af fa 0a 38 14 3b 47 ┆ 8 ;G 3R1 G 1 8 ;G┆
0x420…440 03 00 33 52 31 e6 fa 05 47 cd 00 31 f8 a6 04 17 af fa 0a 38 14 3b 47 04 00 33 52 31 e6 fa 05 47 ┆ 3R1 G 1 8 ;G 3R1 G┆
0x440…460 cd 00 31 f8 b0 04 17 af fa 0a 38 14 3b 47 05 00 33 52 31 e6 fa 05 47 05 00 31 f8 ba 04 17 af fa ┆ 1 8 ;G 3R1 G 1 ┆
0x460…480 0a 38 14 3b 47 06 00 33 52 31 e6 fa 05 47 00 00 31 f8 c4 04 17 af fa 0a 38 14 3b 47 07 00 33 52 ┆ 8 ;G 3R1 G 1 8 ;G 3R┆
0x480…4a0 31 e6 fa 05 47 b7 00 31 f8 ce 04 17 af fa 0a 38 14 3b 47 08 00 33 52 31 e6 fa 05 47 ca 00 31 f8 ┆1 G 1 8 ;G 3R1 G 1 ┆
0x4a0…4c0 d8 04 1d af fa 0a 38 14 3b 47 09 00 33 52 31 e6 fa 0b 38 14 3b 47 00 01 33 51 34 31 f8 e2 04 1d ┆ 8 ;G 3R1 8 ;G 3Q41 ┆
0x4c0…4e0 af fa 0a 38 14 3b 47 0a 00 33 52 31 e6 fa 0b 38 14 3b 47 00 01 33 50 34 31 f8 ec 04 17 af fa 0a ┆ 8 ;G 3R1 8 ;G 3P41 ┆
0x4e0…500 38 14 3b 47 0b 00 33 52 31 e6 fa 05 47 32 00 31 f8 f6 04 1d af fa 0a 38 14 3b 47 0c 00 33 52 31 ┆8 ;G 3R1 G2 1 8 ;G 3R1┆
0x500…520 e6 fa 0b 38 04 23 47 00 01 33 51 34 31 f8 00 05 1d af fa 0a 38 14 3b 47 0d 00 33 52 31 e6 fa 0b ┆ 8 #G 3Q41 8 ;G 3R1 ┆
0x520…540 38 04 23 47 00 01 33 50 34 31 f8 0a 05 17 af fa 0a 38 14 3b 47 0e 00 33 52 31 e6 fa 05 47 d2 00 ┆8 #G 3P41 8 ;G 3R1 G ┆
0x540…560 31 f8 14 05 07 75 ff 09 f8 1e 05 08 71 f9 00 00 f8 28 05 11 74 b9 db ff 0a 4a e4 ff 04 e6 ff 0b ┆1 u q ( t J ┆
0x560…580 4b f8 32 05 0b b0 fa 05 38 0b 3b 31 f8 3c 05 07 75 ff 15 f8 10 27 00 91 d0 00 03 02 02 04 02 04 ┆K 2 8 ;1 < u ' ┆
0x580…5a0 04 02 03 03 03 03 03 03 03 03 03 03 03 03 03 03 06 49 4e 44 41 54 41 01 42 0b 52 45 57 52 49 54 ┆ INDATA B REWRIT┆
0x5a0…5c0 45 4c 49 4e 45 08 4c 49 4e 45 54 45 53 54 0a 52 45 57 52 49 54 4c 49 4e 45 09 57 52 49 54 45 42 ┆ELINE LINETEST REWRITLINE WRITEB┆
0x5c0…5e0 59 54 45 0b 49 4e 53 45 52 54 42 4c 41 4e 4b 0a 44 45 4c 45 54 45 42 59 54 45 0b 43 55 52 53 4f ┆YTE INSERTBLANK DELETEBYTE CURSO┆
0x5e0…600 52 52 49 47 48 54 0a 43 55 52 53 4f 52 4c 45 46 54 0b 4d 41 43 48 49 4e 45 43 4f 44 45 07 49 4e ┆RRIGHT CURSORLEFT MACHINECODE IN┆
0x600…620 (3,) 44 44 41 54 41 0a 49 4e 44 41 54 41 49 4e 49 54 0a 52 45 54 55 52 4e 42 41 43 4b 01 58 04 48 45 ┆DDATA INDATAINIT RETURNBACK X HE┆
0x620…640 4c 50 04 43 4f 44 45 08 4b 45 59 42 4f 41 52 44 04 4c 49 4e 45 05 4f 52 47 5f 59 05 4f 52 47 5f ┆LP CODE KEYBOARD LINE ORG_Y ORG_┆
0x640…660 58 08 45 44 49 54 4c 49 4e 45 42 4c 41 4e 4b 0a 44 45 4c 45 54 45 42 59 54 45 0b 43 55 52 53 4f ┆X EDITLINEBLANK DELETEBYTE CURSO┆
0x660…680 52 52 49 47 48 54 0a 43 55 52 53 4f 52 4c 45 46 54 0b 4d 41 43 48 49 4e 45 43 4f 44 45 07 49 4a ┆RRIGHT CURSORLEFT MACHINECODE IJ┆
0x680…6a0 31 e6 fa 05 47 b7 00 31 f8 ce 04 17 af fa 0a 38 14 3b 47 08 00 33 52 31 e6 fa 05 47 ca 00 31 f8 ┆1 G 1 8 ;G 3R1 G 1 ┆
0x6a0…6c0 d8 04 1d af fa 0a 38 14 3b 47 09 00 33 52 31 e6 fa 0b 38 14 3b 47 00 01 33 51 34 31 f8 e2 04 1d ┆ 8 ;G 3R1 8 ;G 3Q41 ┆
0x6c0…6e0 af fa 0a 38 14 3b 47 0a 00 33 52 31 e6 fa 0b 38 14 3b 47 00 01 33 50 34 31 f8 ec 04 17 af fa 0a ┆ 8 ;G 3R1 8 ;G 3P41 ┆
0x6e0…700 38 14 3b 47 0b 00 33 52 31 e6 fa 05 47 32 00 31 f8 f6 04 1d af fa 0a 38 14 3b 47 0c 00 33 52 31 ┆8 ;G 3R1 G2 1 8 ;G 3R1┆
0x700…720 e6 fa 0b 38 04 23 47 00 01 33 51 34 31 f8 00 05 1d af fa 0a 38 14 3b 47 0d 00 33 52 31 e6 fa 0b ┆ 8 #G 3Q41 8 ;G 3R1 ┆
0x720…740 38 04 23 47 00 01 33 50 34 31 f8 0a 05 17 af fa 0a 38 14 3b 47 0e 00 33 52 31 e6 fa 05 47 d2 00 ┆8 #G 3P41 8 ;G 3R1 G ┆
0x740…760 31 f8 14 05 07 75 ff 09 f8 1e 05 08 71 f9 00 00 f8 28 05 11 74 b9 db ff 0a 4a e4 ff 04 e6 ff 0b ┆1 u q ( t J ┆
0x760…780 4b f8 32 05 0b b0 fa 05 38 0b 3b 31 f8 3c 05 07 75 ff 15 f8 10 27 00 91 d0 00 03 02 02 04 02 04 ┆K 2 8 ;1 < u ' ┆
0x780…7a0 04 02 03 03 03 03 03 03 03 03 03 03 03 03 03 03 06 49 4e 44 41 54 41 01 42 0b 52 45 57 52 49 54 ┆ INDATA B REWRIT┆
0x7a0…7c0 45 4c 49 4e 45 08 4c 49 4e 45 54 45 53 54 0a 52 45 57 52 49 54 4c 49 4e 45 09 57 52 49 54 45 42 ┆ELINE LINETEST REWRITLINE WRITEB┆
0x7c0…7e0 59 54 45 0b 49 4e 53 45 52 54 42 4c 41 4e 4b 0a 44 45 4c 45 54 45 42 59 54 45 0b 43 55 52 53 4f ┆YTE INSERTBLANK DELETEBYTE CURSO┆
0x7e0…800 52 52 49 47 48 54 0a 43 55 52 53 4f 52 4c 45 46 54 0b 4d 41 43 48 49 4e 45 43 4f 44 45 07 49 4e ┆RRIGHT CURSORLEFT MACHINECODE IN┆
0x800…820 (4,) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆
[…0xf…]
0xa00…a20 (5,) 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2f 2f f8 0e 01 08 71 f9 00 00 f8 18 01 19 74 89 38 ff 00 4a ff ┆-----------// q t 8 J ┆
0xa20…a40 01 e6 ff 02 e6 e4 ff 03 e6 e4 ff 04 4b e5 f8 22 01 2f 73 ff 05 df fa 05 47 0f 00 31 e6 ff 06 df ┆ K " /s G 1 ┆
0xa40…a60 fa 05 47 50 00 31 f9 14 00 20 4c 5b 4e 47 44 45 4e 20 4b 41 4e 20 56 41 52 49 45 52 45 f8 2c 01 ┆ GP 1 LÆNGDEN KAN VARIERE , ┆
0xa60…a80 1d a8 fa 04 37 07 31 ec fa 05 47 01 00 31 e8 fa 04 37 08 31 ec fa 04 49 33 31 f8 36 01 0a 96 fa ┆ 7 1 G 1 7 1 I31 6 ┆
0xa80…aa0 04 41 09 31 f8 40 01 12 ad fa 05 38 01 3b 31 e6 fa 05 38 02 3b 31 f8 4a 01 05 7c f8 54 01 12 96 ┆ A 1 @ 8 ;1 8 ;1 J ø T ┆
0xaa0…ac0 fa 0c 41 0a 38 04 43 00 38 0b 43 00 31 f8 5e 01 0f 80 e3 db 02 fa 05 38 04 3b 31 df f8 68 01 39 ┆ A 8 C 8 C 1 ^ 8 ;1 h 9┆
0xac0…ae0 81 0d 00 0d 00 02 fa 05 47 0d 00 31 f7 02 e6 fa 05 47 0b 00 31 f7 02 e6 fa 05 47 0a 00 31 f7 02 ┆ G 1 G 1 G 1 ┆
0xae0…b00 f9 12 00 20 53 45 20 41 53 43 49 49 20 54 41 42 45 4c 4c 45 4e f8 72 01 10 a8 fa 04 37 08 31 ec ┆ SE ASCII TABELLEN r 7 1 ┆
0xb00…b20 fa 04 48 33 31 f8 7c 01 12 81 08 00 08 00 02 fa 05 47 08 00 31 f7 02 f8 86 01 0a 96 fa 04 41 0c ┆ H31 ø G 1 A ┆
0xb20…b40 31 f8 90 01 12 81 0c 00 0c 00 02 fa 05 47 0c 00 31 f7 02 f8 9a 01 0a 96 fa 04 41 0d 31 f8 a4 01 ┆1 G 1 A 1 ┆
0xb40…b60 12 81 7f 00 7f 00 02 fa 05 47 7f 00 31 f7 02 f8 ae 01 0a 96 fa 04 41 0e 31 f8 b8 01 12 81 1f 00 ┆ G 1 A 1 ┆
0xb60…b80 1f 00 02 fa 05 47 1f 00 31 f7 02 f8 c2 01 0a 96 fa 04 41 0f 31 f8 cc 01 07 82 12 2c f8 d6 01 0a ┆ G 1 A 1 , ┆
0xb80…ba0 96 fa 04 41 10 31 f8 e0 01 05 83 f8 ea 01 0e 7d cc db fa 06 38 08 3b 36 31 f8 f4 01 07 75 ff 00 ┆ A 1 å 8 ;61 u ┆
0xba0…bc0 f8 fe 01 08 71 f9 00 00 f8 08 02 36 74 a2 db ff 0c f9 2a 00 20 48 56 49 53 20 4d 55 4c 49 47 54 ┆ q 6t * HVIS MULIGT┆
0xbc0…be0 2c 20 42 45 56 5b 47 45 53 20 43 55 52 53 4f 52 45 4e 20 54 49 4c 20 56 45 4e 53 54 52 45 f8 12 ┆, BEVÆGES CURSOREN TIL VENSTRE ┆
0xbe0…c00 02 12 9c d7 db fa 09 38 07 3b 47 01 00 68 31 dd f8 1c 02 11 a8 fa 04 37 07 31 ee fa 05 47 01 00 ┆ 8 ;G h1 7 1 G ┆
0xc00…c20 (6,) 31 f8 26 02 1a ad fa 0d 38 01 3b 38 07 3b 63 47 01 00 64 31 e6 fa 05 38 02 3b 31 f8 30 02 05 7b ┆1 & 8 ;8 ;cG d1 8 ;1 0 æ┆
0xc20…c40 f8 3a 02 07 75 ff 0c f8 44 02 08 71 f9 00 00 f8 4e 02 23 74 96 db ff 0d f9 17 00 20 48 56 49 53 ┆ : u D q N #t HVIS┆
0xc40…c60 20 4d 55 4c 49 47 54 2c 20 54 49 4c 20 48 5c 4a 52 45 f8 58 02 16 9c d7 db fa 0d 38 07 3b 47 01 ┆ MULIGT, TIL HØJRE X 8 ;G ┆
0xc60…c80 00 64 38 03 0b 66 31 dd f8 62 02 11 a8 fa 04 37 07 31 ed fa 05 47 01 00 31 f8 6c 02 1a ad fa 0d ┆ d8 f1 b 7 1 G 1 l ┆