| changeset 5924 | 82fc26c53d2a |
| parent 5874 | 5cd329cf2460 |
| child 6117 | 2a4829172a29 |
| 5923:ae8cfd039ab2 | 5924:82fc26c53d2a |
|---|---|
319 Frame:= 7; |
319 Frame:= 7; |
320 Angle:= 0; |
320 Angle:= 0; |
321 end; |
321 end; |
322 vgtSmoothWindBar: Tag:= hwRound(cWindSpeed * 72 / cMaxWindSpeed); |
322 vgtSmoothWindBar: Tag:= hwRound(cWindSpeed * 72 / cMaxWindSpeed); |
323 vgtStraightShot: begin |
323 vgtStraightShot: begin |
324 Angle:= 0; |
|
324 Scale:= 1.0; |
325 Scale:= 1.0; |
325 dx:= 0.001 * random(45); |
326 dx:= 0.001 * random(45); |
326 dy:= 0.001 * (random(20) + 25); |
327 dy:= 0.001 * (random(20) + 25); |
327 State:= ord(sprHealth); |
328 State:= ord(sprHealth); |
328 if random(2) = 0 then dx := -dx; |
329 if random(2) = 0 then dx := -dx; |
594 SetScale(zoom) |
595 SetScale(zoom) |
595 end |
596 end |
596 end; |
597 end; |
597 vgtStraightShot: begin |
598 vgtStraightShot: begin |
598 if Gear^.dX < 0 then i:= -1 else i:= 1; |
599 if Gear^.dX < 0 then i:= -1 else i:= 1; |
599 DrawTextureF(SpritesData[TSprite(Gear^.State)].Texture, Gear^.Scale, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Frame, i, SpritesData[TSprite(Gear^.State)].Width, SpritesData[TSprite(Gear^.State)].Height); |
600 DrawRotatedTextureF(SpritesData[TSprite(Gear^.State)].Texture, Gear^.Scale, 0, 0, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Frame, i, SpritesData[TSprite(Gear^.State)].Width, SpritesData[TSprite(Gear^.State)].Height, Gear^.Angle); |
600 end; |
601 end; |
601 end; |
602 end; |
602 if (cReducedQuality and rqAntiBoom) = 0 then |
603 if (cReducedQuality and rqAntiBoom) = 0 then |
603 case Gear^.Kind of |
604 case Gear^.Kind of |
604 vgtChunk: DrawRotatedF(sprChunk, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Frame, 1, Gear^.Angle); |
605 vgtChunk: DrawRotatedF(sprChunk, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Frame, 1, Gear^.Angle); |