implementing the Mayan Calender

[vierdewereld]

Perhaps somebody has the time to dig into the mayan calender and is able to create the code for translating the Gregorian calender into the 260 days Mayan Calender. Which is 10,000th of a day more exact than the standard calender we use today.

Calculating the 12 months 365 days into 18 months of 20 days with 5 days in the 19th month (aka the 13 moon 28-day wavespell calendar 364+1).

And to make it even more easy, not to forget the +1 day every year that needs to be added (Day out of Time).

The Sacred Round of 260 days is composed of two smaller cycles: the numbers 1 through 13, coupled with 20 different day names. Each of the day names is represented by a god who carries time across the sky, thus marking the passage of night and day.

The year 2012 is getting close so hopefully somebody can help me figure out the code/script as it becomes more important.

Hope you will enjoy these links:

Calculators

Maya calculator and for the code

java applet converter

Time Surfer, for Mac users

Calender Tools

13Moon index

Gregorian Calculator

Tutorials

introduction

13 moon calender tutorial

overview

Calender info

Basic info

beginners page 1 (pdf)

beginners page 2 (pdf)

Codex

Calendric count

The Calender

Mathematics

Mathematical system

Why 260 days

Research info

Maya Info

Maya Civilization

Main Maya

Numbering system

Mayan Mystery

Spiritual Studies

2012

Galactic Alignment

Tick-Tock

the world will not end

The prophecy

The End Days Guide

Breakthrough Celebration

2012 Dimensional Shift

The Alchemy of time

[Inky Phil]

'Fraid I will have to pass on this one.....I always struggle with dates.

Phil :wink2:

[comment]

Lotsa links, not much information...

According to this,

"The authorities disagree on what 13.0.0.0.0 corresponds to in our calendar."

I have picked one the three possible matches, which seems to agree with the Fourmilab calculator

Let ( [

serialDay = GetAsNumber ( Date ) + 1137142 ;

// LONG COUNT

baktunN = Div ( serialDay ; 144000 ) ;

baktun = Mod ( baktunN - 1 ; 13 ) + 1 ;

baktunR = Mod ( serialDay ; 144000 ) ;

katun = Div ( baktunR ; 7200 ) ;

katunR = Mod ( baktunR ; 7200 ) ;

tun = Div ( katunR ; 360 ) ;

tunR = Mod ( katunR ; 360 ) ;

uinal = Div ( tunR ; 20 ) ;

kin = Mod ( tunR ; 20 ) ;

// TZOLKIN

weekNumber = Mod ( serialDay + 3 ; 13 ) + 1 ;

dayName = Choose ( kin ; "Ahau" ; "Imix" ; "Ik" ; "Akbal" ; "Kan" ; "Chicchan" ; "Cimi" ; "Manik" ; "Lamat" ; "Muluc" ; "Oc" ; "Chuen" ; "Eb" ; "Ben" ; "Ix" ; "Men" ; "Cib" ; "Caban" ; "Etznab" ; "Caunac" ) ;

// HAAB

dayOfYear = Mod ( serialDay - 17; 365 ) ;

month = Div ( dayOfYear ; 20 ) ;

day = Mod ( dayOfYear ; 20 ) ;

monthName = Choose ( month ; "Pop" ; "Uo" ; "Zip" ; "Zotz" ; "Tzec" ; "Xul" ; "Yaxkin" ; "Mol" ; "Chen" ; "Yax" ; "Zac" ; "Ceh" ; "Mac" ; "Kankin" ; "Muan" ; "Pax" ; "Kayab" ; "Cumku" ; "Uayeb" )

] ;

"Long Count: " & baktun & "." & katun & "." & tun & "." & uinal & "." & kin & ¶ &

"Tzolkin: " & weekNumber & " " & dayName & ¶ &

"Haab: " & day & " " & monthName

)

[vierdewereld]

Seems to be working like a charm!

Thanks for your Comment!

[vierdewereld]

I created a Wavespell birthday calculator.

If it interests you, go and have a look.

Mayan Birthday Calculator