a) Improve it in what way(s)? What is it supposed to do?
b) You will probably find a bigger audience at the Wolfram Community site, http://community.wolfram.com/
The Mathematica for Students Support Forum is officially closed. I am a little surprised you got through.