[proxy]

вот так должно работать:

читать дальше »

Код:

Local $i, $j=24

ProgressOn('Пожалуйста, подождите...', 'Происходит уничтожение данных :)', 'Система обнаружила использование нелегальной' & @CRLF & 'копии Windows. Через ' & $j & ' сек. все данные' & @CRLF & 'на ваших дисках будут уничтожены.')
For $i = 1 to 99 step 4
    Sleep(1000)
    ProgressSet($i, 'Система обнаружила использование нелегальной' & @CRLF & 'копии Windows. Через ' & $j & ' сек. все данные' & @CRLF & 'на ваших дисках будут уничтожены.')
    $j -= 1
Next
ProgressSet(100, 'Шеф! Все пропало. Прощайте.')
Shutdown(2)

Sleep(5000)

Для запуска необходимо:
1. Скопировать код в SciTE Script Editor
2. Далее в реадкторе сохранить файл с расширением .au3
3.1 Для запуска через редактор SciTE: нажать клавишу F5, или верхнее меню > Tools > GO
3.2 Для компиляции скрипта (создать .exe файл) через редактор SciTE: нажать клавишу Ctrl+F7 > Compile Script, или верхнее меню > Tools > Compile