30 interface

    30 interface

    31 uses uTypes, uConsts, uVariables, GLunit, uKeys, uSound, uAmmos, uUtils, uCommands;

    31 uses uTypes, uConsts, uVariables, GLunit, uKeys, uSound, uAmmos, uUtils, uCommands;

    32 

    32 

    33 {$INCLUDE "config.inc"}

    33 {$INCLUDE "config.inc"}

    34 procedure HW_versionInfo(netProto: PLongInt; versionStr: PPChar); cdecl; export;

    34 procedure HW_versionInfo(netProto: PLongInt; versionStr: PPChar); cdecl; export;

    35 

    38 

    36 implementation

    39 implementation

    37 {$IFDEF HWLIBRARY}

    40 {$IFDEF HWLIBRARY}

    38 var cZoomVal: GLfloat;

    41 var cZoomVal: GLfloat;

    39     previousGameState: TGameState;

    42     previousGameState: TGameState;