thank you petr for infos about "enum" translations help to thinbasic !
yoh! now I've done next step and crazy thing: I have translated the "irrlichtwrapper.bi" for thinbasic as include file (as well as I am able to do that after two hours!). see my zip folder. but I have to add something more. So I can imagine I have to connect the file to thincore? I must build a module engine?
' Empty GUI script created on 06-07-2011 18:31:07 by largo_winch (ThinAIR)
'' Includes for extension libraries
#INCLUDE "Irrlicht_lw1.inc"
Uses "console", "ui"
Declare Function LoadLibrary Lib "KERNEL32.DLL" Alias "LoadLibraryA" (lpLibFileName As Asciiz) As Long
hLib = LoadLibrary("IRRLICHT.DLL")
hLib = LoadLibrary("IRRLICHTWRAPPER.DLL")
'--------------------------------------------------------------->
IrrStart (%IRR_EDT_OPENGL, 400, 200, %IRR_BITS_PER_PIXEL_32,_
%IRR_WINDOWED, %IRR_NO_SHADOWS, %IRR_IGNORE_EVENTS,_
%IRR_VERTICAL_SYNC_ON )
'IrrStart, %IRR_EDT_OPENGL, 400, 200, 32,_
' %FALSE, %FALSE, %FALSE, 0
' Set the title of the display
IrrSetWindowCaption( "Example 01: Hello World" )
' add a static text object to the graphical user interface. The text will be
' drawn inside the defined rectangle, the box will not have a border and the
' text will not be wrapped around if it runs off the end
IrrAddStaticText( "Hello World", 4,0,200,16, %IRR_GUI_NO_BORDER, %IRR_GUI_NO_WRAP )
' while the scene is still running
While IrrRunning
' begin the scene, erasing the canvas to white before rendering
IrrBeginScene( 255,255,255 )
' draw the Graphical User Interface
IrrDrawGUI
' end drawing the scene and render it
IrrEndScene
Wend
' -----------------------------------------------------------------------------
' Stop the irrlicht engine and release resources
IrrStop
"irrstart" is a sub declaration but thinbasic doesn't accept this command or cannot read this command although it's defined in include file.
bye, largo
Bookmarks