equal
deleted
inserted
replaced
5195 end; |
5195 end; |
5196 |
5196 |
5197 //////////////////////////////////////////////////////////////////////////////// |
5197 //////////////////////////////////////////////////////////////////////////////// |
5198 procedure doStepPoisonCloud(Gear: PGear); |
5198 procedure doStepPoisonCloud(Gear: PGear); |
5199 begin |
5199 begin |
5200 WorldWrap(Gear); |
5200 // don't bounce |
|
5201 if WorldEdge <> weBounce then |
|
5202 WorldWrap(Gear); |
5201 if Gear^.Timer = 0 then |
5203 if Gear^.Timer = 0 then |
5202 begin |
5204 begin |
5203 DeleteGear(Gear); |
5205 DeleteGear(Gear); |
5204 exit |
5206 exit |
5205 end; |
5207 end; |