equal
deleted
inserted
replaced
175 Radius:= 1; |
175 Radius:= 1; |
176 DirAngle:= random(360); |
176 DirAngle:= random(360); |
177 if State and gstTmpFlag = 0 then |
177 if State and gstTmpFlag = 0 then |
178 begin |
178 begin |
179 dx.isNegative:= GetRandom(2) = 0; |
179 dx.isNegative:= GetRandom(2) = 0; |
180 dx.QWordValue:= GetRandom(100000000); |
180 dx.QWordValue:= $40DA*GetRandom(10000)*8; |
181 dy.isNegative:= false; |
181 dy.isNegative:= false; |
182 dy.QWordValue:= GetRandom(70000000); |
182 dy.QWordValue:= $3AD3*GetRandom(7000)*8; |
183 if GetRandom(2) = 0 then |
183 if GetRandom(2) = 0 then |
184 dx := -dx |
184 dx := -dx |
185 end; |
185 end; |
186 State:= State or gstInvisible; |
186 State:= State or gstInvisible; |
187 Health:= random(vobFrameTicks); |
187 Health:= random(vobFrameTicks); |
188 Timer:= random(vobFramesCount); |
188 Timer:= random(vobFramesCount); |
189 Angle:= (random(2) * 2 - 1) * (1 + random(10000)) * vobVelocity |
189 Damage:= (random(2) * 2 - 1) * (vobVelocity + random(vobVelocity)) * 8; |
190 end |
190 end |
191 end; |
191 end; |
192 gtGrave: begin |
192 gtGrave: begin |
193 gear^.ImpactSound:= sndGraveImpact; |
193 gear^.ImpactSound:= sndGraveImpact; |
194 gear^.nImpactSounds:= 1; |
194 gear^.nImpactSounds:= 1; |