ChessEngine.s3d

#ifndef _CHESSENGINE
#define _CHESSENGINE

class ChessEngine
{
    var channel;
    var data;
    var port;

    Connect();
    DataReady(timeout);
    Send(msg);
    Receive();
};

function ChessEngine::ChessEngine(p)
{
    port = p;
}

function ChessEngine::Connect()
{
    //return;
    var t = 3;
    do
    {
        channel = NetConnectTCP("localhost", port, VR_NO_BLOCKING);

        if(channel !=0) //not working, XVR crash
        {
            OutputLN("Connected to engine");
            return true;
        }
        else
        {
            OutputLN("Connection Fail, try: " + t);
            t--;
            Sleep(1000);
        }
    } while(t > 0);

    return false;
}

function ChessEngine::DataReady(timeout)
{
    return NetDataReady(channel, timeout);
}

function ChessEngine::Receive()
{
    var data = "";
    do
    {
        data =  NetReceiveFromTCP(channel);
    }
    while(data == "");

    return data;
}

function ChessEngine::Send(msg)
{
    NetSendToTCP(channel, msg);
}

#endif