vkontakte.ru (vk.com) video download

Platform:  mIRC
Published  Dec 19, 2010
Updated  Dec 19, 2010
vkontakte.ru (vk.com) it's russian social network like facebook.com.
this snippet allows you to download videos.

example: /vk http://vkontakte.ru/video82189478_159074768?hd&noiphone
result (/echo -a):
http://cs13154.vk.com/u5600680/video/82a790dc77.240.mp4
http://cs13154.vk.com/u5600680/video/82a790dc77.360.mp4



Installation:
Copy your vk.com remixsid cookie to
Code
 
and enjoy! ;) alias vk {
if (http://vkontakte.ru/video?*_?* iswm $1) || (http://vk.com/video?*_?* iswm $1) {
if ($sock($+(vk,/,$ctime))) sockclose $v1
sockopen $+(vk,/,$ctime) vk.com 80
sockmark $+(vk,/,$ctime) $mid($1,$pos($1,/,3))
}
}
on *:SOCKOPEN:vk/*: {
sockwrite -n $sockname GET $sock($sockname).mark HTTP/1.0
sockwrite -n $sockname User-Agent: $+(mIRC,/,v,$version)
sockwrite -n $sockname Host: vk.com
sockwrite -n $sockname Cookie: remixsid=
sockwrite -n $sockname
}
on *:SOCKREAD:vk/*: {
sockread 4096 $+(%,$sockname)
if (*loadFlashPlayer(*);* iswm $(,$+(%,$sockname))) {
var %args = $mid($v2,$calc($pos($v2,$({,)) + 1),$calc($pos($v2,$(},)) - $pos($v2,$({,)) - 1)), %* = $numtok(%args,44)
while (%*) {
if ($regex($gettok(%args,%*,44),/"(.+)":(.+)/)) {
set -l $+(%,args,.,$regml(1)) $replace($noqt($regml(2)),\/,/)
}
dec %*
}
var %ref = $iif(http://?* iswm %args.host,$v2,$+(http://,%args.host,/))
var %ref = %ref $+ $iif($int(%args.uid),$+(u,%args.uid,/video/),assets/videos/)
var %ref = %ref $+ %args.vtag
var %ref = %ref $+ $iif((.vk. isin %args.host) || (.vkontakte. isin %args.host),.,$+(%args.vkid,.vk.))
var %. = 1
while (%. <= $calc(%args.hd + 1)) {
echo -a %ref $+ $iif((%.) && (%args.no_flv),$+($gettok(240 360 480 720 1080,%.,32),.mp4),flv)
inc %.
}
}
}

Comments

Sign in to comment.
IllogicTC   -  Dec 20, 2010
It's a trap!

In Soviet Russia, video downloads YOU!
 Respond  
Jethro   -  Dec 19, 2010
Росси́я для ру́сских!
 Respond  
SunnyD   -  Dec 19, 2010
RUSSIAAAAAAAAAAA :D
 Respond  
Jethro   -  Dec 19, 2010
The thing is, I ain't no Russian and I ain't got an account with this Russian facebook lookalike...
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.