Guest User

Untitled

a guest
Feb 16th, 2013
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Delphi 0.66 KB | None | 0 0
  1. const
  2.   InitialVelocityXFactorNum = -40;
  3.   InitialVelocityXFactorDem = 1000;
  4.   InitialVelocityYFactorNum = -40;
  5.   InitialVelocityYFactorDem = 1000;
  6.   InitialVelocityY = 0;
  7.   InitialVelocityYAddition = -50;
  8.   RowPause = 300;
  9.   RowSpacing = 0;
  10.   ColSpacing = 4000;
  11.   ColCount = 32;
  12.   RowCount = 40;
  13.   FirstRow = -350000;
  14.   AimingCount = 5;
  15.   AimingPauses: array [0..AimingCount-1] of Integer = (1000, 2000, 3000, 4000, 5000);
  16.   AimingDispersions: array [0..AimingCount-1] of Extended = (Pi * 1 / ColCount, Pi * 1 / ColCount, Pi * 1 / ColCount, Pi * 1 / ColCount, Pi * 1 / ColCount);
  17.   AimingSpeeds: array [0..AimingCount-1] of Double = (1200, 1000, 800, 600, 400);
Advertisement
Add Comment
Please, Sign In to add comment