a Japanese shodou program for X based on Tcl/Tk