Server-monitor.as
- include "bar-graph.as"
createTextField( 'rc', 1, 0, 0, width, height ); with (rc) {
_alpha = 30; selectable = true; _quality = 'BEST'; border = false; multiline = true; wordWrap = true; html = true; }
echo( 'Begin: Hello world!', 'ff0000' );
// Establish a connection with perl server socket = new XMLSocket();
//createSymbol( this, 'barGraph', 'myGraph', 0 );
// Connect to our host to establish stream if ( socket.connect( 'organicdesign.co.nz', 1729 ) ) echo( 'Connecting...', '00ff00' ); else echo( 'Could not initialise connection!', 'ff0000' );
// When connected, send login info socket.onConnect = function( success ) {
if ( success ) { echo( 'Connected!', '00ff00' ); sendMessage( 'Hello?' ); } else echo( 'Connection failed!', 'ff0000' ); };
// Decode incoming message socket.onData = function( data ) {
echo( 'Message received:', '00ff00' ); echo( data, 'ffff00' ); };
// Send a message to the associated peer function sendMessage( content ) {
echo( 'Sending message: "'+content+'"', '00ff00' ); _root.socket.send( content + String.fromCharCode(13,10,13,10) ); }
function echo( txt, col ) {
txt = _root.page.htmlText + "\n" + ''+txt+''; _root.rc.htmlText = txt;
//function reduce() { // myGraph.rotate( Math.sin( ++x/10 ) * height / 3 + height / 2 ); // }