hedgewars/uConsts.pas
changeset 1022 f6a3fcb329ca
parent 1011 4fe2c4c57d10
child 1033 622c5de38d72
equal deleted inserted replaced
1021:a6dcb1412a29 1022:f6a3fcb329ca
    21 uses SDLh, GL, uLocale;
    21 uses SDLh, GL, uLocale;
    22 {$INCLUDE options.inc}
    22 {$INCLUDE options.inc}
    23 {$INCLUDE proto.inc}
    23 {$INCLUDE proto.inc}
    24 type
    24 type
    25 
    25 
    26      TGameState = (gsLandGen, gsStart, gsGame, gsChat, gsExit);
    26      TGameState = (gsLandGen, gsStart, gsGame, gsChat, gsConfirm, gsExit);
    27 
    27 
    28      TGameType  = (gmtLocal, gmtDemo, gmtNet, gmtSave, gmtLandPreview);
    28      TGameType  = (gmtLocal, gmtDemo, gmtNet, gmtSave, gmtLandPreview);
    29 
    29 
    30      TPathType  = (ptNone, ptData, ptGraphics, ptThemes, ptCurrTheme, ptTeams, ptMaps,
    30      TPathType  = (ptNone, ptData, ptGraphics, ptThemes, ptCurrTheme, ptTeams, ptMaps,
    31                    ptMapCurrent, ptDemos, ptSounds, ptGraves, ptFonts, ptForts,
    31                    ptMapCurrent, ptDemos, ptSounds, ptGraves, ptFonts, ptForts,