Nice effect, but i expected more. But you know there is many demos that have been produced, mainly in asm, pascal, c++ etc. And u can download many of them from:
http://www.pouet.net/
http://www.monostep.org/
http://www.scene.org/
The demodvd consists of realtime demos that have been framegrabbed to make a video out of these. The demoscene
have existed since the 80`s.
Next time do more parts + have some music. Then it`s a demo
You can easily use the timer to do many parts.
REM ==TIMERVARIABLES INIT==
timerstart = 0
timernow = 0
REM ==TIMERVARIABLES END==
Timerstart = Timer()
REM ==FIRST EFFECT==
DO
Timernow = Timer()-Timerstart
Do your rendering stuff here
IF Timernow > 20000 `The effect lasts for 20 seconds
FLUSH VIDEO MEMORY
EXIT
ENDIF
LOOP
REM ==SECOND EFFECT==
DO
Timernow = Timer()-Timerstart
Do your rendering stuff here
IF Timernow > 30000 `The effect lasts for 30-20 = 10 seconds
FLUSH VIDEO MEMORY
EXIT
ENDIF
LOOP