Subj : Remote - Local Time synchro
To   : Jasen Betts
From : Gerald Miller
Date : Wed Jul 17 2002 09:28 pm

Hello Jasen,

    On Tuesday July 16 2002 at 06:32,
    Jasen Betts [3:640/531.42] wrote to Gerald Miller,
    about:  Remote - Local Time synchro

[snip]

 GM>> :  9:31:17  RTime: 14 Jul 02,  9:31:02 (-0600)
 GM>> :  9:31:17  LTime: 14 Jul 02,  9:31:16 (-0600)

 GM>> The (-0600) is a factor for my timezone being six hours behind
 GM>> GMT.....

 GM>> Before the timezone factor came into being, the following would
 GM>> work:

 GM>> Would you think that the use of

 GM>> set ret=%@strip[(-0600)[%@time[%@word[-0,%@execstr[FFIND
 GM>> /k/m/r/%= t"RTime" C:\Fd\FD.LOG]]]]] set
 GM>> lot=%@strip[(-0600)[%@time[%@word[-0,%@execstr[FFIND /k/m/r/%=
 GM>> t"LTime" C:\Fd\FD.LOG]]]]]

 GM>> would make the BTM process the log file without the GMT factor?

 JB> no. strip works on indicidual characters not to whole substrings
 JB> (words)

 JB> eg:  echo %#strip[dont,work]
 JB>      wrk

I guess there is no sense to continue banging my head against the
wall trying variations with %@strip......  I can say you were
correct, but I had to try. <grin>

 JB> The fix is easy though, don't ue strip at all, jyst change the number
 JB> -0 in %@word[ to 5  which means  the sixth word on the line)

In my case, I had to change the 5 to a 6 and it works.  :-))

Now, I get the following screen:

                 Remote Time is: [61205] 17:00:05
                  LOCAL Time is: [61230] 17:00:30
   The Remote site is SLOWER by:         00:00:25
 Action is:  - (subtraction) of:         00:00:25 from current LOCAL time...
Do you wish to make an adjustment?

Now, I have to decide how the adjustments are to be made and if I
should let an "X" number of seconds #_slide_by_# before any
notification of adjustments.....  ???  Suggestions ???

=== Cut Begin: C:\Fd\FD.LOG ===
~ 17:00:30  SysOp:
~ 17:00:30  Using: BT 2.60XE/Gamma-6 Watcom/i386-Overlay
: 17:00:30  RTime: 17 Jul 02, 17:00:05 (-0600)
: 17:00:30  LTime: 17 Jul 02, 17:00:30 (-0600)
~ 17:00:30   Site: Edmonton, Alberta, Canada
=== Cut End:   C:\Fd\FD.LOG ===

=== Cut Begin: TESTIME.BTM ===
set ret=%@time[%@word[6,%@execstr[FFIND /k/m/r/t"RTime" C:\Fd\FD.LOG]]]
set lot=%@time[%@word[6,%@execstr[FFIND /k/m/r/t"LTime" C:\Fd\FD.LOG]]]
set remote=%@maketime[%ret]
set local=%@maketime[%lot]
echo                  Remote Time is: [%ret] %remote
echo                   LOCAL Time is: [%lot] %local
  iff "%ret"=="%lot" then %+ quit
  elseiff "%ret" GT "%lot" then %+
    set act= + (addition)
    set localadd=%@maketime[%@eval[%ret - %lot]]
echo    The Remote site is FASTER by:         %localadd
  set amount= %localadd
  elseiff "%ret" LT "%lot" then %+
    set act= - (subtraction)
    set localsub=%@maketime[%@eval[%lot - %ret]]
echo    The Remote site is SLOWER by:         %localsub
  set amount= %localsub
  endiff
echo  Action is: %act of:        %amount from current LOCAL time...
        set reply=n
inkey /k"ynq[Enter]" /w60    Do you wish to make an adjustment?  %%reply
  switch %reply

      ......

:end
endlocal
quit
=== Cut End:   TESTIME.BTM ===


           Thanks ... Gerald

--- GoldED+/386 v1.1.5-20617
 # Origin: Any program will expand to fill all available memory. (1:342/512)
 * Origin: Baddog BBS (1:218/903)

.