Version 11 of Arlie L. Codina

Updated 2006-08-16 01:01:37

* July 18, 2006

I'm a tcl/tk newbie. I'm still trying to learn the tcl way of programming which is kind of different to what I'm used to.

I'm now working on a function/procedure that would convert NUMBERS TO WORDS. I'll put the link here as soon as it is done.


CAU - Have you seen these : Bag of number/time spellers ?

Arlie - It looks similar to what I'm planning to work on.


* August 16, 2006 Arlie - I tried my hands on Gadgets and found it very interesting but I was not successfull in running the shorter version of Larry Smith

 proc gadget { unused type methods } {
  set typeproc {
    set typeproc {
      upvar @var self
      @type self $method $args
    }
    upvar $var self
    if { "$method" == "" } {
      return $self
    }
    switch $method {
      @methods
    }
    regsub @var $typeproc $var typeproc
    proc $var { { method "" } args } $typeproc
  }
  regsub @type $typeproc $type typeproc
  regsub @methods $typeproc $methods typeproc
  proc $type { var method args } $typeproc
 }