equal
deleted
inserted
replaced
660 end; |
660 end; |
661 defaultPos:= false |
661 defaultPos:= false |
662 end; |
662 end; |
663 gtBlowTorch: |
663 gtBlowTorch: |
664 begin |
664 begin |
665 DrawSpriteRotated(sprBlowTorch, hx, hy, sign, aangle); |
665 sign:= CurAmmoGear^.Tag; |
666 DrawHedgehog(sx, sy, |
666 DrawSpriteRotated(sprBlowTorch, ox + 8 * sign, oy - 2, sign, aangle); |
|
667 DrawHedgehog(ox + 1, oy - 3, |
667 sign, |
668 sign, |
668 3, |
669 3, |
669 HH^.visStepPos div 2, |
670 HH^.visStepPos div 2, |
670 0); |
671 0); |
671 with HH^ do |
672 with HH^ do |
672 if (curhat <> nil) then |
673 if (curhat <> nil) then |
673 begin |
674 begin |
674 DrawTextureF(curhat, |
675 DrawTextureF(curhat, |
675 1, |
676 1, |
676 sx, |
677 ox + 1, |
677 sy - 5, |
678 oy - 8, |
678 0, |
679 0, |
679 sign, |
680 sign, |
680 32, |
681 32, |
681 32); |
682 32); |
682 if (curhat^.w > 64) or ((curhat^.w = 64) and (curhat^.h = 32)) then |
683 if (curhat^.w > 64) or ((curhat^.w = 64) and (curhat^.h = 32)) then |
686 else |
687 else |
687 tx := 32; |
688 tx := 32; |
688 Tint(HH^.Team^.Clan^.Color shl 8 or $FF); |
689 Tint(HH^.Team^.Clan^.Color shl 8 or $FF); |
689 DrawTextureF(curhat, |
690 DrawTextureF(curhat, |
690 1, |
691 1, |
691 sx, |
692 ox + 1, |
692 sy - 5, |
693 oy - 8, |
693 tx, |
694 tx, |
694 sign, |
695 sign, |
695 32, |
696 32, |
696 32); |
697 32); |
697 untint |
698 untint |
698 end |
699 end |
699 end; |
700 end; |
700 defaultPos:= false |
701 defaultPos:= false; |
|
702 sign:= hwSign(Gear^.dX); |
701 end; |
703 end; |
702 gtFirePunch: |
704 gtFirePunch: |
703 begin |
705 begin |
704 DrawHedgehog(sx, sy, |
706 DrawHedgehog(sx, sy, |
705 sign, |
707 sign, |