Mercurial Mercurial > hedgewars / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uAIActions.pas
changeset 4414 cb90b7f82cd5
parent 4403 0dfe26f48ec1
child 4976 088d40d8aba2
equal deleted inserted replaced
4413:46caab3a8f84 4414:cb90b7f82cd5 
    60 
    60 
    61 procedure AddAction(var Actions: TActions; Action: Longword; Param: LongInt; TimeDelta: Longword; X, Y: LongInt);
 
    61 procedure AddAction(var Actions: TActions; Action: Longword; Param: LongInt; TimeDelta: Longword; X, Y: LongInt);
 
    62 procedure ProcessAction(var Actions: TActions; Me: PGear);
 
    62 procedure ProcessAction(var Actions: TActions; Me: PGear);
 
    63 
    63 
    64 implementation
 
    64 implementation
 
    65 uses uAIMisc, uAI, uAmmos, uVariables, uCommands, uUtils, uDebug;
 
    65 uses uAIMisc, uAI, uAmmos, uVariables, uCommands, uUtils, uDebug, uIO;
 
    66 
    66 
    67 const ActionIdToStr: array[0..6] of string[16] = (
 
    67 const ActionIdToStr: array[0..6] of string[16] = (
 
    68 {aia_none}           '',
 
    68 {aia_none}           '',
 
    69 {aia_Left}           'left',
 
    69 {aia_Left}           'left',
 
    70 {aia_Right}          'right',
 
    70 {aia_Right}          'right',
hedgewars