1595 WHILE KS=1