DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

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

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦d564b74fb⟧ Ada Source

    Length: 3072 (0xc00)
    Types: Ada Source
    Notes: 03_class, FILE, R1k_Segment, e3_tag, package Z80_Defs, seg_00f505

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧

E3 Source Code



package Z80_Defs is


    -- TYPES ----------------------------------------------------------------

    type Operande is (A, B, C, D, E, H, L, F, I, R, Af_Prime, Bc_Prime,
                      De_Prime, Hl_Prime, Af, Bc, De, Hl, Ix, Iy, Sp, Pc,
                      Nz, Z, Nc, Cy, Po, Pe, P, M, N, Nn, Offset_E, Bit_0,
                      Bit_1, Bit_2, Bit_3, Bit_4, Bit_5, Bit_6, Bit_7, Z80_0,
                      Z80_1, Z80_2, Z80_00h, Z80_08h, Z80_10h, Z80_18h,
                      Z80_20h, Z80_28h, Z80_30h, Z80_38h, N_Indirect,
                      C_Indirect, Bc_Indirect, De_Indirect, Hl_Indirect,
                      Ix_Indirect, Iy_Indirect, Ix_Plus_D_Indirect,
                      Iy_Plus_D_Indirect, Nn_Indirect, Sp_Indirect, Aucun);


    subtype Registre_Simple is Operande range A .. R;

    subtype Registre_Double is Operande range Af_Prime .. Pc;

    subtype Code_Condition is Operande range Nz .. M;

    type Signaux_Periph is (Int, Busrq, Nmi);

    type Signaux_Z80 is (Intack, Busack);

    subtype Mode is Integer range 0 .. 2;

end Z80_Defs;

E3 Meta Data

    nblk1=2
    nid=0
    hdr6=4
        [0x00] rec0=18 rec1=00 rec2=01 rec3=048
        [0x01] rec0=07 rec1=00 rec2=02 rec3=000
    tail 0x2150b570a822b5031aa6c 0x42a00088462062803