Alejandro Quarto

import flash.display.BitmapData;
var myBitmapData:BitmapData = new BitmapData(Stage.width, Stage.height, false, 0x0ffffff);
var mc:MovieClip = this.createEmptyMovieClip("mc", this.getNextHighestDepth());
mc._alpha=0
mc.attachBitmap(myBitmapData,this.getNextHighestDepth());
///Limites horizontales y verticales
Maxx = 1;
Minx = -2
Maxy = 1.5;
Miny = -1.5;
initer = 100;//Numero de iteraciones, a mayor valor, mas detalle
i = 0;//Var para el loop
j = 0;//Idem
scrsizex = Stage.width;//Tamaño de pantalla
scrsizey = Stage.height;//IDEM
pixcorx = (Maxx-Minx)/scrsizex;//ESCALA
pixcory = (Maxy-Miny)/scrsizey;//IDEM
function mandel(xpt, ypt) {
	x = 0;
	y = 0;
	xnew = 0;
	ynew = 0;
	for (k=0; k<=initer; k++) {
		xnew = x*x-y*y+xpt*pixcorx+Minx
		ynew = (2*x*y+Maxy-ypt*pixcory);
		x = xnew;
		y = ynew;
		if ((x*x+y*y)>4) {
			break;
		}
	}
	color = k;
	if (k>=initer) {
		myBitmapData.setPixel(xpt,ypt,parseInt("0xFFFFFF"));
	} else {
		miColor = Number(255-(Math.abs(Math.cos((color*color)/180*Math.PI)*Math.sin((color*color)/180*Math.PI)*255))).toString(16);
		if (String(miColor).length<2) {
			miColor = "0"+miColor;
		}
		miRgb = "0xff"+miColor+miColor
		myBitmapData.setPixel(xpt,ypt,parseInt(miRgb));
	}
}
function imprime() {
	for (r=0; r<=50; r++) {
		if (i<Stage.width) {
			if (j<Stage.height) {
				mandel(i,j);
				j += 1;
			} else {
				j = 0;
				i += 1;
			}
		} else {
			clearInterval(idInt);
		}
	}
}
stop();

import Math2;
factorReductor = 4;///Factor que determina la fuerza con la cual se acerca un objeto al otro
this.onEnterFrame = function() {
 
	mc1._x = _root._xmouse;///Una de las bolas sigue al mouse, en este caso en el eje X
	mc1._y = _root._ymouse;///Una de las bolas sigue al mouse, en este caso en el eje Y
	for (i=1; i<=7; i++) {
		a = i+1;
		seguir(_root["mc"+a],_root["mc1"],(_root["mc1"]._width/2)+(_root["mc"+a]._width/2)+2);///Llamo a la función que acerca una Movie a la otra, primer parametro: Mc a mover, segundo: Mc de destino, tercero: distancia minima permitida entre los objetos
		for (j=1; j<=7; j++) {
			mantenerDistancia(_root["mc"+i],_root["mc"+j],(_root["mc"+i]._width/2)+(_root["mc"+j]._width/2)+1);///chequeo entre todas las bolas que no se estén superponiendo unas con otras.
		}
	}
};
///Funcion que realiza el acercamiento de una MC hacia otra
function seguir(mc, destino, distanciaMinima) {
	orig = {x:mc._x, y:mc._y};////Determino el punto determinado por la MC a mover
	dest = {x:destino._x, y:destino._y};////Determino el punto que representa la MC de de destino
	miAngulo = Math.atan2((orig.y-dest.y), (orig.x-dest.x));///Calculo el angulo entre dichos dos puntos
	miDistancia = Math2.distanceBetween(orig.x, orig.y, dest.x, dest.y)-distanciaMinima;////Calculo la distancia entre los dos puntos y le resto la distancia minima del tercer parametro
	///Aca se controla si la MC a mover se acercò demasiado a destino, de no ser asi, la acerco utilizando trigonometria (coseno sobre X y seno sobre Y)
	if (miDistancia+distanciaMinima>distanciaMinima) {
		mc._x -= Math2.cos(miAngulo)*(miDistancia/factorReductor);
		mc._y -= Math2.sin(miAngulo)*(miDistancia/factorReductor);
	}
}
function mantenerDistancia(obj1, obj2, dist) {
	orig = {x:obj1._x, y:obj1._y};////Determino el punto determinado por la MC a mover
	dest = {x:obj2._x, y:obj2._y};////Determino el punto que representa la MC de de destino
	miAngulo = Math.atan2((orig.y-dest.y), (orig.x-dest.x));///Calculo el angulo entre dichos dos puntos
	miDistancia = Math2.distanceBetween(orig.x, orig.y, dest.x, dest.y)-dist;////Calculo la distancia entre los dos puntos y le resto la distancia minima del tercer parametro
	if (miDistancia+dist<dist) {/////Si estan superpuestas las movies, las alejo en forma pareja a ambas en el sentido contrario.
		obj1._x -= Math2.cos(miAngulo)*(miDistancia/2);
		obj1._y -= Math2.sin(miAngulo)*(miDistancia/2);
		obj2._x += Math2.cos(miAngulo)*(miDistancia/2);
		obj2._y += Math2.sin(miAngulo)*(miDistancia/2);
	}
}

class Math2 extends Math { 
	static function rndBetween(n1:Number, n2:Number) { 
		return n1+random(n2-n1+1);  
 
	} 
	static function radToDeg(n:Number) { 
		return n*180/Math.PI;  
 
	} 
	static function degToRad(n:Number) { 
		return n/180*Math.PI;  
 
	} 
	static function degSin(n:Number) { 
		return Math.sin(n/180*Math.PI);  
 
	} 
	static function degCos(n:Number) { 
		return Math.cos(n/180*Math.PI);  
 
	} 
	static function degTan(n:Number) { 
		return Math.tan(n/180*Math.PI);  
 
	} 
	static function angleBetweenRad(x1:Number, y1:Number, x2:Number, y2:Number) { 
		return Math.atan2((y1-y2), (x1-x2));  
 
	} 
	static function angleBetweenDeg(x1:Number, y1:Number, x2:Number, y2:Number) { 
		return Math.atan2((y1-y2), (x1-x2))*180/Math.PI;  
 
	} 
	static function distanceBetween(x1:Number, y1:Number, x2:Number, y2:Number) { 
		return Math.sqrt(Math.pow((y1-y2),2)+ Math.pow((x1-x2),2));  
 
	} 
}

import Math2; 
trace(Math2.rndBetween(2, 15)); 
trace(Math2.radToDeg(1.2)); 
trace(Math2.degToRad(360)); 
trace(Math2.degCos(90)); 
trace(Math2.degSin(90)); 
trace(Math2.angleBetweenRad(0, 0, 1, 1)); 
trace(Math2.angleBetweenDeg(0, 0, 1, 1)); 
trace(Math2.sin(90/180*Math2.PI)); 
trace(Math2.distanceBetween(0,0,1,1));