         << LINES .001/.009 ARE RESERVED FOR SYSTEMS INTEGRATION >>     00000001
                    <<CHECK TO SEE IF PREVIOUS PROCESS  >>     <<S9528>>01930500
                    <<WAS A SYSTEM PROCESS.  IF IT IS   >>     <<S9528>>01931000
                    << THEN DIE.                        >>     <<S9528>>01931500
               IF MAPPINGFIRMWARE THEN                         <<S9528>>01932000
                 BEGIN                                         <<S9528>>01932500
                   TOS:=ARRQ((-ARRQ(-ARRQ)-ARRQ)-2);           <<S9528>>01933000
                   IF TOS.(1:1) =1 THEN GO DIE;                <<S9528>>01933500
                 END                                           <<S9528>>01934000
               ELSE                                            <<S9528>>01934500
       SYSDB         = %1000,                                  <<G9196>>03212000
   TOS := SYSDB D;                                             <<G9196>>03226000
   ASMB(XCHD);                                                 <<G9196>>03227000
   ASMB(XCHD; DDEL)                                            <<G9196>>03232000
       OVERTEMP     = 146,                                     <<O9144>>03466250
ASMB( PCN );                                                   <<O9144>>03535000
$EDIT VOID=03565000                                            <<O9144>>03535166
IF TOS = ICF'37 THEN                                           <<O9144>>03536666
   BEGIN                                                       <<O9144>>03538333
   MESSAGE := IF CONDITION = 0 THEN OVERTEMP                   <<O9144>>03540000
         ELSE 0;                                               <<O9144>>03545000
   END                                                         <<O9144>>03550000
ELSE                                                           <<O9144>>03555000
   BEGIN                                                       <<O9144>>03560000
   ASMB( PCN );                                                <<O9144>>03561666
   IF TOS <> ICF'55 THEN SUDDENDEATH(15); <<GHOST INTERRUPT>>  <<O9144>>03563333
   END;                                                        <<O9144>>03612000
$EDIT                                                          <<O9144>>03660000
