I can't figure out why this isn't working, mostly because I'm so new at online programming. I've got:
It's supposed to, if you press 5, get input, and then print it back, but the printing part isn't working! What am I missing!?
Graphics 800,600,32,2 Print "Connecting..." tcp=OpenTCPStream( "www.alloidgames.com",80 ) If Not tcp Print "Failed.":WaitKey:End Print "Connected! Sending request..." WriteLine tcp,Chr$(10) If Eof(tcp) Print "Failed.":WaitKey:End Print "Request sent! Waiting for reply..." While Not Eof(tcp) Print ReadLine$( tcp ) Wend Print "Connected!" While Not KeyHit(1) If KeyHit(6) Then AcceptTCPStream(tcp) alk$ = Input("") WriteLine(tcp,alk) Print ReadLine(tcp) End If Wend CloseTCPStream tcp WaitKey End
It's supposed to, if you press 5, get input, and then print it back, but the printing part isn't working! What am I missing!?