Context Navigation

OPENGL.PAS

Last change on this file was 8, checked in by RBRi, 19 years ago
+ rest of sibyl stuff
Property svn:eol-style set to `native`
File size: 82.2 KB

Rev	Line
[8]	1	Unit OpenGL;
	2
	3	{
	4	Copyright 1991-1993, Silicon Graphics, Inc.
	5	Ported to Sibyl by SpeedSoft 1997
	6	All Rights Reserved.
	7	}
	8
	9	Interface
	10
	11	Type
	12	GLenum=LongWord;
	13	GLboolean=Boolean;
	14	GLbitfield=LongWord;
	15	GLbyte=ShortInt;
	16	GLshort=ShortInt;
	17	GLint=LongInt;
	18	GLsizei=LongInt;
	19	GLubyte=Byte;
	20	GLushort=Word;
	21	GLuint=LongWord;
	22	GLfloat=Single;
	23	GLclampf=Single;
	24	GLdouble=Double;
	25	GLclampd=Double;
	26	GLvoid=Pointer;
	27
	28	PGLuByte=^GLubyte;
	29
	30	Const
	31	GLUT_RGB =0;
	32	GLUT_RGBA =GLUT_RGB;
	33	GLUT_INDEX =1;
	34	GLUT_SINGLE =0;
	35	GLUT_DOUBLE =2;
	36	GLUT_ACCUM =4;
	37	GLUT_ALPHA =8;
	38	GLUT_DEPTH =16;
	39	GLUT_STENCIL =32;
	40	GLUT_MULTISAMPLE =128;
	41	GLUT_STEREO =256;
	42
	43	GLUT_LEFT_BUTTON =0;
	44	GLUT_MIDDLE_BUTTON =1;
	45	GLUT_RIGHT_BUTTON =2;
	46
	47	GLUT_DOWN =0;
	48	GLUT_UP =1;
	49
	50	GLUT_KEY_F1 =1;
	51	GLUT_KEY_F2 =2;
	52	GLUT_KEY_F3 =3;
	53	GLUT_KEY_F4 =4;
	54	GLUT_KEY_F5 =5;
	55	GLUT_KEY_F6 =6;
	56	GLUT_KEY_F7 =7;
	57	GLUT_KEY_F8 =8;
	58	GLUT_KEY_F9 =9;
	59	GLUT_KEY_F10 =10;
	60	GLUT_KEY_F11 =11;
	61	GLUT_KEY_F12 =12;
	62	GLUT_KEY_LEFT =100;
	63	GLUT_KEY_UP =101;
	64	GLUT_KEY_RIGHT =102;
	65	GLUT_KEY_DOWN =103;
	66	GLUT_KEY_PAGE_UP =104;
	67	GLUT_KEY_PAGE_DOWN =105;
	68	GLUT_KEY_HOME =106;
	69	GLUT_KEY_END =107;
	70	GLUT_KEY_INSERT =108;
	71
	72	GLUT_LEFT =0;
	73	GLUT_ENTERED =1;
	74
	75	GLUT_MENU_NOT_IN_USE =0;
	76	GLUT_MENU_IN_USE =1;
	77
	78	GLUT_NOT_VISIBLE =0;
	79	GLUT_VISIBLE =1;
	80
	81	GLUT_RED =0;
	82	GLUT_GREEN =1;
	83	GLUT_BLUE =2;
	84
	85	{
	86	/* bitmap font opaque addresses (use constants instead in source code) */
	87	extern void *glutBitmap9By15;
	88	extern void *glutBitmap8By13;
	89	extern void *glutBitmapTimesRoman10;
	90	extern void *glutBitmapTimesRoman24;
	91	extern void *glutStrokeRoman;
	92	extern void *glutStrokeMonoRoman;
	93
	94	/* stroke font constants (use these in GLUT program) */
	95	GLUT_STROKE_ROMAN (&glutStrokeRoman)
	96	GLUT_STROKE_MONO_ROMAN (&glutStrokeMonoRoman)
	97
	98	GLUT_BITMAP_9_BY_15 (&glutBitmap9By15)
	99	GLUT_BITMAP_8_BY_13 (&glutBitmap8By13)
	100	GLUT_BITMAP_TIMES_ROMAN_10 (&glutBitmapTimesRoman10)
	101	GLUT_BITMAP_TIMES_ROMAN_24 (&glutBitmapTimesRoman24)
	102	}
	103
	104	Const
	105	GLUT_WINDOW_X =100;
	106	GLUT_WINDOW_Y =101;
	107	GLUT_WINDOW_WIDTH =102;
	108	GLUT_WINDOW_HEIGHT =103;
	109	GLUT_WINDOW_BUFFER_SIZE =104;
	110	GLUT_WINDOW_STENCIL_SIZE =105;
	111	GLUT_WINDOW_DEPTH_SIZE =106;
	112	GLUT_WINDOW_RED_SIZE =107;
	113	GLUT_WINDOW_GREEN_SIZE =108;
	114	GLUT_WINDOW_BLUE_SIZE =109;
	115	GLUT_WINDOW_ALPHA_SIZE =110;
	116	GLUT_WINDOW_ACCUM_RED_SIZE =111;
	117	GLUT_WINDOW_ACCUM_GREEN_SIZE =112;
	118	GLUT_WINDOW_ACCUM_BLUE_SIZE =113;
	119	GLUT_WINDOW_ACCUM_ALPHA_SIZE =114;
	120	GLUT_WINDOW_DOUBLEBUFFER =115;
	121	GLUT_WINDOW_RGBA =116;
	122	GLUT_WINDOW_PARENT =117;
	123	GLUT_WINDOW_NUM_CHILDREN =118;
	124	GLUT_WINDOW_COLORMAP_SIZE =119;
	125	GLUT_WINDOW_NUM_SAMPLES =120;
	126	GLUT_WINDOW_STEREO =121;
	127	GLUT_SCREEN_WIDTH =200;
	128	GLUT_SCREEN_HEIGHT =201;
	129	GLUT_SCREEN_WIDTH_MM =202;
	130	GLUT_SCREEN_HEIGHT_MM =203;
	131	GLUT_MENU_NUM_ITEMS =300;
	132	GLUT_DISPLAY_MODE_POSSIBLE =400;
	133	GLUT_INIT_WINDOW_X =500;
	134	GLUT_INIT_WINDOW_Y =501;
	135	GLUT_INIT_WINDOW_WIDTH =502;
	136	GLUT_INIT_WINDOW_HEIGHT =503;
	137	GLUT_INIT_DISPLAY_MODE =504;
	138	GLUT_ELAPSED_TIME =700;
	139
	140	GLUT_HAS_KEYBOARD =600;
	141	GLUT_HAS_MOUSE =601;
	142	GLUT_HAS_SPACEBALL =602;
	143	GLUT_HAS_DIAL_AND_BUTTON_BOX =603;
	144	GLUT_HAS_TABLET =604;
	145	GLUT_NUM_MOUSE_BUTTONS =605;
	146	GLUT_NUM_SPACEBALL_BUTTONS =606;
	147	GLUT_NUM_BUTTON_BOX_BUTTONS =607;
	148	GLUT_NUM_DIALS =608;
	149	GLUT_NUM_TABLET_BUTTONS =609;
	150
	151	Const
	152	GLU_FALSE =0;
	153	GLU_TRUE =1;
	154
	155	GLU_VERSION_1_1 =1;
	156	GLU_VERSION_1_2 =1;
	157
	158	GLU_VERSION =100800;
	159	GLU_EXTENSIONS =100801;
	160
	161	GLU_INVALID_ENUM =100900;
	162	GLU_INVALID_VALUE =100901;
	163	GLU_OUT_OF_MEMORY =100902;
	164	GLU_INCOMPATIBLE_GL_VERSION =100903;
	165
	166	GLU_OUTLINE_POLYGON =100240;
	167	GLU_OUTLINE_PATCH =100241;
	168
	169	GLU_ERROR =100103;
	170
	171	GLU_NURBS_ERROR1 =100251;
	172	GLU_NURBS_ERROR2 =100252;
	173	GLU_NURBS_ERROR3 =100253;
	174	GLU_NURBS_ERROR4 =100254;
	175	GLU_NURBS_ERROR5 =100255;
	176	GLU_NURBS_ERROR6 =100256;
	177	GLU_NURBS_ERROR7 =100257;
	178	GLU_NURBS_ERROR8 =100258;
	179	GLU_NURBS_ERROR9 =100259;
	180	GLU_NURBS_ERROR10 =100260;
	181	GLU_NURBS_ERROR11 =100261;
	182	GLU_NURBS_ERROR12 =100262;
	183	GLU_NURBS_ERROR13 =100263;
	184	GLU_NURBS_ERROR14 =100264;
	185	GLU_NURBS_ERROR15 =100265;
	186	GLU_NURBS_ERROR16 =100266;
	187	GLU_NURBS_ERROR17 =100267;
	188	GLU_NURBS_ERROR18 =100268;
	189	GLU_NURBS_ERROR19 =100269;
	190	GLU_NURBS_ERROR20 =100270;
	191	GLU_NURBS_ERROR21 =100271;
	192	GLU_NURBS_ERROR22 =100272;
	193	GLU_NURBS_ERROR23 =100273;
	194	GLU_NURBS_ERROR24 =100274;
	195	GLU_NURBS_ERROR25 =100275;
	196	GLU_NURBS_ERROR26 =100276;
	197	GLU_NURBS_ERROR27 =100277;
	198	GLU_NURBS_ERROR28 =100278;
	199	GLU_NURBS_ERROR29 =100279;
	200	GLU_NURBS_ERROR30 =100280;
	201	GLU_NURBS_ERROR31 =100281;
	202	GLU_NURBS_ERROR32 =100282;
	203	GLU_NURBS_ERROR33 =100283;
	204	GLU_NURBS_ERROR34 =100284;
	205	GLU_NURBS_ERROR35 =100285;
	206	GLU_NURBS_ERROR36 =100286;
	207	GLU_NURBS_ERROR37 =100287;
	208
	209	GLU_AUTO_LOAD_MATRIX =100200;
	210	GLU_CULLING =100201;
	211	GLU_SAMPLING_TOLERANCE =100203;
	212	GLU_DISPLAY_MODE =100204;
	213	GLU_PARAMETRIC_TOLERANCE =100202;
	214	GLU_SAMPLING_METHOD =100205;
	215	GLU_U_STEP =100206;
	216	GLU_V_STEP =100207;
	217
	218	GLU_PATH_LENGTH =100215;
	219	GLU_PARAMETRIC_ERROR =100216;
	220	GLU_DOMAIN_DISTANCE =100217;
	221
	222	GLU_MAP1_TRIM_2 =100210;
	223	GLU_MAP1_TRIM_3 =100211;
	224
	225	GLU_POINT =100010;
	226	GLU_LINE =100011;
	227	GLU_FILL =100012;
	228	GLU_SILHOUETTE =100013;
	229
	230	GLU_SMOOTH =100000;
	231	GLU_FLAT =100001;
	232	GLU_NONE =100002;
	233
	234	GLU_OUTSIDE =100020;
	235	GLU_INSIDE =100021;
	236
	237	GLU_TESS_BEGIN =100100;
	238	GLU_BEGIN =100100;
	239	GLU_TESS_VERTEX =100101;
	240	GLU_VERTEX =100101;
	241	GLU_TESS_END =100102;
	242	GLU_END =100102;
	243	GLU_TESS_ERROR =100103;
	244	GLU_TESS_EDGE_FLAG =100104;
	245	GLU_EDGE_FLAG =100104;
	246	GLU_TESS_COMBINE =100105;
	247	GLU_TESS_BEGIN_DATA =100106;
	248	GLU_TESS_VERTEX_DATA =100107;
	249	GLU_TESS_END_DATA =100108;
	250	GLU_TESS_ERROR_DATA =100109;
	251	GLU_TESS_EDGE_FLAG_DATA =100110;
	252	GLU_TESS_COMBINE_DATA =100111;
	253
	254	GLU_CW =100120;
	255	GLU_CCW =100121;
	256	GLU_INTERIOR =100122;
	257	GLU_EXTERIOR =100123;
	258	GLU_UNKNOWN =100124;
	259
	260	GLU_TESS_WINDING_RULE =100140;
	261	GLU_TESS_BOUNDARY_ONLY =100141;
	262	GLU_TESS_TOLERANCE =100142;
	263
	264	GLU_TESS_ERROR1 =100151;
	265	GLU_TESS_ERROR2 =100152;
	266	GLU_TESS_ERROR3 =100153;
	267	GLU_TESS_ERROR4 =100154;
	268	GLU_TESS_ERROR5 =100155;
	269	GLU_TESS_ERROR6 =100156;
	270	GLU_TESS_ERROR7 =100157;
	271	GLU_TESS_ERROR8 =100158;
	272	GLU_TESS_MISSING_BEGIN_POLYGON =100151;
	273	GLU_TESS_MISSING_BEGIN_CONTOUR =100152;
	274	GLU_TESS_MISSING_END_POLYGON =100153;
	275	GLU_TESS_MISSING_END_CONTOUR =100154;
	276	GLU_TESS_COORD_TOO_LARGE =100155;
	277	GLU_TESS_NEED_COMBINE_CALLBACK =100156;
	278
	279	GLU_TESS_WINDING_ODD =100130;
	280	GLU_TESS_WINDING_NONZERO =100131;
	281	GLU_TESS_WINDING_POSITIVE =100132;
	282	GLU_TESS_WINDING_NEGATIVE =100133;
	283	GLU_TESS_WINDING_ABS_GEQ_TWO =100134;
	284
	285
	286	Type GLUnurbs=Record End;
	287	GLUquadric=Record End;
	288	GLUtesselator=Record End;
	289
	290	GLUnurbsObj=GLUnurbs;
	291	GLUquadricObj=GLUquadric;
	292	GLUtesselatorObj=GLUtesselator;
	293	GLUtriangulatorObj=GLUtesselator;
	294
	295	Const
	296	GLU_TESS_MAX_COORD =1.0e150;
	297
	298	Const
	299	AUX_RGB =0;
	300	AUX_RGBA =AUX_RGB;
	301	AUX_INDEX =1;
	302	AUX_SINGLE =0;
	303	AUX_DOUBLE =2;
	304	AUX_DIRECT =0;
	305	AUX_INDIRECT =4;
	306
	307	AUX_ACCUM =8;
	308	AUX_ALPHA =16;
	309	AUX_DEPTH =32;
	310	AUX_STENCIL =64;
	311	AUX_AUX =128;
	312
	313	Type AUX_EVENTREC=Record
	314	event:GLint;
	315	data:Array[0..3] Of GLint;
	316	End;
	317
	318	Const
	319	AUX_EXPOSE = 1;
	320	AUX_CONFIG = 2;
	321	AUX_DRAW = 4;
	322	AUX_KEYEVENT = 8;
	323	AUX_MOUSEDOWN = 16;
	324	AUX_MOUSEUP = 32;
	325	AUX_MOUSELOC = 64;
	326
	327	AUX_WINDOWX =0;
	328	AUX_WINDOWY =1;
	329	AUX_MOUSEX =0;
	330	AUX_MOUSEY =1;
	331	AUX_MOUSESTATUS =3;
	332	AUX_KEY =0;
	333	AUX_KEYSTATUS =1;
	334
	335	AUX_LEFTBUTTON =1;
	336	AUX_RIGHTBUTTON =2;
	337	AUX_MIDDLEBUTTON =4;
	338	AUX_SHIFT =1;
	339	AUX_CONTROL =2;
	340
	341	AUX_RETURN =$0D;
	342	AUX_ESCAPE =$1B;
	343	AUX_SPACE =$20;
	344	AUX_LEFT =$25;
	345	AUX_UP =$26;
	346	AUX_RIGHT =$27;
	347	AUX_DOWN =$28;
	348	AUX_A ='A';
	349	AUX_B ='B';
	350	AUX_C ='C';
	351	AUX_D ='D';
	352	AUX_E ='E';
	353	AUX_F ='F';
	354	AUX_G ='G';
	355	AUX_H ='H';
	356	AUX_I ='I';
	357	AUX_J ='J';
	358	AUX_K ='K';
	359	AUX_L ='L';
	360	AUX_M ='M';
	361	AUX_N ='N';
	362	AUX_O ='O';
	363	AUX_P ='P';
	364	AUX_Q ='Q';
	365	AUX_R ='R';
	366	AUX_S ='S';
	367	AUX_T ='T';
	368	AUX_U ='U';
	369	AUX_V ='V';
	370	AUX_W ='W';
	371	AUX_X ='X';
	372	AUX_Y ='Y';
	373	AUX_Z ='Z';
	374	AUX__a ='a';
	375	AUX__b ='b';
	376	AUX__c ='c';
	377	AUX__d ='d';
	378	AUX__e ='e';
	379	AUX__f ='f';
	380	AUX__g ='g';
	381	AUX__h ='h';
	382	AUX__i ='i';
	383	AUX__j ='j';
	384	AUX__k ='k';
	385	AUX__l ='l';
	386	AUX__m ='m';
	387	AUX__n ='n';
	388	AUX__o ='o';
	389	AUX__p ='p';
	390	AUX__q ='q';
	391	AUX__r ='r';
	392	AUX__s ='s';
	393	AUX__t ='t';
	394	AUX__u ='u';
	395	AUX__v ='v';
	396	AUX__w ='w';
	397	AUX__x ='x';
	398	AUX__y ='y';
	399	AUX__z ='z';
	400	AUX_0 ='0';
	401	AUX_1 ='1';
	402	AUX_2 ='2';
	403	AUX_3 ='3';
	404	AUX_4 ='4';
	405	AUX_5 ='5';
	406	AUX_6 ='6';
	407	AUX_7 ='7';
	408	AUX_8 ='8';
	409	AUX_9 ='9';
	410
	411	AUX_FD =1;
	412	AUX_COLORMAP =3;
	413	AUX_GREYSCALEMAP =4;
	414	AUX_FOGMAP =5;
	415	AUX_ONECOLOR =6;
	416
	417	AUX_BLACK = 0;
	418	AUX_RED = 1;
	419	AUX_GREEN = 2;
	420	AUX_YELLOW = 3;
	421	AUX_BLUE = 4;
	422	AUX_MAGENTA = 5;
	423	AUX_CYAN = 6;
	424	AUX_WHITE = 7;
	425
	426	Var auxRGBMap:Array[0..7,0..2] Of Single;
	427
	428	Type
	429	PAUX_RGBImageRec=^AUX_RGBImageRec;
	430	AUX_RGBImageRec=Record
	431	sizeX, sizeY:GLint;
	432	data:Pointer;
	433	End;
	434
	435	Const
	436	AUX_USE_ID = 1;
	437	AUX_EXACT_MATCH = 2;
	438	AUX_MINIMUM_CRITERIA = 3;
	439
	440	Const
	441	GL_ACCUM =$0100;
	442	GL_LOAD =$0101;
	443	GL_RETURN =$0102;
	444	GL_MULT =$0103;
	445	GL_ADD =$0104;
	446
	447	GL_NEVER =$0200;
	448	GL_LESS =$0201;
	449	GL_EQUAL =$0202;
	450	GL_LEQUAL =$0203;
	451	GL_GREATER =$0204;
	452	GL_NOTEQUAL =$0205;
	453	GL_GEQUAL =$0206;
	454	GL_ALWAYS =$0207;
	455
	456	GL_CURRENT_BIT =$00000001;
	457	GL_POINT_BIT =$00000002;
	458	GL_LINE_BIT =$00000004;
	459	GL_POLYGON_BIT =$00000008;
	460	GL_POLYGON_STIPPLE_BIT =$00000010;
	461	GL_PIXEL_MODE_BIT =$00000020;
	462	GL_LIGHTING_BIT =$00000040;
	463	GL_FOG_BIT =$00000080;
	464	GL_DEPTH_BUFFER_BIT =$00000100;
	465	GL_ACCUM_BUFFER_BIT =$00000200;
	466	GL_STENCIL_BUFFER_BIT =$00000400;
	467	GL_VIEWPORT_BIT =$00000800;
	468	GL_TRANSFORM_BIT =$00001000;
	469	GL_ENABLE_BIT =$00002000;
	470	GL_COLOR_BUFFER_BIT =$00004000;
	471	GL_HINT_BIT =$00008000;
	472	GL_EVAL_BIT =$00010000;
	473	GL_LIST_BIT =$00020000;
	474	GL_TEXTURE_BIT =$00040000;
	475	GL_SCISSOR_BIT =$00080000;
	476	GL_ALL_ATTRIB_BITS =$000fffff;
	477
	478	GL_POINTS =$0000;
	479	GL_LINES =$0001;
	480	GL_LINE_LOOP =$0002;
	481	GL_LINE_STRIP =$0003;
	482	GL_TRIANGLES =$0004;
	483	GL_TRIANGLE_STRIP =$0005;
	484	GL_TRIANGLE_FAN =$0006;
	485	GL_QUADS =$0007;
	486	GL_QUAD_STRIP =$0008;
	487	GL_POLYGON =$0009;
	488
	489	GL_ZERO =0;
	490	GL_ONE =1;
	491	GL_SRC_COLOR =$0300;
	492	GL_ONE_MINUS_SRC_COLOR =$0301;
	493	GL_SRC_ALPHA =$0302;
	494	GL_ONE_MINUS_SRC_ALPHA =$0303;
	495	GL_DST_ALPHA =$0304;
	496	GL_ONE_MINUS_DST_ALPHA =$0305;
	497
	498	GL_DST_COLOR =$0306;
	499	GL_ONE_MINUS_DST_COLOR =$0307;
	500	GL_SRC_ALPHA_SATURATE =$0308;
	501
	502	GL_TRUE =True;
	503	GL_FALSE =False;
	504
	505	GL_CLIP_PLANE0 =$3000;
	506	GL_CLIP_PLANE1 =$3001;
	507	GL_CLIP_PLANE2 =$3002;
	508	GL_CLIP_PLANE3 =$3003;
	509	GL_CLIP_PLANE4 =$3004;
	510	GL_CLIP_PLANE5 =$3005;
	511
	512	GL_NONE =0;
	513	GL_FRONT_LEFT =$0400;
	514	GL_FRONT_RIGHT =$0401;
	515	GL_BACK_LEFT =$0402;
	516	GL_BACK_RIGHT =$0403;
	517	GL_FRONT =$0404;
	518	GL_BACK =$0405;
	519	GL_LEFT =$0406;
	520	GL_RIGHT =$0407;
	521	GL_FRONT_AND_BACK =$0408;
	522	GL_AUX0 =$0409;
	523	GL_AUX1 =$040A;
	524	GL_AUX2 =$040B;
	525	GL_AUX3 =$040C;
	526
	527	GL_NO_ERROR =0;
	528	GL_INVALID_ENUM =$0500;
	529	GL_INVALID_VALUE =$0501;
	530	GL_INVALID_OPERATION =$0502;
	531	GL_STACK_OVERFLOW =$0503;
	532	GL_STACK_UNDERFLOW =$0504;
	533	GL_OUT_OF_MEMORY =$0505;
	534
	535	GL_2D =$0600;
	536	GL_3D =$0601;
	537	GL_3D_COLOR =$0602;
	538	GL_3D_COLOR_TEXTURE =$0603;
	539	GL_4D_COLOR_TEXTURE =$0604;
	540
	541	GL_PASS_THROUGH_TOKEN =$0700;
	542	GL_POINT_TOKEN =$0701;
	543	GL_LINE_TOKEN =$0702;
	544	GL_POLYGON_TOKEN =$0703;
	545	GL_BITMAP_TOKEN =$0704;
	546	GL_DRAW_PIXEL_TOKEN =$0705;
	547	GL_COPY_PIXEL_TOKEN =$0706;
	548	GL_LINE_RESET_TOKEN =$0707;
	549
	550	GL_EXP =$0800;
	551	GL_EXP2 =$0801;
	552
	553	GL_CW =$0900;
	554	GL_CCW =$0901;
	555
	556	GL_COEFF =$0A00;
	557	GL_ORDER =$0A01;
	558	GL_DOMAIN =$0A02;
	559
	560	GL_CURRENT_COLOR =$0B00;
	561	GL_CURRENT_INDEX =$0B01;
	562	GL_CURRENT_NORMAL =$0B02;
	563	GL_CURRENT_TEXTURE_COORDS =$0B03;
	564	GL_CURRENT_RASTER_COLOR =$0B04;
	565	GL_CURRENT_RASTER_INDEX =$0B05;
	566	GL_CURRENT_RASTER_TEXTURE_COORDS =$0B06;
	567	GL_CURRENT_RASTER_POSITION =$0B07;
	568	GL_CURRENT_RASTER_POSITION_VALID =$0B08;
	569	GL_CURRENT_RASTER_DISTANCE =$0B09;
	570	GL_POINT_SMOOTH =$0B10;
	571	GL_POINT_SIZE =$0B11;
	572	GL_POINT_SIZE_RANGE =$0B12;
	573	GL_POINT_SIZE_GRANULARITY =$0B13;
	574	GL_LINE_SMOOTH =$0B20;
	575	GL_LINE_WIDTH =$0B21;
	576	GL_LINE_WIDTH_RANGE =$0B22;
	577	GL_LINE_WIDTH_GRANULARITY =$0B23;
	578	GL_LINE_STIPPLE =$0B24;
	579	GL_LINE_STIPPLE_PATTERN =$0B25;
	580	GL_LINE_STIPPLE_REPEAT =$0B26;
	581	GL_LIST_MODE =$0B30;
	582	GL_MAX_LIST_NESTING =$0B31;
	583	GL_LIST_BASE =$0B32;
	584	GL_LIST_INDEX =$0B33;
	585	GL_POLYGON_MODE =$0B40;
	586	GL_POLYGON_SMOOTH =$0B41;
	587	GL_POLYGON_STIPPLE =$0B42;
	588	GL_EDGE_FLAG =$0B43;
	589	GL_CULL_FACE =$0B44;
	590	GL_CULL_FACE_MODE =$0B45;
	591	GL_FRONT_FACE =$0B46;
	592	GL_LIGHTING =$0B50;
	593	GL_LIGHT_MODEL_LOCAL_VIEWER =$0B51;
	594	GL_LIGHT_MODEL_TWO_SIDE =$0B52;
	595	GL_LIGHT_MODEL_AMBIENT =$0B53;
	596	GL_SHADE_MODEL =$0B54;
	597	GL_COLOR_MATERIAL_FACE =$0B55;
	598	GL_COLOR_MATERIAL_PARAMETER =$0B56;
	599	GL_COLOR_MATERIAL =$0B57;
	600	GL_FOG =$0B60;
	601	GL_FOG_INDEX =$0B61;
	602	GL_FOG_DENSITY =$0B62;
	603	GL_FOG_START =$0B63;
	604	GL_FOG_END =$0B64;
	605	GL_FOG_MODE =$0B65;
	606	GL_FOG_COLOR =$0B66;
	607	GL_DEPTH_RANGE =$0B70;
	608	GL_DEPTH_TEST =$0B71;
	609	GL_DEPTH_WRITEMASK =$0B72;
	610	GL_DEPTH_CLEAR_VALUE =$0B73;
	611	GL_DEPTH_FUNC =$0B74;
	612	GL_ACCUM_CLEAR_VALUE =$0B80;
	613	GL_STENCIL_TEST =$0B90;
	614	GL_STENCIL_CLEAR_VALUE =$0B91;
	615	GL_STENCIL_FUNC =$0B92;
	616	GL_STENCIL_VALUE_MASK =$0B93;
	617	GL_STENCIL_FAIL =$0B94;
	618	GL_STENCIL_PASS_DEPTH_FAIL =$0B95;
	619	GL_STENCIL_PASS_DEPTH_PASS =$0B96;
	620	GL_STENCIL_REF =$0B97;
	621	GL_STENCIL_WRITEMASK =$0B98;
	622	GL_MATRIX_MODE =$0BA0;
	623	GL_NORMALIZE =$0BA1;
	624	GL_VIEWPORT =$0BA2;
	625	GL_MODELVIEW_STACK_DEPTH =$0BA3;
	626	GL_PROJECTION_STACK_DEPTH =$0BA4;
	627	GL_TEXTURE_STACK_DEPTH =$0BA5;
	628	GL_MODELVIEW_MATRIX =$0BA6;
	629	GL_PROJECTION_MATRIX =$0BA7;
	630	GL_TEXTURE_MATRIX =$0BA8;
	631	GL_ATTRIB_STACK_DEPTH =$0BB0;
	632	GL_ALPHA_TEST =$0BC0;
	633	GL_ALPHA_TEST_FUNC =$0BC1;
	634	GL_ALPHA_TEST_REF =$0BC2;
	635	GL_DITHER =$0BD0;
	636	GL_BLEND_DST =$0BE0;
	637	GL_BLEND_SRC =$0BE1;
	638	GL_BLEND =$0BE2;
	639	GL_LOGIC_OP_MODE =$0BF0;
	640	GL_LOGIC_OP =$0BF1;
	641	GL_AUX_BUFFERS =$0C00;
	642	GL_DRAW_BUFFER =$0C01;
	643	GL_READ_BUFFER =$0C02;
	644	GL_SCISSOR_BOX =$0C10;
	645	GL_SCISSOR_TEST =$0C11;
	646	GL_INDEX_CLEAR_VALUE =$0C20;
	647	GL_INDEX_WRITEMASK =$0C21;
	648	GL_COLOR_CLEAR_VALUE =$0C22;
	649	GL_COLOR_WRITEMASK =$0C23;
	650	GL_INDEX_MODE =$0C30;
	651	GL_RGBA_MODE =$0C31;
	652	GL_DOUBLEBUFFER =$0C32;
	653	GL_STEREO =$0C33;
	654	GL_RENDER_MODE =$0C40;
	655	GL_PERSPECTIVE_CORRECTION_HINT =$0C50;
	656	GL_POINT_SMOOTH_HINT =$0C51;
	657	GL_LINE_SMOOTH_HINT =$0C52;
	658	GL_POLYGON_SMOOTH_HINT =$0C53;
	659	GL_FOG_HINT =$0C54;
	660
	661	GL_TEXTURE_GEN_S =$0C60;
	662	GL_TEXTURE_GEN_T =$0C61;
	663	GL_TEXTURE_GEN_R =$0C62;
	664	GL_TEXTURE_GEN_Q =$0C63;
	665	GL_PIXEL_MAP_I_TO_I =$0C70;
	666	GL_PIXEL_MAP_S_TO_S =$0C71;
	667	GL_PIXEL_MAP_I_TO_R =$0C72;
	668	GL_PIXEL_MAP_I_TO_G =$0C73;
	669	GL_PIXEL_MAP_I_TO_B =$0C74;
	670	GL_PIXEL_MAP_I_TO_A =$0C75;
	671	GL_PIXEL_MAP_R_TO_R =$0C76;
	672	GL_PIXEL_MAP_G_TO_G =$0C77;
	673	GL_PIXEL_MAP_B_TO_B =$0C78;
	674	GL_PIXEL_MAP_A_TO_A =$0C79;
	675	GL_PIXEL_MAP_I_TO_I_SIZE =$0CB0;
	676	GL_PIXEL_MAP_S_TO_S_SIZE =$0CB1;
	677	GL_PIXEL_MAP_I_TO_R_SIZE =$0CB2;
	678	GL_PIXEL_MAP_I_TO_G_SIZE =$0CB3;
	679	GL_PIXEL_MAP_I_TO_B_SIZE =$0CB4;
	680	GL_PIXEL_MAP_I_TO_A_SIZE =$0CB5;
	681	GL_PIXEL_MAP_R_TO_R_SIZE =$0CB6;
	682	GL_PIXEL_MAP_G_TO_G_SIZE =$0CB7;
	683	GL_PIXEL_MAP_B_TO_B_SIZE =$0CB8;
	684	GL_PIXEL_MAP_A_TO_A_SIZE =$0CB9;
	685	GL_UNPACK_SWAP_BYTES =$0CF0;
	686	GL_UNPACK_LSB_FIRST =$0CF1;
	687	GL_UNPACK_ROW_LENGTH =$0CF2;
	688	GL_UNPACK_SKIP_ROWS =$0CF3;
	689	GL_UNPACK_SKIP_PIXELS =$0CF4;
	690	GL_UNPACK_ALIGNMENT =$0CF5;
	691	GL_PACK_SWAP_BYTES =$0D00;
	692	GL_PACK_LSB_FIRST =$0D01;
	693	GL_PACK_ROW_LENGTH =$0D02;
	694	GL_PACK_SKIP_ROWS =$0D03;
	695	GL_PACK_SKIP_PIXELS =$0D04;
	696	GL_PACK_ALIGNMENT =$0D05;
	697	GL_MAP_COLOR =$0D10;
	698	GL_MAP_STENCIL =$0D11;
	699	GL_INDEX_SHIFT =$0D12;
	700	GL_INDEX_OFFSET =$0D13;
	701	GL_RED_SCALE =$0D14;
	702	GL_RED_BIAS =$0D15;
	703	GL_ZOOM_X =$0D16;
	704	GL_ZOOM_Y =$0D17;
	705	GL_GREEN_SCALE =$0D18;
	706	GL_GREEN_BIAS =$0D19;
	707	GL_BLUE_SCALE =$0D1A;
	708	GL_BLUE_BIAS =$0D1B;
	709	GL_ALPHA_SCALE =$0D1C;
	710	GL_ALPHA_BIAS =$0D1D;
	711	GL_DEPTH_SCALE =$0D1E;
	712	GL_DEPTH_BIAS =$0D1F;
	713	GL_MAX_EVAL_ORDER =$0D30;
	714	GL_MAX_LIGHTS =$0D31;
	715	GL_MAX_CLIP_PLANES =$0D32;
	716	GL_MAX_TEXTURE_SIZE =$0D33;
	717	GL_MAX_PIXEL_MAP_TABLE =$0D34;
	718	GL_MAX_ATTRIB_STACK_DEPTH =$0D35;
	719	GL_MAX_MODELVIEW_STACK_DEPTH =$0D36;
	720	GL_MAX_NAME_STACK_DEPTH =$0D37;
	721	GL_MAX_PROJECTION_STACK_DEPTH =$0D38;
	722	GL_MAX_TEXTURE_STACK_DEPTH =$0D39;
	723	GL_MAX_VIEWPORT_DIMS =$0D3A;
	724	GL_SUBPIXEL_BITS =$0D50;
	725	GL_INDEX_BITS =$0D51;
	726	GL_RED_BITS =$0D52;
	727	GL_GREEN_BITS =$0D53;
	728	GL_BLUE_BITS =$0D54;
	729	GL_ALPHA_BITS =$0D55;
	730	GL_DEPTH_BITS =$0D56;
	731	GL_STENCIL_BITS =$0D57;
	732	GL_ACCUM_RED_BITS =$0D58;
	733	GL_ACCUM_GREEN_BITS =$0D59;
	734	GL_ACCUM_BLUE_BITS =$0D5A;
	735	GL_ACCUM_ALPHA_BITS =$0D5B;
	736	GL_NAME_STACK_DEPTH =$0D70;
	737	GL_AUTO_NORMAL =$0D80;
	738	GL_MAP1_COLOR_4 =$0D90;
	739	GL_MAP1_INDEX =$0D91;
	740	GL_MAP1_NORMAL =$0D92;
	741	GL_MAP1_TEXTURE_COORD_1 =$0D93;
	742	GL_MAP1_TEXTURE_COORD_2 =$0D94;
	743	GL_MAP1_TEXTURE_COORD_3 =$0D95;
	744	GL_MAP1_TEXTURE_COORD_4 =$0D96;
	745	GL_MAP1_VERTEX_3 =$0D97;
	746	GL_MAP1_VERTEX_4 =$0D98;
	747	GL_MAP2_COLOR_4 =$0DB0;
	748	GL_MAP2_INDEX =$0DB1;
	749	GL_MAP2_NORMAL =$0DB2;
	750	GL_MAP2_TEXTURE_COORD_1 =$0DB3;
	751	GL_MAP2_TEXTURE_COORD_2 =$0DB4;
	752	GL_MAP2_TEXTURE_COORD_3 =$0DB5;
	753	GL_MAP2_TEXTURE_COORD_4 =$0DB6;
	754	GL_MAP2_VERTEX_3 =$0DB7;
	755	GL_MAP2_VERTEX_4 =$0DB8;
	756	GL_MAP1_GRID_DOMAIN =$0DD0;
	757	GL_MAP1_GRID_SEGMENTS =$0DD1;
	758	GL_MAP2_GRID_DOMAIN =$0DD2;
	759	GL_MAP2_GRID_SEGMENTS =$0DD3;
	760	GL_TEXTURE_1D =$0DE0;
	761	GL_TEXTURE_2D =$0DE1;
	762
	763	GL_TEXTURE_WIDTH =$1000;
	764	GL_TEXTURE_HEIGHT =$1001;
	765	GL_TEXTURE_COMPONENTS =$1003;
	766	GL_TEXTURE_BORDER_COLOR =$1004;
	767	GL_TEXTURE_BORDER =$1005;
	768
	769	GL_DONT_CARE =$1100;
	770	GL_FASTEST =$1101;
	771	GL_NICEST =$1102;
	772
	773	GL_LIGHT0 =$4000;
	774	GL_LIGHT1 =$4001;
	775	GL_LIGHT2 =$4002;
	776	GL_LIGHT3 =$4003;
	777	GL_LIGHT4 =$4004;
	778	GL_LIGHT5 =$4005;
	779	GL_LIGHT6 =$4006;
	780	GL_LIGHT7 =$4007;
	781
	782	GL_AMBIENT =$1200;
	783	GL_DIFFUSE =$1201;
	784	GL_SPECULAR =$1202;
	785	GL_POSITION =$1203;
	786	GL_SPOT_DIRECTION =$1204;
	787	GL_SPOT_EXPONENT =$1205;
	788	GL_SPOT_CUTOFF =$1206;
	789	GL_CONSTANT_ATTENUATION =$1207;
	790	GL_LINEAR_ATTENUATION =$1208;
	791	GL_QUADRATIC_ATTENUATION =$1209;
	792
	793	GL_COMPILE =$1300;
	794	GL_COMPILE_AND_EXECUTE =$1301;
	795
	796	GL_BYTE =$1400;
	797	GL_UNSIGNED_BYTE =$1401;
	798	GL_SHORT =$1402;
	799	GL_UNSIGNED_SHORT =$1403;
	800	GL_INT =$1404;
	801	GL_UNSIGNED_INT =$1405;
	802	GL_FLOAT =$1406;
	803	GL_2_BYTES =$1407;
	804	GL_3_BYTES =$1408;
	805	GL_4_BYTES =$1409;
	806	GL_DOUBLE_EXT =$140A;
	807
	808	GL_CLEAR =$1500;
	809	GL_AND =$1501;
	810	GL_AND_REVERSE =$1502;
	811	GL_COPY =$1503;
	812	GL_AND_INVERTED =$1504;
	813	GL_NOOP =$1505;
	814	GL_XOR =$1506;
	815	GL_OR =$1507;
	816	GL_NOR =$1508;
	817	GL_EQUIV =$1509;
	818	GL_INVERT =$150A;
	819	GL_OR_REVERSE =$150B;
	820	GL_COPY_INVERTED =$150C;
	821	GL_OR_INVERTED =$150D;
	822	GL_NAND =$150E;
	823	GL_SET =$150F;
	824
	825	GL_EMISSION =$1600;
	826	GL_SHININESS =$1601;
	827	GL_AMBIENT_AND_DIFFUSE =$1602;
	828	GL_COLOR_INDEXES =$1603;
	829
	830	GL_MODELVIEW =$1700;
	831	GL_PROJECTION =$1701;
	832	GL_TEXTURE =$1702;
	833
	834	GL_COLOR =$1800;
	835	GL_DEPTH =$1801;
	836	GL_STENCIL =$1802;
	837
	838	GL_COLOR_INDEX =$1900;
	839	GL_STENCIL_INDEX =$1901;
	840	GL_DEPTH_COMPONENT =$1902;
	841	GL_RED =$1903;
	842	GL_GREEN =$1904;
	843	GL_BLUE =$1905;
	844	GL_ALPHA =$1906;
	845	GL_RGB =$1907;
	846	GL_RGBA =$1908;
	847	GL_LUMINANCE =$1909;
	848	GL_LUMINANCE_ALPHA =$190A;
	849
	850	GL_BITMAP =$1A00;
	851
	852	GL_POINT =$1B00;
	853	GL_LINE =$1B01;
	854	GL_FILL =$1B02;
	855
	856	GL_RENDER =$1C00;
	857	GL_FEEDBACK =$1C01;
	858	GL_SELECT =$1C02;
	859
	860	GL_FLAT =$1D00;
	861	GL_SMOOTH =$1D01;
	862
	863	GL_KEEP =$1E00;
	864	GL_REPLACE =$1E01;
	865	GL_INCR =$1E02;
	866	GL_DECR =$1E03;
	867
	868	GL_VENDOR =$1F00;
	869	GL_RENDERER =$1F01;
	870	GL_VERSION =$1F02;
	871	GL_EXTENSIONS =$1F03;
	872
	873	GL_S =$2000;
	874	GL_T =$2001;
	875	GL_R =$2002;
	876	GL_Q =$2003;
	877
	878	GL_MODULATE =$2100;
	879	GL_DECAL =$2101;
	880
	881	GL_TEXTURE_ENV_MODE =$2200;
	882	GL_TEXTURE_ENV_COLOR =$2201;
	883
	884	GL_TEXTURE_ENV =$2300;
	885
	886	GL_EYE_LINEAR =$2400;
	887	GL_OBJECT_LINEAR =$2401;
	888	GL_SPHERE_MAP =$2402;
	889
	890	GL_TEXTURE_GEN_MODE =$2500;
	891	GL_OBJECT_PLANE =$2501;
	892	GL_EYE_PLANE =$2502;
	893
	894	GL_NEAREST =$2600;
	895	GL_LINEAR =$2601;
	896
	897	GL_NEAREST_MIPMAP_NEAREST =$2700;
	898	GL_LINEAR_MIPMAP_NEAREST =$2701;
	899	GL_NEAREST_MIPMAP_LINEAR =$2702;
	900	GL_LINEAR_MIPMAP_LINEAR =$2703;
	901
	902	GL_TEXTURE_MAG_FILTER =$2800;
	903	GL_TEXTURE_MIN_FILTER =$2801;
	904	GL_TEXTURE_WRAP_S =$2802;
	905	GL_TEXTURE_WRAP_T =$2803;
	906
	907	GL_CLAMP =$2900;
	908	GL_REPEAT =$2901;
	909
	910	GL_EXT_abgr =1;
	911	GL_EXT_blend_logic_op =1;
	912	GL_EXT_blend_minmax =1;
	913	GL_EXT_blend_subtract =1;
	914	GL_EXT_polygon_offset =1;
	915	GL_EXT_rescale_normal =1;
	916	GL_EXT_subtexture =1;
	917	GL_EXT_texture_object =1;
	918	GL_EXT_vertex_array =1;
	919
	920	GL_ABGR_EXT =$8000;
	921
	922	GL_FUNC_ADD_EXT =$8006;
	923	GL_MIN_EXT =$8007;
	924	GL_MAX_EXT =$8008;
	925	GL_BLEND_EQUATION_EXT =$8009;
	926
	927	GL_FUNC_SUBTRACT_EXT =$800A;
	928	GL_FUNC_REVERSE_SUBTRACT_EXT =$800B;
	929
	930	GL_POLYGON_OFFSET_EXT =$8037;
	931	GL_POLYGON_OFFSET_FACTOR_EXT =$8038;
	932	GL_POLYGON_OFFSET_BIAS_EXT =$8039;
	933
	934	GL_RESCALE_NORMAL_EXT =$803A;
	935
	936	GL_TEXTURE_PRIORITY_EXT =$8066;
	937	GL_TEXTURE_RESIDENT_EXT =$8067;
	938	GL_TEXTURE_1D_BINDING_EXT =$8068;
	939	GL_TEXTURE_2D_BINDING_EXT =$8069;
	940
	941	GL_VERTEX_ARRAY_EXT =$8074;
	942	GL_NORMAL_ARRAY_EXT =$8075;
	943	GL_COLOR_ARRAY_EXT =$8076;
	944	GL_INDEX_ARRAY_EXT =$8077;
	945	GL_TEXTURE_COORD_ARRAY_EXT =$8078;
	946	GL_EDGE_FLAG_ARRAY_EXT =$8079;
	947	GL_VERTEX_ARRAY_SIZE_EXT =$807A;
	948	GL_VERTEX_ARRAY_TYPE_EXT =$807B;
	949	GL_VERTEX_ARRAY_STRIDE_EXT =$807C;
	950	GL_VERTEX_ARRAY_COUNT_EXT =$807D;
	951	GL_NORMAL_ARRAY_TYPE_EXT =$807E;
	952	GL_NORMAL_ARRAY_STRIDE_EXT =$807F;
	953	GL_NORMAL_ARRAY_COUNT_EXT =$8080;
	954	GL_COLOR_ARRAY_SIZE_EXT =$8081;
	955	GL_COLOR_ARRAY_TYPE_EXT =$8082;
	956	GL_COLOR_ARRAY_STRIDE_EXT =$8083;
	957	GL_COLOR_ARRAY_COUNT_EXT =$8084;
	958	GL_INDEX_ARRAY_TYPE_EXT =$8085;
	959	GL_INDEX_ARRAY_STRIDE_EXT =$8086;
	960	GL_INDEX_ARRAY_COUNT_EXT =$8087;
	961	GL_TEXTURE_COORD_ARRAY_SIZE_EXT =$8088;
	962	GL_TEXTURE_COORD_ARRAY_TYPE_EXT =$8089;
	963	GL_TEXTURE_COORD_ARRAY_STRIDE_EXT =$808A;
	964	GL_TEXTURE_COORD_ARRAY_COUNT_EXT =$808B;
	965	GL_EDGE_FLAG_ARRAY_STRIDE_EXT =$808C;
	966	GL_EDGE_FLAG_ARRAY_COUNT_EXT =$808D;
	967	GL_VERTEX_ARRAY_POINTER_EXT =$808E;
	968	GL_NORMAL_ARRAY_POINTER_EXT =$808F;
	969	GL_COLOR_ARRAY_POINTER_EXT =$8090;
	970	GL_INDEX_ARRAY_POINTER_EXT =$8091;
	971	GL_TEXTURE_COORD_ARRAY_POINTER_EXT=$8092;
	972	GL_EDGE_FLAG_ARRAY_POINTER_EXT =$8093;
	973
	974	Type
	975	auxproc1=Procedure;CDecl;
	976	auxproc2=Procedure(w,h:GLsizei);CDecl;
	977	auxfunc1=Function(i:LongInt;e:GLenum):GLenum;CDecl;
	978	auxfunc2=Function(x,y:LongInt;e:GLEnum):GLenum;CDecl;
	979	auxproc3=Procedure(Var e:AUX_EVENTREC);CDecl;
	980	glutproc1=Procedure(x,y:LongInt);CDecl;
	981	glutproc2=Procedure(c:Byte;x,y:LongInt);CDecl;
	982	glutproc3=Procedure(x,y,w,h:LongInt);CDecl;
	983	glutproc4=Procedure(x:LongInt);CDecl;
	984
	985	Imports
	986	Procedure glAccum (op:GLenum;value:GLfloat);ApiEntry; 'OPENGL' name 'glAccum';
	987	Procedure glAlphaFunc (func:GLenum;ref:GLclampf);ApiEntry; 'OPENGL' name 'glAlphaFunc';
	988	Function glAreTexturesResidentEXT (n:GLsizei;Var textures;
	989	Var residences:GLboolean):GLboolean;ApiEntry; 'OPENGL' name 'glAreTexturesResidentEXT';
	990	Procedure glArrayElementEXT (i:GLint);ApiEntry; 'OPENGL' name 'glArrayElementEXT';
	991	Procedure glBegin (mode:GLenum);ApiEntry; 'OPENGL' name 'glBegin';
	992	Procedure glBindTextureEXT (target:GLenum;texture:GLuint);ApiEntry; 'OPENGL' name 'glBindTextureEXT';
	993	Procedure glBitmap (width,height:GLsizei;xorig,yorig:GLfloat;
	994	xmove,ymove:GLfloat;Var Bitmap);ApiEntry; 'OPENGL' name 'glBitmap';
	995	Procedure glBlendEquationEXT (mode:GLenum);ApiEntry; 'OPENGL' name 'glBlendEquationEXT';
	996	Procedure glBlendFunc (sfactor,dfactor:GLenum);ApiEntry; 'OPENGL' name 'glBlendFunc';
	997	Procedure glCallList (list:GLuint);ApiEntry; 'OPENGL' name 'glCallList';
	998	Procedure glCallLists (n:GLsizei;typ:GLenum;Const Lists);ApiEntry; 'OPENGL' name 'glCallLists';
	999	Procedure glClear (mask:GLbitfield);ApiEntry; 'OPENGL' name 'glClear';
	1000	Procedure glClearAccum (read,green,blue:GLfloat;alpha:GLfloat);ApiEntry; 'OPENGL' name 'glClearAccum';
	1001	Procedure glClearColor (red,green,blue:GLclampf;alpha:GLclampf);ApiEntry; 'OPENGL' name 'glClearColor';
	1002	Procedure glClearDepth (depth:GLclampd);ApiEntry; 'OPENGL' name 'glClearDepth';
	1003	Procedure glClearIndex (c:GLfloat);ApiEntry; 'OPENGL' name 'glClearIndex';
	1004	Procedure glClearStencil (s:GLint);ApiEntry; 'OPENGL' name 'glClearStencil';
	1005	Procedure glClipPlane (plane:GLenum;Const equation:GLdouble);ApiEntry; 'OPENGL' name 'glClipPlane';
	1006	Procedure glColor3b (red,green,blue:GLbyte);ApiEntry; 'OPENGL' name 'glColor3b';
	1007	Procedure glColor3bv (Const v);ApiEntry; 'OPENGL' name 'glColor3bv';
	1008	Procedure glColor3d (red,green,blue:GLdouble);ApiEntry; 'OPENGL' name 'glColor3d';
	1009	Procedure glColor3dv (Const v);ApiEntry; 'OPENGL' name 'glColor3dv';
	1010	Procedure glColor3f (red,green,blue:GLfloat);ApiEntry; 'OPENGL' name 'glColor3f';
	1011	Procedure glColor3fv (Const v);ApiEntry; 'OPENGL' name 'glColor3fv';
	1012	Procedure glColor3i (red,green,blue:GLint);ApiEntry; 'OPENGL' name 'glColor3i';
	1013	Procedure glColor3iv (Const v);ApiEntry; 'OPENGL' name 'glColor3iv';
	1014	Procedure glColor3s (red,green,blue:GLshort);ApiEntry; 'OPENGL' name 'glColor3s';
	1015	Procedure glColor3sv (Const v);ApiEntry; 'OPENGL' name 'glColor3sv';
	1016	Procedure glColor3ub (red,green,blue:GLubyte);ApiEntry; 'OPENGL' name 'glColor3ub';
	1017	Procedure glColor3ubv (Const v);ApiEntry; 'OPENGL' name 'glColor3ubv';
	1018	Procedure glColor3ui (red,green,blue:GLuint);ApiEntry; 'OPENGL' name 'glColor3ui';
	1019	Procedure glColor3uiv (Const v);ApiEntry; 'OPENGL' name 'glColor3uiv';
	1020	Procedure glColor3us (red,green,blue:GLushort);ApiEntry; 'OPENGL' name 'glColor3us';
	1021	Procedure glColor3usv (Const v);ApiEntry; 'OPENGL' name 'glColor3us';
	1022	Procedure glColor4b (red,green,blue,alpha:GLbyte);ApiEntry; 'OPENGL' name 'glColor4b';
	1023	Procedure glColor4bv (Const v);ApiEntry; 'OPENGL' name 'glColor4bv';
	1024	Procedure glColor4d (red,green,blue,alpha:GLdouble);ApiEntry; 'OPENGL' name 'glColor4d';
	1025	Procedure glColor4dv (Const v);ApiEntry; 'OPENGL' name 'glColor4dv';
	1026	Procedure glColor4f (red,green,blue,alpha:GLfloat);ApiEntry; 'OPENGL' name 'glColor4f';
	1027	Procedure glColor4fv (Const v);ApiEntry; 'OPENGL' name 'glColor4fv';
	1028	Procedure glColor4i (red,green,blue,alpha:GLint);ApiEntry; 'OPENGL' name 'glColor4i';
	1029	Procedure glColor4iv (Const v);ApiEntry; 'OPENGL' name 'glColor4iv';
	1030	Procedure glColor4s (red,green,blue,alpha:GLshort);ApiEntry; 'OPENGL' name 'glColor4s';
	1031	Procedure glColor4sv (Const v);ApiEntry; 'OPENGL' name 'glColor4sv';
	1032	Procedure glColor4ub (red,green,blue,alpha:GLubyte);ApiEntry; 'OPENGL' name 'glColor4ub';
	1033	Procedure glColor4ubv (Const v);ApiEntry; 'OPENGL' name 'glColor4ubv';
	1034	Procedure glColor4ui (red,green,blue,alpha:GLuint);ApiEntry; 'OPENGL' name 'glColor4ui';
	1035	Procedure glColor4uiv (Const v);ApiEntry; 'OPENGL' name 'glColor4uiv';
	1036	Procedure glColor4us (red,green,blue,alpha:GLushort);ApiEntry; 'OPENGL' name 'glColor4us';
	1037	Procedure glColor4usv (Const v);ApiEntry; 'OPENGL' name 'glColor4usv';
	1038	Procedure glColorMask (red,green,blue,alpha:GLboolean);ApiEntry; 'OPENGL' name 'glColorMask';
	1039	Procedure glColorMaterial (face,mode:GLenum);ApiEntry; 'OPENGL' name 'glColorMaterial';
	1040	Procedure glColorPointerEXT (size:GLint;typ:GLenum;stride:GLsizei;
	1041	count:GLsizei;Const Buf);ApiEntry; 'OPENGL' name 'glColorPointerEXT';
	1042	Procedure glCopyPixels (x,y:GLint;width,height:GLsizei;typ:GLenum);ApiEntry; 'OPENGL' name 'glCopyPixels';
	1043	Procedure glCullFace (mode:GLenum);ApiEntry; 'OPENGL' name 'glCullFace';
	1044	Procedure glDeleteLists (list:GLuint;range:GLsizei);ApiEntry; 'OPENGL' name 'glDeleteLists';
	1045	Procedure glDeleteTexturesEXT (n:GLsizei;Const textures);ApiEntry; 'OPENGL' name 'glDeleteTexturesEXT';
	1046	Procedure glDepthFunc (func:GLenum);ApiEntry; 'OPENGL' name 'glDepthFunc';
	1047	Procedure glDepthMask (flag:GLboolean);ApiEntry; 'OPENGL' name 'glDepthMask';
	1048	Procedure glDepthRange (near,far:GLclampd);ApiEntry; 'OPENGL' name 'glDepthRange';
	1049	Procedure glDisable (cap:GLenum);ApiEntry; 'OPENGL' name 'glDisable';
	1050	Procedure glDrawArraysEXT (mode:GLenum;first:GLint;count:GLsizei);ApiEntry; 'OPENGL' name 'glDrawArraysEXT';
	1051	Procedure glDrawBuffer (mode:GLenum);ApiEntry; 'OPENGL' name 'glDrawBuffer';
	1052	Procedure glDrawPixels (width,height:GLsizei;format,typ:GLenum;Const pixels); 'OPENGL' name 'glDrawPixels';
	1053	Procedure glEdgeFlag (flag:GLboolean);ApiEntry; 'OPENGL' name 'glEdgeFlag';
	1054	Procedure glEdgeFlagPointerEXT (stride:GLsizei;count:GLsizei;Const Buf);ApiEntry; 'OPENGL' name 'glEdgeFlagPointerEXT';
	1055	Procedure glEdgeFlagv (Const Flag);ApiEntry; 'OPENGL' name 'glEdgeFlagv';
	1056	Procedure glEnable (cap:GLenum);ApiEntry; 'OPENGL' name 'glEnable';
	1057	Procedure glEnd;ApiEntry; 'OPENGL' name 'glEnd';
	1058	Procedure glEndList;ApiEntry; 'OPENGL' name 'glEndList';
	1059	Procedure glEvalCoord1d (u:GLdouble);ApiEntry; 'OPENGL' name 'glEvalCoord1d';
	1060	Procedure glEvalCoord1dv (Const u);ApiEntry; 'OPENGL' name 'glEvalCoord1dv';
	1061	Procedure glEvalCoord1f (u:GLfloat);ApiEntry; 'OPENGL' name 'glEvalCoord1f';
	1062	Procedure glEvalCoord1fv (Const u);ApiEntry; 'OPENGL' name 'glEvalCoord1fv';
	1063	Procedure glEvalCoord2d (u,v:GLdouble);ApiEntry; 'OPENGL' name 'glEvalCoord2d';
	1064	Procedure glEvalCoord2dv (Const u);ApiEntry; 'OPENGL' name 'glEvalCoord2dv';
	1065	Procedure glEvalCoord2f (u,v:GLfloat);ApiEntry; 'OPENGL' name 'glEvalCoord2f';
	1066	Procedure glEvalCoord2fv (Const u);ApiEntry; 'OPENGL' name 'glEvalCoord2fv';
	1067	Procedure glEvalMesh1 (mode:GLenum;i1,i2:GLint);ApiEntry; 'OPENGL' name 'glEvalMesh1';
	1068	Procedure glEvalMesh2 (mode:GLenum;i1,i2,j1,j2:GLint);ApiEntry; 'OPENGL' name 'glEvalMesh1';
	1069	Procedure glEvalPoint1 (i:GLint);ApiEntry; 'OPENGL' name 'glEvalPoint1';
	1070	Procedure glEvalPoint2 (i,j:GLint);ApiEntry; 'OPENGL' name 'glEvalPoint2';
	1071	Procedure glFeedbackBuffer (size:GLsizei;typ:GLenum;Var buffer);ApiEntry; 'OPENGL' name 'glFeedbackBuffer';
	1072	Procedure glFinish;ApiEntry; 'OPENGL' name 'glFinish';
	1073	Procedure glFlush;ApiEntry; 'OPENGL' name 'glFlush';
	1074	Procedure glFogf (pname:GLenum;param:GLfloat);ApiEntry; 'OPENGL' name 'glFogf';
	1075	Procedure glFogfv (pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glFogfv';
	1076	Procedure glFogi (pname:GLenum;param:GLint);ApiEntry; 'OPENGL' name 'glFogi';
	1077	Procedure glFogiv (pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glFogiv';
	1078	Procedure glFrontFace (mode:GLenum);ApiEntry; 'OPENGL' name 'glFrontFace';
	1079	Procedure glFrustum (left,right,bottom,top,near,far:GLdouble);ApiEntry; 'OPENGL' name 'glFrustum';
	1080	Function glGenLists (range:GLsizei):GLuint;ApiEntry; 'OPENGL' name 'glGenLists';
	1081	Procedure glGenTexturesEXT (n:GLsizei;Var textures);ApiEntry; 'OPENGL' name 'glGenTexturesEXT';
	1082	Procedure glGetBooleanv (pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetBooleanv';
	1083	Procedure glGetClipPlane (plane:GLenum;Var equation:GLdouble);ApiEntry; 'OPENGL' name 'glGetClipPlane';
	1084	Procedure glGetDoublev (pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetDoublev';
	1085	Function glGetError:GLenum;ApiEntry; 'OPENGL' name 'glGetError';
	1086	Procedure glGetFloatv (pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetFloatv';
	1087	Procedure glGetIntegerv (pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetIntegerv';
	1088	Procedure glGetLightfv (light,pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetLightfv';
	1089	Procedure glGetLightiv (light,pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetLightiv';
	1090	Procedure glGetMapdv (target,query:GLenum;Var v);ApiEntry; 'OPENGL' name 'glGetMapdv';
	1091	Procedure glGetMapfv (target,query:GLenum;Var v);ApiEntry; 'OPENGL' name 'glGetMapfv';
	1092	Procedure glGetMapiv (target,query:GLenum;Var v);ApiEntry; 'OPENGL' name 'glGetMapiv';
	1093	Procedure glGetMaterialfv (face,pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetMaterialfv';
	1094	Procedure glGetMaterialiv (face,pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetMaterialiv';
	1095	Procedure glGetPixelMapfv (map:GLenum;Var values);ApiEntry; 'OPENGL' name 'glGetPixelMapfv';
	1096	Procedure glGetPixelMapuiv (map:GLenum;Var values);ApiEntry; 'OPENGL' name 'glGetPixelMapuiv';
	1097	Procedure glGetPixelMapusv (map:GLenum;Var values);ApiEntry; 'OPENGL' name 'glGetPixelMapusv';
	1098	Procedure glGetPointervEXT (pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetPointervEXT';
	1099	Procedure glGetPolygonStipple (Var mask:GLubyte);ApiEntry; 'OPENGL' name 'glGetPolygonStipple';
	1100	Function glGetString (name:GLenum):PGLubyte;ApiEntry; 'OPENGL' name 'glGetString';
	1101	Procedure glGetTexEnvfv (target,pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetTexEnvfv';
	1102	Procedure glGetTexEnviv (target,pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetTexEnviv';
	1103	Procedure glGetTexGendv (coord,pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetTexGendv';
	1104	Procedure glGetTexGenfv (coord,pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetTexGenfv';
	1105	Procedure glGetTexGeniv (coord,pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetTexGeniv';
	1106	Procedure glGetTexImage (target:GLenum;level:GLint;format:GLenum;
	1107	typ:GLenum;Var pixels);ApiEntry; 'OPENGL' name 'glGetTexImage';
	1108	Procedure glGetTexLevelParameterfv (target:GLenum;level:GLint;pname:GLenum;
	1109	Var params);ApiEntry; 'OPENGL' name 'glGetTexLevelParameterfv';
	1110	Procedure glGetTexLevelParameteriv (target:GLenum;level:GLint;pname:GLenum;
	1111	Var params);ApiEntry; 'OPENGL' name 'glGetTexLevelParameteriv';
	1112	Procedure glGetTexParameterfv (target:GLenum;pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetTexParameterfv';
	1113	Procedure glGetTexParameteriv (target:GLenum;pname:GLenum;Var params);ApiEntry; 'OPENGL' name 'glGetTexParameteriv';
	1114	Procedure glHint (target,mode:GLenum);ApiEntry; 'OPENGL' name 'glHint';
	1115	Procedure glIndexMask (mask:GLuint);ApiEntry; 'OPENGL' name 'glIndexMask';
	1116	Procedure glIndexPointerEXT (typ:GLenum;stride,count:GLsizei;Const Buf);ApiEntry; 'OPENGL' name 'glIndexPointerEXT';
	1117	Procedure glIndexd (c:GLdouble);ApiEntry; 'OPENGL' name 'glIndexd';
	1118	Procedure glIndexdv (Const c);ApiEntry; 'OPENGL' name 'glIndexdv';
	1119	Procedure glIndexf (c:GLfloat);ApiEntry; 'OPENGL' name 'glIndexf';
	1120	Procedure glIndexfv (Const c);ApiEntry; 'OPENGL' name 'glIndexfv';
	1121	Procedure glIndexi (c:GLint);ApiEntry; 'OPENGL' name 'glIndexi';
	1122	Procedure glIndexiv (Const c);ApiEntry; 'OPENGL' name 'glIndexiv';
	1123	Procedure glIndexs (c:GLshort);ApiEntry; 'OPENGL' name 'glIndexs';
	1124	Procedure glIndexsv (Const c);ApiEntry; 'OPENGL' name 'glIndexsv';
	1125	Procedure glInitNames;ApiEntry; 'OPENGL' name 'glInitNames';
	1126	Function glIsEnabled (cap:GLenum):GLboolean;ApiEntry; 'OPENGL' name 'glIsEnabled';
	1127	Function glIsList (list:GLuint):GLboolean;ApiEntry; 'OPENGL' name 'glIsList';
	1128	Function glIsTextureEXT (texture:GLuint):GLboolean;ApiEntry; 'OPENGL' name 'glIsTextureEXT';
	1129	Procedure glLightModelf (pname:GLenum;param:GLfloat);ApiEntry; 'OPENGL' name 'glLightModelf';
	1130	Procedure glLightModelfv (pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glLightModelfv';
	1131	Procedure glLightModeli (pname:GLenum;param:GLint);ApiEntry; 'OPENGL' name 'glLightModeli';
	1132	Procedure glLightModeliv (pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glLightModeliv';
	1133	Procedure glLightf (light,pname:GLenum;param:GLfloat);ApiEntry; 'OPENGL' name 'glLightf';
	1134	Procedure glLightfv (light,pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glLightfv';
	1135	Procedure glLighti (light,pname:GLenum;param:GLint);ApiEntry; 'OPENGL' name 'glLighti';
	1136	Procedure glLightiv (light,pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glLightiv';
	1137	Procedure glLineStipple (factor:GLint;pattern:GLushort);ApiEntry; 'OPENGL' name 'glLineStipple';
	1138	Procedure glLineWidth (width:GLfloat);ApiEntry; 'OPENGL' name 'glLineWidth';
	1139	Procedure glListBase (base:GLuint);ApiEntry; 'OPENGL' name 'glListBase';
	1140	Procedure glLoadIdentity;ApiEntry; 'OPENGL' name 'glLoadIdentity';
	1141	Procedure glLoadMatrixd (Const m);ApiEntry; 'OPENGL' name 'glLoadMatrixd';
	1142	Procedure glLoadMatrixf (Const m);ApiEntry; 'OPENGL' name 'glLoadMatrixf';
	1143	Procedure glLoadName (name:GLuint);ApiEntry; 'OPENGL' name 'glLoadName';
	1144	Procedure glLogicOp (opcode:GLenum);ApiEntry; 'OPENGL' name 'glLogicOp';
	1145	Procedure glMap1d (target:GLenum;u1,u2:GLdouble;stride,order:GLint;
	1146	Const points);ApiEntry; 'OPENGL' name 'glMap1d';
	1147	Procedure glMap1f (target:GLenum;u1,u2:GLfloat;stride,order:GLint;
	1148	Const points);ApiEntry; 'OPENGL' name 'glMap1f';
	1149	Procedure glMap2d (target:GLenum;u1,u2:GLdouble;ustride,uorder:GLint;
	1150	v1,v2:GLdouble;vstride,vorder:GLint;Const points);ApiEntry; 'OPENGL' name 'glMap2d';
	1151	Procedure glMap2f (target:GLenum;u1,u2:GLfloat;ustride,uorder:GLint;
	1152	v1,v2:GLfloat;vstride,vorder:GLint;Const points);ApiEntry; 'OPENGL' name 'glMap2f';
	1153	Procedure glMapGrid1d (un:GLint;u1,u2:GLdouble);ApiEntry; 'OPENGL' name 'glMapGrid1d';
	1154	Procedure glMapGrid1f (un:GLint;u1,u2:GLfloat);ApiEntry; 'OPENGL' name 'glMapGrid1f';
	1155	Procedure glMapGrid2d (un:GLint;u1,u2:GLdouble;vn:GLint;v1,v2:GLdouble);ApiEntry; 'OPENGL' name 'glMapGrid2d';
	1156	Procedure glMapGrid2f (un:GLint;u1,u2:GLfloat;vn:GLint;v1,v2:GLfloat);ApiEntry; 'OPENGL' name 'glMapGrid2f';
	1157	Procedure glMaterialf (face,pname:GLenum;param:GLfloat);ApiEntry; 'OPENGL' name 'glMaterialf';
	1158	Procedure glMaterialfv (face,pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glMaterialfv';
	1159	Procedure glMateriali (face,pname:GLenum;param:GLint);ApiEntry; 'OPENGL' name 'glMateriali';
	1160	Procedure glMaterialiv (face,pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glMaterialiv';
	1161	Procedure glMatrixMode (mode:GLenum);ApiEntry; 'OPENGL' name 'glMatrixMode';
	1162	Procedure glMultMatrixd (Const m);ApiEntry; 'OPENGL' name 'glMultMatrixd';
	1163	Procedure glMultMatrixf (Const m);ApiEntry; 'OPENGL' name 'glMultMatrixf';
	1164	Procedure glNewList (list:GLuint;mode:GLenum);ApiEntry; 'OPENGL' name 'glNewList';
	1165	Procedure glNormal3b (nx,ny,nz:GLbyte);ApiEntry; 'OPENGL' name 'glNormal3b';
	1166	Procedure glNormal3bv (Const v);ApiEntry; 'OPENGL' name 'glNormal3bv';
	1167	Procedure glNormal3d (nx,ny,nz:GLdouble);ApiEntry; 'OPENGL' name 'glNormal3d';
	1168	Procedure glNormal3dv (Const v);ApiEntry; 'OPENGL' name 'glNormal3dv';
	1169	Procedure glNormal3f (nx,ny,nz:GLfloat);ApiEntry; 'OPENGL' name 'glNormal3f';
	1170	Procedure glNormal3fv (Const v);ApiEntry; 'OPENGL' name 'glNormal3fv';
	1171	Procedure glNormal3i (nx,ny,nz:GLint);ApiEntry; 'OPENGL' name 'glNormal3i';
	1172	Procedure glNormal3iv (Const v);ApiEntry; 'OPENGL' name 'glNormal3iv';
	1173	Procedure glNormal3s (nx,ny,nz:GLshort);ApiEntry; 'OPENGL' name 'glNormal3s';
	1174	Procedure glNormal3sv (Const v);ApiEntry; 'OPENGL' name 'glNormal3sv';
	1175	Procedure glNormalPointerEXT (typ:GLenum;stride,count:GLsizei;Const Buf);ApiEntry; 'OPENGL' name 'glNormalPointerEXT';
	1176	Procedure glOrtho (left,right,bottom,top,near,far:GLdouble);ApiEntry; 'OPENGL' name 'glOrtho';
	1177	Procedure glPassThrough (token:GLfloat);ApiEntry; 'OPENGL' name 'glPassThrough';
	1178	Procedure glPixelMapfv (map:GLenum;mapsize:GLsizei;Const values);ApiEntry; 'OPENGL' name 'glPixelMapfv';
	1179	Procedure glPixelMapuiv (map:GLenum;mapsize:GLsizei;Const values);ApiEntry; 'OPENGL' name 'glPixelMapuiv';
	1180	Procedure glPixelMapusv (map:GLenum;mapsize:GLsizei;Const values);ApiEntry; 'OPENGL' name 'glPixelMapusv';
	1181	Procedure glPixelStoref (pname:GLenum;param:GLfloat);ApiEntry; 'OPENGL' name 'glPixelStoref';
	1182	Procedure glPixelStorei (pname:GLenum;param:GLint);ApiEntry; 'OPENGL' name 'glPixelStorei';
	1183	Procedure glPixelTransferf (pname:GLenum;param:GLfloat);ApiEntry; 'OPENGL' name 'glPixelTransferf';
	1184	Procedure glPixelTransferi (pname:GLenum;param:GLint);ApiEntry; 'OPENGL' name 'glPixelTransferi';
	1185	Procedure glPixelZoom (xfactor,yfactor:GLfloat);ApiEntry; 'OPENGL' name 'glPixelZoom';
	1186	Procedure glPointSize (size:GLfloat);ApiEntry; 'OPENGL' name 'glPointSize';
	1187	Procedure glPolygonMode (face,mode:GLenum);ApiEntry; 'OPENGL' name 'glPolygonMode';
	1188	Procedure glPolygonOffsetEXT (factor,bias:GLfloat);ApiEntry; 'OPENGL' name 'glPolygonOffsetEXT';
	1189	Procedure glPolygonStipple (Const mask);ApiEntry; 'OPENGL' name 'glPolygonStipple';
	1190	Procedure glPopAttrib;ApiEntry; 'OPENGL' name 'glPopAttrib';
	1191	Procedure glPopMatrix;ApiEntry; 'OPENGL' name 'glPopMatrix';
	1192	Procedure glPopName;ApiEntry; 'OPENGL' name 'glPopName';
	1193	Procedure glPrioritizeTexturesEXT (n:GLsizei;Const textures;Const priorities);ApiEntry; 'OPENGL' name 'glPrioritizeTexturesEXT';
	1194	Procedure glPushAttrib (mask:GLbitfield);ApiEntry; 'OPENGL' name 'glPushAttrib';
	1195	Procedure glPushMatrix;ApiEntry; 'OPENGL' name 'glPushMatrix';
	1196	Procedure glPushName (name:GLuint);ApiEntry; 'OPENGL' name 'glPushName';
	1197	Procedure glRasterPos2d (x,y:GLdouble);ApiEntry; 'OPENGL' name 'glRasterPos2d';
	1198	Procedure glRasterPos2dv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos2dv';
	1199	Procedure glRasterPos2f (x,y:GLfloat);ApiEntry; 'OPENGL' name 'glRasterPos2f';
	1200	Procedure glRasterPos2fv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos2fv';
	1201	Procedure glRasterPos2i (x,y:GLint);ApiEntry; 'OPENGL' name 'glRasterPos2i';
	1202	Procedure glRasterPos2iv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos2iv';
	1203	Procedure glRasterPos2s (x,y:GLshort);ApiEntry; 'OPENGL' name 'glRasterPos2s';
	1204	Procedure glRasterPos2sv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos2sv';
	1205	Procedure glRasterPos3d (x,y,z:GLdouble);ApiEntry; 'OPENGL' name 'glRasterPos3d';
	1206	Procedure glRasterPos3dv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos3dv';
	1207	Procedure glRasterPos3f (x,y,z:GLfloat);ApiEntry; 'OPENGL' name 'glRasterPos3f';
	1208	Procedure glRasterPos3fv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos3fv';
	1209	Procedure glRasterPos3i (x,y,z:GLint);ApiEntry; 'OPENGL' name 'glRasterPos3i';
	1210	Procedure glRasterPos3iv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos3iv';
	1211	Procedure glRasterPos3s (x,y,z:GLshort);ApiEntry; 'OPENGL' name 'glRasterPos3s';
	1212	Procedure glRasterPos3sv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos3sv';
	1213	Procedure glRasterPos4d (x,y,z,w:GLdouble);ApiEntry; 'OPENGL' name 'glRasterPos4d';
	1214	Procedure glRasterPos4dv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos4dv';
	1215	Procedure glRasterPos4f (x,y,z,w:GLfloat);ApiEntry; 'OPENGL' name 'glRasterPos4f';
	1216	Procedure glRasterPos4fv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos4fv';
	1217	Procedure glRasterPos4i (x,y,z,w:GLint);ApiEntry; 'OPENGL' name 'glRasterPos4i';
	1218	Procedure glRasterPos4iv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos4iv';
	1219	Procedure glRasterPos4s (x,y,z,w:GLshort);ApiEntry; 'OPENGL' name 'glRasterPos4s';
	1220	Procedure glRasterPos4sv (Const v);ApiEntry; 'OPENGL' name 'glRasterPos4sv';
	1221	Procedure glReadBuffer (mode:GLenum);ApiEntry; 'OPENGL' name 'glReadBuffer';
	1222	Procedure glReadPixels (x,y:GLint;width,height:GLsizei;
	1223	format,typ:GLenum;Var pixels);ApiEntry; 'OPENGL' name 'glReadPixels';
	1224	Procedure glRectd (x1,y1,x2,y2:GLdouble);ApiEntry; 'OPENGL' name 'glRectd';
	1225	Procedure glRectdv (Const v1;Const v2);ApiEntry; 'OPENGL' name 'glRectdv';
	1226	Procedure glRectf (x1,y1,x2,y2:GLfloat);ApiEntry; 'OPENGL' name 'glRectf';
	1227	Procedure glRectfv (Const v1;Const v2);ApiEntry; 'OPENGL' name 'glRectfv';
	1228	Procedure glRecti (x1,y1,x2,y2:GLint);ApiEntry; 'OPENGL' name 'glRecti';
	1229	Procedure glRectiv (Const v1;Const v2);ApiEntry; 'OPENGL' name 'glRectiv';
	1230	Procedure glRects (x1,y1,x2,y2:GLshort);ApiEntry; 'OPENGL' name 'glRects';
	1231	Procedure glRectsv (Const v1;Const v2);ApiEntry; 'OPENGL' name 'glRectsv';
	1232	Function glRenderMode (mode:GLenum):GLint;ApiEntry; 'OPENGL' name 'glRenderMode';
	1233	Procedure glRotated (angle,x,y,z:GLdouble);ApiEntry; 'OPENGL' name 'glRotated';
	1234	Procedure glRotatef (angle,x,y,z:GLfloat);ApiEntry; 'OPENGL' name 'glRotatef';
	1235	Procedure glScaled (x,y,z:GLdouble);ApiEntry; 'OPENGL' name 'glScaled';
	1236	Procedure glScalef (x,y,z:GLfloat);ApiEntry; 'OPENGL' name 'glScalef';
	1237	Procedure glScissor (x,y:GLint;width,height:GLsizei);ApiEntry; 'OPENGL' name 'glScissor';
	1238	Procedure glSelectBuffer (size:GLsizei;Var buffer);ApiEntry; 'OPENGL' name 'glSelectBuffer';
	1239	Procedure glShadeModel (mode:GLenum);ApiEntry; 'OPENGL' name 'glShadeModel';
	1240	Procedure glStencilFunc (func:GLenum;ref:GLint;mask:GLuint);ApiEntry; 'OPENGL' name 'glStencilFunc';
	1241	Procedure glStencilMask (mask:GLuint);ApiEntry; 'OPENGL' name 'glStencilMask';
	1242	Procedure glStencilOp (fail,zfail,zpass:GLenum);ApiEntry; 'OPENGL' name 'glStencilOp';
	1243	Procedure glTexCoord1d (s:GLdouble);ApiEntry; 'OPENGL' name 'glTexCoord1d';
	1244	Procedure glTexCoord1dv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord1dv';
	1245	Procedure glTexCoord1f (s:GLfloat);ApiEntry; 'OPENGL' name 'glTexCoord1f';
	1246	Procedure glTexCoord1fv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord1fv';
	1247	Procedure glTexCoord1i (s:GLint);ApiEntry; 'OPENGL' name 'glTexCoord1i';
	1248	Procedure glTexCoord1iv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord1iv';
	1249	Procedure glTexCoord1s (s:GLshort);ApiEntry; 'OPENGL' name 'glTexCoord1s';
	1250	Procedure glTexCoord1sv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord1sv';
	1251	Procedure glTexCoord2d (s,t:GLdouble);ApiEntry; 'OPENGL' name 'glTexCoord2d';
	1252	Procedure glTexCoord2dv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord2dv';
	1253	Procedure glTexCoord2f (s,t:GLfloat);ApiEntry; 'OPENGL' name 'glTexCoord2f';
	1254	Procedure glTexCoord2fv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord2fv';
	1255	Procedure glTexCoord2i (s,t:GLint);ApiEntry; 'OPENGL' name 'glTexCoord2i';
	1256	Procedure glTexCoord2iv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord2iv';
	1257	Procedure glTexCoord2s (s,t:GLshort);ApiEntry; 'OPENGL' name 'glTexCoord2s';
	1258	Procedure glTexCoord2sv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord2sv';
	1259	Procedure glTexCoord3d (s,t,r:GLdouble);ApiEntry; 'OPENGL' name 'glTexCoord3d';
	1260	Procedure glTexCoord3dv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord3dv';
	1261	Procedure glTexCoord3f (s,t,r:GLfloat);ApiEntry; 'OPENGL' name 'glTexCoord3f';
	1262	Procedure glTexCoord3fv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord3fv';
	1263	Procedure glTexCoord3i (s,t,r:GLint);ApiEntry; 'OPENGL' name 'glTexCoord3i';
	1264	Procedure glTexCoord3iv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord3iv';
	1265	Procedure glTexCoord3s (s,t,r:GLshort);ApiEntry; 'OPENGL' name 'glTexCoord3s';
	1266	Procedure glTexCoord3sv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord3sv';
	1267	Procedure glTexCoord4d (s,t,r,q:GLdouble);ApiEntry; 'OPENGL' name 'glTexCoord4d';
	1268	Procedure glTexCoord4dv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord4dv';
	1269	Procedure glTexCoord4f (s,t,r,q:GLfloat);ApiEntry; 'OPENGL' name 'glTexCoord4f';
	1270	Procedure glTexCoord4fv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord4fv';
	1271	Procedure glTexCoord4i (s,t,r,q:GLint);ApiEntry; 'OPENGL' name 'glTexCoord4i';
	1272	Procedure glTexCoord4iv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord4iv';
	1273	Procedure glTexCoord4s (s,t,r,q:GLshort);ApiEntry; 'OPENGL' name 'glTexCoord4s';
	1274	Procedure glTexCoord4sv (Const v);ApiEntry; 'OPENGL' name 'glTexCoord4sv';
	1275	Procedure glTexCoordPointerEXT (size:GLint;typ:GLenum;stride,count:GLsizei;
	1276	Const Buf);ApiEntry; 'OPENGL' name 'glTexCoordPointerEXT';
	1277	Procedure glTexEnvf (target,pname:GLenum;param:GLfloat);ApiEntry; 'OPENGL' name 'glTexEnvf';
	1278	Procedure glTexEnvfv (target,pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glTexEnvfv';
	1279	Procedure glTexEnvi (target,pname:GLenum;param:GLint);ApiEntry; 'OPENGL' name 'glTexEnvi';
	1280	Procedure glTexEnviv (target,pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glTexEnviv';
	1281	Procedure glTexGend (coord,pname:GLenum;param:GLdouble);ApiEntry; 'OPENGL' name 'glTexGend';
	1282	Procedure glTexGendv (coord,pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glTexGendv';
	1283	Procedure glTexGenf (coord,pname:GLenum;param:GLfloat);ApiEntry; 'OPENGL' name 'glTexGenf';
	1284	Procedure glTexGenfv (coord,pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glTexGenfv';
	1285	Procedure glTexGeni (coord,pname:GLenum;param:GLint);ApiEntry; 'OPENGL' name 'glTexGeni';
	1286	Procedure glTexGeniv (coord,pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glTexGeniv';
	1287	Procedure glTexImage1D (target:GLenum;level,components:GLint;
	1288	width:GLsizei;border:GLint;format:GLenum;
	1289	typ:GLenum;Const pixels);ApiEntry; 'OPENGL' name 'glTexImage1D';
	1290	Procedure glTexImage2D (target:GLenum;level,components:GLint;
	1291	width,height:GLsizei;border:GLint;
	1292	format,typ:GLenum;Const pixels);ApiEntry; 'OPENGL' name 'glTexImage2D';
	1293	Procedure glTexParameterf (target,pname:GLenum;param:GLfloat);ApiEntry; 'OPENGL' name 'glTexParameterf';
	1294	Procedure glTexParameterfv (target,pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glTexParameterfv';
	1295	Procedure glTexParameteri (target,pname:GLenum;param:GLint);ApiEntry; 'OPENGL' name 'glTexParameteri';
	1296	Procedure glTexParameteriv (target,pname:GLenum;Const params);ApiEntry; 'OPENGL' name 'glTexParameteriv';
	1297	Procedure glTexSubImage1DEXT (target:GLenum;level,xoffset:GLint;
	1298	width:GLsizei;format,typ:GLenum;Const pixels);ApiEntry; 'OPENGL' name 'glTexSubImage1DEXT';
	1299	Procedure glTexSubImage2DEXT (target:GLenum;level,xoffset,yoffset:GLint;
	1300	width,height:GLsizei;format,typ:GLenum;
	1301	Const pixels);ApiEntry; 'OPENGL' name 'glTexSubImage2DEXT';
	1302	Procedure glTranslated (x,y,z:GLdouble);ApiEntry; 'OPENGL' name 'glTranslated';
	1303	Procedure glTranslatef (x,y,z:GLfloat);ApiEntry; 'OPENGL' name 'glTranslatef';
	1304	Procedure glVertex2d (x,y:GLdouble);ApiEntry; 'OPENGL' name 'glVertex2d';
	1305	Procedure glVertex2dv (Const v);ApiEntry; 'OPENGL' name 'glVertex2dv';
	1306	Procedure glVertex2f (x,y:GLfloat);ApiEntry; 'OPENGL' name 'glVertex2f';
	1307	Procedure glVertex2fv (Const v);ApiEntry; 'OPENGL' name 'glVertex2fv';
	1308	Procedure glVertex2i (x,y:GLint);ApiEntry; 'OPENGL' name 'glVertex2i';
	1309	Procedure glVertex2iv (Const v);ApiEntry; 'OPENGL' name 'glVertex2iv';
	1310	Procedure glVertex2s (x,y:GLshort);ApiEntry; 'OPENGL' name 'glVertex2s';
	1311	Procedure glVertex2sv (Const v);ApiEntry; 'OPENGL' name 'glVertex2sv';
	1312	Procedure glVertex3d (x,y,z:GLdouble);ApiEntry; 'OPENGL' name 'glVertex3d';
	1313	Procedure glVertex3dv (Const v);ApiEntry; 'OPENGL' name 'glVertex3dv';
	1314	Procedure glVertex3f (x,y,z:GLfloat);ApiEntry; 'OPENGL' name 'glVertex3f';
	1315	Procedure glVertex3fv (Const v);ApiEntry; 'OPENGL' name 'glVertex3fv';
	1316	Procedure glVertex3i (x,y,z:GLint);ApiEntry; 'OPENGL' name 'glVertex3i';
	1317	Procedure glVertex3iv (Const v);ApiEntry; 'OPENGL' name 'glVertex3iv';
	1318	Procedure glVertex3s (x,y,z:GLshort);ApiEntry; 'OPENGL' name 'glVertex3s';
	1319	Procedure glVertex3sv (Const v);ApiEntry; 'OPENGL' name 'glVertex3sv';
	1320	Procedure glVertex4d (x,y,z,w:GLdouble);ApiEntry; 'OPENGL' name 'glVertex4d';
	1321	Procedure glVertex4dv (Const v);ApiEntry; 'OPENGL' name 'glVertex4dv';
	1322	Procedure glVertex4f (x,y,z,w:GLfloat);ApiEntry; 'OPENGL' name 'glVertex4f';
	1323	Procedure glVertex4fv (Const v);ApiEntry; 'OPENGL' name 'glVertex4fv';
	1324	Procedure glVertex4i (x,y,z,w:GLint);ApiEntry; 'OPENGL' name 'glVertex4i';
	1325	Procedure glVertex4iv (Const v);ApiEntry; 'OPENGL' name 'glVertex4iv';
	1326	Procedure glVertex4s (x,y,z,w:GLshort);ApiEntry; 'OPENGL' name 'glVertex4s';
	1327	Procedure glVertex4sv (Const v);ApiEntry; 'OPENGL' name 'glVertex4sv';
	1328	Procedure glVertexPointerEXT (size:GLint;typ:GLenum;stride,count:GLsizei;
	1329	Const Buf);ApiEntry; 'OPENGL' name 'glVertexPointerEXT';
	1330	Procedure glViewport (x,y:GLint;width,height:GLsizei);ApiEntry; 'OPENGL' name 'glViewport';
	1331
	1332	Procedure auxInitDisplayMode(mode:GLenum);ApiEntry; 'LIBAUX' name 'auxInitDisplayMode';
	1333	Procedure auxInitPosition(x,y,w,h:LongInt);ApiEntry;'LIBAUX' name 'auxInitPosition';
	1334	Function auxInitWindow(Const t:CString):GLenum;ApiEntry; 'LIBAUX' name 'auxInitWindow';
	1335	Procedure auxCloseWindow;ApiEntry; 'LIBAUX' name 'auxCloseWindow';
	1336	Procedure auxQuit;ApiEntry; 'LIBAUX' name 'auxQuit';
	1337	Procedure auxClipBoard;ApiEntry; 'LIBAUX' name 'auxClipBoard';
	1338	Procedure auxSwapBuffers;ApiEntry; 'LIBAUX' name 'auxSwapBuffers';
	1339
	1340	Procedure gluBeginCurve (Var nurb);ApiEntry; 'OPENGL' name 'gluBeginCurve';
	1341	Procedure gluBeginPolygon (Var tess);ApiEntry; 'OPENGL' name 'gluBeginPolygon';
	1342	Procedure gluBeginSurface (Var nurb);ApiEntry; 'OPENGL' name 'gluBeginSurface';
	1343	Procedure gluBeginTrim (Var nurb);ApiEntry; 'OPENGL' name 'gluBeginTrim';
	1344	Function gluBuild1DMipmaps (target:GLenum;component:GLint;
	1345	width:GLsizei;format,typ:GLenum;
	1346	Const data):GLint;ApiEntry; 'OPENGL' name 'gluBuild1DMipmaps';
	1347	Function gluBuild2DMipmaps (target:GLenum;component:GLint;
	1348	width,height:GLsizei;format,typ:GLenum;
	1349	Const data):GLint;ApiEntry; 'OPENGL' name 'gluBuild2DMipmaps';
	1350	Procedure gluCylinder (Var quad;base,top,height:GLdouble;slices:GLint;
	1351	stacks:GLint);ApiEntry; 'OPENGL' name 'gluCylinder';
	1352	Procedure gluDeleteNurbsRenderer (Var nurb);ApiEntry; 'OPENGL' name 'gluDeleteNurbsRenderer';
	1353	Procedure gluDeleteQuadric (Var quad);ApiEntry; 'OPENGL' name 'gluDeleteQuadric';
	1354	Procedure gluDeleteTess (Var tess);ApiEntry; 'OPENGL' name 'gluDeleteTess';
	1355	Procedure gluDisk (Var quad;inner,outer:GLdouble;slices,loops:GLint);ApiEntry; 'OPENGL' name 'gluDisk';
	1356	Procedure gluEndCurve (Var nurb);ApiEntry; 'OPENGL' name 'gluEndCurve';
	1357	Procedure gluEndPolygon (Var tess);ApiEntry; 'OPENGL' name 'gluEndPolygon';
	1358	Procedure gluEndSurface (Var nurb);ApiEntry; 'OPENGL' name 'gluEndSurface';
	1359	Procedure gluEndTrim (Var nurb);ApiEntry; 'OPENGL' name 'gluEndTrim';
	1360	Function gluErrorString (error:GLenum):PChar;ApiEntry; 'OPENGL' name 'gluErrorString';
	1361	Procedure gluGetNurbsProperty (Var nurb;property:GLenum;Var data);ApiEntry; 'OPENGL' name 'gluGetNurbsProperty';
	1362	Function gluGetString (name:GLenum):PChar;ApiEntry; 'OPENGL' name 'gluGetString';
	1363	Procedure gluGetTessProperty (Var tess;which:GLenum;Var data);ApiEntry; 'OPENGL' name 'gluGetTessProperty';
	1364	Procedure gluLoadSamplingMatrices (Var nurb;Const model;Const perspective;
	1365	Const view);ApiEntry; 'OPENGL' name 'gluLoadSamplingMatrices';
	1366	Procedure gluLookAt (eyeX,eyeY,eyeZ,centerX,centerY,centerZ:GLdouble;
	1367	upX,upY,upZ:GLdouble);ApiEntry; 'OPENGL' name 'gluLookAt';
	1368	Function gluNewNurbsRenderer:Pointer;ApiEntry; 'OPENGL' name 'gluNewNurbsRenderer';
	1369	Function gluNewQuadric:Pointer;ApiEntry; 'OPENGL' name 'gluNewQuadric';
	1370	Function gluNewTess:Pointer;ApiEntry; 'OPENGL' name 'gluNewTess';
	1371	Procedure gluNextContour (Var tess;typ:GLenum);ApiEntry; 'OPENGL' name 'gluNextContour';
	1372	Procedure gluNurbsCallback (Var nurb;which:GLenum;
	1373	CallBackFunc:auxproc1);ApiEntry; 'OPENGL' name 'gluNurbsCallback';
	1374	Procedure gluNurbsCurve (Var nurb;knotCount:GLint;Var knots;
	1375	stride:GLint;Var control;order:GLint;
	1376	typ:GLenum);ApiEntry; 'OPENGL' name 'gluNurbsCurve';
	1377	Procedure gluNurbsProperty (Var nurb;property:GLenum;value:GLfloat);ApiEntry; 'OPENGL' name 'gluNurbsProperty';
	1378	Procedure gluNurbsSurface (Var nurb;sKnotCount:GLint;Var sKnots;
	1379	tKnotCount:GLint;Var tKnots;sStride:GLint;
	1380	tStride:GLint;Var control;
	1381	sOrder,tOrder:GLint;typ:GLenum);ApiEntry; 'OPENGL' name 'gluNurbsSurface';
	1382	Procedure gluOrtho2D (left,right,bottom,top:GLdouble);ApiEntry; 'OPENGL' name 'gluOrtho2D';
	1383	Procedure gluPartialDisk (Var quad;inner,outer:GLdouble;slices:GLint;
	1384	loops:GLint;start,sweep:GLdouble);ApiEntry; 'OPENGL' name 'gluPartialDisk';
	1385	Procedure gluPerspective (fovy,aspect,near,far:GLdouble);ApiEntry; 'OPENGL' name 'gluPerspective';
	1386	Procedure gluPickMatrix (x,y,delx,dely:GLdouble;Var viewport);ApiEntry; 'OPENGL' name 'gluPickMatrix';
	1387	Function gluProject (objX,objY,objZ:GLdouble;Const model;Const proj;
	1388	Const view;Var winX;Var WinY;Var WinZ):GLint;ApiEntry; 'OPENGL' name 'gluProject';
	1389	Procedure gluPwlCurve (Var nurb;count:GLint;Var data;stride:GLint;
	1390	typ:GLenum);ApiEntry; 'OPENGL' name 'gluPwlCurve';
	1391	Procedure gluQuadricCallback (Var quad;which:GLenum;CallBackFunc:auxproc1);ApiEntry; 'OPENGL' name 'gluQuadricCallback';
	1392	Procedure gluQuadricDrawStyle (Var quad;draw:GLenum);ApiEntry; 'OPENGL' name 'gluQuadricDrawStyle';
	1393	Procedure gluQuadricNormals (Var quad;normal:GLenum);ApiEntry; 'OPENGL' name 'gluQuadricNormals';
	1394	Procedure gluQuadricOrientation (Var quad;orientation:GLenum);ApiEntry; 'OPENGL' name 'gluQuadricOrientation';
	1395	Procedure gluQuadricTexture (Var quad;texture:GLboolean);ApiEntry; 'OPENGL' name 'gluQuadricTexture';
	1396	Function gluScaleImage (format:GLenum;wIn,hIn:GLsizei;typeIn:GLenum;
	1397	Const dataIn;wOut,hOut:GLsizei;typeOut:GLenum;
	1398	Var dataOut):GLint;ApiEntry; 'OPENGL' name 'gluScaleImage';
	1399	Procedure gluSphere (Var quad;radius:GLdouble;slices,stacks:GLint);ApiEntry; 'OPENGL' name 'gluSphere';
	1400	Procedure gluTessBeginContour (Var tess);ApiEntry; 'OPENGL' name 'gluTessBeginContour';
	1401	Procedure gluTessBeginPolygon (Var tess;Var data);ApiEntry; 'OPENGL' name 'gluTessBeginPolygon';
	1402	Procedure gluTessCallback (Var tess;which:GLenum;CallBackFunc:auxproc1);ApiEntry; 'OPENGL' name 'gluTessCallback';
	1403	Procedure gluTessEndContour (Var tess);ApiEntry; 'OPENGL' name 'gluTessEndContour';
	1404	Procedure gluTessEndPolygon (Var tess);ApiEntry; 'OPENGL' name 'gluTessEndPolygon';
	1405	Procedure gluTessNormal (Var tess;valueX,valueY,valueZ:GLdouble);ApiEntry; 'OPENGL' name 'gluTessNormal';
	1406	Procedure gluTessProperty (Var tess;which:GLenum;data:GLdouble);ApiEntry; 'OPENGL' name 'gluTessProperty';
	1407	Procedure gluTessVertex (Var tess;Var location;Var data);ApiEntry; 'OPENGL' name 'gluTessVertex';
	1408	Function gluUnProject (winX,winY,winZ:GLdouble;Const model;Const proj;
	1409	Const view;Var objX;Var objY;Var objZ):GLint;ApiEntry; 'OPENGL' name 'gluUnProject';
	1410
	1411	Procedure auxMainLoop(f:auxproc1);ApiEntry; 'LIBAUX' name 'auxMainLoop';
	1412	Procedure auxExposeFunc(f:auxproc2);ApiEntry; 'LIBAUX' name 'auxExposeFunc';
	1413	Procedure auxReshapeFunc(f:auxproc2);ApiEntry; 'LIBAUX' name 'auxReshapeFunc';
	1414	Procedure auxIdleFunc(f:auxproc1);ApiEntry; 'LIBAUX' name 'auxIdleFunc';
	1415	Procedure auxKeyFunc(i:LongInt;f:auxproc1);ApiEntry; 'LIBAUX' name 'auxKeyFunc';
	1416	Procedure auxKeyDownFunc(f:auxfunc1);ApiEntry; 'LIBAUX' name 'auxKeyDownFunc';
	1417	Procedure auxMouseFunc(x,y:LongInt;f:auxproc3);ApiEntry; 'LIBAUX' name 'auxMouseFunc';
	1418	Procedure auxMouseDownFunc(f:auxfunc2);ApiEntry; 'LIBAUX' name 'auxMouseDownFunc';
	1419	Procedure auxMouseUpFunc(f:auxfunc2);ApiEntry; 'LIBAUX' name 'auxMouseUpFunc';
	1420	Procedure auxMouseMoveFunc(f:auxfunc2);ApiEntry; 'LIBAUX' name 'auxMouseMoveFunc';
	1421	Function auxGetColorMapSize:GLint;ApiEntry; 'LIBAUX' name 'auxGetColorMapSize';
	1422	Procedure auxGetMouseLoc(Var x,y:LongInt);ApiEntry; 'LIBAUX' name 'auxGetMouseLoc';
	1423	Procedure auxSetOneColor(i:LongInt;r,g,b:Single);ApiEntry; 'LIBAUX' name 'auxSetOneColor';
	1424	Procedure auxSetFogRamp(i1,i2:LongInt);ApiEntry; 'LIBAUX' name 'auxSetFogRamp';
	1425	Procedure auxSetGreyRamp;ApiEntry; 'LIBAUX' name 'auxSetGreyRamp';
	1426	Procedure auxSetRGBMap(c:LongInt;Var Buf);ApiEntry; 'LIBAUX' name 'auxSetRGBMap';
	1427	Function auxRGBImageLoad(c:PChar):PAUX_RGBImageRec; 'LIBAUX'name 'auxRGBImageLoad';
	1428	Procedure auxCreateFont;ApiEntry; 'LIBAUX' name 'auxCreateFont';
	1429	Procedure auxDrawStr(Const s:CString);ApiEntry; 'LIBAUX' name 'auxDrawStr';
	1430	Procedure auxWireSphere(d:GLdouble);ApiEntry; 'LIBAUX' name 'auxWireSphere';
	1431	Procedure auxSolidSphere(d:GLdouble);ApiEntry; 'LIBAUX' name 'auxSolidSphere';
	1432	Procedure auxWireCube(c:GLdouble);ApiEntry; 'LIBAUX' name 'auxWireCube';
	1433	Procedure auxSolidCube(c:GLdouble);ApiEntry; 'LIBAUX' name 'auxSolidCube';
	1434	Procedure auxWireBox(a,b,c:GLdouble);ApiEntry; 'LIBAUX' name 'auxWireBox';
	1435	Procedure auxSolidBox(a,b,c:GLdouble);ApiEntry; 'LIBAUX' name 'auxSolidBox';
	1436	Procedure auxWireTorus(a,b:GLdouble);ApiEntry; 'LIBAUX' name 'auxWireTorus';
	1437	Procedure auxSolidTorus(a,b:GLdouble);ApiEntry; 'LIBAUX' name 'auxSolidTorus';
	1438	Procedure auxWireCylinder(a,b:GLdouble);ApiEntry; 'LIBAUX' name 'auxWireCylinder';
	1439	Procedure auxSolidCylinder(a,b:GLdouble);ApiEntry; 'LIBAUX' name 'auxSolidCylinder';
	1440	Procedure auxWireIcosahedron(a:GLdouble);ApiEntry; 'LIBAUX' name 'auxWireIcosahedron';
	1441	Procedure auxSolidIcosahedron(a:GLdouble);ApiEntry; 'LIBAUX' name 'auxSolidIcosahedron';
	1442	Procedure auxWireOctahedron(a:GLdouble);ApiEntry; 'LIBAUX' name 'auxWireOctahedron';
	1443	Procedure auxSolidOctahedron(a:GLdouble);ApiEntry; 'LIBAUX' name 'auxSolidOctahedron';
	1444	Procedure auxWireTetrahedron(a:GLdouble);ApiEntry; 'LIBAUX' name 'auxWireTetrahedron';
	1445	Procedure auxSolidTetrahedron(a:GLdouble);ApiEntry; 'LIBAUX' name 'auxSolidTetrahedron';
	1446	Procedure auxWireDodecahedron(a:GLdouble);ApiEntry; 'LIBAUX' name 'auxWireDodecahedron';
	1447	Procedure auxSolidDodecahedron(a:GLdouble);ApiEntry; 'LIBAUX' name 'auxSolidDodecahedron';
	1448	Procedure auxWireCone(a,b:GLdouble);ApiEntry; 'LIBAUX' name 'auxWireCone';
	1449	Procedure auxSolidCone(a,b:GLdouble);ApiEntry; 'LIBAUX' name 'auxSolidCone';
	1450	Procedure auxWireTeapot(a:GLdouble);ApiEntry; 'LIBAUX' name 'auxWireTeapot';
	1451	Procedure auxSolidTeapot(a:GLdouble);ApiEntry; 'LIBAUX' name 'auxSolidTeapot';
	1452
	1453	Procedure glutInit (Var argc;Var argv);ApiEntry; 'GLUT' name 'glutInit';
	1454	Procedure glutInitDisplayMode (m:LongWord);ApiEntry; 'GLUT' name 'glutInitDisplayMode';
	1455	Procedure glutInitWindowPosition (x,y:LongInt);ApiEntry; 'GLUT' name 'glutInitWindowPosition';
	1456	Procedure glutInitWindowSize (cx,cy:LongInt);ApiEntry; 'GLUT' name 'glutInitWindowSize';
	1457	Procedure glutMainLoop;ApiEntry; 'GLUT' name 'glutMainLoop';
	1458	Function glutCreateWindow (Var c:CString):LongInt;ApiEntry; 'GLUT' name 'glutCreateWindow';
	1459	Function glutCreateSubWindow (x,y,w,h,i:LongInt):LongInt;ApiEntry; 'GLUT' name 'glutCreateSubWindow';
	1460	Procedure glutDestroyWindow (i:LongInt);ApiEntry; 'GLUT' name 'glutDestroyWindow';
	1461	Procedure glutPostRedisplay;ApiEntry; 'GLUT' name 'glutPostRedisplay';
	1462	Procedure glutSwapBuffers;ApiEntry; 'GLUT' name 'glutSwapBuffers';
	1463	Function glutGetWindow:LongInt;ApiEntry; 'GLUT' name 'glutGetWindow';
	1464	Procedure glutSetWindow (i:LongInt);ApiEntry; 'GLUT' name 'glutSetWindow';
	1465	Procedure glutSetWindowTitle (Const c:CString);ApiEntry; 'GLUT' name 'glutSetWindowTitle';
	1466	Procedure glutSetIconTitle (Const c:CString);ApiEntry; 'GLUT' name 'glutSetIconTitle';
	1467	Procedure glutPositionWindow (x,y:LongInt);ApiEntry; 'GLUT' name 'glutPositionWindow';
	1468	Procedure glutReshapeWindow (i1,i2:LongInt);ApiEntry; 'GLUT' name 'glutReshapeWindow';
	1469	Procedure glutPopWindow;ApiEntry; 'GLUT' name 'glutPopWindow';
	1470	Procedure glutPushWindow;ApiEntry; 'GLUT' name 'glutPushWindow';
	1471	Procedure glutIconifyWindow;ApiEntry; 'GLUT' name 'glutIconifyWindow';
	1472	Procedure glutShowWindow;ApiEntry; 'GLUT' name 'glutShowWindow';
	1473	Procedure glutHideWindow;ApiEntry; 'GLUT' name 'glutHideWindow';
	1474	Function glutCreateMenu (f:glutproc4):LongInt;ApiEntry; 'GLUT' name 'glutCreateMenu';
	1475	Procedure glutDestroyMenu(i:LongInt);ApiEntry; 'GLUT' name 'glutDestroyMenu';
	1476	Function glutGetMenu:LongInt;ApiEntry; 'GLUT' name 'glutGetMenu';
	1477	Procedure glutSetMenu (i:LongInt);ApiEntry; 'GLUT' name 'glutSetMenu';
	1478	Procedure glutAddMenuEntry (Const c:CString;i:LongInt);ApiEntry; 'GLUT' name 'glutAddMenuEntry';
	1479	Procedure glutAddSubMenu (Const c:CString;i:LongInt);ApiEntry; 'GLUT' name 'glutAddSubMenu';
	1480	Procedure glutChangeToMenuEntry (i:LongInt;Const c:CString;i1:LongInt);ApiEntry; 'GLUT' name 'glutChangeToMenuEntry';
	1481	Procedure glutChangeToSubMenu (i:LongInt;Const c:CString;i1:LongInt);ApiEntry; 'GLUT' name 'glutChangeToSubMenu';
	1482	Procedure glutRemoveMenuItem (i:LongInt);ApiEntry; 'GLUT' name 'glutRemoveMenuItem';
	1483	Procedure glutAttachMenu (i:LongInt);ApiEntry; 'GLUT' name 'glutAttachMenu';
	1484	Procedure glutDetachMenu (i:LongInt);ApiEntry; 'GLUT' name 'glutDetachMenu';
	1485	Procedure glutDisplayFunc (f:auxproc1);ApiEntry; 'GLUT' name 'glutDisplayFunc';
	1486	Procedure glutReshapeFunc (f:glutproc1);ApiEntry; 'GLUT' name 'glutReshapeFunc';
	1487	Procedure glutKeyboardFunc (f:glutproc2);ApiEntry; 'GLUT' name 'glutKeyboardFunc';
	1488	Procedure glutMouseFunc (f:glutproc3);ApiEntry; 'GLUT' name 'glutMouseFunc';
	1489	Procedure glutMotionFunc (f:glutproc1);ApiEntry; 'GLUT' name 'glutMotionFunc';
	1490	Procedure glutPassiveMotionFunc (f:glutproc1);ApiEntry; 'GLUT' name 'glutPassiveMotionFunc';
	1491	Procedure glutEntryFunc (f:glutproc4);ApiEntry; 'GLUT' name 'glutEntryFunc';
	1492	Procedure glutVisibilityFunc (f:glutproc4);ApiEntry; 'GLUT' name 'glutVisibilityFunc';
	1493	Procedure glutIdleFunc (f:auxproc1);ApiEntry; 'GLUT' name 'glutIdleFunc';
	1494	Procedure glutTimerFunc (u:LongWord;f:glutproc1);ApiEntry; 'GLUT' name 'glutTimerFunc';
	1495	Procedure glutMenuStateFunc (f:glutproc4);ApiEntry; 'GLUT' name 'glutMenuStateFunc';
	1496	Procedure glutSetColor (i:LongInt;f1,f2,f3:GLfloat);ApiEntry; 'GLUT' name 'glutSetColor';
	1497	Function glutGetColor (i1,i2:LongInt):GLfloat;ApiEntry; 'GLUT' name 'glutGetColor';
	1498	Procedure glutCopyColormap (i:LongInt);ApiEntry; 'GLUT' name 'glutCopyColormap';
	1499	Function glutGet (r:GLenum):LongInt;ApiEntry; 'GLUT' name 'glutGet';
	1500	Function glutDeviceGet (e:GLenum):LongInt;ApiEntry; 'GLUT' name 'glutDeviceGet';
	1501	Procedure glutStrokeCharacter (Var Buf;i:LongInt);ApiEntry; 'GLUT' name 'glutStrokeCharacter';
	1502	Procedure glutBitmapCharacter (Var Buf;i:LongInt);ApiEntry; 'GLUT' name 'glutBitmapCharacter';
	1503	Procedure glutWireSphere (d:GLdouble;i1,i2:GLint);ApiEntry; 'GLUT' name 'glutWireSphere';
	1504	Procedure glutSolidSphere (d:GLdouble;i1,i2:GLint);ApiEntry; 'GLUT' name 'glutSolidSphere';
	1505	Procedure glutWireCone (d1,d2:GLdouble;i1,i2:GLint);ApiEntry; 'GLUT' name 'glutWireCone';
	1506	Procedure glutSolidCone (d1,d2:GLdouble;i1,i2:GLint);ApiEntry; 'GLUT' name 'glutSolidCone';
	1507	Procedure glutWireCube (d:GLdouble);ApiEntry; 'GLUT' name 'glutWireCube';
	1508	Procedure glutSolidCube (d:GLdouble);ApiEntry; 'GLUT' name 'glutSolidCube';
	1509	Procedure glutWireTorus (d1,d2:GLdouble;i1,i2:GLint);ApiEntry; 'GLUT' name 'glutWireTorus';
	1510	Procedure glutSolidTorus (d1,d2:GLdouble;i1,i2:GLint);ApiEntry; 'GLUT' name 'glutSolidTorus';
	1511	Procedure glutWireDodecahedron;ApiEntry; 'GLUT' name 'glutWireDodecahedron';
	1512	Procedure glutSolidDodecahedron;ApiEntry; 'GLUT' name 'glutSolidDodecahedron';
	1513	Procedure glutWireTeapot (d:GLdouble);ApiEntry; 'GLUT' name 'glutWireTeapot';
	1514	Procedure glutSolidTeapot (d:GLdouble);ApiEntry; 'GLUT' name 'glutSolidTeapot';
	1515	Procedure glutWireOctahedron;ApiEntry; 'GLUT' name 'glutWireOctahedron';
	1516	Procedure glutSolidOctahedron;ApiEntry; 'GLUT' name 'glutSolidOctahedron';
	1517	Procedure glutWireTetrahedron;ApiEntry; 'GLUT' name 'glutWireTetrahedron';
	1518	Procedure glutSolidTetrahedron;ApiEntry; 'GLUT' name 'glutSolidTetrahedron';
	1519	Procedure glutWireIcosahedron;ApiEntry; 'GLUT' name 'glutWireIcosahedron';
	1520	Procedure glutSolidIcosahedron;ApiEntry; 'GLUT' name 'glutSolidIcosahedron';
	1521	End;
	1522
	1523	Function AUX_WIND_IS_RGB(x:LongWord):Boolean;
	1524	Function AUX_WIND_IS_INDEX(x:LongWord):Boolean;
	1525	Function AUX_WIND_IS_SINGLE(x:LongWord):Boolean;
	1526	Function AUX_WIND_IS_DOUBLE(x:LongWord):Boolean;
	1527	Function AUX_WIND_IS_INDIRECT(x:LongWord):Boolean;
	1528	Function AUX_WIND_IS_DIRECT(x:LongWord):Boolean;
	1529	Function AUX_WIND_HAS_ACCUM(x:LongWord):Boolean;
	1530	Function AUX_WIND_HAS_ALPHA(x:LongWord):Boolean;
	1531	Function AUX_WIND_HAS_DEPTH(x:LongWord):Boolean;
	1532	Function AUX_WIND_HAS_STENCIL(x:LongWord):Boolean;
	1533	Procedure AUX_SETCOLOR(x,y:LongWord);
	1534
	1535	Implementation
	1536
	1537	Function AUX_WIND_IS_RGB(x:LongWord):Boolean;
	1538	Begin
	1539	Result:=(x AND AUX_INDEX) = 0;
	1540	End;
	1541
	1542	Function AUX_WIND_IS_INDEX(x:LongWord):Boolean;
	1543	Begin
	1544	Result:=(x And AUX_INDEX) <> 0;
	1545	End;
	1546
	1547	Function AUX_WIND_IS_SINGLE(x:LongWord):Boolean;
	1548	Begin
	1549	Result:=(x And AUX_DOUBLE) = 0;
	1550	End;
	1551
	1552	Function AUX_WIND_IS_DOUBLE(x:LongWord):Boolean;
	1553	Begin
	1554	Result:=(x And AUX_DOUBLE) <> 0;
	1555	End;
	1556
	1557	Function AUX_WIND_IS_INDIRECT(x:LongWord):Boolean;
	1558	Begin
	1559	Result:=(x And AUX_INDIRECT) <> 0;
	1560	End;
	1561
	1562	Function AUX_WIND_IS_DIRECT(x:LongWord):Boolean;
	1563	Begin
	1564	Result:=(x And AUX_INDIRECT) = 0;
	1565	End;
	1566
	1567	Function AUX_WIND_HAS_ACCUM(x:LongWord):Boolean;
	1568	Begin
	1569	Result:=(x And AUX_ACCUM) <> 0;
	1570	End;
	1571
	1572	Function AUX_WIND_HAS_ALPHA(x:LongWord):Boolean;
	1573	Begin
	1574	Result:=(x And AUX_ALPHA) <> 0;
	1575	End;
	1576
	1577	Function AUX_WIND_HAS_DEPTH(x:LongWord):Boolean;
	1578	Begin
	1579	Result:=(x And AUX_DEPTH) <> 0;
	1580	End;
	1581
	1582	Function AUX_WIND_HAS_STENCIL(x:LongWord):Boolean;
	1583	Begin
	1584	Result:=(x And AUX_STENCIL) <> 0;
	1585	End;
	1586
	1587	Procedure AUX_SETCOLOR(x,y:LongWord);
	1588	Begin
	1589	If AUX_WIND_IS_RGB(x) Then glColor3fv(auxRGBMap[y][0])
	1590	Else glIndexf(y);
	1591	End;
	1592
	1593
	1594	End.

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

Original Format