UDP Socket
Posted by Spectral
Sunday, May 02, 2004
Description: Doesnt work why?

alias serveq { dialog -m serveq serveq }

dialog serveq {
  title "Server View"
  size -1 -1 265 209
  option dbu
  edit "", 1, 11 37 241 118, read multi autohs hsbar vsbar
  edit "", 2, 19 5 75 10
  button "Button", 3, 196 6 37 12
  edit "", 4, 102 5 50 10
  edit "", 5, 162 23 50 10
}

On *:dialog:serveq:sclick:3: {
  set %serveq.ip $did(serveq,2)
  set %serveq.port $did(serveq,4)
  set %serveq.rcon $did(serveq,5)
  sockudp -k rconsocket %serveq.ip %serveq.port ÿÿÿÿchallenge rcon
}

on *:udpread:rconsocket:{
  sockread %rcon.temp
  did -a serveq 1 %rcon.temp
}
Reply
Posted by cs2r`nonamee
Sunday, May 02, 2004 12:16pm PDT

alias serveq { dialog -m serveq serveq }

dialog serveq {
  title "Server View"
  size -1 -1 265 209
  option dbu
  list 1, 11 37 241 118
  edit "", 2, 19 5 75 10
  button "Search", 3, 196 6 37 12
  edit "", 4, 102 5 50 10
  edit "", 5, 162 23 50 10
}

On *:dialog:serveq:sclick:3: {
  set %serveq.ip $did(serveq,2)
  set %serveq.port $did(serveq,4)
  set %serveq.rcon $did(serveq,5)
  sockudp -k rconsocket %serveq.ip %serveq.port ÿÿÿÿchallenge rcon
}

on *:udpread:rconsocket:{
  :nextudp
  sockread -f %rcon.temp
  if ($sockbr == 0) { return }
  if (challenge rcon isin %rcon.temp) {
    did -ac serveq 1 Rcon challenge number received:
    set %rcon.challengenumber $gettok(%rcon.temp,3,32)
    did -ac serveq 1 $gettok(%rcon.temp,3,32)
    goto nextudp
  }
  goto nextudp
}
Submit a comment
Oops! You need to login or register before you can post a comment!

ebaum's world