equal
deleted
inserted
replaced
818 begin |
818 begin |
819 with PHedgehog(Gear^.Hedgehog)^ do |
819 with PHedgehog(Gear^.Hedgehog)^ do |
820 begin |
820 begin |
821 if not (((Ammoz[Ammo^[CurSlot, CurAmmo].AmmoType].Ammo.Propz and ammoprop_AltUse) <> 0) and ((Gear^.State and gstAttacked) = 0)) then |
821 if not (((Ammoz[Ammo^[CurSlot, CurAmmo].AmmoType].Ammo.Propz and ammoprop_AltUse) <> 0) and ((Gear^.State and gstAttacked) = 0)) then |
822 exit; |
822 exit; |
823 |
823 DrawTexture(round(sx + 16), round(sy + 16), ropeIconTex); |
824 //r.x:= ((ord(Ammo^[CurSlot, CurAmmo].AmmoType) - 1) shr 5) * 32; |
824 DrawTextureF(SpritesData[sprAMAmmos].Texture, 0.75, round(sx + 30), round(sy + 30), ord(Ammo^[CurSlot, CurAmmo].AmmoType) - 1, 1, 32, 32); |
825 //r.y:= ((ord(Ammo^[CurSlot, CurAmmo].AmmoType) - 1) mod 32) * 32; |
|
826 //r.w:= 32; |
|
827 //r.h:= 32; |
|
828 DrawTexture(sx + 16, sy + 16, ropeIconTex); |
|
829 //DrawFromRect(sx + 18, sy + 18, @r, SpritesData[sprAMAmmos].Texture); |
|
830 DrawTextureF(SpritesData[sprAMAmmos].Texture, 0.75, sx + 30, sy + 30, ord(Ammo^[CurSlot, CurAmmo].AmmoType) - 1, 1, 32, 32); |
|
831 end; |
825 end; |
832 end; |
826 end; |
833 |
827 |
834 procedure DrawHH(Gear: PGear); |
828 procedure DrawHH(Gear: PGear); |
835 var i, t: LongInt; |
829 var i, t: LongInt; |