1785 WHILE KZ=0