Пишу бота на Тюряга.

[Dan4ik95]

Пишу бота на тюряга (онлайн игра mail.ru) сталкнулся с проблеммой как получить sig (параметр для сверки данных типо хэш параметров).Позднее я с флешки "выдрал" клиентскую часть для отправки запросов... там скрипт на ActionScript.Там есть функция в Mail_Request.as GenerateSignature которая мне нужна. Как мне правильно портировать на Pascal. Си язык я незнаю .

PHP код:

 private function GenerateSignature(request_params:Array) : String
        {
            var _loc_4:String = null;
            var _loc_5:int = 0;
            var _loc_2:String = "";
            var _loc_3:Array = [];
            for (_loc_4 in request_params)
            {
                
                _loc_3.push(_loc_4 + "=" + request_params[_loc_4]);
            }
            _loc_3.sort();
            _loc_5 = 0;
            while (_loc_5 < _loc_3.length)
            {
                
                _loc_2 = _loc_2 + _loc_3[_loc_5];
                _loc_5 = _loc_5 + 1;
            }
            _loc_2 = this._user_id + _loc_2 + this._secret_key;
            return MD5.hash(_loc_2);
        }// end function 


Может тоже станет кому интересно берите с вложения клиентскую часть.
___________________________________ __________________
....на русском форуме тебе будут объяснять какой ты дурак.

[Ghost of Night]

function GenerateSignature(request_params: Array of Char) : String;
var
 _loc_4: String;
 _loc_5: Integer;
 _loc_2: String;
 _loc_3: Array of Char;
begin
 for _loc_4 in request_params do
  _loc_3 := _loc_4 + '=' + request_params[_loc_4];


 _loc_5 = 0;

 while _loc_5 < Length(_loc_3) do
  begin
   _loc_2 := _loc_2 + _loc_3[_loc_5];
   inc(_loc_5);  
  end;

 _loc_2 := _user_id + _loc_2 + _secret_key;
 
 Result := MD5(_loc_2);
end;

Примерно так, осталось только довести это всё до "ума".