525         end;

   525         end;

   526 {$ENDIF}

   526 {$ENDIF}

   527 

   527 

   528 {$IFNDEF PAS2C}

   528 {$IFNDEF PAS2C}

   529     if not Load_GL_VERSION_2_0 then

   529     if not Load_GL_VERSION_2_0 then

   531 {$ENDIF}

   534 {$ENDIF}

   532 

   535 

   533     shaderWater:= CompileProgram('water');

   536     shaderWater:= CompileProgram('water');

   534     glUseProgram(shaderWater);

   537     glUseProgram(shaderWater);

   535     glUniform1i(glGetUniformLocation(shaderWater, pchar('tex0')), 0);

   538     glUniform1i(glGetUniformLocation(shaderWater, pchar('tex0')), 0);