Mercurial Mercurial > sheepy-clone / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uMisc.pas
changeset 3594 aeca3d8f1b29
parent 3593 ae50f63e4fa9
child 3598 a8aa06bae895
equal deleted inserted replaced
3593:ae50f63e4fa9 3594:aeca3d8f1b29 
    82     cShowFPS    : boolean;
 
    82     cShowFPS    : boolean;
 
    83     cCaseFactor : Longword;
 
    83     cCaseFactor : Longword;
 
    84     cLandAdditions  : Longword;
 
    84     cLandAdditions  : Longword;
 
    85     cExplosives : Longword;
 
    85     cExplosives : Longword;
 
    86     cFullScreen : boolean;
 
    86     cFullScreen : boolean;
 
    87     cReducedQuality : boolean;
 
    87     cReducedQuality : LongInt;
 
    88     cLocaleFName    : shortstring;
 
    88     cLocaleFName    : shortstring;
 
    89     cSeed       : shortstring;
 
    89     cSeed       : shortstring;
 
    90     cInitVolume : LongInt;
 
    90     cInitVolume : LongInt;
 
    91     cVolumeDelta    : LongInt;
 
    91     cVolumeDelta    : LongInt;
 
    92     cTimerInterval  : Longword;
 
    92     cTimerInterval  : Longword;
 
   285 FloatToStr:= cstr(n) + '_' + inttostr(Lo(n.QWordValue))
 
   285 FloatToStr:= cstr(n) + '_' + inttostr(Lo(n.QWordValue))
 
   286 end;
 
   286 end;
 
   287 
   287 
   288 procedure SetTextureParameters(enableClamp: Boolean);
 
   288 procedure SetTextureParameters(enableClamp: Boolean);
 
   289 begin
 
   289 begin
 
   290 if enableClamp and not cReducedQuality then
 
   290     //if enableClamp and not cReducedQuality then
 
   291     begin
 
   291     if enableClamp and ((cReducedQuality and rqNoBackground) = 0) then
 
   292     glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
 
   292     begin
 
   293     glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE)
 
   293         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
 
       
   294         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE)
 
   294     end;
 
   295     end;
 
   295 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
 
   296     glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
 
   296 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR)
 
   297     glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR)
 
   297 end;
 
   298 end;
 
   298 
   299 
   299 function DxDy2Angle(const _dY, _dX: hwFloat): GLfloat;
 
   300 function DxDy2Angle(const _dY, _dX: hwFloat): GLfloat;
 
   300 var dY, dX: Extended;
 
   301 var dY, dX: Extended;
 
   301 begin
 
   302 begin
 
   763     cShowFPS        := false;
 
   764     cShowFPS        := false;
 
   764     cCaseFactor     := 5;  {0..9}
 
   765     cCaseFactor     := 5;  {0..9}
 
   765     cLandAdditions  := 4;
 
   766     cLandAdditions  := 4;
 
   766     cExplosives     := 2;
 
   767     cExplosives     := 2;
 
   767     cFullScreen     := false;
 
   768     cFullScreen     := false;
 
   768     cReducedQuality := false;
 
   769     cReducedQuality := 0;
 
   769     cLocaleFName    := 'en.txt';
 
   770     cLocaleFName    := 'en.txt';
 
   770     cSeed           := '';
 
   771     cSeed           := '';
 
   771     cInitVolume     := 50;
 
   772     cInitVolume     := 50;
 
   772     cVolumeDelta    := 0;
 
   773     cVolumeDelta    := 0;
 
   773     cTimerInterval  := 8;
 
   774     cTimerInterval  := 8;
sheepy-clone