Cameron

on *:sockclose:*.Data.*: {
  var %a 1,%b,%id $gettok($sockname,3,46)
  %csmsg [ $+ [ %id ] ] $+($chr(3),14,Server Name:,$chr(3),04) %servername [ $+ [ %id ] ]
  %csmsg [ $+ [ %id ] ] %serverip [ $+ [ %id ] ] %serverlocation [ $+ [ %id ] ] %splayers [ $+ [ %id ] ] %servermap [ $+ [ %id ] ]
  while ($($+(%,player,%a,%id),2)) {
    bwrite $+(ranks,%id) -1 -1 $addtok(%b,$+(%a,.,$chr(32),$chr(3),04,$v1),9))
    bread $+(ranks,%id) -1 $file($+(ranks,%id)).size &ranks [ $+ [ %id ] ]
    $iif(%a < 5, echo -a $bvar(&ranks [ $+ [ %id ] ],1,$file($+(ranks,%id)).size).text
    %b = $addtok(%b,$+(%a,.,$chr(32),$chr(3),04,$v1),9))
    inc %a
  }
  %csmsg [ $+ [ %id ] ] $+($chr(3),14,Players:,$chr(3),14) $replace(%b,$chr(9),$+($chr(32),$chr(3),14))
  remove $+(ranks,%id)
}