WIDTH=RunThrough["tput cols", ""];
HEIGHT=RunThrough["tput lines", ""];