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

⟦e71388b19⟧ Ada Source

    Length: 12288 (0x3000)
    Types: Ada Source
    Notes: 03_class, FILE, R1k_Segment, e3_tag, package Sysequ, seg_021ff0

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



--      Copyright (c) 1990 Meridian Software Systems, Inc.      --
package Sysequ is

    Pcdeskpat : constant := 16#20B#;
    Hikeylast : constant := 16#216#;
    Kbdlast : constant := 16#218#;
    Expandmem : constant := 16#2B6#;
    Scsibase : constant := 16#0C00#;
    Scsidma : constant := 16#0C04#;
    Scsihsk : constant := 16#0C08#;
    Scsiglobals : constant := 16#0C0C#;
    Rgbblack : constant := 16#0C10#;
    Rgbwhite : constant := 16#0C16#;
    Rowbits : constant := 16#0C20#;
    Collines : constant := 16#0C22#;
    Screenbytes : constant := 16#0C24#;
    Nmiflag : constant := 16#0C2C#;
    Vidtype : constant := 16#0C2D#;
    Vidmode : constant := 16#0C2E#;
    Scsipoll : constant := 16#0C2F#;
    Sevarbase : constant := 16#0C30#;
    Mmuflags : constant := 16#0CB0#;
    Mmutype : constant := 16#0CB1#;
    Mmu32bit : constant := 16#0CB2#;
    Mmufluff : constant := 16#0CB3#;
    Mmutbl : constant := 16#0CB4#;
    Mmutblsize : constant := 16#0CB8#;
    Sinfoptr : constant := 16#0CBC#;
    Ascbase : constant := 16#0CC0#;
    Smglobals : constant := 16#0CC4#;
    Thegdevice : constant := 16#0CC8#;
    Cqdglobals : constant := 16#0CCC#;
    Adbbase : constant := 16#0CF8#;
    Warmstart : constant := 16#0CFC#;
    Timedbra : constant := 16#0D00#;
    Timesccdb : constant := 16#0D02#;
    Slotqdt : constant := 16#0D04#;
    Slotprtbl : constant := 16#0D08#;
    Slotvblq : constant := 16#0D0C#;
    Scrnvblptr : constant := 16#0D10#;
    Slotticks : constant := 16#0D14#;
    Tableseed : constant := 16#0D20#;
    Srsrctblptr : constant := 16#0D24#;
    Jvbltask : constant := 16#0D28#;
    Wmgrcport : constant := 16#0D2C#;
    Vertrrate : constant := 16#0D30#;
    Chunkydepth : constant := 16#0D60#;
    Crsrptr : constant := 16#0D62#;
    Portlist : constant := 16#0D66#;
    Mickeybytes : constant := 16#0D6A#;
    Qderrlm : constant := 16#0D6E#;
    Via2dt : constant := 16#0D70#;
    Sinitflags : constant := 16#0D90#;
    Dtqueue : constant := 16#0D92#;
    Dtqflags : constant := 16#0D92#;
    Dtskqhdr : constant := 16#0D94#;
    Dtskqtail : constant := 16#0D98#;
    Jdtinstall : constant := 16#0D9C#;
    Hilitergb : constant := 16#0DA0#;
    Timescsidb : constant := 16#0DA6#;
    Dsctradj : constant := 16#0DA8#;
    Icontladdr : constant := 16#0DAC#;
    Videoinfook : constant := 16#0DB0#;
    Endsrtptr : constant := 16#0DB4#;
    Sdmjmptblptr : constant := 16#0DB8#;
    Jswapmmu : constant := 16#0DBC#;
    Sdmbuserr : constant := 16#0DC0#;
    Lasttxgdevice : constant := 16#0DC4#;
    Newcrsrjtbl : constant := 16#88C#;
    Jalloccrsr : constant := 16#88C#;
    Jsetccrsr : constant := 16#890#;
    Jopcodeproc : constant := 16#894#;
    Crsrbase : constant := 16#898#;
    Crsrdevice : constant := 16#89C#;
    Srcdevice : constant := 16#8A0#;
    Maindevice : constant := 16#8A4#;
    Devicelist : constant := 16#8A8#;
    Crsrrow : constant := 16#8AC#;
    Qdcolors : constant := 16#8B0#;
    Hilitemode : constant := 16#938#;
    Buserrvct : constant := 16#08#;
    Restproc : constant := 16#A8C#;
    Rom85 : constant := 16#28E#;
    Rommaphndl : constant := 16#B06#;
    Scrvres : constant := 16#102#;
    Scrhres : constant := 16#104#;
    Scrnbase : constant := 16#824#;
    Screenrow : constant := 16#106#;
    Mbticks : constant := 16#16E#;
    Jkybdtask : constant := 16#21A#;
    Keylast : constant := 16#184#;
    Keytime : constant := 16#186#;
    Keyreptime : constant := 16#18A#;
    Spconfig : constant := 16#1FB#;
    Spporta : constant := 16#1FC#;
    Spportb : constant := 16#1FE#;
    Sccrd : constant := 16#1D8#;
    Sccwr : constant := 16#1DC#;
    Doubletime : constant := 16#2F0#;
    Carettime : constant := 16#2F4#;
    Keythresh : constant := 16#18E#;
    Keyrepthresh : constant := 16#190#;
    Sdvolume : constant := 16#260#;
    Ticks : constant := 16#16A#;
    Timelm : constant := 16#20C#;
    Monkeylives : constant := 16#100#;
    Sevtenb : constant := 16#15C#;
    Journalflag : constant := 16#8DE#;
    Journalref : constant := 16#8E8#;
    Bufptr : constant := 16#10C#;
    Stklowpt : constant := 16#110#;
    Thezone : constant := 16#118#;
    Appllimit : constant := 16#130#;
    Syszone : constant := 16#2A6#;
    Applzone : constant := 16#2AA#;
    Heapend : constant := 16#114#;
    Hiheapmark : constant := 16#BAE#;
    Memerr : constant := 16#220#;
    Utablebase : constant := 16#11C#;
    Unitntrycnt : constant := 16#1D2#;
    Jfetch : constant := 16#8F4#;
    Jstash : constant := 16#8F8#;
    Jiodone : constant := 16#8FC#;
    Drvqhdr : constant := 16#308#;
    Bootdrive : constant := 16#210#;
    Ejectnotify : constant := 16#338#;
    Iaznotify : constant := 16#33C#;
    Sfsavedisk : constant := 16#214#;
    Curdirstore : constant := 16#398#;
    Oneone : constant := 16#A02#;
    Minusone : constant := 16#A06#;
    Lo3bytes : constant := 16#31A#;
    Rombase : constant := 16#2AE#;
    Rambase : constant := 16#2B2#;
    Sysversion : constant := 16#15A#;
    Rndseed : constant := 16#156#;
    Scratch20 : constant := 16#1E4#;
    Scratch8 : constant := 16#9FA#;
    Scrapsize : constant := 16#960#;
    Scraphandle : constant := 16#964#;
    Scrapcount : constant := 16#968#;
    Scrapstate : constant := 16#96A#;
    Scrapname : constant := 16#96C#;
    Intlspec : constant := 16#BA0#;
    Switchertptr : constant := 16#286#;
    Cpuflag : constant := 16#12F#;
    Via : constant := 16#1D4#;
    Iwm : constant := 16#1E0#;
    Lvl1dt : constant := 16#192#;
    Lvl2dt : constant := 16#1B2#;
    Extstsdt : constant := 16#2BE#;
    Spvalid : constant := 16#1F8#;
    Spatalka : constant := 16#1F9#;
    Spatalkb : constant := 16#1FA#;
    Spalarm : constant := 16#200#;
    Spfont : constant := 16#204#;
    Spkbd : constant := 16#206#;
    Spprint : constant := 16#207#;
    Spvolctl : constant := 16#208#;
    Spclikcaret : constant := 16#209#;
    Spmisc1 : constant := 16#20A#;
    Spmisc2 : constant := 16#20B#;
    Getparam : constant := 16#1E4#;
    Sysparam : constant := 16#1F8#;
    Crsrthresh : constant := 16#8EC#;
    Jcrsrtask : constant := 16#8EE#;
    Mtemp : constant := 16#828#;
    Rawmouse : constant := 16#82C#;
    Crsrrect : constant := 16#83C#;
    Thecrsr : constant := 16#844#;
    Crsraddr : constant := 16#888#;
    Crsrsave : constant := 16#88C#;
    Crsrvis : constant := 16#8CC#;
    Crsrbusy : constant := 16#8CD#;
    Crsrnew : constant := 16#8CE#;
    Crsrstate : constant := 16#8D0#;
    Crsrobscure : constant := 16#8D2#;
    Kbdvars : constant := 16#216#;
    Kbdtype : constant := 16#21E#;
    Mbstate : constant := 16#172#;
    Keymaplm : constant := 16#174#;
    Keypadmap : constant := 16#17C#;
    Key1trans : constant := 16#29E#;
    Key2trans : constant := 16#2A2#;
    Jgnefilter : constant := 16#29A#;
    Keymvars : constant := 16#B04#;
    Mouse : constant := 16#830#;
    Crsrpin : constant := 16#834#;
    Crsrcouple : constant := 16#8CF#;
    Crsrscale : constant := 16#8D3#;
    Mousemask : constant := 16#8D6#;
    Mouseoffset : constant := 16#8DA#;
    Alarmstate : constant := 16#21F#;
    Vblqueue : constant := 16#160#;
    Sysevtmask : constant := 16#144#;
    Sysevtbuf : constant := 16#146#;
    Eventqueue : constant := 16#14A#;
    Evtbufcnt : constant := 16#154#;
    Gzroothnd : constant := 16#328#;
    Gzrootptr : constant := 16#32C#;
    Gzmovehnd : constant := 16#330#;
    Memtop : constant := 16#108#;
    Mminok : constant := 16#12E#;
    Hpchk : constant := 16#316#;
    Maskbc : constant := 16#31A#;
    Maskhandle : constant := 16#31A#;
    Maskptr : constant := 16#31A#;
    Minstack : constant := 16#31E#;
    Defltstack : constant := 16#322#;
    Mmdefflags : constant := 16#326#;
    Dsalerttab : constant := 16#2BA#;
    Dsalertrect : constant := 16#3F8#;
    Dsdrawproc : constant := 16#334#;
    Dswndupdate : constant := 16#15D#;
    Wwexist : constant := 16#8F2#;
    Qdexist : constant := 16#8F3#;
    Resumeproc : constant := 16#A8C#;
    Dserrcode : constant := 16#AF0#;
    Intflag : constant := 16#15F#;
    Serialvars : constant := 16#2D0#;
    Abusvars : constant := 16#2D8#;
    Abusdce : constant := 16#2DC#;
    Portause : constant := 16#290#;
    Portbuse : constant := 16#291#;
    Sccasts : constant := 16#2CE#;
    Sccbsts : constant := 16#2CF#;
    Dskerr : constant := 16#142#;
    Pwmbuf2 : constant := 16#312#;
    Soundptr : constant := 16#262#;
    Soundbase : constant := 16#266#;
    Soundvbl : constant := 16#26A#;
    Sounddce : constant := 16#27A#;
    Soundactive : constant := 16#27E#;
    Soundlevel : constant := 16#27F#;
    Curpitch : constant := 16#280#;
    Dskverify : constant := 16#12C#;
    Tagdata : constant := 16#2FA#;
    Buftgfnum : constant := 16#2FC#;
    Buftgfflg : constant := 16#300#;
    Buftgfbknum : constant := 16#302#;
    Buftgdate : constant := 16#304#;
    Scrdmpenb : constant := 16#2F8#;
    Scrdmptype : constant := 16#2F9#;
    Scrapvars : constant := 16#960#;
    Scrapinfo : constant := 16#960#;
    Scrapend : constant := 16#980#;
    Scraptag : constant := 16#970#;
    Launchflag : constant := 16#902#;
    Saveseghandle : constant := 16#930#;
    Curjtoffset : constant := 16#934#;
    Curpageoption : constant := 16#936#;
    Loaderpblock : constant := 16#93A#;
    Curaprefnum : constant := 16#900#;
    Currenta5 : constant := 16#904#;
    Curstackbase : constant := 16#908#;
    Curapname : constant := 16#910#;
    Loadtrap : constant := 16#12D#;
    Seghienable : constant := 16#BB2#;
    Windowlist : constant := 16#9D6#;
    Paintwhite : constant := 16#9DC#;
    Wmgrport : constant := 16#9DE#;
    Grayrgn : constant := 16#9EE#;
    Curactivate : constant := 16#A64#;
    Curdeactive : constant := 16#A68#;
    Draghook : constant := 16#9F6#;
    Deskpattern : constant := 16#A3C#;
    Deskhook : constant := 16#A6C#;
    Ghostwindow : constant := 16#A84#;
    Tedotext : constant := 16#A70#;
    Terecal : constant := 16#A74#;
    Tescrplength : constant := 16#AB0#;
    Tescrphandle : constant := 16#AB4#;
    Tewdbreak : constant := 16#AF6#;
    Wordredraw : constant := 16#BA5#;
    Tesysjust : constant := 16#BAC#;
    Topmaphndl : constant := 16#A50#;
    Sysmaphndl : constant := 16#A54#;
    Sysmap : constant := 16#A58#;
    Curmap : constant := 16#A5A#;
    Resreadonly : constant := 16#A5C#;
    Resload : constant := 16#A5E#;
    Reserr : constant := 16#A60#;
    Reserrproc : constant := 16#AF2#;
    Sysresname : constant := 16#AD8#;
    Rommapinsert : constant := 16#B9E#;
    Tmpresload : constant := 16#B9F#;
    Mbarheight : constant := 16#BAA#;

end Sysequ;

E3 Meta Data

    nblk1=b
    nid=0
    hdr6=16
        [0x00] rec0=1c rec1=00 rec2=01 rec3=03a
        [0x01] rec0=1a rec1=00 rec2=02 rec3=01c
        [0x02] rec0=19 rec1=00 rec2=03 rec3=034
        [0x03] rec0=1b rec1=00 rec2=04 rec3=02a
        [0x04] rec0=1b rec1=00 rec2=05 rec3=008
        [0x05] rec0=1b rec1=00 rec2=06 rec3=00a
        [0x06] rec0=1a rec1=00 rec2=07 rec3=040
        [0x07] rec0=1b rec1=00 rec2=08 rec3=012
        [0x08] rec0=1a rec1=00 rec2=09 rec3=038
        [0x09] rec0=1a rec1=00 rec2=0a rec3=012
        [0x0a] rec0=1a rec1=00 rec2=0b rec3=000
    tail 0x2151d44f483906e4efcb4 0x42a00088462060003