Ir para conteúdo

Mostrando Detalhes De Char No Tibia


Nostradamus

Posts Recomendados

Bom, fiquei com medo de eu divulgar e modificarem os créditos, mas ai vi que algo simples poderia ser feito futuramente, então resolvi postar.

tibia.php

 

<?phpif ($_GET["consulta"] == "0" || !$_GET["consulta"]){	echo "<form method=get action=tibia.php><input type=hidden name=consulta value=1>Nome do character:<input type=text name=nome><br><input type=submit value=OK></form>";}elseif($_GET["consulta"] == "1"){$nome = $_GET["nome"];$nome = str_replace(" ", "%20", $nome);$pagina = implode('', file("http://www.tibia.com/community/?subtopic=character&name=$nome"));$procura = explode("<TD>",$pagina);if(!preg_match("/Char não encontrado./i",$pagina)){$nomechar = $procura[21];$sexo = $procura[23];$vocation = $procura[25];$level = $procura[27];$mundo = $procura[29];$cidade = $procura[31];if(preg_match("/Comment/i",$procura[37])){	$comment = $procura[38];	$house = $procura[33];	$guild = $procura[35];	$status = $procura[40];}elseif(preg_match("/Comment/i",$procura[35]) && preg_match("/House/i",$procura[32])){	$guild = "N/A";	$comment = $procura[36];	$status = $procura[38];	$house = $procura[33];}elseif(preg_match("/Comment/i",$procura[35])){	$house = "N/A";	$guild = $procura[33];	$status = $procura[38];	$comment = $procura[36];}elseif(preg_match("/Comment/i",$procura[33])){	$house = "N/A";	$guild = "N/A";	$comment = $procura[34];	$status = $procura[36];}elseif(preg_match("/Account/i",$procura[34])){	$status = $procura[35];	$house = "N/A";	$guild = "N/A";}list ($nomechar) = split ("</TD>", $nomechar);echo "Nome do character: $nomechar<br>";list ($sexo) = split ("</TD></TR><TR BGCOLOR=#F1E0C6>", $sexo);if ($sexo == "female"){	$sexo = "Feminino";}else{	$sexo = "Masculino";}echo "Sexo: $sexo<br>";list ($vocation) = split ("</TD>", $vocation);echo "Vocação: $vocation<br>";list ($level) = split ("</TD>", $level);echo "Level: $level<br>";list ($mundo) = split ("</TD>", $mundo);echo "Mundo: $mundo<br>";list ($cidade) = split ("</TD></TR><TR BGCOLOR=#F1E0C6>", $cidade);echo "Cidade: $cidade<br>";list ($guild) = split ("</TD>", $guild);echo "Status em guild: $guild<br>";list ($house) = split ("</TD>", $house);echo "Casa: $house<br>";if($comment == ""){echo "Comentário do character: N/A<br>";}else{echo "Comentário do character: <br>$comment<br>";}echo "Status da conta: $status";}else{	echo "Esse character não existe!";break;}	}?>

 

Espero que gostem, e que usem como base para outros scripts.

Link para o comentário
Compartilhar em outros sites

Muito bom!

Isso vai ajudar muita gente, pena que alguns espertinhos tentarão roubar os créditos.

Eles estarão enganando a si própio.

Parabéns Nostradamus por este script!

Rotciv

Link para o comentário
Compartilhar em outros sites

×
×
  • Criar Novo...