Портирование кода PHP на код Delphi

Я работаю над интеграцией с моим приложением Delphi; вся эта история объясняется в этой ссылке

После этого я обыскал в Интернете, тогда я нашел код для переключения нового идентификатора в PHP

• Передача информации по кредитной карте через AJAX
• Как я могу создать новый оператор в PHP?
• Как исключить столбцы certains при использовании красноречивых
• Проверить сертификат php 5.6 ssl
• Прогресс загрузки Gozzle 6

function tor_new_identity($tor_ip='127.0.0.1', $control_port='9051', $auth_code=''){ $fp = fsockopen($tor_ip, $control_port, $errno, $errstr, 30); if (!$fp) return false; //can't connect to the control port fputs($fp, "AUTHENTICATE $auth_code\r\n"); $response = fread($fp, 1024); list($code, $text) = explode(' ', $response, 2); if ($code != '250') return false; //authentication failed //send the request to for new identity fputs($fp, "signal NEWNYM\r\n"); $response = fread($fp, 1024); list($code, $text) = explode(' ', $response, 2); if ($code != '250') return false; //signal failed fclose($fp); return true; } 

Может ли кто-нибудь помочь мне портировать это на Delphi / Pascal

Я не знаю основ PHP

заранее спасибо

С уважением