RESTART [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.
{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: RESTART)}}
====== RESTART ======
(GIN Macro)

**Defined in:** [[george:source:MACS_SPC|MACS SPC]]

**Used in:** [[george:source:ABANDONA867|ABANDONA867]], [[george:source:ACTPRI867|ACTPRI867]], [[george:source:ALASB867|ALASB867]], [[george:source:BACKMAP864|BACKMAP864]], [[george:source:CANTDO867|CANTDO867]], [[george:source:COMPCHAN84|COMPCHAN84]], [[george:source:INLOOP84|INLOOP84]], [[george:source:INRESTAR84|INRESTAR84]], [[george:source:IPCOND864|IPCOND864]], [[george:source:LISTINIT867|LISTINIT867]], [[george:source:LISTINTC865|LISTINTC865]], [[george:source:LOAD60|LOAD60]], [[george:source:MESSAG|MESSAG]], [[george:source:MESSAI|MESSAI]], [[george:source:MESSF|MESSF]], [[george:source:MONFIL865|MONFIL865]], [[george:source:MONITOR36|MONITOR36]], [[george:source:MONJRNAL850|MONJRNAL850]], [[george:source:MOPOUT85|MOPOUT85]], [[george:source:OLMTE85|OLMTE85]], [[george:source:PERION867|PERION867]], [[george:source:READBULK867|READBULK867]], [[george:source:READLINE8|READLINE8]], [[george:source:RESTART84|RESTART84]], [[george:source:WSJOBS867|WSJOBS867]], [[george:source:WSPERIS867|WSPERIS867]]

<code - RESTART.mac.txt>
 HRSB    #MAC  RESTART  [C.E.WILKINSON :PERFORMS RESTARTS ON SLOW PERIPHERALS
 HS#2          LDX   2  FX2                 [SET X2  
 HSRL          LDX   0  CPRW1(2)            [LOAD REPLY WORD 
 HT?=          SLL   0  3
 HTQW          BNG   0  MR1                 [J IF B3 SET (FAIL)  
 HW=G          SLL   0  2
 HWQ6          BPZ   0  MR2                 [J IF B5 NOT SET 
 HX9Q    MR3   ENGPER   %A,,%B   
 HXPB          BRN      %C                  [DO PERI AGAIN   
 HY92    MR1   SLL   0  2                   [IF B3+B5 SET LAST TRANS FAILED  
 HYNL          BNG   0  MR4                 [AND DISENGAGED SO MISS DIS  
 H^8=          DISENGPER 
 H^MW    MR4 
 J27G          ENGPER   %A,,%B,1            [ERROR RESTART MESSAGE   
 J2M6          BRN      %C   
 J36Q    MR2 
 J3LB    #NOR
</code>