?

Log in

No account? Create an account

« previous entry | next entry »
Tue, Jun. 14th, 2011 | 05:52 pm  slavezombie


mixing it up with calendars, Rebol and Vanilla Space
slavezombie

The main template has a line which calls up the Rebol file calendar.r I changed this occurrance to call up a revised file called calendaral.r You can see that I changed a number from a block of script which composes a calendar block of 31 days. The number I changed is "1", after repeated tries to get the first row of the table of the monthly calendar to start the week off on a Sunday, the only number I was able to result in this was zero (0). I also discovered that removing the text "- 1" altogether, as opposed to changing the digit from 1 to 0 also accomplished my objective.

In the calendar above, the first occurance of the year sequence 2 6 5 2 7 4 2 6 3 1 5 3 is the year 2100 would fall on if the millennium year was not an issue with leap year. Instead, the 28-year cycle takes over from this sequence:

2 6 6 3 1 5 3 7 4 2 6 4    [year 2100]
1 5 5 2 7 4 2 6 3 1 5 3    [year 2101]<-------------
7 4 4 1 6 3 1 5 2 7 4 2    [year 2102]             |
6 3 3 7 5 2 7 4 1 6 3 1    [year 2103]             |
5 2 1 5 3 7 5 2 6 4 1 6    [LEAP YEAR]
<--------   |
3 7 7 4 2 6 4 1 5 3 7 5    [year 2105]          |  |
2 6 6 3 1 5 3 7 4 2 6 4    [year 2106]          |  |
1 5 5 2 7 4 2 6 3 1 5 3    [year 2107]          |  |
7 4 3 7 5 2 7 4 1 6 3 1
    [LEAP YEAR]          |  |
5 2 2 6 4 1 6 3 7 5 2 7    [year 2109]          |  |\\
4 1 1 5 3 7 5 2 6 4 1 6    [year 2110]          |  | \\
3 7 7 4 2 6 4 1 5 3 7 5    [year 2111]          |  |  \\
2 6 5 2 7 4 2 6 3 1 5 3
    [LEAP YEAR]          |  |   \\
7 4 4 1 6 3 1 5 2 7 4 2    [year 2113]          |  |    \\
6 3 3 7 5 2 7 4 1 6 3 1    [year 2114]          |  |     \\
5 2 2 6 4 1 6 3 7 5 2 7    [year 2115]          |  | (28yr sequence)
4 1 7 4 2 6 4 1 5 3 7 5
    [LEAP YEAR]          |  |     /
2 6 6 3 1 5 3 7 4 2 6 4    [year 2117]          |  |    /
1 5 5 2 7 4 2 6 3 1 5 3    [year 2118]          |  |   /
7 4 4 1 6 3 1 5 2 7 4 2    [year 2119]          |  |  /
6 3 2 6 4 1 6 3 7 5 2 7
    [LEAP YEAR]          |  | /
4 1 1 5 3 7 5 2 6 4 1 6    [year 2121]          |  |/
3 7 7 4 2 6 4 1 5 3 7 5    [year 2122]          |  |
2 6 6 3 1 5 3 7 4 2 6 4    [year 2123]          |  |
1 5 4 1 6 3 1 5 2 7 4 2
    [LEAP YEAR]          |  |
6 3 3 7 5 2 7 4 1 6 3 1    [year 2125]          |  |
5 2 2 6 4 1 6 3 7 5 2 7    [year 2126]          |  |
4 1 1 5 3 7 5 2 6 4 1 6    [year 2127]          |  |
3 7 6 3 1 5 3 7 4 2 6 4
    [LEAP YEAR]          |  |
1 5 5 2 7 4 2 6 3 1 5 3    [year 2129]»---------|---
7 4 4 1 6 3 1 5 2 7 4 2    [year 2130]          |
6 3 3 7 5 2 7 4 1 6 3 1    [year 2131]          |
5 2 1 5 3 7 5 2 6 4 1 6
     Break in sequence! ---

Remember, if a millennium year
is a multiple of 400, then
chances are good that it will be
a leap year (February contains
29 days); hence, if a millennium
year is not a multiple of 400,
February will have 28 days and
that year will not (should not)
be a "leap year".
Tags:


LinkCommentFile under memories

Comments {0}