185             priority: GLfloat;

   185             priority: GLfloat;

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

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

   187             PrevTexture, NextTexture: PTexture;

   187             PrevTexture, NextTexture: PTexture;

   188             end;

   188             end;

   189 

   189 

   191 

   191 

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

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

   193 const

   193 const

   194     sfMax = 1000;

   194     sfMax = 1000;

   195     cDefaultParamNum = 16;

   195     cDefaultParamNum = 16;