1370 IF X>XMA THEN XMA=X