Boriel Basic Forum
Spectranet - Printable Version

+- Boriel Basic Forum (https://forum.boriel.com)
+-- Forum: Compilers and Computer Languages (https://forum.boriel.com/forumdisplay.php?fid=12)
+--- Forum: ZX Basic Compiler (https://forum.boriel.com/forumdisplay.php?fid=11)
+---- Forum: Wishlist (https://forum.boriel.com/forumdisplay.php?fid=14)
+---- Thread: Spectranet (/showthread.php?tid=577)

Pages: 1 2 3

Re: Spectranet - ardentcrest - 2014-11-17

Hi B.

Could You add.

%connect
%control

And so one so I could do something like this.

Code:
10 %connect #4,"SITE WWW",PORT
20 %control #5
25 print #4;"0"
30 print #5;"p"
40 input #5;a;a$
.....
thank you.


Re: Spectranet - ardentcrest - 2014-11-19

I really need this Smile

Re: Spectranet - ardentcrest - 2014-11-28

:?

Re: Spectranet - boriel - 2014-11-28

ardentcrest Wrote::?
Hi Arden!

Can you use the current spectralib for this?
The syntax is no longer %open for example.
Instead you have to open a conection with:
Code:
10 %connect #4,"SITE WWW",PORT

Try instead:
Code:
#include <spectranet.bas>
conn = SNETconnect(socket , "IP", port)

The spectralib is poooooorly documented. If you happen to find more doc, then I could speed up it's development.
At the moment, the functions there are the only ones used for networking.

Re: Spectranet - ardentcrest - 2014-11-28

Winston said you can use poll instead of %connect #5

<!-- m --><a class="postlink" href="http://spectrum.alioth.net/doc/index.php/Poll">http://spectrum.alioth.net/doc/index.php/Poll</a><!-- m -->

Re: Spectranet - ardentcrest - 2014-11-28

tried above code

Code:
#include <spectranet.bas>

conn = SNETconnect(4 , "127.0.0.1", 16384)

got this

Quote:spectranet.bas:67: warning: FUNCTION 'SNETbind' declared as FASTCALL with 2 parameters
spectranet.bas:94: warning: FUNCTION 'SNETconnect' declared as FASTCALL with 3 parameters

 11:02:46 -> Done: Compilation successfull
 11:02:46 -> FAIL: Compiler cannot write output file in directory (Protected Or does Not exist?)
 11:02:46 -> Compilation time: 13432ms


Re: Spectranet - ardentcrest - 2014-12-08

HELP......

Quote: 21:29:53 -> Compilation starts(4 Lines)
 21:29:53 -> Source D:\ZXBasicCompiler\IDE\new.bor saved
 21:29:53 -> D:\ZXBasicCompiler\zxb.exe "temp.bor" -S 24200 -o "D:\ZXBasicCompiler\IDE\Test.bin"

 21:30:06 -> Exit code: 0

spectranet.bas:67: warning: FUNCTION 'SNETbind' declared as FASTCALL with 2 parameters
spectranet.bas:94: warning: FUNCTION 'SNETconnect' declared as FASTCALL with 3 parameters
spectranet.bas:121: warning: FUNCTION 'SNETrecv' declared as FASTCALL with 3 parameters
spectranet.bas:133: warning: FUNCTION 'SNETsend' declared as FASTCALL with 3 parameters
spectranet.bas:291: warning: FUNCTION 'SNETfread' declared as FASTCALL with 3 parameters
spectranet.bas:315: warning: FUNCTION 'SNETfwrite' declared as FASTCALL with 3 parameters
spectranet.bas:382: warning: FUNCTION 'SNETfseek' declared as FASTCALL with 3 parameters
temp.bor:4: warning: Using default implicit type 'byte' for 'conn'

 21:30:06 -> Done: Compilation successfull
 21:30:06 -> FAIL: Compiler cannot write output file in directory (Protected Or does Not exist?)
 21:30:06 -> Compilation time: 13089ms


Re: Spectranet - boriel - 2014-12-08

ardentcrest Wrote:HELP......

Quote: 21:29:53 -> Compilation starts(4 Lines)
 21:29:53 -> Source D:\ZXBasicCompiler\IDE\new.bor saved
 21:29:53 -> D:\ZXBasicCompiler\zxb.exe "temp.bor" -S 24200 -o "D:\ZXBasicCompiler\IDE\Test.bin"

 21:30:06 -> Exit code: 0

spectranet.bas:67: warning: FUNCTION 'SNETbind' declared as FASTCALL with 2 parameters
spectranet.bas:94: warning: FUNCTION 'SNETconnect' declared as FASTCALL with 3 parameters
spectranet.bas:121: warning: FUNCTION 'SNETrecv' declared as FASTCALL with 3 parameters
spectranet.bas:133: warning: FUNCTION 'SNETsend' declared as FASTCALL with 3 parameters
spectranet.bas:291: warning: FUNCTION 'SNETfread' declared as FASTCALL with 3 parameters
spectranet.bas:315: warning: FUNCTION 'SNETfwrite' declared as FASTCALL with 3 parameters
spectranet.bas:382: warning: FUNCTION 'SNETfseek' declared as FASTCALL with 3 parameters
temp.bor:4: warning: Using default implicit type 'byte' for 'conn'

 21:30:06 -> Done: Compilation successfull
 21:30:06 -> FAIL: Compiler cannot write output file in directory (Protected Or does Not exist?)
 21:30:06 -> Compilation time: 13089ms

This is related to the IDE. Apparently the compiler cannot write the output program for whatever reason.
Try using the compiler from the command line, or contact LCD for this. :wink:

Re: Spectranet - ardentcrest - 2014-12-09

I give up Cry Cry Cry

Re: Spectranet - boriel - 2014-12-09

ardentcrest Wrote:I give up Cry Cry Cry

You can compile your program from the command line with:
Code:
zxb -taB yourprogram.bas
and use the .tap file.

Re: Spectranet - ardentcrest - 2014-12-09

Code:
10 %connect #4,"the8bitmud.zapto.org",16384
20 %control #5
25 print #4;chr$ 0
30 print #5;"p"
40 input #5;a;a$
50 if a=4 and a$="recv" then goto 200
60 let k$=inkey$
70 if k$="" then goto 40
71 if code k$=12 then print #4;chr$ 8;:print chr$ 8;" ";chr$ 8;: goto 40
75 print #4;k$;: printk$;
80 pause 50: goto 40
200 let s$=inkey$#4: if code s$=13 then print '
201 if code s$ > 127 then goto 40
202 if code s$ < 32 then goto 40
210 print s$

above into this


Code:
#include <spectranet.bas>



30 conn1 = SNETconnect(4 , "the8bitmud.zapto.org", 16384)
SNETaccept(4)

40 poke 60000,0
50 send1 = SNETsend(4,60000,1)


64 t = SNETlisten(4)
65 p = SNETrecv(4, 60002,1)

70 print p;

80 goto 64


Re: Spectranet - ardentcrest - 2014-12-12

Nope still cant get anywhere Sad

Re: Spectranet - ardentcrest - 2014-12-13

Any one Sad

Re: Spectranet - ardentcrest - 2014-12-30

Hours of fun, and still cant get it dome Sad

Re: Spectranet - ardentcrest - 2015-01-16

Hours of fun, and still cant get it done. part two Sad