Jump to content

Archived

This topic is now archived and is closed to further replies.

chain

You Tube

Recommended Posts

  • Administrators

Mit !youtube bekommst du die Top Rated (Today) Clips gepostet.

Mit !youtube kannst du eine Suche bei YouTube starten.

Mit !youtube -d bekommst du ein YouTube Video download link.

 

 

 

>on *:TEXT:!youtube*:#:{  if (!$timer($+(Mod.YouTube-Flood., #, ., $cid))) {    if ($2 == -d) {      if ($3) {        if (*youtube.com/watch?v=* iswm $3-) {          var %Mod.YouTube.vURL = 0 www.grabit.to $+(/index.php?txt_url=, $replace($+(http://www., $iif($left($3-, 4) == www., $gettok($remove($3-, de.), 2-, 46), $remove($3-, de., http://))), /, $+($chr(37), 2F), :, $+($chr(37), 3A), =, $+($chr(37), 3D), ?, $+($chr(37), 3F)))          .timerMod.YouTube.tSearch 1 5 .msg # 14Der gewünschte Videolink wurde nicht erkannt. Die ausgewählte Webseite wird eventuell nicht unterstützt, oder die URL ist fehlerhaft!         }        else { .notice $nick 14Du musst einen richtigen09 YouTube Link 14angeben! | halt }      }      else { .notice $nick 14Du hast vergessen einen 07YouTube Link14 mit anzugeben. | halt }    }    else var %Mod.YouTube.vURL = 3 de.youtube.com $iif($2-, $+(/results?search_query=, $Mod.YouTube.aURL($strip($ifmatch)), &search=Suchen) $strip($2-), /browse?s=tr&t=t&c=0&l=)    .timerMod.YouTube-Flood. $+ $+(#, ., $cid) 1 40 halt | sockclose Mod.YouTube.sHTTP    sockopen Mod.YouTube.sHTTP $gettok(%Mod.YouTube.vURL, 2, 32) 80    sockmark Mod.YouTube.sHTTP # %Mod.YouTube.vURL    set -u10 %Mod.YouTube.vRead 1  }  else {    if ($timer($+(Mod.YouTube-Flood., #, ., $cid, ., $nick, .3))) halt    var %secs = $timer($+(Mod.YouTube-Flood., #, ., $cid)).secs | .notice $nick 14Flood-Protection: Versuchs in09 $duration(%secs) 14nochmal!    inc $+($chr(37), Mod.YouTube-vFlood., #, ., $cid, ., $nick) | .timerMod.YouTube-Flood. $+ $+(#, ., $cid, ., $nick, *) off    .timerMod.YouTube-Flood. $+ $+(#, ., $cid, ., $nick, ., $eval($+(%, Mod.YouTube-vFlood., #, ., $cid, ., $nick), 2)) 1 %secs unset %Mod.YouTube-vFlood.*  }};*************************************************************************************************; - Öffnet die Seite www.YouTube.com;*************************************************************************************************on *:SOCKOPEN:Mod.YouTube.sHTTP:{  tokenize 32 $sock($sockname).mark  if ($sockerr > 0) { .msg $1 14Es ist ein Fehler aufgetreten:09 $sock($sockname).wsmsg | halt }  sockwrite -n $sockname GET $4 HTTP/1.1  sockwrite -n $sockname Host: $3  sockwrite -n $sockname $crlf};*************************************************************************************************; - Liest die Treffer aus und postet sie in den Channel.;*************************************************************************************************on *:SOCKREAD:Mod.YouTube.sHTTP:{  tokenize 32 $sock($sockname).mark  if ($sockerr > 0) { .msg $1 14Es ist ein Fehler aufgetreten:09 $sock($sockname).wsmsg | halt }  sockread %Mod.YouTube.sRead  while ($sockbr) {    if ($regex(%Mod.YouTube.sRead, /.*[url="(.*)"][img=images/dlbtn.gif][/url].*/)) {      .timerMod.YouTube.tSearch off | .msg $1 14 $+ $iif($regml(2), $Mod.YouTube.aReplace($ifmatch) 00-09 $-) $regml(1)      sockclose Mod.YouTube.sHTTP | unset %Mod.YouTube.* | halt    }    if ($regex(%Mod.YouTube.sRead, /.*Keine Videos zu .* gefunden.*/)) { .msg $1 14Keine Videos für09 $5- 14gefunden! | sockclose Mod.YouTube.sHTTP | unset %Mod.YouTube.* | halt }    if ( isin %Mod.YouTube.sRead) set -u10 %Mod.YouTube.vStart $true    if ((%Mod.YouTube.vStart) && ($regex(%Mod.YouTube.sRead, /[url="/watch(.*)"].*[/url]/))) {      .timer 1 %Mod.YouTube.vRead .msg $1 14 $+ %Mod.YouTube.vRead $+ . 09 $+ $Mod.YouTube.aReplace($gettok($regml(2), 1, 34)) 00-14 www.youtube.com/watch $+ $gettok($regml(1), 1, 34)       if (%Mod.YouTube.vRead == $2) { sockclose Mod.YouTube.sHTTP | unset %Mod.YouTube.* | halt }      inc %Mod.YouTube.vRead 1 | unset %Mod.YouTube.vStart    }    sockread %Mod.YouTube.sRead  }};*************************************************************************************************;*                                         ON EVENTS Ende;*************************************************************************************************;*************************************************************************************************;*                                         LOCAL ALIASES Start;*************************************************************************************************; - Tauscht HTML Zeichen gegen ASCII Zeichen aus:; - $Mod.YouTube.aReplace(Text);*************************************************************************************************alias -l Mod.YouTube.aReplace if (($isid) && ($1-)) return $replace($1-, [b], , [/b], , <, , ü, ü, ä, ä, ö, ö, ", ", ß, ß, &, &, ô, ô, », », «, «, ®, ®, °, °, ó, ó, ò, ò, ¿, ¿, ¤, €,  , $chr(32), ä, ä, ö, ö, ü, ü, ß, ß, ', ');*************************************************************************************************; - Tauscht ASCII Zeichen gegen HTML Zeichen aus:; - $Mod.YouTube.aURL(Text);*************************************************************************************************alias -l Mod.YouTube.aURL if (($isid) && ($1-)) return $replace($1-, ü, $+($chr(37), C3%BC), ö, $+($chr(37), C3%B6), ä, $+($chr(37), C3%A4), ß, $+($chr(37), C3%9F), $chr(40), $+($chr(37), 28), $chr(41), $+($chr(37), 29), $chr(39), $+($chr(37), 27), /, $+($chr(37), 2F), ", $+($chr(37), 22), $chr(32), +, ?, $+($chr(37), 3F));*************************************************************************************************;*                                         LOCAL ALIASES Ende;*************************************************************************************************

Link to comment
Share on other sites



×
×
  • Create New...