X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-sdl.git;a=blobdiff_plain;f=src%2Fgame%2Fopengl%2Fr_graphics.pas;fp=src%2Fengine%2Fe_graphics.pas;h=b16bd6fc010d074b8c89cb60be6b5bb5851e5297;hp=0f691aef424fdc5c39fd69ff915840ff593487cc;hb=5c816a8e702fd39c65d0928a3315d81e979f30fb;hpb=a04665df153fa20762b6ed1d56177f3264e8d8f7 diff --git a/src/engine/e_graphics.pas b/src/game/opengl/r_graphics.pas similarity index 99% rename from src/engine/e_graphics.pas rename to src/game/opengl/r_graphics.pas index 0f691ae..b16bd6f 100644 --- a/src/engine/e_graphics.pas +++ b/src/game/opengl/r_graphics.pas @@ -12,8 +12,8 @@ * You should have received a copy of the GNU General Public License * along with this program. If not, see . *) -{$INCLUDE ../shared/a_modes.inc} -unit e_graphics; +{$INCLUDE ../../shared/a_modes.inc} +unit r_graphics; interface @@ -57,7 +57,7 @@ type //------------------------------------------------------------------ -// ïðîòîòèïû ôóíêöèé +// прототипы функций //------------------------------------------------------------------ procedure e_InitGL(); procedure e_SetViewPort(X, Y, Width, Height: Word); @@ -211,7 +211,7 @@ var //function e_getTextGLId (ID: DWORD): GLuint; begin result := e_Textures[ID].tx.id; end; //------------------------------------------------------------------ -// Èíèöèàëèçèðóåò OpenGL +// Инициализирует OpenGL //------------------------------------------------------------------ procedure e_InitGL(); begin @@ -268,7 +268,7 @@ begin end; //------------------------------------------------------------------ -// Èùåò ñâîáîäíûé ýëåìåíò â ìàññèâå òåêñòóð +// Ищет свободный элемент в массиве текстур //------------------------------------------------------------------ function FindTexture(): DWORD; var @@ -295,7 +295,7 @@ begin end; //------------------------------------------------------------------ -// Ñîçäàåò òåêñòóðó +// Создает текстуру //------------------------------------------------------------------ function e_CreateTexture(FileName: String; var ID: DWORD): Boolean; var @@ -1122,7 +1122,7 @@ begin end; //------------------------------------------------------------------ -// Óäàëÿåò òåêñòóðó èç ìàññèâà +// Удаляет текстуру из массива //------------------------------------------------------------------ procedure e_DeleteTexture(ID: DWORD); begin @@ -1134,7 +1134,7 @@ begin end; //------------------------------------------------------------------ -// Óäàëÿåò âñå òåêñòóðû +// Удаляет все текстуры //------------------------------------------------------------------ procedure e_RemoveAllTextures(); var @@ -1148,7 +1148,7 @@ begin end; //------------------------------------------------------------------ -// Óäàëÿåò äâèæîê +// Удаляет движок //------------------------------------------------------------------ procedure e_ReleaseEngine(); begin