Phpcalendario dinamico

Disponível somente no TrabalhosFeitos
  • Páginas : 5 (1233 palavras )
  • Download(s) : 0
  • Publicado : 18 de abril de 2012
Ler documento completo
Amostra do texto
<?php
/*
Desenvolvido por: Vanessa Schissato
Data: 12/12/2005
Calendario dinamico com navegacao pelos meses
*/
/*
Change log
v1.2 7/10/2006 Fabio Issamu Oshiro
As datas começam pelo Domingo
Hash de Feriados incluindo a Páscoa, Carnaval e outras datas móveis
*/
?>
<HTML>
<HEAD>
</HEAD>
<BODY link=black vlink=black alink=black>
<?php
//geracalendario
echo calendario();

function dia_pascoa($a){
//fabioissamu@yahoo.com Fabio Issamu Oshiro
//retorna a páscoa
if ($a<1900){$a+=1900;}
$c = floor($a/100);
$n = $a - (19*floor($a/19));
$k = floor(($c - 17)/25);
$i = $c - $c/4 - floor(($c-$k)/3) +(19*$n) + 15;
$i = $i - (30*floor($i/30));
$i = $i - (floor($i/28)*(1-floor($i/28))*floor(29/($i+1))*floor((21-$n)/11));$j = $a + floor($a/4) + $i + 2 -c + floor($c/4);
$j = $j - (7* floor($j/7));
$l = $i - $j;
$m = 3 + floor(($l+40)/44);
$d = $l + 28 - (31*floor($m/4));
$retorno=mktime(0, 0, 0, $m, $d-1, $a);
return $retorno;
}
function calendario(){
//Variável de retorno do código em HTML
$retorno="";
//Primeira linha do calendário$arr_dias=Array("Dom","Seg","Ter","Qua","Qui","Sex","Sáb");
//Deseja iniciar pelo sábado?
$ini_sabado=false;
//Feriados comuns
$feriados["1-1"]="Confraternização Universal";
$feriados["21-4"]="Tiradentes";
$feriados["15-11"]="Proclamação da República";
$feriados["2-11"]="Finados";
$feriados["1-5"]="Dia do Trabalho";
$feriados["7-9"]="Dia da Independência";
$feriados["12-10"]="N.S. Aparecida";
//$feriados["15-10"]="Dia dosProfessores";
$feriados["25-12"]="Natal";
//mes e ano do calendario a ser montado
If($_GET['mes'] and $_GET['ano'])
{
$mes = $_GET['mes'];

$ano = $_GET['ano'];
}
Else
{
$mes = date("m");
$ano = date("Y");
}
//Feriados com data mutante
$pascoa=dia_pascoa($ano);
$feriados[date("j-n", $pascoa)]="Páscoa";
$feriados[date("j-n", $pascoa-86400*2)]="Paixão";$feriados[date("j-n", $pascoa-86400*46)]="Cinzas";
$feriados[date("j-n", $pascoa-86400*47)]="Carnaval";
$feriados[date("j-n", $pascoa+86400*60)]="Corpus Christi";
$cont_mes = 1;
if ($ini_sabado){
$dia_semana = converte_dia(date("w", mktime(0, 0, 0, $mes, 1, $ano))); //dia da semana do primeiro dia do mes
}else{
//Comum
$dia_semana = date("w", mktime(0, 0, 0, $mes, 1, $ano));
}$t_mes = date("t", mktime(0, 0, 0, $mes, 1, $ano)); //no. total de dias no mes
//dados do mes passado
$dia_semana_ant = ((date("d", mktime(0, 0, 0, $mes, 0, $ano))+1)-$dia_semana);
$mes_ant = date("m", mktime(0, 0, 0, $mes, 0, $ano));
$ano_ant = date("Y", mktime(0, 0, 0, $mes, 0, $ano));
//dados do mes seguinte
$dia_semana_post = 1;
$mes_post = date("m", mktime(0, 0, 0, $mes,$t_mes+1, $ano));
$ano_post = date("Y", mktime(0, 0, 0, $mes, $t_mes+1, $ano));
$retorno.="<center>";
//titulo do calendario
$retorno.= "<font style=\"font-family:verdana,arial,serif;font-size:16\"><b>Calendário: ".converte_mes($mes)."/".$ano."</b></font><br>";
//montagem do calendario
$retorno.="<table><tr><td> </td><td>";
$retorno.= "<table border=1 width=580 cellpadding=5 cellspacing=5 style='border-collapse: collapse' id=AutoNumber1 bordercolor=#333333>";
//primeira linha do calendario
$retorno.= "<tr bgcolor=#B5B5B5 face=verdana,arial,serif>";
for($i=0;$i<7;$i++){
if ($i==0 || $i==6){
//é domingo ou sábado
$retorno.= "<td bgcolor=#994444><fontcolor=#EEEEEE face=verdana,arial,serif>$arr_dias[$i]</font></td>";
}else{
$retorno.= "<td><font color=#EEEEEE face=verdana,arial,serif>$arr_dias[$i]</font></td>";
}
}
$cont_cor = 0;
While ($t_mes >= $cont_mes)
{
$cont_semana = 0;
$retorno.= "<tr>";
If ($dia_semana == 7)
{
$dia_semana = 0;
}...
tracking img