1880 WHILE KS=1