hedgewars/uFLTypes.pas
branchqmlfrontend
changeset 10819 57e21f7621b0
parent 10452 03519fd9f98d
child 10888 a04e04aaf599
equal deleted inserted replaced
10817:48a53259fad8 10819:57e21f7621b0
    31             hedgehogs: array[0..7] of THedgehog;
    31             hedgehogs: array[0..7] of THedgehog;
    32             hogsNumber: Longword;
    32             hogsNumber: Longword;
    33         end;
    33         end;
    34     PTeam = ^TTeam;
    34     PTeam = ^TTeam;
    35 
    35 
       
    36     TScheme = record
       
    37             schemeName
       
    38             , scriptparam : shortstring;
       
    39             fortsmode
       
    40             , divteams
       
    41             , solidland
       
    42             , border
       
    43             , lowgrav
       
    44             , laser
       
    45             , invulnerability
       
    46             , mines
       
    47             , vampiric
       
    48             , karma
       
    49             , artillery
       
    50             , randomorder
       
    51             , king
       
    52             , placehog
       
    53             , sharedammo
       
    54             , disablegirders
       
    55             , disablewind
       
    56             , morewind
       
    57             , tagteam
       
    58             , bottomborder: boolean;
       
    59             damagefactor
       
    60             , turntime
       
    61             , health
       
    62             , suddendeath
       
    63             , caseprobability
       
    64             , minestime
       
    65             , landadds
       
    66             , minedudpct
       
    67             , explosives
       
    68             , minesnum
       
    69             , healthprobability
       
    70             , healthcaseamount
       
    71             , waterrise
       
    72             , healthdecrease
       
    73             , ropepct
       
    74             , getawaytime
       
    75             , worldedge: LongInt
       
    76         end;
       
    77     PScheme = ^TScheme;
       
    78 
    36 implementation
    79 implementation
    37 
    80 
    38 end.
    81 end.