Simulate Test connection speed

Speed <?php
$size =1024*50;//Here you can zoom in to * big enough * to make sure the data is as close to real as possible.
$callnumber = 3;
$ip =$_SERVER[REMOTE_ADDR];
List ($useca, $seca) =explode ("", Microtime ());
@exec ("Ping-n $callnumber-L $size $ip", $data) or Die ("Support forbid!");
List ($USECB, $SECB) =explode ("", Microtime ());
$sec = $SECB-$seca;
$msg = $data [Count ($data)-3];
List ($drop, $info) =explode ("(", $msg);
List ($info, $drop) =explode ("%", $info);
$spead = ($size * $callnumber-$size * $callnumber * $info/100)/$sec;
echo sprintf ("Connection speed%.2f (k/s)", $spead/1024);
?>