changeset 4380 | b78638b36b89 |
parent 4379 | 6cd6b77df8b8 |
child 4390 | f219628ed666 |
4379:6cd6b77df8b8 | 4380:b78638b36b89 |
---|---|
32 procedure DeleteVisualGear(Gear: PVisualGear); |
32 procedure DeleteVisualGear(Gear: PVisualGear); |
33 procedure AddClouds; |
33 procedure AddClouds; |
34 procedure AddDamageTag(X, Y, Damage, Color: LongWord); |
34 procedure AddDamageTag(X, Y, Damage, Color: LongWord); |
35 |
35 |
36 implementation |
36 implementation |
37 uses uMisc, uStore, uSound, uMobile, uVariables, uTextures, uRender, uUtils, Math; |
37 uses uMisc, uStore, uSound, uMobile, uVariables, uTextures, uRender, uUtils, Math, uRenderUtils; |
38 |
38 |
39 const cExplFrameTicks = 110; |
39 const cExplFrameTicks = 110; |
40 |
40 |
41 {$INCLUDE "VGSHandlers.inc"} |
41 {$INCLUDE "VGSHandlers.inc"} |
42 |
42 |