Screen and Window

BlitzMax Forums/BlitzMax Beginners Area/Screen and Window

setviewport?
You can either scroll the viewport (image remains stationary) or change the drawimage offset (viewport remains stationary). If you have multiple images you can use setorigin to change them all.
Bit clunky...
Graphics 800 , 600
Local bg:TImage = LoadImage("skyatnightold_800_600.png")
Local x:Int = 100
Local y:Int = 100
Local tomove:Int=1
While Not KeyHit(KEY_ESCAPE)
	Cls
	If KeyHit(KEY_SPACE) tomove = - tomove
	If tomove = 1
		If KeyDown(KEY_DOWN) y:+ 1
		If KeyDown(KEY_UP) y:- 1
		If KeyDown(KEY_RIGHT) X:+ 1
		If KeyDown(KEY_LEFT) x:- 1
		SetViewport x , y , 200,200
		DrawImage bg , 0 , 0
	Else
		If KeyDown(KEY_DOWN) imagey:+ 1
		If KeyDown(KEY_UP) imagey:- 1
		If KeyDown(KEY_RIGHT) imageX:+ 1
		If KeyDown(KEY_LEFT) imagex:- 1
		SetViewport x,y,200,200
		SetOrigin imagex , imagey
		DrawImage bg,0,0
	EndIf   
	Flip
Wend