hedgewars/uFLSchemes.pas
branchqmlfrontend
changeset 10754 8dd1cf1be5a2
parent 10616 20a2d5e6930a
child 10757 f71275973737
equal deleted inserted replaced
10751:97d00ace1aed 10754:8dd1cf1be5a2
     9 uses uFLUtils, uFLIPC, uPhysFSLayer, uFLData;
     9 uses uFLUtils, uFLIPC, uPhysFSLayer, uFLData;
    10 
    10 
    11 const MAX_SCHEME_NAMES = 64;
    11 const MAX_SCHEME_NAMES = 64;
    12 type
    12 type
    13     TScheme = record
    13     TScheme = record
    14             schemeName: shortstring;
    14             schemeName
       
    15             , scriptparam : shortstring;
       
    16             fortsmode
       
    17             , divteams
       
    18             , solidland
       
    19             , border
       
    20             , lowgrav
       
    21             , laser
       
    22             , invulnerability
       
    23             , mines
       
    24             , vampiric
       
    25             , karma
       
    26             , artillery
       
    27             , randomorder
       
    28             , king
       
    29             , placehog
       
    30             , sharedammo
       
    31             , disablegirders
       
    32             , randomorder
       
    33             , king
       
    34             , placehog
       
    35             , sharedammo
       
    36             , disablegirders
       
    37             , randomorder
       
    38             , king
       
    39             , placehog
       
    40             , sharedammo
       
    41             , disablegirders
       
    42             , disablewind
       
    43             , morewind
       
    44             , tagteam
       
    45             , bottomborder: boolean;
       
    46             damagefactor
       
    47             , turntime
       
    48             , health
       
    49             , suddendeath
       
    50             , caseprobability
       
    51             , minestime
       
    52             , landadds
       
    53             , minedudpct
       
    54             , explosives
       
    55             , minesnum
       
    56             , healthprobability
       
    57             , healthcaseamount
       
    58             , waterrise
       
    59             , healthdecrease
       
    60             , ropepct
       
    61             , getawaytime
       
    62             , worldedge: LongInt
    15         end;
    63         end;
    16     PScheme = ^TScheme;
    64     PScheme = ^TScheme;
    17     TSchemeArray = array [0..0] of TScheme;
    65     TSchemeArray = array [0..0] of TScheme;
    18     PSchemeArray = ^TSchemeArray;
    66     PSchemeArray = ^TSchemeArray;
    19 var
    67 var
    69 
   117 
    70         pfsClose(f)
   118         pfsClose(f)
    71     end;
   119     end;
    72 {
   120 {
    73 name=AI TEST
   121 name=AI TEST
    74 fortsmode=false
   122 fortsmode
    75 divteams=false
   123 divteams
    76 solidland=false
   124 solidland
    77 border=false
   125 border
    78 lowgrav=false
   126 lowgrav
    79 laser=false
   127 laser
    80 invulnerability=false
   128 invulnerability
    81 mines=true
   129 mines
    82 damagefactor=100
   130 damagefactor=100
    83 turntime=40
   131 turntime=40
    84 health=100
   132 health=100
    85 suddendeath=0
   133 suddendeath=0
    86 caseprobability=5
   134 caseprobability=5
    87 vampiric=false
   135 vampiric
    88 karma=false
   136 karma
    89 artillery=false
   137 artillery
    90 minestime=0
   138 minestime=0
    91 landadds=4
   139 landadds=4
    92 randomorder=true
   140 randomorder
    93 king=false
   141 king
    94 placehog=false
   142 placehog
    95 sharedammo=false
   143 sharedammo
    96 disablegirders=false
   144 disablegirders
    97 minedudpct=100
   145 minedudpct=100
    98 explosives=40
   146 explosives=40
    99 disablelandobjects=true
   147 disablelandobjects
   100 aisurvival=true
   148 aisurvival
   101 resethealth=false
   149 resethealth
   102 infattack=true
   150 infattack
   103 resetweps=true
   151 resetweps
   104 perhogammo=false
   152 perhogammo
   105 minesnum=0
   153 minesnum=0
   106 healthprobability=100
   154 healthprobability=100
   107 healthcaseamount=50
   155 healthcaseamount=50
   108 waterrise=0
   156 waterrise=0
   109 healthdecrease=0
   157 healthdecrease=0
   110 disablewind=false
   158 disablewind
   111 morewind=false
   159 morewind
   112 ropepct=100
   160 ropepct=100
   113 tagteam=false
   161 tagteam
   114 getawaytime=100
   162 getawaytime=100
   115 bottomborder=false
   163 bottomborder
   116 worldedge=1
   164 worldedge=1
   117 scriptparam=@Invalid()
   165 scriptparam=@Invalid()
   118 }
   166 }
   119 end;
   167 end;
   120 
   168