1380 IF XPAR1 OR X>50 THEN GOSUB 900 : RETURN