Fireworks

[stef]

Hi!

The code below (in attachment) is a simple fireworkscode

It's more a test of particle-behaviour, but works.
The most breaking factor is the fading of a image of screen-size (800x600).I think it will better work with PBFX

controls:

leftclick: monocolor

rightclick: multicolor
F1: slow color cycles
F2: fast color cycles

spacekey: toggles starfield

EDIT: the version "fireworks2" (see next posts) is much faster

[stef]

Hi again!

You can made the code faster with "blitimage" (gives similar result)

change in loop:

delete line:

FadeImage fireim,90


instead of line: 

DrawImage fireim,0,0,1

paste:

BlitImage fireim,0,0,1,128,RGB(10,10,10),0,0   


Greetings
stef

[kevin]

   You can also use the InkModes commands to perform the fading of the particle buffer by setting it to alpha subtract and drawing a box over the image.  This then allows the particle buffer to be transparently drawn over the screen then. So the backdrop is visible

   The attached uses that method. Should give the same result as BlitImage.

[stef]

Hi

You method is incredible fast. Absolutlely cool :)

Greetings
stef

[Ian Price]

Very nice :)

[stef]

Hi!
Thx! :)

There is a small bug in "fireworks2" (spacekey is not working)
my stars were also a little bit jerkily (in fullscreen-mode)

This is a corrected version