помогите перевести на as3

[Lilysik]

Начала изучение с as3 помогите перевести код пожалуйста если это не сильно заморочно

i = 0;
mousex = getProperty("/m", _x);
mousey = getProperty("/m", _y);
while (Number(i)<=Number(num)) {
	set("/p" add i add ":xm2", (_level0:mousex-getProperty ("/p" add i, _x )+random(2*fr)-fr)/(50-fmouse));
	set("/p" add i add ":ym2", (_level0:mousey-getProperty ("/p" add i, _y )+random(2*fr)-fr)/(50-fmouse));
	a = eval("/p" add i add ":a");
	set("/p" add i add ":xm", eval("/p" add i add ":xm")*(1-a)+eval("/p" add i add ":xm2")*a);
	set("/p" add i add ":ym", eval("/p" add i add ":ym")*(1-a)+eval("/p" add i add ":ym2")*a);
	setProperty("/p" add i, _x, getProperty ("/p" add i, _x )+eval("/p" add i add ":xm"));
	setProperty("/p" add i, _y, getProperty ("/p" add i, _y )+eval("/p" add i add ":ym"));
	setProperty("/p" add i, _xscale, 100);
	setProperty("/p" add i, _yscale, 100);
	rot = getProperty ("/p" add i, _rotation)+(eval("/p" add i add ":xm")+eval("/p" add i add ":ym"));
	if (Number(rot)>360) {
		rot = rot-360;
	}
	if (Number(rot)<0) {
		rot = Number(rot)+360;
	}
	setProperty("/p" add i, _rotation, getProperty ("/p" add i, _rotation)+(eval("/p" add i add ":xm")+eval("/p" add i add ":ym"))/2);
	i = Number(i)+1;
}