settime atomclock
I am trying to use the "Settime.rexx" script that came with your
program, AtomClock V.1.2a. I get an "error 26 in line 32; missing or
unexpected END settime.rexx failed (return code 10)". Here is the
script, would you check it out and tell what may be wrong? The 32nd
line is the last line.
/* settime.rexx */
/* If you have AREXX and WShell you can insert this in your */
/* startup sequence. Will run AtomClock just once a month and */ /* set
the hardware clock */
paramstr = 'z/EDT n/*70,1-202-653-0351 c10' /* set command line arguments
for AtomClock */
'DATE >RAM:LastSet.dat'
NewMonth = GetMonth('RAM:LastSet.dat');
IF EXISTS('S:LastSet.dat') THEN
OldMonth = GetMonth('S:LastSet.dat')
ELSE
OldMonth = 'Nul' /* arbitrary – to make unequal */
'DELETE RAM:LastSet.dat'
IF OldMonth ~= NewMonth THEN
DO
'AtomClock' paramstr
IF rc = 0 THEN
DO
'COPY RAM:LastSet.dat S:'
/* change this for your hardware clock if necessary */
'SETCLOCK SAVE'
END
EXIT
GetMonth:
arg filename
CALL OPEN('datefile',filename,'R');
datestr = READLN('datefile');
CALL CLOSE('datefile')
PARSE VAR datestr WeekDay DD '-' Mon '-' YR Time
RETURN Mon
RJ……….on AutoPilot