documented drawBox.R and provided example script