         << LINES .001/.009 ARE RESERVED FOR SYSTEMS INTEGRATION >>     00000001
   CPU'MASK        = %27600;                                   <<L2107>>00070000
                                                               <<D9350>>00072000
INTEGER PARMVAL = Q-4;                                         <<D9350>>00073000
ARRAY SDFRINITMSG(0:23):="SOFTDUMP RE-INITIALIZED!";           <<L1028>>00087000
ENTRY INIT,BACKUP,FREE;                                        <<D9350>>00090000
INTRINSIC PRINT,TERMINATE,QUIT;                                <<D9350>>00140000
                                                               <<D9350>>00200500
RETURN; << RETURN IF NO ENTRY POINT IS GIVEN. >>               <<D9350>>00201000
                                                               <<D9350>>00201500
INIT:  << INIT BOOT FOR SOFTDUMP >>                            <<D9350>>00202000
   IF PARMVAL <> 423 THEN                                      <<D9350>>00202500
      TERMINATE;                                               <<D9350>>00203000
   CHECKCPU;                                                   <<D9350>>00203500
   SDFINIT(0);                                                 <<D9350>>00204000
   PRINT(SDFRINITMSG,-24,0);                                   <<L1028>>00204200
   RETURN;                                                     <<D9350>>00204500
