| changeset 3392 | 9d5d01b52ae8 |
| parent 3390 | 1d4926d10a9e |
| child 3393 | 595655a09b26 |
| 3391:77161719ec3c | 3392:9d5d01b52ae8 |
|---|---|
27 sx:= hwRound(Gear^.X) + 1 + WorldDx; |
27 sx:= hwRound(Gear^.X) + 1 + WorldDx; |
28 sy:= hwRound(Gear^.Y) - 3 + WorldDy; |
28 sy:= hwRound(Gear^.Y) - 3 + WorldDy; |
29 |
29 |
30 if HH^.Effects[hePoisoned] then |
30 if HH^.Effects[hePoisoned] then |
31 begin |
31 begin |
32 Tint($40, $FF, $00, $40); |
32 Tint($00, $FF, $40, $40); |
33 DrawRotatedTextureF(SpritesData[sprSmokeWhite].texture, 2, 0, 0, sx, sy, 0, 1, 22, 22, (RealTicks shr 36) mod 360); |
33 DrawRotatedTextureF(SpritesData[sprSmokeWhite].texture, 2, 0, 0, sx, sy, 0, 1, 22, 22, (RealTicks shr 36) mod 360); |
34 Tint($FF, $FF, $FF, $FF) |
34 Tint($FF, $FF, $FF, $FF) |
35 end; |
35 end; |
36 |
36 |
37 if ((Gear^.State and gstWinner) <> 0) and |
37 if ((Gear^.State and gstWinner) <> 0) and |
553 end |
553 end |
554 end; |
554 end; |
555 |
555 |
556 if HH^.Effects[hePoisoned] then |
556 if HH^.Effects[hePoisoned] then |
557 begin |
557 begin |
558 Tint($40, $FF, $00, $80); |
558 Tint($00, $FF, $40, $80); |
559 DrawRotatedTextureF(SpritesData[sprSmokeWhite].texture, 1.5, 0, 0, sx, sy, 0, 1, 22, 22, 360 - (RealTicks shr 37) mod 360); |
559 DrawRotatedTextureF(SpritesData[sprSmokeWhite].texture, 1.5, 0, 0, sx, sy, 0, 1, 22, 22, 360 - (RealTicks shr 37) mod 360); |
560 end; |
560 end; |
561 |
561 |
562 if Gear^.Invulnerable then |
562 if Gear^.Invulnerable then |
563 begin |
563 begin |