(AGK version: 108.15)

Submitted: 2013-07-09 02:25:54

Setvirtualresolution(640,480)
ResetTimer()
id = CreateParticles(150,150)
SetParticlesSize(id,2.0)
SetParticlesLife(id,8.0)
SetParticlesFrequency(id,10)

AddVirtualButton(1,580,420,80)
SetVirtualButtonText(1,"Update")
Do
    If GetVirtualButtonPressed(1)
        For i=0 to 50
            UpdateParticles(id,0.02)
        Next i
    EndIf
    If Timer()>20 Then Exit
    Sync()
Loop
End

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