=PR6    #MAC  JENG  
 =Q=Q     MODD LDX   0  JK52E,%A,CPPTR(2)
 =QQB          ANDN  0  1
 =R=2          BNZ   0  %B   
 =RPL    #NOR