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

модератор форума
Регистрация: Jul 2006
Адрес: #1=(list #1#)
Сообщений: 8,049
Записей в блоге: 38
Код AS3:
var s:String = "";
var highBits:uint;
var lowBits:uint;
var flag:int;
 
function claculate(event:Event = null):void
{
	removeEventListener(Event.ENTER_FRAME, claculate);
	if (flag > 10)
	{
		// Script time limit = 5
		trace("Finished:", s); //Finished: 013a38f5
		return;
	}
	try
	{
		while (true)
		{
			if (lowBits == 0xFFFFFFFF)
			{
				highBits++;
				lowBits = 0;
			}
			lowBits++;
			s = (highBits ? highBits.toString(16) : "") + to8placesHex(lowBits);
		}
	}
	catch (error:ScriptTimeoutError)
	{
		flag++;
		addEventListener(Event.ENTER_FRAME, claculate);
	}
}
function to8placesHex(input:uint):String
{
	var res:String = input.toString(16);
	while (res.length < 8) res = "0" + res;
	return res;
}
claculate();
Эксперементируйте осторожно, лучше сразу поставьте маленький таймаут, а то очень долго будете ждать результатов.
__________________
Hell is the possibility of sanity