182             priority: GLfloat;

   182             priority: GLfloat;

   183             vb, tb: array [0..3] of TVertex2f;

   183             vb, tb: array [0..3] of TVertex2f;

   184             PrevTexture, NextTexture: PTexture;

   184             PrevTexture, NextTexture: PTexture;

   185             end;

   185             end;

   186 

   186 

   188 

   188 

   189     TScreenFade = (sfNone, sfInit, sfToBlack, sfFromBlack, sfToWhite, sfFromWhite);

   189     TScreenFade = (sfNone, sfInit, sfToBlack, sfFromBlack, sfToWhite, sfFromWhite);

   190 const

   190 const

   191     sfMax = 1000;

   191     sfMax = 1000;

   192     cDefaultParamNum = 16;

   192     cDefaultParamNum = 16;