Day of the week: Difference between revisions
Content added Content deleted
| Line 738: | Line 738: | ||
WD(12,25,YR->RES%) |
WD(12,25,YR->RES%) |
||
IF RES%=1 THEN ! day 1 is Sunday...... |
IF RES%=1 THEN ! day 1 is Sunday...... |
||
PRINT(" |
PRINT("Dec";25;",";YR) |
||
END IF |
END IF |
||
END FOR |
END FOR |
||