1835 DrawLine(-3000, topY-300, 7000, topY-300, 3.0, (Team^.Clan^.Color shr 16), (Team^.Clan^.Color shr 8) and $FF, Team^.Clan^.Color and $FF, $FF); |
1835 DrawLine(-3000, topY-300, 7000, topY-300, 3.0, (Team^.Clan^.Color shr 16), (Team^.Clan^.Color shr 8) and $FF, Team^.Clan^.Color and $FF, $FF); |
1836 i:= GetCurAmmoEntry(CurrentHedgehog^)^.Pos; |
1836 i:= GetCurAmmoEntry(CurrentHedgehog^)^.Pos; |
1837 with Ammoz[CurAmmoType] do |
1837 with Ammoz[CurAmmoType] do |
1838 if PosCount > 1 then |
1838 if PosCount > 1 then |
1839 begin |
1839 begin |
|
1840 if (CurAmmoType = amGirder) or (CurAmmoType = amTeleport) then |
|
1841 begin |
1840 // pulsating transparency |
1842 // pulsating transparency |
1841 if ((GameTicks div 16) mod $80) >= $40 then |
1843 if ((GameTicks div 16) mod $80) >= $40 then |
1842 Tint($FF, $FF, $FF, $C0 - (GameTicks div 16) mod $40) |
1844 Tint($FF, $FF, $FF, $C0 - (GameTicks div 16) mod $40) |
1843 else |
1845 else |
1844 Tint($FF, $FF, $FF, $80 + (GameTicks div 16) mod $40); |
1846 Tint($FF, $FF, $FF, $80 + (GameTicks div 16) mod $40); |
|
1847 end; |
1845 DrawSprite(PosSprite, TargetCursorPoint.X - (SpritesData[PosSprite].Width shr 1), cScreenHeight - TargetCursorPoint.Y - (SpritesData[PosSprite].Height shr 1),i); |
1848 DrawSprite(PosSprite, TargetCursorPoint.X - (SpritesData[PosSprite].Width shr 1), cScreenHeight - TargetCursorPoint.Y - (SpritesData[PosSprite].Height shr 1),i); |
1846 Untint(); |
1849 Untint(); |
1847 end; |
1850 end; |
1848 end; |
1851 end; |
1849 DrawSprite(sprArrow, TargetCursorPoint.X, cScreenHeight - TargetCursorPoint.Y, (RealTicks shr 6) mod 8) |
1852 //DrawSprite(sprArrow, TargetCursorPoint.X, cScreenHeight - TargetCursorPoint.Y, (RealTicks shr 6) mod 8) |
|
1853 DrawTextureF(SpritesData[sprArrow].Texture, cDefaultZoomLevel / cScaleFactor, TargetCursorPoint.X + round(SpritesData[sprArrow].Width / cScaleFactor), cScreenHeight - TargetCursorPoint.Y + round(SpritesData[sprArrow].Height / cScaleFactor), (RealTicks shr 6) mod 8, 1, SpritesData[sprArrow].Width, SpritesData[sprArrow].Height); |
1850 end |
1854 end |
1851 end; |
1855 end; |
1852 |
1856 |
1853 isFirstFrame:= false |
1857 isFirstFrame:= false |
1854 end; |
1858 end; |