/* Emacs style mode select -*- C++ -*- *----------------------------------------------------------------------------- * * * PrBoom a Doom port merged with LxDoom and LSDLDoom * based on BOOM, a modified and improved DOOM engine * Copyright (C) 1999 by * id Software, Chi Hoang, Lee Killough, Jim Flynn, Rand Phares, Ty Halderman * Copyright (C) 1999-2000 by * Jess Haas, Nicolas Kalkhof, Colin Phipps, Florian Schulze * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License * as published by the Free Software Foundation; either version 2 * of the License, or (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA * 02111-1307, USA. * * DESCRIPTION: * *--------------------------------------------------------------------- */ #include "config.h" #include "z_zone.h" #include "gl_intern.h" #include "gl_struct.h" extern int tran_filter_pct; #define USE_VERTEX_ARRAYS int gl_nearclip=5; int gl_tex_filter = GL_LINEAR; int gl_mipmap_filter = GL_LINEAR; boolean gl_drawskys=true; boolean gl_sortsprites=true; boolean gl_texture_filter_anisotropic = false; boolean gl_use_paletted_texture = false; boolean gl_use_shared_texture_palette = false; boolean gl_paletted_texture = false; boolean gl_shared_texture_palette = false; boolean gl_use_fog=false; int fog_density=200; static float extra_red=0.0f; static float extra_green=0.0f; static float extra_blue=0.0f; static float extra_alpha=0.0f; GLfloat gl_whitecolor[4]={1.0f,1.0f,1.0f,1.0f}; /* * lookuptable for lightvalues * calculated as follow: * floatlight=(1.0-exp((light^3)*gamma)) / (1.0-exp(1.0*gamma)); * gamma=-0,2;-2,0;-4,0;-6,0;-8,0 * light=0,0 .. 1,0 */ static const float lighttable[5][256] = { { 0.00000f,0.00000f,0.00000f,0.00000f,0.00000f,0.00001f,0.00001f,0.00002f,0.00003f,0.00004f, 0.00006f,0.00008f,0.00010f,0.00013f,0.00017f,0.00020f,0.00025f,0.00030f,0.00035f,0.00041f, 0.00048f,0.00056f,0.00064f,0.00073f,0.00083f,0.00094f,0.00106f,0.00119f,0.00132f,0.00147f, 0.00163f,0.00180f,0.00198f,0.00217f,0.00237f,0.00259f,0.00281f,0.00305f,0.00331f,0.00358f, 0.00386f,0.00416f,0.00447f,0.00479f,0.00514f,0.00550f,0.00587f,0.00626f,0.00667f,0.00710f, 0.00754f,0.00800f,0.00848f,0.00898f,0.00950f,0.01003f,0.01059f,0.01117f,0.01177f,0.01239f, 0.01303f,0.01369f,0.01437f,0.01508f,0.01581f,0.01656f,0.01734f,0.01814f,0.01896f,0.01981f, 0.02069f,0.02159f,0.02251f,0.02346f,0.02444f,0.02544f,0.02647f,0.02753f,0.02862f,0.02973f, 0.03088f,0.03205f,0.03325f,0.03448f,0.03575f,0.03704f,0.03836f,0.03971f,0.04110f,0.04252f, 0.04396f,0.04545f,0.04696f,0.04851f,0.05009f,0.05171f,0.05336f,0.05504f,0.05676f,0.05852f, 0.06031f,0.06214f,0.06400f,0.06590f,0.06784f,0.06981f,0.07183f,0.07388f,0.07597f,0.07810f, 0.08027f,0.08248f,0.08473f,0.08702f,0.08935f,0.09172f,0.09414f,0.09659f,0.09909f,0.10163f, 0.10421f,0.10684f,0.10951f,0.11223f,0.11499f,0.11779f,0.12064f,0.12354f,0.12648f,0.12946f, 0.13250f,0.13558f,0.13871f,0.14188f,0.14511f,0.14838f,0.15170f,0.15507f,0.15850f,0.16197f, 0.16549f,0.16906f,0.17268f,0.17635f,0.18008f,0.18386f,0.18769f,0.19157f,0.19551f,0.19950f, 0.20354f,0.20764f,0.21179f,0.21600f,0.22026f,0.22458f,0.22896f,0.23339f,0.23788f,0.24242f, 0.24702f,0.25168f,0.25640f,0.26118f,0.26602f,0.27091f,0.27587f,0.28089f,0.28596f,0.29110f, 0.29630f,0.30156f,0.30688f,0.31226f,0.31771f,0.32322f,0.32879f,0.33443f,0.34013f,0.34589f, 0.35172f,0.35761f,0.36357f,0.36960f,0.37569f,0.38185f,0.38808f,0.39437f,0.40073f,0.40716f, 0.41366f,0.42022f,0.42686f,0.43356f,0.44034f,0.44718f,0.45410f,0.46108f,0.46814f,0.47527f, 0.48247f,0.48974f,0.49709f,0.50451f,0.51200f,0.51957f,0.52721f,0.53492f,0.54271f,0.55058f, 0.55852f,0.56654f,0.57463f,0.58280f,0.59105f,0.59937f,0.60777f,0.61625f,0.62481f,0.63345f, 0.64217f,0.65096f,0.65984f,0.66880f,0.67783f,0.68695f,0.69615f,0.70544f,0.71480f,0.72425f, 0.73378f,0.74339f,0.75308f,0.76286f,0.77273f,0.78268f,0.79271f,0.80283f,0.81304f,0.82333f, 0.83371f,0.84417f,0.85472f,0.86536f,0.87609f,0.88691f,0.89781f,0.90880f,0.91989f,0.93106f, 0.94232f,0.95368f,0.96512f,0.97665f,0.98828f,1.00000 }, { 0.00000f,0.00000f,0.00000f,0.00000f,0.00001f,0.00002f,0.00003f,0.00005f,0.00007f,0.00010f, 0.00014f,0.00019f,0.00024f,0.00031f,0.00038f,0.00047f,0.00057f,0.00069f,0.00081f,0.00096f, 0.00112f,0.00129f,0.00148f,0.00170f,0.00193f,0.00218f,0.00245f,0.00274f,0.00306f,0.00340f, 0.00376f,0.00415f,0.00456f,0.00500f,0.00547f,0.00597f,0.00649f,0.00704f,0.00763f,0.00825f, 0.00889f,0.00957f,0.01029f,0.01104f,0.01182f,0.01264f,0.01350f,0.01439f,0.01532f,0.01630f, 0.01731f,0.01836f,0.01945f,0.02058f,0.02176f,0.02298f,0.02424f,0.02555f,0.02690f,0.02830f, 0.02974f,0.03123f,0.03277f,0.03436f,0.03600f,0.03768f,0.03942f,0.04120f,0.04304f,0.04493f, 0.04687f,0.04886f,0.05091f,0.05301f,0.05517f,0.05738f,0.05964f,0.06196f,0.06434f,0.06677f, 0.06926f,0.07181f,0.07441f,0.07707f,0.07979f,0.08257f,0.08541f,0.08831f,0.09126f,0.09428f, 0.09735f,0.10048f,0.10368f,0.10693f,0.11025f,0.11362f,0.11706f,0.12056f,0.12411f,0.12773f, 0.13141f,0.13515f,0.13895f,0.14281f,0.14673f,0.15072f,0.15476f,0.15886f,0.16303f,0.16725f, 0.17153f,0.17587f,0.18028f,0.18474f,0.18926f,0.19383f,0.19847f,0.20316f,0.20791f,0.21272f, 0.21759f,0.22251f,0.22748f,0.23251f,0.23760f,0.24274f,0.24793f,0.25318f,0.25848f,0.26383f, 0.26923f,0.27468f,0.28018f,0.28573f,0.29133f,0.29697f,0.30266f,0.30840f,0.31418f,0.32001f, 0.32588f,0.33179f,0.33774f,0.34374f,0.34977f,0.35585f,0.36196f,0.36810f,0.37428f,0.38050f, 0.38675f,0.39304f,0.39935f,0.40570f,0.41207f,0.41847f,0.42490f,0.43136f,0.43784f,0.44434f, 0.45087f,0.45741f,0.46398f,0.47057f,0.47717f,0.48379f,0.49042f,0.49707f,0.50373f,0.51041f, 0.51709f,0.52378f,0.53048f,0.53718f,0.54389f,0.55061f,0.55732f,0.56404f,0.57075f,0.57747f, 0.58418f,0.59089f,0.59759f,0.60429f,0.61097f,0.61765f,0.62432f,0.63098f,0.63762f,0.64425f, 0.65086f,0.65746f,0.66404f,0.67060f,0.67714f,0.68365f,0.69015f,0.69662f,0.70307f,0.70948f, 0.71588f,0.72224f,0.72857f,0.73488f,0.74115f,0.74739f,0.75359f,0.75976f,0.76589f,0.77199f, 0.77805f,0.78407f,0.79005f,0.79599f,0.80189f,0.80774f,0.81355f,0.81932f,0.82504f,0.83072f, 0.83635f,0.84194f,0.84747f,0.85296f,0.85840f,0.86378f,0.86912f,0.87441f,0.87964f,0.88482f, 0.88995f,0.89503f,0.90005f,0.90502f,0.90993f,0.91479f,0.91959f,0.92434f,0.92903f,0.93366f, 0.93824f,0.94276f,0.94723f,0.95163f,0.95598f,0.96027f,0.96451f,0.96868f,0.97280f,0.97686f, 0.98086f,0.98481f,0.98869f,0.99252f,0.99629f,1.00000f }, { 0.00000f,0.00000f,0.00000f,0.00001f,0.00002f,0.00003f,0.00005f,0.00008f,0.00013f,0.00018f, 0.00025f,0.00033f,0.00042f,0.00054f,0.00067f,0.00083f,0.00101f,0.00121f,0.00143f,0.00168f, 0.00196f,0.00227f,0.00261f,0.00299f,0.00339f,0.00383f,0.00431f,0.00483f,0.00538f,0.00598f, 0.00661f,0.00729f,0.00802f,0.00879f,0.00961f,0.01048f,0.01140f,0.01237f,0.01340f,0.01447f, 0.01561f,0.01680f,0.01804f,0.01935f,0.02072f,0.02215f,0.02364f,0.02520f,0.02682f,0.02850f, 0.03026f,0.03208f,0.03397f,0.03594f,0.03797f,0.04007f,0.04225f,0.04451f,0.04684f,0.04924f, 0.05172f,0.05428f,0.05691f,0.05963f,0.06242f,0.06530f,0.06825f,0.07129f,0.07441f,0.07761f, 0.08089f,0.08426f,0.08771f,0.09125f,0.09487f,0.09857f,0.10236f,0.10623f,0.11019f,0.11423f, 0.11836f,0.12257f,0.12687f,0.13125f,0.13571f,0.14027f,0.14490f,0.14962f,0.15442f,0.15931f, 0.16427f,0.16932f,0.17445f,0.17966f,0.18496f,0.19033f,0.19578f,0.20130f,0.20691f,0.21259f, 0.21834f,0.22417f,0.23007f,0.23605f,0.24209f,0.24820f,0.25438f,0.26063f,0.26694f,0.27332f, 0.27976f,0.28626f,0.29282f,0.29944f,0.30611f,0.31284f,0.31962f,0.32646f,0.33334f,0.34027f, 0.34724f,0.35426f,0.36132f,0.36842f,0.37556f,0.38273f,0.38994f,0.39718f,0.40445f,0.41174f, 0.41907f,0.42641f,0.43378f,0.44116f,0.44856f,0.45598f,0.46340f,0.47084f,0.47828f,0.48573f, 0.49319f,0.50064f,0.50809f,0.51554f,0.52298f,0.53042f,0.53784f,0.54525f,0.55265f,0.56002f, 0.56738f,0.57472f,0.58203f,0.58932f,0.59658f,0.60381f,0.61101f,0.61817f,0.62529f,0.63238f, 0.63943f,0.64643f,0.65339f,0.66031f,0.66717f,0.67399f,0.68075f,0.68746f,0.69412f,0.70072f, 0.70726f,0.71375f,0.72017f,0.72653f,0.73282f,0.73905f,0.74522f,0.75131f,0.75734f,0.76330f, 0.76918f,0.77500f,0.78074f,0.78640f,0.79199f,0.79751f,0.80295f,0.80831f,0.81359f,0.81880f, 0.82393f,0.82898f,0.83394f,0.83883f,0.84364f,0.84836f,0.85301f,0.85758f,0.86206f,0.86646f, 0.87078f,0.87502f,0.87918f,0.88326f,0.88726f,0.89118f,0.89501f,0.89877f,0.90245f,0.90605f, 0.90957f,0.91301f,0.91638f,0.91966f,0.92288f,0.92601f,0.92908f,0.93206f,0.93498f,0.93782f, 0.94059f,0.94329f,0.94592f,0.94848f,0.95097f,0.95339f,0.95575f,0.95804f,0.96027f,0.96244f, 0.96454f,0.96658f,0.96856f,0.97049f,0.97235f,0.97416f,0.97591f,0.97760f,0.97924f,0.98083f, 0.98237f,0.98386f,0.98530f,0.98669f,0.98803f,0.98933f,0.99058f,0.99179f,0.99295f,0.99408f, 0.99516f,0.99620f,0.99721f,0.99817f,0.99910f,1.00000f }, { 0.00000f,0.00000f,0.00000f,0.00001f,0.00002f,0.00005f,0.00008f,0.00012f,0.00019f,0.00026f, 0.00036f,0.00048f,0.00063f,0.00080f,0.00099f,0.00122f,0.00148f,0.00178f,0.00211f,0.00249f, 0.00290f,0.00335f,0.00386f,0.00440f,0.00500f,0.00565f,0.00636f,0.00711f,0.00793f,0.00881f, 0.00975f,0.01075f,0.01182f,0.01295f,0.01416f,0.01543f,0.01678f,0.01821f,0.01971f,0.02129f, 0.02295f,0.02469f,0.02652f,0.02843f,0.03043f,0.03252f,0.03469f,0.03696f,0.03933f,0.04178f, 0.04433f,0.04698f,0.04973f,0.05258f,0.05552f,0.05857f,0.06172f,0.06498f,0.06834f,0.07180f, 0.07537f,0.07905f,0.08283f,0.08672f,0.09072f,0.09483f,0.09905f,0.10337f,0.10781f,0.11236f, 0.11701f,0.12178f,0.12665f,0.13163f,0.13673f,0.14193f,0.14724f,0.15265f,0.15817f,0.16380f, 0.16954f,0.17538f,0.18132f,0.18737f,0.19351f,0.19976f,0.20610f,0.21255f,0.21908f,0.22572f, 0.23244f,0.23926f,0.24616f,0.25316f,0.26023f,0.26739f,0.27464f,0.28196f,0.28935f,0.29683f, 0.30437f,0.31198f,0.31966f,0.32740f,0.33521f,0.34307f,0.35099f,0.35896f,0.36699f,0.37506f, 0.38317f,0.39133f,0.39952f,0.40775f,0.41601f,0.42429f,0.43261f,0.44094f,0.44929f,0.45766f, 0.46604f,0.47443f,0.48283f,0.49122f,0.49962f,0.50801f,0.51639f,0.52476f,0.53312f,0.54146f, 0.54978f,0.55807f,0.56633f,0.57457f,0.58277f,0.59093f,0.59905f,0.60713f,0.61516f,0.62314f, 0.63107f,0.63895f,0.64676f,0.65452f,0.66221f,0.66984f,0.67739f,0.68488f,0.69229f,0.69963f, 0.70689f,0.71407f,0.72117f,0.72818f,0.73511f,0.74195f,0.74870f,0.75536f,0.76192f,0.76839f, 0.77477f,0.78105f,0.78723f,0.79331f,0.79930f,0.80518f,0.81096f,0.81664f,0.82221f,0.82768f, 0.83305f,0.83832f,0.84347f,0.84853f,0.85348f,0.85832f,0.86306f,0.86770f,0.87223f,0.87666f, 0.88098f,0.88521f,0.88933f,0.89334f,0.89726f,0.90108f,0.90480f,0.90842f,0.91194f,0.91537f, 0.91870f,0.92193f,0.92508f,0.92813f,0.93109f,0.93396f,0.93675f,0.93945f,0.94206f,0.94459f, 0.94704f,0.94941f,0.95169f,0.95391f,0.95604f,0.95810f,0.96009f,0.96201f,0.96386f,0.96564f, 0.96735f,0.96900f,0.97059f,0.97212f,0.97358f,0.97499f,0.97634f,0.97764f,0.97888f,0.98007f, 0.98122f,0.98231f,0.98336f,0.98436f,0.98531f,0.98623f,0.98710f,0.98793f,0.98873f,0.98949f, 0.99021f,0.99090f,0.99155f,0.99218f,0.99277f,0.99333f,0.99387f,0.99437f,0.99486f,0.99531f, 0.99575f,0.99616f,0.99654f,0.99691f,0.99726f,0.99759f,0.99790f,0.99819f,0.99847f,0.99873f, 0.99897f,0.99920f,0.99942f,0.99963f,0.99982f,1.00000f }, { 0.00000f,0.00000f,0.00000f,0.00001f,0.00003f,0.00006f,0.00010f,0.00017f,0.00025f,0.00035f, 0.00048f,0.00064f,0.00083f,0.00106f,0.00132f,0.00163f,0.00197f,0.00237f,0.00281f,0.00330f, 0.00385f,0.00446f,0.00513f,0.00585f,0.00665f,0.00751f,0.00845f,0.00945f,0.01054f,0.01170f, 0.01295f,0.01428f,0.01569f,0.01719f,0.01879f,0.02048f,0.02227f,0.02415f,0.02614f,0.02822f, 0.03042f,0.03272f,0.03513f,0.03765f,0.04028f,0.04303f,0.04589f,0.04887f,0.05198f,0.05520f, 0.05855f,0.06202f,0.06561f,0.06933f,0.07318f,0.07716f,0.08127f,0.08550f,0.08987f,0.09437f, 0.09900f,0.10376f,0.10866f,0.11369f,0.11884f,0.12414f,0.12956f,0.13512f,0.14080f,0.14662f, 0.15257f,0.15865f,0.16485f,0.17118f,0.17764f,0.18423f,0.19093f,0.19776f,0.20471f,0.21177f, 0.21895f,0.22625f,0.23365f,0.24117f,0.24879f,0.25652f,0.26435f,0.27228f,0.28030f,0.28842f, 0.29662f,0.30492f,0.31329f,0.32175f,0.33028f,0.33889f,0.34756f,0.35630f,0.36510f,0.37396f, 0.38287f,0.39183f,0.40084f,0.40989f,0.41897f,0.42809f,0.43723f,0.44640f,0.45559f,0.46479f, 0.47401f,0.48323f,0.49245f,0.50167f,0.51088f,0.52008f,0.52927f,0.53843f,0.54757f,0.55668f, 0.56575f,0.57479f,0.58379f,0.59274f,0.60164f,0.61048f,0.61927f,0.62799f,0.63665f,0.64524f, 0.65376f,0.66220f,0.67056f,0.67883f,0.68702f,0.69511f,0.70312f,0.71103f,0.71884f,0.72655f, 0.73415f,0.74165f,0.74904f,0.75632f,0.76348f,0.77053f,0.77747f,0.78428f,0.79098f,0.79756f, 0.80401f,0.81035f,0.81655f,0.82264f,0.82859f,0.83443f,0.84013f,0.84571f,0.85117f,0.85649f, 0.86169f,0.86677f,0.87172f,0.87654f,0.88124f,0.88581f,0.89026f,0.89459f,0.89880f,0.90289f, 0.90686f,0.91071f,0.91445f,0.91807f,0.92157f,0.92497f,0.92826f,0.93143f,0.93450f,0.93747f, 0.94034f,0.94310f,0.94577f,0.94833f,0.95081f,0.95319f,0.95548f,0.95768f,0.95980f,0.96183f, 0.96378f,0.96565f,0.96744f,0.96916f,0.97081f,0.97238f,0.97388f,0.97532f,0.97669f,0.97801f, 0.97926f,0.98045f,0.98158f,0.98266f,0.98369f,0.98467f,0.98560f,0.98648f,0.98732f,0.98811f, 0.98886f,0.98958f,0.99025f,0.99089f,0.99149f,0.99206f,0.99260f,0.99311f,0.99359f,0.99404f, 0.99446f,0.99486f,0.99523f,0.99559f,0.99592f,0.99623f,0.99652f,0.99679f,0.99705f,0.99729f, 0.99751f,0.99772f,0.99792f,0.99810f,0.99827f,0.99843f,0.99857f,0.99871f,0.99884f,0.99896f, 0.99907f,0.99917f,0.99926f,0.99935f,0.99943f,0.99951f,0.99958f,0.99964f,0.99970f,0.99975f, 0.99980f,0.99985f,0.99989f,0.99993f,0.99997f,1.00000f } }; #define gld_CalcLightLevel(lightlevel) (lighttable[usegamma][max(min((lightlevel),255),0)]) static void gld_StaticLightAlpha(float light, float alpha) { player_t *player; player = &players[displayplayer]; if (player->fixedcolormap) p_glColor4f(1.0f, 1.0f, 1.0f, alpha); else p_glColor4f(light, light, light, alpha); } #define gld_StaticLight(light) gld_StaticLightAlpha(light, 1.0f) void gld_InitExtensions(const char *_extensions) { if (DynGL_HasExtension("GL_EXT_texture_filter_anisotropic")) gl_texture_filter_anisotropic = true; if (DynGL_HasExtension("GL_EXT_paletted_texture")) if (gl_use_paletted_texture) { gl_paletted_texture = true; lprintf(LO_INFO,"using GL_EXT_paletted_texture\n"); } if (DynGL_HasExtension("GL_EXT_shared_texture_palette")) if (gl_use_shared_texture_palette) { gl_shared_texture_palette = true; lprintf(LO_INFO,"using GL_EXT_shared_texture_palette\n"); } } void gld_Init(int width, int height) { GLfloat params[4]={0.0f,0.0f,1.0f,0.0f}; GLfloat BlackFogColor[4] = { 0.0f, 0.0f, 0.0f, 0.0f }; lprintf(LO_INFO,"GL_VENDOR: %s\n",p_glGetString(GL_VENDOR)); lprintf(LO_INFO,"GL_RENDERER: %s\n",p_glGetString(GL_RENDERER)); lprintf(LO_INFO,"GL_VERSION: %s\n",p_glGetString(GL_VERSION)); lprintf(LO_INFO,"GL_EXTENSIONS:\n"); { char ext_name[256]; const char *extensions = p_glGetString(GL_EXTENSIONS); const char *rover = extensions; const char *p = rover; while (*rover) { p = rover; while (*p && *p != ' ') p++; if (*p) { int len = min(p-rover, sizeof(ext_name)-1); memset(ext_name, 0, sizeof(ext_name)); strncpy(ext_name, rover, len); lprintf(LO_INFO,"\t%s\n", ext_name); } rover = p; while (*rover && *rover == ' ') rover++; } } gld_InitExtensions(p_glGetString(GL_EXTENSIONS)); //gl_shared_texture_palette = false; gld_InitPalettedTextures(); p_glViewport(0, 0, SCREENWIDTH, SCREENHEIGHT); p_glClearColor(0.0f, 0.5f, 0.5f, 1.0f); p_glClearDepth(1.0f); p_glGetIntegerv(GL_MAX_TEXTURE_SIZE,&gld_max_texturesize); //gld_max_texturesize=64; lprintf(LO_INFO,"GL_MAX_TEXTURE_SIZE=%i\n",gld_max_texturesize); p_glEnable(GL_BLEND); p_glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA); p_glPixelStorei(GL_UNPACK_ALIGNMENT, 1); p_glHint(GL_PERSPECTIVE_CORRECTION_HINT, GL_NICEST); // proff_dis p_glShadeModel(GL_FLAT); p_glEnable(GL_TEXTURE_2D); p_glDepthFunc(GL_LEQUAL); p_glEnable(GL_ALPHA_TEST); p_glAlphaFunc(GL_GEQUAL,0.5f); p_glDisable(GL_CULL_FACE); p_glTexEnvf(GL_TEXTURE_ENV,GL_TEXTURE_ENV_MODE,GL_MODULATE); p_glTexGenfv(GL_Q,GL_EYE_PLANE,params); p_glTexGenf(GL_S,GL_TEXTURE_GEN_MODE,GL_EYE_LINEAR); p_glTexGenf(GL_T,GL_TEXTURE_GEN_MODE,GL_EYE_LINEAR); p_glTexGenf(GL_Q,GL_TEXTURE_GEN_MODE,GL_EYE_LINEAR); p_glFogi (GL_FOG_MODE, GL_EXP); p_glFogfv(GL_FOG_COLOR, BlackFogColor); p_glFogf (GL_FOG_DENSITY, (float)fog_density/1000.0f); p_glHint (GL_FOG_HINT, GL_NICEST); p_glFogf (GL_FOG_START, 0.0f); p_glFogf (GL_FOG_END, 1.0f); gld_CleanMemory(); } #define SCALE_X(x) ((flags & VPT_STRETCH)?((float)x)*(float)SCREENWIDTH/320.0f:(float)x) #define SCALE_Y(y) ((flags & VPT_STRETCH)?((float)y)*(float)SCREENHEIGHT/200.0f:(float)y) void gld_DrawNumPatch(int x, int y, int lump, int cm, enum patch_translation_e flags) { GLTexture *gltexture; float fU1,fU2,fV1,fV2; float width,height; float xpos, ypos; if (flags & VPT_TRANSLUCENT) p_glColor4f(1.0f, 1.0f, 1.0f, (float)tran_filter_pct/100.0f); if (flags & VPT_TRANS) { gltexture=gld_RegisterPatch(lump,cm); gld_BindPatch(gltexture, cm); } else { gltexture=gld_RegisterPatch(lump,CR_DEFAULT); gld_BindPatch(gltexture, CR_DEFAULT); } if (!gltexture) return; fV1=0.0f; fV2=(float)gltexture->height/(float)gltexture->tex_height; if (flags & VPT_FLIP) { fU1=(float)gltexture->width/(float)gltexture->tex_width; fU2=0.0f; } else { fU1=0.0f; fU2=(float)gltexture->width/(float)gltexture->tex_width; } xpos=SCALE_X(x-gltexture->leftoffset); ypos=SCALE_Y(y-gltexture->topoffset); width=SCALE_X(gltexture->realtexwidth); height=SCALE_Y(gltexture->realtexheight); p_glBegin(GL_TRIANGLE_STRIP); p_glTexCoord2f(fU1, fV1); p_glVertex2f((xpos),(ypos)); p_glTexCoord2f(fU1, fV2); p_glVertex2f((xpos),(ypos+height)); p_glTexCoord2f(fU2, fV1); p_glVertex2f((xpos+width),(ypos)); p_glTexCoord2f(fU2, fV2); p_glVertex2f((xpos+width),(ypos+height)); p_glEnd(); if (flags & VPT_TRANSLUCENT) p_glColor4f(1.0f, 1.0f, 1.0f, 1.0f); } #undef SCALE_X #undef SCALE_Y void gld_DrawBackground(const char* name) { GLTexture *gltexture; float fU1,fU2,fV1,fV2; int width,height; gltexture=gld_RegisterFlat(R_FlatNumForName(name), false); gld_BindFlat(gltexture); if (!gltexture) return; fU1=0; fV1=0; fU2=(float)SCREENWIDTH/(float)gltexture->realtexwidth; fV2=(float)SCREENHEIGHT/(float)gltexture->realtexheight; width=SCREENWIDTH; height=SCREENHEIGHT; p_glBegin(GL_TRIANGLE_STRIP); p_glTexCoord2f(fU1, fV1); p_glVertex2f((float)(0),(float)(0)); p_glTexCoord2f(fU1, fV2); p_glVertex2f((float)(0),(float)(0+height)); p_glTexCoord2f(fU2, fV1); p_glVertex2f((float)(0+width),(float)(0)); p_glTexCoord2f(fU2, fV2); p_glVertex2f((float)(0+width),(float)(0+height)); p_glEnd(); } void gld_DrawLine(int x0, int y0, int x1, int y1, int BaseColor) { const unsigned char *playpal=W_CacheLumpName("PLAYPAL"); p_glBindTexture(GL_TEXTURE_2D, 0); last_gltexture = NULL; last_cm = -1; p_glColor3f((float)playpal[3*BaseColor]/255.0f, (float)playpal[3*BaseColor+1]/255.0f, (float)playpal[3*BaseColor+2]/255.0f); p_glBegin(GL_LINES); p_glVertex2i( x0, y0 ); p_glVertex2i( x1, y1 ); p_glEnd(); W_UnlockLumpName("PLAYPAL"); } void gld_DrawWeapon(int weaponlump, vissprite_t *vis, int lightlevel) { GLTexture *gltexture; float fU1,fU2,fV1,fV2; int x1,y1,x2,y2; float scale; float light; gltexture=gld_RegisterPatch(firstspritelump+weaponlump, CR_DEFAULT); if (!gltexture) return; gld_BindPatch(gltexture, CR_DEFAULT); fU1=0; fV1=0; fU2=(float)gltexture->width/(float)gltexture->tex_width; fV2=(float)gltexture->height/(float)gltexture->tex_height; x1=viewwindowx+vis->x1; x2=viewwindowx+vis->x2; scale=((float)vis->scale/(float)FRACUNIT); y1=viewwindowy+centery-(int)(((float)vis->texturemid/(float)FRACUNIT)*scale); y2=y1+(int)((float)gltexture->realtexheight*scale)+1; light=gld_CalcLightLevel(lightlevel); if (viewplayer->mo->flags & MF_SHADOW) { p_glBlendFunc(GL_DST_COLOR, GL_ONE_MINUS_SRC_ALPHA); p_glAlphaFunc(GL_GEQUAL,0.1f); //p_glColor4f(0.2f,0.2f,0.2f,(float)tran_filter_pct/100.0f); p_glColor4f(0.2f,0.2f,0.2f,0.33f); } else { if (viewplayer->mo->flags & MF_TRANSLUCENT) gld_StaticLightAlpha(light,(float)tran_filter_pct/100.0f); else gld_StaticLight(light); } p_glBegin(GL_TRIANGLE_STRIP); p_glTexCoord2f(fU1, fV1); p_glVertex2f((float)(x1),(float)(y1)); p_glTexCoord2f(fU1, fV2); p_glVertex2f((float)(x1),(float)(y2)); p_glTexCoord2f(fU2, fV1); p_glVertex2f((float)(x2),(float)(y1)); p_glTexCoord2f(fU2, fV2); p_glVertex2f((float)(x2),(float)(y2)); p_glEnd(); if(viewplayer->mo->flags & MF_SHADOW) { p_glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA); p_glAlphaFunc(GL_GEQUAL,0.5f); } p_glColor3f(1.0f,1.0f,1.0f); } void gld_FillBlock(int x, int y, int width, int height, int col) { const unsigned char *playpal=W_CacheLumpName("PLAYPAL"); p_glBindTexture(GL_TEXTURE_2D, 0); last_gltexture = NULL; last_cm = -1; p_glColor3f((float)playpal[3*col]/255.0f, (float)playpal[3*col+1]/255.0f, (float)playpal[3*col+2]/255.0f); p_glBegin(GL_TRIANGLE_STRIP); p_glVertex2i( x, y ); p_glVertex2i( x, y+height ); p_glVertex2i( x+width, y ); p_glVertex2i( x+width, y+height ); p_glEnd(); p_glColor3f(1.0f,1.0f,1.0f); W_UnlockLumpName("PLAYPAL"); } void gld_SetPalette(int palette) { static int last_palette = 0; extra_red=0.0f; extra_green=0.0f; extra_blue=0.0f; extra_alpha=0.0f; if (palette < 0) palette = last_palette; last_palette = palette; if (gl_shared_texture_palette) { const unsigned char *playpal; unsigned char pal[1024]; int i; playpal = W_CacheLumpName("PLAYPAL"); playpal += (768*palette); for (i=0; i<256; i++) { int col; if (fixedcolormap) col = fixedcolormap[i]; else if (fullcolormap) col = fullcolormap[i]; else col = i; pal[i*4+0] = playpal[col*3+0]; pal[i*4+1] = playpal[col*3+1]; pal[i*4+2] = playpal[col*3+2]; pal[i*4+3] = 255; } pal[transparent_pal_index*4+0]=0; pal[transparent_pal_index*4+1]=0; pal[transparent_pal_index*4+2]=0; pal[transparent_pal_index*4+3]=0; p_glColorTableEXT(GL_SHARED_TEXTURE_PALETTE_EXT, GL_RGBA, 256, GL_RGBA, GL_UNSIGNED_BYTE, pal); W_UnlockLumpName("PLAYPAL"); } else { if (palette>0) { if (palette<=8) { extra_red=(float)palette/2.0f; extra_green=0.0f; extra_blue=0.0f; extra_alpha=(float)palette/10.0f; } else if (palette<=12) { palette=palette-8; extra_red=(float)palette*1.0f; extra_green=(float)palette*0.8f; extra_blue=(float)palette*0.1f; extra_alpha=(float)palette/11.0f; } else if (palette==13) { extra_red=0.4f; extra_green=1.0f; extra_blue=0.0f; extra_alpha=0.2f; } } if (extra_red>1.0f) extra_red=1.0f; if (extra_green>1.0f) extra_green=1.0f; if (extra_blue>1.0f) extra_blue=1.0f; if (extra_alpha>1.0f) extra_alpha=1.0f; } } byte *gld_ReadScreen(void) { byte *scr; byte buffer[MAX_SCREENWIDTH*3]; int i; scr = malloc(SCREENWIDTH * SCREENHEIGHT * 3); if (!scr) return NULL; p_glReadPixels(0,0,SCREENWIDTH,SCREENHEIGHT,GL_RGB,GL_UNSIGNED_BYTE,scr); for (i=0; i>ANGLETOFINESHIFT)*360.0f/FINEANGLES; inv_yaw=-90.0f+(float)(viewangle>>ANGLETOFINESHIFT)*360.0f/FINEANGLES; #ifdef _DEBUG p_glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT); #else p_glClear(GL_DEPTH_BUFFER_BIT); #endif p_glEnable(GL_DEPTH_TEST); p_glMatrixMode(GL_PROJECTION); p_glLoadIdentity(); infinitePerspective(64.0f, 320.0f/200.0f, (float)gl_nearclip/100.0f); p_glMatrixMode(GL_MODELVIEW); p_glLoadIdentity(); p_glRotatef(roll, 0.0f, 0.0f, 1.0f); p_glRotatef(pitch, 1.0f, 0.0f, 0.0f); p_glRotatef(yaw, 0.0f, 1.0f, 0.0f); p_glTranslatef(-xCamera, -trY, -yCamera); if (gl_use_fog) p_glEnable(GL_FOG); else p_glDisable(GL_FOG); rendermarker++; gld_drawinfo.num_walls=0; gld_drawinfo.num_flats=0; gld_drawinfo.num_sprites=0; gld_drawinfo.num_drawitems=0; } void gld_EndDrawScene(void) { player_t *player = &players[displayplayer]; extern void R_DrawPlayerSprites (void); p_glDisable(GL_POLYGON_SMOOTH); p_glViewport(0, 0, SCREENWIDTH, SCREENHEIGHT); p_glDisable(GL_FOG); gld_Set2DMode(); if (viewangleoffset <= 1024<=-1024<fixedcolormap == 32) { p_glBlendFunc(GL_ONE_MINUS_DST_COLOR, GL_ZERO); p_glColor4f(1,1,1,1); p_glBindTexture(GL_TEXTURE_2D, 0); last_gltexture = NULL; last_cm = -1; p_glBegin(GL_TRIANGLE_STRIP); p_glVertex2f( 0.0f, 0.0f); p_glVertex2f( 0.0f, (float)SCREENHEIGHT); p_glVertex2f( (float)SCREENWIDTH, 0.0f); p_glVertex2f( (float)SCREENWIDTH, (float)SCREENHEIGHT); p_glEnd(); p_glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA); } if (extra_alpha>0.0f) { p_glDisable(GL_ALPHA_TEST); p_glColor4f(extra_red, extra_green, extra_blue, extra_alpha); p_glBindTexture(GL_TEXTURE_2D, 0); last_gltexture = NULL; last_cm = -1; p_glBegin(GL_TRIANGLE_STRIP); p_glVertex2f( 0.0f, 0.0f); p_glVertex2f( 0.0f, (float)SCREENHEIGHT); p_glVertex2f( (float)SCREENWIDTH, 0.0f); p_glVertex2f( (float)SCREENWIDTH, (float)SCREENHEIGHT); p_glEnd(); p_glEnable(GL_ALPHA_TEST); } p_glColor3f(1.0f,1.0f,1.0f); p_glDisable(GL_SCISSOR_TEST); if (gl_shared_texture_palette) p_glDisable(GL_SHARED_TEXTURE_PALETTE_EXT); } static void gld_AddDrawItem(GLDrawItemType itemtype, int itemindex) { if (gld_drawinfo.num_drawitems>=gld_drawinfo.max_drawitems) { gld_drawinfo.max_drawitems+=64; gld_drawinfo.drawitems=Z_Realloc(gld_drawinfo.drawitems,gld_drawinfo.max_drawitems*sizeof(GLDrawItem), PU_LEVEL, (void **) &gld_drawinfo.drawitems); gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].itemtype=itemtype; gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].itemcount=1; gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].firstitemindex=itemindex; gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].rendermarker=rendermarker; return; } if (gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].rendermarker!=rendermarker) { gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].itemtype=GLDIT_NONE; gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].rendermarker=rendermarker; } if (gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].itemtype!=itemtype) { if (gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].itemtype!=GLDIT_NONE) gld_drawinfo.num_drawitems++; if (gld_drawinfo.num_drawitems>=gld_drawinfo.max_drawitems) { gld_drawinfo.max_drawitems+=64; gld_drawinfo.drawitems=Z_Realloc(gld_drawinfo.drawitems,gld_drawinfo.max_drawitems*sizeof(GLDrawItem), PU_LEVEL, (void **) &gld_drawinfo.drawitems); } gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].itemtype=itemtype; gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].itemcount=1; gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].firstitemindex=itemindex; gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].rendermarker=rendermarker; return; } gld_drawinfo.drawitems[gld_drawinfo.num_drawitems].itemcount++; } /***************** * * * Walls * * * *****************/ static void gld_DrawWall(GLWall *wall) { if ( (!gl_drawskys) && (wall->flag>=GLDWF_SKY) ) wall->gltexture=NULL; gld_BindTexture(wall->gltexture); if (!wall->gltexture) { #ifdef _DEBUG p_glColor4f(1.0f,0.0f,0.0f,1.0f); #endif } if (wall->flag>=GLDWF_SKY) { if ( wall->gltexture ) { p_glMatrixMode(GL_TEXTURE); p_glPushMatrix(); if ((wall->flag&GLDWF_SKYFLIP)==GLDWF_SKYFLIP) p_glScalef(-128.0f/(float)wall->gltexture->tex_width,200.0f/320.0f*2.0f,1.0f); else p_glScalef(128.0f/(float)wall->gltexture->tex_width,200.0f/320.0f*2.0f,1.0f); p_glTranslatef(wall->skyyaw,wall->skyymid,0.0f); } p_glBegin(GL_TRIANGLE_STRIP); p_glVertex3f(wall->glseg->x1,wall->ytop,wall->glseg->z1); p_glVertex3f(wall->glseg->x1,wall->ybottom,wall->glseg->z1); p_glVertex3f(wall->glseg->x2,wall->ytop,wall->glseg->z2); p_glVertex3f(wall->glseg->x2,wall->ybottom,wall->glseg->z2); p_glEnd(); if ( wall->gltexture ) { p_glPopMatrix(); p_glMatrixMode(GL_MODELVIEW); } } else { gld_StaticLightAlpha(wall->light, wall->alpha); p_glBegin(GL_TRIANGLE_STRIP); p_glTexCoord2f(wall->ul,wall->vt); p_glVertex3f(wall->glseg->x1,wall->ytop,wall->glseg->z1); p_glTexCoord2f(wall->ul,wall->vb); p_glVertex3f(wall->glseg->x1,wall->ybottom,wall->glseg->z1); p_glTexCoord2f(wall->ur,wall->vt); p_glVertex3f(wall->glseg->x2,wall->ytop,wall->glseg->z2); p_glTexCoord2f(wall->ur,wall->vb); p_glVertex3f(wall->glseg->x2,wall->ybottom,wall->glseg->z2); p_glEnd(); } } #define LINE seg->linedef #define CALC_Y_VALUES(w, lineheight, floor_height, ceiling_height)\ (w).ytop=((float)(ceiling_height)/(float)MAP_SCALE)+0.001f;\ (w).ybottom=((float)(floor_height)/(float)MAP_SCALE)-0.001f;\ lineheight=((float)fabs(((ceiling_height)/(float)FRACUNIT)-((floor_height)/(float)FRACUNIT))) #define OU(w,seg) (((float)((seg)->sidedef->textureoffset+(seg)->offset)/(float)FRACUNIT)/(float)(w).gltexture->tex_width) #define OV(w,seg) (((float)((seg)->sidedef->rowoffset)/(float)FRACUNIT)/(float)(w).gltexture->tex_height) #define OV_PEG(w,seg,v_offset) (OV((w),(seg))-(((float)(v_offset)/(float)FRACUNIT)/(float)(w).gltexture->tex_height)) #define CALC_TEX_VALUES_TOP(w, seg, peg, linelength, lineheight)\ (w).flag=GLDWF_TOP;\ (w).ul=OU((w),(seg))+(0.0f);\ (w).ur=OU((w),(seg))+((linelength)/(float)(w).gltexture->tex_width);\ (peg)?\ (\ (w).vb=OV((w),(seg))+((float)(w).gltexture->height/(float)(w).gltexture->tex_height),\ (w).vt=((w).vb-((float)(lineheight)/(float)(w).gltexture->tex_height))\ ):(\ (w).vt=OV((w),(seg))+(0.0f),\ (w).vb=OV((w),(seg))+((float)(lineheight)/(float)(w).gltexture->tex_height)\ ) #define CALC_TEX_VALUES_MIDDLE1S(w, seg, peg, linelength, lineheight)\ (w).flag=GLDWF_M1S;\ (w).ul=OU((w),(seg))+(0.0f);\ (w).ur=OU((w),(seg))+((linelength)/(float)(w).gltexture->tex_width);\ (peg)?\ (\ (w).vb=OV((w),(seg))+((float)(w).gltexture->height/(float)(w).gltexture->tex_height),\ (w).vt=((w).vb-((float)(lineheight)/(float)(w).gltexture->tex_height))\ ):(\ (w).vt=OV((w),(seg))+(0.0f),\ (w).vb=OV((w),(seg))+((float)(lineheight)/(float)(w).gltexture->tex_height)\ ) #define CALC_TEX_VALUES_MIDDLE2S(w, seg, peg, linelength, lineheight)\ (w).flag=GLDWF_M2S;\ (w).ul=OU((w),(seg))+(0.0f);\ (w).ur=OU((w),(seg))+((linelength)/(float)(w).gltexture->tex_width);\ (peg)?\ (\ (w).vb=((float)(w).gltexture->height/(float)(w).gltexture->tex_height),\ (w).vt=((w).vb-((float)(lineheight)/(float)(w).gltexture->tex_height))\ ):(\ (w).vt=(0.0f),\ (w).vb=((float)(lineheight)/(float)(w).gltexture->tex_height)\ ) #define CALC_TEX_VALUES_BOTTOM(w, seg, peg, linelength, lineheight, v_offset)\ (w).flag=GLDWF_BOT;\ (w).ul=OU((w),(seg))+(0.0f);\ (w).ur=OU((w),(seg))+((linelength)/(float)(w).gltexture->realtexwidth);\ (peg)?\ (\ (w).vb=OV_PEG((w),(seg),(v_offset))+((float)(w).gltexture->height/(float)(w).gltexture->tex_height),\ (w).vt=((w).vb-((float)(lineheight)/(float)(w).gltexture->tex_height))\ ):(\ (w).vt=OV((w),(seg))+(0.0f),\ (w).vb=OV((w),(seg))+((float)(lineheight)/(float)(w).gltexture->tex_height)\ ) #define SKYTEXTURE(sky1,sky2)\ if ((sky1) & PL_SKYFLAT)\ {\ const line_t *l = &lines[sky1 & ~PL_SKYFLAT];\ const side_t *s = *l->sidenum + sides;\ wall.gltexture=gld_RegisterTexture(texturetranslation[s->toptexture], false);\ wall.skyyaw=-2.0f*((-(float)((viewangle+s->textureoffset)>>ANGLETOFINESHIFT)*360.0f/FINEANGLES)/90.0f);\ wall.skyymid = 200.0f/319.5f*(((float)s->rowoffset/(float)FRACUNIT - 28.0f)/100.0f);\ wall.flag = l->special==272 ? GLDWF_SKY : GLDWF_SKYFLIP;\ }\ else\ if ((sky2) & PL_SKYFLAT)\ {\ const line_t *l = &lines[sky2 & ~PL_SKYFLAT];\ const side_t *s = *l->sidenum + sides;\ wall.gltexture=gld_RegisterTexture(texturetranslation[s->toptexture], false);\ wall.skyyaw=-2.0f*((-(float)((viewangle+s->textureoffset)>>ANGLETOFINESHIFT)*360.0f/FINEANGLES)/90.0f);\ wall.skyymid = 200.0f/319.5f*(((float)s->rowoffset/(float)FRACUNIT - 28.0f)/100.0f);\ wall.flag = l->special==272 ? GLDWF_SKY : GLDWF_SKYFLIP;\ }\ else\ {\ wall.gltexture=gld_RegisterTexture(skytexture, false);\ wall.skyyaw=-2.0f*((yaw+90.0f)/90.0f);\ wall.skyymid = 200.0f/319.5f*((100.0f)/100.0f);\ wall.flag = GLDWF_SKY;\ } #define ADDWALL(wall)\ {\ if (gld_drawinfo.num_walls>=gld_drawinfo.max_walls)\ {\ gld_drawinfo.max_walls+=128;\ gld_drawinfo.walls=Z_Realloc(gld_drawinfo.walls,gld_drawinfo.max_walls*sizeof(GLWall), PU_LEVEL, (void **) &gld_drawinfo.walls);\ }\ gld_AddDrawItem(GLDIT_WALL, gld_drawinfo.num_walls);\ gld_drawinfo.walls[gld_drawinfo.num_walls++]=*wall;\ }; void gld_AddWall(seg_t *seg) { GLWall wall; GLTexture *temptex; sector_t *frontsector; sector_t *backsector; sector_t ftempsec; // needed for R_FakeFlat sector_t btempsec; // needed for R_FakeFlat float lineheight; if (!segrendered) return; if (segrendered[seg->iSegID]==rendermarker) return; segrendered[seg->iSegID]=rendermarker; if (!seg->frontsector) return; frontsector=R_FakeFlat(seg->frontsector, &ftempsec, NULL, NULL, false); // for boom effects if (!frontsector) return; wall.glseg=&gl_segs[seg->iSegID]; wall.light=gld_CalcLightLevel(frontsector->lightlevel+(extralight<<5)); wall.alpha=1.0f; wall.gltexture=NULL; if (!seg->backsector) /* onesided */ { if (frontsector->ceilingpic==skyflatnum) { wall.ytop=255.0f; wall.ybottom=(float)frontsector->ceilingheight/MAP_SCALE; SKYTEXTURE(frontsector->sky,frontsector->sky); ADDWALL(&wall); } if (frontsector->floorpic==skyflatnum) { wall.ytop=(float)frontsector->floorheight/MAP_SCALE; wall.ybottom=-255.0f; SKYTEXTURE(frontsector->sky,frontsector->sky); ADDWALL(&wall); } temptex=gld_RegisterTexture(texturetranslation[seg->sidedef->midtexture], true); if (temptex) { wall.gltexture=temptex; CALC_Y_VALUES(wall, lineheight, frontsector->floorheight, frontsector->ceilingheight); CALC_TEX_VALUES_MIDDLE1S( wall, seg, (LINE->flags & ML_DONTPEGBOTTOM)>0, segs[seg->iSegID].length, lineheight ); ADDWALL(&wall); } } else /* twosided */ { int floor_height,ceiling_height; backsector=R_FakeFlat(seg->backsector, &btempsec, NULL, NULL, true); // for boom effects if (!backsector) return; /* toptexture */ ceiling_height=frontsector->ceilingheight; floor_height=backsector->ceilingheight; if (frontsector->ceilingpic==skyflatnum) { wall.ytop=255.0f; if ( (backsector->ceilingheight==backsector->floorheight) && (backsector->ceilingpic==skyflatnum) ) { wall.ybottom=(float)backsector->floorheight/MAP_SCALE; SKYTEXTURE(frontsector->sky,backsector->sky); ADDWALL(&wall); } else { if ( (texturetranslation[seg->sidedef->toptexture]!=R_TextureNumForName("-")) ) { wall.ybottom=(float)frontsector->ceilingheight/MAP_SCALE; SKYTEXTURE(frontsector->sky,backsector->sky); ADDWALL(&wall); } else if ( (backsector->ceilingheight <= frontsector->floorheight) || (backsector->ceilingpic != skyflatnum) ) { wall.ybottom=(float)backsector->ceilingheight/MAP_SCALE; SKYTEXTURE(frontsector->sky,backsector->sky); ADDWALL(&wall); } } } if (floor_heightceilingpic==skyflatnum) && (backsector->ceilingpic==skyflatnum))) { temptex=gld_RegisterTexture(texturetranslation[seg->sidedef->toptexture], true); if (temptex) { wall.gltexture=temptex; CALC_Y_VALUES(wall, lineheight, floor_height, ceiling_height); CALC_TEX_VALUES_TOP( wall, seg, (LINE->flags & ML_DONTPEGTOP)==0, segs[seg->iSegID].length, lineheight ); ADDWALL(&wall); } } } /* midtexture */ temptex=gld_RegisterTexture(texturetranslation[seg->sidedef->midtexture], true); if (temptex) { wall.gltexture=temptex; if ( (LINE->flags & ML_DONTPEGBOTTOM) >0) { if (seg->backsector->ceilingheight<=seg->frontsector->floorheight) goto bottomtexture; floor_height=max(seg->frontsector->floorheight,seg->backsector->floorheight)+(seg->sidedef->rowoffset); ceiling_height=floor_height+(wall.gltexture->realtexheight<backsector->ceilingheight<=seg->frontsector->floorheight) goto bottomtexture; ceiling_height=min(seg->frontsector->ceilingheight,seg->backsector->ceilingheight)+(seg->sidedef->rowoffset); floor_height=ceiling_height-(wall.gltexture->realtexheight<flags & ML_DONTPEGBOTTOM)>0, segs[seg->iSegID].length, lineheight ); if (seg->linedef->tranlump >= 0 && general_translucency) wall.alpha=(float)tran_filter_pct/100.0f; ADDWALL(&wall); wall.alpha=1.0f; } bottomtexture: /* bottomtexture */ ceiling_height=backsector->floorheight; floor_height=frontsector->floorheight; if (frontsector->floorpic==skyflatnum) { wall.ybottom=-255.0f; if ( (backsector->ceilingheight==backsector->floorheight) && (backsector->floorpic==skyflatnum) ) { wall.ytop=(float)backsector->floorheight/MAP_SCALE; SKYTEXTURE(frontsector->sky,backsector->sky); ADDWALL(&wall); } else { if ( (texturetranslation[seg->sidedef->bottomtexture]!=R_TextureNumForName("-")) ) { wall.ytop=(float)frontsector->floorheight/MAP_SCALE; SKYTEXTURE(frontsector->sky,backsector->sky); ADDWALL(&wall); } else if ( (backsector->floorheight >= frontsector->ceilingheight) || (backsector->floorpic != skyflatnum) ) { wall.ytop=(float)backsector->floorheight/MAP_SCALE; SKYTEXTURE(frontsector->sky,backsector->sky); ADDWALL(&wall); } } } if (floor_heightsidedef->bottomtexture], true); if (temptex) { wall.gltexture=temptex; CALC_Y_VALUES(wall, lineheight, floor_height, ceiling_height); CALC_TEX_VALUES_BOTTOM( wall, seg, (LINE->flags & ML_DONTPEGBOTTOM)>0, segs[seg->iSegID].length, lineheight, floor_height-frontsector->ceilingheight ); ADDWALL(&wall); } } } } #undef LINE #undef CALC_Y_VALUES #undef OU #undef OV #undef OV_PEG #undef CALC_TEX_VALUES_TOP #undef CALC_TEX_VALUES_MIDDLE1S #undef CALC_TEX_VALUES_MIDDLE2S #undef CALC_TEX_VALUES_BOTTOM #undef SKYTEXTURE #undef ADDWALL /***************** * * * Flats * * * *****************/ static void gld_DrawFlat(GLFlat *flat) { int loopnum; // current loop number GLLoopDef *currentloop; // the current loop #ifndef USE_VERTEX_ARRAYS int vertexnum; #endif gld_BindFlat(flat->gltexture); gld_StaticLight(flat->light); p_glMatrixMode(GL_MODELVIEW); p_glPushMatrix(); p_glTranslatef(0.0f,flat->z,0.0f); p_glMatrixMode(GL_TEXTURE); p_glPushMatrix(); p_glTranslatef(flat->uoffs/64.0f,flat->voffs/64.0f,0.0f); if (flat->sectornum>=0) { // go through all loops of this sector #ifndef USE_VERTEX_ARRAYS for (loopnum=0; loopnumsectornum].loopcount; loopnum++) { // set the current loop currentloop=§orloops[flat->sectornum].loops[loopnum]; if (!currentloop) continue; // set the mode (GL_TRIANGLES, GL_TRIANGLE_STRIP or GL_TRIANGLE_FAN) p_glBegin(currentloop->mode); // go through all vertexes of this loop for (vertexnum=currentloop->vertexindex; vertexnum<(currentloop->vertexindex+currentloop->vertexcount); vertexnum++) { // set texture coordinate of this vertex p_glTexCoord2fv(&gld_texcoords[vertexnum].u); // set vertex coordinate p_glVertex3fv(&gld_vertexes[vertexnum].x); } // end of loop p_glEnd(); } #else for (loopnum=0; loopnumsectornum].loopcount; loopnum++) { // set the current loop currentloop=§orloops[flat->sectornum].loops[loopnum]; p_glDrawArrays(currentloop->mode,currentloop->vertexindex,currentloop->vertexcount); } #endif } p_glPopMatrix(); p_glMatrixMode(GL_MODELVIEW); p_glPopMatrix(); } // gld_AddFlat // // This draws on flat for the sector "num" // The ceiling boolean indicates if the flat is a floor(false) or a ceiling(true) static void gld_AddFlat(int sectornum, boolean ceiling, visplane_t *plane) { sector_t *sector; // the sector we want to draw sector_t tempsec; // needed for R_FakeFlat int floorlightlevel; // killough 3/16/98: set floor lightlevel int ceilinglightlevel; // killough 4/11/98 GLFlat flat; if (sectornum<0) return; flat.sectornum=sectornum; sector=§ors[sectornum]; // get the sector sector=R_FakeFlat(sector, &tempsec, &floorlightlevel, &ceilinglightlevel, false); // for boom effects flat.ceiling=ceiling; if (!ceiling) // if it is a floor ... { if (sector->floorpic == skyflatnum) // don't draw if sky return; // get the texture. flattranslation is maintained by doom and // contains the number of the current animation frame flat.gltexture=gld_RegisterFlat(flattranslation[sector->floorpic], true); if (!flat.gltexture) return; // get the lightlevel from floorlightlevel flat.light=gld_CalcLightLevel(floorlightlevel+(extralight<<5)); // calculate texture offsets flat.uoffs=(float)sector->floor_xoffs/(float)FRACUNIT; flat.voffs=(float)sector->floor_yoffs/(float)FRACUNIT; } else // if it is a ceiling ... { if (sector->ceilingpic == skyflatnum) // don't draw if sky return; // get the texture. flattranslation is maintained by doom and // contains the number of the current animation frame flat.gltexture=gld_RegisterFlat(flattranslation[sector->ceilingpic], true); if (!flat.gltexture) return; // get the lightlevel from ceilinglightlevel flat.light=gld_CalcLightLevel(ceilinglightlevel+(extralight<<5)); // calculate texture offsets flat.uoffs=(float)sector->ceiling_xoffs/(float)FRACUNIT; flat.voffs=(float)sector->ceiling_yoffs/(float)FRACUNIT; } // get height from plane flat.z=(float)plane->height/MAP_SCALE; if (gld_drawinfo.num_flats>=gld_drawinfo.max_flats) { gld_drawinfo.max_flats+=128; gld_drawinfo.flats=Z_Realloc(gld_drawinfo.flats,gld_drawinfo.max_flats*sizeof(GLFlat), PU_LEVEL, (void **) &gld_drawinfo.flats); } gld_AddDrawItem(GLDIT_FLAT, gld_drawinfo.num_flats); gld_drawinfo.flats[gld_drawinfo.num_flats++]=flat; } void gld_AddPlane(int subsectornum, visplane_t *floorplane, visplane_t *ceilingplane) { subsector_t *subsector; // check if all arrays are allocated if (!sectorrendered) return; subsector = &subsectors[subsectornum]; if (!subsector) return; if (sectorrendered[subsector->sector->iSectorID]!=rendermarker) // if not already rendered { // render the floor if (floorplane) gld_AddFlat(subsector->sector->iSectorID, false, floorplane); // render the ceiling if (ceilingplane) gld_AddFlat(subsector->sector->iSectorID, true, ceilingplane); // set rendered true sectorrendered[subsector->sector->iSectorID]=rendermarker; } } /***************** * * * Sprites * * * *****************/ static void gld_DrawSprite(GLSprite *sprite) { gld_BindPatch(sprite->gltexture,sprite->cm); p_glMatrixMode(GL_MODELVIEW); p_glPushMatrix(); p_glTranslatef(sprite->x,sprite->y,sprite->z); p_glRotatef(inv_yaw,0.0f,1.0f,0.0f); if(sprite->shadow) { p_glBlendFunc(GL_DST_COLOR, GL_ONE_MINUS_SRC_ALPHA); //p_glColor4f(0.2f,0.2f,0.2f,(float)tran_filter_pct/100.0f); p_glAlphaFunc(GL_GEQUAL,0.1f); p_glColor4f(0.2f,0.2f,0.2f,0.33f); } else { if(sprite->trans) gld_StaticLightAlpha(sprite->light,(float)tran_filter_pct/100.0f); else gld_StaticLight(sprite->light); } p_glBegin(GL_TRIANGLE_STRIP); p_glTexCoord2f(sprite->ul, sprite->vt); p_glVertex3f(sprite->x1, sprite->y1, 0.0f); p_glTexCoord2f(sprite->ur, sprite->vt); p_glVertex3f(sprite->x2, sprite->y1, 0.0f); p_glTexCoord2f(sprite->ul, sprite->vb); p_glVertex3f(sprite->x1, sprite->y2, 0.0f); p_glTexCoord2f(sprite->ur, sprite->vb); p_glVertex3f(sprite->x2, sprite->y2, 0.0f); p_glEnd(); p_glPopMatrix(); if(sprite->shadow) { p_glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA); p_glAlphaFunc(GL_GEQUAL,0.5f); } } void gld_AddSprite(vissprite_t *vspr) { mobj_t *pSpr=vspr->thing; GLSprite sprite; float voff,hoff; sprite.scale=vspr->scale; if (pSpr->frame & FF_FULLBRIGHT) sprite.light = 1.0f; else sprite.light = gld_CalcLightLevel(pSpr->subsector->sector->lightlevel+(extralight<<5)); sprite.cm=CR_LIMIT+pSpr->colour; sprite.gltexture=gld_RegisterPatch(vspr->patch+firstspritelump,sprite.cm); if (!sprite.gltexture) return; sprite.shadow = (pSpr->flags & MF_SHADOW) != 0; sprite.trans = (pSpr->flags & MF_TRANSLUCENT) != 0; sprite.x=-(float)pSpr->x/MAP_SCALE; sprite.y= (float)pSpr->z/MAP_SCALE; sprite.z= (float)pSpr->y/MAP_SCALE; sprite.vt=0.0f; sprite.vb=(float)sprite.gltexture->height/(float)sprite.gltexture->tex_height; if (vspr->flip) { sprite.ul=0.0f; sprite.ur=(float)sprite.gltexture->width/(float)sprite.gltexture->tex_width; } else { sprite.ul=(float)sprite.gltexture->width/(float)sprite.gltexture->tex_width; sprite.ur=0.0f; } hoff=(float)sprite.gltexture->leftoffset/(float)(MAP_COEFF); voff=(float)sprite.gltexture->topoffset/(float)(MAP_COEFF); sprite.x1=hoff-((float)sprite.gltexture->realtexwidth/(float)(MAP_COEFF)); sprite.x2=hoff; sprite.y1=voff; sprite.y2=voff-((float)sprite.gltexture->realtexheight/(float)(MAP_COEFF)); if (gld_drawinfo.num_sprites>=gld_drawinfo.max_sprites) { gld_drawinfo.max_sprites+=128; gld_drawinfo.sprites=Z_Realloc(gld_drawinfo.sprites,gld_drawinfo.max_sprites*sizeof(GLSprite), PU_LEVEL, (void **) &gld_drawinfo.sprites); } gld_AddDrawItem(GLDIT_SPRITE, gld_drawinfo.num_sprites); gld_drawinfo.sprites[gld_drawinfo.num_sprites++]=sprite; } /***************** * * * Draw * * * *****************/ extern int rendered_visplanes, rendered_segs, rendered_vissprites; void gld_DrawScene(player_t *player) { int i,j,k,count; fixed_t max_scale; #ifdef USE_VERTEX_ARRAYS p_glEnableClientState(GL_TEXTURE_COORD_ARRAY); p_glEnableClientState(GL_VERTEX_ARRAY); #endif rendered_visplanes = rendered_segs = rendered_vissprites = 0; for (i=gld_drawinfo.num_drawitems; i>=0; i--) { switch (gld_drawinfo.drawitems[i].itemtype) { case GLDIT_FLAT: // enable backside removing p_glEnable(GL_CULL_FACE); // floors p_glCullFace(GL_FRONT); for (j=(gld_drawinfo.drawitems[i].itemcount-1); j>=0; j--) if (!gld_drawinfo.flats[j+gld_drawinfo.drawitems[i].firstitemindex].ceiling) { rendered_visplanes++; gld_DrawFlat(&gld_drawinfo.flats[j+gld_drawinfo.drawitems[i].firstitemindex]); } // ceilings p_glCullFace(GL_BACK); for (j=(gld_drawinfo.drawitems[i].itemcount-1); j>=0; j--) if (gld_drawinfo.flats[j+gld_drawinfo.drawitems[i].firstitemindex].ceiling) { rendered_visplanes++; gld_DrawFlat(&gld_drawinfo.flats[j+gld_drawinfo.drawitems[i].firstitemindex]); } // disable backside removing p_glDisable(GL_CULL_FACE); break; } } for (i=gld_drawinfo.num_drawitems; i>=0; i--) { switch (gld_drawinfo.drawitems[i].itemtype) { case GLDIT_WALL: count=0; for (k=GLDWF_TOP; k<=GLDWF_SKYFLIP; k++) { if (count>=gld_drawinfo.drawitems[i].itemcount) continue; if ( (gl_drawskys) && (k==GLDWF_SKY) ) { if (comp[comp_skymap] && gl_shared_texture_palette) p_glDisable(GL_SHARED_TEXTURE_PALETTE_EXT); p_glEnable(GL_TEXTURE_GEN_S); p_glEnable(GL_TEXTURE_GEN_T); p_glEnable(GL_TEXTURE_GEN_Q); p_glColor4fv(gl_whitecolor); } for (j=(gld_drawinfo.drawitems[i].itemcount-1); j>=0; j--) if (gld_drawinfo.walls[j+gld_drawinfo.drawitems[i].firstitemindex].flag==k) { rendered_segs++; count++; gld_DrawWall(&gld_drawinfo.walls[j+gld_drawinfo.drawitems[i].firstitemindex]); } if (gl_drawskys) { p_glDisable(GL_TEXTURE_GEN_Q); p_glDisable(GL_TEXTURE_GEN_T); p_glDisable(GL_TEXTURE_GEN_S); if (comp[comp_skymap] && gl_shared_texture_palette) p_glEnable(GL_SHARED_TEXTURE_PALETTE_EXT); } } break; case GLDIT_SPRITE: if (gl_sortsprites) { do { max_scale=INT_MAX; k=-1; for (j=(gld_drawinfo.drawitems[i].itemcount-1); j>=0; j--) if (gld_drawinfo.sprites[j+gld_drawinfo.drawitems[i].firstitemindex].scale=0) { rendered_vissprites++; gld_DrawSprite(&gld_drawinfo.sprites[k]); gld_drawinfo.sprites[k].scale=INT_MAX; } } while (max_scale!=INT_MAX); } else { for (j=(gld_drawinfo.drawitems[i].itemcount-1); j>=0; j--,rendered_vissprites++) gld_DrawSprite(&gld_drawinfo.sprites[j+gld_drawinfo.drawitems[i].firstitemindex]); } break; } } #ifdef USE_VERTEX_ARRAYS p_glDisableClientState(GL_TEXTURE_COORD_ARRAY); p_glDisableClientState(GL_VERTEX_ARRAY); #endif } void gld_CleanSectorMemory(void) { } static const char *gl_tex_strs[] = { "GL_RGBA", "GL_RGBA2", "GL_RGBA4", "GL_RGB5_A1", "GL_RGBA8" }; static int gl_texformat=3; CONSOLE_INT(gl_tex_format, gl_texformat, NULL, 0, 4, gl_tex_strs, 0) { switch (gl_texformat) { default: case 0: gl_tex_format=GL_RGBA; break; case 1: gl_tex_format=GL_RGBA2; break; case 2: gl_tex_format=GL_RGBA4; break; case 3: gl_tex_format=GL_RGB5_A1; break; case 4: gl_tex_format=GL_RGBA8; break; } gld_CleanMemory(); } static const char *gl_filter_strs[] = { "GL_NEAREST", "GL_LINEAR", "GL_NEAREST_MIPMAP_NEAREST", "GL_LINEAR_MIPMAP_NEAREST", "GL_NEAREST_MIPMAP_LINEAR", "GL_LINEAR_MIPMAP_LINEAR" }; CONSOLE_INT(gl_nearclip, gl_nearclip, NULL, 1, 100, NULL, 0) {} static int gl_filter = 1; CONSOLE_INT(gl_filter, gl_filter, NULL, 0, 1, gl_filter_strs, 0) /* mipmapping disabled for now ^^^^^ */ { switch (gl_filter) { case 0: use_mipmapping=false; gl_tex_filter=GL_NEAREST; gl_mipmap_filter=GL_NEAREST; break; default: case 1: use_mipmapping=false; gl_tex_filter=GL_LINEAR; gl_mipmap_filter=GL_LINEAR; break; case 2: use_mipmapping=true; gl_shared_texture_palette = false; gl_tex_filter=GL_NEAREST; gl_mipmap_filter=GL_NEAREST_MIPMAP_NEAREST; break; case 3: use_mipmapping=true; gl_shared_texture_palette = false; gl_tex_filter=GL_LINEAR; gl_mipmap_filter=GL_LINEAR_MIPMAP_NEAREST; break; case 4: use_mipmapping=true; gl_shared_texture_palette = false; gl_tex_filter=GL_NEAREST; gl_mipmap_filter=GL_NEAREST_MIPMAP_LINEAR; break; case 5: use_mipmapping=true; gl_shared_texture_palette = false; gl_tex_filter=GL_LINEAR; gl_mipmap_filter=GL_LINEAR_MIPMAP_LINEAR; break; } gld_CleanMemory(); } CONSOLE_INT(gl_texture_filter_anisotropic, gl_texture_filter_anisotropic, NULL, 0, 1, onoff, 0) {} CONSOLE_INT(gl_drawskys, gl_drawskys, NULL, 0, 1, yesno, 0) {} CONSOLE_INT(gl_sortsprites, gl_sortsprites, NULL, 0, 1, yesno, 0) {} CONSOLE_INT(gl_use_paletted_texture, gl_use_paletted_texture, NULL, 0, 1, yesno, 0) {} CONSOLE_INT(gl_use_shared_texture_palette, gl_use_shared_texture_palette, NULL, 0, 1, yesno, 0) {} CONSOLE_INT(gl_use_fog, gl_use_fog, NULL, 0, 1, yesno, 0) {} CONSOLE_INT(gl_fog_density, fog_density, NULL, 1, 1000, NULL, 0) {} void GL_AddCommands(void) { C_AddCommand(gl_nearclip); C_AddCommand(gl_tex_format); C_AddCommand(gl_filter); //C_AddCommand(gl_texture_filter_anisotropic); C_AddCommand(gl_drawskys); C_AddCommand(gl_sortsprites); C_AddCommand(gl_use_paletted_texture); C_AddCommand(gl_use_shared_texture_palette); C_AddCommand(gl_use_fog); C_AddCommand(gl_fog_density); }