i just have done a some small code to try the multiplayer stuff, and run it several times in my computer to simulate a LAN, but i can't put them to run correctly, because i never recive a message!
is any problem in the attach code?
sync on : sync rate 50
perform checklist for net connections
wait 100
print "# of net connections: ",checklist quantity()
for i=1 to checklist quantity()
print checklist string$(i)
next i
print
set net connection 1
perform checklist for net sessions
wait 100
print "# of net sessions: ",checklist quantity()
if checklist quantity()
for i=1 to checklist quantity()
print checklist string$(i)
next i
a$="Player"+chr$(rnd(255))
join net game 1,a$
else
create net game "Game","Kempo",100
endif
print
perform checklist for net players
print "# net players: ",checklist quantity()
if checklist quantity()
for i=1 to checklist quantity()
print checklist string$(i)," ",checklist value a(i)," ",checklist value b(i)
next i
endif
do
if rnd(100)=50 then send net message integer 0,i
if net message exists()
get net message
print net message integer()
endif
sync
loop