equal
deleted
inserted
replaced
459 vobCount:= longint(vobCount) * cScreenSpace div LAND_WIDTH; |
459 vobCount:= longint(vobCount) * cScreenSpace div LAND_WIDTH; |
460 |
460 |
461 if (cReducedQuality and rqKillFlakes) <> 0 then |
461 if (cReducedQuality and rqKillFlakes) <> 0 then |
462 vobCount:= 0; |
462 vobCount:= 0; |
463 |
463 |
464 |
464 if Theme <> 'Snow' then |
465 for i:= 0 to Pred(vobCount) do |
465 for i:= 0 to Pred(vobCount) do |
466 AddVisualGear(cLeftScreenBorder + random(cScreenSpace), random(1024+200) - 100 + LAND_HEIGHT, vgtFlake); |
466 AddVisualGear(cLeftScreenBorder + random(cScreenSpace), random(1024+200) - 100 + LAND_HEIGHT, vgtFlake) |
|
467 else |
|
468 for i:= 0 to Pred(vobCount div 3) do |
|
469 AddVisualGear(cLeftScreenBorder + random(cScreenSpace), random(1024+200) - 100 + LAND_HEIGHT, vgtFlake); |
467 |
470 |
468 Close(f); |
471 Close(f); |
469 {$I+} |
472 {$I+} |
470 TryDo(IOResult = 0, 'Bad data or cannot access file ' + cThemeCFGFilename, true); |
473 TryDo(IOResult = 0, 'Bad data or cannot access file ' + cThemeCFGFilename, true); |
471 AddProgress; |
474 AddProgress; |