diff -r 4eec706e86b0 -r 1b327b7515ed hedgewars/uMisc.pas --- a/hedgewars/uMisc.pas Thu Dec 24 02:02:12 2009 +0000 +++ b/hedgewars/uMisc.pas Thu Dec 24 13:38:20 2009 +0000 @@ -169,8 +169,9 @@ function Surface2Tex(surf: PSDL_Surface; enableClamp: boolean): PTexture; procedure FreeTexture(tex: PTexture); function toPowerOf2(i: Longword): Longword; -function DecodeBase64(s: shortstring): shortstring; -function doSurfaceConversion(tmpsurf: PSDL_Surface): PSDL_Surface; +function DecodeBase64(s: shortstring): shortstring; +function doSurfaceConversion(tmpsurf: PSDL_Surface): PSDL_Surface; +function endian(independent: LongWord): LongWord; {$IFNDEF IPHONEOS} procedure MakeScreenshot(s: shortstring); {$ENDIF} @@ -560,6 +561,17 @@ else doSurfaceConversion:= tmpsurf; end; +function endian(independent: LongWord): LongWord; +begin +{$IFDEF ENDIAN_LITTLE} +endian:= independent; +{$ELSE} +endian:= (((independent and $FF000000) shr 24) or + ((independent and $00FF0000) shr 8) or + ((independent and $0000FF00) shl 8) or + ((independent and $000000FF) shl 24)) +{$ENDIF} +end; initialization cDrownSpeed.QWordValue:= 257698038;// 0.06