4MY2    #MAC  IPBNULL   
 4NCL          LDN   0  #601 
 4NX=          ANDS  0  A1+IDSTATUS(%A)  
 4PBW          SMO      A1+BPTR(%A)  
 4PWG          STOZ     BPTR 
 4QB6          STOZ     A1+BPTR(%A)  
 4QTQ    #NOR