Anti Resolver

Маленький мануал, для начала настраиваем в скайпе IP :

Потом создаем файл antiresolver.vbs с содержимым :

Set objShell =WScript.CreateObject("WScript.Shell")
ss= objShell.RegRead("HKEY_CURRENT_USER\Software\Skype\Phone\SkypePath")
ss=""""+ ss +""""
'Add Block rule
objShell.run "netsh advfirewall firewall add rule name=""SkypeBlockTCP"" dir=out action=block program=" + ss + " enable=yes protocol=any profile=any"
'AddAllow rule
objShell.run "netsh advfirewall firewall add rule name=""SkypeAllowToProxy"" dir=out action=allow program="+ ss +" enable=yes remoteip=127.0.0.1"
'Turn On firewall
objShell.run "Netsh advfirewall set allprofiles state on"
msgbox "Anti Resolver mode = ON"

Либо скачиваем уже готовый файл и запускаем его, далее перезагружаем скайп и теперь будет выводить ip microsoft либо не выводить вообще.

http://rghost.ru/48751185

Данный мануал поможет вам частично скрыть свой IP от злоумышленников.

Мануал был написан самостоятельно, часть скрипта была взята из заготовок.