DataMuseum.dk

Presents historical artifacts from the history of:

MIKADOS

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about MIKADOS

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦ede306f99⟧ TextFile

    Length: 1344 (0x540)
    Types: TextFile
    Notes: Mikados_K
    Names: »BASHM.K«

Derivation

└─⟦1f7cb7eb5⟧ Bits:30009019 ARRAY0 + nulfiler
    └─⟦this⟧ »BASHM.K«

Mikados K File

        NLIST
;DETTE ER EN SPECIAL VERSION AF BAS11/BBS11 UDARBEJDET HSM 29.09.1982
;*********************************************************************
;
;        SYMBOLSKE VÆRDIER FOR NØDVENDIGE TERMINALE SYMBOLER
;
;*********************************************************************
 
 
INTGR:  EQU     #179    ;INTEGER VARIABEL
VPAR:   EQU     #237    ;VENSTRE PARANTES
HPAR:   EQU     #238    ;HØJRE PARANTES
DOLL:   EQU     #239    ;DOLLARTEGN
NUKNS:  EQU     0F4     ;NUMERISK KONSTANT
INKNS:  EQU     0F2     ;INTEGER KONSTANT
DBKNS:  EQU     0F8     ;DBLREAL KONSTANT
 
 
 
 
;**********************************************************************
;
;        SYMBOLSKE ADRESSE OFFSET TIL MASKINKALD HJÆLPERUTINER
;
;**********************************************************************
 
FIXFL:  EQU     0       ;FIXED TIL FLOAT
FLFIX:  EQU     1       ;FLOAT TIL FIX
GETNM:  EQU     2       ;HENT NUMERISK
PUTNM:  EQU     3       ;GEM NUMERISK
GETST:  EQU     4       ;HENT STRENG
PUTST:  EQU     5       ;GEM STRENG
DELIM:  EQU     0FF     ;SYNTAKTISKE AFGRÆNSER
 
 
        LIST

Mikados K File

0x000…00f Line {l1=0x0d, l2=»        NLIST«, l3=0x0d}
0x00f…056 Line {l1=0x45, l2=»;DETTE ER EN SPECIAL VERSION AF BAS11/BBS11 UDARBEJDET HSM 29.09.1982«, l3=0x45}
0x056…09e Line {l1=0x46, l2=»;*********************************************************************«, l3=0x46}
0x09e…0a1 Line {l1=0x01, l2=»;«, l3=0x01}
0x0a1…0df Line {l1=0x3c, l2=»;        SYMBOLSKE VÆRDIER FOR NØDVENDIGE TERMINALE SYMBOLER«, l3=0x3c}
0x0df…0e2 Line {l1=0x01, l2=»;«, l3=0x01}
0x0e2…12a Line {l1=0x46, l2=»;*********************************************************************«, l3=0x46}
0x12a…12d Line {l1=0x01, l2=» «, l3=0x01}
          […0x1…]
0x130…15b Line {l1=0x29, l2=»INTGR:  EQU     #179    ;INTEGER VARIABEL«, l3=0x29}
0x15b…186 Line {l1=0x29, l2=»VPAR:   EQU     #237    ;VENSTRE PARANTES«, l3=0x29}
0x186…1af Line {l1=0x27, l2=»HPAR:   EQU     #238    ;HØJRE PARANTES«, l3=0x27}
0x1af…1d4 Line {l1=0x23, l2=»DOLL:   EQU     #239    ;DOLLARTEGN«, l3=0x23}
0x1d4…200 Line {l1=0x2a, l2=»NUKNS:  EQU     0F4     ;NUMERISK KONSTANT«, l3=0x2a}
0x200…22b Line {l1=0x29, l2=»INKNS:  EQU     0F2     ;INTEGER KONSTANT«, l3=0x29}
0x22b…256 Line {l1=0x29, l2=»DBKNS:  EQU     0F8     ;DBLREAL KONSTANT«, l3=0x29}
0x256…259 Line {l1=0x01, l2=» «, l3=0x01}
          […0x3…]
0x262…2ab Line {l1=0x47, l2=»;**********************************************************************«, l3=0x47}
0x2ab…2ae Line {l1=0x01, l2=»;«, l3=0x01}
0x2ae…2ee Line {l1=0x3e, l2=»;        SYMBOLSKE ADRESSE OFFSET TIL MASKINKALD HJÆLPERUTINER«, l3=0x3e}
0x2ee…2f1 Line {l1=0x01, l2=»;«, l3=0x01}
0x2f1…33a Line {l1=0x47, l2=»;**********************************************************************«, l3=0x47}
0x33a…33d Line {l1=0x01, l2=» «, l3=0x01}
0x33d…367 Line {l1=0x28, l2=»FIXFL:  EQU     0       ;FIXED TIL FLOAT«, l3=0x28}
0x367…38f Line {l1=0x26, l2=»FLFIX:  EQU     1       ;FLOAT TIL FIX«, l3=0x26}
0x38f…3b7 Line {l1=0x26, l2=»GETNM:  EQU     2       ;HENT NUMERISK«, l3=0x26}
0x3b7…3de Line {l1=0x25, l2=»PUTNM:  EQU     3       ;GEM NUMERISK«, l3=0x25}
0x3de…404 Line {l1=0x24, l2=»GETST:  EQU     4       ;HENT STRENG«, l3=0x24}
0x404…429 Line {l1=0x23, l2=»PUTST:  EQU     5       ;GEM STRENG«, l3=0x23}
0x429…459 Line {l1=0x2e, l2=»DELIM:  EQU     0FF     ;SYNTAKTISKE AFGRÆNSER«, l3=0x2e}
0x459…45c Line {l1=0x01, l2=» «, l3=0x01}
          […0x1…]
0x45f…46d Line {l1=0x0c, l2=»        LIST«, l3=0x0c}
0x46d…480 00 00 45 3b 44 45 54 54 45 20 45 52 20 45 4e 20 53 50 45                                          ┆  E;DETTE ER EN SPE┆
0x480…4a0 43 49 41 4c 20 56 45 52 53 49 4f 4e 20 41 46 20 42 41 53 31 31 2f 42 42 53 31 31 20 55 44 41 52   ┆CIAL VERSION AF BAS11/BBS11 UDAR┆
0x4a0…4c0 42 45 4a 44 45 54 20 48 53 4d 20 32 39 2e 30 39 2e 31 39 38 32 45 46 3b 2a 2a 2a 2a 2a 2a 2a 2a   ┆BEJDET HSM 29.09.1982EF;********┆
0x4c0…4e0 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   ┆********************************┆
0x4e0…500 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 46 01 3b   ┆*****************************F ;┆
0x500…520 01 3c 3b 20 20 20 20 20 20 20 20 53 59 4d 42 4f 4c 53 4b 45 20 56 5b 52 44 49 45 52 20 46 4f 52   ┆ <;        SYMBOLSKE VÆRDIER FOR┆
0x520…540 20 4e 5c 44 56 45 4e 44 49 47 45 20 54 45 52 4d 49 4e 41 4c 45 20 53 59 4d 42 4f 4c 45 52 3c 01   ┆ NØDVENDIGE TERMINALE SYMBOLER< ┆

Reduced view