Accueil > > > LA LUNE ET LES LUNAISONS
LA LUNE ET LES LUNAISONS
Information sur la source
Description
Voici un petit code rigolo qui donne la phase de la Lune du jour actuel grâce au calcul :-p Pas très très précis mais suffisammant (à 1 ou 2 jours près). ^^Voilà^^
Source
- Pour les commentaires, voir le zip.
-
- <html>
- <body bgcolor="#000000" background="stars.gif">
- <script type="text/javascript">
-
- var bleu = "bleu.gif";
- var blanc = "blanc.gif";
- var taille = 100;
- var aujourdhui = new Date();
-
- var pleinelune = new Date(2005,1,25,10,32,0,0);
-
- var lunaison = 29*(24*3600*1000)+12*(3600*1000)+44*(60*1000);
-
- var phasemaint = (aujourdhui.getTime()-pleinelune.getTime())%lunaison;
-
- var pourbrut = (phasemaint/lunaison);
- var pourpar2 = Math.round(200*pourbrut);
-
- if(pourbrut >= 0.5){
- gauche = bleu;
- droite = blanc;
- }
- else{
- gauche = blanc;
- droite = bleu;
- }
-
- var temps = Math.round((lunaison-phasemaint)/(24*3600*1000));
- document.write("<br><br><br><br><center>");
-
- if(pourpar2 > 100){
- pourpar2 = pourpar2-100;
- }
-
- for(i = -(taille-1); i < taille; ++i){
- var largeur = 2*parseFloat(Math.sqrt((taille*taille)-(i*i)));
-
- if(pourpar2 != 100)
- document.write("<img src="+gauche+" height=1 width="+(largeur*((100-pourpar2)/100))+">");
-
- if(pourpar2 != 0)
- document.write("<img src="+droite+" height=1 width="+(largeur*((pourpar2)/100))+">");
-
- document.write("<br>");
- }
-
- document.write("<br><font size=3 color='orange'>Prochaine pleine lune dans ",temps," jours");
- document.write("</font>");
-
- </script>
- </body>
- </html>
-
Pour les commentaires, voir le zip.
<html>
<body bgcolor="#000000" background="stars.gif">
<script type="text/javascript">
var bleu = "bleu.gif";
var blanc = "blanc.gif";
var taille = 100;
var aujourdhui = new Date();
var pleinelune = new Date(2005,1,25,10,32,0,0);
var lunaison = 29*(24*3600*1000)+12*(3600*1000)+44*(60*1000);
var phasemaint = (aujourdhui.getTime()-pleinelune.getTime())%lunaison;
var pourbrut = (phasemaint/lunaison);
var pourpar2 = Math.round(200*pourbrut);
if(pourbrut >= 0.5){
gauche = bleu;
droite = blanc;
}
else{
gauche = blanc;
droite = bleu;
}
var temps = Math.round((lunaison-phasemaint)/(24*3600*1000));
document.write("<br><br><br><br><center>");
if(pourpar2 > 100){
pourpar2 = pourpar2-100;
}
for(i = -(taille-1); i < taille; ++i){
var largeur = 2*parseFloat(Math.sqrt((taille*taille)-(i*i)));
if(pourpar2 != 100)
document.write("<img src="+gauche+" height=1 width="+(largeur*((100-pourpar2)/100))+">");
if(pourpar2 != 0)
document.write("<img src="+droite+" height=1 width="+(largeur*((pourpar2)/100))+">");
document.write("<br>");
}
document.write("<br><font size=3 color='orange'>Prochaine pleine lune dans ",temps," jours");
document.write("</font>");
</script>
</body>
</html>
Conclusion
Mis dans date & heure, peut être que ça convient pas. J'ai hésité avec Trucs amusants
Historique
- 05 mai 2005 19:58:33 :
- Petite rectification de rien du tout.
Sources du même auteur
Sources de la même categorie
Commentaires et avis
|
Derniers Blogs
WP7 5K BELGIUM CHALLENGEWP7 5K BELGIUM CHALLENGE par junarnoalg
Microsoft Belgique a le plaisir de vous annoncer le lancement du
Challenge Windows Phone 7
. Celui-ci se déroule du 12 juillet au 30 novembre 2010 et vous donne l'opportunit...
Cliquez pour lire la suite de l'article par junarnoalg LES MONADES POUR LES NULSLES MONADES POUR LES NULS par mdufourneaudravel
Avec l'annonce de F#, je me suis intéressé de plus en plus à la programmation fonctionnelle, je suis donc rapidement tombé sur les " monades ", mais malgré la lecture de plusieurs articles, j'étais resté perméable à leur concept. C'est désormais fini, grâ...
Cliquez pour lire la suite de l'article par mdufourneaudravel [WP7] AJOUTER DES IMAGES DANS LA MEDIA LIBRARY D'UN WINDOWS PHONE 7[WP7] AJOUTER DES IMAGES DANS LA MEDIA LIBRARY D'UN WINDOWS PHONE 7 par Audrey
L'émulateur Windows Phone 7, fourni avec la version Beta des outils développeurs n'inclut aucune image dans sa bibliothèque. Pas très pratique de tester son application lorsque l'on souhaite que l'utilisateur puisse choisir une image présente dans le télé...
Cliquez pour lire la suite de l'article par Audrey VIVE LES MOCKS ET LES POCOSVIVE LES MOCKS ET LES POCOS par vLabz
J'observe régulièrement autour de moi de la confusion à propos de ces deux termes et j'aimerais juste rappeler ce qu'ils signifient. Je ne suis bien sûr pas le mieux placé pour faire une leçon mais je vais faire de mon mieux pour mettre en valeur ce q...
Cliquez pour lire la suite de l'article par vLabz [WF4] WORKFLOW AND CUSTOM ACTIVITIES - BEST PRACTICES (4/5)[WF4] WORKFLOW AND CUSTOM ACTIVITIES - BEST PRACTICES (4/5) par JeremyJeanson
Vendredi dernier Microsoft a publié le quatrième épisode des bonnes pratiques pour coder ses activités custom dans WF4 : endpoint.tv - Workflow and Custom Activities - Best Practices (Part 4) . Tout comme pour les précédents épisodes, j'ai pris le temps d...
Cliquez pour lire la suite de l'article par JeremyJeanson
Logiciels
Crystal Report (11)CRYSTAL REPORT (11)Crystal Reports est un outil de reporting souple et puissant, vous pouvez très facilement consult... Cliquez pour télécharger Crystal Report Academy System (12.0.2.0)ACADEMY SYSTEM (12.0.2.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft iPod Vidéo Convertisseur 6 (6.0.3.0419)XILISOFT IPOD VIDéO CONVERTISSEUR 6 (6.0.3.0419)Xilisoft iPod Vidéo Convertisseur est un outil puissant de conversion d'iPod, facile à utiliser. ... Cliquez pour télécharger Xilisoft iPod Vidéo Convertisseur 6 Xilisoft iPhone Vidéo Convertisseur 6 (6.0.3.0419)XILISOFT IPHONE VIDéO CONVERTISSEUR 6 (6.0.3.0419)Xilisoft iPhone Vidéo Convertisseur est le meilleur logiciel de conversion iPhone qui peut facile... Cliquez pour télécharger Xilisoft iPhone Vidéo Convertisseur 6 Xilisoft iPad Vidéo Convertisseur 6 (6.0.3.0419)XILISOFT IPAD VIDéO CONVERTISSEUR 6 (6.0.3.0419)Il s'agit d'un logiciel polyvalent pour convertir les formats vidéo/audio populaires en formats p... Cliquez pour télécharger Xilisoft iPad Vidéo Convertisseur 6
|