84 {aia_Up} 'up', |
84 {aia_Up} 'up', |
85 {aia_Down} 'down' |
85 {aia_Down} 'down' |
86 ); |
86 ); |
87 |
87 |
88 {$IFDEF TRACEAIACTIONS} |
88 {$IFDEF TRACEAIACTIONS} |
89 const SpecActionIdToStr: array[$80000000..$80000006] of string[16] = ( |
89 const SpecActionIdToStr: array[$80000000..$80000008] of string[16] = ( |
90 {aia_Weapon} 'aia_Weapon', |
90 {aia_Weapon} 'aia_Weapon', |
91 {aia_WaitX} 'aia_WaitX', |
91 {aia_WaitX} 'aia_WaitX', |
92 {aia_WaitY} 'aia_WaitY', |
92 {aia_WaitY} 'aia_WaitY', |
93 {aia_LookLeft} 'aia_LookLeft', |
93 {aia_LookLeft} 'aia_LookLeft', |
94 {aia_LookRight} 'aia_LookRight', |
94 {aia_LookRight} 'aia_LookRight', |
95 {aia_AwareExpl} 'aia_AwareExpl', |
95 {aia_AwareExpl} 'aia_AwareExpl', |
96 {aia_HJump} 'aia_HJump', |
96 {aia_HJump} 'aia_HJump', |
97 {aia_LJump} 'aia_LJump' |
97 {aia_LJump} 'aia_LJump', |
|
98 {aia_Skip} 'aia_Skip' |
98 ); |
99 ); |
99 |
100 |
100 procedure DumpAction(Action: TAction; Me: PGear); |
101 procedure DumpAction(Action: TAction; Me: PGear); |
101 begin |
102 begin |
102 if (Action.Action and ai_specmask) = 0 then |
103 if (Action.Action and ai_specmask) = 0 then |