hedgewars/uAIActions.pas
changeset 6393 701eb3f3556a
parent 5419 2fed5e26ff7d
child 6395 bb04d7a9f7e2
equal deleted inserted replaced
6392:f2ef5a8cccb4 6393:701eb3f3556a
    28       aia_Right      = 2;
    28       aia_Right      = 2;
    29       aia_Timer      = 3;
    29       aia_Timer      = 3;
    30       aia_attack     = 4;
    30       aia_attack     = 4;
    31       aia_Up         = 5;
    31       aia_Up         = 5;
    32       aia_Down       = 6;
    32       aia_Down       = 6;
       
    33       aia_Switch     = 7;
    33 
    34 
    34       aia_Weapon     = $8000;
    35       aia_Weapon     = $8000;
    35       aia_WaitXL     = $8001;
    36       aia_WaitXL     = $8001;
    36       aia_WaitXR     = $8002;
    37       aia_WaitXR     = $8002;
    37       aia_LookLeft   = $8003;
    38       aia_LookLeft   = $8003;
    62 procedure ProcessAction(var Actions: TActions; Me: PGear);
    63 procedure ProcessAction(var Actions: TActions; Me: PGear);
    63 
    64 
    64 implementation
    65 implementation
    65 uses uAIMisc, uAI, uAmmos, uVariables, uCommands, uUtils, uDebug, uIO;
    66 uses uAIMisc, uAI, uAmmos, uVariables, uCommands, uUtils, uDebug, uIO;
    66 
    67 
    67 const ActionIdToStr: array[0..6] of string[16] = (
    68 const ActionIdToStr: array[0..7] of string[16] = (
    68 {aia_none}           '',
    69 {aia_none}           '',
    69 {aia_Left}           'left',
    70 {aia_Left}           'left',
    70 {aia_Right}          'right',
    71 {aia_Right}          'right',
    71 {aia_Timer}          'timer',
    72 {aia_Timer}          'timer',
    72 {aia_attack}         'attack',
    73 {aia_attack}         'attack',
    73 {aia_Up}             'up',
    74 {aia_Up}             'up',
    74 {aia_Down}           'down'
    75 {aia_Down}           'down',
       
    76 {aia_Switch}         'switch'
    75                      );
    77                      );
    76 
    78 
    77 {$IFDEF TRACEAIACTIONS}
    79 {$IFDEF TRACEAIACTIONS}
    78 const SpecActionIdToStr: array[$8000..$8009] of string[16] = (
    80 const SpecActionIdToStr: array[$8000..$8009] of string[16] = (
    79 {aia_Weapon}             'aia_Weapon',
    81 {aia_Weapon}             'aia_Weapon',