changeset 2608 | cebfea02f8b5 |
parent 2605 | a40a7c90ffd8 |
child 2630 | 079ef82eac75 |
2607:dbeaba78e676 | 2608:cebfea02f8b5 |
---|---|
110 end |
110 end |
111 end; |
111 end; |
112 if a = High(TAmmoType) then a:= Low(TAmmoType) |
112 if a = High(TAmmoType) then a:= Low(TAmmoType) |
113 else inc(a) |
113 else inc(a) |
114 until (a = aa) or |
114 until (a = aa) or |
115 (CurrentHedgehog^.AttacksNum > 0) or |
115 (CurrentHedgehog^.MultiShootAttacks > 0) or // shooting same weapon |
116 StopThinking |
116 StopThinking |
117 end |
117 end |
118 end; |
118 end; |
119 |
119 |
120 procedure Walk(Me: PGear); |
120 procedure Walk(Me: PGear); |