Erstellt : Montag dem 18.05.98                         Erhalten am 19.05.98
von      : *John Hentsch@1:218/907* an *Claus Mueller*
Hallo John,
CM>> Some extra bytes to spare?
CM>> change the above like below:
CM>> :setGTZ, fourth version by (TM)
CM>>  set Daytm=%@doy[4-%@eval[8-%@dowi[4-7-%_year]]-4-%_year].02
CM>>  set Stdtm=%@doy[10-%@eval[32-%@dowi[10-31-%_year]]-%_year].02
CM>>  set toDay=%@doy[%_date].%@right[2,0%_hour]
CM>>  set GTZ=UTC+%@if[%toDay ge %Daytm .and. %toDay lt %Stdtm,7,8]
CM>>  unset toDay Daytm Stdtm
CM>>  return
JH> Wholly cow, your two guys are making this routine tiny! Very good.
Yes, but you should be aware that it ain't that much readable any more. As my 
 
computer teacher back in 1980 always said: "Efficiency and good servicing  
don't go together".
That counts for 4dos as well.
- mfg *Claus* -
 ... Make no little plans. They have no magic to stir men's blood. - 
--- Dominus wrote this!
(2:2433/1204.32)
---------------