UDP FPS

Blitz3D Forums/Blitz3D Beginners Area/UDP FPS

Thanks!
With the help of the second link there, I got it semi-working like this.
Graphics 640,480
SetBuffer BackBuffer()
UDPTimeouts 100
udpstream=CreateUDPStream(4000)

x1=50
y1=50
x2=100
y2=100

While Not KeyDown(1)
Cls
If KeyDown(200) Then y1=y1-2
If KeyDown(208) Then y1=y1+2
If KeyDown(203) Then x1=x1-2
If KeyDown(205) Then x1=x1+2
Color 0,0,255
Oval x1,y1,50,50

WriteLine udpstream,LSet(x1,3)+LSet(y1,3)
SendUDPMsg udpstream,-1062731774,4001

msg=RecvUDPMsg(udpstream)
If msg<>0 Then msgdata=ReadLine(udpstream)
x2=Left(msgdata,3)
y2=Right(msgdata,3)

Color 0,255,0
Oval x2,y2,40,40
Flip
Wend
End

The only problem is, sometimes the other player starts flashing in three different places at once. Does anybody know why?