hedgewars/uVisualGears.pas
branchwebgl
changeset 8444 75db7bb8dce8
parent 8330 aaefa587e277
parent 8370 0c79946e96f8
child 9127 e350500c4edb
equal deleted inserted replaced
8340:46a9fde631f4 8444:75db7bb8dce8
    55 implementation
    55 implementation
    56 uses uSound, uVariables, uTextures, uRender, Math, uRenderUtils, uStore, uUtils;
    56 uses uSound, uVariables, uTextures, uRender, Math, uRenderUtils, uStore, uUtils;
    57 
    57 
    58 const
    58 const
    59     cExplFrameTicks = 110;
    59     cExplFrameTicks = 110;
    60     cSmokeZ = 499;
    60     //cSmokeZ = 499;
    61 var VGCounter: LongWord;
    61 var VGCounter: LongWord;
    62     VisualGearLayers: array[0..6] of PVisualGear;
    62     VisualGearLayers: array[0..6] of PVisualGear;
    63 
    63 
    64 // For better maintainability the step handlers of visual gears are stored
    64 // For better maintainability the step handlers of visual gears are stored
    65 // in a separate file.
    65 // in a separate file.