https://www.infraexpert.com/study/multicastz03.html ¤ÇIP¤ò»²¹Í¤Ë¤µ¤»¤¿¤Î¤Ç¤¹¤¬¡¢
#include "pcbnet2.as" title "UDP¥Þ¥ë¥Á¥¥ã¥¹¥È" udpsock soc,3333,1 if stat : dialog "¥½¥±¥Ã¥È¤ÎºîÀ®¤Ë¼ºÇÔ¤·¤Þ¤·¤¿¡£",1 : end udpmjoin soc,"224.0.0.1" if stat : dialog "¥Þ¥ë¥Á¥¥ã¥¹¥È¥»¥Ã¥·¥ç¥ó¤Ø¤Î»²²Ã¤Ë¼ºÇÔ¤·¤Þ¤·¤¿¡£",1 : end udpsendto soc,"224.0.0.1",3333 msg="" input msg,240,24,63 button "Á÷¿®¡ª",*send onexit *bye goto *main *main udpcheck a,soc if a : gosub *recv wait 1 goto *main *send udpput msg,soc objprm 0,"" goto *main *recv sdim buf,64 sdim info,64 udpget buf,64,soc udpinfo info,soc mes "["+info+"]: "+buf return *bye udpclose soc end
ͧã¤È¢¬¤Î¥µ¥ó¥×¥ë¥Æ¥¹¥È¥×¥í¥°¥é¥à¤òµ¯Æ°¤·¤Æ¥Á¥ã¥Ã¥È¤â¤É¤¤ò¼Â¹Ô¤·¤¿¤Î¤Ç¤¹¤¬¥á¥Ã¥»¡¼¥¸¤¬¼õ¿®¤Ç¤¤Þ¤»¤ó¡£
¥°¥í¡¼¥Ð¥ëIP(?)¥í¡¼¥«¥ëIP(?)¡¢¤½¤â¤½¤â¤É¤¦¤¤¤¦IP¤ò»ØÄꤷ¤Æ¤·¤¿¤é¤¤¤¤¤Î¤«¤âʬ¤«¤ê¤Þ¤»¤ó¡£
¥Í¥Ã¥È¥ï¡¼¥¯¤Ï¥µ¥ó¥×¥ë¤ò²þ¤¤·¤¿¤À¤±¤Ê¤Î¤Ç¡¢Ã챤âÍý²ò¤â¤Û¤Ü³§Ìµ¾õÂ֤λä¤Ç¤¹¤¬
»ä¤Ëʬ¤«¤ê¤ä¤¹¤¤ÀâÌÀ¤ò¤ª´ê¤¤Ãפ·¤Þ¤¹(._.)