Setvirtualresolution(640,480)
ResetTimer()
id = CreateParticles(150,150)
SetParticlesSize(id,2.0)
SetParticlesLife(id,5)
AddParticlesColorKeyFrame(id,0,255,255,255,255 )
AddParticlesColorKeyFrame(id,1,0,255,0,255 )
AddParticlesColorKeyFrame(id,2,0,0,255,255 )
AddParticlesColorKeyFrame(id,3,255,0,0,255 )
Do
If Timer()>10 Then Exit
Sync()
Loop
ClearParticlesColors(id)
Repeat
Sync()
Until Timer()>15
End
Help make AGK better by submitting an example for this command! (All examples are subject to approval)
Setvirtualresolution(640,480) ResetTimer() id = CreateParticles(150,150) SetParticlesSize(id,2.0) SetParticlesLife(id,5) AddParticlesColorKeyFrame(id,0,255,255,255,255 ) AddParticlesColorKeyFrame(id,1,0,255,0,255 ) AddParticlesColorKeyFrame(id,2,0,0,255,255 ) AddParticlesColorKeyFrame(id,3,255,0,0,255 ) Do If Timer()>10 Then Exit Sync() Loop ClearParticlesColors(id) Repeat Sync() Until Timer()>15 End