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 4359 83ef50815535
parent 4357 a1fcfc341a52
child 4373 fe0e3903bb9e
equal deleted inserted replaced
4357:a1fcfc341a52 4359:83ef50815535 
    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 uMisc, uConsole, uAIMisc, uAI, uAmmos;
 
    65 uses uMisc, uConsole, uAIMisc, uAI, uAmmos, uVariables;
 
    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