SpiderBasic

kingwolf71

perhaps one of you boffins can help me especially since I find JavaScript so difficult

Procedure MemMoveInt(*src, copyfrom, copyto, last)
EnableJS
;srcAr = p_src.Array SB V2.31
srcAr = ap_src.Array
srcAr.copyWithin( v_copyto,v_copyfrom, v_last )
DisableJS
EndProcedure

this code used to ...

kingwolf71

I am mostly a PB user and I use Spiderbasic due to its similarity
but this code doesn't work on Spiderbasic even though it runs

Procedure Test(*var.integer)
*var\i = 7

EndProcedure

a.i = 5
Test(@a)
debug a

On PB the result is 7 while on SpiderBasic it is 5.
can someone explain please ...

kingwolf71

thanks @Fred and sorry for late reply

I have used this for public IP

;Example code to get the user's public IP address using an external API

Procedure HttpGetEvent(Success, Result$, UserData)
If Success
if UserData = 1
if ParseJSON(0,Result$)
ObjectValue = JSONValue(0)
NewMap Options ...

kingwolf71

that's a bummer, that is

kingwolf71

This sounds like an easy question, but haven't really managed it
how do I get the PC/device name and IP address with spiderbasic?

kingwolf71

Though one of my best friends had explained to me the client/server model it took me years for me to actually digest and finally understand it.
And lately I managed to do my first client/server app using PB/CGI.

Q1
But are there other "cleaner" ways than using CGI? Are there examples? Or ...

kingwolf71

that works! thank you

kingwolf71

I did
I need a way to call the functions

Code: Select all

Declare.i   Test()


Procedure   Test()
   debug "Hello World!"
EndProcedure


define   *ptr

*ptr = @Test()

;How do I call the function?
*ptr()

kingwolf71

I am a sucker for pointers, especially pointers to functions and SB already uses them internally.
But how can I use them myself?

Added an example for those like me

Procedure.s ToUpper(s$)
ProcedureReturn UCase(s$)
EndProcedure

Procedure.s ToLower(s$)
ProcedureReturn LCase(s$)
EndProcedure ...

kingwolf71

In PureBasic it works fine; is this a difference between the 2 compilers?
But what about modules?

main.sb

XIncludeFile "./inc.sbi"

DeclareModule test
Declare myfun()
EndDeclareModule

Module test

UseModule test

Procedure myfun()
test2::myFormat() <--- this should be seen...but I get ...

SpiderBasic

Search found 27 matches

Code which worked in 2.3 but not in 2.5

Pointer issue [solved]

Re: How does one get IP and hostname?

Re: How does one get IP and hostname?

How does one get IP and hostname?

Client server models

Re: How to make and use a pointer to a function?

Re: How to make and use a pointer to a function?

How to make and use a pointer to a function?[fixed]

Re: compiler Include does not see globals