Hora no formato Internet Beat

Publicado por Mauricio 07/03/2003

[ Hits: 4.612 ]

Homepage: http://www.mbmaciel.com

Download beater.tar.gz




Mostra a hora no formato netbeat ( ex: @500) um formato criado pela empresa Swatch para a web

  



Esconder código-fonte

<?

//--------------------------------------------
// Script traduzido e modificado por Mauricio Maciel
// http://www.brasildata.net
// Original por:                                                         
// Heruntergeladen von http://www.sutum.de                 
//---------------------------------------------            

// Extensão dos gráficos 
$ext = ".gif";

// Tamanho dos gráficos :
$width = "15";
$height= "21";

$tempo = time();
$data = getdate($tempo); 

$horas = $data[hours] * 3600; //Horas em segundos
$minutos = $data[minutes] * 60; //Minutos em segundos
$segundos = $data[seconds];
$gmt = -3 ; // Diferença do Horário de GMT de Brasília
$diferen = ((-$gmt * 60) + 60) * 60 ;

$segundos_total = ($segundos + $minutos + $horas + $diferen);

$netbeat = $segundos_total / 86.4; //Netbeat
$netbeat = floor($netbeat);

if ($netbeat > 1000) { $netbeat -= 1000; }
if ($netbeat < 0) { $netbeat += 1000; }

$tamanho = strlen($netbeat); // tamanho em caracteres da variável

// Dependendo do tamanho acrescenta 0 ou 00 na variável netbeat
if ($tamanho == "1") 
{
$netbeat = "00".$netbeat;
}
if ($tamanho == "2")
{
$netbeat = "0".$netbeat;
}

//Divide a variavel em pedaços para fazer a saída em modo gráfico
$parte1 = substr ($netbeat, 0 , 1);
$parte2 = substr ($netbeat, 1 , 1);
$parte3 = substr ($netbeat, 2 , 3);

// Saída em modo gráfico
echo ("<table border=0 cellpadding=0 cellspacing=0><tr><td><a href=\"http://www.brasildata.net\" target=\"_blank\"><img src=\"netbeat/a$ext\" width=\"$width\" height=\"$height\" border=\"0\" alt=\"At\"><img src=\"netbeat/$parte1$ext\" width=\"$width\" height=\"$height\" border=\"0\" alt=\"$parte1\"><img src=\"netbeat/$parte2$ext\" width=\"$width\" height=\"$height\" border=\"0\" alt=\"$parte2\"><img src=\"netbeat/$parte3$ext\"width=\"$width\" height=\"$height\" border=\"0\" alt=\"$parte3\"></a></td></tr></table>");

// Saída em modo texto

echo ("Netbeat : @$parte1$parte2$parte3"); 

?>

Scripts recomendados

Script para noticias no formato rss

Hosting Control

Descobrir qual SO o usuário que está acessando o seu site/software está utilizando

Cadcomp 1.0

PHP - Remover acentos e caracteres especiais


  

Comentários

Nenhum comentário foi encontrado.


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts