(AGK version: 108.15)

Submitted: 2013-07-06 07:07:41

Setvirtualresolution(640,480)
ResetTimer()
id = CreateParticles(150,150)
SetParticlesSize(id,2.0)
SetParticlesLife(id,5)
AddParticlesForce(id,1,2,160,160 )
Do
    If Timer()>10 Then Exit
    Sync()
Loop
ClearParticlesForces(id)
Repeat
    Sync()
Until Timer()>18
End

Help make AGK better by submitting an example for this command!
(All examples are subject to approval)