alias videover {
  ;/getvid [-b] [url]
  if (!$1) echo -ftsc info * /getvid: hatalı parametre
  else {
    set %openbrowser $iif($1 = -b,1)
    if ($iif(%openbrowser,$2-,$1-)) {
      set %getvid 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">. $+ $regsubex($v1,/^http://(
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">if ($sock(getvid)) sockclose getvid
      sockopen getvid $gettok(%getvid,1,47) 80
    }
    else echo -ftsc info * /getvid: kırık link
  }
}

on *:sockopen:getvid:{ 
  if (!$window(@getvid)) window @getvid
  sockwrite -n $sockname GET / $+ $gettok(%getvid,2,47) HTTP/1.1
  sockwrite -n $sockname Host: $gettok(%getvid,1,47)
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.1.6)
  sockwrite -n $sockname $sockname Accept: */* $+ $crlf $+ $crlf
}
on *:sockread:getvid:{ 
  var %temp
  sockread %temp 
  if ($regsubex(%temp,/var fullscreenUrl = '\/watch_fullscreen/i,) != %temp) {
    var %vidurl = $+($gettok(%getvid,1,47),/get_video,$remove($left($v1,-2),$chr(9)))
    echo @getvid Video URL: %vidurl For: %getvid
    if (%openbrowser) url %vidurl
    sockclose getvid
  }
}