private function solveBalls ( MCBallA:MovieClip, MCBallB:MovieClip ) : void

                {

                        var nX1:Number = MCBallA.x;

                        var nY1:Number = MCBallA.y;

                        var nDistX:Number = MCBallB.x - nX1;

                        var nDistY:Number = MCBallB.y - nY1;

 

                        var nDistance:Number = Math.sqrt ( nDistX * nDistX + nDistY * nDistY );

                        var nRadiusA:Number = MCBallA.width/2;

                        var nRadiusB:Number = MCBallB.width/2;

                        //var nRadius:Number = 10;

 

                        var nNormalX:Number = nDistX/nDistance;

                        var nNormalY:Number = nDistY/nDistance;

 

                        var nMidpointX:Number = ( nX1 + MCBallB.x )/2;

                        var nMidpointY:Number = ( nY1 + MCBallB.y )/2;

 

                        MCBallA.x = nMidpointX - nNormalX * nRadiusA;

                        MCBallA.y = nMidpointY - nNormalY * nRadiusA;

                        MCBallB.x = nMidpointX + nNormalX * nRadiusB;

                        MCBallB.y = nMidpointY + nNormalY * nRadiusB;

 

                        var nVector:Number = ( ( MCBallA.nSpeedX - MCBallB.nSpeedX ) * nNormalX )+ ( ( MCBallA.nSpeedY - MCBallB.nSpeedY ) * nNormalY );

                        var nVelX:Number = nVector * nNormalX;

                        var nVelY:Number = nVector * nNormalY;

 

                        MCBallA.nSpeedX -= nVelX;

                        MCBallA.nSpeedY -= nVelY;

                        MCBallB.nSpeedX += nVelX;

                        MCBallB.nSpeedY += nVelY;

                }

// начальная позиция шара А

var nX1:Number = MCBallA.x; // Х

var nY1:Number = MCBallA.y; // Y

 

// вектор направления (от шара А к шару Б)

var nDistX:Number = MCBallB.x - nX1; // X

var nDistY:Number = MCBallB.y - nY1; // Y

 

// расстояния между шарами

var nDistance:Number = Math.sqrt ( nDistX * nDistX + nDistY * nDistY );

// радиус шара А

var nRadiusA:Number = MCBallA.width/2;

// радиус шара Б

var nRadiusB:Number = MCBallB.width/2;

 

// нормаль направления (от шара А к шару Б)

var nNormalX:Number = nDistX/nDistance; // Х

var nNormalY:Number = nDistY/nDistance; // Y

 

// средняя точка между шарами

var nMidpointX:Number = ( nX1 + MCBallB.x )/2; // Х

var nMidpointY:Number = ( nY1 + MCBallB.y )/2; // Y

 

// позиционируем шар А и Б так, чтобы они не пересекались.

// Средняя точка +/- нормаль*радиус

// Шар А

MCBallA.x = nMidpointX - nNormalX * nRadiusA; 

MCBallA.y = nMidpointY - nNormalY * nRadiusA;

// Шар Б

MCBallB.x = nMidpointX + nNormalX * nRadiusB;

MCBallB.y = nMidpointY + nNormalY * nRadiusB;

 

// Скалярное произведение вектора разности скорости на нормаль направления (от шара А к шару Б)

// Т.е. вычисляется общая скорость сближения с учетом направлений движения шаров

var nVector:Number = ( ( MCBallA.nSpeedX - MCBallB.nSpeedX ) * nNormalX )+ ( ( MCBallA.nSpeedY - MCBallB.nSpeedY ) * nNormalY );

 

// Перевод скорости сближения в вектор

var nVelX:Number = nVector * nNormalX;

var nVelY:Number = nVector * nNormalY;

 

// Вычисление новых скоростей для шаров, после соударения

// Для шара А - вычитаем

MCBallA.nSpeedX -= nVelX;

MCBallA.nSpeedY -= nVelY;

// Для шара Б - прибавляем

MCBallB.nSpeedX += nVelX;

MCBallB.nSpeedY += nVelY;