th / 2)))); r1=Distance (Satelite.X, Earth.X, Satelite.Y, Earth.Y);
/ / double r2=(Ellipse.Width / 2) / (1 - exs * Math.Cos (arcAngleOffset)); _speed=Math.Sqrt (6.67384 * 5.9736 * Math.Pow (10, 13) *
((2/r1) - (1 / (Ellipse.Width / 2)))); m_speed;
} {m_speed=value; }
} double Distance (double x1, double x2, double y1, double y2)
{Math.Sqrt (Math.Abs ??((x2 - x1) * (x2 - x1) + (y2 - y1) * (y2 - y1)));
}
/ / /
/ / / Намалювати при промальовування форми
/ / /
/ / /
/ / / void Form1_Paint (object sender, System.Windows.Forms.PaintEventArgs e)
{
_DrawGraphics ();
}
/ / /
/ / / Намалювати при зміні розміру форми
/ / /
/ / /
/ / / void Form1_SizeChanged (object sender, EventArgs e)
{
_DrawGraphics ();
}
/ / /
/ / / Основна функція промальовування осей, землі і орбіти
/ / / void _DrawGraphics ()
{= this.CreateGraphics ();
/ / Задаємо нові значення ширини і висоти
Ellipse.Height=this.Size.Height - 40; Ellipse.Width=this.Size.Width - 20;. Height=50; Earth.Width=50;. X=(float) Ellipse.Focus - 20;. Y=(this.Size.Height / 2) - 20 - (int) Earth.Height / 2;
# region Робота з label'амі. Text=«Ellipse width =» + Ellipse.Width;. Text=«Ellipse height =» + Ellipse.Height;. Text=«Focus =» + Ellipse.Focus;. Text=«Form Height =» + This.Size.Height;. Text=«Form Width =» + This.Size.Width;
# endregion
/ / graphic.Clear (System.Drawing.Color.WhiteSmoke);
/ / Вісь OX.DrawLine (new Pen (Color.White, 1), 1, (this.Size.Height / 2) - 20, this.Size.Width, (this.Size. Height / 2) - 20);
/ / Елліпс.DrawEllipse (new Pen (Color.White, 1), Ellipse.X, Ellipse.Y, (float) Ellipse.Width, (float) Ellipse.Height);
/ / Земля.DrawEllipse (new Pen (Color.Aqua, 2), Earth.X, Earth.Y, (float) Earth.Width, (float) Earth.Height);. Save ( );
} void bStart_Click (object sender, EventArgs e)
{. Y=(this.Size.Height / 2) - 20 - (float) Satelite.Height / 2;=1;. lbSatX.Text=«Satelite X =» + Satelite.X.ToString ();. LbSatY.Text=«Satelite Y =» + Satelite.Y.ToString ();. Clear (Color.Black);
/ / this.BackgroundImage=global :: Kepler.Properties.Resources. n501787527cfe4;
_DrawGraphics ();
/ / Малюємо спутнік.DrawEllipse (new Pen (Color.Gray, 2), Satelite.X, Satelite.Y, (float) Satelite.Width, (float) Satelite.Height); timer= new Timer ();. Interval=275;. Interval=100;. Tick +=GlobalTimer_Tick;. Tick +=timer_Tick;. Start ()...
