equal
deleted
inserted
replaced
168 gtFlake: begin |
168 gtFlake: begin |
169 with Gear^ do |
169 with Gear^ do |
170 begin |
170 begin |
171 Pos:= 0; |
171 Pos:= 0; |
172 Radius:= 1; |
172 Radius:= 1; |
173 DirAngle:= random * 360; |
173 DirAngle:= random(360); |
174 if State and gstTmpFlag = 0 then |
174 if State and gstTmpFlag = 0 then |
175 begin |
175 begin |
176 dx.isNegative:= GetRandom(2) = 0; |
176 dx.isNegative:= GetRandom(2) = 0; |
177 dx.QWordValue:= GetRandom(100000000); |
177 dx.QWordValue:= GetRandom(100000000); |
178 dy.isNegative:= false; |
178 dy.isNegative:= false; |