equal
deleted
inserted
replaced
170 if random(2) = 0 then dx := -dx; |
170 if random(2) = 0 then dx := -dx; |
171 dAngle:= (random(2) * 2 - 1) * (1 + random) * vobVelocity / 1000 |
171 dAngle:= (random(2) * 2 - 1) * (1 + random) * vobVelocity / 1000 |
172 end; |
172 end; |
173 vgtCloud: begin |
173 vgtCloud: begin |
174 Frame:= random(4); |
174 Frame:= random(4); |
175 dx:= 0.000005 * random(10000); |
175 dx:= 0.5 + 0.1 * random(5); // how much the cloud will be affected by wind |
176 if random(2) = 0 then dx := -dx; |
|
177 timer:= random(4096); |
176 timer:= random(4096); |
178 end; |
177 end; |
179 vgtExplPart, |
178 vgtExplPart, |
180 vgtExplPart2: begin |
179 vgtExplPart2: begin |
181 t:= random(1024); |
180 t:= random(1024); |