*BEGIN IODMAC6
          SPACE  4,10
**        LNO - LOAD NEXT OVERLAY
*
*         ENTRY (A) = OVERLAY NUMBER
*               (DH-DH+2) = RMA POINTER TO OVERLAY DIRECTORY

 LNOX     LJM    **
 LNO      EQU    *-1
          STML   LNO20       SAVE OVERLAY NUMBER
          LOADC  DH          LOAD REGISTERS WITH DIRECTORY RMA
          ADML   LNO20       OFFSET INTO DIRECTORY
          CRDL   T1          READ DIRECTORY WORD FOR THE OVERLAY
          LDDL   T3          OVERLAY NUMBER
          SBML   LNO20       COMPARE WITH EXPECTED NUMBER
          NJN    *           IF WRONG OVERLAY NUMBER
          LDDL   T1
          STML   LNO10       STARTING ADDRESS TO STORE OVERLAY
          LDDL   T4          OFFSET FROM DIRECTORY TO OVERLAY
          ADML   DH+2
          ADC    400001B     ALLOW FOR HEADER
          CRML   **,T2       INPUT OVERLAY FROM CENTRAL MEMORY
 LNO10    EQU    *-1
          UJK    LNOX
 LNO20    BSS    1
*END IODMAC6
