- var posx,posz:glfloat;//Koordinaten der Kamera(posy ist immer 0)
- const Quadrat1 = 3;//Namensstack Nr.3
- Procedure Quadrat;
- begin
- glbegin(GL_POLYGON);
- glcolor3f(0.5,0.5,0.5);
- glvertex3f(0,0,0);
- glvertex3f(0,1,0);
- glvertex3f(1,1,0);
- glvertex3f(1,0,0);
- glend;
- end;
- {...}
- //In der draw-Prozedur:
- glloadname(Quadrat1);
- Quadrat;