use Tao.Sdl use Tao.OpenGl class Program def main is shared evt as Sdl.SDL_Event Sdl.sdl_Init(Sdl.sdl_INIT_EVERYTHING) surfacePtr = Sdl.sdl_SetVideoMode(640,480,32,Sdl.sdl_HWSURFACE|Sdl.sdl_DOUBLEBUF|Sdl.sdl_ANYFORMAT|Sdl.sdl_OPENGL) h = 640.0 / 480.0 Gl.glViewport(0, 0, 640, 480) Gl.glMatrixMode(Gl.gl_PROJECTION) Gl.glLoadIdentity() Gl.glFrustum(-1.0 to float, 1.0 to float, -h to float, h to float, 5.0 to float, 60.0 to float) Gl.glMatrixMode(Gl.gl_MODELVIEW) Gl.glLoadIdentity() Gl.glTranslatef(0.0 to Single, 0.0 to Single, -40.0 to Single) while true Sdl.sdl_PollEvent(out evt) #print evt.type aaa as int aaa= 12 branch aaa on Sdl.SDL_QUIT break print "huhu" """ X:\cobra>cobra.exe -sharp-compiler:"H:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\csc" muh.cobra -r:Tao.Sdl -r:Tao.OpenGl -lib :"X:\Programme\Tao\bin" error: COBRA INTERNAL ERROR / AssertException / ; sourceSite = X:\cobrasvn\Source\CobraParser.cobra:1755 in Parser.branchStmt for object Parser; info = nil; this = Parser; not (expr inherits BinaryOpExpr) = false; (expr inherits BinaryO pExpr) = true; expr = DotExpr-sh(10341, didBindInh=false, didBindInt=false, didBindImp=false, token=Token(DOT, '.', '.', l n 25, col 11, muh.cobra), type=nil, definition=nil, 10341); BinaryOpExpr = BinaryOpExpr (RuntimeType); Compilation failed - 1 error, 0 warnings Not running due to errors above. """