http://tcl.activestate.com/man/tcl8.4/TkCmd/cursors.htm
How would one script things to dynamically provide the user with the range of cursors available on their platform?
How would one go about defining a new cursor via Tk scripting?
Tk syntax help - Arts and crafts of Tcl-Tk programming