TimelineFX Module

'The minimum we need to import is mojo and of course timelinefx!
Import mojo
Import timelinefx

'remember to make sure monkey is set up to read xml files!
#TEXT_FILES="*.txt|*.XML|*.xml|*.json"

'Create a simple Monky App Class
Class FXexample Extends App

	'Create some fields to store an effects libray, effect, and a particle manager. 
	Field MyEffects:tlEffectsLibrary
	Field MyEffect:tlEffect
	Field MyParticleManager:tlParticleManager

	'In the OnCreate method you can load your effects 
	'library and set up the particle manager.
	Method OnCreate()

		'load the effects file. See the docs on LoadEffects on how to 
		'prepare an effects library for use in monkey.
		MyEffects = LoadEffects("explosions")
		
		'Use GetEffect, to retrieve an effect from the library.
		MyEffect = MyEffects.GetEffect("toon explosion 2")
		
		'create a particle manager to manage all the effects and particles
		MyParticleManager = CreateParticleManager(5000)
		
		'Set the number of times per second that you want the particles to 
		'be updated. Best to set this to the UpdateRate
		SetUpdateFrequency(30)
		
		'Let the Particle manager know the screen size
		MyParticleManager.SetScreenSize(DeviceWidth(), DeviceHeight())
		
		'Set the origin so that we can use mouse coords to place effects on screen
		MyParticleManager.SetOrigin(DeviceWidth() / 2, DeviceHeight() / 2)
		
		'Mojo update rate
		SetUpdateRate 30
	End
	
	'Use the OnUpdate method to update the particle manager
	Method OnUpdate()
		'lets create an effect everytime the mouse is clicked
		If MouseHit
			'Copy the effect *Important! Dont just add an effect directly from the 
			'library, make a copy of it first*
			Local tempeffect:tlEffect = CopyEffect(MyEffect, MyParticleManager)
			
			'Position the effect where we want it
			tempeffect.SetPosition(MouseX, MouseY)
			
			'Add the effect to the particle manager
			MyParticleManager.AddEffect(tempeffect)			
		EndIf
		
		'Update the particle manager
		MyParticleManager.Update()
	End
	
	'Use the OnRender method to render all particles
	Method OnRender()
		Cls
		
		'draw the particles
		MyParticleManager.DrawParticles()
	End
End

Function Main()
	
	New FXexample
	
End

Import playniax.ignitionx.timelinefx.layer

'The minimum we need to import is mojo and of course timelinefx!
Import mojo
Import diddy
'Import timelinefx
Import playniax.ignitionx.timelinefx.layer
 
'Create a simple Monky App Class
Class FXexample Extends App
 
	'Create some fields to store an effects libray, effect, and a particle manager.
	Field MyEffects:tlEffectsLibrary
	Field MyEffect:tlEffect
	Field MyParticleManager:tlParticleManager
 
	'In the OnCreate method you can load your effects
	'library and set up the particle manager.
	Method OnCreate()
 
		'load the effects file. See the docs on LoadEffects on how to
		'prepare an effects library for use in monkey.
		MyEffects = LoadEffects("timeline")
 
		'Use GetEffect, to retrieve an effect from the library.
		MyEffect = MyEffects.GetEffect("explosions")
 
		'create a particle manager to manage all the effects and particles
		MyParticleManager = CreateParticleManager(5000)
 
		'Set the number of times per second that you want the particles to
		'be updated. Best to set this to the UpdateRate
		SetUpdateFrequency(30)
 
		'Let the Particle manager know the screen size
		MyParticleManager.SetScreenSize(DeviceWidth(), DeviceHeight())
 
		'Set the origin so that we can use mouse coords to place effects on screen
		MyParticleManager.SetOrigin(DeviceWidth() / 2, DeviceHeight() / 2)
 
		'Mojo update rate
		SetUpdateRate 30
	End
 
	'Use the OnUpdate method to update the particle manager
	Method OnUpdate()
		'lets create an effect everytime the mouse is clicked
		If MouseHit
			'Copy the effect *Important! Dont just add an effect directly from the
			'library, make a copy of it first*
			Local tempeffect:tlEffect = CopyEffect(MyEffect, MyParticleManager)
 
			'Position the effect where we want it
			tempeffect.SetPosition(MouseX, MouseY)
 
			'Add the effect to the particle manager
			MyParticleManager.AddEffect(tempeffect)
 
			tempeffect.SetZ(1)
		EndIf
 
		'Update the particle manager
		MyParticleManager.Update()
	End
 
	'Use the OnRender method to render all particles
	Method OnRender()
		Cls
 
		'draw the particles
		MyParticleManager.DrawParticles()
	End
End
 
Function Main()
 
	New FXexample
 
End