include "gDP.as"
sdim zyusin_buffer , 1024 ret = ghost( "" , 49153 , gMODE_PEER , gMSG_ERROR ) if ret != 0 : mes "セッション作成に失敗しました。" if ret == 0 : mes "セッション作成に成功しました。" repeat color 255,255,255 : boxf while (gcheckbuffertext() > 0 ) ret2 = ggettext( zyusin_buffer , 1024 ) ;ex "ホストのX座標は00100" と送信されるとする。 ;形式は送信の文字列右からかぞえて5ケタを数字としてわけるようにする。 ;送信されたメッセージは、zyusin_bufferに格納されています。 len=strlen(zyusin_buffer) ;文字の長さ mozi=strmid(zyusin_buffer,0,len-5) ;文字の部分 trimming=strmid(zyusin_buffer,len-5,5) ;数字の部分 ;exの送信内容だと lenは13文字だから13 moziはホストのX座標は trimmingは00100となります。 if mozi="ホストのX座標は" : HOST_X=int(trimming) ;のように書けば変数の値を渡せます。 wend color 0,0,0 pos 0,0 if ret != 0 : mes "セッション作成に失敗しました。" if ret == 0 : mes "セッション作成に成功しました。" mes ""+HOST_X+"" await 60 loop
クライアント側
#include "gDP.as" sdim zyusin_buffer , 1024 ip = "180.33.214.254" ret = gconnect( ip , 49153 , gMODE_PEER , 0 ) if ret != 0 : mes "セッションの参加に失敗しました。" if ret == 0 : mes "セッションの参加に成功しました。" HOST_X=100 HOST_X_SEND=strf("%05d",HOST_X) ret = gsendtext( "ホストのX座標は"+HOST_X_SEND+"",100) if ret != 0 : mes "メッセージ送信に失敗しました。" if ret == 0 : mes "メッセージ送信に成功しました。"
このスクリプトのどこを変更したらホスト⇒クライアントへ送る値を変更できるんですか?