hedgewars/uConsts.pas
changeset 2587 0dfa56a8513c
parent 2586 204e6b2885bc
child 2588 da9e986713d4
equal deleted inserted replaced
2586:204e6b2885bc 2587:0dfa56a8513c
    14  * You should have received a copy of the GNU General Public License
    14  * You should have received a copy of the GNU General Public License
    15  * along with this program; if not, write to the Free Software
    15  * along with this program; if not, write to the Free Software
    16  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
    16  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
    17  *)
    17  *)
    18 
    18 
       
    19 {$INCLUDE options.inc}
       
    20 
    19 unit uConsts;
    21 unit uConsts;
    20 interface
    22 interface
    21 
    23 
    22 uses
    24 uses
    23 	SDLh,
    25 	SDLh,
    26 {$ELSE}
    28 {$ELSE}
    27 	GL,
    29 	GL,
    28 {$ENDIF}
    30 {$ENDIF}
    29 	uLocale;
    31 	uLocale;
    30 
    32 
    31 {$INCLUDE options.inc}
       
    32 {$INCLUDE proto.inc}
    33 {$INCLUDE proto.inc}
    33 type
    34 type
    34 
    35 
    35 	TGameState = (gsLandGen, gsStart, gsGame, gsChat, gsConfirm, gsExit);
    36 	TGameState = (gsLandGen, gsStart, gsGame, gsChat, gsConfirm, gsExit);
    36 
    37