Fullscreen to windowed from within the app?

Author

Message

IBOL

Retired Moderator

20

Years of Service

User Offline

Joined: 30th Mar 2004

Location: @IBOL17

Posted: 16th Feb 2016 16:01

Link

Commercial desktop games allow the user to change resolutions, as well as switching from "windowed" to "fullscreen" mode from within the app.

Can AppGameKit 2 do that?

http://www.indiedb.com/company/ibology

Back to top

Profile PM Email Website

BatVink

Moderator

21

Years of Service

User Offline

Joined: 4th Apr 2003

Location: Gods own County, UK

Posted: 16th Feb 2016 16:59

Link

https://forum.thegamecreators.com/thread/216483

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Quidquid latine dictum sit, altum sonatur
TutCity is being rebuilt

Back to top

Profile PM Email

IBOL

Retired Moderator

20

Years of Service

User Offline

Joined: 30th Mar 2004

Location: @IBOL17

Posted: 16th Feb 2016 17:10

Link

Batvink's link is *not* an answer to my question, unless the answer he means is "no".

Think of any commercial game.
settings > graphics > resolution >
800x600
1024x768
1280x720

etc.

*that* is what I am asking about.

Allow the user to set the resolution, and possibly even the "windowed or fullscreen" from within the game, which every game I can think of *can* do.

http://www.indiedb.com/company/ibology

Back to top

Profile PM Email Website

CJB

Valued Member

20

Years of Service

User Offline

Joined: 10th Feb 2004

Location: Essex, UK

Posted: 16th Feb 2016 17:19

Link

The answer is "No". AppGameKit doesn't give you that level of full-screen control (yet).

V2 T1 (Mostly)
Phone Tap!
Uzmadesign

Back to top

Profile PM Email Website

IBOL

Retired Moderator

20

Years of Service

User Offline

Joined: 30th Mar 2004

Location: @IBOL17

Posted: 16th Feb 2016 18:13

Link

ok, thanks for truth.

I am playing with the % system right now.

But no matter what you do, there will always be some who complain about it...
"what , no full screen?!" , "what, only fullscreen?!" , "I accidentally closed the game by clicking on the big red 'X' at the top right!" , etc.

http://www.indiedb.com/company/ibology

Back to top

Profile PM Email Website

Digital Awakening

AGK Developer

21

Years of Service

User Offline

Joined: 27th Aug 2002

Location: Sweden

Posted: 16th Feb 2016 21:01

Link

You can switch between fullscreen and windowed and change the resolution with SetWindowSize( width, height, fullscreen )

However, AppGameKit doesn't currently support a backbuffer of a different size than your view. This means that if you use a resolution lower than fullscreen you will get a window instead.

I would not recommend using the percentage system myself. Pick a virtual resolution, use SetScissor( 0, 0, 0, 0 ) and use the GetScreenBounds commands.

Back to top

Profile PM Website

BatVink

Moderator

21

Years of Service

User Offline

Joined: 4th Apr 2003

Location: Gods own County, UK

Posted: 16th Feb 2016 21:11

Link

OK, ignoring the frosty reception to my first attempt to help, this code shows how you can solve half of the challenge - changing window size. You don't need to change the virtual resolution, but it is an option.
For full/windowed, you'd need a restart of the application after the choice is made. But I believe this is still quite normal for many games.

DBPro has a DISABLE SYSTEMKEYS option, but I don't think we have that in AppGameKit to prevent an early exit. The red X is the same as Alt F4 in Windows.

// Project: test
// Created: 2016-02-10
 
// set window properties
SetWindowTitle( "test" )
SetWindowSize( 1024, 768, 0 )
 
// set display properties
SetVirtualResolution( 1024, 768 )
SetOrientationAllowed( 1, 1, 1, 1 )
 
global vw
global vh
global ts
global option
 
global opt as integer[3]

option = 2
opt[1] = createText("640x480")
opt[2] = createText("1024x768")
opt[3] = createText("1280x720")

for n = 0 to 3
	SetTextAlignment(opt[n],1)
next n

setScreenParms()
setText()

do
	
	if GetPointerReleased() = 1
		for n = 1 to 3
			if GetTextHitTest(opt[n], getpointerx(), getpointery()) = 1
				option = n
				setScreenParms()
				setText()
				exit
			endif
		next n

endif
	sync()
loop

function setText()
	
	for n = 0 to 3
		SetTextSize(opt[n], ts)
		settextposition(opt[n], vw/2, (vh * 0.3) + (vh * n * 0.1))
		if n = option
			SetTextColor(opt[n],212,255,212,255)
		else
			SetTextColor(opt[n],255,255,255,255)
		endif
	next n
	
endfunction

function setScreenParms()
	
	select option
		case 1
			SetWindowSize(640,480,0)
			SetVirtualResolution(640,480)
		endcase
		
		case 2
			SetWindowSize(1024,768,0)
			SetVirtualResolution(1024,768)
		endcase
		
		case 3
			SetWindowSize(1280,720,0)
			SetVirtualResolution(1280,720)
		endcase
		
	endselect
	
	vw = GetVirtualWidth()
	vh = GetVirtualHeight()
	ts = 40 * (vw/1024.0)
	
endfunction

+ Code Snippet

 
// Project: test
// Created: 2016-02-10
 
// set window properties
SetWindowTitle( "test" )
SetWindowSize( 1024, 768, 0 )
 
// set display properties
SetVirtualResolution( 1024, 768 )
SetOrientationAllowed( 1, 1, 1, 1 )
 
global vw
global vh
global ts
global option
 
global opt as integer[3]

option = 2
opt[1] = createText("640x480")
opt[2] = createText("1024x768")
opt[3] = createText("1280x720")

for n = 0 to 3
	SetTextAlignment(opt[n],1)
next n

setScreenParms()
setText()

do
	
	if GetPointerReleased() = 1
		for n = 1 to 3
			if GetTextHitTest(opt[n], getpointerx(), getpointery()) = 1
				option = n
				setScreenParms()
				setText()
				exit
			endif
		next n

	endif
	sync()
loop


function setText()
	
	for n = 0 to 3
		SetTextSize(opt[n], ts)
		settextposition(opt[n], vw/2, (vh * 0.3) + (vh * n * 0.1))
		if n = option
			SetTextColor(opt[n],212,255,212,255)
		else
			SetTextColor(opt[n],255,255,255,255)
		endif
	next n
	
endfunction

function setScreenParms()
	
	select option
		case 1
			SetWindowSize(640,480,0)
			SetVirtualResolution(640,480)
		endcase
		
		case 2
			SetWindowSize(1024,768,0)
			SetVirtualResolution(1024,768)
		endcase
		
		case 3
			SetWindowSize(1280,720,0)
			SetVirtualResolution(1280,720)
		endcase
		
	endselect
	
	vw = GetVirtualWidth()
	vh = GetVirtualHeight()
	ts = 40 * (vw/1024.0)
	
endfunction

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Quidquid latine dictum sit, altum sonatur
TutCity is being rebuilt

Back to top

Profile PM Email

BatVink

Moderator

21

Years of Service

User Offline

Joined: 4th Apr 2003

Location: Gods own County, UK

Posted: 16th Feb 2016 21:22

Link

I read DA's post after mine, and realised you can also set full screen (thanks DA, I had assumed that setting fullscreen was only possible at the start of the program!). Here is the amended code.
If you want full screen and a lower resolution, then you can set the Virtual Resolution to be lower than the device resolution.

// Project: test
// Created: 2016-02-10
 
// set window properties
SetWindowTitle( "test" )
SetWindowSize( 1024, 768, 0 )
 
// set display properties
SetVirtualResolution( 1024, 768 )
SetOrientationAllowed( 1, 1, 1, 1 )
 
global vw
global vh
global ts
global fs
global option
 
global opt as integer[3]

fs = 0
option = 2
opt[0] = createText("Full")
opt[1] = createText("640x480")
opt[2] = createText("1024x768")
opt[3] = createText("1280x720")

for n = 0 to 3
	SetTextAlignment(opt[n],1)
next n
fs = 0

setScreenParms()
setText()

do
	
	if GetPointerReleased() = 1
		for n = 0 to 3
			if GetTextHitTest(opt[n], getpointerx(), getpointery()) = 1
				if  n = 0 and fs = 1 then n = 2
				option = n
				setScreenParms()
				setText()
				// full/windowed
				if option = 0
					if fs = 0
						fs = 1 
						SetTextString(opt[0], "Windowed")
					else 
						fs = 0
						SetTextString(opt[0], "Full")
					endif
				endif
				exit
			endif
		next n

endif
	sync()
loop

function setText()
	
	log("text Size = " + str(ts))
	for n = 0 to 3
		SetTextSize(opt[n], ts)
		settextposition(opt[n], vw/2, (vh * 0.3) + (vh * n * 0.1))
		if n = option
			SetTextColor(opt[n],212,255,212,255)
		else
			SetTextColor(opt[n],255,255,255,255)
		endif
	next n
	
endfunction

function setScreenParms()
	
	select option
		case 0
			SetWindowSize(GetDeviceWidth(),GetDeviceHeight(),1)
			SetVirtualResolution(GetDeviceWidth(),GetDeviceHeight())
		endcase
		
		case 1
			SetWindowSize(640,480,0)
			SetVirtualResolution(640,480)
		endcase
		
		case 2
			SetWindowSize(1024,768,0)
			SetVirtualResolution(1024,768)
		endcase
		
		case 3
			SetWindowSize(1280,720,0)
			SetVirtualResolution(1280,720)
		endcase
		
	endselect
	
	vw = GetVirtualWidth()
	vh = GetVirtualHeight()
	ts = 40 * (vw/1024.0)
	
endfunction

+ Code Snippet

 
// Project: test
// Created: 2016-02-10
 
// set window properties
SetWindowTitle( "test" )
SetWindowSize( 1024, 768, 0 )
 
// set display properties
SetVirtualResolution( 1024, 768 )
SetOrientationAllowed( 1, 1, 1, 1 )
 
global vw
global vh
global ts
global fs
global option
 
global opt as integer[3]

fs = 0
option = 2
opt[0] = createText("Full")
opt[1] = createText("640x480")
opt[2] = createText("1024x768")
opt[3] = createText("1280x720")

for n = 0 to 3
	SetTextAlignment(opt[n],1)
next n
fs = 0

setScreenParms()
setText()

do
	
	if GetPointerReleased() = 1
		for n = 0 to 3
			if GetTextHitTest(opt[n], getpointerx(), getpointery()) = 1
				if  n = 0 and fs = 1 then n = 2
				option = n
				setScreenParms()
				setText()
				// full/windowed
				if option = 0
					if fs = 0
						fs = 1 
						SetTextString(opt[0], "Windowed")
					else 
						fs = 0
						SetTextString(opt[0], "Full")
					endif
				endif
				exit
			endif
		next n

	endif
	sync()
loop


function setText()
	
	log("text Size = " + str(ts))
	for n = 0 to 3
		SetTextSize(opt[n], ts)
		settextposition(opt[n], vw/2, (vh * 0.3) + (vh * n * 0.1))
		if n = option
			SetTextColor(opt[n],212,255,212,255)
		else
			SetTextColor(opt[n],255,255,255,255)
		endif
	next n
	
endfunction

function setScreenParms()
	
	select option
		case 0
			SetWindowSize(GetDeviceWidth(),GetDeviceHeight(),1)
			SetVirtualResolution(GetDeviceWidth(),GetDeviceHeight())
		endcase
		
		case 1
			SetWindowSize(640,480,0)
			SetVirtualResolution(640,480)
		endcase
		
		case 2
			SetWindowSize(1024,768,0)
			SetVirtualResolution(1024,768)
		endcase
		
		case 3
			SetWindowSize(1280,720,0)
			SetVirtualResolution(1280,720)
		endcase
		
	endselect
	
	vw = GetVirtualWidth()
	vh = GetVirtualHeight()
	ts = 40 * (vw/1024.0)
	
endfunction

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Quidquid latine dictum sit, altum sonatur
TutCity is being rebuilt

Back to top

Profile PM Email

IBOL

Retired Moderator

20

Years of Service

User Offline

Joined: 30th Mar 2004

Location: @IBOL17

Posted: 29th Aug 2016 14:01 Edited at: 29th Aug 2016 14:05

Link

I am going to come back in on this thread
...because...

AGK2 does what i want!

since i upgraded to the new version, i found found many new great features and even released my first android app!

Thanks TGC!

Bob

Sorry your browser is not supported!

AppGameKit Classic Chat / Fullscreen to windowed from within the app?

Attachments