while (reset=1) do
reset:=1;
end_while;