del_graphic
function del_graphic() while %t win=xget("window"); if win==0 then xdel(win); win=xget("window"); if win==0 then xdel(win); break end else break end end endfunction