Discordian date: Difference between revisions
Content deleted Content added
→{{header|PHP}}: Marked as incorrect. |
No edit summary |
||
Line 1,129: | Line 1,129: | ||
look at [http://www.cs.cmu.edu/~tilt/principia/body.html#applecorps calendar]; |
look at [http://www.cs.cmu.edu/~tilt/principia/body.html#applecorps calendar]; |
||
lern about [http://jubal.westnet.com/hyperdiscordia/discordian_holydays.html holydays] |
lern about [http://jubal.westnet.com/hyperdiscordia/discordian_holydays.html holydays] |
||
=={{header|JotaCode}}== |
|||
<lang jotacode>@print( |
|||
"Today is ", |
|||
@let(1,@add(@switch(@time("mon"), |
|||
0,-1, |
|||
1,30, |
|||
2,58, |
|||
3,89, |
|||
4,119, |
|||
5,150, |
|||
6,180, |
|||
7,211, |
|||
8,242, |
|||
9,272, |
|||
10,303, |
|||
11,333) |
|||
,@time("mday")),@switch(@print(@time("mon"),"/",@time("mday")), |
|||
"1/29","St. Tib's Day", |
|||
@print(@switch(@mod("%1",5), |
|||
0,"Sweetmorn", |
|||
1,"Boomtime", |
|||
2,"Pungenday", |
|||
3,"Prickle-Prickle", |
|||
4,"Setting Orange"), |
|||
", ", |
|||
@switch(@idiv("%1",73), |
|||
0,"Chaos", |
|||
1,"Discord", |
|||
2,"Confusion", |
|||
3,"Bureaucracy", |
|||
4,"The Aftermath"), |
|||
" ", |
|||
@add(@mod("%1",73),1), |
|||
", YOLD ", |
|||
@add(@time("year"),3066)) |
|||
)),".")</lang> |
|||
=={{header|Mathematica}}== |
=={{header|Mathematica}}== |