1.Global Const $Str = '00A0C9062410}'
Global = принудительно глобальная переменная.
Const= Математическая константа — величина, значение которой не меняется; в этом она противоположна переменной. В отличие от физических констант, математические константы определены независимо от каких бы то ни было физических измерений.
$Str= '00A0C9062410}' Строка для поиска.
2.$Count = 1 Не понятно, что обозначает. В переводе с англ.-счётчик, но что подсчитывает?
В справке и гугле такую информацию не нашёл.
3.While 1 = Цикл, основанный на значении выражения.( Тоже, пока под вопросом.)
4.$Key = RegEnumKey('HKLM\SOFTWARE\Classes\CLSID', $Count)
RegEnumKey ( "keyname", instance )= Вернуть название ключа, соответствующее его экземпляру (из справки).
5.If @error Then
If...Then = Условное выполнение одиночного выражения.(из справки)
@error= Значение флага ошибки.(из справки)
6.ExitLoop = Завершить выполнение цикла While/Do/For.(из справки)
7.EndIf = Условное выполнение выражения.
If <expression> Then
statements
...
[ElseIf expression-n Then
[elseif statements ... ]]
...
[Else
[else statements]
...
EndIf (из справки)
8.If StringInStr($Key, $Str, 0, -1) Then
If...Then = Условное выполнение одиночного выражения.(из справки)
StringInStr($Key, $Str, 0, -1) = Проверка вхождения подстроки в указанную строку
StringInStr ( "string", "substring" [, casesense [, occurrence]] )
string = Исходная строка.
substring = Подстрока для поиска.
casesense = (опциональный) Режим учета регистра написания.
0 = не зависит от регистра написания согласно языку пользователя (по умолчанию)
1 = зависит от регистра написания
2 = не зависит от регистра написания согласно базовому/наиболее быстрому сравнению
[occurance[ = Номер искомого вхождения подстроки. Отрицательные значения означает поиск справа. Стандартное значение равно 1 - поиск только первого вхождения.
(из справки).
9.ConsoleWrite('HKLM\SOFTWARE\Classes\CLSID\' & $Key & @CR)
ConsoleWrite = Выдать данные в поток, для чтения его, например, некоторыми редакторами.
ConsoleWrite ( "data" )
data = Данные, которые требуется выдать в поток.
@CR = Возврат каретки Chr(13); требуется для завершения строк.
& Объединение/конкатенация строк. "one" & 10 - ("one10")
10. ExitLoop = Завершить выполнение цикла While/Do/For.(из справки)
11. EndIf = Условное выполнение выражения.
If <expression> Then
statements
...
[ElseIf expression-n Then
[elseif statements ... ]]
...
[Else
[else statements]
...
EndIf (из справки)
12. $Count += 1
13.WEnd = Цикл, основанный на значении выражения.
While <expression>
statements
...
WEnd
<expression> = Если выражение верно, то будут выполняться все последующие команды, вплоть до WEnd. Такое циклическое выполнение будет продолжено до тех пор, пока выражение перестанет быть верным.
