Extend Effect interface with a function that is called once per VBlank (backported from 73520a0)

Author: cahirwpz

include/effect.h

@@ -46,34 +46,41 @@ typedef enum {
   EFFECT_RUNNING = 4,
 } EffectStateT;
 
+typedef void (*EffectFuncT)(void);
+
 typedef struct Effect {
   const char *name;
   EffectStateT state;
   /*
    * Executed in background task when other effect is running.
    * Precalculates data for the effect to be launched.
    */
-  void (*Load)(void);
+  EffectFuncT Load;
   /*
    * Frees all resources allocated by "Load" step.
    */
-  void (*UnLoad)(void);
+  EffectFuncT UnLoad;
   /*
    * Does all initialization steps required to launch the effect:
    * 1) Allocate memory for buffers
    * 2) Generate copper lists
    *    (setup for display window, display data fetch, palette, sprites, etc.)
    * 3) Set up interrupts and DMA channels (copper, blitter, etc.)
    */
-  void (*Init)(void);
+  EffectFuncT Init;
   /*
    * Frees all resources allocated by "Init" step.
    */
-  void (*Kill)(void);
+  EffectFuncT Kill;
   /*
    * Renders single frame of an effect.
    */
-  void (*Render)(void);
+  EffectFuncT Render;
+  /*
+   * Called each frame during VBlank interrupt.
+   * Effect::data will be passed as the argument.
+   */
+  EffectFuncT VBlank;
 } EffectT;
 
 void EffectLoad(EffectT *effect);
@@ -82,7 +89,7 @@ void EffectKill(EffectT *effect);
 void EffectUnLoad(EffectT *effect);
 void EffectRun(EffectT *effect);
 
-#define EFFECT(NAME, L, U, I, K, R)                                            \
+#define EFFECT(NAME, L, U, I, K, R, V)                                         \
   EffectT NAME##Effect = {                                                     \
     .name = #NAME,                                                             \
     .state = 0,                                                                \
@@ -91,6 +98,7 @@ void EffectRun(EffectT *effect);
     .Init = (I),                                                               \
     .Kill = (K),                                                               \
     .Render = (R),                                                             \
+    .VBlank = (V)                                                              \
   };                                                                           \
   ALIAS(NAME##Effect, Effect);