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

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

    35 

    35 

    36 implementation

    36 implementation

    37 {$IFDEF HWLIBRARY}

    37 {$IFDEF HWLIBRARY}

    38 var cZoomVal: GLfloat;

    38 var cZoomVal: GLfloat;

    39 

    40 

    40 // retrieve protocol information

    41 // retrieve protocol information

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

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

    42 begin

    43 begin

    43     netProto^:= cNetProtoVersion;

    44     netProto^:= cNetProtoVersion;

   180 end;

   181 end;

   181 

   182 

   182 function HW_isPaused: boolean; cdecl; export;

   183 function HW_isPaused: boolean; cdecl; export;

   183 begin

   184 begin

   184     exit( isPaused );

   185     exit( isPaused );

   185 end;

   197 end;

   186 

   198 

   187 // equivalent to esc+y; when closeFrontend = true the game exits after memory cleanup

   199 // equivalent to esc+y; when closeFrontend = true the game exits after memory cleanup

   188 procedure HW_terminate(closeFrontend: boolean); cdecl; export;

   200 procedure HW_terminate(closeFrontend: boolean); cdecl; export;

   189 begin

   201 begin