# HG changeset patch # User unc0rr # Date 1218228895 0 # Node ID bf5af791d2341ad6c8e5af77b0b37a26ad50af5f # Parent a17732fbaf35af9f494bed77c9bc3fba60f3c266 Step 5: Finally... we have theme objects with alpha-channel! Only nature theme converted yet, others in the next commit diff -r a17732fbaf35 -r bf5af791d234 hedgewars/uLandObjects.pas --- a/hedgewars/uLandObjects.pas Fri Aug 08 20:45:13 2008 +0000 +++ b/hedgewars/uLandObjects.pas Fri Aug 08 20:54:55 2008 +0000 @@ -410,7 +410,7 @@ TryDo(IOResult = 0, 'Bad data or cannot access file ' + cThemeCFGFilename, true) end; -procedure AddThemeObjects(Surface: PSDL_Surface; var ThemeObjects: TThemeObjects; MaxCount: LongInt); +procedure AddThemeObjects(var ThemeObjects: TThemeObjects; MaxCount: LongInt); var i, ii, t: LongInt; b: boolean; begin @@ -459,11 +459,11 @@ AddGirder(1280); AddGirder(1536); AddGirder(1792); -{AddThemeObjects(Surface, ThemeObjects, 8); +AddThemeObjects(ThemeObjects, 8); AddProgress; -SDL_UpperBlit(InSurface, nil, Surface, nil); -AddSprayObjects(Surface, SprayObjects, 10); -FreeRects} +{SDL_UpperBlit(InSurface, nil, Surface, nil); +AddSprayObjects(Surface, SprayObjects, 10);} +FreeRects end; procedure LoadThemeConfig; diff -r a17732fbaf35 -r bf5af791d234 share/hedgewars/Data/Themes/nature/plant1.png Binary file share/hedgewars/Data/Themes/nature/plant1.png has changed diff -r a17732fbaf35 -r bf5af791d234 share/hedgewars/Data/Themes/nature/plant2.png Binary file share/hedgewars/Data/Themes/nature/plant2.png has changed diff -r a17732fbaf35 -r bf5af791d234 share/hedgewars/Data/Themes/nature/plant3.png Binary file share/hedgewars/Data/Themes/nature/plant3.png has changed diff -r a17732fbaf35 -r bf5af791d234 share/hedgewars/Data/Themes/nature/plant4.png Binary file share/hedgewars/Data/Themes/nature/plant4.png has changed