oops i forgot to mention, dont use the input command! in that code there is a routine called CheckInput
`****************************
` Input Routine
`****************************
CheckInput:
sendmsg=0
`read the current keyboard entry buffer, add to text$ var, clear the buffer
text$=text$+entry$()
clear entry buffer
`check for backspace
IF asc(right$(text$,1))=8
IF LEN(text$)>0 THEN text$=LEFT$(text$,LEN(text$)-2)
endif
`check for enter key
if asc(right$(text$,1))=13
text$=LEFT$(text$,LEN(text$)-1)
`if text$ var is not empty let calling routine know text$ var is ready for use
if text$<>"" then sendmsg=1
endif
clear entry buffer
return
which is what i wrote so i wouldnt rely on the input command it works by doing a gosub to the routine each loop then checking if the enter key ispressed after it returns if it was then it will send a message
eg:
do
`program stuff here
gosub CheckInput
if sendmsg=1 then gosub SendNetMsg
`sync screen and other stuff
loop
err yeah hope that helps too!
optic blast! megablast! have a blast!!
