|
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: 5120 (0x1400)
Names: »KERNE.CSB«
└─⟦b8c2906c0⟧ Bits:30004180 METANIC COMAL v. 1.6 og en del COMAL programmer (Comet)
└─⟦this⟧ »KERNE.CSB«
0x0000…0020 (0,) 50 00 03 20 20 20 20 20 20 20 20 20 03 03 03 03 03 03 03 20 20 20 20 20 20 03 03 03 20 20 20 20 ┆P ┆ 0x0020…0040 20 20 20 20 03 03 20 20 20 20 20 20 20 20 03 03 03 03 20 20 20 20 20 20 20 20 03 03 20 20 20 20 ┆ ┆ 0x0040…0060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 03 77 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ w ┆ 0x0060…0080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x0080…00a0 50 00 03 03 03 20 20 20 20 20 20 20 20 20 20 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 ┆P ┆ 0x00a0…00c0 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 20 20 20 20 20 20 20 20 20 20 20 03 20 20 20 20 20 ┆ ┆ 0x00c0…00e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 03 03 77 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ w ┆ 0x00e0…0100 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x0100…0120 50 00 03 03 03 03 03 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 ┆P ┆ 0x0120…0140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 03 03 03 03 20 20 20 20 ┆ ┆ 0x0140…0160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 03 03 03 77 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ w ┆ 0x0160…0180 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x0180…01a0 50 00 03 03 03 03 03 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 ┆P ┆ 0x01a0…01c0 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 03 03 03 03 03 03 ┆ ┆ 0x01c0…01e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 03 03 03 77 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ w ┆ 0x01e0…0200 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x0200…0220 (1,) 50 00 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 ┆P ┆ 0x0220…0240 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 ┆ ┆ 0x0240…0260 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 77 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ w ┆ 0x0260…0280 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x0280…02a0 50 00 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 ┆P ┆ 0x02a0…02c0 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 ┆ ┆ 0x02c0…02e0 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 77 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ w ┆ 0x02e0…0300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x0300…0320 50 00 03 03 03 03 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 03 03 0e 0e 0e 0e 03 03 03 03 ┆P ┆ 0x0320…0340 03 03 03 03 03 03 03 03 03 03 03 03 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 03 03 03 03 03 0e 0e ┆ ┆ 0x0340…0360 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 03 77 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ w ┆ 0x0360…0380 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x0380…03a0 50 00 03 03 03 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e ┆P ┆ 0x03a0…03c0 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 03 03 03 03 03 0e 0e ┆ ┆ 0x03c0…03e0 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 0e 03 77 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ w ┆ 0x03e0…0400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x0400…0420 (2,) 65 20 66 6f 72 20 61 74 20 61 66 76 69 6b 6c 65 20 65 74 20 74 65 67 6e 65 74 f8 54 01 11 71 f9 ┆e for at afvikle et tegnet T q ┆ 0x0420…0440 09 00 20 62 69 6c 6c 65 64 65 2e f8 5e 01 08 71 f9 00 00 f8 68 01 09 74 8d 37 ff 46 f8 72 01 05 ┆ billede. ^ q h t 7 F r ┆ 0x0440…0460 ac f8 7c 01 1b 8f e6 db db ff 06 ec fa 06 47 02 00 33 31 e0 fa 06 47 18 00 33 31 de f8 86 01 13 ┆ ø G 31 G 31 ┆ 0x0460…0480 ad fa 05 47 01 00 31 e6 fa 06 38 06 3b 34 31 f8 90 01 13 aa fa 0a 38 41 38 06 3b 34 39 3b 31 f7 ┆ G 1 8 ;41 8A8 ;49;1 ┆ 0x0480…04a0 04 e9 f8 9a 01 0a 90 e6 db db ff 06 f8 a4 01 12 ad fa 05 47 01 00 31 e6 fa 05 47 01 00 31 f8 ae ┆ G 1 G 1 ┆ 0x04a0…04c0 01 22 aa fa 06 47 0b 00 15 31 f7 04 e9 f9 10 00 20 27 42 61 63 6b 73 63 72 6f 6c 6c 27 20 2f 2f ┆ " G 1 'Backscroll' //┆ 0x04c0…04e0 f8 b8 01 12 ad fa 05 47 01 00 31 e6 fa 05 47 01 00 31 f8 c2 01 11 aa fa 09 38 41 47 01 00 39 3b ┆ G 1 G 1 8AG 9;┆ 0x04e0…0500 31 f7 04 f8 cc 01 12 ad fa 05 47 01 00 31 e6 fa 05 47 18 00 31 f8 d6 01 07 75 ff 46 f8 e0 01 09 ┆1 G 1 G 1 u F ┆ 0x0500…0520 74 73 da ff 45 f8 ea 01 1c b3 f5 fa 05 47 02 00 31 e6 fa 05 38 43 3b 31 e6 b2 e6 fa 05 47 53 00 ┆ts E G 1 8C;1 GS ┆ 0x0520…0540 31 f8 f4 01 1b 8f e6 db db ff 06 ec fa 06 47 01 00 33 31 e0 fa 06 47 18 00 33 31 de f8 fe 01 1e ┆1 G 31 G 31 ┆ 0x0540…0560 92 f5 fa 05 47 02 00 31 e6 fa 05 38 06 3b 31 ea fa 09 38 41 38 06 3b 34 39 31 f8 08 02 0a 90 e6 ┆ G 1 8 ;1 8A8 ;491 ┆ 0x0560…0580 db db ff 06 f8 12 02 0c b4 f5 fa 05 47 02 00 31 f8 1c 02 0a 96 fa 04 41 46 31 f8 26 02 07 75 ff ┆ G 1 AF1 & u ┆ 0x0580…05a0 45 f8 30 02 08 71 f9 00 00 f8 3a 02 3a 71 f9 32 00 20 4e 65 64 65 6e 73 74 7d 65 6e 64 65 20 70 ┆E 0 q : :q 2 Nedenstående p┆ 0x05a0…05c0 72 6f 67 72 61 6d 73 74 75 6d 70 65 72 20 65 72 20 68 65 6e 74 65 74 20 66 72 61 20 53 50 49 4c ┆rogramstumper er hentet fra SPIL┆ 0x05c0…05e0 45 58 2e f8 44 02 4b 71 f9 43 00 20 4e 6f 67 65 74 20 6c 69 67 6e 65 6e 64 65 20 6b 61 6e 20 61 ┆EX. D Kq C Noget lignende kan a┆ 0x05e0…0600 6e 76 65 6e 64 65 73 2c 20 68 76 69 73 20 6d 61 6e 20 76 69 6c 20 6c 61 76 65 20 73 70 69 6c 2c ┆nvendes, hvis man vil lave spil,┆ 0x0600…0620 (3,) 20 64 65 72 20 62 79 67 67 65 72 20 70 7d f8 4e 02 3d 71 f9 35 00 20 73 70 69 6c 6c 65 70 6c 61 ┆ der bygger på N =q 5 spillepla┆ 0x0620…0640 64 65 72 20 74 65 67 6e 65 74 20 76 65 64 20 68 6a 7b 6c 70 20 61 66 20 46 55 4c 4c 2d 53 43 52 ┆der tegnet ved hjælp af FULL-SCR┆ 0x0640…0660 45 45 4e 2d 45 44 49 54 4f 52 2e f8 58 02 08 71 f9 00 00 f8 62 02 3c a8 fa 04 37 47 31 ec fa 06 ┆EEN-EDITOR. X q b < 7G1 ┆ 0x0660…0680 47 0d 00 33 31 f9 27 00 20 52 45 54 55 52 4e 2d 74 61 73 74 65 6e 20 62 72 75 67 65 73 20 74 69 ┆G 31 ' RETURN-tasten bruges ti┆ 0x0680…06a0 6c 20 61 74 20 73 6c 69 70 70 65 20 75 64 2e f8 6c 02 15 a8 fa 04 38 43 31 ec fa 09 45 04 00 4d ┆l at slippe ud. l 8C1 E M┆ 0x06a0…06c0 41 5a 45 31 f8 76 02 0a 96 fa 04 41 45 31 f8 80 02 0a 96 fa 04 41 48 31 f8 8a 02 05 7c f8 94 02 ┆AZE1 v AE1 AH1 ø ┆ 0x06c0…06e0 05 7c f8 9e 02 0a 96 fa 04 41 49 31 f8 a8 02 0a 96 fa 04 41 4a 31 f8 b2 02 12 7d 9b da fa 0a 38 ┆ ø AI1 AJ1 å 8┆ 0x06e0…0700 3f 3b 38 47 3b 32 59 31 f8 bc 02 12 ad fa 05 47 28 00 31 e6 fa 05 47 15 00 31 f8 c6 02 37 aa fa ┆?;8G;2Y1 G( 1 G 1 7 ┆ 0x0700…0720 12 45 0d 00 44 75 20 68 61 72 20 62 72 75 67 74 20 31 f7 04 e9 fa 05 38 4b 3b 31 f7 03 e9 fa 10 ┆ E Du har brugt 1 8K;1 ┆ 0x0720…0740 45 0b 00 20 73 6b 72 69 64 74 2e 20 20 20 31 f7 04 f8 d0 02 12 ad fa 05 47 28 00 31 e6 fa 05 47 ┆E skridt. 1 G( 1 G┆ 0x0740…0760 16 00 31 f8 da 02 3e aa fa 1a 45 15 00 44 75 20 74 72 7d 64 74 65 20 70 7d 20 73 74 72 65 67 65 ┆ 1 > E Du trådte på strege┆ 0x0760…0780 6e 20 31 f7 04 e9 fa 05 38 4c 3b 31 f7 03 e9 fa 0f 45 0a 00 20 67 61 6e 67 65 2e 20 20 20 31 f7 ┆n 1 8L;1 E gange. 1 ┆ 0x0780…07a0 04 f8 e4 02 12 ad fa 05 47 28 00 31 e6 fa 05 47 17 00 31 f8 ee 02 25 aa fa 1c 45 17 00 56 69 6c ┆ G( 1 G 1 % E Vil┆ 0x07a0…07c0 20 64 75 20 66 6f 72 74 73 7b 74 74 65 3f 20 20 4a 2f 4e 20 31 f7 04 e9 f8 f8 02 0c b0 fa 06 47 ┆ du fortsætte? J/N 1 G┆ 0x07c0…07e0 01 0c 33 31 f8 02 03 14 a8 fa 04 38 40 31 ec fa 08 47 00 0c 33 20 15 31 f8 0c 03 1c 9c 98 da fa ┆ 31 8@1 G 3 1 ┆ 0x07e0…0800 13 38 40 3b 45 01 00 6a 6f 38 40 3b 45 01 00 4a 6f 5c 31 dd f8 16 03 12 ad fa 05 47 28 00 31 e6 ┆ 8@;E jo8@;E JoØ1 G( 1 ┆ 0x0800…0820 (4,) fa 05 47 15 00 31 f8 20 03 0f aa fa 06 47 1f 00 15 31 f7 04 e9 f8 2a 03 12 ad fa 05 47 28 00 31 ┆ G 1 G 1 * G( 1┆ 0x0820…0840 e6 fa 05 47 16 00 31 f8 34 03 0f aa fa 06 47 1f 00 15 31 f7 04 e9 f8 3e 03 12 ad fa 05 47 28 00 ┆ G 1 4 G 1 > G( ┆ 0x0840…0860 31 e6 fa 05 47 17 00 31 f8 48 03 0f aa fa 06 47 1f 00 15 31 f7 04 e9 f8 52 03 14 ad fa 06 38 04 ┆1 G 1 H G 1 R 8 ┆ 0x0860…0880 3b 34 31 e6 fa 06 38 06 3b 34 31 f8 5c 03 05 7b f8 66 03 1b 7d 98 da fa 13 38 40 3b 45 01 00 6a ┆;41 8 ;41 Ø æ f å 8@;E j┆ 0x0880…08a0 70 38 40 3b 45 01 00 4a 70 5b 31 f8 70 03 12 ad fa 05 47 01 00 31 e6 fa 05 47 01 00 31 f8 7a 03 ┆p8@;E JpÆ1 p G 1 G 1 z ┆ 0x08a0…08c0 09 74 4e da ff 4a f8 84 03 20 9d 0e da fa 09 38 3f 3b 47 08 00 69 31 dd a8 fa 04 37 04 31 ee fa ┆ tN J 8?;G i1 7 1 ┆ 0x08c0…08e0 06 47 01 00 33 31 f8 8e 03 20 9d 0e da fa 09 38 3f 3b 47 0c 00 69 31 dd a8 fa 04 37 04 31 ed fa ┆ G 31 8?;G i1 7 1 ┆ 0x08e0…0900 06 47 01 00 33 31 f8 98 03 20 9d 0e da fa 09 38 3f 3b 47 0a 00 69 31 dd a8 fa 04 37 06 31 ed fa ┆ G 31 8?;G i1 7 1 ┆ 0x0900…0920 06 47 01 00 33 31 f8 a2 03 20 9d 0e da fa 09 38 3f 3b 47 0b 00 69 31 dd a8 fa 04 37 06 31 ee fa ┆ G 31 8?;G i1 7 1 ┆ 0x0920…0940 06 47 01 00 33 31 f8 ac 03 21 9d 0f db fa 0a 38 04 3b 47 50 00 33 58 31 dd a8 fa 04 37 04 31 ec ┆ G 31 ! 8 ;GP 3X1 7 1 ┆ 0x0940…0960 fa 06 47 50 00 33 31 f8 b6 03 21 9d 0f db fa 0a 38 04 3b 47 01 00 33 56 31 dd a8 fa 04 37 04 31 ┆ GP 31 ! 8 ;G 3V1 7 1┆ 0x0960…0980 ec fa 06 47 01 00 33 31 f8 c0 03 21 9d 0f db fa 0a 38 06 3b 47 01 00 33 56 31 dd a8 fa 04 37 06 ┆ G 31 ! 8 ;G 3V1 7 ┆ 0x0980…09a0 31 ec fa 06 47 01 00 33 31 f8 ca 03 21 9d 0f db fa 0a 38 06 3b 47 18 00 33 57 31 dd a8 fa 04 37 ┆1 G 31 ! 8 ;G 3W1 7┆ 0x09a0…09c0 06 31 ec fa 06 47 17 00 33 31 f8 d4 03 0d aa fa 05 38 4d 3b 31 f7 04 f8 de 03 14 ad fa 06 38 04 ┆ 1 G 31 8M;1 8 ┆ 0x09c0…09e0 3b 34 31 e6 fa 06 38 06 3b 34 31 f8 e8 03 0f aa fa 06 45 01 00 2a 31 f7 04 e9 f8 f2 03 14 ad fa ┆;41 8 ;41 E *1 ┆ 0x09e0…0a00 06 38 04 3b 34 31 e6 fa 06 38 06 3b 34 31 f8 fc 03 0a 96 fa 04 41 4e 31 f8 06 04 07 75 ff 4a f8 ┆ 8 ;41 8 ;41 AN1 u J ┆ 0x0a00…0a20 (5,) 10 04 09 74 35 da ff 4e f8 1a 04 1f a8 fa 04 38 4d 31 ec fa 13 38 41 38 06 3b 34 39 38 04 3b 34 ┆ t5 N 8M1 8A8 ;498 ;4┆ 0x0a20…0a40 38 04 3b 34 3a 3b 31 f8 24 04 21 9d 0f da fa 0a 38 4d 3b 45 01 00 20 70 31 dd a8 fa 04 37 4c 31 ┆8 ;4:;1 $ ! 8M;E p1 7L1┆ 0x0a40…0a60 ed fa 06 47 01 00 33 31 f8 2e 04 07 75 ff 4e f8 38 04 09 74 57 da ff 49 f8 42 04 0c b0 fa 06 47 ┆ G 31 . u N 8 tW I B G┆ 0x0a60…0a80 01 0c 33 31 f8 4c 04 13 a8 fa 04 37 3f 31 ec fa 07 47 00 0c 33 20 31 f8 56 04 2a 9c 9b da fa 21 ┆ 31 L 7?1 G 3 1 V * !┆ 0x0a80…0aa0 38 3f 3b 47 08 00 6a 38 3f 3b 47 0a 00 6a 5b 38 3f 3b 47 0b 00 6a 5b 38 3f 3b 47 0c 00 6a 5b 31 ┆8?;G j8?;G jÆ8?;G jÆ8?;G jÆ1┆ 0x0aa0…0ac0 dd f8 60 04 14 ad fa 06 38 04 3b 34 31 e6 fa 06 38 06 3b 34 31 f8 6a 04 07 7a 0f 2b f8 74 04 12 ┆ ` 8 ;41 8 ;41 j z + t ┆ 0x0ac0…0ae0 a8 fa 04 37 4b 31 ed fa 06 47 01 00 33 31 f8 7e 04 05 7b f8 88 04 07 75 ff 49 f8 92 04 09 74 5f ┆ 7K1 G 31 ü æ u I t_┆ 0x0ae0…0b00 da ff 48 f8 9c 04 4a a8 fa 04 37 04 31 ec fa 06 47 01 00 33 31 e8 fa 04 37 06 31 ec fa 06 47 01 ┆ H J 7 1 G 31 7 1 G ┆ 0x0b00…0b20 00 33 31 e8 fa 04 37 4c 31 ec fa 06 47 00 00 33 31 e8 fa 04 37 4b 31 ec fa 06 47 00 00 33 31 e8 ┆ 31 7L1 G 31 7K1 G 31 ┆ 0x0b20…0b40 fa 04 38 4d 31 ec fa 06 45 01 00 20 31 f8 a6 04 14 ad fa 06 38 04 3b 34 31 e6 fa 06 38 06 3b 34 ┆ 8M1 E 1 8 ;41 8 ;4┆ 0x0b40…0b60 31 f8 b0 04 0f aa fa 06 45 01 00 2a 31 f7 04 e9 f8 ba 04 14 ad fa 06 38 04 3b 34 31 e6 fa 06 38 ┆1 E *1 8 ;41 8┆ 0x0b60…0b80 06 3b 34 31 f8 c4 04 07 75 ff 48 f8 ce 04 4e 72 a7 a1 45 14 00 34 34 34 34 33 34 34 34 33 32 34 ┆ ;41 u H Nr E 44443444324┆ 0x0b80…0ba0 33 32 34 34 31 34 34 34 34 e6 45 14 00 34 31 32 31 34 31 32 34 32 31 31 33 34 33 31 34 31 33 31 ┆324414444 E 4121412421134314131┆ 0x0ba0…0bc0 34 e6 45 14 00 35 34 32 31 34 35 34 34 31 34 35 34 34 31 34 35 34 33 31 33 f8 d8 04 13 78 ff 2c ┆4 E 54214544145441454313 x ,┆ 0x0bc0…0be0 f9 09 00 20 20 32 33 34 20 20 2f 2f f8 e2 04 4e 72 08 a2 45 14 00 33 32 32 32 33 34 34 33 33 32 ┆ 234 // Nr E 3222344332┆ 0x0be0…0c00 34 31 34 34 34 31 33 33 33 33 e6 45 14 00 33 32 32 32 33 34 34 34 33 32 34 34 34 34 31 32 33 33 ┆4144413333 E 322234443244441233┆ 0x0c00…0c20 (6,) 41 4c 45 52 49 07 42 49 4c 4c 45 44 45 05 53 56 41 52 31 0a 42 49 4c 4c 45 44 4e 41 56 4e 07 46 ┆ALERI BILLEDE SVAR1 BILLEDNAVN F┆ 0x0c20…0c40 49 4c 4e 41 56 4e 03 4c 49 4e 02 53 56 04 54 41 53 54 06 42 4c 4f 4b 32 33 06 42 4c 4f 4b 32 32 ┆ILNAVN LIN SV TAST BLOK23 BLOK22┆ 0x0c40…0c60 06 42 4c 4f 4b 31 31 06 42 4c 4f 4b 31 30 05 42 4c 4f 4b 35 05 42 4c 4f 4b 34 06 42 4c 4f 4b 32 ┆ BLOK11 BLOK10 BLOK5 BLOK4 BLOK2┆ 0x0c60…0c80 31 06 42 4c 4f 4b 32 30 06 42 4c 4f 4b 31 39 06 42 4c 4f 4b 31 38 06 42 4c 4f 4b 31 37 06 42 4c ┆1 BLOK20 BLOK19 BLOK18 BLOK17 BL┆ 0x0c80…0ca0 4f 4b 31 36 06 42 4c 4f 4b 31 35 06 42 4c 4f 4b 31 34 06 42 4c 4f 4b 31 33 06 42 4c 4f 4b 31 32 ┆OK16 BLOK15 BLOK14 BLOK13 BLOK12┆ 0x0ca0…0cc0 05 42 4c 4f 4b 39 05 42 4c 4f 4b 38 05 42 4c 4f 4b 37 05 42 4c 4f 4b 36 05 42 4c 4f 4b 31 05 42 ┆ BLOK9 BLOK8 BLOK7 BLOK6 BLOK1 B┆ 0x0cc0…0ce0 4c 4f 4b 33 05 42 4c 4f 4b 32 04 47 52 31 33 04 47 52 31 32 04 47 52 31 31 06 44 41 54 41 4e 52 ┆LOK3 BLOK2 GR13 GR12 GR11 DATANR┆ 0x0ce0…0d00 05 50 4f 49 4e 54 04 47 52 31 30 03 47 52 39 03 47 52 38 03 47 52 37 03 47 52 36 03 47 52 35 03 ┆ POINT GR10 GR9 GR8 GR7 GR6 GR5 ┆ 0x0d00…0d20 47 52 34 03 47 52 33 03 47 52 32 03 47 52 31 01 41 05 4c 49 4e 4a 45 06 4c 49 4e 4a 45 32 06 4c ┆GR4 GR3 GR2 GR1 A LINJE LINJE2 L┆ 0x0d20…0d40 49 4e 4a 45 31 06 5c 56 45 52 53 54 03 42 41 4b 06 53 54 41 52 54 59 06 53 54 41 52 54 58 04 53 ┆INJE1 ØVERST BAK STARTY STARTX S┆ 0x0d40…0d60 4b 55 42 02 4e 52 07 44 41 54 41 50 49 4c 03 4b 41 52 05 41 4e 54 41 4c 04 57 4f 52 44 06 4c 49 ┆KUB NR DATAPIL KAR ANTAL WORD LI┆ 0x0d60…0d80 4e 4a 45 56 06 54 45 4e 50 4f 53 04 54 45 47 4e 07 4c 49 4e 45 50 4f 53 01 59 07 54 45 47 4e 50 ┆NJEV TENPOS TEGN LINEPOS Y TEGNP┆ 0x0d80…0da0 4f 53 01 58 08 54 45 47 4e 4c 49 4e 45 04 54 45 47 4e 03 42 49 47 01 41 4c 49 4e 4a 45 32 06 4c ┆OS X TEGNLINE TEGN BIG ALINJE2 L┆ 0x0da0…0dc0 49 4e 4a 45 31 06 5c 56 45 52 53 54 03 42 41 4b 06 53 54 41 52 54 59 06 53 54 41 52 54 58 04 53 ┆INJE1 ØVERST BAK STARTY STARTX S┆ 0x0dc0…0de0 4b 55 42 02 4e 52 07 44 41 54 41 50 49 4c 03 4b 41 52 05 41 4e 54 41 4c 04 57 4f 52 44 06 4c 49 ┆KUB NR DATAPIL KAR ANTAL WORD LI┆ 0x0de0…0e00 4e 4a 45 56 06 54 45 4e 50 4f 53 04 54 45 47 4e 07 4c 49 4e 45 50 4f 53 01 59 07 54 45 47 4e 18 ┆NJEV TENPOS TEGN LINEPOS Y TEGN ┆ 0x0e00…0e20 (7,) 30 30 31 30 20 2f 2f 20 50 52 4f 47 52 41 4d 53 54 55 4d 50 45 52 20 54 49 4c 20 46 55 4c 4c 2d ┆0010 // PROGRAMSTUMPER TIL FULL-┆ 0x0e20…0e40 53 43 52 45 45 4e 2d 45 44 49 54 4f 52 20 74 69 6c 20 43 4f 4d 45 54 20 4d 50 53 2d 33 30 30 30 ┆SCREEN-EDITOR til COMET MPS-3000┆ 0x0e40…0e60 2e 0d 30 30 32 30 20 2f 2f 20 53 6b 72 65 76 65 74 20 69 20 43 4f 4d 41 4c 2d 38 30 0d 30 30 33 ┆. 0020 // Skrevet i COMAL-80 003┆ 0x0e60…0e80 30 20 2f 2f 20 61 66 20 4a 7c 72 67 65 6e 20 43 68 72 69 73 74 69 61 6e 73 65 6e 0d 30 30 34 30 ┆0 // af Jørgen Christiansen 0040┆ 0x0e80…0ea0 20 2f 2f 20 66 6f 72 20 4a 43 20 44 41 54 41 2d 53 45 52 56 49 43 45 2c 20 56 65 73 74 72 65 20 ┆ // for JC DATA-SERVICE, Vestre ┆ 0x0ea0…0ec0 52 69 6e 67 67 61 64 65 20 38 34 2c 20 38 30 30 30 20 5d 72 68 75 73 20 43 2e 0d 30 30 35 30 20 ┆Ringgade 84, 8000 Århus C. 0050 ┆ 0x0ec0…0ee0 2f 2f 0d 30 30 36 30 20 2f 2f 20 6c 69 6e 6a 65 20 39 30 2d 31 35 30 20 65 72 20 65 6e 20 6d 61 ┆// 0060 // linje 90-150 er en ma┆ 0x0ee0…0f00 73 6b 69 6e 6b 6f 64 65 73 65 6b 76 65 6e 73 2c 20 64 65 72 20 76 65 64 20 6b 61 6c 64 20 6d 65 ┆skinkodesekvens, der ved kald me┆ 0x0f00…0f20 64 20 6c 69 6e 6a 65 20 31 37 30 2d 31 38 30 0d 30 30 37 30 20 2f 2f 20 62 65 76 69 72 6b 65 72 ┆d linje 170-180 0070 // bevirker┆ 0x0f20…0f40 2c 20 61 74 20 70 72 6f 67 72 61 6d 6d 61 66 76 69 6b 6c 69 6e 67 65 6e 20 73 74 61 6e 64 73 65 ┆, at programmafviklingen standse┆ 0x0f40…0f60 73 20 69 6e 64 74 69 6c 20 64 65 72 20 74 72 79 6b 6b 65 73 20 70 7d 20 65 6e 20 74 61 73 74 0d ┆s indtil der trykkes på en tast ┆ 0x0f60…0f80 30 30 38 30 20 2f 2f 20 61 73 63 69 69 2d 76 7b 72 64 69 65 6e 20 61 66 20 64 65 6e 6e 65 20 74 ┆0080 // ascii-værdien af denne t┆ 0x0f80…0fa0 61 73 74 20 76 69 6c 20 64 61 20 76 7b 72 65 20 69 20 76 61 72 69 61 62 6c 65 6e 20 54 41 53 54 ┆ast vil da være i variablen TAST┆ 0x0fa0…0fc0 23 0d 30 30 39 30 20 50 4f 4b 45 20 33 30 37 33 2c 20 32 30 35 0d 30 31 30 30 20 50 4f 4b 45 20 ┆# 0090 POKE 3073, 205 0100 POKE ┆ 0x0fc0…0fe0 33 30 37 34 2c 20 31 33 32 0d 30 31 31 30 20 50 4f 4b 45 20 33 30 37 35 2c 20 32 34 38 0d 30 31 ┆3074, 132 0110 POKE 3075, 248 01┆ 0x0fe0…1000 32 30 20 50 4f 4b 45 20 33 30 37 36 2c 20 35 30 0d 30 31 33 30 20 50 4f 4b 45 20 33 30 37 37 2c ┆20 POKE 3076, 50 0130 POKE 3077,┆ 0x1000…1020 (8,) 20 30 0d 30 31 34 30 20 50 4f 4b 45 20 33 30 37 38 2c 20 31 32 0d 30 31 35 30 20 50 4f 4b 45 20 ┆ 0 0140 POKE 3078, 12 0150 POKE ┆ 0x1020…1040 33 30 37 39 2c 20 32 30 31 0d 30 31 36 30 20 2f 2f 0d 30 31 37 30 20 43 41 4c 4c 20 33 30 37 33 ┆3079, 201 0160 // 0170 CALL 3073┆ 0x1040…1060 20 2f 2f 20 6b 61 6c 64 20 61 66 20 6d 61 73 6b 69 6e 73 70 72 6f 67 73 73 65 6b 76 65 6e 73 20 ┆ // kald af maskinsprogssekvens ┆ 0x1060…1080 2f 2f 0d 30 31 38 30 20 54 41 53 54 23 3a 3d 50 45 45 4b 28 33 30 37 32 29 0d 30 31 39 30 20 2f ┆// 0180 TAST#:=PEEK(3072) 0190 /┆ 0x1080…10a0 2f 0d 30 32 30 30 20 2f 2f 20 4e 65 64 65 6e 73 74 7d 65 6e 64 65 20 66 69 6e 64 65 73 20 64 65 ┆/ 0200 // Nedenstående findes de┆ 0x10a0…10c0 20 6e 7c 64 76 65 6e 64 69 67 65 20 64 69 6d 65 6e 73 69 6f 6e 65 72 69 6e 67 65 72 2e 0d 30 32 ┆ nødvendige dimensioneringer. 02┆ 0x10c0…10e0 31 30 20 2f 2f 0d 30 32 32 30 20 44 49 4d 20 53 56 24 20 4f 46 20 31 2c 20 4c 49 4e 24 28 32 35 ┆10 // 0220 DIM SV$ OF 1, LIN$(25┆ 0x10e0…1100 29 20 4f 46 20 38 31 2c 20 46 49 4c 4e 41 56 4e 24 20 4f 46 20 38 2c 20 42 49 4c 4c 45 44 4e 41 ┆) OF 81, FILNAVN$ OF 8, BILLEDNA┆ 0x1100…1120 56 4e 24 20 4f 46 20 38 0d 30 32 33 30 20 44 49 4d 20 53 56 41 52 31 24 20 4f 46 20 34 0d 30 32 ┆VN$ OF 8 0230 DIM SVAR1$ OF 4 02┆ 0x1120…1140 34 30 20 2f 2f 0d 30 32 35 30 20 2f 2f 20 4e 65 64 65 6e 66 6f 72 20 6e 75 6c 73 74 69 6c 6c 65 ┆40 // 0250 // Nedenfor nulstille┆ 0x1140…1160 73 20 76 61 72 69 61 62 6c 65 2e 0d 30 32 36 30 20 2f 2f 0d 30 32 37 30 20 53 56 41 52 31 24 3a ┆s variable. 0260 // 0270 SVAR1$:┆ 0x1160…1180 3d 22 6e 4e 6a 4a 22 0d 30 32 38 30 20 2f 2f 0d 30 32 39 30 20 2f 2f 20 45 74 20 62 69 6c 6c 65 ┆="nNjJ" 0280 // 0290 // Et bille┆ 0x1180…11a0 64 65 20 6b 61 6c 64 65 73 20 66 72 65 6d 20 76 65 64 20 6e 65 64 65 6e 73 74 7d 65 6e 64 65 20 ┆de kaldes frem ved nedenstående ┆ 0x11a0…11c0 74 6f 20 6f 72 64 72 65 72 2e 0d 30 33 30 30 20 42 49 4c 4c 45 44 4e 41 56 4e 24 3a 3d 22 61 6b ┆to ordrer. 0300 BILLEDNAVN$:="ak┆ 0x11c0…11e0 74 75 65 6c 74 20 62 69 6c 6c 65 64 6e 61 76 6e 22 0d 30 33 31 30 20 45 58 45 43 20 42 49 4c 4c ┆tuelt billednavn" 0310 EXEC BILL┆ 0x11e0…1200 45 44 45 0d 30 33 32 30 20 2f 2f 0d 30 33 33 30 20 2f 2f 20 50 72 6f 63 65 64 75 72 65 72 6e 65 ┆EDE 0320 // 0330 // Procedurerne┆ 0x1200…1220 (9,) 33 32 e6 45 14 00 34 34 33 31 34 33 32 34 31 34 32 32 32 31 32 34 34 34 31 34 f8 ec 04 13 78 ff ┆32 E 44314324142221244414 x ┆ 0x1220…1240 2d f9 09 00 20 20 35 36 37 20 20 2f 2f f8 f6 04 4e 72 69 a2 45 14 00 31 32 32 32 32 31 33 33 33 ┆- 567 // Nri E 122221333┆ 0x1240…1260 34 34 34 34 34 31 32 33 33 33 32 e6 45 14 00 33 32 32 32 33 31 33 33 33 34 31 34 34 34 31 32 33 ┆44444123332 E 32223133341444123┆ 0x1260…1280 33 33 32 e6 45 14 00 32 32 32 32 31 34 34 34 33 32 34 34 31 34 34 34 34 31 34 34 f8 00 05 13 78 ┆332 E 22221444324414444144 x┆ 0x1280…12a0 ff 2e f9 09 00 20 20 38 39 3a 20 20 2f 2f f8 0a 05 4e 72 ca a2 45 14 00 33 32 32 32 33 32 33 33 ┆ . 89: // Nr E 32223233┆ 0x12a0…12c0 33 32 31 34 34 34 31 32 33 33 33 32 e6 45 14 00 33 32 32 32 33 32 33 33 33 31 34 34 34 34 31 32 ┆321444123332 E 3222323331444412┆ 0x12c0…12e0 33 33 33 32 e6 45 14 00 35 34 34 34 34 35 34 34 33 34 35 34 34 34 34 35 34 34 32 34 f8 14 05 13 ┆3332 E 54444544345444454424 ┆ 0x12e0…1300 78 ff 3b f9 09 00 20 20 3b 3c 3d 20 20 2f 2f f8 1e 05 4e 72 2b a3 45 14 00 35 34 34 34 34 35 34 ┆x ; ;<= // Nr+ E 5444454┆ 0x1300…1320 34 33 34 35 34 34 34 34 35 34 34 31 34 e6 45 14 00 34 34 34 34 33 34 34 33 32 34 34 32 33 34 34 ┆4345444454414 E 444434432442344┆ 0x1320…1340 34 34 34 32 33 e6 45 14 00 34 34 34 34 34 33 33 33 33 33 33 33 33 33 33 34 34 34 34 34 f8 28 05 ┆44423 E 44444333333333344444 ( ┆ 0x1340…1360 13 78 ff 3c f9 09 00 20 20 3e 3f 40 20 20 2f 2f f8 32 05 4e 72 8c a3 45 14 00 33 34 34 34 34 34 ┆ x < >?@ // 2 Nr E 344444┆ 0x1360…1380 32 33 34 34 34 34 33 32 34 33 32 34 34 34 e6 45 14 00 33 32 32 32 33 32 34 34 33 32 34 34 31 34 ┆23444432432444 E 32223244324414┆ 0x1380…13a0 34 34 34 33 34 34 e6 45 14 00 33 32 32 32 33 31 34 31 34 31 31 34 32 33 32 32 33 33 33 33 f8 3c ┆444344 E 32223141411423223333 <┆ 0x13a0…13c0 05 13 78 ff 2f f9 09 00 20 20 41 42 43 20 20 2f 2f f8 46 05 4e 72 ed a3 45 14 00 33 32 32 32 33 ┆ x / ABC // F Nr E 32223┆ 0x13c0…13e0 31 34 34 34 31 31 33 33 33 31 31 34 34 34 31 e6 45 14 00 31 32 32 32 33 31 33 33 33 32 31 34 34 ┆144411333114441 E 1222313332144┆ 0x13e0…1400 34 31 31 33 33 33 32 e6 45 14 00 33 32 32 32 33 31 34 34 34 34 31 34 34 34 33 32 33 33 33 32 f8 ┆4113332 E 32223144441444323332 ┆