bool CShader::loadShader(string sFile, int a_iType) 
{ 
   FILE* fp = fopen(sFile.c_str(), "rt"); /* Abre el archivo sFile para lectura (la "t" se usa para explicitar que es "texto", es un modificador adicional, que depende de la implementacion de la funcion fopen, es decir, puede ser valido como no, o ignorado -corrijanme si me equivoco-) */
   if(!fp)return false;    /* Si no pudo abrir el archivo, retorna false */
 
   // Get all lines from a file
 
   vector<string> sLines; 
   char sLine[255]; 
   /* La expresion que se evalua en el while obtiene las lineas desde el archivo (fp) de a 255 caracteres copiando en el arreglo de char 'sLine'. Cuando encuentra EOF (o error) retorna. */
   while(fgets(sLine, 255, fp))
           sLines.push_back(sLine);  /* En el cuerpo del while, en cada iteracion agrega un elemento al vector de strings 'sLines'*/
   fclose(fp);    /* Cierra el archivo sFile */
 
   const char** sProgram = new const char*[ESZ(sLines)]; /* Crea sProgram para almacenar el vector de strings como un arreglo de char* */
   FOR(i, ESZ(sLines))sProgram[i] = sLines[i].c_str(); /* Convierte cada string del vector a un string de c (char*) y lo almacena en sProgram */
 
   uiShader = glCreateShader(a_iType); 
 
   glShaderSource(uiShader, ESZ(sLines), sProgram, NULL); 
   glCompileShader(uiShader); 
 
   delete[] sProgram; /* Elimina el arreglo de chars sProgram */
 
   int iCompilationStatus; 
   glGetShaderiv(uiShader, GL_COMPILE_STATUS, &iCompilationStatus); 
 
   if(iCompilationStatus == GL_FALSE)return false; 
   iType = a_iType; 
   bLoaded = true; 
 
   return 1; 
}