245 begin |
245 begin |
246 inc(c); |
246 inc(c); |
247 HHGear:= hh^.Gear; |
247 HHGear:= hh^.Gear; |
248 x:= hwRound(HHGear^.X) + WorldDx; |
248 x:= hwRound(HHGear^.X) + WorldDx; |
249 y:= hwRound(HHGear^.Y) + WorldDy - 2; |
249 y:= hwRound(HHGear^.Y) + WorldDy - 2; |
250 if (SpeechHogNumber <> c) or ((RealTicks and 512) < 256) then |
250 DrawTextureF(SpritesData[sprFrame].Texture, 0.5, x - fSprOff, y, 0, 1, SpritesData[sprFrame].Width, SpritesData[sprFrame].Height); |
251 begin |
251 DrawTextureF(SpritesData[sprFrame].Texture, 0.5, x + fSprOff, y, 1, 1, SpritesData[sprFrame].Width, SpritesData[sprFrame].Height); |
252 DrawTextureF(SpritesData[sprFrame].Texture, 0.5, x - fSprOff, y, 0, 1, SpritesData[sprFrame].Width, SpritesData[sprFrame].Height); |
252 DrawTextureF(SpritesData[sprBigDigit].Texture, 0.5, x, y, c, 1, sprW, sprH); |
253 DrawTextureF(SpritesData[sprFrame].Texture, 0.5, x + fSprOff, y, 1, 1, SpritesData[sprFrame].Width, SpritesData[sprFrame].Height); |
253 if SpeechHogNumber = c then |
254 DrawTextureF(SpritesData[sprBigDigit].Texture, 0.5, x, y, c, 1, sprW, sprH); |
|
255 end |
|
256 else |
|
257 DrawCircle(x, y, 20, 3, 0, $FF, $FF, $80); |
254 DrawCircle(x, y, 20, 3, 0, $FF, $FF, $80); |
258 end; |
255 end; |
259 until (i > cMaxHHIndex); |
256 until (i > cMaxHHIndex); |
260 end |
257 end |
261 |
258 |