exec()

[cybergeek]

is there any function exec() which can execute a piece of script in a variable... dynamically at runtime?

e.g


script.s= ;some scipt here

exec(script)

[srod]

What kind of script are you talking about? VBS, Javascript, LUA....

[cybergeek]

purebasic of course

[gnozal]

purebasic of course

Purebasic is not a script language.

[srod]

purebasic of course

There is no 'of course' about it since, as Gnozal points out, Purebasic is not a scripting language and is not offered as such by the PB team.

[flaith]

RunProgram

can call an external program if you want

[cybergeek]

sorry... i didnt mean script but a programming language

i want an exec function

PBcode$ = ;code + # LF + code

exec(pbcode$)


should work dynamically

[srod]

Then you will have to write a scripting engine which works with PB type source.

You cannot expect this natively of what is a native compiler.

[cybergeek]

looked at a thread RUN TIME COMPILER http://www.purebasic.fr/english/viewtop ... 3&p=332022

need like that



damn needed this

[dongnanyanhai]

sorry... i didnt mean script but a programming language

i want an exec function

PBcode$ = ;code + # LF + code

exec(pbcode$)


should work dynamically

I hope this code can help you!

Code: Select all

Prototype CallHandler()
Declare gogo()

WinH = OpenWindow(0,50,50,320,200,"MainWindow",#PB_Window_SystemMenu)
If WinH <> 0
  handler.Callhandler
  ButtonGadget(0,50,50,120,50,"OK")
  
  handler = @gogo()
  Repeat
    Event = WindowEvent()
    Select Event
      Case #PB_Event_Gadget
        Select EventGadget()
          Case 0
            handler()
        EndSelect
    EndSelect
  Until Event = #PB_Event_CloseWindow
  
EndIf
End

Procedure gogo()
  MessageRequester("Message","Sucess!")
EndProcedure

[srod]

He wants to execute PB code dynamically from his own application, not trap a button click!

[Little John]

cybergeek,

you might want to take a look at Lua. It's a nice scripting language, that can co-operate with PB. AFAIR there's a PB library for this purpose somewhere around here.

Regards, Little John

[NicknameFJ]

Hi,

I think I can remember that in the german Forum someone has written a script language with PB-Syntax. I don´t know who it was, just right now, but I´m searching for.

This script language, I guess, is like an PB-Interpreter which can execute PB-Syntax-Scripts dynamically.

Greetings

NicknameFJ

/edit: I found it - here´s the link

http://www.purebasic.fr/german/viewtopi ... 46&start=0

[cybergeek]

Hi,

/edit: I found it - here´s the link

http://www.purebasic.fr/german/viewtopi ... 46&start=0

thx.. but i dont know german ... transalation is very bad ..

but still tried and couldnt get it to work

Code: Select all

Define *ByteCode
script.s = "MessageRequester(" + Chr(34) + "Information" + Chr(34) + "," + Chr(34) + "Just a short information text" + Chr(34) + "," + Chr(34) + "#PB_MessageRequester_Ok)"
*ByteCode = PBSCompileScriptString(script)

If PBSOpenByteMemory(0, *ByteCode)
  PBSStartByteCode(0)
EndIf

[citystate]

perhaps this will work for you

Code: Select all

Define *ByteCode
script.s = "MessageRequester(" + Chr(34) + "Information" + Chr(34) + "," + Chr(34) + "Just a short information text" + Chr(34) + "," + "#PB_MessageRequester_Ok)"
*ByteCode = PBSCompileScriptString(script)

If PBSOpenByteMemory(0, *ByteCode)
  PBSStartByteCode(0)
EndIf

looks like you had an extra Chr(34) in there