<?
$server = "192.168.0.100";    #server DNS or IP
$socket = "1234";        #tcp query port
$udpport = "8767";        #udp port
$tstimeout = "5";        #time to wait for server response, standard is 5
$tsusername = "name";    #superadmin name
$tspassword = "dpass";        #superadmin password

 $tsconnection = tsconnect($server,$socket,$tstimeout);
 function tsconnect ($server,$socket,$tstimeout) {
$fp = fsockopen($server,$socket,$err_number,$err_string,$tstimeout);
$tscommand = array("slogin ".$tsusername." ".$tspassword." "," sel ".$udpport." "," dbuseradd ".$newuser." ".$password." ".$password." 0");
function tscommand ($tscommand,$tsconnection,$password) {
foreach ($tscommand as $docommand)
{
fwrite($tsconnection,$docommand);
}
sleep(1);
}
tscommand($tscommand,$tsconnection,$password);
fclose ($tsconnection,$docommand);
?>

<?
$server = "192.168.0.100";    #server DNS or IP
$socket = "1234";        #tcp query port
$udpport = "8767";        #udp port
$tstimeout = "5";        #time to wait for server response, standard is 5
$tsusername = "webphp";    #superadmin name
$tspassword = "deskjet";        #superadmin password
$newuser = "Kuschelpappi";
$password = "robotixs";

$tsconnection = tsconnect("$server", $socket, $tstimeout);
function tsconnect ($server, $socket, $tstimeout) {
$fp = fsockopen("$server", $socket, $errno, $errstr, 1);
$tscommand = array("slogin ".$tsusername." ".$tspassword." "," sel ".$udpport." "," dbuseradd ".$newuser." ".$password." ".$password." 0");
function tscommand ($tscommand,$tsconnection,$tspassword);
{
foreach ($tscommand as $docommand);
{
fwrite($tsconnection,$docommand);
}
sleep(1);
}
 tscommand($tscommand,$tsconnection,$tspassword);
fclose ($tsconnection,$docommand);
}
?>