Hello again,

When I run this script and hit the left mouse button every second or so, it hangs up after 5 or so seconds. "Not responding". The "close" box turns red; I'm at 1.9.16.16, Windows 10. Thanks in advance, Dave

    Uses "TBGL"

  Global hWnd, hFont As DWord
  Global s1 As String      
  
  s1 = "ESC to exit"
  hWnd = TBGL_CreateWindowEx( _
    s1, 1024, 742, 32, %TBGL_WS_WINDOWED Or %TBGL_WS_CLOSEBOX) 
  TBGL_UseVSync 1
  hFont = TBGL_FontHandle("Courier New", 12) 
  TBGL_BuildFont hFont
  TBGL_ShowWindow 
  TBGL_UseLighting %FALSE
  TBGL_UseLightSource %GL_LIGHT0, %TRUE
  TBGL_ResetKeyState() 
  Do While TBGL_IsWindow(hwnd)
    If TBGL_GetWindowKeyState(hWnd, %VK_ESCAPE) Then Stop
    TBGL_ClearFrame
    TBGL_Camera 1,1,5, 0,0,0            
    TBGL_Color 255,255,255                        
    TBGL_UseLighting %FALSE
    TBGL_PrintFont TBGL_MouseGetLButton, -1,1,0
    TBGL_DrawFrame
  Loop