Scratch

  var mySocket=new Socket();
var friendSocket=new Socket();
var dataOut:String;
var player1Connected:Boolean;
var player2Connected:Boolean;
/*var player1X:String;
var player2X:String;
var player1Y:String;
var player2Y:String;
var test:String;
*/
myStatus.text=String("Waiting to connect to your computer");
friendStatus.text=String("Waiting to connect to your friends computer");
var socketNum:int=1;
inputIP.text='192.168.1.103';

my_btn.addEventListener(MouseEvent.CLICK, enterMyIP);
function enterMyIP(evt:MouseEvent):void {
    socketNum=1;
    mySocket.connect("localhost",42001);
    mySocket.addEventListener(Event.CONNECT,socket);
    mySocket.addEventListener(Event.CLOSE,socket);
    mySocket.addEventListener(IOErrorEvent.IO_ERROR,socket);
    mySocket.addEventListener(ProgressEvent.SOCKET_DATA, dataInHandler);
}


ip_btn.addEventListener(MouseEvent.CLICK, enterIP);
function enterIP(evt:MouseEvent):void {
    socketNum=2;
    //192.168.1.103
    friendSocket.connect(inputIP.text,42001);
    friendSocket.addEventListener(Event.CONNECT,socket);
    friendSocket.addEventListener(Event.CLOSE,socket);
    friendSocket.addEventListener(IOErrorEvent.IO_ERROR,socket);
    friendSocket.addEventListener(ProgressEvent.SOCKET_DATA, fdataInHandler);
    
}

function socket(Event):void {
    if (socketNum==1) {
        switch (Event.type) {
            case 'ioError' :
                myStatus.text=String("Cannot connect to your computer");
                break;
            case 'connect' :
                myStatus.text=String("Connected to your computer");
                player1Connected=true;
                if (player1Connected==true&&player2Connected==true) {
                    SendToScratch('broadcast "StartGame"',1);
                    SendToScratch('broadcast "StartGame"',2);
                }
                break;
            case 'close' :
                myStatus.text=String("Cannot connect to your computer");
                break;
        }

    } else {
        switch (Event.type) {
            case 'ioError' :
                friendStatus.text=String("Cannot connect to your friends computer");
                break;
            case 'connect' :
                friendStatus.text=String("Connected to your friends computer");

                player2Connected=true;
                if (player1Connected==true&&player2Connected==true) {
                    SendToScratch('broadcast "StartGame"',1);
                    SendToScratch('broadcast "StartGame"',2);
                }
                break;
            case 'close' :
                friendStatus.text=String("Cannot connect to your friends computer");
                break;
        }
    }
}
//sendToScratch('broadcast "StartGame"');

function SendToScratch(dataOut:String,playerNum:int) {

    var sizeBytes:ByteArray = new ByteArray();
    sizeBytes[0]=0;
    sizeBytes[1]=0;
    sizeBytes[2]=0;
    sizeBytes[3]=dataOut.length;
    if (playerNum==1) {
        for (var i:Number=0; i<4; i++) {
            mySocket.writeByte(sizeBytes[i]);//send each element in the array to scratch
        }
        mySocket.writeMultiByte(dataOut, "us-ascii");
        mySocket.flush();

    }
    if (playerNum==2) {
        for (var j:Number=0; j<4; j++) {
            friendSocket.writeByte(sizeBytes[i]);//send each element in the array to scratch
        }
        friendSocket.writeMultiByte(dataOut, "us-ascii");
        friendSocket.flush();

    }
}


//Handle data sent from Scratch
function dataInHandler(event:ProgressEvent):void {
    var inString:String="";
    while (mySocket.bytesAvailable) {
        inString+=mySocket.readUTF();
    }
    //trace(inString);
    parseInput(inString,2);
}



//Handle data sent from Scratch
function fdataInHandler(event:ProgressEvent):void {
    var inString:String="";
    while (friendSocket.bytesAvailable) {
        inString+=friendSocket.readUTF();
    }

    parseInput(inString,1);
}


// Parse the data received from Scratch
function parseInput(input:String, socket:int) {
    // Look for broadcast from Scratch

    var pattern1:RegExp=/broadcast\s\"(\w+)\"/;
    var result:Object=pattern1.exec(input);
    if (result!=null) {
        trace('Scratch broadcasted:'+result[1]);
    }
    // Look for sensor-update from Scratch
    var pattern2:RegExp=/sensor-update\s\"Scratch-(\w+)\"\s(\w+)/;
    result=pattern2.exec(input);
    if (result!=null) {
        trace('Scratch changed variable '+result[1]+' to '+result[2]);
        SendScratchSensorUpdate(result[1],result[2],socket);
    }

}

// Send a broadcast message to Scratch
function SendScratchBroadcast(broadcast:String,socketNum:int) {
    SendToScratch('broadcast "'+broadcast+'"',socketNum);
}

// Send a sensor variable update to Scratch
function SendScratchSensorUpdate(variable:String, value:String, socketNum:int) {
    SendToScratch('sensor-update '+variable+' '+value,socketNum);
}