->  DW> Back in the 1970s, the US kept Daylight Saving Time year-round for 
->  DW> a  year or two. A large increase in morning accidents occurred, so 
->  DW> the  change was abandoned. This latest experiment is a compromise. 
->  DW> We'll  see...  
 
-> How soon we forget.  I really don't remember that. 
  
Around 1975, +/- a year or so. Canada did *not* follow suit, with the 
result that time-zone boundaries appeared along the border, where they 
don't normally exist. For example, Toronto, using EST, was an hour 
behind Buffalo, NY, which was on EDT. People here in Toronto who 
watched TV programs from Buffalo stations had to get used to the hour's 
difference in time. 
  
->  DW> I wrote a few lines of BASIC, a few months ago, to calculate the 
->  DW> dates  of the time-changes according to this new rule. If anyone's 
->  DW> interested,  here it is.  
 
-> I'm interested.  Thanks for the program, David. 
  
You're welcome! 
  
Maybe some people would like to see the earlier version of the program, 
which calculates the first Sunday in April and the last Sunday in 
October, which were, until last year, the dates when the clocks 
changed. In other parts of the world, maybe, this rule still applies, 
and it may apply here again if this experiment is deemed a failure. 
Note that the program says it applies to North America, which was true 
when it was written, but is *not* true now. Note also that it's a bit 
longer than the new one. That's because, in any year, March and 
November start on the same day of the week, which simplifies the 
calculation according to the new rule. April and October start on 
different days, so the old calculation was a bit more difficult. 
  
                        dow 
  
------------------------------------------------------- 
  
' DSTDATE.BAS 
' Calculates start and end dates of Daylight Saving Time 
' David Williams, 2002 
' david.williams{at}ablelink.org 
  
DEFINT A-Z 
CLS 
INPUT "Year"; Y 
Q = (Y + Y \ 4 - Y \ 100 + Y \ 400) MOD 7 
F = 1 + (8 - Q) MOD 7 
B = 25 + (11 - Q) MOD 7 
PRINT "In most of North America, in the year"; STR$(Y); 
PRINT ", clocks are set ahead on" 
PRINT "April"; STR$(F); ", and back on October";
STR$(B); "." 
PRINT "Both dates are Sundays." 
END 
  
------------------------------------------------------------ 
--- Platinum Xpress/Win/WINServer v3.0pr5