DataMuseum.dk

Presents historical artifacts from the history of:

RC4000/8000/9000

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

See our Wiki for more about RC4000/8000/9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦6bf82b4f4⟧

    Length: 96768 (0x17a00)
    Names: »trcuserlib  «

Derivation

└─⟦110021343⟧ Bits:30007476 RC8000 Backup tape fra HT's bus-radio system
    └─⟦a957ba283⟧ 
        └─ ⟦this⟧ »trcuserlib  « 

Hex Dump

Dumping the first 0x40 bytes of each record
0x00000…00900 (1, 34755) 00 13 a8 00 0b d6 00 0b df 63 68 65 6e 74 72 79 70 72 74 78 00 00 00 03 64 69 73 63 00 00 00 00 00 00 00 00 63 85 65 00 00 00 00 00 00 00 00 00 00 00 00 00 44 83 00 00 00 00 4e 1f 63 6c 61 69   ┆         chentryprtx    disc        c e             D     N clai┆
0x00900…01200 (1, 34756) 34 29 3c 3e 69 61 28 34 29 20 6f 72 20 74 61 69 6c 28 35 29 3c 3e 69 61 28 35 29 20 74 68 65 6e 0a 20 20 62 65 67 69 6e 20 63 68 65 6e 74 72 79 70 72 6f 63 3a 3d 38 3b 20 67 6f 74 6f 20 65 78   ┆4)<>ia(4) or tail(5)<>ia(5) then   begin chentryproc:=8; goto ex┆
0x01200…01b00 (1, 34757) 3e 32 20 61 6e 64 20 6b 65 79 6e 6f 3c 3e 33 20 74 68 65 6e 0a 20 20 62 65 67 69 6e 20 0a 20 20 20 20 63 6c 61 69 6d 70 72 6f 63 3a 3d 66 61 6c 73 65 3b 0a 20 20 20 20 67 6f 74 6f 20 65 78 69   ┆>2 and keyno<>3 then   begin      claimproc:=false;     goto exi┆
0x01b00…02400 (1, 34758) 6c 70 2c 30 2c 62 61 29 3b 0a 20 20 69 3a 3d 31 3b 20 6f 70 65 6e 28 7a 68 65 6c 70 2c 30 2c 73 74 72 69 6e 67 20 6e 61 6d 65 28 69 6e 63 72 65 61 73 65 28 69 29 29 2c 30 29 3b 0a 20 20 69 3a   ┆lp,0,ba);   i:=1; open(zhelp,0,string name(increase(i)),0);   i:┆
0x02400…02d00 (1, 34759) 74 65 72 6d 2e 0a 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 20 20 20 20 32 30 20 20 64 65 76 69 63 65 20 75 6e 6b 6e 6f 77 6e 0a 20 20 20   ┆term.                                     20  device unknown    ┆
0x02d00…03600 (1, 34760) 20 20 20 20 20 20 20 69 72 72 20 20 20 20 20 20 20 20 20 69 72 72 0a 3b 20 32 32 20 28 69 6e 62 6c 6f 63 6b 29 2a 29 20 20 20 20 20 20 20 20 20 20 69 72 72 20 20 20 20 20 20 20 20 20 7a 6f 6e   ┆       irr         irr ; 22 (inblock)*)          irr         zon┆
0x03600…03f00 (1, 34761) 20 6f 66 20 61 63 74 69 6f 6e 0a 3b 20 20 20 20 20 78 32 2b 31 30 3a 0a 3b 20 20 20 20 20 20 20 2e 0a 3b 20 20 20 20 20 20 20 2e 20 20 3a 20 74 68 65 20 77 20 70 61 72 61 6d 65 74 65 72 73 0a   ┆ of action ;     x2+10: ;       . ;       .  : the w parameters ┆
0x03f00…04800 (1, 34762) 67 30 2b 32 39 20 2c 20 20 20 30 20 20 20 20 20 20 3b 20 20 2d 20 20 20 2d 20 20 20 32 39 3a 20 70 61 72 61 6d 20 61 6c 61 72 6d 0a 6a 33 3a 20 20 20 20 67 30 2b 33 20 20 2c 20 20 20 30 20 20   ┆g0+29 ,   0      ;  -   -   29: param alarm j3:    g0+3  ,   0  ┆
0x04800…05100 (1, 34763) 73 74 20 66 6f 72 6d 61 6c 3b 0a 20 20 20 20 20 62 61 20 20 20 77 31 20 20 78 32 2d 32 20 20 20 20 20 20 3b 20 20 20 20 20 20 20 66 69 72 73 74 3a 3d 20 61 64 64 72 65 73 73 2b 6c 6f 77 65 72   ┆st formal;      ba   w1  x2-2      ;       first:= address+lower┆
0x05100…05a00 (1, 34764) 64 73 20 20 20 77 31 20 20 78 32 2d 31 34 20 20 20 20 20 3b 0a 20 20 20 20 20 64 6c 2e 20 20 77 30 20 20 62 30 2e 20 20 20 20 20 20 20 3b 20 20 20 73 61 76 65 20 72 65 67 69 73 74 65 72 73 3b   ┆ds   w1  x2-14     ;      dl.  w0  b0.       ;   save registers;┆
0x05a00…06300 (1, 34765) 3b 20 20 20 77 32 20 20 20 20 20 20 20 20 20 20 20 20 20 73 74 61 63 6b 72 65 66 20 20 20 20 20 20 73 74 61 63 6b 72 65 66 0a 3b 20 20 20 77 33 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 74   ┆;   w2             stackref      stackref ;   w3             ret┆
0x06300…06c00 (1, 34766) 20 63 61 6c 6c 69 6e 67 20 61 20 67 69 76 65 5f 75 70 20 61 63 74 69 6f 6e 0a 32 2e 30 30 30 31 3c 38 20 2b 20 32 2e 30 31 30 30 3c 34 20 2b 20 32 2e 31 30 30 30 20 3b 20 68 33 35 0a 20 20 20   ┆ calling a give_up action 2.0001<8 + 2.0100<4 + 2.1000 ; h35    ┆
0x06c00…07500 (1, 34767) 63 6f 6e 76 65 72 74 70 72 74 78 2e 63 6f 6e 76 65 72 74 70 72 6f 63 2c 0a 20 20 20 20 20 20 20 6c 69 73 74 74 61 69 6c 74 78 2e 6c 69 73 74 74 61 69 6c 2c 0a 20 20 20 20 20 20 20 6c 6f 6f 6b   ┆convertprtx.convertproc,        listtailtx.listtail,        look┆
0x07500…07e00 (1, 34768) 6d 65 73 73 61 67 65 20 70 72 6f 63 65 64 75 72 65 20 6c 6f 6f 6b 75 70 70 72 6f 63 20 73 69 64 65 20 31 2e 20 28 68 6b 6f 2c 61 72 29 20 37 38 31 31 31 37 3b 0a 0a 69 6e 74 65 67 65 72 20 70   ┆message procedure lookupproc side 1. (hko,ar) 781117;  integer p┆
0x07e00…08700 (1, 34769) 3c 3e 65 78 74 65 6e 64 20 62 61 28 31 29 20 6f 72 0a 20 20 20 20 20 65 78 74 65 6e 64 20 68 65 61 64 5f 61 6e 64 5f 74 61 69 6c 28 33 29 3c 3e 65 78 74 65 6e 64 20 62 61 28 32 29 29 20 74 68   ┆<>extend ba(1) or      extend head_and_tail(3)<>extend ba(2)) th┆
0x08700…09000 (1, 34770) 3b 20 6a 6f 62 66 69 6c 20 6c 72 63 75 73 65 72 6c 69 62 20 39 34 30 34 31 31 20 63 6c 2e 0a 3b 0a 3b 20 6c 72 63 75 73 65 72 6c 69 62 20 64 61 6e 6e 65 72 20 27 70 72 6f 63 73 75 72 76 65 79   ┆; jobfil lrcuserlib 940411 cl. ; ; lrcuserlib danner 'procsurvey┆
0x09000…09900 (1, 34771) 20 20 20 20 20 20 20 20 20 37 20 20 63 61 74 61 6c 6f 67 20 69 6e 63 6f 6e 73 69 73 74 65 6e 74 0a 0a 20 20 20 20 6f 6c 64 6e 61 6d 65 20 20 20 20 20 28 63 61 6c 6c 2c 20 6c 6f 6e 67 20 61 72   ┆         7  catalog inconsistent      oldname     (call, long ar┆
0x09900…0a200 (1, 34772) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 20 20 63 68 61 6e 67 65 20 62 73 20 64 65 76 69 63 65 20 69 6d 70 6f 73 73 69 62 6c 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                   8  change bs device impossible               ┆
0x0a200…0ab00 (1, 34773) 3b 0a 20 20 69 66 20 69 3c 3e 30 20 74 68 65 6e 0a 20 20 62 65 67 69 6e 0a 20 20 20 20 73 63 6f 70 65 70 72 6f 63 3a 3d 69 66 20 69 3d 33 20 74 68 65 6e 20 33 20 65 6c 73 65 20 37 3b 0a 20 20   ┆;   if i<>0 then   begin     scopeproc:=if i=3 then 3 else 7;   ┆
0x0ab00…0b400 (1, 34774) 74 79 2c 30 2c 63 61 74 62 61 73 65 29 3b 0a 20 20 20 20 6d 6f 6e 69 74 6f 72 28 35 30 3c 2a 70 65 72 6d 2a 3e 2c 7a 6e 61 6d 65 2c 6f 6c 64 6b 65 79 2c 69 61 29 3b 0a 20 20 20 20 73 63 6f 70   ┆ty,0,catbase);     monitor(50<*perm*>,zname,oldkey,ia);     scop┆
0x0b400…0bd00 (1, 34775) 3e 20 61 20 77 72 6b 6e 61 6d 65 20 69 73 0a 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 20 63 72 65 61 74 65 64 20 61 6e 64 20 6e 61 6d 65   ┆> a wrkname is                                  created and name┆
0x0bd00…0c600 (1, 34776) 6d 65 73 73 61 67 65 20 62 6f 6f 6c 65 61 6e 20 70 72 6f 63 65 64 75 72 65 20 74 65 73 74 62 69 74 20 73 69 64 65 20 31 2e 20 28 68 6b 6f 2c 61 72 29 20 37 38 31 31 31 37 2c 20 28 63 6c 29 20   ┆message boolean procedure testbit side 1. (hko,ar) 781117, (cl) ┆
0x0c600…0cf00 (1, 34777) 20 69 6b 6b 65 20 74 68 65 6e 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 79 74 65 28 69 29 3a 3d 62 79 74 65 28 69 29 20 61 6e 64 20 2d 2c 28 66 61 6c 73 65 20 61 64 64 20 70 61   ┆ ikke then                  byte(i):=byte(i) and -,(false add pa┆
0x0cf00…0d800 (1, 34778) 67 20 2b 20 62 69 74 73 0a 20 20 20 20 20 20 20 20 20 20 30 20 69 6e 73 69 64 65 73 20 61 20 70 61 74 74 65 72 6e 20 69 73 20 62 6c 69 6e 64 2e 0a 2a 3e 0a 0a 0c 6d 65 73 73 61 67 65 20 70 72   ┆g + bits           0 insides a pattern is blind. *>   message pr┆
0x0d800…0e100 (1, 34779) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 61 63 6b 3a 3e 2c 3c 3a 62 65 6c 3a 3e 2c 3c 3a 62 73 20 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c   ┆                  <:ack:>,<:bel:>,<:bs :>,                     <┆
0x0e100…0ea00 (1, 34780) 03 00 22 c0 05 84 00 0b 0a 00 06 c0 c0 05 64 00 0c 10 00 06 c2 00 0f 84 00 0f 7a c0 00 44 00 0e da 00 06 3d c0 00 7e c0 05 70 c0 05 6c 00 0f 78 00 0d da 00 0f 7c 2c 10 00 2c 10 a6 2c 31 6a 2c   ┆  "           d           z  D     =  ü  p  l  x     ø,  ,  ,1j,┆
0x0ea00…0f300 (1, 34781) 01 c0 16 c0 05 8a 00 0c 10 00 0f 84 00 0b 0a 00 06 c2 00 06 c0 c0 05 64 00 0f 7a 00 0f 78 c0 00 44 00 0e da 2c 40 00 2c 40 52 2c 40 39 00 00 0b 01 81 70 00 00 7f 00 00 32 40 00 00 00 7f ff 00   ┆                       d  z  x  D   ,@ ,@R,@9     p     2@      ┆
0x0f300…0fc00 (1, 34782) 02 80 24 c0 05 90 00 0f 78 00 0c 2a 00 06 c4 00 0c 10 00 0b 0a 00 06 c0 c0 05 94 c0 05 70 00 06 c2 c0 00 20 c0 04 be 00 01 9a c0 06 e0 00 0e da c0 05 5e 00 06 3d c0 00 48 2c 70 fc 2c 70 43 00   ┆  $     x  *                 p                    ^  =  H,p ,pC ┆
0x0fc00…10500 (1, 34783) 02 40 1e c0 05 96 00 0e da 00 06 3e 00 0f 84 00 0c 10 c0 05 f6 c0 05 f4 c0 00 42 00 06 3d c0 06 08 00 0b 0a 00 06 c2 00 06 c4 00 0d cc 00 0f 78 2c a0 00 2c a1 e8 2c a0 2f 00 00 00 2c 64 65 66   ┆ @         >              B  =                 x,  ,  , /   ,def┆
0x10500…10e00 (1, 34784) 01 a0 16 c0 05 9c 00 0c 10 00 0f 78 00 0f 84 00 0f 7a c0 00 44 00 0e da 00 06 3d c0 00 7e 00 06 3e c0 07 02 2c d1 6c 2c d0 2b 01 40 7c 00 00 7f 00 00 32 00 00 00 2c 76 69 73 00 00 73 70 72 69   ┆           x     z  D     =  ü  >   , l, + @ø     2   ,vis  spri┆
0x10e00…11700 (1, 34785) 02 40 1a c0 05 a2 00 0f 84 00 0f 7a 00 0f 78 c0 00 44 00 0e da 00 0c 10 00 06 3d c0 00 7e 00 06 3e 00 0b 0a 00 06 c0 c0 05 f6 2d 00 00 2d 00 bc 2d 00 41 2d 01 8e 2d 00 31 00 00 32 00 00 00 2c   ┆ @         z  x  D        =  ü  >         -  -  - A-  - 1  2   ,┆
0x11700…12000 (1, 34786) 02 80 04 c0 05 a8 00 0e da 2d 30 00 2d 30 00 2d 30 a0 2d 30 8d 2d 30 ce 2d 30 81 2d 30 fc 2d 30 75 2d 31 2a 2d 30 69 2d 31 58 2d 30 5d 2d 31 86 2d 30 51 2d 31 b4 2d 30 45 2d 31 e2 2d 30 37 00   ┆         -0 -0 -0 -0 -0 -0 -0 -0u-1*-0i-1X-0Å-1 -0Q-1 -0E-1 -07 ┆
0x12000…12900 (1, 34787) 02 40 1e c0 05 ae 00 06 3e 00 0c 10 c0 07 06 00 0b 0a 00 06 c2 c0 05 a4 00 01 9a 00 06 3d c0 00 48 00 06 c0 c0 07 08 c0 00 3a 00 0f 78 00 0e e2 2d 60 00 2d 60 00 2e 41 54 01 40 34 00 00 00 00   ┆ @      >                    =  H        :  x   -` -` .AT @4    ┆
0x12900…13200 (1, 34788) 02 20 1a c0 05 b4 c0 00 44 00 0e da 00 0c 10 00 0b 0a 00 06 c2 00 06 c4 00 0d cc 00 06 3e c0 06 e0 00 0f 84 00 01 9a c0 07 06 2d 91 5c 2d 90 49 2d 91 de 2d 90 31 00 00 01 46 45 4a 4c 00 00 53   ┆        D                    >            - Ø- I-  - 1   FEJL  S┆
0x13200…13b00 (1, 34789) 02 a0 22 c0 05 ba 00 06 3e 00 0c 10 c0 00 70 00 0f 78 00 0c 2a 00 06 c4 00 0b 0a 00 06 c0 c0 05 ba c0 00 44 00 0e da 00 0f 84 00 06 c2 c0 00 64 00 01 9a c0 06 e0 2d c0 6e 2d c0 5b 2d c1 3a 2d   ┆  "     >     p  x  *              D           d      - n- Æ- :-┆
0x13b00…14400 (1, 34790) 02 a0 20 c0 05 c0 00 0c 10 00 0b 0a 00 06 c0 c0 07 02 00 06 3e c0 05 c2 c0 00 44 00 0e da 00 0f 84 c0 05 f6 c0 05 f4 00 06 c2 00 06 c4 00 0d cc c0 07 24 2d f0 00 2d f0 00 2d f0 00 2d f1 6c 2d   ┆                    >     D                       $-  -  -  - l-┆
0x14400…14d00 (1, 34791) 01 e0 1c c0 05 c6 00 0f 84 c0 07 4c 00 06 3e 00 0c 10 c0 07 46 00 0f 78 c0 00 42 00 06 3d c0 06 08 c0 05 f6 c0 05 f4 00 0b 0a 00 06 c2 2e 20 00 00 40 12 00 00 01 01 81 de 6f 70 68 7c 72 00 01   ┆           L  >     F  x  B  =               .   @       ophør  ┆
0x14d00…15600 (1, 34792) 02 a0 16 c0 05 cc 00 0e da 00 0c 10 c0 00 5e 00 06 3e 00 06 3d c0 06 08 c0 05 ce c0 06 e0 00 10 ae 00 0b 0a 2e 50 b4 2e 50 75 2e 51 3e 2e 50 63 2e 51 6c 2e 50 57 2e 51 9a 2e 50 4b 2e 51 c8 2e   ┆              ^  >  =               .P .Pu.Q>.Pc.Ql.PW.Q .PK.Q .┆
0x15600…15f00 (1, 34793) 02 20 1a c0 05 d2 00 0c 2a 00 06 c4 00 0c 10 00 0e e2 00 0d cc 00 06 3e c0 06 fc 00 0f 78 00 06 3d c0 06 f6 c0 06 f4 00 0e da 2e 80 00 2e 80 e4 2e 80 3d 36 d1 a4 00 40 12 00 00 00 00 60 17 00   ┆        *              >     x  =         .  .  . =6   @     `  ┆
0x15f00…16800 (1, 34794) 01 80 14 c0 05 d8 00 0c 10 00 06 3d c0 06 fc c0 06 f4 00 0e da c0 05 da 00 06 a3 c0 07 24 00 06 a3 2e b1 14 2e b0 37 01 80 5a 00 60 12 00 00 00 00 60 17 00 00 08 01 81 dc 00 00 34 01 81 9c 00   ┆           =                 $   .  . 7  Z `     `         4    ┆
0x16800…17100 (1, 34795) 01 80 16 c0 05 de 00 0f 78 00 0c 10 c0 07 02 00 06 3e c0 07 1e 00 06 c4 00 0e da 00 0d cc c0 06 fc 00 06 3d 2e e0 00 00 00 00 00 60 17 01 40 76 00 00 10 00 40 12 01 81 a8 00 00 20 00 02 00 00   ┆        x        >                 =.      `  @v    @           ┆
0x17100…17a00 (1, 34796) 01 80 16 c0 05 e4 00 0c 10 c0 07 08 00 0e e2 00 06 c4 00 0d cc 00 06 3e c0 06 f6 c0 06 fc 00 0f 78 00 06 3d 2f 81 30 00 00 c8 00 80 40 00 81 dc 00 df ff 00 60 17 00 c1 b2 00 80 12 00 00 00 00   ┆                       >        x  =/ 0     @       `           ┆