(AGK version: 108.15)

Submitted: 2013-07-06 07:37:50

Setvirtualresolution(640,480)
ResetTimer()
id = CreateParticles(150,150)
SetParticlesSize(id,2.0)
SetParticlesLife(id,5)
AddParticlesForce(id,1,2,160,160 )

Do
    If GetParticlesActive(id)=1
        Print("Particles are Active")
    ElseIf GetParticlesActive(id)=0
        Print("Particles are In-Active")
    EndIf
    If Timer()>12 Then Exit
    Sync()
Loop
End

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