|
DataMuseum.dkPresents historical artifacts from the history of: MIKADOS |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about MIKADOS Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2528 (0x9e0)
Types: TextFile
Notes: Mikados_K
Names: »EXTTEST.K«
└─⟦ca21ef4c0⟧ Bits:30005311 Extended Pascal System Disc v. 04.07.1980 (SPC/1)
└─⟦this⟧ »EXTTEST.K«
PROGRAM EXTTEST; VAR I: INTEGER; PROCEDURE P( VAR P1: INTEGER; P2: BOOLEAN; P3: STRING ); EXTERNAL; BEGIN I := 5; P( I, FALSE, 'TESTING' ); WRITELN( 'AFTER CALL OF P: ', I ) END.
0x000…012 Line {l1=0x10, l2=»PROGRAM EXTTEST;«, l3=0x10}
0x012…015 Line {l1=0x01, l2=» «, l3=0x01}
0x015…027 Line {l1=0x10, l2=»VAR I: INTEGER;«, l3=0x10}
0x027…02a Line {l1=0x01, l2=» «, l3=0x01}
0x02a…06e Line {l1=0x42, l2=»PROCEDURE P( VAR P1: INTEGER; P2: BOOLEAN; P3: STRING ); EXTERNAL;«, l3=0x42}
0x06e…071 Line {l1=0x01, l2=» «, l3=0x01}
0x071…078 Line {l1=0x05, l2=»BEGIN«, l3=0x05}
0x078…083 Line {l1=0x09, l2=» I := 5;«, l3=0x09}
0x083…0a0 Line {l1=0x1b, l2=» P( I, FALSE, 'TESTING' );«, l3=0x1b}
0x0a0…0c5 Line {l1=0x23, l2=» WRITELN( 'AFTER CALL OF P: ', I )«, l3=0x23}
0x0c5…0cb Line {l1=0x04, l2=»END.«, l3=0x04}
0x0cb…0e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x0e0…100 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 ┆ ┆
[…0xf…]
0x2e0…300 50 52 49 4e 49 20 20 20 52 41 01 05 00 f3 00 0d 00 00 00 e7 00 28 41 e7 00 05 00 00 00 00 00 00 ┆PRINI RA (A ┆
0x300…320 13 02 50 52 49 4e 49 20 20 20 02 70 02 01 ac 00 00 76 76 76 13 0d 04 50 52 49 4e 54 20 20 20 02 ┆ PRINI p vvv PRINT ┆
0x320…340 00 00 08 0d 0d 04 50 52 49 4e 49 20 20 20 02 00 00 08 0d 0d 05 52 55 4e 4e 20 20 20 20 01 00 00 ┆ PRINI RUNN ┆
0x340…360 08 0d 0d 05 50 55 54 58 20 20 20 20 02 00 00 08 0d 0d 05 4f 55 54 53 54 20 20 20 03 00 00 08 0d ┆ PUTX OUTST ┆
0x360…380 0d 05 56 45 4e 54 53 20 20 20 04 00 00 08 0d 0d 05 42 4b 54 53 54 20 20 20 05 00 00 08 0d 0d 05 ┆ VENTS BKTST ┆
0x380…3a0 42 53 45 4c 43 20 20 20 06 00 00 08 0d 0d 05 47 45 54 52 4e 20 20 20 07 00 00 08 0d 0d 05 53 45 ┆BSELC GETRN SE┆
0x3a0…3c0 4e 44 20 20 20 20 08 00 00 08 0d 0d 05 56 45 4e 54 48 20 20 20 09 00 00 08 0d 0d 05 50 4f 4f 4c ┆ND VENTH POOL┆
0x3c0…3e0 20 20 20 20 0a 00 00 08 0d 0d 04 4e 49 56 36 30 20 20 20 02 56 01 08 0d 0d 04 4e 49 56 35 35 20 ┆ NIV60 V NIV55 ┆
0x3e0…400 20 20 02 56 01 08 0d 0d 04 50 44 41 54 41 20 20 20 01 00 00 08 0d 0d 04 4e 49 56 58 58 20 20 20 ┆ V PDATA NIVXX ┆
0x400…420 02 5c 01 08 0d 0d 05 4f 55 54 31 20 20 20 20 0b 00 01 08 0d 0d 05 42 41 4e 4b 49 20 20 20 0c 00 ┆ Ø OUT1 BANKI ┆
0x420…440 01 08 0d 0d 05 46 49 52 53 54 20 20 20 0d 00 01 08 0d 0d 05 53 4e 44 32 20 20 20 20 0e 00 01 08 ┆ FIRST SND2 ┆
0x440…460 0d 0d 05 49 4e 54 41 43 20 20 20 0f 00 01 08 0d 0d 05 43 4f 4d 4d 20 20 20 20 10 00 01 08 0d 02 ┆ INTAC COMM ┆
0x460…480 08 2a 02 05 0b 01 00 00 00 05 0c 08 01 12 00 09 5e 23 56 21 00 00 cd 0c 05 0b 02 00 00 00 05 02 ┆ * ^#V! ┆
0x480…4a0 08 2a 02 05 0b 01 00 00 00 05 0c 08 01 10 00 09 5e 23 56 21 08 00 cd 0c 05 0b 02 00 00 00 05 04 ┆ * ^#V! ┆
0x4a0…4c0 08 3e 02 cd 04 05 0b 03 00 00 00 05 04 08 3e 52 cd 04 05 0b 03 00 00 00 05 04 08 3e 7a cd 04 05 ┆ > >R >z ┆
0x4c0…4e0 0b 03 00 00 00 05 04 08 3e 31 cd 04 05 0b 03 00 00 00 05 02 08 cd 02 05 0b 04 00 00 00 05 0e 08 ┆ >1 ┆
0x4e0…500 e5 eb 4e 23 46 c5 23 7e fe 02 3e 02 c2 0e 04 0a 02 fb 00 04 0c 08 23 23 5e 23 56 23 4e eb 0c 0d ┆ N#F #ü > ##^#V#N ┆
0x500…520 ca 0c 04 0a 02 f9 00 04 03 08 e5 cd 03 05 0b 05 00 00 00 05 02 08 da 02 04 0a 02 69 00 04 06 08 ┆ i ┆
0x520…540 d1 e1 e5 d5 cd 06 05 0b 06 00 00 00 05 06 08 47 21 0a 00 cd 06 05 0b 07 00 00 00 05 06 08 70 21 ┆ G! p!┆
0x540…560 05 00 cd 06 05 0b 07 00 00 00 05 08 08 36 02 e1 7e fe 3c c2 08 04 0a 02 db 00 04 06 08 23 0d 3e ┆ 6 ü < # >┆
0x560…580 04 ca 06 04 0a 02 fb 00 04 05 08 7e fe 61 da 05 04 0a 02 87 00 04 08 08 e6 5f 16 0c fe 45 ca 08 ┆ ü a _ E ┆
0x580…5a0 04 0a 02 ad 00 04 04 08 fe 58 ca 04 04 0a 02 ad 00 04 06 08 fe 56 16 0b ca 06 04 0a 02 ad 00 04 ┆ X V ┆
0x5a0…5c0 04 08 fe 47 c2 04 04 0a 02 b3 00 04 06 08 e5 21 05 00 cd 06 05 0b 07 00 00 00 05 09 08 7e f6 80 ┆ G ! ü ┆
0x5c0…5e0 77 e1 16 1e cd 09 04 0a 02 45 01 04 02 08 c3 02 04 0a 02 78 00 04 06 08 fe 53 06 00 ca 06 04 0a ┆w E x S ┆
0x5e0…600 02 c9 00 04 06 08 fe 4e 06 01 ca 06 04 0a 02 c9 00 04 04 08 fe 3e ca 04 04 0a 02 d9 00 04 02 08 ┆ N > ┆
0x600…620 c3 02 04 0a 02 78 00 04 06 08 e5 21 05 00 cd 06 05 0b 07 00 00 00 05 08 08 7e e6 fc b0 77 e1 c3 ┆ x ! ü w ┆
0x620…640 08 04 0a 02 78 00 04 04 08 23 0d cd 04 04 0a 02 0b 01 04 05 08 21 05 00 cd 05 05 0b 07 00 00 00 ┆ x # ! ┆
0x640…660 05 05 08 7e f5 a7 f2 05 04 0a 02 ef 00 04 04 08 16 1f cd 04 04 0a 02 45 01 04 06 08 f1 e6 03 4f ┆ ü E O┆
0x660…680 21 06 04 0a 02 09 01 04 02 08 cd 02 04 0a 02 0b 01 04 0c 08 3e 00 c1 d1 21 0f 00 19 77 eb cd 0c ┆! > ! w ┆
0x680…6a0 05 0b 08 00 00 00 05 02 08 c3 02 04 0a 02 34 00 04 08 08 0d 0a eb 21 02 00 cd 08 05 0b 02 00 00 ┆ 4 ! ┆
0x6a0…6c0 00 05 0c 08 eb 06 00 0d 09 0c c8 3e 20 be c2 0c 04 0a 02 25 01 04 05 08 2b 0d c8 c3 05 04 0a 02 ┆ > % + ┆
0x6c0…6e0 1b 01 04 05 08 21 04 00 cd 05 05 0b 07 00 00 00 05 03 08 71 2a 03 05 0b 01 00 00 00 05 0e 08 01 ┆ ! q* ┆
0x6e0…700 13 00 09 f3 20 e6 06 f6 08 30 fb cd 0e 05 0b 09 00 00 00 05 02 08 01 02 05 0b 0a 00 00 00 05 02 ┆ 0 ┆
0x700…720 08 cd 02 05 0b 08 00 00 00 05 08 08 c9 c5 e5 21 06 00 cd 08 05 0b 07 00 00 00 05 05 08 72 0e 01 ┆ ! r ┆
0x720…740 cd 05 04 0a 02 0b 01 04 05 08 e1 c1 c9 01 05 04 0a 01 00 00 04 02 08 c3 02 04 0a 02 5f 01 04 02 ┆ _ ┆
0x740…760 08 01 02 04 0a 01 0b 00 04 11 08 21 0a 00 09 7e d3 fc 21 04 00 09 35 7e fe 96 d2 11 04 0a 02 9b ┆ ! ü ! 5ü ┆
0x760…780 01 04 0c 08 21 02 00 09 5e 23 56 1a fe 61 da 0c 04 0a 02 85 01 04 04 08 fe 7e d2 04 04 0a 02 85 ┆ ! ^#V a ü ┆
0x780…7a0 01 04 0c 08 e6 5f 13 72 2b 73 57 0a 5f 7a cd 0c 05 0b 0b 00 00 00 05 02 08 3a 02 05 0b 0c 00 00 ┆ _ r+sW _z : ┆
0x7a0…7c0 00 05 1d 08 d3 fc e1 d1 c1 f1 fb c9 36 00 20 e6 06 f6 09 30 21 02 00 09 7e 36 00 23 b6 36 00 ca ┆ 6 0! ü6 # 6 ┆
0x7c0…7e0 1d 04 0a 02 90 01 04 0a 08 21 08 00 09 5e 23 56 d5 01 0a 05 0b 0a 00 00 00 05 03 08 03 cd 03 05 ┆ ! ^#V ┆
0x7e0…800 4d 4f 4e 49 54 20 20 20 52 41 00 05 00 00 00 00 00 00 00 e7 00 2d 00 00 00 05 00 00 00 00 00 00 ┆MONIT RA - ┆
0x800…820 13 02 4d 4f 4e 49 54 20 20 20 02 9a 01 01 35 00 00 76 76 76 13 0d 04 4d 4f 4e 49 54 20 20 20 02 ┆ MONIT 5 vvv MONIT ┆
0x820…840 00 00 08 0d 0d 04 49 4e 54 41 43 20 20 20 02 00 00 08 0d 0d 05 53 4c 49 43 45 20 20 20 01 00 00 ┆ INTAC SLICE ┆
0x840…860 08 0d 0d 04 41 43 54 49 56 20 20 20 01 03 00 10 0d 0d 04 49 4e 54 4f 20 20 20 20 02 22 00 08 0d ┆ ACTIV INTO " ┆
0x860…880 0d 04 46 49 52 53 54 20 20 20 02 61 00 08 0d 0d 04 43 4f 4d 4d 20 20 20 20 02 7a 00 08 0d 0d 04 ┆ FIRST a COMM z ┆
0x880…8a0 52 55 4e 4e 20 20 20 20 01 00 00 10 0d 0d 04 43 4f 4d 53 54 20 20 20 02 87 00 08 0d 0d 04 42 41 ┆RUNN COMST BA┆
0x8a0…8c0 4e 4b 49 20 20 20 01 02 00 10 0d 0d 04 53 45 4e 44 20 20 20 20 02 b9 00 10 0d 0d 04 53 4e 44 32 ┆NKI SEND SND2┆
0x8c0…8e0 20 20 20 20 02 f5 00 08 0d 0d 04 53 49 47 4e 4c 20 20 20 02 d7 00 10 0d 0d 04 53 49 47 32 20 20 ┆ SIGNL SIG2 ┆
0x8e0…900 20 20 02 27 01 08 0d 0d 04 52 45 43 45 49 20 20 20 02 3f 01 10 0d 0d 04 57 41 49 54 20 20 20 20 ┆ ' RECEI ? WAIT ┆
0x900…920 02 78 01 10 0d 0d 04 44 55 4d 4d 59 20 20 20 02 97 01 08 0d 0d 04 44 41 54 4f 4d 20 20 20 01 00 ┆ x DUMMY DATOM ┆
0x920…940 00 08 0d 04 08 f5 a7 ca 04 04 0a 02 0b 00 04 06 08 21 07 00 19 36 06 05 0c 01 00 00 00 05 0d 08 ┆ ! 6 ┆
0x940…960 21 04 00 19 7e e6 0f 67 87 87 84 01 0d 04 0a 01 03 00 04 08 08 81 4f 3e 00 88 47 c3 08 04 0a 02 ┆! ü g O> G ┆
0x960…980 23 00 04 05 08 f5 0a a7 ca 05 04 0a 02 51 00 04 07 08 3c 02 03 f1 a7 ca 07 04 0a 02 40 00 04 35 ┆# Q < @ 5┆
0x980…9a0 08 03 03 0a 6f 03 0a 67 73 23 72 7a 02 0b 7b 02 c9 0a 6f 03 0a 67 7a 02 0b 7b 02 7d 12 13 7c 12 ┆ o gs#rz æ o gz æ å ø ┆
0x9a0…9c0 1b c9 3c 02 03 7b 02 03 7a 02 03 7b 02 03 7a 02 f1 c9 0a a7 ca 35 04 0a 02 78 00 04 1b 08 3d 02 ┆ < æ z æ z 5 x = ┆
0x9c0…9e0 03 0a 5f 03 0a 57 0b 1a 02 03 13 1a 02 1b af c9 3c c9 21 00 00 39 eb 2a 1b 04 0a 01 00 00 04 00 ┆ _ W < ! 9 * ┆