Mayan calendar: Difference between revisions

Content deleted Content added
Line 313: Line 313:
!
!
haab_carry = " "
haab_carry = " "
keptdays = julday(day,month,year)
L = mod((keptdays+65),365)
L = mod((keptdays+65),365)
mo = (L/20)+1
mo = (L/20)+1
Line 325: Line 324:
! Ok, Now let's calculate the Tzolk´in
! Ok, Now let's calculate the Tzolk´in
! The calendar starts on the 4 Ahu
! The calendar starts on the 4 Ahu
keptdays = julday(day,month,year)
tzolkin_carry = " " ! Total blank the carrier
tzolkin_carry = " " ! Total blank the carrier
mo = mod((keptdays+16),20) + 1
mo = mod((keptdays+16),20) + 1