REVO2700Simplest socket server1 4a  cREVGeneralbreakpointconditions breakpointsbreakpointstates @ text)`n cREVGeneral revUniqueID 1162390083001   `k Start ServerEpwon mouseUp accept connections on port 8080 with message "someoneConnected" end mouseUp on someoneConnected theIP read from socket theIP until return with message "newMessage" end someoneConnected on newMessage theIp theMessage put theIP & ":" && theMessage & return after field "text" read from socket theIP until return with message "newMessage" end newMessage R0 cREVGeneral scriptChecksum؃|?Qix handlerList#mouseUp someoneConnected newMessagescriptSelection char 40 to 39 revUniqueID 1162390094177 bookmarksscripteditorvscroll0scripteditorselection374 tempScript prevHandlerscript!

on mouseUp

accept connections on port 8080 with message "someoneConnected"

end mouseUp

on someoneConnected theIP

read from socket theIP until return with message "newMessage"

end someoneConnected

on newMessage theIp theMessage

put theIP & ":" && theMessage & return after field "text"

read from socket theIP until return with message "newMessage"

end newMessage

revOnline | RunRev