Alias pour telecharger une video sur youtube (mise a jour v1.1)

Contenu du snippet

comme le sujet le dit

c'est une alias pour telecharger une video sur YouTube comme vous le voyez sur le screen shot

utilisation:

/youtube <lien video YouTube>

NB: l'alias aide a avoir le lien qui te donne la possibilitée d'avoir le fichier .flv

Source / Exemple :


alias youtube {
  if (!$sock(wd)) && ($regex($1,http:\/\/(www|fr)\.youtube\..+\/watch\?(gl=..&..=..&v|v)=[^&]{11}&)) {
    sockopen wd www.youtube.com 80
    sockmark wd $1
  }
  else echo -a * $iif($1,Veuillez vérifier le lien $+(1,$chr(44),0You0,$chr(44),4Tube) spécifié -) Syntax: /youtube <lien video YouTube>
}
on *:sockopen:w*:{
  tokenize 47 $sock(*).mark
  sockwrite -n $sockname GET / $+ $3 HTTP/1.1
  sockwrite -n $sockname Host: $2
  sockwrite -n $sockname Connection: close
  sockwrite -n $sockname $crlf
}
on *:sockread:wd:{
  var %code | sockread %code
  if ($regex(%code,(video_id=[^&]+&).+(t=\S+%3D)&.+title=(.+)';)) {
    echo -a 1,0You0,4Tube 1,0- Vidéo trouvé... titre: $regml(3) 
    var %web $+(http://www.youtube.com/get_video?,$regml(1),$regml(2))
    sockclose wd
    sockopen wd2 www.youtube.com 80
    sockmark wd2 %web
  }
  elseif ($regex(%code,Location:\s(http:\/\/www\.youtube\.com/watch\?.+))) {
    sockclose wd
    sockopen wd www.youtube.com 80
    sockmark wd $regml(1)
  }
  elseif ($regex(%code,Location:\s(http:\/\/www\.youtube\.com/index\?.+))) {
    echo 4 -a %code
    echo -a 1,0You0,4Tube 1,0- La vidéo que vous avez demandée n'est pas disponible
    sockclose wd
  }
}
on *:sockread:wd2:{
  var %code | sockread %code
  if ((%code == HTTP/1.1 303 See Other) || (%code == HTTP/1.1 302 Found)) set %a 1
  elseif %code == HTTP/1.1 200 OK {
    echo -a 1,0You0,4Tube 1,0- Lien trouvé...
    echo -a 1,0You0,4Tube 1,0- Téléchargement du vidéo en cours...
    url -an $sock(wd2).mark
    sockclose wd2
    unset %a
  }
  elseif %a == 1 {
    if $regex(%code,Location:\s(.+)) {
      sockclose wd2
      unset %a
      tokenize 47 $regml(1)
      sockopen wd2 $2 80
      sockmark wd2 $regml(1)
    }
  }
}

Conclusion :


mettez le code dans votre remote

NB: il est preferable d'utiliser la version 6.32+

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.