Re: May the numbers speak - supplement

OK, let's move that simple optimization
process a little bit further; what if we
do the same even to these two variable calls
at the very beginning, that are outside the loop?
VARIABLE C6  ok
VARIABLE C1  ok
: TIMESTRSCAN2
  1 [ C6 ] LITERAL !   1 [ C1 ] LITERAL !
  >R >R 0 0 R> R>
  OVER + 1-
  DO
    I C@ DUP 58 =
    IF
      DROP
      [ C6 ] LITERAL @ 60 * [ C6 ] LITERAL !
      1 [ C1 ] LITERAL !
    ELSE
      48 - [ C1 ] LITERAL @ * [ C6 ] LITERAL @ M* D+
      10 [ C1 ] LITERAL !
    THEN
  -1 +LOOP
;  ok
: TLOOP4 TICKS PAD 8 30000 0 DO 2DUP TIMESTRSCAN2 2DROP LOOP
2DROP TICKS 2SWAP D- D. ;  ok
S" 12:34:56" PAD SWAP CMOVE  ok
TLOOP4 9  ok
That's enough for today. :)
--