Its been a long, long time since I've done anything with the code for my translator's editor, Jiumoluo. It's all wrapped up in a starkit and it has various elements dating back to 1998 contained within it! Indeed, the GUI itself was originally built with VisualTcl. Originally I liked this program as it mean that I could get Tcl/Tk up and running quickly, the only downside is that the Tcl scripts generated are almost impossible to read. What I wanted to do was to recyle some of the custom dictionaries that I built. A generic reader has been scripted and load modules now built. Somehow, I think that the eventual Gnocl version of Jiumoluo will be a substantially slimmer piece of code that my Tk original.
Given this module some attention today. Added some of the more package wide options to the module and created customised handler for setting the month. (For some odd reason months are are counted 0-11 whereas days are 1-31.) There's still a little more to do to this one including the addition of code to store diary details. Here's the working test script to show the range of options at work. The percentage substitution string item %e explores something that I've been toying with, the name of the signal/event that initiated the call. Ok, a script can keep its own internal trace but who knows, it might prove useful. #--------------- # calendarTest.tcl #--------------- # Author: William J Giddings # Date: 07/05/09 #--------------- #!/bin/sh # the next line restarts using tclsh \ exec tclsh "$0" "$@" #--------------- package require Gnocl set cal [gnocl::calendar] $cal configure -day 8 -month 7 -year 1956 $cal configure -rowHeight 1 -colWidth 1 $ca
Comments