DataMuseum.dk

Presents historical artifacts from the history of:

CR80 Hard and Floppy Disks

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

See our Wiki for more about CR80 Hard and Floppy Disks

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: ┃ B C E T i

⟦193e12850⟧ CRfs1, ileave2,6

    Length: 256256 (0x3e900)
    Types: CRfs1, ileave2,6
    Notes: Cr80S1Fs

Derivation

└─⟦7c4388e5c⟧ Bits:30005071 8" CR80 Floppy CR80FD_0009 ( EDM SYS 1 PJ DEC 3,80 )
    └─⟦this⟧ 

Namespace

name artifact - - - - - - - - - - - -
0x0600 0x0000 0x0000 0x0000 0x0000 0x0032 0x0000 0x0000 0x0001 0x0031 0x0000 0x0032 CP -
0x0000 0x000e 0x0000 0x0001 0x0001 0x0019 0x0000 0x0000 0x0001 0x0004 0x0000 0x0019 CP.B8ASNN ⟦7257d2335⟧ TextFile
0x0000 0x0000 0x0000 0x0000 0x0000 0x0019 0x0000 0x0000 0x0001 0xffff 0x0000 0x0019 CP.EDCMOD -
0x0300 0x000e 0x0000 0x0001 0x0001 0x000a 0x0000 0x0000 0x0001 0x0013 0x0000 0x000a CP.EDMHOD ⟦965beab83⟧
0x0000 0x000e 0x0000 0x0001 0x0000 0x000a 0x0000 0x0000 0x0001 0x0039 0x0000 0x000a EDMHOD ⟦7daaec2da⟧ TextFile
0x0000 0x0000 0x0000 0x0000 0x0000 0x0064 0x0000 0x0000 0x0001 0x0303 0x0000 0x0064 EDMMOD ⟦374ad7f06⟧ TextFile
0x0000 0x000e 0x0000 0x0001 0x0000 0x0001 0x0000 0x0000 0x0001 0x0004 0x0000 0x0001 EDMNOD ⟦cd2af1240⟧ TextFile
0x0000 0x000e 0x0000 0x0001 0x0000 0x0064 0x0000 0x0000 0x0001 0x021c 0x0000 0x0064 EDMSOD ⟦764b18e48⟧ TextFile

Disk picture

  Unclaimed
  ?

OctetView

0x00000…00080 UnusedSector ┆'     '    ! & ' ) * , - / 0o     @a{   KUP READY FOR RESTART BY A NEW ATTENTION   Z ] YX  N)  ZK  ^ YlM a >>  aX  Y Y~ X)I J  Q┆
0x00080…00100 UnusedSector 0x00[128]
0x00100…00180 UnusedSector ┆                                                                        ░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░░      ┆
0x00180…001c0 DirEnt {filename=»«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0019, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0018, de0d=0x0000, cluster2=0x0019, de0f=0x0009, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x001c0…001e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
         […0x1…]
0x00200…00280 UnusedSector ┆SLTGTEST                ░░    ░░░░░░░░░░░░░░░░░░░░        BOOT0000                @               ░░░░░░░░░░ .                  ┆
0x00280…00300 UnusedSector ┆BOOT0001                       '░░░░░░░░░░░░░░░░░░ . .    ░░ASWD02                       ( ( ( (░░░░░░░░░░░░      }             ┆
0x00300…00380 UnusedSector ┆EDITOR00                                ░░░░░░░░░░        ░░ASWD02                       ( ( ( (░░░░░░░░░░░░      }             ┆
0x00380…00400 UnusedSector ┆░░JECT01                        ░░░░░░░░░░░░░░░░░░        ░░ASWD02                       ( ( ( (░░░░░░░░░░░░      }             ┆
0x00400…00440 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0xb…]
0x00700…00740 DirEnt {filename=»EDMSOD«, kind=0x0000, de04=0x000e, de05=0x0000, de06=0x0001, de07=0x0000, cluster=0x0064, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x021c, de0d=0x0000, cluster2=0x0064, de0f=0x1e04, de10=0x211a, de11=0x2516, de12=0x2912, de13=0x2d0e, de14=0x3515, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x001f, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x00740…00780 DirEnt {filename=»EDMMOD«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0064, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0303, de0d=0x0000, cluster2=0x0064, de0f=0x0306, de10=0x0702, de11=0x0a18, de12=0x0e14, de13=0x1210, de14=0x160c, de15=0x1a08, de16=0x3911, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x002d, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x00780…007c0 DirEnt {filename=»EDMHOD«, kind=0x0000, de04=0x000e, de05=0x0000, de06=0x0001, de07=0x0000, cluster=0x000a, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0039, de0d=0x0000, cluster2=0x000a, de0f=0x310a, de10=0x3114, de11=0x3204, de12=0x320e, de13=0x3218, de14=0x3308, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0029, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x007c0…00800 DirEnt {filename=»EDMNOD«, kind=0x0000, de04=0x000e, de05=0x0000, de06=0x0001, de07=0x0000, cluster=0x0001, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0004, de0d=0x0000, cluster2=0x0001, de0f=0x3312, de10=0x3313, de11=0x3314, de12=0x3315, de13=0x3316, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0031, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x00800…00840 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x13…]
0x00d00…00d40 DirEnt {filename=»CP«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x00d40…00d80 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0xe…]
0x01100…01140 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01140…01180 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x01200…01240 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01240…01280 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01280…012c0 DirEnt {filename=»B8ASNN«, kind=0x0000, de04=0x000e, de05=0x0000, de06=0x0001, de07=0x0001, cluster=0x0019, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0004, de0d=0x0000, cluster2=0x0019, de0f=0x3416, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0031, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x012c0…01300 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01300…01340 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01340…01380 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x01400…01440 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01440…01480 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x01500…01540 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01540…01580 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x01600…01640 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01640…01680 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x01700…01740 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01740…01780 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x01800…01840 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01840…01880 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x01900…01940 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01940…01980 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x01a00…01a40 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01a40…01a80 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x01b00…01b40 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01b40…01b80 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01b80…01bc0 DirEnt {filename=»░░MMOD«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0064, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0303, de0d=0x0000, cluster2=0x0064, de0f=0xffff, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x002d, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01bc0…01c00 DirEnt {filename=»░░MSOD«, kind=0x0000, de04=0x000e, de05=0x0000, de06=0x0001, de07=0x0000, cluster=0x0064, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x021c, de0d=0x0000, cluster2=0x0064, de0f=0xffff, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x001f, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01c00…01c40 DirEnt {filename=»░░MHOD«, kind=0x0000, de04=0x000e, de05=0x0000, de06=0x0001, de07=0x0000, cluster=0x000a, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0039, de0d=0x0000, cluster2=0x000a, de0f=0xffff, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0029, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01c40…01c80 DirEnt {filename=»░░MNOD«, kind=0x0000, de04=0x000e, de05=0x0000, de06=0x0001, de07=0x0000, cluster=0x0001, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0004, de0d=0x0000, cluster2=0x0001, de0f=0xffff, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0031, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01c80…01cc0 DirEnt {filename=»EDMHOD«, kind=0x0300, de04=0x000e, de05=0x0000, de06=0x0001, de07=0x0001, cluster=0x000a, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0013, de0d=0x0000, cluster2=0x000a, de0f=0x3402, de10=0x340c, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0015, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01cc0…01d00 DirEnt {filename=»EDCMOD«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0019, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0xffff, de0d=0x0000, cluster2=0x0019, de0f=0xffff, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01d00…01d40 DirEnt {filename=»░░MVOD«, kind=0x0000, de04=0x000e, de05=0x0000, de06=0x0001, de07=0x0000, cluster=0x0064, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0257, de0d=0x0000, cluster2=0x0064, de0f=0x3419, de10=0x3815, de11=0x3c11, de12=0x400d, de13=0x4409, de14=0x4805, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0040, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01d40…01d80 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x01e00…01e40 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01e40…01e80 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x01f00…01f40 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x01f40…01f80 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x02000…02040 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02040…02080 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x02100…02140 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02140…02180 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x02200…02240 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02240…02280 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x02300…02340 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02340…02380 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x02400…02440 DirEnt {filename=»░░0091«, kind=0x0000, de04=0x000e, de05=0x0000, de06=0x0001, de07=0x0000, cluster=0x0003, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0002, de0d=0x0000, cluster2=0x0003, de0f=0x3317, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0032, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02440…02480 DirEnt {filename=»░░0107«, kind=0x0000, de04=0x000e, de05=0x0000, de06=0x0001, de07=0x0000, cluster=0x0003, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0002, de0d=0x0000, cluster2=0x0003, de0f=0x3317, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0032, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02480…024c0 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x1…]
0x02500…02540 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02540…02580 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x02600…02640 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02640…02680 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x02700…02740 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02740…02780 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x02800…02840 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02840…02880 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
         […0x2…]
0x02900…02940 DirEnt {filename=»░░«, kind=0x0600, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0032, de09=0x0000, de0a=0x0000, de0b=0x0001, nsect=0x0031, de0d=0x0000, cluster2=0x0032, de0f=0x0108, de10=0xffff, de11=0xffff, de12=0xffff, de13=0xffff, de14=0xffff, de15=0xffff, de16=0xffff, de17=0xffff, de18=0xffff, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02940…02980 DirEnt {filename=»░░«, kind=0x0000, de04=0x0000, de05=0x0000, de06=0x0000, de07=0x0000, cluster=0x0000, de09=0x0000, de0a=0x0000, de0b=0x0000, nsect=0x0000, de0d=0x0000, cluster2=0x0000, de0f=0x0000, de10=0x0000, de11=0x0000, de12=0x0000, de13=0x0000, de14=0x0000, de15=0x0000, de16=0x0000, de17=0x0000, de18=0x0000, de19=0x0000, de1a=0x0000, de1b=0x0000, de1c=0x0000, de1d=0x0000, de1e=0x0000, de1f=0x0000}
0x02980…02a00 DataSector[»EDMMOD«]
         […0x2bb…]
0x18780…18800 DataSector[»EDMSOD«]
         […0x1f3…]
0x28180…28200 DataSector[»EDMHOD«]
         […0x39…]
0x29e80…29f00 UnusedSector ┆      ░ j  G          ░ j j  G          # $       ░  G    ░  G    ░ /C    ░      6  ░C  ░     ░       ░ /C       8[7  ░ n7░!z7░ ┆
0x29f00…29f80 UnusedSector ┆j  G G            V   ░B░ bC      ░      6  ░C  ░     ░       ░ /C       8 7  ░  7░! 7░    G  j  G G            ░    G          ┆
0x29f80…2a000 DataSector[»EDMNOD«]
         […0x4…]
0x2a200…2a280 UnusedSector ┆EDMSOD  C.     ░  \ @               C           O             G       @ K         C   @           ;  LIST ;---------------------┆
0x2a280…2a300 UnusedSector ┆-------------------------------------------------- ; ; RETURN LINKS (RL)/WORK. ; ;----------------------------------------------┆
0x2a300…2a380 UnusedSector ┆------------------------- LOC=EMBASE INTSTA: LOC=LOC+1 ; INT._DRIVEN_PROCESS STATE (IDLE/]1>!) RL100 LIST ;---------------------┆
0x2a380…2a400 UnusedSector ┆                                                                                                                                ┆
0x2a400…2a480 UnusedSector ┆                                                                                    V9IWV q ░! :0     1     2     3     4     5 ┆
0x2a480…2a500 DataSector[»EDMHOD«]
         […0x13…]
0x2ae80…2af00 DataSector[»B8ASNN«]
         […0x4…]
0x2b100…2b180 UnusedSector ┆0007 0 0000 ; DISK IDENTIFICATION: CR/D/1238 ;  00000008 0 0000 ; ;  00000009 0 0000 ; CPS NAME: ERROR DETECTION AND CORRECTION ┆
0x2b180…2b200 UnusedSector ┆(EDC) SUBMODULE ;  00000010 0 0000 ; EDC MAIN PROGRAM SECTION (EDM). ;  00000011 0 0000 ; CPS VERSION: 0100 ;  00000012 0 0000 ;┆
0x2b200…2b280 UnusedSector ┆ ;  00000013 0 0000 ; MERGE FILES: SYSNOD,MNNNOD,GDSNOD,LETNOD,PCFNOD,CDTNOD,ECFNOD,EOCNOD;  00000014 0 0000 ; EDINOD,EDONOD,CST┆
0x2b280…2b300 UnusedSector ┆NOD,GSTNOD,MQINOD,MQONOD,BINNOD,MSBNOD;  00000015 0 0000 ; COPNOD,EDCNOD,XPDNOD,DANNOD ;  00000016 0 0000 ; ;  00000017 0 0000 ;┆
0x2b300…2b380 UnusedSector ┆ MODULE FILES: EDMSOD,EDMMOD,EDMHOD,EDMNOD,EDMVOD ;  00000018 0 0000 ; ;  00000019 0 0000 ; REFERENCES: NIC/200/PSP/0006 ;  0000┆
0x2b380…2b400 UnusedSector ┆0020 0 0000 ; ;  00000021 0 0000 ; DATE: 791115 ;  00000022 0 0000 ; AUTHOR: JSL/HM ;  00000023 0 0000 ; ;  00000024 0 0000 ;---┆
0x2b400…2b480 UnusedSector ┆--------------------------------------------------------------------;  00000025 0 0000 BEGIN MODULE EDMSYS ;  00000026 0 0000 US┆
0x2b480…2b500 UnusedSector ┆E BASE ;  00000027 0 0000 XDATE:=#1115 ;  00000028 0 0000 CCBCT1=21 ;  00000029 0 0000 CCBCT2=263 ;  00000030 0 0000 NOLIST ;  0┆
0x2b500…2b580 UnusedSector ┆0000031 0 0000 MESSAGE: CALL XPDNOD 00000077 0 0000 MESSAGE: CALL SYSNOD 00000181 0 0000 MESSAGE: CALL MNNNOD 00000306 0 0000 ME┆
0x2b580…2b600 UnusedSector ┆SSAGE: CALL GDSNOD 00000365 0 0000 MESSAGE: CALL LETNOD 00000416 0 0000 MESSAGE: CALL PCFNOD 00000464 0 0000 MESSAGE: CALL CDTNO┆
0x2b600…2b680 UnusedSector ┆D 00000551 0 0000 MESSAGE: CALL ECFNOD 00000697 0 0000 MESSAGE: CALL EOCNOD 00000783 0 0000 MESSAGE: CALL EDCNOD 00000904 0 0000┆
0x2b680…2b700 UnusedSector ┆ MESSAGE: CALL EDINOD 00000918 0 0000 MESSAGE: CALL EDONOD 00000940 0 0000 MESSAGE: CALL CSTNOD 00001216 0 0000 MESSAGE: CALL GS┆
0x2b700…2b780 UnusedSector ┆TNOD 00001433 0 0000 MESSAGE: CALL MQINOD 00001478 0 0000 MESSAGE: CALL MQONOD 00001508 0 0000 MESSAGE: CALL BINNOD 00001546 0 0┆
0x2b780…2b800 UnusedSector ┆000 MESSAGE: CALL MSBNOD 00001637 0 0000 MESSAGE: CALL COPNOD 00001700 0 0000 MESSAGE: CALL DBPNOD 00001703 0 0000 MESSAGE: CALL┆
0x2b800…2b880 UnusedSector ┆ DANNOD 00001728 0 0000 LIST ;  00001729 0 0000 ;-----------------------------------------------------------------------;  00001┆
0x2b880…2b900 UnusedSector ┆730 0 0000 ; ;  00001731 0 0000 ; RETURN LINKS (RL)/WORK. ;  00001732 0 0000 ; ;  00001733 0 0000 ;-----------------------------┆
0x2b900…2b980 UnusedSector ┆------------------------------------------;  00001734 0 0000 LOC=EMBASE ;  ]1>!) 0 006E INTSTA: LOC=LOC+1 ; INT._DRIVEN_PROCESS ┆
0x2b980…2ba00 UnusedSector ┆STATE (IDLE/;  00001735 0 006F RL1000: LOC=LOC+1 ; ;  00001736 0 0070 RL1050: LOC=LOC+1 ; ;  00001737 0 0071 RL1055: LOC=LOC+1 ;┆
0x2ba00…2ba80 UnusedSector ┆ ;  00001738 0 0072 RL1060: LOC=LOC+1 ; ;  00001739 0 0073 RL1100: LOC=LOC+1 ; ;  00001740 0 0074 RL1220: LOC=LOC+1 ; ;  0000174┆
0x2ba80…2bb00 UnusedSector ┆1 0 0075 RL1230: LOC=LOC+1 ;  00001742 0 0076 RL1250: LOC=LOC+1 ; ;  00001743 0 0077 RL1252: LOC=LOC+1 ; ;  00001744 0 0078 RL12┆
0x2bb00…2bb80 DataSector[»EDMSOD«]
         […0x28…]
0x2cf80…2d000 UnusedSector ┆TUP_ECFG ;  00001870 1 0082 MOV R4 RL1055 ; ;  00001871 1 0083 MOV ECFPTR R6 ; ;  00001872 1 0084 MOVC EOCHMT R0 ; PRESET HALTED┆
0x2d000…2d080 UnusedSector ┆ MS TIMER. ;  00001873 1 0086 MOV R0 ECGHMT.X6 ; ;  00001874 1 0087 MOVC EOCRCL R0 ; PRESET RETRANSMISSION CONTER ;  00001875 1 ┆
0x2d080…2d100 UnusedSector ┆0088 MOV R0 ECGRCL.X6 ; ;  00001876 1 0089 MOVC EOARMB R0 ; ;  00001877 1 008A MOV R0 ECGARMB.X6 ; SETUP ALLOWED MISSING BID RAN┆
0x2d100…2d180 UnusedSector ┆GE ;  00001878 1 008B MOD R6 ; ;  00001879 1 008C MOVC ECGAKA R4 ; ;  00001880 1 008D MOVC ECGAK0 X4 ; PRESET ACK_ARRAY ;  00001┆
0x2d180…2d200 UnusedSector ┆881 1 008F ADDC ECGALA-ECGAKA R4 ; ;  00001882 1 0090 MOVC ECGAL0 X4 ; PRESET ACKL_ARRAY ;  00001883 1 0092 MOV XGSTPR R5 ; ;  0┆
0x2d200…2d280 UnusedSector ┆0001884 1 0093 MOV GSTTCC.X5 R0 ; ;  00001885 1 0095 MOD R0 ; LOOKUP CST ENTRY ADDRESSES ;  00001886 1 0096 ADDC GSTCDY-2 R5 ; O┆
0x2d280…2d300 UnusedSector ┆F THE TWO HIGHEST LOGICAL ;  00001887 1 0098 MOVL 0. X5 R01 ; NUMBERED CST ENTRIES ;  00001888 1 0099 MOVL R01 ECGCIM.X6 ; SETUP┆
0x2d300…2d380 UnusedSector ┆ TD&M CST ENTRY POINTERS ;  00001889 1 009A JMPI RL1055 ; RETURN ;  00001890 1 009B ; END ;  00001891 1 009B ;  00001892 1 009B ┆
0x2d380…2d400 UnusedSector ┆;-----------------------------------------------------------------------;  00001893 1 009B ; PROCEDURE ED1060 ;  00001894 1 009B┆
0x2d400…2d480 UnusedSector ┆ ; CREATE_ECRS ;  00001895 1 009B ; ;  00001896 1 009B ; REGISTERS ENTRY EXIT ;  00001897 1 009B ; R0,R3 - DESTROYED ;  00001898┆
0x2d480…2d500 UnusedSector ┆ 1 009B ; R4 LINK DESTROYED ;  00001899 1 009B ; R5 - GSTP (REL) ;  00001900 1 009B ; R6,R7 - DESTROYED ;  00001901 1 009B ; ;  ┆
0x2d500…2d580 UnusedSector ┆00001902 1 009B ; INPUTS: ECFPTR,ECFPTA,GSTNSE ;  00001903 1 009B ; OUTPUTS: ECGFQH,ECGUQH,ECCLNK ;  00001904 1 009B ; ;  000019┆
0x2d580…2d600 UnusedSector ┆05 1 009B ; CALL BY: ED1000 ;  00001906 1 009B ; CALL TO: - ;  00001907 1 009B ;------------------------------------------------┆
0x2d600…2d680 UnusedSector ┆-----------------------;  00001908 1 009B ED1060: ; BEGIN CREATE_ECRS ;  00001909 1 009B MOV R4 RL1060 ; ;  00001910 1 009C MOV ┆
0x2d680…2d700 UnusedSector ┆XGSTPR R5 ; ;  00001911 1 009D MOV ECFPTR R6 ; ECFP:=ECF_ADDR ;  00001912 1 009E ADDC ECGSIZ-ECRSIZ R6 ; ECRP:=ECFP+ECG_SIZE-ECR┆
0x2d700…2d780 UnusedSector ┆_SIZE ;  00001913 1 009F MOV GSTNSE.X5 R0 ; N:=NSE.GSTP ;  00001914 1 00A0 MOV R0 R3 ; N0:=N ;  00001915 1 00A1 ED1062: ; REPEAT┆
0x2d780…2d800 UnusedSector ┆ ;  00001916 1 00A1 ADDC ECRSIZ R6 ; ECRP:=ECRP+ECR_SIZE ;  00001917 1 00A2 MOV R6 R7 ; ;  00001918 1 00A3 MOD XBASE ; ;  000019┆
0x2d800…2d880 UnusedSector ┆19 1 00A4 ADDC ECRSIZ R7 ; NEXT:=ECRP+ECR_SIZE+BASE (ABS);  00001920 1 00A5 MOV R7 ECCLNK.X6 ; LINK.ECRP:=NEXT ;  00001921 1 00A┆
0x2d880…2d900 UnusedSector ┆6 SOB R0 ED1062 ; N:=N-1 ;  00001922 1 00A7 ; UNTIL N=0 ;  00001923 1 00A7 CLR ECCLNK.X6 ; LINK.ECRP:=0 (LAST LINK=0) ;  0000192┆
0x2d900…2d980 UnusedSector ┆4 1 00A8 ADD XBASE R6 ; ;  00001925 1 00AA MOV ECFPTR R4 ; ;  00001926 1 00AB MOD ECFPTA ; ;  00001927 1 00AC MOVC ECGSIZ R7 ; ;┆
0x2d980…2da00 UnusedSector ┆  00001928 1 00AD MOV R7 ECGFQH+QCFQE. X4 ; FQE.FQH:=FIRST_ECR ;  00001929 1 00AE MOV R6 ECGFQH+QCLQE. X4 ; LQE.FQH:=LAST_ECR ; ┆
0x2da00…2da80 UnusedSector ┆ 00001930 1 00AF MOV R3 ECGFQH+QCCQE. X4 ; CQE.FQH:=N0 (COUNT ECR) ;  00001931 1 00B0 MOD ECFPTA ; ;  00001932 1 00B1 MOVC ECGUQ┆
0x2da80…2db00 UnusedSector ┆H+QCFQE R0 ; ;  00001933 1 00B2 MOV R0 ECGUQH+QCLQE. X4 ; LQE.UQH:=ADDR_FQE.UQH (ABS) ;  00001934 1 00B3 JMPI RL1060 ; RETURN ; ┆
0x2db00…2db80 UnusedSector ┆ 00001935 1 00B4 ; END ;  00001936 1 00B4 ;  00001937 1 00B4 ;------------------------------------------------------------------┆
0x2db80…2dc00 UnusedSector ┆-----;  00001938 1 00B4 ; PROCEDURE ED1100 ;  00001939 1 00B4 ; INITIALISE_LET ;  00001940 1 00B4 ; ;  00001941 1 00B4 ; REGISTE┆
0x2dc00…2dc80 UnusedSector ┆RS ENTRY EXIT ;  00001942 1 00B4 ; R0,R1,R2,R3 - DESTROYED ;  00001943 1 00B4 ; R4 LINK DESTROYED ;  00001944 1 00B4 ; R5,R6,R7 ┆
0x2dc80…2dd00 UnusedSector ┆- DESTROYED ;  00001945 1 00B4 ; ;  00001946 1 00B4 ; INPUTS: REF ED1050 ;  00001947 1 00B4 ; OUTPUTS: REF ED1050 ;  00001948 1 ┆
0x2dd00…2dd80 UnusedSector ┆00B4 ; ;  00001949 1 00B4 ; CALL BY: MAIN_LET ;  00001950 1 00B4 ; CALL TO: ED1050,ED1920,ED1950 ;  00001951 1 00B4 ; GLET,SLET ┆
0x2dd80…2de00 UnusedSector ┆;  00001952 1 00B4 ;-----------------------------------------------------------------------;  00001953 1 00B4 ED1100: ; BEGIN IN┆
0x2de00…2de80 UnusedSector ┆ITIALISE_LET ;  00001954 1 00B4 MOV R4 RL1100 ; ;  00001955 1 00B5 JMP S4 ED1050 ; INIT_PD ;  00001956 1 00B6 ; ;  00001957 1 00┆
0x2de80…2df00 UnusedSector ┆B6 ; BEGIN WRITE/SEND RTC LETTER ;  00001958 1 00B6 MON GLET ; GET_LETTER(LETP) ;  00001959 1 00B7 JMPI S4 EI1950 &;E ERROR5(NLT┆
0x2df00…2df80 UnusedSector ┆) ;  00001960 1 00B8 MOV R5 LETPTA ; ;  00001961 1 00B9 MOV R5 R7 ; ;  00001962 1 00BA SUB XBASE R7 ; ;  00001963 1 00BC MOVC ED┆
0x2df80…2e000 UnusedSector ┆CRTC R0 ; TYPE=EDCRTC ;  00001964 1 00BD MOVC RTCLPN R2 ; REC=RTC ;  00001965 1 00BE MOVC EDLLPN R3 ; SND=EDC/EDL ;  00001966 1 ┆
0x2e000…2e080 UnusedSector ┆00BF MOV R0 LTTYP. X7 ; ;  00001967 1 00C0 MOVL R23 LTRCV. X7 ; ;  00001968 1 00C1 MOVC LTMST1 R0 ; MSG_TYPE=LTMST1 ;  00001969 ┆
0x2e080…2e100 UnusedSector ┆1 00C2 MOVC EOCRTE R1 ; ELAPSE_TIME=EOCRTE ;  00001970 1 00C3 MOV R0 LTMS1. X7 ; ;  00001971 1 00C4 MOV R1 LTMS4. X7 ; ;  000019┆
0x2e100…2e180 UnusedSector ┆72 1 00C5 MON SLET ; SEND_LETTER(LETP) ;  00001973 1 00C6 JMPI S4 EI1920 &;E ERROR2(LME) ;  00001974 1 00C7 ; END ;  00001975 1 ┆
0x2e180…2e200 UnusedSector ┆00C7 JMPI RL1100 ; RETURN ;  00001976 1 00C8 ; END ;  00001977 1 00C8 ;  00001978 1 00C8 ;--------------------------------------┆
0x2e200…2e280 UnusedSector ┆---------------------------------;  00001979 1 00C8 ; PROCEDURE ED1200 ;  00001980 1 00C8 ; GET_PTR(LCN) ;  00001981 1 00C8 ; GE┆
0x2e280…2e300 UnusedSector ┆T_ECR(LCN) ;  00001982 1 00C8 ; ;  00001983 1 00C8 ; REGISTERS ENTRY EXIT ;  00001984 1 00C8 ; R4 LINK DESTROYED ;  00001985 1 0┆
0x2e300…2e380 UnusedSector ┆0C8 ; R6 LCN ECRP (REL) ;  00001986 1 00C8 ; R7 (CSTP (REL)) CSTP (REL) ;  00001987 1 00C8 ; ;  00001988 1 00C8 ; INPUTS: XGSTPR┆
0x2e380…2e400 UnusedSector ┆,GSTCDY,CSTCDT,CSTECR ;  00001989 1 00C8 ; OUTPUTS: CSTPTR,CDTPTR,ECRPTR,CSTPTA,CDTPTA,ECRPTA ;  00001990 1 00C8 ; ;  00001991 1┆
0x2e400…2e480 UnusedSector ┆ 00C8 ; CALL BY: ED1500,ED1510,ED8600,ED8610 ;  00001992 1 00C8 ; CALL TO: - ;  00001993 1 00C8 ; ;  00001994 1 00C8 ; ENTRIES: ┆
0x2e480…2e500 UnusedSector ┆;  00001995 1 00C8 ; ENTRY1 - ECR.LCN.GSTP ;  00001996 1 00C8 ; ENTRY2 - CSTP IN R7 ;  00001997 1 00C8 ; ;  00001998 1 00C8 ; RE┆
0x2e500…2e580 UnusedSector ┆TURNS: ;  00001999 1 00C8 ; LINK+0 - NO_CDT/NO_ECR ;  00002000 1 00C8 ; LINK+1 - DONE ;  00002001 1 00C8 ;----------------------┆
0x2e580…2e600 UnusedSector ┆-------------------------------------------------;  00002002 1 00C8 ED1200: ; BEGIN GET_ECR ;  00002003 1 00C8 MOV XGSTPR R7 ; ;┆
0x2e600…2e680 UnusedSector ┆  00002004 1 00C9 MOD R6 ; ;  00002005 1 00CA MOV GSTCDY.X7 R7 ; CSTP:=(CDY+LCN).GSTP ;  00002006 1 00CC MOV R7 CSTPTA ; ;  0000┆
0x2e680…2e700 UnusedSector ┆2007 1 00CD SUB XBASE R7 ; ;  00002008 1 00CF MOV R7 CSTPTR ; ;  00002009 1 00D0 ED1201: ; ;  00002010 1 00D0 MOV CSTCDT.X7 R6 ;┆
0x2e700…2e780 UnusedSector ┆ CDTP:=CDT.CSTP ;  00002011 1 00D1 IEQ R6 0 ; IF CDTP=0 THEN ;  00002012 1 00D2 JMP 0. X4 ; RETURN(0) ;  00002013 1 00D3 MOV R6 ┆
0x2e780…2e800 UnusedSector ┆CDTPTA ; ;  00002014 1 00D4 SUB XBASE R6 ; ;  00002015 1 00D6 MOV R6 CDTPTR ; ;  00002016 1 00D7 MOV CSTECR.X7 R6 ; ECRP:=ECR.CS┆
0x2e800…2e880 UnusedSector ┆TP ;  00002017 1 00D8 IEQ R6 0 ; IF ECRP=0 ;  00002018 1 00D9 JMP 0. X4 ; THEN RETURN(0) ;  00002019 1 00DA MOV R6 ECRPTA ; ;  0┆
0x2e880…2e900 UnusedSector ┆0002020 1 00DB SUB XBASE R6 ; ELSE ;  00002021 1 00DD MOV R6 ECRPTR ; ;  00002022 1 00DE JMP 1. X4 ; RETURN(1) ;  00002023 1 00D┆
0x2e900…2e980 UnusedSector ┆F ; END ;  00002024 1 00DF ;  00002025 1 00DF ;---------------------------------------------------------------------- ;  0000202┆
0x2e980…2ea00 UnusedSector ┆6 1 00DF ; PROCEDURE ED1210. ;  00002027 1 00DF ; PROCEDURE ENABLE_INTERRUPT. ;  00002028 1 00DF ; ;  00002029 1 00DF ; REGISTER┆
0x2ea00…2ea80 UnusedSector ┆S: ENTRY EXIT ;  00002030 1 00DF ; R4 LINK UNCH ;  00002031 1 00DF ; ;  00002032 1 00DF ; CALL TO: - ;  00002033 1 00DF ; CALL B┆
0x2ea80…2eb00 UnusedSector ┆Y: MAIN_INT. ;  00002034 1 00DF ;---------------------------------------------------------------------- ;  00002035 1 00DF ED121┆
0x2eb00…2eb80 UnusedSector ┆0: ; BEGIN ENABLE_INTERRUPT ;  00002036 1 00DF LDM 2#100 ; INT. WINDOW ;  00002037 1 00E0 LDM 2#111 ; ;  00002038 1 00E1 MODN R4┆
0x2eb80…2ec00 UnusedSector ┆ ; INTSTA<>IDLE ;  00002039 1 00E2 CLR INTSTA.X4 ; ;  00002040 1 00E4 JMP 0. X4 ; RETURN ;  00002041 1 00E5 ; END ENABLE_INTERRU┆
0x2ec00…2ec80 UnusedSector ┆PT. ;  00002042 1 00E5 ;  00002043 1 00E5 ;-----------------------------------------------------------------------;  00002044 1 ┆
0x2ec80…2ed00 UnusedSector ┆00E5 ; PROCEDURE ED1220 ;  00002045 1 00E5 ; ALLOCATE_ECR ;  00002046 1 00E5 ; ;  00002047 1 00E5 ; REGISTERS ENTRY EXIT ;  0000┆
0x2ed00…2ed80 DataSector[»EDMMOD«]
         […0x47…]
0x31100…31180 UnusedSector ┆ MOVC ECOSAZ R1 ; X1:=OSAZ ;  00002272 1 0158 JMPI S4 EI6520 ; REMOVE(OEBA,OSTA,X0,X1) ;  00002273 1 0159 MOV ECOQCW.X6 R0 ; ;  ┆
0x31180…31200 UnusedSector ┆00002274 1 015A IBN R0 ECOLTX ; IF OQCW(OLTX,OLIT) I.E., ;  00002275 1 015B IBN R0 ECOLIT ; LCB IN PROGRESS,BUT NOT ;  00002276 ┆
0x31200…31280 UnusedSector ┆1 015C JMP ED1262 ; NOT IN TX THEN ;  00002277 1 015D MOVC NT% ; BEGIN ;  00002278 1 015D (1<ECOLCP+1<ECOLTX) R0 ; ;  00002279 1┆
0x31280…31300 UnusedSector ┆ 015E AND R0 ECOQCW.X6 ; CLEAR OQCW(OLTX,OLCP) ;  00002280 1 0160 MOVC 1 R3 ; N:=1 ;  00002281 1 0161 MOV ECOLER.X6 R5 ; BUFP:=O┆
0x31300…31380 UnusedSector ┆LER ;  00002282 1 0162 MON RNBN ; RELEASE(BUFP,N) ;  00002283 1 0163 ; END ;  00002284 1 0163 ED1262: ; ;  00002285 1 0163 MOV C┆
0x31380…31400 UnusedSector ┆STPTR R6 ; ;  00002286 1 0164 MON RODCST ; RELEASE OUTPUT DATA FROM CST ;  00002287 1 0165 MOV ECRPTR R6 ; BEGIN DISCARD MQO'S I┆
0x31400…31480 UnusedSector ┆N PROGRESS ;  00002288 1 0166 MOVC EOCTDC R0 ; I.E. ;  00002289 1 0167 MOV R0 ECOTQI0.X6 ; TYPE.TQI0:=DISCARD ;  00002290 1 0168┆
0x31480…31500 UnusedSector ┆ MOV R0 ECOTQI1.X6 ; TYPE.TQI1:=DISCARD ;  00002291 1 0169 JMPI RL1260 ; RETURN ;  00002292 1 016A ; END RELEASE_OUTPUT_DATA. ; ┆
0x31500…31580 UnusedSector ┆ 00002293 1 016A ;  00002294 1 016A ;-----------------------------------------------------------------------;  00002295 1 016A ;┆
0x31580…31600 UnusedSector ┆ PROCEDURE ED1400 ;  00002296 1 016A ; READ_MQI ;  00002297 1 016A ; ;  00002298 1 016A ; REGISTERS ENTRY EXIT ;  00002299 1 016┆
0x31600…31680 UnusedSector ┆A ; R0,R2 - DESTROYED ;  00002300 1 016A ; R4 LINK DESTROYED ;  00002301 1 016A ; R7 - DESTROYED ;  00002302 1 016A ; ;  0000230┆
0x31680…31700 UnusedSector ┆3 1 016A ; INPUTS: NMQIPT,MQIFLG,CIFLG,MQIPTR ;  00002304 1 016A ; OUTPUTS: NMQIPT,MQIFLG,CIFLG ;  00002305 1 016A ; ;  00002306┆
0x31700…31780 UnusedSector ┆ 1 016A ; CALL BY: MAIN ;  00002307 1 016A ; CALL TO: ED1900 ;  00002308 1 016A ; ;  00002309 1 016A ; RETURNS: ;  00002310 1 01┆
0x31780…31800 UnusedSector ┆6A ; LINK+0 - MQI EMPTY ;  00002311 1 016A ; LINK+1 - NON_EDC_MQI ;  00002312 1 016A ; LINK+2 - DONE ;  00002313 1 016A ;-------┆
0x31800…31880 UnusedSector ┆----------------------------------------------------------------;  00002314 1 016A ED1400: ; BEGIN READ_MQI ;  00002315 1 016A M┆
0x31880…31900 UnusedSector ┆OV R4 RL1400 ; ;  00002316 1 016B MOV NMQIPT R4 ; MQIP:=NEXT_MQI_ADDR ;  00002317 1 016C MOVL MQIFLG.X4 R01 ; IFLG:=IFLG.MQIP ; ┆
0x31900…31980 UnusedSector ┆ 00002318 1 016D MOVC NT 1<MQIEND R2 ; ;  00002319 1 016E AND R0 R2 ; ;  00002320 1 016F IEQ R2 0 ; IF IFLG=0 THEN ;  00002321 1┆
0x31980…31a00 UnusedSector ┆ 0170 JMPI RL1400 ; RETURN(0) ;  00002322 1 0171 MOVC RL1400 R7 ; ;  00002323 1 0172 IBZP R0 MQIEDC ; IF TEST(IFLG,-IEDC) THEN ;┆
0x31a00…31a80 UnusedSector ┆  00002324 1 0173 INC 0. X7 ; RL:=RL+1 ;  00002325 1 0174 JMP ED1401 ; ;  00002326 1 0175 ; ELSE ;  00002327 1 0175 ; BEGIN ;  0┆
0x31a80…31b00 UnusedSector ┆0002328 1 0175 IBZ X4 MQIRDY ; IF TEST(IFLG,-IRDY) THEN ;  00002329 1 0176 JMPI S4 EI19F1 ;E ERRORF1(MOF) ;  00002330 1 0177 REL┆
0x31b00…31b80 UnusedSector ┆S X4 MQIRDY ; CLR(IFLG,IRDY) ;  00002331 1 0178 MOVC CIFLG R5 ; ;  00002332 1 0179 MODC MQIESZ ; ;  00002333 1 017A MOVM X4 X5 ;┆
0x31b80…31c00 UnusedSector ┆ READ_MQI(MQIP,SAVE,SIZE) ;  00002334 1 017B INC 0. X7 ; ;  00002335 1 017C INC 0. X7 ; RL:=RL+2 ;  00002336 1 017D ; END ;  000┆
0x31c00…31c80 UnusedSector ┆02337 1 017D ED1401: ; ;  00002338 1 017D MOV NMQIPT R4 ; ;  00002339 1 017E IBN X4 MQIHLD ; IF MQIFLG(-IHLD) THEN ;  00002340 1┆
0x31c80…31d00 UnusedSector ┆ 017F JMP ED1403 ; BEGIN ;  00002341 1 0180 SETS X4 MQIHLD ; SETS IFLG(IHLD) ;  00002342 1 0181 IBNP R0 MQISYN ; IF SYNC NON_EDC┆
0x31d00…31d80 UnusedSector ┆ THEN ;  00002343 1 0182 IBZ R0 MQIEDC ; ;  00002344 1 0183 JMP ED1402 ; GOTO TRIG MXI ;  00002345 1 0184 MOVC 1<MQIBML+1<MQISTC┆
0x31d80…31e00 UnusedSector ┆ R2 ; ;  00002346 1 0186 AND R2 R1 ; ;  00002347 1 0187 INE R1 0 ; IF MQISTA(IBML.OR.ISTC) ;  00002348 1 0188 IBN R0 MQIEDC ; .A┆
0x31e00…31e80 UnusedSector ┆ND. MQIFLG(-IEDC) THEN ;  00002349 1 0189 JMP ED1404 ; ;  00002350 1 018A ED1402: ; ;  00002351 1 018A MOVC DAMXI R0 ; *** TRIG_┆
0x31e80…31f00 UnusedSector ┆MXI *** ;  00002352 1 018B INT R0 ; ;  00002353 1 018C JMP ED1404 ; END ;  00002354 1 018D ED1403: ; ELSE ;  00002355 1 018D MOV┆
0x31f00…31f80 UnusedSector ┆C 1<MQIEND R0 ; CLR(IFLG,ALL-IEND) ;  00002356 1 018E AND R0 MQIFLG.X4 ; ;  00002357 1 018F ED1404: ; ;  00002358 1 018F IBZP X4┆
0x31f80…32000 UnusedSector ┆ MQIEND ; IF TEST(IFLG,-IEND) THEN ;  00002359 1 0190 ADDC MQIESZ R4 &; MQIP:=MQIP+MQIESZ ;  00002360 1 0191 JMP LOC+2 &; ELSE ;┆
0x32000…32080 UnusedSector ┆  00002361 1 0192 MOV MQIPTR R4 &; MQIP:=MQI_START_ADDR ;  00002362 1 0193 MOV R4 NMQIPT ; ;  00002363 1 0194 JMPI RL1400 ; RETU┆
0x32080…32100 UnusedSector ┆RN(1/2) ;  00002364 1 0195 ; END ;  00002365 1 0195 ;  00002366 1 0195 ;--------------------------------------------------------┆
0x32100…32180 UnusedSector ┆---------------;  00002367 1 0195 ; PROCEDURE ED1410 ;  00002368 1 0195 ; READ_MQO ;  00002369 1 0195 ; ;  00002370 1 0195 ; REG┆
0x32180…32200 UnusedSector ┆ISTERS ENTRY EXIT ;  00002371 1 0195 ; R0,R2 - DESTROYED ;  00002372 1 0195 ; R4 LINK DESTROYED ;  00002373 1 0195 ; R7 - DESTRO┆
0x32200…32280 UnusedSector ┆YED ;  00002374 1 0195 ; ;  00002375 1 0195 ; INPUTS: NMQOPT,MQOFLG,COFLG,MQOPTR ;  00002376 1 0195 ; OUTPUTS: NMQOPT,MQOFLG,COF┆
0x32280…32300 UnusedSector ┆LG ;  00002377 1 0195 ; ;  00002378 1 0195 ; CALL BY: MAIN ;  00002379 1 0195 ; CALL TO: ED1900 ;  00002380 1 0195 ; ;  00002381┆
0x32300…32380 UnusedSector ┆ 1 0195 ; RETURNS: ;  00002382 1 0195 ; LINK+0 - MQO EMPTY ;  00002383 1 0195 ; LINK+1 - NON_EDC_MQO ;  00002384 1 0195 ; LINK+2┆
0x32380…32400 UnusedSector ┆ - DONE ;  00002385 1 0195 ;-----------------------------------------------------------------------;  00002386 1 0195 ED1410: ; ┆
0x32400…32480 UnusedSector ┆BEGIN READ_MQO ;  00002387 1 0195 MOV R4 RL1410 ; ;  00002388 1 0196 MOV NMQOPT R4 ; MQOP:=NEXT_MQO_ADDR ;  00002389 1 0197 MOVL┆
0x32480…32500 UnusedSector ┆ MQOFLG.X4 R01 ; OFLG:=OFLG.MQOP ;  00002390 1 0198 MOVC NT 1<MQOEND R2 ; ;  00002391 1 0199 AND R0 R2 ; ;  00002392 1 019A IEQ ┆
0x32500…32580 UnusedSector ┆R2 0 ; IF OFLG=0 THEN ;  00002393 1 019B JMPI RL1410 ; RETURN(0) ;  00002394 1 019C ; ;  00002395 1 019C MOVC RL1410 R7 ; ;  000┆
0x32580…32600 UnusedSector ┆02396 1 019D IBZP R0 MQOEDC ; IF TEST(OFLG,-OEDC) THEN ;  00002397 1 019E INC 0. X7 ; RL:=RL+1 ;  00002398 1 019F JMP ED1411 ; ;┆
0x32600…32680 UnusedSector ┆  00002399 1 01A0 ; ELSE ;  00002400 1 01A0 ; BEGIN ;  00002401 1 01A0 IBZ X4 MQORDY ; IF TEST(OFLG,-ORDY) THEN ;  00002402 1 01┆
0x32680…32700 UnusedSector ┆A1 JMPI S4 EI19F1 ;E ERRORF1(MOF) ;  00002403 1 01A2 RELS X4 MQORDY ; CLR(OFLG,ORDY) ;  00002404 1 01A3 MOVC COFLG R5 ; ;  00002┆
0x32700…32780 UnusedSector ┆405 1 01A4 MODC MQOESZ ; ;  00002406 1 01A5 MOVM X4 X5 ; READ_MQO(MQOP,SAVE,SIZE) ;  00002407 1 01A6 INC 0. X7 ; ;  00002408 1 0┆
0x32780…32800 UnusedSector ┆1A7 INC 0. X7 ; RL:=RL+2 ;  00002409 1 01A8 ; END ;  00002410 1 01A8 ED1411: ; ;  00002411 1 01A8 MOV NMQOPT R4 ; ;  00002412 1 ┆
0x32800…32880 UnusedSector ┆01A9 IBN X4 MQOHLD ; IF MQOFLG(-OHLD) THEN ;  00002413 1 01AA JMP ED1413 ; BEGIN ;  00002414 1 01AB SETS X4 MQOHLD ; SETS MQOFLG┆
0x32880…32900 UnusedSector ┆(OHLD) ;  00002415 1 01AC IBNP R0 MQOSYN ; IF SYNC NON_EDC THEN ;  00002416 1 01AD IBZ R0 MQOEDC ; ;  00002417 1 01AE JMP ED1412┆
0x32900…32980 UnusedSector ┆ ; GOTO TRIG MXI ;  00002418 1 01AF MOVC 1<MQOBML+1<MQOSER R2 ; ;  00002419 1 01B1 AND R2 R1 ; ;  00002420 1 01B2 INE R1 0 ; IF ┆
0x32980…32a00 UnusedSector ┆MQOSTA(OBML.OR.OSER) ;  00002421 1 01B3 IBN R0 MQOEDC ; .AND. MQOFLG(-OEDC) THEN ;  00002422 1 01B4 JMP ED1414 ; ;  00002423 1 0┆
0x32a00…32a80 UnusedSector ┆1B5 ED1412: ; ;  00002424 1 01B5 MOVC DAMXI R0 ; *** TRIG_MXI *** ;  00002425 1 01B6 INT R0 ; ;  00002426 1 01B7 JMP ED1414 ; EN┆
0x32a80…32b00 UnusedSector ┆D ;  00002427 1 01B8 ED1413: ; ELSE ;  00002428 1 01B8 MOVC 1<MQOEND R0 ; CLR(OFLG,ALL-OEND) ;  00002429 1 01B9 AND R0 MQOFLG.X4┆
0x32b00…32b80 UnusedSector ┆ ; ;  00002430 1 01BA ED1414: ; ;  00002431 1 01BA IBZP X4 MQOEND ; IF TEST(OFLG,-OEND) THEN ;  00002432 1 01BB ADDC MQOESZ R4 &┆
0x32b80…32c00 UnusedSector ┆; MQOP:=MQOP+MQOESZ ;  00002433 1 01BC JMP LOC+2 &; ELSE ;  00002434 1 01BD MOV MQOPTR R4 &; MQOP:=MQO_START_ADDR ;  00002435 1 ┆
0x32c00…32c80 UnusedSector ┆01BE MOV R4 NMQOPT ; ;  00002436 1 01BF JMPI RL1410 ; RETURN(1/2) ;  00002437 1 01C0 ; END ;  00002438 1 01C0 ;  00002439 1 01C0┆
0x32c80…32d00 UnusedSector ┆ ;-----------------------------------------------------------------------;  00002440 1 01C0 ; PROCEDURE ED1450 ;  00002441 1 01C┆
0x32d00…32d80 UnusedSector ┆0 ; UPDATE_VF1 ;  00002442 1 01C0 ; ;  00002443 1 01C0 ; REGISTERS ENTRY EXIT ;  00002444 1 01C0 ; R0 - DESTROYED ;  00002445 1 ┆
0x32d80…32e00 UnusedSector ┆01C0 ; R3 - IEST ;  00002446 1 01C0 ; R4 LINK DESTROYED ;  00002447 1 01C0 ; R7 CSTP (REL) CSTP (REL) ;  00002448 1 01C0 ; ;  00┆
0x32e00…32e80 UnusedSector ┆002449 1 01C0 ; INPUTS: CIEST ;  00002450 1 01C0 ; OUTPUTS: CSTVF1 ;  00002451 1 01C0 ; ;  00002452 1 01C0 ; CALL BY: ED1510 ;  ┆
0x32e80…32f00 UnusedSector ┆00002453 1 01C0 ; CALL TO: - ;  00002454 1 01C0 ; ;  00002455 1 01C0 ; RETURNS: ;  00002456 1 01C0 ; LINK - DONE ;  00002457 1 0┆
0x32f00…32f80 UnusedSector ┆1C0 ;-----------------------------------------------------------------------;  00002458 1 01C0 ED1450: ; BEGIN UPDATE_VF1 ;  000┆
0x32f80…33000 UnusedSector ┆02459 1 01C0 MOV CIEST R3 ; ;  00002460 1 01C1 MOVC 1<CSTSCH+% ; ;  00002461 1 01C1 1<CSTTXO+1<CSTRXO R0 ; ;  00002462 1 01C3 AN┆
0x33000…33080 UnusedSector ┆D R3 R0 ; ;  00002463 1 01C4 IOR R0 CSTVF1.X7 ; MERGE(CST/VF1,SCH,TXO,RXO) ;  00002464 1 01C6 ADDC CSTVF1 R7 ; ;  00002465 1 01C┆
0x33080…33100 UnusedSector ┆7 IBN R0 CSTSCH ; IF CIEST(ISCH) THEN ;  00002466 1 01C8 MODC 1<CSTRCS+1<CSTSNS ; ;  00002467 1 01C9 PUT R3 X7 ; MERGE(CST/VF1,R┆
0x33100…33180 UnusedSector ┆CS,SNS) ;  00002468 1 01CA IBNP R3 CDIBML ; IF CIEST(IBML) THEN ;  00002469 1 01CB ; BEGIN ;  00002470 1 01CB SETS X7 CSTBML ; S┆
0x33180…33200 UnusedSector ┆ET(CST/VF1,BML) ;  00002471 1 01CC JMPI S4 EI19C0 ;E ERRORC(MBE) ;  00002472 1 01CD ADDC -CSTVF1 R7 ; END ;  00002473 1 01CE JMP┆
0x33200…33280 UnusedSector ┆ 0. X4 ; RETURN ;  00002474 1 01CF ; END ;  00002475 1 01CF ;  00002476 1 01CF ;------------------------------------------------┆
0x33280…33300 UnusedSector ┆-----------------------;  00002477 1 01CF ; PROCEDURE ED1460 ;  00002478 1 01CF ; UPDATE_BINSTA ;  00002479 1 01CF ; ;  00002480┆
0x33300…33380 UnusedSector ┆ 1 01CF ; REGISTERS ENTRY EXIT ;  00002481 1 01CF ; R0,R1 - DESTROYED ;  00002482 1 01CF ; R2 - BINSTA_FLAGS ;  00002483 1 01CF ┆
0x33380…33400 UnusedSector ┆; R4 LINK DESTROYED ;  00002484 1 01CF ; R5 - BUFP (ABS) ;  00002485 1 01CF ; R6 - CSTP (REL) ;  00002486 1 01CF ; R7 - DESTROYE┆
0x33400…33480 UnusedSector ┆D ;  00002487 1 01CF ; ;  00002488 1 01CF ; INPUTS: CSTHME,CIEST,CIBUF ;  00002489 1 01CF ; OUTPUTS: CSTHME,BINSTA ;  00002490 1┆
0x33480…33500 UnusedSector ┆ 01CF ; EDWORK: EDWRK0 ;  00002491 1 01CF ; ;  00002492 1 01CF ; CALL BY: ED1510 ;  00002493 1 01CF ; CALL TO: ED1470,PBUF ;  00┆
0x33500…33580 UnusedSector ┆002494 1 01CF ; ;  00002495 1 01CF ; RETURNS: ;  00002496 1 01CF ; LINK+0 - BUFFER EMPTY ;  00002497 1 01CF ; LINK+1 - BUFFER NO┆
0x33580…33600 UnusedSector ┆T EMPTY/HALTED MESSAGE/STUCK TAPE ;  00002498 1 01CF ;-----------------------------------------------------------------------;  ┆
0x33600…33680 UnusedSector ┆00002499 1 01CF ED1460: ; BEGIN UPDATE_BINSTA ;  00002500 1 01CF MOV R4 RL1460 ; ;  00002501 1 01D0 MOV CIBUF R5 ; BUFP:=BUF_ADD┆
0x33680…33700 UnusedSector ┆R ;  00002502 1 01D1 JMP S4 ED1470 ; CHECK HALTED MS ;  00002503 1 01D2 MOV CSTPTR R6 ; ;  00002504 1 01D3 MODC 1<BINHMS &; HALT┆
0x33700…33780 UnusedSector ┆ED MESSAGE (SET MODIFIER) ;  00002505 1 01D4 MOVC 0 R2 ; WORD:=0+MODIFIER ;  00002506 1 01D5 MOV R0 EDWRK0 ; ;  00002507 1 01D6 ┆
0x33780…33800 UnusedSector ┆MOV CIEST R3 ; ;  00002508 1 01D7 IBN R3 CDISTC ; IF TEST(IEST,STC) THEN ;  00002509 1 01D8 SETS R2 BINSTP ; SET(WORD,BINSTP) ; ┆
0x33800…33880 UnusedSector ┆ 00002510 1 01D9 MOV CIBUF R5 ; BUFP:=IBUF ;  00002511 1 01DA MOVC BINSTA R0 ; OFFS:=BINSTA ;  00002512 1 01DB MOVC BINIFM R1 ; ┆
0x33880…33900 UnusedSector ┆MASK:=BINIFM ;  00002513 1 01DD MON PBUF ; PUT_BUF(BUFP,OFFS,MASK,WORD) ;  00002514 1 01DE MOV EDWRK0 R0 ; ;  00002515 1 01DF MO┆
0x33900…33980 UnusedSector ┆V RL1460 R4 ; ;  00002516 1 01E0 AND R2 R1 ; ;  00002517 1 01E1 JON R1 ED1464 ; IF WORD<>0 THEN GOTO SET_ERROR ;  00002518 1 01E┆
0x33980…33a00 UnusedSector ┆2 IEQ R0 0 ; IF CHAR_COUNT=0 THEN ;  00002519 1 01E3 JMP 0. X4 ; RETURN(0) ;  00002520 1 01E4 ; ELSE ;  00002521 1 01E4 JMP 1. X┆
0x33a00…33a80 UnusedSector ┆4 ; RETURN(1) ;  00002522 1 01E5 ED1464: ; SET_ERROR: ;  00002523 1 01E5 MOVC CIEST R7 ; ;  00002524 1 01E6 SETS X7 CDITME ; SET┆
0x33a80…33b00 UnusedSector ┆(IEST,ITME) ;  00002525 1 01E7 JMP 1. X4 ; RETURN(1) ;  00002526 1 01E8 ; END ;  00002527 1 01E8 ;------------------------------┆
0x33b00…33b80 UnusedSector ┆-----------------------------------------;  00002528 1 01E8 ; PROCEDURE ED1470/ED1475. ;  00002529 1 01E8 ; ;  00002530 1 01E8 ;┆
0x33b80…33c00 UnusedSector ┆ CHECK HALTED MS/RESET HALTED MS TIMER. ;  00002531 1 01E8 ; REGISTERS: ENTRY EXIT ;  00002532 1 01E8 ; R0 - COUNT ;  00002533 1┆
0x33c00…33c80 UnusedSector ┆ 01E8 ; R1 - DEST ;  00002534 1 01E8 ; R2 - DEST ;  00002535 1 01E8 ; R3 - DEST ;  00002536 1 01E8 ; R4 LINK LINK ;  00002537 1 ┆
0x33c80…33d00 UnusedSector ┆01E8 ; R5 BUFP(ABS) BUFP(ABS) ;  00002538 1 01E8 ; R7 - DEST ;  00002539 1 01E8 ; ;  00002540 1 01E8 ; CALLS: NONE ;  00002541 1┆
0x33d00…33d80 UnusedSector ┆ 01E8 ; CALLED BY: ED1460/ED5100,ED5200,ED5300 ;  00002542 1 01E8 ; ;  00002543 1 01E8 ; RETURNS: ;  00002544 1 01E8 ; LINK: HAL┆
0x33d80…33e00 UnusedSector ┆TED MS/DONE ;  00002545 1 01E8 ; LINK+1:NOT HALTED MS/- ;  00002546 1 01E8 ;----------------------------------------------------┆
0x33e00…33e80 UnusedSector ┆-------------------;  00002547 1 01E8 ED1470: ; BEGIN CHECK HALTED MS. ;  00002548 1 01E8 MOV R4 RL1470 ; ;  00002549 1 01E9 MON┆
0x33e80…33f00 UnusedSector ┆ GBSM ; BMSA:=GET_PAGE(BUFP) ;  00002550 1 01EA MOV XBASE R1 ; ;  00002551 1 01EB SVS R2 ; MASK:=PSW ;  00002552 1 01EC LDS R3 ;┆
0x33f00…33f80 UnusedSector ┆ PSW:=BMSA ;  00002553 1 01ED MODN R1 ; ;  00002554 1 01EE MOV BINSTA.X5 R0 ; C:=BINSTA.BUFP ;  00002555 1 01EF LDS R2 ; PSW:=MA┆
0x33f80…34000 UnusedSector ┆SK ;  00002556 1 01F0 MOVC #FF00 R3 ; ;  00002557 1 01F2 XTR R0 BINCNX ; C:=C EXTRACT BINCNX ;  00002558 1 01F3 MOV RL1470 R4 ; ┆
0x34000…34080 UnusedSector ┆;  00002559 1 01F4 INE R0 0 ; IF C<>0 THEN ;  00002560 1 01F5 JMP 1. X4 ; RETURN TO LINK+1 ;  00002561 1 01F6 MODN XBASE ; ELSE ┆
0x34080…34100 UnusedSector ┆;  00002562 1 01F7 MOV ADCLK R3 ; BEGIN ;  00002563 1 01F8 MOV ECRPTR R7 ; ;  00002564 1 01F9 MOV ECICLK.X7 R1 ; CALCULATE TIME ┆
0x34100…34180 UnusedSector ┆ELAPSED ;  00002565 1 01FA SUB R1 R3 ; SINCE PREVIOUS DATA BUFFER. ;  00002566 1 01FB MOD ECFPTR ; ;  00002567 1 01FC MOV ECGHMT┆
0x34180…34200 UnusedSector ┆ R1 ; ;  00002568 1 01FD ILO R3 R1 ; IF TIME<HALTED MS THEN ;  00002569 1 01FE JMP 1. X4 ; RETURN TO LINK+1 ;  00002570 1 01FF ;┆
0x34200…34280 UnusedSector ┆ END ;  00002571 1 01FF ; ;  00002572 1 01FF ED1475: ; RESET HALTED MS TIMER. ;  00002573 1 01FF MODN XBASE ; ;  00002574 1 0200┆
0x34280…34300 UnusedSector ┆ MOV ADCLK R1 ; ;  00002575 1 0201 MOD ECRPTR ; ECICLK:=ADCLK ;  00002576 1 0202 MOV R1 ECICLK ; ;  00002577 1 0203 JMP 0. X4 ; ┆
0x34300…34380 UnusedSector ┆RETURN TO LINK ;  00002578 1 0204 ; END CHECK HALTED MS/RESET TIMER. ;  00002579 1 0204 ;---------------------------------------┆
0x34380…34400 UnusedSector ┆--------------------------------;  00002580 1 0204 ;  00002581 1 0204 ;---------------------------------------------------------┆
0x34400…34480 UnusedSector ┆--------------;  00002582 1 0204 ; PROCEDURE ED1510 ;  00002583 1 0204 ; PROCESS_IEST ;  00002584 1 0204 ; ;  00002585 1 0204 ; ┆
0x34480…34500 UnusedSector ┆REGISTERS ENTRY EXIT ;  00002586 1 0204 ; R0,R1,R2 - DESTROYED ;  00002587 1 0204 ; R3 - DESTROYED ;  00002588 1 0204 ; R4 LINK ┆
0x34500…34580 UnusedSector ┆DESTROYED ;  00002589 1 0204 ; R5 - DESTROYED ;  00002590 1 0204 ; R6 LCN DESTROYED ;  00002591 1 0204 ; R7 - DESTROYED ;  00002┆
0x34580…34600 UnusedSector ┆592 1 0204 ; ;  00002593 1 0204 ; INPUTS: CSTCS2,CIBUF,CIEST ;  00002594 1 0204 ; OUTPUTS: - ;  00002595 1 0204 ; ;  00002596 1 ┆
0x34600…34680 UnusedSector ┆0204 ; CALL BY: ED1550 ;  00002597 1 0204 ; CALL TO: ED1450,ED1460,RNBN,XMIBUF,ED1900,ED1200 ;  00002598 1 0204 ; ;  00002599 1 ┆
0x34680…34700 UnusedSector ┆0204 ; RETURNS: ;  00002600 1 0204 ; LINK+0 - NO_BUFFER_DISCONNECT ;  00002601 1 0204 ; LINK+1 - DISCONNECTED BUFFER RELEASED ; ┆
0x34700…34780 UnusedSector ┆ 00002602 1 0204 ; LINK+2 - DISCONNECTED_BUFFER_READY ;  00002603 1 0204 ;------------------------------------------------------┆
0x34780…34800 UnusedSector ┆-----------------;  00002604 1 0204 ED1510: ; BEGIN PROCESS_IEST ;  00002605 1 0204 MOV R4 RL1510 ; ;  00002606 1 0205 JMP S4 ED┆
0x34800…34880 UnusedSector ┆1200 ; GET_PTR(LCN) ;  00002607 1 0207 JMP ED1512 ; NO_ECR GOTO RELEASE BUFFER. ;  00002608 1 0208 MOV CSTCS2.X7 R0 ; ;  0000260┆
0x34880…34900 UnusedSector ┆9 1 0209 IBZ R0 CSTICO ; IF TEST(CST/CS2,ICO) THEN ;  00002610 1 020A JMP ED1512 ; BEGIN ;  00002611 1 020B JMP S4 ED1450 ; UPDA┆
0x34900…34980 UnusedSector ┆TE_VF1 ;  00002612 1 020C IBZ R3 CDIBDS ; IF TEST(IEST,-BDS) THEN ;  00002613 1 020D JMPI RL1510 ; RETURN(0) ;  00002614 1 020E ┆
0x34980…34a00 UnusedSector ┆MOV CIBUF R5 ; ;  00002615 1 020F MON XMIBUF ; EXCHANGE_MUX_INPUT_BUFFERS ;  00002616 1 0210 JMP ED1514 &; NO_BUF, GOTO BUF_LACK┆
0x34a00…34a80 UnusedSector ┆ ;  00002617 1 0211 JMP ED1516 &; SWITCH, GOTO SWITCH_ERROR ;  00002618 1 0212 JMP S4 ED1460 ; UPDATE_BINSTA ;  00002619 1 0213 ┆
0x34a80…34b00 UnusedSector ┆JMP ED1512 &; BUF_EMPTY, GOTO RELEASE ;  00002620 1 0214 MOV RL1510 R4 ; ;  00002621 1 0215 JMP 2. X4 ; RETURN(2) ;  00002622 1 ┆
0x34b00…34b80 UnusedSector ┆0216 ; END ;  00002623 1 0216 ; ELSE ;  00002624 1 0216 ED1512: ; BEGIN ;  00002625 1 0216 MOV CIEST R3 ; ;  00002626 1 0217 IBZ┆
0x34b80…34c00 UnusedSector ┆ R3 CDIBDS ; IF TEST(IEST,-BDS) THEN ;  00002627 1 0218 JMPI RL1510 ; RETURN(0) ;  00002628 1 0219 MOVC 1 R3 ; N:=1 ;  00002629 ┆
0x34c00…34c80 UnusedSector ┆1 021A MOV CIBUF R5 ; FBUF:=BUFP ;  00002630 1 021B MOV R5 R6 ; ;  00002631 1 021C MON RNBN ; RELEASE(N,FBUF) ;  00002632 1 021D┆
0x34c80…34d00 UnusedSector ┆ MOV RL1510 R4 ; ;  00002633 1 021E JMP 1. X4 ; RETURN(1) ;  00002634 1 021F ; END ;  00002635 1 021F ED1514: ; BUF_LACK: ;  000┆
0x34d00…34d80 UnusedSector ┆02636 1 021F MOV CSTPTR R6 ; ;  00002637 1 0220 MOVC 1<CSTLAC R0 ; ;  00002638 1 0221 IOR R0 CSTVF1.X6 ; SET(CST/VF1,LAC) ;  000┆
0x34d80…34e00 UnusedSector ┆02639 1 0223 JMP S4 ED1960 ;E ERROR6(NBF) ;  00002640 1 0224 JMPI RL1510 ; RETURN ;  00002641 1 0225 ED1516: ; SWITCH_ERROR: ;  ┆
0x34e00…34e80 UnusedSector ┆00002642 1 0225 JMP S4 ED1970 ;E ERROR7(NNE) ;  00002643 1 0226 JMPI RL1510 ; RETURN ;  00002644 1 0227 ; END ;  00002645 1 0227┆
0x34e80…34f00 UnusedSector ┆ ;  00002646 1 0227 ;-----------------------------------------------------------------------;  00002647 1 0227 ; PROCEDURE ED152┆
0x34f00…34f80 UnusedSector ┆0 ;  00002648 1 0227 ; PROCESS_OEST ;  00002649 1 0227 ; ;  00002650 1 0227 ; REGISTERS ENTRY EXIT ;  00002651 1 0227 ; R0 - DES┆
0x34f80…35000 UnusedSector ┆TROYED ;  00002652 1 0227 ; R3 - OEST ;  00002653 1 0227 ; R4 LINK DESTROYED ;  00002654 1 0227 ; ;  00002655 1 0227 ; INPUTS: C┆
0x35000…35080 UnusedSector ┆OEST ;  00002656 1 0227 ; OUTPUTS: - ;  00002657 1 0227 ; ;  00002658 1 0227 ; CALL BY: ED1560 ;  00002659 1 0227 ; CALL TO: ED1┆
0x35080…35100 UnusedSector ┆900 ;  00002660 1 0227 ; ;  00002661 1 0227 ; RETURNS: ;  00002662 1 0227 ; LINK+0 - EB_INCOMPLETE ;  00002663 1 0227 ; LINK+1 -┆
0x35100…35180 UnusedSector ┆ EB_COMPLETE ;  00002664 1 0227 ;-----------------------------------------------------------------------;  00002665 1 0227 ED152┆
0x35180…35200 UnusedSector ┆0: ; BEGIN PROCESS_OEST ;  00002666 1 0227 MOV R4 RL1520 ; ;  00002667 1 0228 MOV COEST R3 ; ;  00002668 1 0229 MOVC 1<CDOSER+1<┆
0x35200…35280 UnusedSector ┆CDOBML R0 ; ;  00002669 1 022B AND R3 R0 ; ;  00002670 1 022C JON R0 ED1522 ; IF TEST(OEST,SER,BML) THEN ;  00002671 1 022D ; GO┆
0x35280…35300 UnusedSector ┆TO SECURITY_ERROR ;  00002672 1 022D MOVC 1<CDOEDS R0 ; ;  00002673 1 022F AND R0 R3 ; ;  00002674 1 0230 INE R0 R3 ; IF TEST(OE┆
0x35300…35380 UnusedSector ┆ST,-(OOBE,OEBE)) THEN ;  00002675 1 0231 JMP ED1524 ; GOTO EBE_DISCONNECT_MISMATCH ;  00002676 1 0232 JMP 1. X4 ; RETURN(1) ;  0┆
0x35380…35400 UnusedSector ┆0002677 1 0233 ED1522: ; SECURITY_ERROR: ;  00002678 1 0233 MOV CSTPTR R7 ; ;  00002679 1 0234 MOVC 1<CSTMBE R0 ; ;  00002680 1 ┆
0x35400…35480 UnusedSector ┆0236 IOR R0 CSTVF1.X7 ; SET(CST/VF1,MBE) ;  00002681 1 0238 JMP S4 ED19C0 ;E ERRORC(MBE) ;  00002682 1 0239 ED1524: ; EBE_DISCON┆
0x35480…35500 UnusedSector ┆NECT_MISMATCH: ;  00002683 1 0239 JMP S4 ED19D0 ;E ERRORD(MBE) ;  00002684 1 023A JMPI RL1520 ; ;  00002685 1 023B ; END ;  0000┆
0x35500…35580 UnusedSector ┆2686 1 023B ;  00002687 1 023B ;-----------------------------------------------------------------------;  00002688 1 023B ; PROC┆
0x35580…35600 UnusedSector ┆EDURE ED1550 ;  00002689 1 023B ; PROCESS_MQI ;  00002690 1 023B ; ;  00002691 1 023B ; REGISTERS ENTRY EXIT ;  00002692 1 023B ┆
0x35600…35680 UnusedSector ┆; R0,R1,R2,R3 - DESTROYED ;  00002693 1 023B ; R4 LINK DESTROYED ;  00002694 1 023B ; R5,R6,R7 - DESTROYED ;  00002695 1 023B ; ┆
0x35680…35700 UnusedSector ┆;  00002696 1 023B ; INPUTS: CIFLG,CIBUF,CITAB,ECRPTA,ECCIQH ;  00002697 1 023B ; OUTPUTS: CITYPE,CIBID ;  00002698 1 023B ; ;  ┆
0x35700…35780 UnusedSector ┆00002699 1 023B ; CALL BY: MAIN_INT ;  00002700 1 023B ; CALL TO: ED1510,ED1980,LNIQ ;  00002701 1 023B ; ;  00002702 1 023B ; R┆
0x35780…35800 UnusedSector ┆ETURNS: ;  00002703 1 023B ; LINK+0 - EB INCOMPLETE ;  00002704 1 023B ; LINK+1 - EB COMPLETE ;  00002705 1 023B ;--------------┆
0x35800…35880 UnusedSector ┆---------------------------------------------------------;  00002706 1 023B ED1550: ; BEGIN PROCESS_MQI ;  00002707 1 023B MOV R┆
0x35880…35900 UnusedSector ┆4 RL1550 ; ;  00002708 1 023C MOV CIFLG R6 ; ;  00002709 1 023D SWP R6 ; ;  00002710 1 023E XTR R6 MQILAX ; LCN:=LAD.MQI ;  0000┆
0x35900…35980 UnusedSector ┆2711 1 023F JMP S4 ED1510 ; PROCESS_IEST ;  00002712 1 0240 JMPI RL1550 &; NO_BUF, RETURN(0) ;  00002713 1 0241 JMP ED1551 &; BU┆
0x35980…35a00 UnusedSector ┆F_RELEASED, SKIP_QUEUEING ;  00002714 1 0242 MOVC 1 R3 ; N:=1 ;  00002715 1 0243 MOD ECRPTA ; ;  00002716 1 0244 MOVC ECCIQH R4 ┆
0x35a00…35a80 UnusedSector ┆; QCB:=CIQH ;  00002717 1 0245 MOV CIBUF R5 ; FBUF:=BUF.MQI ;  00002718 1 0246 MOV R5 R6 ; LBUF:=BUF.MQI ;  00002719 1 0247 MON ┆
0x35a80…35b00 UnusedSector ┆LNIQ ; QUEUE(QCB,N,FBUF,LBUF) ;  00002720 1 0248 ED1551: ; ;  00002721 1 0248 MOV CIEST R0 ; ;  00002722 1 0249 IBN R0 CDITME ; ┆
0x35b00…35b80 UnusedSector ┆IF TEST(IEST,ITME) THEN ;  00002723 1 024A JMP ED1554 ; THEN GOTO TERMINATION_ERROR ;  00002724 1 024B IBZ R0 CDIBEB ; IF TEST(I┆
0x35b80…35c00 UnusedSector ┆EST,-BEB) THEN ;  00002725 1 024C JMPI RL1550 ; RETURN(0) ;  00002726 1 024D MOV CITAB R0 ; ;  00002727 1 024E MOV R0 R1 ; ;  00┆
0x35c00…35c80 UnusedSector ┆002728 1 024F SWP R0 ; ;  00002729 1 0250 XTR R0 8 ; ;  00002730 1 0251 XTR R1 8 ; ;  00002731 1 0252 MOV R0 CITYPE ; TYPE:=TYP.┆
0x35c80…35d00 UnusedSector ┆MQI ;  00002732 1 0253 MOV R1 CIBID ; BID:=BID.MQI ;  00002733 1 0254 MOV RL1550 R4 ; ;  00002734 1 0255 JMP 1. X4 ; RETURN(1) ;┆
0x35d00…35d80 UnusedSector ┆  00002735 1 0256 ED1554: ; TERMINATION_ERROR: ;  00002736 1 0256 JMPI S4 EI5700 ; PROCESS_TERMINATION_ERROR ;  00002737 1 0257 ┆
0x35d80…35e00 UnusedSector ┆JMPI RL1550 ; RETURN ;  00002738 1 0258 ; END ;  00002739 1 0258 ;  00002740 1 0258 ;-------------------------------------------┆
0x35e00…35e80 UnusedSector ┆----------------------------;  00002741 1 0258 ; PROCEDURE ED1560 ;  00002742 1 0258 ; PROCESS_MQO ;  00002743 1 0258 ; ;  00002┆
0x35e80…35f00 UnusedSector ┆744 1 0258 ; REGISTERS ENTRY EXIT ;  00002745 1 0258 ; R4 LINK DESTROYED ;  00002746 1 0258 ; R6 - ECRP (REL) ;  00002747 1 0258┆
0x35f00…35f80 UnusedSector ┆ ; ;  00002748 1 0258 ; INPUTS: COFLG,COBUF ;  00002749 1 0258 ; OUTPUTS: - ;  00002750 1 0258 ; ;  00002751 1 0258 ; CALL BY: M┆
0x35f80…36000 UnusedSector ┆AIN_INT ;  00002752 1 0258 ; CALL TO: ED1200,ED1520,ED1980 ;  00002753 1 0258 ; ;  00002754 1 0258 ; RETURNS: ;  00002755 1 0258┆
0x36000…36080 UnusedSector ┆ ; LINK+0 - NO_ECR ;  00002756 1 0258 ; LINK+1 - DONE ;  00002757 1 0258 ;------------------------------------------------------┆
0x36080…36100 UnusedSector ┆-----------------;  00002758 1 0258 ED1560: ; BEGIN PROCESS_MQO ;  00002759 1 0258 MOV R4 RL1560 ; ;  00002760 1 0259 MOV COFLG ┆
0x36100…36180 UnusedSector ┆R6 ; ;  00002761 1 025A SWP R6 ; ;  00002762 1 025B XTR R6 MQOLAX ; LCN:=LAD.MQO ;  00002763 1 025C JMP S4 ED1200 ; GET_PTR(LCN)┆
0x36180…36200 UnusedSector ┆ ;  00002764 1 025E JMP ED1562 ; NO_ECR, GOTO NO_ECR_ERROR ;  00002765 1 025F JMP S4 ED1520 ; PROCESS_OEST ;  00002766 1 0260 JM┆
0x36200…36280 UnusedSector ┆PI RL1560 &; EB_INCOMPLETE, RETURN(0) ;  00002767 1 0261 MOV RL1560 R4 ; ;  00002768 1 0262 JMP 1. X4 ; RETURN(1) ;  00002769 1 ┆
0x36280…36300 UnusedSector ┆0263 ED1562: ; NO_ECR_ERROR: ;  00002770 1 0263 JMP S4 ED1980 ;E ERROR8(NEC) ;  00002771 1 0264 JMPI RL1560 ; ;  00002772 1 0265┆
0x36300…36380 UnusedSector ┆ ; END ;  00002773 1 0265 ;  00002774 1 0265 ;-----------------------------------------------------------------------;  00002775┆
0x36380…36400 UnusedSector ┆ 1 0265 ; PROCEDURE ED1600 ;  00002776 1 0265 ; SCHEDULE_TX(QUEUE) ;  00002777 1 0265 ; ;  00002778 1 0265 ; REGISTERS ENTRY EXI┆
0x36400…36480 UnusedSector ┆T ;  00002779 1 0265 ; R0 - DESTROYED ;  00002780 1 0265 ; R4 LINK LINK ;  00002781 1 0265 ; R6 ECRP (REL) ECRP (REL) ;  0000278┆
0x36480…36500 UnusedSector ┆2 1 0265 ; ;  00002783 1 0265 ; ;  00002784 1 0265 ; ENTRIES: ;  00002785 1 0265 ; ENTRY0 - D QUEUE ;  00002786 1 0265 ; ENTRY1 ┆
0x36500…36580 UnusedSector ┆- ACK QUEUE ;  00002787 1 0265 ; ENTRY2 - NAK QUEUE ;  00002788 1 0265 ; ENTRY3 - ACKL QUEUE ;  00002789 1 0265 ; ENTRY4 - LCB Q┆
0x36580…36600 UnusedSector ┆UEUE ;  00002790 1 0265 ;-----------------------------------------------------------------------;  00002791 1 0265 ; BEGIN SCHED┆
0x36600…36680 UnusedSector ┆ULE_TX(QUEUE) ;  00002792 1 0265 ED1600: MODC 1<ECODTP-1<ECOAKP ; ;  00002793 1 0266 ED1601: MODC 1<ECOAKP-1<ECONKP ; MASK:=FUNC┆
0x36680…36700 UnusedSector ┆(ENTRY) ;  00002794 1 0267 ED1602: MODC 1<ECONKP-1<ECOALP ; ;  00002795 1 0268 ED1603: MODC 1<ECOALP-1<ECOLCP ; ;  00002796 1 02┆
0x36700…36780 UnusedSector ┆69 ED1604: MOVC 1<ECOLCP R0 ; ;  00002797 1 026A IOR R0 ECOQCW.X6 ; SET OQCW(MASK) ;  00002798 1 026C IBZ R0 ECODTP ; IF OQCW(OD┆
0x36780…36800 UnusedSector ┆TP) ;  00002799 1 026D IBN R0 ECOLCP ; .OR. OQCW(OLCP) THEN ;  00002800 1 026E MODC 1<ECOOEP ; SETS OFLG(OOEP) ;  00002801 1 026┆
0x36800…36880 UnusedSector ┆F MOVC 1<ECOEBP+1<ECOPCQ R0 ; ;  00002802 1 0271 IOR R0 ECOFLG.X6 ; SETS OFLG(OEBP,OPCQ) ;  00002803 1 0273 JMP 0. X4 ; RETURN ;┆
0x36880…36900 UnusedSector ┆  00002804 1 0274 ; END ;  00002805 1 0274 ;  00002806 1 0274 ;-----------------------------------------------------------------┆
0x36900…36980 UnusedSector ┆------;  00002807 1 0274 ; PROCEDURE ED1650. ;  00002808 1 0274 ; MQO_HANDLING. ;  00002809 1 0274 ; ;  00002810 1 0274 ; REGIST┆
0x36980…36a00 UnusedSector ┆ERS: ENTRY EXIT ;  00002811 1 0274 ; R0,R1,R2,R5,R7 - DESTROYED ;  00002812 1 0274 ; R3 EBR(MQO) DESTROYED ;  00002813 1 0274 ; ┆
0x36a00…36a80 UnusedSector ┆R4 LINK DESTROYED ;  00002814 1 0274 ; R6 ECRP (REL) DESTROYED ;  00002815 1 0274 ; ;  00002816 1 0274 ; CALL TO: ED71XX (MQO_SE┆
0x36a80…36b00 UnusedSector ┆RVICE). ;  00002817 1 0274 ; CALL BY: MAIN_INT.,ED1260. ;  00002818 1 0274 ; ;  00002819 1 0274 ; RETURNS: ;  00002820 1 0274 ; ┆
0x36b00…36b80 UnusedSector ┆LINK+0: DONE ;  00002821 1 0274 ;-----------------------------------------------------------------------;  00002822 1 0274 ED165┆
0x36b80…36c00 UnusedSector ┆0: ; BEGIN MQO_HANDLING. ;  00002823 1 0274 MOV R4 RL1650 ; ;  00002824 1 0275 IOZ ECOOSW.X6 ; ;  00002825 1 0276 MOVL ECOTQI0.X┆
0x36c00…36c80 UnusedSector ┆6 R01 ; (QID,EBP).TQI:=FUNC(OOSW) ;  00002826 1 0277 ION ECOOSW.X6 ; ;  00002827 1 0278 MOVL ECOTQI1.X6 R01 ; ;  00002828 1 0279┆
0x36c80…36d00 UnusedSector ┆ INV ECOOSW.X6 ; SHIFT OOSW ;  00002829 1 027B DEC ECOTEC.X6 ; OTEC:=OTEC-1 ;  00002830 1 027C MOVC 1<ECOPCQ R2 ; ;  00002831 1 ┆
0x36d00…36d80 UnusedSector ┆027E IOR R2 ECOFLG.X6 ; SETS OFLG(OPCQ) ;  00002832 1 0280 MOD R0 ; ;  00002833 1 0281 JMPI S4 ED0500 ; MQO_SERVICE(QID,EBP,EBR(┆
0x36d80…36e00 UnusedSector ┆MQO)) ;  00002834 1 0282 JMPI RL1650 ; RETURN ;  00002835 1 0283 ; END MQO_HANDLING. ;  00002836 1 0283 ;  00002837 1 0283 ;----┆
0x36e00…36e80 UnusedSector ┆-------------------------------------------------------------------;  00002838 1 0283 ; PROCEDURE ED1800 ;  00002839 1 0283 ; RE┆
0x36e80…36f00 UnusedSector ┆PORT ;  00002840 1 0283 ; ;  00002841 1 0283 ; REGISTERS ENTRY EXIT ;  00002842 1 0283 ; R0 EEC EEC (CODE EXTR) ;  00002843 1 02┆
0x36f00…36f80 UnusedSector ┆83 ; R1 - EEC ;  00002844 1 0283 ; R2 - EEM ;  00002845 1 0283 ; R4 LINK LINK ;  00002846 1 0283 ; R6 - DESTROYED ;  00002847 1 ┆
0x36f80…37000 UnusedSector ┆0283 ; R7 - CSTP (REL) ;  00002848 1 0283 ; ;  00002849 1 0283 ; INPUTS: CSTPTR,CSTVF4 ;  00002850 1 0283 ; OUTPUTS: CSTVF4 ;  0┆
0x37000…37080 UnusedSector ┆0002851 1 0283 ; ;  00002852 1 0283 ; CALL BY: MAIN,PROCEDURES ;  00002853 1 0283 ; CALL TO: ? ;  00002854 1 0283 ; ;  00002855 ┆
0x37080…37100 UnusedSector ┆1 0283 ; RETURNS: ;  00002856 1 0283 ; LINK+0 - DONE (URE) ;  00002857 1 0283 ; LINK+1 - DONE (RE) ;  00002858 1 0283 ;---------┆
0x37100…37180 UnusedSector ┆--------------------------------------------------------------;  00002859 1 0283 ED1800: ; BEGIN REPORT ;  00002860 1 0283 MOV C┆
0x37180…37200 UnusedSector ┆STPTR R7 ; CSTP:=CST_ADDR ;  00002861 1 0284 SLL R0 EECECX ; POSITION ERROR CODE ;  00002862 1 0285 IOR R0 CSTVF4.X7 ; VF4.CSTP:┆
0x37200…37280 UnusedSector ┆=VF4.CSTP OR MASK ;  00002863 1 0287 ; ;  00002864 1 0287 IBZ R0 EECURE ; IF EEC=RE THEN ;  00002865 1 0288 JMP 1. X4 ; RETURN(1┆
0x37280…37300 UnusedSector ┆) ;  00002866 1 0289 ; ELSE ;  00002867 1 0289 MOV ECRPTR R6 ; ;  00002868 1 028A ED1804: ; BEGIN ;  00002869 1 028A MOVC 1<ECOS┆
0x37300…37380 UnusedSector ┆CQ+1<ECOATO+% ; ;  00002870 1 028A 1<ECOALTO R0 ; ;  00002871 1 028C IOR R0 ECOFLG.X6 ; SETS OFLG(OSCQ,OATO,OALTO) ;  00002872 1┆
0x37380…37400 UnusedSector ┆ 028E JMP 0. X4 ; RETURN ;  00002873 1 028F ; END ;  00002874 1 028F ; END ;  00002875 1 028F ;  00002876 1 028F ;--------------┆
0x37400…37480 UnusedSector ┆---------------------------------------------------------;  00002877 1 028F ; PROCEDURE ED1900 ;  00002878 1 028F ; ERROR ;  000┆
0x37480…37500 UnusedSector ┆02879 1 028F ; ;  00002880 1 028F ; REGISTERS ENTRY EXIT ;  00002881 1 028F ; R0 - CODE ;  00002882 1 028F ; R4 LINK DESTROYED ;┆
0x37500…37580 UnusedSector ┆  00002883 1 028F ; R7 - DESTROYED ;  00002884 1 028F ; ;  00002885 1 028F ; INPUTS: - ;  00002886 1 028F ; OUTPUTS: XLICC,XLIRP┆
0x37580…37600 UnusedSector ┆ ;  00002887 1 028F ; ;  00002888 1 028F ; CALL BY: MAIN,PROCEDURES ;  00002889 1 028F ; CALL TO: ERR ;  00002890 1 028F ;------┆
0x37600…37680 UnusedSector ┆-----------------------------------------------------------------;  00002891 1 028F ; BEGIN ERROR ;  00002892 1 028F ED1900: MOD┆
0x37680…37700 UnusedSector ┆C GSTCPF - GSTCPE ; ERROR0 (GENERAL CP ERROR) ;  00002893 1 0290 ED1910: MODC GSTCPE - GSTLME ; ERROR1 (CREATE PROCESS): ;  0000┆
0x37700…37780 UnusedSector ┆2894 1 0291 ED1920: MODC GSTLME - GSTUXS ; ERROR2 (LETTER MECHANISM): ;  00002895 1 0292 ED1930: MODC GSTUXS - GSTLTE ; ERROR3 (┆
0x37780…37800 UnusedSector ┆UNEXPECTED SENDER): ;  00002896 1 0293 ED1940: MODC GSTLTE - GSTNLT ; ERROR4 (LETTER TYPE ERROR): ;  00002897 1 0294 ED1950: MOD┆
0x37800…37880 UnusedSector ┆C GSTNLT - GSTNBF ; ERROR5 (NO LETTER): ;  00002898 1 0295 ED1960: MODC GSTNBF - GSTNNE ; ERROR6 (NO BUFFER): ;  00002899 1 0296┆
0x37880…37900 UnusedSector ┆ ED1970: MODC GSTNNE - GSTNEC ; ERROR7 (NO NEXT BUFFER): ;  00002900 1 0297 ED1980: MODC GSTNEC - GSTCPF ; ERROR8 (NO ECR FOUND)┆
0x37900…37980 UnusedSector ┆: ;  00002901 1 0298 ED1990: MODC GSTCPF - GSTCRF ; ERROR9 (GENERAL CP FAULT): ;  00002902 1 0299 ED19A0: MODC GSTCRF - GSTFLE ;┆
0x37980…37a00 UnusedSector ┆ ERRORA (CDT RESERVATION FAULT): ;  00002903 1 029A ED19B0: MODC GSTFLE - GSTOSE ; ERRORB (FIFO LPN ERROR): ;  00002904 1 029B E┆
0x37a00…37a80 UnusedSector ┆D19C0: MODC GSTOSE - GSTMDE ; ERRORC (MUX OUTPUT SECURITY): ;  00002905 1 029C ED19D0: MODC GSTMDE - GSTEBM ; ERRORD (MUX BUF DI┆
0x37a80…37b00 UnusedSector ┆SC ERROR): ;  00002906 1 029D ED19E0: MODC GSTEBM - GSTUTQ ; ERRORE (EB-BIN MISMATCH): ;  00002907 1 029E ED19F0: MODC GSTUTQ - ┆
0x37b00…37b80 UnusedSector ┆GSTMOF ; ERRORF (UNDEFINED TX QUEUE): ;  00002908 1 029F ED19F1: MOVC GSTMOF R0 ; ERRORF1(MMQ OVERFLOW): ;  00002909 1 02A0 MOV ┆
0x37b80…37c00 UnusedSector ┆R0 XLICC ; XLICC:=CAUSE ;  00002910 1 02A1 MOV R4 XLIRP ; XLIRP:=RETURN ;  00002911 1 02A2 MON ERR ;E CALL ONLINE ERROR PROCESSI┆
0x37c00…37c80 UnusedSector ┆NG ;  00002912 1 02A3 JMP 0. X4 ; RETURN ;  00002913 1 02A4 ; END ;  00002914 1 02A4 ;------------------------------------------┆
0x37c80…37d00 UnusedSector ┆---------------------------- ;  00002915 1 02A4 ;FF  ;  00002916 1 02A4 ;-------------------------------------------------------┆
0x37d00…37d80 UnusedSector ┆----------------;  00002917 1 02A4 ; ;  00002918 1 02A4 ; INTERRUPT DRIVEN MAIN PROGRAM ;  00002919 1 02A4 ; ;  00002920 1 02A4 ┆
0x37d80…37e00 UnusedSector ┆;-----------------------------------------------------------------------;  00002921 1 02A4 ED2000: ; BEGIN INITIALISE_INT ;  000┆
0x37e00…37e80 UnusedSector ┆02922 1 02A4 JMP S4 ED1000 ; INITIALISE_INT ;  00002923 1 02A6 MOVC EDILPN R3 ; LPN:=EDI_ID ;  ) 1 02A7 MOV XBASE R4 ; BASE:=EDC┆
0x37e80…37f00 UnusedSector ┆_BASE(INTERRUPT PROCESS;  00002924 1 02A8 MON CRP ; CREATE_PROCESS(LPN,BASE) ;  00002925 1 02A9 JMP S4 ED1910 &;E PROCESS CREATE┆
0x37f00…37f80 UnusedSector ┆ , GOTO ERROR1 ;  00002926 1 02AA MON RCPU ; RESERVE_CPU_INTERRUPT ;  00002927 1 02AB MON RTI ; RETURN TO INITIATOR ;  00002928 ┆
0x37f80…38000 UnusedSector ┆1 02AC MOVC PBEXPR R0 ; ;  00002929 1 02AD MON INQ ; LINK PROCESS INTO EXPRESS QUEUE ;  00002930 1 02AE JMPI S4 EI1990 ;E ;  000┆
0x38000…38080 UnusedSector ┆02931 1 02AF ; END ;  00002932 1 02AF ;-----------------------------------------------------------------------;  00002933 1 02AF┆
0x38080…38100 UnusedSector ┆ ; ;  00002934 1 02AF ; START INTERRUPT_SERVICE. ;  00002935 1 02AF ; ;  00002936 1 02AF ;--------------------------------------┆
0x38100…38180 UnusedSector ┆---------------------------------;  00002937 1 02AF ; ;  00002938 1 02AF ED2050: ;UNTIL PROCESS_IDLE DO ;  00002939 1 02AF MOVC ┆
0x38180…38200 UnusedSector ┆PCIDLE R0 ; ;  00002940 1 02B0 MOV R0 INTSTA ; PROCESS INITIAL IDLE ;  00002941 1 02B1 ; ;  00002942 1 02B1 ;-------------------┆
0x38200…38280 UnusedSector ┆----------------------------------------------------;  00002943 1 02B1 ED2100: ; BEGIN MQI_SERVICE. ;  00002944 1 02B1 ;--------┆
0x38280…38300 UnusedSector ┆-------------------------- ;  00002945 1 02B1 ; REPEAT ;  00002946 1 02B1 JMP S4 ED1400 ; CALL READ_MQI ;  00002947 1 02B3 JMP E┆
0x38300…38380 UnusedSector ┆D2190 &; X0: GOTO END_MQI_SERVICE ;  00002948 1 02B4 JMP ED2100 &; X1: GOTO_REPEAT (NON-EDC MQI) ;  00002949 1 02B5 ; X2: ;  000┆
0x38380…38400 UnusedSector ┆02950 1 02B5 ; BEGIN ;  00002951 1 02B5 JMP S4 ED1550 ; PROCESS_MQI ;  00002952 1 02B6 JMP ED2100 &; X0: GOTO REPEAT (NON-EB) ; ┆
0x38400…38480 UnusedSector ┆ 00002953 1 02B7 ; X1: (EB COMPLETE) ;  00002954 1 02B7 ; BEGIN ;  00002955 1 02B7 MOV ECRPTR R6 ; ;  00002956 1 02B8 MOV ECCIQH┆
0x38480…38500 UnusedSector ┆.X6 R1 ; EBP:=CIQH.ECRP ;  00002957 1 02B9 MOV CIEST R3 ; EST:=IEST ;  00002958 1 02BA MOV CIBID R4 ; BID:=IBID ;  00002959 1 02┆
0x38500…38580 UnusedSector ┆BB MOV CITYPE R5 ; TYPE:=ITYPE ;  00002960 1 02BC MOV CSTPTR R6 ; ;  00002961 1 02BD MON EDITST ;TC (EDC_INPUT_TEST_CONTROL) ;  ┆
0x38580…38600 UnusedSector ┆00002962 1 02BE JMP ED2150 &; EB_DISCARD, GOTO RELEASE;  00002963 1 02BF MOV R3 CIEST ; IEST:=EST ;  00002964 1 02C0 MOV R4 CIBI┆
0x38600…38680 UnusedSector ┆D ; IBID:=BID ;  00002965 1 02C1 MOV R5 CITYPE ; ITYPE:=TYPE ;  00002966 1 02C2 MOV CSTCS7.X6 R0 ; ;  00002967 1 02C3 IBNP R0 CS┆
0x38680…38700 UnusedSector ┆TEMM ; IF TEST(CS7,EMM) THEN ;  00002968 1 02C4 MON EDCTMI ;TM EDC_MONITORING_INPUT ;  00002969 1 02C5 JMPI S4 EI1960 &;E ERROR6┆
0x38700…38780 UnusedSector ┆(NSC) ;  00002970 1 02C6 MOV CITYPE R0 ; TYPE:=TYP.MQI ;  00002971 1 02C7 IBN R0 BIT7 ; IF TYPE_PARITY_ERROR ;  00002972 1 02C8 ┆
0x38780…38800 UnusedSector ┆JMP ED2130 ; THEN GOTO PARITY_ERROR ;  00002973 1 02C9 ADDC -<:A:> R0 ; ;  00002974 1 02CA IHS R0 <:K:>-<:A:>+1 ; IF TYPE_UNDEFI┆
0x38800…38880 UnusedSector ┆NED_ERROR ;  00002975 1 02CB JMP ED2140 ; THEN GOTO RANGE_ERROR ;  00002976 1 02CC MOV ECRPTR R6 ; ;  00002977 1 02CD MOD R0 ; ;┆
0x38880…38900 UnusedSector ┆  00002978 1 02CE JMPI S4 ED0300 ; CASE TYPE OF ;  00002979 1 02CF ; (IC1-IC11) ;  00002980 1 02CF JMP S4 ED1210 ;I ENABLE_INTER┆
0x38900…38980 UnusedSector ┆RUPT ;  00002981 1 02D1 ; END CASE ;  00002982 1 02D1 JMP ED2100 ; GOTO REPEAT ;  00002983 1 02D2 ; ;  00002984 1 02D2 ED2130: ;┆
0x38980…38a00 UnusedSector ┆ TYPE_PARITY_ERROR: ;  00002985 1 02D2 MODC EEC030-EEC031 ; ;  00002986 1 02D3 ED2140: ; TYPE_RANGE_ERROR: ;  00002987 1 02D3 MO┆
0x38a00…38a80 UnusedSector ┆VC EEC031 R0 ; ;  00002988 1 02D4 JMP S4 ED1800 ;E REPORT(RE,ERROR) ;  00002989 1 02D5 NOP ; ;  00002990 1 02D6 ED2150: ; RELEAS┆
0x38a80…38b00 UnusedSector ┆E_EB: ;  00002991 1 02D6 MOVC 1000 R3 ; N:=1000 ;  00002992 1 02D8 MOD ECRPTA ; ;  00002993 1 02D9 MOVC ECCIQH R4 ; QCB:=CIQH ; ┆
0x38b00…38b80 UnusedSector ┆ 00002994 1 02DA MON LNOQ ; DEQUEUE(QCB,N,FBUF,LBUF);  00002995 1 02DB NOP ; ;  00002996 1 02DC MON RNBN ; RELEASE(N,FBUF) ;  00┆
0x38b80…38c00 UnusedSector ┆002997 1 02DD JMP ED2100 ; GOTO REPEAT ;  00002998 1 02DE ; END ;  00002999 1 02DE ; END ;  00003000 1 02DE ; UNTIL MQI_EMPTY ; ┆
0x38c00…38c80 UnusedSector ┆ 00003001 1 02DE ED2190: ; END MQI_SERVICE. ;  00003002 1 02DE ; ;  00003003 1 02DE ;-------------------------------------------┆
0x38c80…38d00 UnusedSector ┆----------------------------;  00003004 1 02DE ED2200: ; BEGIN MQO_SERVICE. ;  00003005 1 02DE ;--------------------------------┆
0x38d00…38d80 UnusedSector ┆-- ;  00003006 1 02DE ; REPEAT ;  00003007 1 02DE JMP S4 ED1410 ; CALL READ_MQO ;  00003008 1 02E0 JMP ED2290 &; X0: GOTO END_MQ┆
0x38d80…38e00 UnusedSector ┆O_SERVICE ;  00003009 1 02E1 JMP ED2200 &; X1: GOTO REPEAT (NON-EDC MQO) ;  00003010 1 02E2 ; X2: ;  00003011 1 02E2 ; BEGIN ;  ┆
0x38e00…38e80 UnusedSector ┆00003012 1 02E2 JMP S4 ED1560 ; PROCESS_MQO ;  00003013 1 02E3 JMP ED2200 &; X0: GOTO REPEAT (NON-EB) ;  00003014 1 02E4 ; X1: ;┆
0x38e80…38f00 UnusedSector ┆  00003015 1 02E4 ; BEGIN ;  00003016 1 02E4 MOV ECRPTR R6 ; ECRP:=ECR_ADDR ;  00003017 1 02E5 MOV COBUF R3 ; EBR(MQO):=COBUF ; ┆
0x38f00…38f80 UnusedSector ┆ 00003018 1 02E6 ; ;  00003019 1 02E6 JMP S4 ED1650 ; MQO_HANDLING(EBR(MQO)) ;  00003020 1 02E7 ; ;  00003021 1 02E7 JMP S4 ED12┆
0x38f80…39000 UnusedSector ┆10 ;I ENABLE_INTERRUPT. ;  00003022 1 02E9 JMP ED2200 ; ;  00003023 1 02EA ; END ;  00003024 1 02EA ; END ;  00003025 1 02EA ; U┆
0x39000…39080 UnusedSector ┆NTIL MQO_EMPTY ;  00003026 1 02EA ED2290: ; END MQO_SERVICE. ;  00003027 1 02EA ; ;  00003028 1 02EA ;--------------------------┆
0x39080…39100 UnusedSector ┆---------------------------------------------;  00003029 1 02EA ED2500: ; BEGIN PROCESS_REQUEST. ;  00003030 1 02EA ;-----------┆
0x39100…39180 UnusedSector ┆----------------------- ;  00003031 1 02EA MOV ECFPTR R5 ; ;  00003032 1 02EB MOV ECGUQH+QCFQE.X5 R6 ; ECRP:=FQE.GUQH.ECFP ;  00┆
0x39180…39200 UnusedSector ┆003033 1 02EC MOV ECGUQH+QCCQE.X5 R0 ; N:=CQE.GUQH.ECFP ;  00003034 1 02ED IEQ R0 0 ; ;  00003035 1 02EE JMP ED2590 ; ;  0000303┆
0x39200…39280 UnusedSector ┆6 1 02EF ED2502: ; REPEAT ;  00003037 1 02EF MOV R0 LOOPCT ; ;  00003038 1 02F0 SUB XBASE R6 ; ;  00003039 1 02F2 MOV ECOFLG.X6 ┆
0x39280…39300 UnusedSector ┆R0 ; ;  00003040 1 02F3 IBZ R0 ECOPCQ ; IF OFLG(OPCQ) THEN ;  00003041 1 02F4 JMP ED2504 ; BEGIN ;  00003042 1 02F5 MOVC NT(1<EC┆
0x39300…39380 UnusedSector ┆OPCQ) R0 ; ;  00003043 1 02F7 AND R0 ECOFLG.X6 ; CLEAR OFLG(OPCQ) ;  00003044 1 02F9 MOV ECCLCN.X6 R6 ; ;  00003045 1 02FA JMP S┆
0x39380…39400 UnusedSector ┆4 ED1200 ; GET_PTR(LCN) ;  00003046 1 02FC JMPI S4 EI1980 ; ERROR8(NEC) ;  00003047 1 02FD JMPI S4 EI7290 ; PROCESS_REQUEST. ;  ┆
0x39400…39480 UnusedSector ┆00003048 1 02FE JMP S4 ED1210 ;I ENABLE_INTERRUPT. ;  00003049 1 0300 JMP ED2500 ; ;  00003050 1 0301 ED2504: ; END ;  00003051 ┆
0x39480…39500 UnusedSector ┆1 0301 MOV ECCFLK.X6 R6 ; ECRP:=FLK.ECRP ;  00003052 1 0302 MOV LOOPCT R0 ; ;  00003053 1 0303 SOB R0 ED2502 ; N:=N-1 ;  0000305┆
0x39500…39580 UnusedSector ┆4 1 0304 ; WHILE PROCESSING REQUIRED. ;  00003055 1 0304 ED2590: ; END PROCESS_REQUEST. ;  00003056 1 0304 MOV INTSTA R0 ; ;  00┆
0x39580…39600 UnusedSector ┆003057 1 0305 INE R0 PCIDLE ; ;  00003058 1 0306 JMP ED2050 ;END UNTIL_PROCESS_IDLE. ;  00003059 1 0307 ;-----------------------┆
0x39600…39680 UnusedSector ┆------------------------------------------------;  00003060 1 0307 ; ;  00003061 1 0307 ; RESERVE CPU INTERRUPT ;  00003062 1 03┆
0x39680…39700 UnusedSector ┆07 ; ;  00003063 1 0307 ;-----------------------------------------------------------------------;  00003064 1 0307 ED2900: ; BEG┆
0x39700…39780 UnusedSector ┆IN RESERVE_CPU_INTERRUPT ;  00003065 1 0307 LDM 2#111 ; DISABLE_INTERRUPTS ;  00003066 1 0308 MON RCPU ; RESERVE_CPU_INTERRUPT ;┆
0x39780…39800 UnusedSector ┆  00003067 1 0309 MON RFI ; RETURN_FROM_INTERRUPT ;  00003068 1 030A JMPI S4 EI1990 ;E (INVALID PRCID) ;  00003069 1 030B JMP ED┆
0x39800…39880 UnusedSector ┆2050 ; GOTO INTERRUPT_SERVICE. ;  00003070 1 030C ; END ;  00003071 1 030C ;----------------------------------------------------┆
0x39880…39900 UnusedSector ┆-------------------;  00003072 1 030C ; ;  00003073 1 030C ; LOCAL INTERRUPT SERVICE. ;  00003074 1 030C ; ;  00003075 1 030C ;-┆
0x39900…39980 UnusedSector ┆----------------------------------------------------------------------;  00003076 1 030C ED2990: ; BEGIN LOCAL_INTERRUPT_SERVICE┆
0x39980…39a00 UnusedSector ┆(INT);  00003077 1 030C MOV XLIRP R4 ; ;  00003078 1 030D MON ERR &;E CALL ONLINE ERROR PROCESSING ;  00003079 1 030E ; END ;  0┆
0x39a00…39a80 UnusedSector ┆0003080 1 030E ;-----------------------------------------------------------------------;  00003081 1 030E ;FF  ;  00003082 1 030┆
0x39a80…39b00 UnusedSector ┆E ;-----------------------------------------------------------------------;  00003083 1 030E ; ;  00003084 1 030E ; LETTER DRIVE┆
0x39b00…39b80 UnusedSector ┆N MAIN PROGRAM ;  00003085 1 030E ; ;  00003086 1 030E ;-----------------------------------------------------------------------;┆
0x39b80…39c00 UnusedSector ┆  00003087 1 030E ED3000: ; BEGIN INITIALISE_LET ;  00003088 1 030E JMP S4 ED1100 ; INITIALISE_LET ;  00003089 1 0310 MOVC EDLLP┆
0x39c00…39c80 UnusedSector ┆N R3 ; LPN:=EDL_ID ;  00003090 1 0311 MOV XBASE R4 ; BASE:=EDC_BASE(LETTER PROCESS) ;  00003091 1 0312 MON CRP ; CREATE_PROCESS(┆
0x39c80…39d00 UnusedSector ┆LPN,BASE) ;  00003092 1 0313 JMP S4 ED1910 &;E CREATE PROCESS, GOTO ERROR1 ;  00003093 1 0314 MON RTI ; RETURN_FROM_'INTERRUPT' ┆
0x39d00…39d80 UnusedSector ┆;  00003094 1 0315 ; END ;  00003095 1 0315 ;-----------------------------------------------------------------------;  00003096 ┆
0x39d80…39e00 UnusedSector ┆1 0315 ; ;  00003097 1 0315 ; WAIT LETTER ;  00003098 1 0315 ; ;  00003099 1 0315 ;---------------------------------------------┆
0x39e00…39e80 UnusedSector ┆--------------------------;  00003100 1 0315 ED3100: ; BEGIN WAIT_FOR_LETTER ;  00003101 1 0315 MON WL ; WAIT_LETTER(LET) ;  000┆
0x39e80…39f00 UnusedSector ┆03102 1 0316 ; BEGIN ;  00003103 1 0316 MOV R5 LETPTA ; LETP:=LET ;  00003104 1 0317 MOV R7 LETPTR ; ;  00003105 1 0318 MOV LTRC┆
0x39f00…39f80 UnusedSector ┆V. X7 R0 ; SND:=RCV.LETP ;  00003106 1 0319 MOV LETPTR R7 ; ;  00003107 1 031A ; ;  00003108 1 031A IEQP R0 RTCLPN ; IF SND=RTC ┆
0x39f80…3a000 UnusedSector ┆THEN ;  00003109 1 031C JMP S4 ED3200 ; PROCESS_RTC_LETTER ;  00003110 1 031D JMP ED3110 ; ;  00003111 1 031E IEQP R0 CMILPN ; I┆
0x3a000…3a080 UnusedSector ┆F SND=CMI THEN ;  00003112 1 0320 JMP S4 ED3300 ; PROCESS_CMI_LETTER. ;  00003113 1 0321 JMP ED3110 ; ;  00003114 1 0322 IEQP R0┆
0x3a080…3a100 UnusedSector ┆ TQMLPN ; IF SND=TQM THEN ;  00003115 1 0324 JMPI S4 EI3500 ; PROCESS_TQM_LETTER. ;  00003116 1 0325 JMP ED3110 ; ;  00003117 1 ┆
0x3a100…3a180 UnusedSector ┆0326 IEQP R0 ODPLPN ; IF SND=ODP THEN ;  00003118 1 0328 JMPI S4 EI3600 ; PROCESS_ODP_LETTER. ;  00003119 1 0329 JMP ED3110 ; ; ┆
0x3a180…3a200 UnusedSector ┆ 00003120 1 032A ; IF SND=UNEXPECTED THEN ;  00003121 1 032A JMP S4 ED1930 ; ERROR3(UXS) ;  00003122 1 032B ; ;  00003123 1 032B┆
0x3a200…3a280 UnusedSector ┆ ED3110: ; RETURN FROM LETTER PROCESSED ;  00003124 1 032B JMP ED3100 ; GOTO WAIT_LETTER. ;  00003125 1 032C ; END ;  00003126 1┆
0x3a280…3a300 UnusedSector ┆ 032C ; END WAIT_FOR_LETTER. ;  00003127 1 032C ;  00003128 1 032C ;------------------------------------------------------------┆
0x3a300…3a380 UnusedSector ┆-----------;  00003129 1 032C ; PROCEDURE ED3200 ;  00003130 1 032C ; PROCESS_RTC_LETTER ;  00003131 1 032C ; ;  00003132 1 032C┆
0x3a380…3a400 UnusedSector ┆ ; REGISTERS ENTRY EXIT ;  00003133 1 032C ; R0,R1,R2,R3,R5,R6 - DESTROYED ;  00003134 1 032C ; R4 LINK DESTROYED ;  00003135 1 ┆
0x3a400…3a480 UnusedSector ┆032C ; R7 LETP (REL) DESTROYED ;  00003136 1 032C ; ;  00003137 1 032C ; INPUTS: ECFPTR,GSTPTR,ECGFLG,GSTTL1,GSTTL2,LETPTR,LTMS1┆
0x3a480…3a500 UnusedSector ┆ ;  00003138 1 032C ; OUTPUTS: ECFFLG,GSTTHR ;  00003139 1 032C ; ;  00003140 1 032C ; CALL BY: MAIN_LET ;  00003141 1 032C ; CA┆
0x3a500…3a580 UnusedSector ┆LL TO: ED4300,ED1920,ED1940,SLET ;  00003142 1 032C ;-----------------------------------------------------------------------;  0┆
0x3a580…3a600 UnusedSector ┆0003143 1 032C ED3200: ; BEGIN PROCESS_RTC_LETTER ;  00003144 1 032C MOV R4 RL3200 ; ;  00003145 1 032D MOV LTMS1. X7 R4 ; ;  00┆
0x3a600…3a680 UnusedSector ┆003146 1 032E INE R4 LTMST1 ; IF MSG_TYPE=LTMST1 THEN ;  00003147 1 032F JMP ED3208 ; BEGIN ;  00003148 1 0330 MON GSST ; N:=STA┆
0x3a680…3a700 UnusedSector ┆TUS(MS_POOL) ;  00003149 1 0331 MOV ECFPTR R4 ; ;  00003150 1 0332 MOV XGSTPR R5 ; ;  00003151 1 0333 MOV ECGFLG.X4 R1 ; ;  0000┆
0x3a700…3a780 UnusedSector ┆3152 1 0334 IBN R1 ECGTHR ; IF TEST(GFLG,-GTHR) THEN ;  00003153 1 0335 JMP ED3202 ; BEGIN ;  00003154 1 0336 MOD GSTTL1.X5 ; ; ┆
0x3a780…3a800 UnusedSector ┆ 00003154 1 0336************************************ A ************************************ INSTR 150 MOD  00003155 1 0337 SLT R┆
0x3a800…3a880 UnusedSector ┆0 0 ; IF N>LIMIT1.GSTP THEN ;  00003156 1 0338 JMP ED3204 ; GOTO RETURN LETTER ;  00003157 1 0339 ; ELSE ;  00003158 1 0339 ; BE┆
0x3a880…3a900 UnusedSector ┆GIN ;  00003159 1 0339 SETS R1 ECGTHR ; SETS GFLG(GTHR) ;  00003160 1 033A MOVC CCBCT2 R2 ; BCT:=BCT2 ;  00003161 1 033C MOVC TR┆
0x3a900…3a980 UnusedSector ┆UE R3 ; THR:=TRUE ;  00003162 1 033D JMP ED3203 ; END ;  00003163 1 033E ; END ;  00003164 1 033E ED3202: ; ELSE ;  00003165 1 0┆
0x3a980…3aa00 UnusedSector ┆33E ; BEGIN ;  00003166 1 033E MOD GSTTL2.X5 ; ;  00003166 1 033E************************************ A ************************┆
0x3aa00…3aa80 UnusedSector ┆************ INSTR 150 MOD  00003167 1 033F ILT R0 0 ; IF N<LIMIT2.GSTP THEN ;  00003168 1 0340 JMP ED3304 ; GOTO RETURN LETTER ┆
0x3aa80…3ab00 UnusedSector ┆;  00003169 1 0341 ; ELSE ;  00003170 1 0341 MOVC ECGTHR R2 ; BEGIN ;  00003171 1 0342 CLRS R1 R2 ; CLEAR GFLG(GTHR) ;  00003172┆
0x3ab00…3ab80 UnusedSector ┆ 1 0343 MOVC CCBCT1 R2 ; BCT:=BCT1 ;  00003173 1 0344 MOVC FALSE R3 ; THR:=FALSE ;  00003174 1 0345 ; END ;  00003175 1 0345 ED3┆
0x3ab80…3ac00 UnusedSector ┆203: ; END ;  00003176 1 0345 MOV R1 ECGFLG.X4 ; ;  00003177 1 0346 MOV R3 GSTTHR.X5 ; THR.GST:=THR ;  00003178 1 0348 MOD GSTPC┆
0x3ac00…3ac80 UnusedSector ┆F.X5 ; ;  00003179 1 0349 MODN XBASE ; ;  00003180 1 034A MOV R2 CCPBCT ; CCPBCT:=BCT ;  00003181 1 034B JMPI S4 EI4300 ; PROCES┆
0x3ac80…3ad00 UnusedSector ┆S_MP_ACK ;  00003182 1 034C ; END ;  00003183 1 034C ED3204: ; RETURN LETTER. ;  00003184 1 034C MOV LETPTA R5 ; ;  00003185 1 0┆
0x3ad00…3ad80 UnusedSector ┆34D MOVC EOCRTE R0 ; ;  00003186 1 034E MODN XBASE ; ;  00003187 1 034F MOV R0 LTMS4. X5 ; MS4.LETP:=ELAPSE_TIME ;  00003188 1 0┆
0x3ad80…3ae00 UnusedSector ┆350 MON SLET ; SEND_LETTER(LETP) ;  00003189 1 0351 JMP S4 ED1920 &;E ERROR2(LME) ;  00003190 1 0352 JMPI RL3200 ; RETURN ;  000┆
0x3ae00…3ae80 UnusedSector ┆03191 1 0353 ED3208: ; ELSE ;  00003192 1 0353 JMP S4 ED1940 ;E ERROR4(LTE) ;  00003193 1 0354 JMPI RL3200 ; RETURN ;  00003194 ┆
0x3ae80…3af00 UnusedSector ┆1 0355 ; END ;  00003195 1 0355 ;  00003196 1 0355 ;-----------------------------------------------------------------------;  00┆
0x3af00…3af80 UnusedSector ┆003197 1 0355 ; PROCESS_CMI_LETTER ;  00003198 1 0355 ; ;  00003199 1 0355 ; REGISTERS ENTRY EXIT ;  00003200 1 0355 ; R0,R1,R2,┆
0x3af80…3b000 UnusedSector ┆R3,R5,R6 - DESTROYED ;  00003201 1 0355 ; R4 LINK DESTROYED ;  00003202 1 0355 ; R7 LETP DESTROYED ;  00003203 1 0355 ; ;  00003┆
0x3b000…3b080 UnusedSector ┆204 1 0355 ; INPUTS: LET,SC,CST ;  00003205 1 0355 ; OUTPUTS: CST,CDT,ECF,ECR ;  00003206 1 0355 ; ;  00003207 1 0355 ; CALL BY:┆
0x3b080…3b100 UnusedSector ┆ MAIN_LET ;  00003208 1 0355 ; CALL TO: ED3310,ED3320,ED3330,ED3340,ED3350,ED3360,ED4300,ED1920,ED194;  00003209 1 0355 ; SLET ;┆
0x3b100…3b180 UnusedSector ┆  00003210 1 0355 ;-----------------------------------------------------------------------;  00003211 1 0355 ED3300: ; BEGIN PRO┆
0x3b180…3b200 UnusedSector ┆CESS_CMI_LETTER. ;  00003212 1 0355 MOV R4 RL3300 ; ;  00003213 1 0356 MOVL LTMS1. X7 R01 ; ;  00003214 1 0357 MOV R1 R5 ; ;  00┆
0x3b200…3b280 UnusedSector ┆003215 1 0358 INE R0 LTMST1 ; IF MSG_TYPE=LTMST1 THEN ;  00003216 1 0359 JMP ED3306 ; BEGIN ;  00003217 1 035A SUB XBASE R5 ; ; ┆
0x3b280…3b300 UnusedSector ┆ 00003218 1 035C MOVL OCSCTS.X5 R01 ; TYPE,SEQ:=SC_TYPE,SEQ ;  00003219 1 035D XTR R0 OCSCTX ; ;  00003220 1 035E MOV R0 CSCTYP ┆
0x3b300…3b380 UnusedSector ┆; ;  00003221 1 035F MOV R1 CSCPLA ; ;  00003222 1 0360 SWP R1 ; ;  00003223 1 0361 XTR R1 CSTLAX ; LCN:=LCN.SC ;  00003224 1 03┆
0x3b380…3b400 UnusedSector ┆62 MON GETCST ; GET_CST(LCN) ;  00003225 1 0363 JMPI S4 EI3430 &;V VIOLATION(ATV) ;  00003226 1 0364 MOV R4 CSTPTA ; ;  00003227┆
0x3b400…3b480 UnusedSector ┆ 1 0365 MOV R6 CSTPTR ; ;  00003228 1 0366 MOV CSCTYP R0 ; ;  00003229 1 0367 IEQP R0 OCS5 ; IF SC_TYPE=5 THEN ;  00003230 1 036┆
0x3b480…3b500 UnusedSector ┆8 JMP S4 ED3350 ; SETUP_CHANNEL ;  00003231 1 0369 JMP ED3303 ; ;  00003232 1 036A MOV CSTCS6.X6 R0 ; ;  00003233 1 036B MOVC 1<┆
0x3b500…3b580 UnusedSector ┆CSTTST+% ; ;  00003234 1 036B 1<CSTSYN+1<CSTEDC R3 ; ;  00003235 1 036D AND R0 R3 ; ;  T) 1 036E INE R3 1<CSTSYN+1<CSTEDC ; IF T┆
0x3b580…3b600 UnusedSector ┆EST(CST/CS6,-SYN,-EDC,TS;  00003236 1 0370 JMPI S4 EI3410 ;V VIOLATION(ATV) ;  00003237 1 0371 MOV R6 R7 ; ;  00003238 1 0372 JM┆
0x3b600…3b680 UnusedSector ┆P S4 ED1201 ; GET_ECR(CSTP) ;  00003239 1 0374 JMPI S4 EI3410 ;E VIOLATION(CPE) ;  00003240 1 0375 MOV CSCTYP R0 ; ;  00003241 1┆
0x3b680…3b700 UnusedSector ┆ 0376 INEP R0 OCS1 ; IF SC_TYPE=1 .OR. ;  00003242 1 0377 INE R0 OCS2 ; SC_TYPE=2 THEN ;  00003243 1 0378 JMP ED3301 ; BEGIN (OP┆
0x3b700…3b780 UnusedSector ┆EN_CHANNEL) ;  00003244 1 0379 JMP S4 ED3310 ; OPEN_INPUT ;  00003245 1 037A JMP S4 ED3320 ; OPEN_OUTPUT ;  00003246 1 037B JMP ┆
0x3b780…3b800 UnusedSector ┆ED3303 ; END ;  00003247 1 037C ED3301: ; ;  00003248 1 037C INEP R0 OCS3 ; IF SC_TYPE=3 .OR. ;  00003249 1 037D INE R0 OCS4 ; S┆
0x3b800…3b880 UnusedSector ┆C_TYPE=4 THEN ;  00003250 1 037E JMP ED3302 ; BEGIN (CLOSE_CHANNEL,I.E.);  00003251 1 037F JMP S4 ED3330 ; CLOSE_INPUT ;  000032┆
0x3b880…3b900 UnusedSector ┆52 1 0380 JMP S4 ED3340 ; CLOSE_OUTPUT ;  00003253 1 0381 JMPI S4 EI6420 ; DEACTIVATE(ACKTO) ;  00003254 1 0382 JMPI S4 EI6440 ;┆
0x3b900…3b980 UnusedSector ┆ DEACTIVATE(ACKLTO) ;  00003255 1 0383 JMP ED3303 ; END ;  00003256 1 0384 ED3302: ; ;  00003257 1 0384 IEQP R0 OCS12 ; IF SC_TY┆
0x3b980…3ba00 UnusedSector ┆PE=12 THEN ;  00003258 1 0386 JMP S4 ED3360 ; GENERATE_SETB ;  00003259 1 0387 JMP ED3303 ; ;  ; 1 0388 INE R0 OCS13 ; TEST FOR ┆
0x3ba00…3ba80 UnusedSector ┆START /STOP OF ;  ; 1 0389 IEQP R0 OCS14 ; NORMAL MONITORING ;  ; 1 038A JMP S4 ED3370 ; GO PROCESS NORMAL MONITORING ;  ; 1 038┆
0x3ba80…3bb00 UnusedSector ┆B JMPI ED3303 ; ;  ; 1 038C INE R0 OCS15 ; TEST FOR START/STOP OF ;  ; 1 038D IEQP R0 OCS16 ; EDC MONITORING ;  ; 1 038E JMP S4 ┆
0x3bb00…3bb80 UnusedSector ┆ED3380 ; GO PROCESS EDC MONITORING ;  ; 1 038F JMP ED3303 ; ;  00003260 1 0390 JMPI S4 EI3410 ; VIOLATION, INVALID_SC_TYPE ;  00┆
0x3bb80…3bc00 UnusedSector ┆003261 1 0391 ED3303: ; SET_COMPLETION_CODE. ;  ; 1 038B****** A ***************************************************************┆
0x3bc00…3bc80 UnusedSector ┆*** INSTR 150 JMPI  00003262 1 0391 MOVC 0 R0 ; COMMAND_COMPLETE ;  00003263 1 0392 ; ;  00003264 1 0392 ED3304: ; ENTRY FORM SC┆
0x3bc80…3bd00 UnusedSector ┆_ERROR_HANDLING ;  00003265 1 0392 ; PROCEDURE ED3400.(R0:=CMC) ;  00003266 1 0392 MOV LETPTA R5 ; ;  00003267 1 0393 MODN XBASE┆
0x3bd00…3bd80 UnusedSector ┆ ; ;  00003268 1 0394 MOV R0 LTMS4. X5 ; MS4.LETP:=CMC ;  00003269 1 0395 MON SLET ; SEND_LETTER(LETP) ;  00003270 1 0396 JMPI S┆
0x3bd80…3be00 UnusedSector ┆4 EI1920 &;E ERROR2(LME) ;  00003271 1 0397 JMPI RL3300 ; RETURN ;  00003272 1 0398 ; END ;  00003273 1 0398 ED3306: ; ;  000032┆
0x3be00…3be80 UnusedSector ┆74 1 0398 INE R0 LTMST2 ; IF MSG_TYPE=LTMST2 THEN ;  00003275 1 0399 JMP ED3308 ; BEGIN ;  00003276 1 039A MOV LETPTR R7 ; ;  00┆
0x3be80…3bf00 UnusedSector ┆003277 1 039B CLR LTMS4. X7 ; MS4.LET:=0 ;  00003278 1 039C JMPI S4 EI4300 ; PROCESS_MPACK ;  00003279 1 039D JMPI RL3300 ; END ┆
0x3bf00…3bf80 UnusedSector ┆;  00003280 1 039E ED3308: ; ELSE ;  00003281 1 039E JMP S4 ED1940 ;E ERROR4(LTE) ;  00003282 1 03A0 JMPI RL3300 ; RETURN ;  000┆
0x3bf80…3c000 UnusedSector ┆03283 1 03A1 ; END PROCESS_CMI_LETTER. ;  00003284 1 03A1 ;  00003285 1 03A1 ;--------------------------------------------------┆
0x3c000…3c080 UnusedSector ┆---------------------;  00003286 1 03A1 ; SUB-COMMAND_HANDLING_PROCEDURES. ;  00003287 1 03A1 ; ;  00003288 1 03A1 ; REGISTERS E┆
0x3c080…3c100 UnusedSector ┆NTRY EXIT ;  00003289 1 03A1 ; R0 SC_TYPE SC_TYPE ;  00003290 1 03A1 ; R1,R2,R3,R5,R6,R7 - DESTROYED ;  00003291 1 03A1 ; R4 LIN┆
0x3c100…3c180 UnusedSector ┆K DESTROYED ;  00003292 1 03A1 ; ;  00003293 1 03A1 ; INPUTS: CST,CDT ;  00003294 1 03A1 ; OUTPUTS: CST,CDT,CSTPTA,CSTPTR ;  000┆
0x3c180…3c200 UnusedSector ┆03295 1 03A1 ; ;  00003296 1 03A1 ; CALL BY: ED3210 ;  00003297 1 03A1 ; CALL TO: ED1240,ED1250,ED1260,ED1210,ED1650 ;  00003298┆
0x3c200…3c280 UnusedSector ┆ 1 03A1 ; ;  00003299 1 03A1 ; ENTRIES: ;  00003300 1 03A1 ; ED3310: OPEN_INPUT. ;  00003301 1 03A1 ; ED3320: OPEN_OUTPUT. ;  00┆
0x3c280…3c300 UnusedSector ┆003302 1 03A1 ; ED3330: CLOSE_INPUT. ;  00003303 1 03A1 ; ED3340: CLOSE_OUTPUT. ;  00003304 1 03A1 ; ED3350: SETUP_CHANNEL. ;  0┆
0x3c300…3c380 UnusedSector ┆0003305 1 03A1 ; ED3360: SETB_SC_HANDLING. ;  00003306 1 03A1 ; ED3370: START/STOP NORMAL MONITORING ;  00003307 1 03A1 ; ED3380┆
0x3c380…3c400 UnusedSector ┆: START/STOP EDC MONITORING ;  00003308 1 03A1 ; RETURNS: ;  00003309 1 03A1 ; LINK - DONE ;  00003310 1 03A1 ; VIOLATION ;  000┆
0x3c400…3c480 UnusedSector ┆03311 1 03A1 ;-----------------------------------------------------------------------;  00003312 1 03A1 ; ;  00003313 1 03A1 ED3┆
0x3c480…3c500 UnusedSector ┆310: ; BEGIN OPEN_INPUT ;  00003314 1 03A1 ;---------------------------------- ;  00003315 1 03A1 MOV R4 RL3310 ; ;  00003316 1 ┆
0x3c500…3c580 UnusedSector ┆03A2 MOV CSTPTR R6 ; ;  00003317 1 03A3 MOV CSTCS2.X6 R0 ; ;  00003318 1 03A4 MOVC 1<CSTCSU+1<CSTICO R3 ; ;  00003319 1 03A6 AND┆
0x3c580…3c600 UnusedSector ┆ R0 R3 ; ;  00003320 1 03A7 INE R3 1<CSTCSU ; IFNOT GSTCSI(CSU,-ICO) THEN ;  00003321 1 03A9 JMP 0. X4 ; DONE ;  00003322 1 03AA┆
0x3c600…3c680 UnusedSector ┆ MON OEICDT ; OPEN_EDC_INPUT_CDT ;  00003323 1 03AB JMP S4 ED3410 ;V VIOLATION(CPE) ;  00003324 1 03AC MOV R5 CDTPTR ; ;  000033┆
0x3c680…3c700 UnusedSector ┆25 1 03AD MOV CSTPTR R6 ; ;  00003326 1 03AE MON PIPCST ; PRESET_IDP_CST_PARAMETERS ;  00003327 1 03AF MOVC 1<CSTICO R0 ; ;  000┆
0x3c700…3c780 UnusedSector ┆03328 1 03B0 IOR R0 CSTCS2.X6 ; SET(CST/CS2,ICO) ;  00003329 1 03B2 MON BEQCST ; BAUDRATE_ENQUEUE_CST(CSTP) ;  00003330 1 03B3 J┆
0x3c780…3c800 UnusedSector ┆MPI RL3310 ; ;  00003331 1 03B4 ; END OPEN_INPUT ;  00003332 1 03B4 ;-----------------------------------------------------------┆
0x3c800…3c880 UnusedSector ┆------------;  00003333 1 03B4 ED3320: ; BEGIN OPEN_OUTPUT ;  00003334 1 03B4 ;---------------------------------- ;  00003335 1 ┆
0x3c880…3c900 UnusedSector ┆03B4 MOV R4 RL3310 ; ;  00003336 1 03B5 MOV CSTPTR R6 ; ;  00003337 1 03B6 MOV CSTCS2.X6 R0 ; ;  00003338 1 03B7 MOVC 1<CSTCSU+1┆
0x3c900…3c980 UnusedSector ┆<CSTOCO R3 ; ;  00003339 1 03B9 AND R0 R3 ; ;  00003340 1 03BA INE R3 1<CSTCSU ; IF NOT CSTCSI(CSU,-ICO) THEN ;  00003341 1 03BC┆
0x3c980…3ca00 UnusedSector ┆ JMP 0. X4 ; DONE ;  00003342 1 03BD MON OEOCDT ; OPEN_EDC_OUTPUT_CDT(CDTP) ;  00003343 1 03BE JMP S4 ED3410 &;V VIOLATION(CPE) ┆
0x3ca00…3ca80 UnusedSector ┆;  00003344 1 03BF MOV R5 CDTPTR ; ;  00003345 1 03C0 MOV CSTPTR R6 ; ;  00003346 1 03C1 MOVC 1<CSTOCO R0 ; ;  00003347 1 03C2 I┆
0x3ca80…3cb00 UnusedSector ┆OR R0 CSTCS2.X6 ; SET(CST/CS2,OCO) ;  00003348 1 03C4 MOV ECRPTR R6 ; ;  00003349 1 03C5 MOVC 1<ECOSCQ+1<ECOALTO+% ; ;  00003350┆
0x3cb00…3cb80 UnusedSector ┆ 1 03C5 1<ECOATO R0 ; ;  00003351 1 03C7 MOV R0 ECOFLG.X6 ; SETS OFLG(OSCQ,OALTO,ATO) ;  00003352 1 03C8 CPU ; TRIG MAIN_INT. ; ┆
0x3cb80…3cc00 UnusedSector ┆ 00003353 1 03C9 JMPI RL3310 ; RETURN ;  00003354 1 03CA ; END OPEN_OUTPUT. ;  00003355 1 03CA ;--------------------------------┆
0x3cc00…3cc80 UnusedSector ┆---------------------------------------;  00003356 1 03CA ED3330: ; BEGIN CLOSE_INPUT ;  00003357 1 03CA ;----------------------┆
0x3cc80…3cd00 UnusedSector ┆------------ ;  00003358 1 03CA MOV R4 RL3310 ; ;  00003359 1 03CB MOV CSTPTR R6 ; ;  00003360 1 03CC MOV CSTCS2.X6 R0 ; ;  0000┆
0x3cd00…3cd80 UnusedSector ┆3361 1 03CD IBZ R0 CSTICO ; IF TEST(CST/CS2,-ICO) THEN ;  00003362 1 03CE JMP 0. X4 ; DONE ;  00003363 1 03CF MOVC NT 1<CSTICO R┆
0x3cd80…3ce00 UnusedSector ┆0 ; ;  00003364 1 03D0 AND R0 CSTCS2.X6 ; CLR(CST/CS2,ICO) ;  00003365 1 03D2 MON CGICDT ; CLOSE_GENERAL_INPUT_CDT ;  00003366 1┆
0x3ce00…3ce80 UnusedSector ┆ 03D3 NOP ; ;  00003367 1 03D4 MOV R5 CDTPTR ; ;  00003368 1 03D5 MOV CSTPTR R6 ; ;  00003369 1 03D6 MON BDQCST ; BAUDRATE_DEQUE┆
0x3ce80…3cf00 UnusedSector ┆UE_CST ;  00003370 1 03D7 MOV ECRPTR R6 ; ;  00003371 1 03D8 JMP S4 ED1250 ; RELEASE_ECC_INPUT_DATA. ;  00003372 1 03DA ; ;  000┆
0x3cf00…3cf80 UnusedSector ┆03373 1 03DA JMPI S4 EI5600 ; RELEASE_ECI_DATA. ;  00003374 1 03DB ; ;  00003375 1 03DB JMPI RL3310 ; RETURN ;  00003376 1 03DC ┆
0x3cf80…3d000 UnusedSector ┆; END CLOSE_INPUT. ;  00003377 1 03DC ;-----------------------------------------------------------------------;  00003378 1 03DC┆
0x3d000…3d080 UnusedSector ┆ ED3340: ; BEGIN CLOSE_OUTPUT ;  00003379 1 03DC ;---------------------------------- ;  00003380 1 03DC MOV R4 RL3310 ; ;  00003┆
0x3d080…3d100 UnusedSector ┆381 1 03DD MOV CSTPTR R6 ; ;  00003382 1 03DE MOV CSTCS2.X6 R0 ; ;  00003383 1 03DF IBZ R0 CSTOCO ; IF TEST(CST/CS2,-OCO) THEN ;┆
0x3d100…3d180 UnusedSector ┆  00003384 1 03E0 JMP 0. X4 ; DONE ;  00003385 1 03E1 MOVC NT 1<CSTOCO R0 ; ;  00003386 1 03E2 AND R0 CSTCS2.X6 ; CLR(CST/CS2,OC┆
0x3d180…3d200 UnusedSector ┆O) ;  00003387 1 03E4 MOV R5 CDTPTR ; ;  00003388 1 03E5 MOV ECRPTR R6 ; ;  00003389 1 03E6 JMP S4 ED1260 ; RELEASE_OUTPUT_DATA.┆
0x3d200…3d280 UnusedSector ┆ ;  00003390 1 03E8 ; UNTIL CTD_CLOSED DO ;  00003391 1 03E8 ED3342: ; BEGIN ;  00003392 1 03E8 MOV CSTPTR R6 ; ;  00003393 1 03┆
0x3d280…3d300 UnusedSector ┆E9 MON CEOCDT ; CLOSE_GENERAL_OUTPUT_CDT. ;  00003394 1 03EA JMPI S4 EI19A0 ;E X0: RESERVATION ERROR. ;  00003395 1 03EB JMP ED3┆
0x3d300…3d380 UnusedSector ┆344 ; X1: EB RETREIVED FROM CDT ;  00003396 1 03EC ; AND CDT NOT CLOSED. ;  00003397 1 03EC ; GOTO SIM_MQO. ;  00003398 1 03EC ;┆
0x3d380…3d400 UnusedSector ┆ (R3:=EB_REF.) ;  00003399 1 03EC JMP ED3346 ; X2: CDT CLOSED,AWAIT_OUT- ;  00003400 1 03ED ; STANDING MQO'S. ;  00003401 1 03ED┆
0x3d400…3d480 UnusedSector ┆ ED3344: ; ;  00003402 1 03ED MOV ECRPTR R6 ; BEGIN SIM_MQO. ;  00003403 1 03EE MOV ECOTEC.X6 R0 ; IF OTEC=2 I.E.,TWO OUSTAN- ; ┆
0x3d480…3d500 UnusedSector ┆ 00003404 1 03EF ILT R0 2 ; DING MQO'S, THEN ;  00003405 1 03F0 JMP ED3345 ; ;  00003406 1 03F1 INV ECOISW.X6 ; SIM THE LAST MQO┆
0x3d500…3d580 UnusedSector ┆,I.E. ;  00003407 1 03F3 INV ECOOSW.X6 ; SWITCH OOSW/OISW ;  00003408 1 03F5 ED3345: ; ;  00003409 1 03F5 JMPI S4 EI1650 ; MQO_H┆
0x3d580…3d600 UnusedSector ┆ANDLING(EBR) ;  00003410 1 03F6 ; END ;  00003411 1 03F6 JMP ED3342 ; END UNTIL ;  00003412 1 03F7 ED3346: ; ;  00003413 1 03F7 ┆
0x3d600…3d680 UnusedSector ┆MON OEOCDT ; OPEN_EDC_OUTPUT_CDT ;  00003414 1 03F8 JMPI S4 EI19A0 ;E RESERVATION ERROR. ;  00003415 1 03F9 MON RODCST ; RELEASE┆
0x3d680…3d700 UnusedSector ┆_OUTPUT_DATA_CST. ;  00003416 1 03FA JMP S4 ED1251 ; RELEASE_ECC_OUTPUT_DATA. ;  00003417 1 03FC MOV ECRPTR R6 ; ;  00003418 1 0┆
0x3d700…3d780 UnusedSector ┆3FD ED3348: ; ;  00003419 1 03FD IOZ ECOTEC.X6 ; UNTIL ALL MQO'S HANDLED DO ;  00003420 1 03FE JMP ED3349 ; BEGIN ;  00003421 1 ┆
0x3d780…3d800 UnusedSector ┆03FF CPU ; TRIG INTERRUPT_DRIVEN_PROCES;  00003422 1 0400 JMP S4 ED1210 ; ENABLE INTERRUPT ;  00003423 1 0402 JMP ED3348 ; END ;┆
0x3d800…3d880 UnusedSector ┆  00003424 1 0403 ED3349: ; ;  00003425 1 0403 JMPI RL3310 ; RETURN ;  00003426 1 0404 ; END CLOSE_OUTPUT. ;  00003427 1 0404 ;-┆
0x3d880…3d900 UnusedSector ┆----------------------------------------------------------------------;  00003428 1 0404 ED3350: ; BEGIN SETUP_CHANNEL ;  000034┆
0x3d900…3d980 UnusedSector ┆29 1 0404 ;---------------------------------- ;  00003430 1 0404 MOV R4 RL3310 ; ;  00003431 1 0405 MOV CSTPTR R6 ; ;  00003432 ┆
0x3d980…3da00 UnusedSector ┆1 0406 MOV CSTCS2.X6 R0 ; ;  00003433 1 0407 MOVC 1<CSTICO+1<CSTOCO R3 ; ;  00003434 1 0408 AND R0 R3 ; ;  00003435 1 0409 INE R┆
0x3da00…3da80 UnusedSector ┆3 0 ; IF NOT CSTCSI(-ICO,-OCO) THEN ;  00003436 1 040A JMP S4 ED3430 ;V VIOLATION(ATV) ;  00003437 1 040B MOV CSCPLA R3 ; ;  000┆
0x3da80…3db00 UnusedSector ┆03438 1 040C XTR R3 CSTPAX ; PAD:=PAD.SC ;  00003439 1 040D ED3352: RIO R0 R3 ;* READIO(PAD) ;  00003440 1 040E MON PRGCST ; PRO┆
0x3db00…3db80 UnusedSector ┆GRAM_CST(CS1-CS6) ;  00003441 1 040F JMP S4 ED3430 &;A VIOLATION(ATV) ;  00003442 1 0410 MON CKPCST ; CHECK_CST_PROGRAM(CS1-CS6)┆
0x3db80…3dc00 UnusedSector ┆ ;  00003443 1 0411 JMP S4 ED3430 &;A VIOLATION(ATV) ;  00003444 1 0412 MON PGPCST ; PROGRAM_GENERAL_CST_PARAMETERS ;  00003445 ┆
0x3dc00…3dc80 UnusedSector 0x1a[128]
         […0x19…]