Calendar: Difference between revisions

Line 1,409:
gosub [getMonthInfo]
x = 0
if (mm - 1) mod 4 = 0 then html "</tr><tr>" ' 4 months across
html "<td valign=top><TABLE BORDER=1 CELLPADDING=0 CELLSPACING=0><TR>"
html "<TD colspan=7 align=center bgcolor=wheat>"
Line 1,422 ⟶ 1,421:
html "</TR></table></td>"
 
if (mm - 1) mod 4 = 0 then html "</tr><tr>" ' 4 months across
next mm
html "</table>"
Line 1,445:
mmDays = n1 - n ' Days in Month
RETURN</lang>
<pre>Input any valid year</pre>
<table border="0" cellpadding="0"
cellspacing="5">
Anonymous user