- { Planeten }
- glDisable(GL_BLEND);
- glEnable(GL_DEPTH_TEST);
- glBindTexture(GL_TEXTURE_2D, tex[14]);
- gluSphere(planets[0+3],planets_data[1,0],80,80);
- glEnable(GL_LIGHTING);
- for i := 1 to 9 do
- begin
- glColor4f(1,1,1,1.0);
- glDisable(GL_BLEND);
- glEnable(GL_DEPTH_TEST);
- glTranslatef(0,-planets_data[2,i]*20,0);
- glBindTexture(GL_TEXTURE_2D, tex[i+3]);
- gluSphere(planets[i+3],planets_data[1,i],50,50);
- {---> Atmosphäre}
- glEnable(GL_BLEND);
- glDisable(GL_DEPTH_TEST);
- glBlendFunc(GL_SRC_ALPHA,GL_ONE);
- glColor4f(1,1,1,durchs);
- glBindTexture(GL_TEXTURE_2D, tex[0]);
- gluSphere(planets_atm[i+3],planets_data[1,i]+planets_data[1,i]/100,50,50);
- end;