equal
deleted
inserted
replaced
64 procedure FreeWeaponTooltip; |
64 procedure FreeWeaponTooltip; |
65 procedure Tint(r, g, b, a: Byte); inline; |
65 procedure Tint(r, g, b, a: Byte); inline; |
66 procedure Tint(c: Longword); inline; |
66 procedure Tint(c: Longword); inline; |
67 |
67 |
68 implementation |
68 implementation |
69 uses uMisc, uConsole, uLocale, uMobile, uVariables, uUtils, uTextures; |
69 uses uMisc, uConsole, uLocale, uMobile, uVariables, uUtils, uTextures, uIO; |
70 |
70 |
71 type TGPUVendor = (gvUnknown, gvNVIDIA, gvATI, gvIntel, gvApple); |
71 type TGPUVendor = (gvUnknown, gvNVIDIA, gvATI, gvIntel, gvApple); |
72 |
72 |
73 var HHTexture: PTexture; |
73 var HHTexture: PTexture; |
74 MaxTextureSize: LongInt; |
74 MaxTextureSize: LongInt; |