Показать сообщение отдельно
Старый 11.12.2007, 21:10
wvxvw вне форума Посмотреть профиль Отправить личное сообщение для wvxvw Найти все сообщения от wvxvw
  № 10  
Ответить с цитированием
wvxvw
Modus ponens
 
Аватар для wvxvw

модератор форума
Регистрация: Jul 2006
Адрес: #1=(list #1#)
Сообщений: 8,049
Записей в блоге: 38
Код:
_root.onMouseDown = function():Void {
	var __ax:Number = _root._xmouse;
	var __ay:Number = _root._ymouse;
	var __mc:MovieClip = null;
	_root.onEnterFrame = function():Void {
		if(__mc==null){
			__mc = crlIn(this, 100, Math.random()*0xffffff,Math.random()*100);
		}
		__mc._x = Math.min(__ax,_root._xmouse);
		__mc._y = Math.min(__ay,_root._ymouse);
		__mc._width = Math.max(__ax,_root._xmouse)-Math.min(__ax,_root._xmouse);
		__mc._height = Math.max(__ay,_root._ymouse)-Math.min(__ay,_root._ymouse);
	}
}
_root.onMouseUp = function():Void {
	delete this.onEnterFrame;
}
function crlIn(mc:MovieClip, r:Number, c:Number, a:Number):MovieClip {
	var _mc:MovieClip = mc.createEmptyMovieClip("crl"+mc.getNextHighestDepth(), mc.getNextHighestDepth());
	var c1:Number = r*(Math.SQRT2-1);
	var c2:Number = r*Math.SQRT2/2;
	var d:Number = r*2;
	_mc.beginFill(c,a);
	_mc.moveTo(d,r);
	_mc.curveTo(d,r+c1,r+c2,r+c2);
	_mc.curveTo(r+c1,d,r,d);
	_mc.curveTo(r-c1,d,r-c2,r+c2);
	_mc.curveTo(0,r+c1,0,r);
	_mc.curveTo(0,r-c1,r-c2,r-c2);
	_mc.curveTo(r-c1,0,r,0);
	_mc.curveTo(r+c1,0,r+c2,r-c2);
	_mc.curveTo(d,r-c1,d,r);
	_mc.endFill();
	return _mc;
}
%)
__________________
Hell is the possibility of sanity