hedgewars/uAIActions.pas
changeset 195 edae828322a0
parent 194 88652abdce9a
child 280 4d6e365befc1
equal deleted inserted replaced
194:88652abdce9a 195:edae828322a0
    27       aia_Timer      = 3;
    27       aia_Timer      = 3;
    28       aia_attack     = 4;
    28       aia_attack     = 4;
    29       aia_Up         = 5;
    29       aia_Up         = 5;
    30       aia_Down       = 6;
    30       aia_Down       = 6;
    31 
    31 
    32       aia_Weapon     = $80000000;
    32       aia_Weapon     = $8000;
    33       aia_WaitXL     = $80000001;
    33       aia_WaitXL     = $8001;
    34       aia_WaitXR     = $80000002;
    34       aia_WaitXR     = $8002;
    35       aia_LookLeft   = $80000003;
    35       aia_LookLeft   = $8003;
    36       aia_LookRight  = $80000004;
    36       aia_LookRight  = $8004;
    37       aia_AwareExpl  = $80000005;
    37       aia_AwareExpl  = $8005;
    38       aia_HJump      = $80000006;
    38       aia_HJump      = $8006;
    39       aia_LJump      = $80000007;
    39       aia_LJump      = $8007;
    40       aia_Skip       = $80000008;
    40       aia_Skip       = $8008;
    41       aia_Wait       = $80000009;
    41       aia_Wait       = $8009;
    42 
    42 
    43       aim_push       = $80000000;
    43       aim_push       = $8000;
    44       aim_release    = $80000001;
    44       aim_release    = $8001;
    45       ai_specmask    = $80000000;
    45       ai_specmask    = $8000;
    46 
    46 
    47 type TAction = record
    47 type TAction = record
    48                Action, Param: Longword;
    48                Action, Param: Longword;
    49                X, Y: integer;
    49                X, Y: integer;
    50                Time: Longword;
    50                Time: Longword;
    70 {aia_Up}             'up',
    70 {aia_Up}             'up',
    71 {aia_Down}           'down'
    71 {aia_Down}           'down'
    72                      );
    72                      );
    73 
    73 
    74 {$IFDEF TRACEAIACTIONS}
    74 {$IFDEF TRACEAIACTIONS}
    75 const SpecActionIdToStr: array[$80000000..$80000009] of string[16] = (
    75 const SpecActionIdToStr: array[$8000..$8009] of string[16] = (
    76 {aia_Weapon}             'aia_Weapon',
    76 {aia_Weapon}             'aia_Weapon',
    77 {aia_WaitX}              'aia_WaitX',
    77 {aia_WaitX}              'aia_WaitX',
    78 {aia_WaitY}              'aia_WaitY',
    78 {aia_WaitY}              'aia_WaitY',
    79 {aia_LookLeft}           'aia_LookLeft',
    79 {aia_LookLeft}           'aia_LookLeft',
    80 {aia_LookRight}          'aia_LookRight',
    80 {aia_LookRight}          'aia_LookRight',