2210 WHILE KS=1