Get Stats {
  var %sl
  %sl = $sline(@Q3Info,1)
  if (%sl == $null || %sl == Favorites:) { 
    q3ibadmenu
    return
  }
  else { q3info $gettok(%sl,2,126) }
}

Connect { 
var %sl
  %sl = $sline(@Q3Info,1)
  if (%sl == $null || %sl == Favorites:) { 
    q3ibadmenu
    return
  }
  else { q3 $gettok(%sl,2,126) }
}

Add a Server { 
  var %addr, %fav, %hn, %flag
  %addr = $remove($$?="Enter the IP address of the server",$crlf)
  if ($iif($chr(58) isin %addr,$false,$true)) { %addr = %addr $+ $chr(58) $+ 27960 }
  %q3ifavserver = %addr
  q3info %addr   
}

Remove { 
  var %fav, %sl
  %sl = $sline(@Q3Info,1)
  if (%sl == $null || %sl == Favorites:) { 
    q3ibadmenu
    return
  }
  else {
    dline -l @Q3Info $sline(@Q3Info,1).ln
    %fav = $readini q3post.ini Q3P Favorites
    %fav = $remtok(%fav,$gettok(%sl,1,126),1,126)
    %fav = $remtok(%fav,$gettok(%sl,2,126),1,126)
    if (%fav == $null) { remini q3post.ini Q3P Favorites }
    else { writeini q3post.ini Q3P Favorites %fav }
  }
}
