equal
deleted
inserted
replaced
154 for i:= 0 to 7 do |
154 for i:= 0 to 7 do |
155 with Hedgehogs[i] do |
155 with Hedgehogs[i] do |
156 if Gear <> nil then |
156 if Gear <> nil then |
157 begin |
157 begin |
158 NameTagTex:= RenderStringTex(Name, Clan^.Color, fnt16); |
158 NameTagTex:= RenderStringTex(Name, Clan^.Color, fnt16); |
159 texsurf:= LoadImage(Pathz[ptHats] + '/' + Hat, false, true, false); |
159 if Hat <> 'NoHat' then |
160 HatTex:= Surface2Tex(texsurf); |
160 begin |
161 SDL_FreeSurface(texsurf) |
161 texsurf:= LoadImage(Pathz[ptHats] + '/' + Hat, false, true, false); |
|
162 HatTex:= Surface2Tex(texsurf); |
|
163 SDL_FreeSurface(texsurf) |
|
164 end |
162 end; |
165 end; |
163 end; |
166 end; |
164 end; |
167 end; |
165 |
168 |
166 procedure MakeCrossHairs; |
169 procedure MakeCrossHairs; |