Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <html>
- <head>
- <title>Íslenski GTA SA Serverinn</title>
- <style type="text/css">
- body { font-family: verdana; font-size: 11px; }
- td { font-family: verdana; font-size: 11px; }
- </style>
- <meta http-equiv="refresh" content="60">
- </head>
- <body text="#000000">
- <br><center><b><font color="#000000">�slenski GTA SA Serverinn</font></b></center><br><br>
- <table width="350" bgcolor="#000000" cellpadding="4" cellspacing="1" align="center">
- <?
- if (!isset($ip))
- $ip = '212.30.223.9';
- if (!isset($port))
- $port = 7778;
- $fp = fsockopen('udp://' . $ip, $port, $errno, $errstr);
- if (!$fp)
- {
- echo "<tr><td bgcolor=\"#2B5486\">Socket Error: $errno - $errstr</td></tr>\n";
- }
- else
- {
- $packet = 'SAMP';
- $packet .= chr(strtok($ip, '.'));
- $packet .= chr(strtok('.'));
- $packet .= chr(strtok('.'));
- $packet .= chr(strtok('.'));
- $packet .= chr($port & 0xFF);
- $packet .= chr($port >> 8 & 0xFF);
- fwrite($fp, $packet.'i');
- fread($fp, 11);
- $is_passworded = ord(fread($fp, 1));
- $plr_count = ord(fread($fp, 2));
- $max_plrs = ord(fread($fp, 2));
- $strlen = ord(fread($fp, 4));
- $hostname = fread($fp, $strlen);
- $strlen = ord(fread($fp, 4));
- $gamemode = fread($fp, $strlen);
- $strlen = ord(fread($fp, 4));
- $mapname = fread($fp, $strlen);
- echo ' <tr><td bgcolor="#2B5486" colspan="2" align="center"><b>' . $hostname . '</b></td></tr>'."\n";
- echo ' <tr><td bgcolor="#2B5486" width="100">Notendur: </td><td bgcolor="#2B5486" width="250">' . $plr_count . ' / ' . $max_plrs . '</td></tr>'."\n";
- echo ' <tr><td bgcolor="#2B5486">M�t: </td><td bgcolor="#2B5486">' . $gamemode . '</td></tr>'."\n";
- echo ' <tr><td bgcolor="#2B5486">Nafn Korts: </td><td bgcolor="#2B5486">' . $mapname . '</td></tr>'."\n";
- if ($is_passworded)
- {
- echo ' <tr><td bgcolor="#2B5486">Lykilor�: </td><td bgcolor="#2B5486">J�</td></tr>'."\n";
- } else {
- echo ' <tr><td bgcolor="#2B5486">Lykilor�: </td><td bgcolor="#2B5486">Nei</td></tr>'."\n";
- }
- fwrite($fp, $packet.'c');
- fread($fp, 11);
- $plr_count = ord(fread($fp, 2));
- if ($plr_count > 0)
- {
- echo ' </table><br>'."\n";
- echo ' <table width="350" bgcolor="#000000" cellpadding="4" cellspacing="1" align="center">'."\n";
- echo ' <tr><td bgcolor="#2B5486" colspan="2" align="center"><b>Notendur:</b></td></tr>'."\n";
- echo ' <tr><td bgcolor="#2B5486" align="center" width="250"><b>Notendur</b></td><td bgcolor="#2B5486" align="center" width="100"><b>Stig</b></td></tr>'."\n";
- for ($i=0; $i<$plr_count; $i++)
- {
- $strlen = ord(fread($fp, 1));
- $plrname = fread($fp, $strlen);
- $score = ord(fread($fp, 4));
- echo ' <tr><td bgcolor="#2B5486">' . $plrname . '</td><td bgcolor="#2B5486">' . $score . '</td></tr>'."\n";
- }
- }
- fclose($fp);
- }
- ?>
- </table><br>
- <center><small>� 2007-2009 �slenski GTA SA Serverinn.<br>
- A.T.H. Uppfærist Sjálfkrafa á 1 mínútu Fresti.
- <br>
- Lykilorðið er topp33 </small>
- </center>
- </body>
- </html>
Advertisement
Add Comment
Please, Sign In to add comment