
sick of loading levels created from 3d software and just run around them ok and abit of collisions easy

but what about entities like exploding crates / barrels trigger zones placing emitters in the level you have created then saving all data would be cool !! if any one is interested let me know !
heres some code using bluegui free version

its a start mind you lol
Rem Project: editor
Rem Created: Thursday, January 24, 2013
Rem ***** Main Source File *****
//
#Constant CMD_EXIT 0
//
Type ApplicationUi
dbwindow as integer
mainmenu as integer
filemenu as integer
statusbar as integer
EndType
//
Global myApp As ApplicationUi
//
CreateUi()
//
#Constant ScreenW 1024
#Constant ScreenH 768
#Constant ScreenD 32
//
Phy Start
Sync On
Sync Rate 0
Set Display Mode ScreenW, ScreenH, ScreenD
//
Make Object Box 1,100,1,100
Position Object 1,0,0,0
Rotate Object 1,0,0,0
Color Object 1,Rgb(25,16,123)
Phy Make Rigid Body Static Box 1
//
Make Object Sphere 2,20
Position Object 2,0,40,0
Rotate Object 2,0,0,0
Color Object 2,Rgb(225,16,123)
Set Shadow Shading On 2
Phy Make Rigid Body Dynamic Sphere 2
//
Set Camera View 0,0,ScreenW-128,ScreenH-20
Position Camera 0,150,160,-20
Point Camera 0,0,0,0
//
Position Light 0,200,120,-40
Point Light 0,0,0,0
//
Do
//
ProcessEvents()
//
Phy Update
//
FastSync
Loop
//
Function ProcessEvents()
//
GetEvent
//
_EventType = EventType()
//
_EventData = EventData()
//
_EventDataEx = EventDataEx()
//
_EventSource = EventSource()
// process menu events
If _EventType = MENU_CLICK
//
If _EventData = CMD_EXIT
DeleteGadget myApp.dbwindow
End
Endif
Endif
Endfunction
//
Function CreateUi()
// grab darkbasic window
myApp.dbwindow = CreateGadgetFromWindow( MainWindow() )
// create main menu & attach it to dbwindow
myApp.mainmenu = CreateMenu( myApp.dbwindow )
// create file menu item
AddMenuItem myApp.mainmenu, "&File", 0
// create file sub menu & attach it to > myApp . main menu
myApp.filemenu = CreateSubMenu( myApp.mainmenu, 0 )
// create exit menu item & attach it to > myApp . file menu
AddMenuItem myApp.filemenu, "Exit", CMD_EXIT
//
myApp.statusbar = CreateStatusBar( myApp.dbwindow )
//
AddStatusPanel myApp.statusbar, 200
//
SetStatusText myApp.statusbar, 1, "Ready..."
// create right side panel
panel = CreatePanel(ScreenW-128,0,ScreenW,ScreenH-41, myApp.dbwindow )
Endfunction
hexeg0n