Bug: Light sprite with Virtual Resolution

This topic contains 3 replies, has 3 voices, and was last updated by Playniax 1 year, 7 months ago.

Viewing 4 posts - 1 through 4 (of 4 total)

Author

Posts

September 9, 2017 at 11:53 pm #10378

Participant

I’ve altered the simple light example to implement a virtual resolution, but when I move the mouse around the light sprite doesnt move correctly with the mouse when I maximize the window:

[crayon-5cba8cf27e93b020364821 inline="true" ]Namespace myapp

#Import "<std>"
#Import "<mojo>"

#Import "Slate Tiles II_D.png"
#Import "Slate Tiles II_N.png"
#Import "Slate Tiles II_S.png"
#Import "cone_orange.png"
#Import "Monkey2-logo-48.png"

Using std..
Using mojo..
Global virtualResolution:=New Vec2i( 640,480 )
Class MyWindow Extends Window

	Field _floor:Image
	
	Field _light:Image
	
	Field _logo:Image
	
	Method New()
		Super.New( "Test Window",640,480,WindowFlags.Resizable )
		Layout = "letterbox"
		ClearColor=Color.Black
	
		_floor=Image.LoadBump( "asset::Slate Tiles II_D.png","asset::Slate Tiles II_N.png","asset::Slate Tiles II_S.png",.75,True )
		
		_light=Image.LoadLight( "asset::cone_orange.png" )
		
		_light.Handle=New Vec2f( .5,0 )
		
		_light.Scale=New Vec2f( 3, 3 )
	
		_logo=Image.Load( "asset::Monkey2-logo-48.png" )
		
		_logo.Handle=New Vec2f( .5 )
		
		_logo.ShadowCaster=New ShadowCaster( _logo.Width/2,20 )

	End
	Method OnMeasure:Vec2i() Override
		Return virtualResolution
	End
	
	Method OnRender( canvas:Canvas ) Override
	
		Global viewRot:=0.0
		
		viewRot+=.001
	'	canvas.Translate( Width/2,Height/2 )
	'	canvas.Scale( Sin( viewRot*3 )*.25+1.25,Cos( viewRot*5 )*.25+1.25 )
	'	canvas.Rotate( viewRot )
	'	canvas.Translate( -Width/2,-Height/2 )
		
		Local rmouse:=-canvas.Matrix * Mouse.Location

		Global lightRot:=0.0
		lightRot+=.02
	
		App.RequestRender()
		
		canvas.AmbientLight=New Color( .1,.1,.1,1 ) 'Color.DarkGrey
		
		canvas.BeginLighting()
		
		canvas.AddLight( _light,rmouse.X,rmouse.Y,lightRot )
		canvas.AddLight( _light,rmouse.X,rmouse.Y,lightRot+Pi )
		canvas.AddLight( _light,rmouse.X,rmouse.Y,lightRot+Pi/2 )
		canvas.AddLight( _light,rmouse.X,rmouse.Y,lightRot+Pi+Pi/2 )
		
		For Local x:=0 Until Width Step _floor.Width

			For Local y:=0 Until Height Step _floor.Height

				canvas.DrawImage( _floor,x,y )

			Next

		Next
		
		For Local an:=0.0 Until TwoPi Step TwoPi/8.0
		
			canvas.DrawImage( _logo,Width/2+Cos( an ) * Width/4,Height/2 + Sin( an ) * Height/4 )
		
		Next
		
		canvas.EndLighting()
		
		canvas.DrawText( Floor( App.FPS+.5 ),Width/2,0,.5,0 )
	End
	
End

Function Main()

	New AppInstance
	
	New MyWindow
	
	App.Run()
End

100

101

102

103

104

[crayon-5cba8cf27e93b020364821 inline="true" ]Namespace myapp

#Import "<std>"

#Import "<mojo>"

#Import "Slate Tiles II_D.png"

#Import "Slate Tiles II_N.png"

#Import "Slate Tiles II_S.png"

#Import "cone_orange.png"

#Import "Monkey2-logo-48.png"

Using std..

Using mojo..

Global virtualResolution:=New Vec2i( 640,480 )

Class MyWindow Extends Window

Field _floor:Image

Field _light:Image

Field _logo:Image

Method New()

Super.New( "Test Window",640,480,WindowFlags.Resizable )

Layout = "letterbox"

ClearColor=Color.Black

_floor=Image.LoadBump( "asset::Slate Tiles II_D.png","asset::Slate Tiles II_N.png","asset::Slate Tiles II_S.png",.75,True )

_light=Image.LoadLight( "asset::cone_orange.png" )

_light.Handle=New Vec2f( .5,0 )

_light.Scale=New Vec2f( 3, 3 )

_logo=Image.Load( "asset::Monkey2-logo-48.png" )

_logo.Handle=New Vec2f( .5 )

_logo.ShadowCaster=New ShadowCaster( _logo.Width/2,20 )

End

Method OnMeasure:Vec2i() Override

Return virtualResolution

End

Method OnRender( canvas:Canvas ) Override

Global viewRot:=0.0

viewRot+=.001

' canvas.Translate( Width/2,Height/2 )

' canvas.Scale( Sin( viewRot*3 )*.25+1.25,Cos( viewRot*5 )*.25+1.25 )

' canvas.Rotate( viewRot )

' canvas.Translate( -Width/2,-Height/2 )

Local rmouse:=-canvas.Matrix * Mouse.Location

Global lightRot:=0.0

lightRot+=.02

App.RequestRender()

canvas.AmbientLight=New Color( .1,.1,.1,1 ) 'Color.DarkGrey

canvas.BeginLighting()

canvas.AddLight( _light,rmouse.X,rmouse.Y,lightRot )

canvas.AddLight( _light,rmouse.X,rmouse.Y,lightRot+Pi )

canvas.AddLight( _light,rmouse.X,rmouse.Y,lightRot+Pi/2 )

canvas.AddLight( _light,rmouse.X,rmouse.Y,lightRot+Pi+Pi/2 )

For Local x:=0 Until Width Step _floor.Width

For Local y:=0 Until Height Step _floor.Height

canvas.DrawImage( _floor,x,y )

For Local an:=0.0 Until TwoPi Step TwoPi/8.0

canvas.DrawImage( _logo,Width/2+Cos( an ) * Width/4,Height/2 + Sin( an ) * Height/4 )

canvas.EndLighting()

canvas.DrawText( Floor( App.FPS+.5 ),Width/2,0,.5,0 )

End

Function Main()

New AppInstance

New MyWindow

App.Run()

End

[/crayon]

September 10, 2017 at 6:38 am #10385

Mark Sibly

Keymaster

Woah, had to dig deep to find that one, but once I did the fix was surprisingly simple and halved the length of the light vertex shader in the process.

Fix push to develop branch, but you should really only need to update this file:

https://github.com/blitz-research/monkey2/blob/develop/modules/mojo/graphics/shaders/light.glsl