|
|
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: »SYMB.K«
└─⟦8b7ba91bd⟧ Bits:30003596 MIK/MIKADOS diskette DDE COMAL-80 version 2.2, Pascal kildetekster
└─⟦this⟧ »SYMB.K«
NLIST
;SYMBOLDEFINITIONER FOR MIK SYSTEM - CT-15.07.1981
; AA-14.09.1981
;COPYRIGHT (C) 1981 BY DANSK DATA ELEKTRONIK APS
;
;****************************************************************
; DEFINITION AF SYMBOLSKE KONSTANTER I MIK SYSTEM
;****************************************************************
;
;
;
;****************************************************************
; GRUNDLÆGGENDE SYSTEMKONSTANTER
;****************************************************************
;
;
INTRP: EQU 0FE ;ADRESSE PÅ INTERRUPT PRIORITETS MODUL
;BANKR: EQU 0FC ;ADRESSE PÅ BANK SWITCH KONTROL - I COND
;
;
;****************************************************************
; SYMBOLSKE DEFINITIONER AF RELATIVE FELTADRESSER I
; PROCES KONTROL BLOKKE (KORUTINEBESKRIVELSER)
;****************************************************************
;
STPIL: EQU 2 ;STAKPIL
PRIO: EQU 4 ;PROCESSENS PRIORITET
BSKED: EQU 5 ;ADRESSE PÅ MODTAGEN BESKEDBUFFER
KVANT: EQU 7 ;LÆNGDE AF TIDSKVANT
SBUND: EQU 8 ;ADRESSE PÅ STAKBUND
STTOP: EQU #10 ;ADRESSE PÅ MAKSIMAL STAKTOP
ARBJD: EQU #12 ;ADRESSE PÅ ARBEJDSAREAL
KOSEM: EQU #14 ;KORUTINESEMAFOR
HJSEM: EQU #16 ;HJÆLPESEMAFOR.
PKDIV: EQU #18 ;DIVERSE.
PKBID: EQU #20 ;PROCES KONTROL BLOK IDENTIFIKATION
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
0x000…00e Line {l1=0x0c, l2=» NLIST«, l3=0x0c}
0x00e…058 Line {l1=0x48, l2=»;SYMBOLDEFINITIONER FOR MIK SYSTEM - CT-15.07.1981«, l3=0x48}
0x058…0a2 Line {l1=0x48, l2=»; AA-14.09.1981«, l3=0x48}
0x0a2…0d5 Line {l1=0x31, l2=»;COPYRIGHT (C) 1981 BY DANSK DATA ELEKTRONIK APS«, l3=0x31}
0x0d5…0d8 Line {l1=0x01, l2=»;«, l3=0x01}
0x0d8…11b Line {l1=0x41, l2=»;****************************************************************«, l3=0x41}
0x11b…14e Line {l1=0x31, l2=»; DEFINITION AF SYMBOLSKE KONSTANTER I MIK SYSTEM«, l3=0x31}
0x14e…191 Line {l1=0x41, l2=»;****************************************************************«, l3=0x41}
0x191…194 Line {l1=0x01, l2=»;«, l3=0x01}
[…0x2…]
0x19a…1dd Line {l1=0x41, l2=»;****************************************************************«, l3=0x41}
0x1dd…1ff Line {l1=0x20, l2=»; GRUNDLÆGGENDE SYSTEMKONSTANTER«, l3=0x20}
0x1ff…242 Line {l1=0x41, l2=»;****************************************************************«, l3=0x41}
0x242…245 Line {l1=0x01, l2=»;«, l3=0x01}
[…0x1…]
0x248…287 Line {l1=0x3d, l2=»INTRP: EQU 0FE ;ADRESSE PÅ INTERRUPT PRIORITETS MODUL«, l3=0x3d}
0x287…2c9 Line {l1=0x40, l2=»;BANKR: EQU 0FC ;ADRESSE PÅ BANK SWITCH KONTROL - I COND«, l3=0x40}
0x2c9…2cc Line {l1=0x01, l2=»;«, l3=0x01}
[…0x1…]
0x2cf…312 Line {l1=0x41, l2=»;****************************************************************«, l3=0x41}
0x312…347 Line {l1=0x33, l2=»; SYMBOLSKE DEFINITIONER AF RELATIVE FELTADRESSER I«, l3=0x33}
0x347…377 Line {l1=0x2e, l2=»; PROCES KONTROL BLOKKE (KORUTINEBESKRIVELSER)«, l3=0x2e}
0x377…3ba Line {l1=0x41, l2=»;****************************************************************«, l3=0x41}
0x3ba…3bd Line {l1=0x01, l2=»;«, l3=0x01}
0x3bd…3de Line {l1=0x1f, l2=»STPIL: EQU 2 ;STAKPIL«, l3=0x1f}
0x3de…40c Line {l1=0x2c, l2=»PRIO: EQU 4 ;PROCESSENS PRIORITET«, l3=0x2c}
0x40c…446 Line {l1=0x38, l2=»BSKED: EQU 5 ;ADRESSE PÅ MODTAGEN BESKEDBUFFER«, l3=0x38}
0x446…473 Line {l1=0x2b, l2=»KVANT: EQU 7 ;LÆNGDE AF TIDSKVANT«, l3=0x2b}
0x473…4a0 Line {l1=0x2b, l2=»SBUND: EQU 8 ;ADRESSE PÅ STAKBUND«, l3=0x2b}
0x4a0…4d5 Line {l1=0x33, l2=»STTOP: EQU #10 ;ADRESSE PÅ MAKSIMAL STAKTOP«, l3=0x33}
0x4d5…506 Line {l1=0x2f, l2=»ARBJD: EQU #12 ;ADRESSE PÅ ARBEJDSAREAL«, l3=0x2f}
0x506…52f Line {l1=0x27, l2=»KOSEM: EQU #14 ;KORUTINESEMAFOR«, l3=0x27}
0x52f…557 Line {l1=0x26, l2=»HJSEM: EQU #16 ;HJÆLPESEMAFOR.«, l3=0x26}
0x557…579 Line {l1=0x20, l2=»PKDIV: EQU #18 ;DIVERSE.«, l3=0x20}
0x579…5b5 Line {l1=0x3a, l2=»PKBID: EQU #20 ;PROCES KONTROL BLOK IDENTIFIKATION«, l3=0x3a}
0x5b5…61a Line {l1=0x63, l2=»ccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc«, l3=0x63}
[…0x9…]
0x9a7…9c0 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 ┆ccccccccccccccccccccccccc┆
0x9c0…9e0 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┆