|
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)
Notes: Mikados_K
Names: »SYMB«
└─⟦8b7ba91bd⟧ Bits:30003596 MIK/MIKADOS diskette DDE COMAL-80 version 2.2, Pascal kildetekster
└─⟦this⟧ »SYMB«
0x000…020 (0,) 0c 20 20 20 20 20 20 20 4e 4c 49 53 54 0c 48 3b 53 59 4d 42 4f 4c 44 45 46 49 4e 49 54 49 4f 4e ┆ NLIST H;SYMBOLDEFINITION┆
0x020…040 45 52 20 46 4f 52 20 4d 49 4b 20 53 59 53 54 45 4d 20 20 2d 20 20 20 20 20 20 20 20 20 20 20 20 ┆ER FOR MIK SYSTEM - ┆
0x040…060 20 20 20 20 20 20 20 20 20 20 43 54 2d 31 35 2e 30 37 2e 31 39 38 31 48 48 3b 20 20 20 20 20 20 ┆ CT-15.07.1981HH; ┆
0x060…080 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 20 20 20 20 20 ┆ ┆
0x080…0a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 41 2d 31 34 2e 30 39 2e 31 39 38 ┆ AA-14.09.198┆
0x0a0…0c0 31 48 31 3b 43 4f 50 59 52 49 47 48 54 20 28 43 29 20 31 39 38 31 20 20 42 59 20 44 41 4e 53 4b ┆1H1;COPYRIGHT (C) 1981 BY DANSK┆
0x0c0…0e0 20 44 41 54 41 20 45 4c 45 4b 54 52 4f 4e 49 4b 20 41 50 53 31 01 3b 01 41 3b 2a 2a 2a 2a 2a 2a ┆ DATA ELEKTRONIK APS1 ; A;******┆
0x0e0…100 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x100…120 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 41 31 3b 20 44 45 ┆**************************A1; DE┆
0x120…140 46 49 4e 49 54 49 4f 4e 20 41 46 20 53 59 4d 42 4f 4c 53 4b 45 20 4b 4f 4e 53 54 41 4e 54 45 52 ┆FINITION AF SYMBOLSKE KONSTANTER┆
0x140…160 20 49 20 4d 49 4b 20 53 59 53 54 45 4d 31 41 3b 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ I MIK SYSTEM1A;****************┆
0x160…180 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x180…1a0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 41 01 3b 01 01 3b 01 01 3b 01 41 3b 2a 2a 2a 2a ┆****************A ; ; ; A;****┆
0x1a0…1c0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x1c0…1e0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 41 20 3b 20 ┆****************************A ; ┆
0x1e0…200 47 52 55 4e 44 4c 5b 47 47 45 4e 44 45 20 53 59 53 54 45 4d 4b 4f 4e 53 54 41 4e 54 45 52 20 41 ┆GRUNDLÆGGENDE SYSTEMKONSTANTER A┆
0x200…220 3b 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆;*******************************┆
0x220…240 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x240…260 2a 41 01 3b 01 01 3b 01 3d 49 4e 54 52 50 3a 20 45 51 55 20 20 20 20 20 30 46 45 20 20 20 20 20 ┆*A ; ; =INTRP: EQU 0FE ┆
0x260…280 3b 41 44 52 45 53 53 45 20 50 5d 20 49 4e 54 45 52 52 55 50 54 20 50 52 49 4f 52 49 54 45 54 53 ┆;ADRESSE PÅ INTERRUPT PRIORITETS┆
0x280…2a0 20 4d 4f 44 55 4c 3d 40 3b 42 41 4e 4b 52 3a 20 45 51 55 20 20 20 20 20 30 46 43 20 20 20 20 20 ┆ MODUL=@;BANKR: EQU 0FC ┆
0x2a0…2c0 3b 41 44 52 45 53 53 45 20 50 5d 20 42 41 4e 4b 20 53 57 49 54 43 48 20 4b 4f 4e 54 52 4f 4c 20 ┆;ADRESSE PÅ BANK SWITCH KONTROL ┆
0x2c0…2e0 2d 20 49 20 43 4f 4e 44 40 01 3b 01 01 3b 01 41 3b 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆- I COND@ ; ; A;***************┆
0x2e0…300 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x300…320 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 41 33 3b 20 53 59 4d 42 4f 4c 53 4b 45 20 44 ┆*****************A3; SYMBOLSKE D┆
0x320…340 45 46 49 4e 49 54 49 4f 4e 45 52 20 41 46 20 52 45 4c 41 54 49 56 45 20 46 45 4c 54 41 44 52 45 ┆EFINITIONER AF RELATIVE FELTADRE┆
0x340…360 53 53 45 52 20 49 33 2e 3b 20 50 52 4f 43 45 53 20 4b 4f 4e 54 52 4f 4c 20 42 4c 4f 4b 4b 45 20 ┆SSER I3.; PROCES KONTROL BLOKKE ┆
0x360…380 28 4b 4f 52 55 54 49 4e 45 42 45 53 4b 52 49 56 45 4c 53 45 52 29 2e 41 3b 2a 2a 2a 2a 2a 2a 2a ┆(KORUTINEBESKRIVELSER).A;*******┆
0x380…3a0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x3a0…3c0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 41 01 3b 01 1f 53 54 ┆*************************A ; ST┆
0x3c0…3e0 50 49 4c 3a 20 45 51 55 20 20 20 20 20 32 20 20 20 20 20 20 20 3b 53 54 41 4b 50 49 4c 1f 2c 50 ┆PIL: EQU 2 ;STAKPIL ,P┆
0x3e0…400 52 49 4f 3a 20 20 45 51 55 20 20 20 20 20 34 20 20 20 20 20 20 20 3b 50 52 4f 43 45 53 53 45 4e ┆RIO: EQU 4 ;PROCESSEN┆
0x400…420 53 20 50 52 49 4f 52 49 54 45 54 2c 38 42 53 4b 45 44 3a 20 45 51 55 20 20 20 20 20 35 20 20 20 ┆S PRIORITET,8BSKED: EQU 5 ┆
0x420…440 20 20 20 20 3b 41 44 52 45 53 53 45 20 50 5d 20 4d 4f 44 54 41 47 45 4e 20 42 45 53 4b 45 44 42 ┆ ;ADRESSE PÅ MODTAGEN BESKEDB┆
0x440…460 55 46 46 45 52 38 2b 4b 56 41 4e 54 3a 20 45 51 55 20 20 20 20 20 37 20 20 20 20 20 20 20 3b 4c ┆UFFER8+KVANT: EQU 7 ;L┆
0x460…480 5b 4e 47 44 45 20 41 46 20 54 49 44 53 4b 56 41 4e 54 2b 2b 53 42 55 4e 44 3a 20 45 51 55 20 20 ┆ÆNGDE AF TIDSKVANT++SBUND: EQU ┆
0x480…4a0 20 20 20 38 20 20 20 20 20 20 20 3b 41 44 52 45 53 53 45 20 50 5d 20 53 54 41 4b 42 55 4e 44 2b ┆ 8 ;ADRESSE PÅ STAKBUND+┆
0x4a0…4c0 33 53 54 54 4f 50 3a 20 45 51 55 20 20 20 20 20 23 31 30 20 20 20 20 20 3b 41 44 52 45 53 53 45 ┆3STTOP: EQU #10 ;ADRESSE┆
0x4c0…4e0 20 50 5d 20 4d 41 4b 53 49 4d 41 4c 20 53 54 41 4b 54 4f 50 33 2f 41 52 42 4a 44 3a 20 45 51 55 ┆ PÅ MAKSIMAL STAKTOP3/ARBJD: EQU┆
0x4e0…500 20 20 20 20 20 23 31 32 20 20 20 20 20 3b 41 44 52 45 53 53 45 20 50 5d 20 41 52 42 45 4a 44 53 ┆ #12 ;ADRESSE PÅ ARBEJDS┆
0x500…520 41 52 45 41 4c 2f 27 4b 4f 53 45 4d 3a 20 45 51 55 20 20 20 20 20 23 31 34 20 20 20 20 20 3b 4b ┆AREAL/'KOSEM: EQU #14 ;K┆
0x520…540 4f 52 55 54 49 4e 45 53 45 4d 41 46 4f 52 27 26 48 4a 53 45 4d 3a 20 45 51 55 20 20 20 20 20 23 ┆ORUTINESEMAFOR'&HJSEM: EQU #┆
0x540…560 31 36 20 20 20 20 20 3b 48 4a 5b 4c 50 45 53 45 4d 41 46 4f 52 2e 26 20 50 4b 44 49 56 3a 20 45 ┆16 ;HJÆLPESEMAFOR.& PKDIV: E┆
0x560…580 51 55 20 20 20 20 20 23 31 38 20 20 20 20 20 3b 44 49 56 45 52 53 45 2e 20 3a 50 4b 42 49 44 3a ┆QU #18 ;DIVERSE. :PKBID:┆
0x580…5a0 20 45 51 55 20 20 20 20 20 23 32 30 20 20 20 20 20 3b 50 52 4f 43 45 53 20 4b 4f 4e 54 52 4f 4c ┆ EQU #20 ;PROCES KONTROL┆
0x5a0…5c0 20 42 4c 4f 4b 20 49 44 45 4e 54 49 46 49 4b 41 54 49 4f 4e 3a 63 63 63 63 63 63 63 63 63 63 63 ┆ BLOK IDENTIFIKATION:ccccccccccc┆
0x5c0…5e0 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 ┆cccccccccccccccccccccccccccccccc┆
[…0x20…]