Scaled window mode

I just do this trick:

Graphics3D 800,600,0,2
Graphics3D 800,600,0,3


While Not KeyHit(1)
	Text 10,10,"Scalable & big!"
	Flip
	Cls
Wend