2550 IF IKP=1 THEN XA$=".EST"