Import mojo

Function Main:Int()
	New Game()
End Function

Class Game Extends App
	Field hoob:Image

	Method OnCreate:Int()
		SetUpdateRate 60


		Local time:Int = Millisecs()
			For Local i:Int = 0 To 10
				hoob = LoadImage("background.jpg")
			Next
		Print Millisecs() -time
	End Method

	Method OnUpdate:Int()
		If MouseHit()
		Local time:Int = Millisecs()
			For Local i:Int = 0 To 10
				hoob = LoadImage("background.jpg")
			Next
		Print Millisecs() -time
		End If


	End Method

	Method OnRender:Int()
		Cls()

			DrawImage(hoob, 64, Rnd(64, 128))
		DrawRect(32, 32, Rnd(32, 64), 32)
	End Method

	Method OnLoading:Int()
		Cls()
		SetColor(255, 0, 0)
		DrawCircle(320, 240, 50)
	End Method
End Class