branch | 0.9.14 |
changeset 4253 | 160f987a5d9f |
parent 4251 | 4b7d3507d175 |
child 4295 | 1f5604cd99be |
child 4314 | 8c7f9de9a978 |
4251:4b7d3507d175 | 4253:160f987a5d9f |
---|---|
538 gear^.Timer:= 5000; |
538 gear^.Timer:= 5000; |
539 gear^.dY:= int2hwfloat(-4 + longint(getRandom(8))) / 1000; |
539 gear^.dY:= int2hwfloat(-4 + longint(getRandom(8))) / 1000; |
540 end; |
540 end; |
541 gtResurrector: begin |
541 gtResurrector: begin |
542 gear^.Radius := 100; |
542 gear^.Radius := 100; |
543 gear^.Tag := 0 |
|
543 end; |
544 end; |
544 gtWaterUp: begin |
545 gtWaterUp: begin |
545 gear^.Tag := 47; |
546 gear^.Tag := 47; |
546 end; |
547 end; |
547 end; |
548 end; |