今ちょうどオンラインのタイピングゲーム作ってます。
接続のスクリプトだけ載せておきます
#include "hspsock.as"
conip="127.0.0.1"//接続IPアドレス
port=331//ポート番号
//クライアントの場合
*home
sockopen 0,conip,port
//接続待ち
repeat
sockcheck 0
if stat!=0 : break//応答があったら続行
wait 10//ここは適度に調節してください
loop
*receive
cls
a=""
button "戻る",*disconnect
repeat
sockget a,64
if a!="":mes a
wait 5
loop
*disconnect
sockclose
goto *home
//サーバーの場合
*homes
sockmake 0//サーバー用意
//接続待ち
repeat
sockwait 0
if stat>1 : dialog "Socket error": goto *failed
if stat=0 : break
a+
/*(必要に応じて次のコードを追加)
if a>300:goto *failed
*/
wait 10
loop
wait 100
*send
sockput ""+gettime(4)+"時"//何時かを送信
stop
*failed
mes "接続失敗"
stop