Форумы портала PHP.SU :: Версия для печати :: написать PHP код с autoIt кода

1. mef-t - 01 Августа, 2017 - 14:56:13 - перейти к сообщению

Добрый день.

Есть код в AutoIt. Примерно 300 строк. Код рабочий. Писал сам. Смогу объяснить каждый элемент. В крайнем случае могу перенести код в логический алгоритм.

Необходимо перенести его в PHP.
Визуально: формочка в 2 поля, кнопка. По завершению доп текст.
Остальное - алгоритм с отправкой запросов на сторонний сайт. Запросы должны идти с машины пользователя, а не сервера.

Хотелось бы сразу узнать ориентировочную стоимость данной работы. Точно не нужно, достаточно указать определенные рамки.

2. dcc0 - 01 Августа, 2017 - 18:38:59 - перейти к сообщению

Если с машины пользователя, то соотв. у пользователя должен быть интерпретатор PHP.
Есть вариант переписать в среде DevelStudio, тогда с установкой интерпретатора не будет проблем.
AutoIt, к сожалению, не знаю. Было б на чем-нибудь другом?!
Хотя, конечно, попытаться можно, без гарантии результата.
Если задание не тайна за семью печатями, прикрепи код куда-нибудь.
А то так трудно сказать, от сложности алгоритма зависит результат.

3. mef-t - 02 Августа, 2017 - 12:54:42 - перейти к сообщению

Возможно, я не достаточно хорошо разбираюсь в WEB.
Потому, прошу подсказать, прав я или нет.
есть сайт, на котором нужна авторизация несколькими аккаунтами. Последовательно ли, параллельно, думаю, не важно.
После определенного количества авторизаций система просит указать капчку.
Если запросы будут уходить с сервера, а пользователей будет несколько десятков, то уже после первого десятка система будет выдавать каптчу (от гугла). Я прав?

Если так, то вместо интерпретатора, полагаю, можно реализовать в javaScript саму отправку запросов. А от PHP потребуется формирование самого запроса, а так же обработка ответов.

Если я не прав, и отправлять можно с сервера (если адресат будет видеть разных пользователей и не просить каптчу), то все можно делать на PHP.

Пример. Одна из функций (Отобразить)

CODE (htmlphp):
скопировать код в буфер обмена

Func _questRun($sData, $questCount = 3, $funcRepeat = 0)
 
        $funcRepeat += 1
        $sData = _Encoding_UTF8ToANSI($sData)
        _questHTML($sData) ; сохраняем HTML квесты в файлы
 
;~      FileWrite('source.html', $sData)
 
        Local $i, $iMax
        Local $uid, $qid, $completedCount = 0
        Local $questList, $questTimes
        Local $questAny[6] = [False , 'Battle of the Immortals', 'Neverwinter', 'Champions Online', 'Star Trek Online', 'War of the Immortals']
        Local $questRepeat = 0 ;количество квестов для просмотра во второй раз
 
        $uid = StringRegExp($sData, 'userId.*?(\d+)', 1)
        $uid = $uid[0]
        $qid = StringRegExp($sData, 'questid.*?(\d+)', 3)
        $questList = StringRegExp($sData, 'qc-legend.*>P?.*?([A-Z].+[A-Z][a-z]+|[A-Z][a-z]+|любые|any|Покупка).*<', 3) ;список квестов   !!!!!!!!!!!!!! не работает, если нет больших букв
        $questTimes = StringRegExp($sData, 'questCard-overlay-legend.*\v.*\v.*\v.*>(.*?)<', 3) ;очки квестов
        For $k = 0 To UBound($qid)-1
                If $questTimes[$k] = '' Then
                        $questTimes[$k] = '0/1'
                EndIf
        Next
        ;выполненные квесты
        $completedCount = StringRegExp($sData, 'active', 0) ; в будущем перейти на проверку цифр
        If $completedCount = 1 Then ; найдены завершенные квесты
                $completedCount = StringRegExp($sData, 'active', 3)
                $completedCount = UBound($completedCount)
                ;закрытие выполненных квестов
                For $i = 0 To $completedCount-1
                        _WinHttpSimpleRequest($hConnect, 'POST', '/ru/quest/finish-quest', Default, 'uid=' & $uid & '&qid=' & $qid[$i])
                        $questRepeat += 1
                        $questCount = $questCount - 1
                Next
                $funcRepeat = 0
        EndIf
        $iMax = UBound($questList)-1
        ;выполнение невыполненных квестов
        For $i = 3-$questCount To $iMax
                Switch $questList[$i]
                        Case ''
                        Case 'Empty'
                        Case 'money', 'Покупка'
                                _WinHttpSimpleRequest($hConnect, 'POST', '/ru/quest/skip-quest', Default, 'uid=' & $uid & '&qid=' & $qid[$i])
                                $questRepeat += 1
                                $funcRepeat = 0
                        Case 'any', 'любые'
                                If $questAny[0] = False Then ;повторно не запускаем если Any уже было (True)
                                        For $j = 1 To StringRegExpReplace($questTimes[$i], '\d\d?/', '')
                                                _requestDataSendForStartGames($questAny[$j])
                                        Next
                                        $questAny[0] = True
                                EndIf
                                $questRepeat += 1
                        Case Else
                                If _APP_ABBR($questList[$i]) <> '0' Then
                                        _requestDataSendForStartGames($questList[$i])
                                        If StringRegExpReplace($questTimes[$i], '/\d\d?', '') + 1 >= StringRegExpReplace($questTimes[$i], '\d\d?/', '') Then
                                                $questRepeat += 1
                                        EndIf
                                EndIf
                EndSwitch
        Next
 
        If $questRepeat > 0 And $funcRepeat < 2 Then
                _questRun(_WinHttpSimpleRequest($hConnect, 'GET', '/ru/quest/index?uid=97225c116aed50dfa4aa66242e1be3c4'), $questRepeat, $funcRepeat)
        EndIf
 
 
EndFunc

Опять же. Я могу написать ТЗ. Понятным языком. Потому тут скорее вопрос в стоимости и озвученных выше вопросах.