1330 WHILE KS=1