hedgewars/fConsts.pas
changeset 25 27aa8030322b
parent 24 79c411363184
child 26 e32fa14529f8
equal deleted inserted replaced
24:79c411363184 25:27aa8030322b
     1 (*
       
     2  * Hedgewars, a worms-like game
       
     3  * Copyright (c) 2004, 2005 Andrey Korotaev <unC0Rr@gmail.com>
       
     4  *
       
     5  * Distributed under the terms of the BSD-modified licence:
       
     6  *
       
     7  * Permission is hereby granted, free of charge, to any person obtaining a copy
       
     8  * of this software and associated documentation files (the "Software"), to deal
       
     9  * with the Software without restriction, including without limitation the
       
    10  * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
       
    11  * sell copies of the Software, and to permit persons to whom the Software is
       
    12  * furnished to do so, subject to the following conditions:
       
    13  *
       
    14  * 1. Redistributions of source code must retain the above copyright notice,
       
    15  *    this list of conditions and the following disclaimer.
       
    16  * 2. Redistributions in binary form must reproduce the above copyright notice,
       
    17  *    this list of conditions and the following disclaimer in the documentation
       
    18  *    and/or other materials provided with the distribution.
       
    19  * 3. The name of the author may not be used to endorse or promote products
       
    20  *    derived from this software without specific prior written permission.
       
    21  *
       
    22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
       
    23  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
       
    24  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO
       
    25  * EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
       
    26  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
       
    27  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
       
    28  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
       
    29  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
       
    30  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
       
    31  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
       
    32  *)
       
    33 
       
    34 unit fConsts;
       
    35 interface
       
    36 
       
    37 const cAppName  = '†Hedge Wars Logon†';
       
    38       cAppTitle = 'HEDGEWARS';
       
    39       cOptionsName  = 'Team Options';
       
    40       cOptionsTitle = 'Team Options';
       
    41       cGFXPath  = 'Data\front\';
       
    42 
       
    43       cLocalGameBtn = 1001;
       
    44       cNetGameBtn   = 1002;
       
    45       cDemoBtn      = 1003;
       
    46       cSettingsBtn  = 1004;
       
    47       cExitGameBtn  = 1005;
       
    48 
       
    49       cNetIpEdit    = 1021;
       
    50       cNetIpStatic  = 1022;
       
    51       cNetNameEdit  = 1023;
       
    52       cNetNameStatic= 1024;
       
    53       cNetConnStatic= 1024;
       
    54       cNetJoinBtn   = 1025;
       
    55       cNetBeginBtn  = 1026;
       
    56       cNetBackBtn   = 1027;
       
    57 
       
    58       cDemoList     = 1031;
       
    59       cDemoBeginBtn = 1032;
       
    60       cDemoBackBtn  = 1033;
       
    61       cDemoAllBtn   = 1034;
       
    62 
       
    63       cSetResEdit   = 1041;
       
    64       cSetFScrCheck = 1042;
       
    65       cSetDemoCheck = 1043;
       
    66       cSetSndCheck  = 1044;
       
    67       cSetSaveBtn   = 1045;
       
    68       cSetBackBtn   = 1046;
       
    69       cSetShowTeamOptions = 1047;
       
    70 
       
    71       cBGStatic     = 1199;
       
    72       cOptBGStatic  = 1198;
       
    73 
       
    74       cOptTeamName  = 1201;
       
    75       cOptHedgeName : array[0..7] of integer = (1202,1203,1204,1205,1206,1207,1208,1209); 
       
    76 
       
    77       cDemoSeedSeparator = #10;
       
    78 
       
    79 
       
    80 implementation
       
    81 
       
    82 end.