anon

Untitled

Aug 3rd, 2010
159
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.19 KB | None | 0 0
  1.  
  2. on *:SOCKOPEN:youtube:{
  3. ; connection
  4. sockwrite -n $sockname GET %tmpx HTTP/1.1
  5. ; Write Connection Details
  6. alias xconnection { set %tmpx $strip($remove($1,http://,youtube,.com,www.)) | sockopen youtube youtube.com 80 }
  7. sockwrite -n $sockname User-Agent: IRCSpider/mIRC $version
  8. sockwrite -n $sockname Host: www.youtube.com
  9. sockwrite -n $sockname Referer: $server
  10. sockwrite -n $sockname Accept: *.*, */*
  11. sockwrite -n $sockname Content-Type: text/html
  12. sockwrite -n $sockname Connection: Keep-Alive
  13. }
  14. sockwrite -n $sockname $crlf
  15. sockread %mirc.temp
  16. on *:SOCKREAD:youtube:{
  17. if (%d == 1) { }
  18. if (<meta name="title" content=" isin %mirc.temp) {
  19. msg %tmp.chan [YouTube] $remove($replace(%mirc.temp, &quot;, ", &amp;, &, &quot;, "),<meta name="title" content=",">)
  20. else {
  21. }
  22. inc %d
  23. }
  24. }
  25. on *:TEXT:*:#:{
  26. on *:SOCKCLOSE:youtube:{ /noop }
  27. halt
  28. if (Tonyny ison $chan && $nick != Tonyny) {
  29. set %tmp.chan $chan
  30. }
  31. var %i 1
  32. unset %d
  33. if (youtube.com/watch?v= isin [ $chr(36) $+ [ %i ] ]) { sockclose youtube | xconnection [ $chr(36) $+ [ %i ] ] }
  34. while ([ $chr(36) $+ [ %i ] ]) {
  35. }
  36. inc %i
  37. }
Add Comment
Please, Sign In to add comment