High Def Testing

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|262\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> Off Topic -> High Def Testing
Fri, 10 Jan 2025, 15:55
therevillsgames	Anyone got a monitor that runs a 4k res? 3840x2160? One of my players is having issues with a BlitzMax game and setting it to full screen (32bit) at that resolution, but the only one I have to this runs at 3440x1440 but it runs okay at that.
Fri, 10 Jan 2025, 15:55
Jayenkai	MacBook Air can run Windows games at up to 3420x2140, but is quite sketchy at that... -=-=- ''Load, Next List!''
Fri, 10 Jan 2025, 17:45
therevillsgames	Thanks Jay, could you try running this bit of code: SuperStrict ?Win32 Extern "win32" Function GetDesktopWindow:Int() Function ReleaseDC(hwnd:Int, hdc:Int) End Extern ? Function ccGetDesktopSize:Int(width:Int Var, height:Int Var) ?win32 'by hamZta / d-bug from DesktopExtension 1.12 Local hwnd:Int = GetDesktopWindow() Local hdc:Int = GetDC(hwnd) If hdc = Null Then Return -1 width = GetDeviceCaps(hdc, HORZRES) height = GetDeviceCaps(hdc, VERTRES) ReleaseDC(hwnd,hdc) ? ?MacOS macGetDesktopSize(Varptr width,Varptr height) ? Return 1 'success (probably) End Function Global WindowWidth:Int = 800 Global WindowHeight:Int = 600 Global DesktopWidth:Int = 0 Global DesktopHeight:Int = 0 Global Hertz:Int = 60 Global Depth:Int = 0 ccGetDesktopSize(DesktopWidth, DesktopHeight) WindowWidth = DesktopWidth WindowHeight = DesktopHeight Local OK:TGraphics = Null Print "Trying full screen at " + WindowWidth + "x" + WindowHeight + " 32bits..." If GraphicsModeExists(WindowWidth, WindowHeight, 32) Then Local ms:Int = MilliSecs() DebugLog "start" OK = Graphics(WindowWidth, WindowHeight, 32, Hertz) DebugLog "end = " + (MilliSecs() - ms) Depth = 32 Else Print("Oh noes") EndIf If OK Repeat Cls DrawLine(0, 0, WindowWidth, WindowHeight) Flip Until AppTerminate() Or KeyHit(KEY_ESCAPE) Else Print("Oh noes") EndIf --v
Fri, 10 Jan 2025, 18:01
therevillsgames	Hmm, so found out I can "fake" 4k using the NVIDIA control panel... Running the above code in debug mode it outputs: Trying full screen at 3840x2160 32bits... and displays the screen... Trying full screen at 3840x2160 32bits... DebugLog:start DebugLog:end = 66 running in release mode: Trying full screen at 2560x1440 32bits... and fails, but it doesnt go into the If statement :? Trying full screen at 2560x1440 32bits... Oh noes Oh noes
Fri, 10 Jan 2025, 18:08
therevillsgames	So release mode looks like it is picking up the desktop scaling (ie 150%).
Fri, 10 Jan 2025, 18:28
Jayenkai	Sorry, sleepy tonight!!! I'll see what I can see in the morning. -=-=- ''Load, Next List!''
Fri, 10 Jan 2025, 20:00
therevillsgames	What ?! It's only 3am over there as I type... slacker Joking!