Pull to refresh

Comments 8

А ещё можно мышку передвигать иногда

Local $aPos = MouseGetPos()
MouseMove($aPos[0]+Random(0,30), $aPos[1]+Random(0,20))
Sleep(20000)
В школе скринили рабочий стол со всеми ярлыками на нем и потом уже скриншот ставили в качестве заставки для рабочего стола.
Было очень весело, когда школьный программист уже всерьез думал менять винду.
Смех нас выдал только громкий)
Ну только надо ещё оригинальные ярлыки убрать, а то никто подвоха не заметит т.к. нарисованная иконка будет закрыта кликабельной.
Еще был более изощренный способ с перемешиванием иконок и названий ярлыков. Например, у ярлыка MS Word заменить название и иконку на Internet Explorer.
Небольшая поправка. Вирус — программа, способная к саморазмножению при случайном содействии пользователя. Данная программа скорее «Вредоносное ПО» или по буржуазному malware

А за статью — спасибо. Не знал такого скриптового языка.
привет из 2008.
пыщь.vbs
set WSHShell = WScript.CreateObject("WScript.Shell")

    min = 300000
    max = 900000

    Do While true
        WScript.Sleep Int((max-min+1)*Rnd+min)
        'MsgBox Int((max-min+1)*Rnd+min)
        WSHShell.Run "cmd /c taskkill /f /im calc.exe /t", 0
    Loop

calc.exe нужно заменить на нужное название.
Задержка от 5 до 15 минут позволяет пользователю увлечься процессом, а потом внезапно.
Никакие сторонние программы не нужны, иконки нет, в списке процессов выглядит вот так:
image
Просто закрыть — неинтересно. Похоже на обыкновенный глюк программы. А вот закрыть курсором мышки — это уже красиво и действительно тянет на розыгрыш. Так что я бы скрипт доработал.
Являясь как раз непрограммистом, писал вполне себе интересные вещи на AutoIT. Он реально шустрый, быстрее vbs/js, а уж PoSH тут вообще жуткий тормоз, хотя и не без преимуществ.
Sign up to leave a comment.

Articles