2180 WHILE KS=1