*8WB    #MAC  JLUNBUSY  
 *9B2          DLCA     %A,LDX,0,CREP
 *9TL          BPZ   0  %B   
 *=*=    #NOR