toclafane1

115 likes
15 following
12 followers

toclafane1

Joined:

Mar 14, 2011

Location:

Blackpool

Activity Stream

All Threads Projects Code Snippets

toclafane1 liked a Snippet, Youtube url detector for mIRC - Mar 28, 2013

toclafane1 is now following Kirby - Jan 08, 2013

toclafane1 - Dec 28, 2012

@Hawkee - just wondering, if users uploaded snippets page lists gone now or what?

4 Responses

toclafane1 commented on a Snippet, Unban All - Dec 19, 2012

If you're using mIRC you can just double click channel, highlight them all, and click remove. >.> Good snippet though.

Respond

toclafane1 commented on a Snippet, Buuble Nick Whois - Dec 14, 2012

You're welcome.

Respond

toclafane1 commented on a Snippet, Buuble Nick Whois - Dec 14, 2012

@RiMaJoy - the problem is here:

		Code 			
#___|___ off
raw *:*: {
  haltdef
  tokenize 32 $rawmsg
  var %_ = hadd -m $4
  if ($2 = 311) %_ _id $5-6 $strip($right($8-,-1))
  if ($2 = 307) %_ _reg Registered.
  if ($2 = 319) %_ _chans $right($5-,-1)
  if ($2 = 317) {
    %_ _idle $duration($5)
    %_ _sign $asctime($6,dd/mm/yy - hh:nn:ss)
  }
  if ($2 = 313) %_ _own $right($5-,-1)
  if ($2 = 318) { 
    sq $4 $mouse.dx $mouse.dy $active
    .disable #___|___
  }
}
#___|___ end	

Remove the

		Code 			
.disable #___|___	

and change

		Code 			
#___|___ off	

		Code 			
#___|___ on	

Respond

toclafane1 commented on a Snippet, Youtube advanced search - Dec 14, 2012

I had a go at updating myself:

		Code 			
;Youtube advanced search by Ford_Lawmower irc.GeekShed.net #Script-Help
alias -l GetYoutube {
  var %MaxResults 3
  var %TitleColor $+($chr(3),$chr(2))
  var %TextColor $+($chr(2),$chr(3),04)
  var %LinkColor $+($chr(3),$chr(31))
  var %logo $+($chr(3),14,Y,$chr(3),04,outube) $chr(7)
  $1-2 %logo %TitleColor Searching Youtube........  
  var %sockname $+(YoutubeAdvancedSearch,$network,$2,$ticks), %yt.url $replace($3-,$chr(32),+)
  if ($left($3,1) == -) {
    if ($3 == -h || !$4) {
      $1-2 Syntax is !Youtube search words here. Optionally, you can change the search type by adding a search flag directly after !youtube and before The search word(s)
      $1-2 Valid search flags are -n (newest) -o (oldest) -v (view count) -r (rating) . Ex. !Youtube -n jimi hendrix  <<-- Will show the 3 newest posts with jimi hendrix in them.
      $1-2 You can also use the @ trigger to message the channel if you have halfops or higher. Ex. @Youtube jimi hendrix
      return
    }  
    elseif ($3 == -n) { var %SearchType &search_sort=video_date_uploaded }
    elseif ($3 == -o) { var %SearchType &search_sort=video_date_uploaded_reverse }
    elseif ($3 == -v) { var %SearchType &search_sort=video_view_count }
    elseif ($3 == -r) { var %SearchType &search_sort=video_avg_rating }
    %yt.url = $replace($4-,$chr(32),+) $+ %SearchType
  }
  var %yt.url $replace($iif(- isin $3,$4-,$3-),$chr(32),+) $+ %SearchType
  sockopen %sockname www.youtube.com 80
  sockmark %sockname $1-2 $+(/results?search_type=&aq=f&search_query=,%yt.url,&hl=en) %MaxResults %TitleColor %TextColor %LinkColor %logo
}
menu Channel,Status {
  .$iif($group(#Youtube) == On,$style(1)) Youtube Trigger
  ..$iif($group(#Youtube) == On,$style(2)) On: .enable #Youtube
  ..$iif($group(#Youtube) == Off,$style(2)) Off: .disable #Youtube
}
#Youtube on
On $*:Text:/^(\+|-|!|@)Youtube.*/Si:#: {
  var %action $regml(1)
  if (%action isin +-) && ($regex($nick($chan,$nick).pnick,/(!|~|&|@)/)) {
    if (%action == +) {
      if ($istok(%YoutubeChanList,$+($network,$chan),32)) { .msg $chan $nick $chan is already running the Youtube script }
      else { 
        .enable #Youtube
        Set %YoutubeChanList $addtok(%YoutubeChanList,$+($network,$chan),32)
        .msg $chan $nick has activated the Youtube script for $chan .
      }
    }
    else {
      if (!$istok(%YoutubeChanList,$+($network,$chan),32)) { .msg $chan $nick $chan is not running the Youtube script }
      else { 
        Set %YoutubeChanList $remtok(%YoutubeChanList,$+($network,$chan),1,32)
        .msg $chan $nick has deactivated the Youtube script for $chan . 
      }
    }
  }
  elseif (!$timer($+(Youtube,$network,$nick))) && ($istok(%YoutubeChanList,$+($network,$chan),32)) {
    .timer $+ $+(Youtube,$network,$nick) 1 6 noop
    var %method $iif(%action == !,.notice $nick,$iif($regex($nick($chan,$nick).pnick,/(!|~|&|@|%)/),.msg $chan,.notice $nick))
    GetYoutube %method $strip($2-)
  }
}
#Youtube end
On *:sockopen:YoutubeAdvancedSearch*: {
  if (!$sockerr) {
    sockwrite -nt $sockname GET $gettok($sock($sockname).mark,3,32) HTTP/1.0
    sockwrite -n $sockname Host: www.youtube.com
    sockwrite -n $sockname $crlf
  }
  else { echo -st Socket Error $nopath($script) | youtube.cleanup }
}
On *:sockread:YoutubeAdvancedSearch*: {
  if ($sockerr) { echo -st Socket Error $nopath($script) | youtube.cleanup }
  else {
    var %Youtube | sockread %Youtube
    if (No video results isin %Youtube) {
      $gettok($sock($sockname).mark,1-2,32) No results were found for your search!
      youtube.cleanup
    }
    elseif ($regex(%Youtube,/data-context-item-title="(.*?)"/i)) hadd -m $sockname title $fix($regml(1))
    elseif ($regex(%Youtube,/data-video-ids="(.*?)"/i)) hadd -m $sockname id $regml(1)
    elseif ($regex(%Youtube,/dir="ltr">(.*?)<\/a><span class="metadata-separator">(.*?)<span class="metadata-separator">(.*?) views/i)) {
      hinc -m $sockname count      
      var %s $sockname
      tokenize 32 $sock(%s).mark
      $1-2 $8- $+($5,Title:,$6) $remove($hget(%s,title),<b>,</b>) $+($5,User:,$6) $regml(1) $+($5,Added:,$6) $remove($regml(2),</span>,&bull;) $+($5,Views:,$6) $remove($regml(3),</span>,&bull;) $+($7,http://www.youtube.com/watch?v=,$hget(%s,id))
      if ($hget(%s,count) >= $4) youtube.cleanup      
    }
  }
}
On *:sockclose:YoutubeAdvancedSearch*: youtube.cleanup
alias -l youtube.cleanup {
  if ($hget($sockname)) hfree $v1
  sockclose $sockname
  return
}
alias Youtube { GetYoutube echo -a $1- }
alias -l fix { return $regsubex($remove($replace($1-,&amp;,&,&quot;,"),amp;,<b>,</b>),/&#([0-9]{2});/gi,$chr(\t)) }
	

Quote

[11:47am] <~Stewie> @Youtube Halestorm
[11:47am] <&thunderbolt> Youtube Searching Youtube........
[11:47am] <&thunderbolt> Youtube Title: Halestorm - Bad Romance (cover) HD User: britton stallard Added: 1 year ago Views: 306,257 http://www.youtube.com/watch?v=ZO7NN9w9Z_g
[11:47am] <&thunderbolt> Youtube Title: Halestorm - Daughters of Darkness Lyrics User: denestygg Added: 8 months ago Views: 258,190 http://www.youtube.com/watch?v=3XQ1FB3Rz0g
[11:47am] <&thunderbolt> Youtube Title: Halestorm - I Miss The Misery [Official Video] User: HalestormRocks Added: 5 months ago Views: 2,357,340 http://www.youtube.com/watch?v=YpJAmlnBxoA

Respond

toclafane1 commented on a Snippet, Word Definition - Nov 30, 2012

You're welcome. :)

Respond

toclafane1 commented on a Snippet, Word Definition - Nov 27, 2012

@Kiddo96 - I have added an alias: /def <word> ... Will echo it to your active window.

Respond

toclafane1 liked a Snippet, Youtube advanced search - Nov 27, 2012

toclafane1 commented on a Snippet, Word Definition - Nov 27, 2012

I use FireFox... Also seems I am getting the same issue, but when I re-coded this, I had no issue with it.

Edit: I think I have found the issue, the searching seems to be case sensitive.

Quote

[7:43pm] <~Stewie> !define smoke
[7:43pm] <&thunderbolt> Definition: a visible suspension of carbon or other particles in air, typically one emitted from a burning substance

and

Quote

[7:44pm] <~Stewie> !define Smoke
[7:44pm] <&thunderbolt> No Results have been found for: "Smoke"

Maybe the reason for the script not working, when you posted your first comment was because of this reason, I will post a fix around this soon.

Okay another post edit: Updated, so now should be fixed for that issue.

Quote

[11:04pm] <~Stewie> !define Smoke
[11:04pm] <&thunderbolt> Definition: a visible suspension of carbon or other particles in air, typically one emitted from a burning substance
[11:04pm] <~Stewie> !define smoke
[11:04pm] <&thunderbolt> Definition: a visible suspension of carbon or other particles in air, typically one emitted from a burning substance

Respond

toclafane1 commented on a Snippet, Word Definition - Nov 27, 2012

What browser are you using?

Respond

toclafane1 is now following Jethro - Nov 20, 2012

toclafane1 commented on a Snippet, Word Definition - Nov 20, 2012

Updated. @mike_12212012 - let me know if there is still a problem.

Respond

toclafane1 commented on a Snippet, Random Joke - Nov 17, 2012

Changed!

Respond

toclafane1 commented on a mIRC Script, Grats script using simplified regex - Nov 05, 2012

-.- >.>

Respond

toclafane1 commented on a mIRC Script, Grats script using simplified regex - Nov 05, 2012

@Jethro - I don't think he wants the help. :/

Respond

toclafane1 is now following Newton3788 - Nov 05, 2012

toclafane1 commented on a Snippet, !whois script - Nov 04, 2012

Updated with some Flood Protection....

Quote

[1:00am] <~Stewie> !whois Stewie
[1:00am] <&thunderbolt> Nick: Stewie
[1:00am] <&thunderbolt> Real Name: Stewie
[1:00am] <&thunderbolt> Address: I@m.Sexy.Stewie
[1:00am] <&thunderbolt> Channels: (Not Showing Channels >.<)
[1:00am] <&thunderbolt> Using Server: Irc.Torn.Com - Torn's Server
[1:00am] <&thunderbolt> Has Been Signed On For: 9Hours 29Minutes 27Seconds
[1:00am] <&thunderbolt> Has Been Idle For: 2Seconds
[1:00am] <~Stewie> !whois Stewie
[1:00am] *thunderbolt* This command can only be used once every 20 seconds!

Respond

toclafane1 commented on a Snippet, IP Address Locator - Oct 30, 2012

Quote

RicJames
How is it irrelevant? I don't see you "encouraging" other's who seek help to write their own. And it's pretty obvious you're sick of me at least asking for help.

I realise this was said 2 years ago, but any way. I've seen Jethro to be one of the people who provides the most help on this site. Also great work Ford_Lawnmower. :)

Respond

toclafane1 is now following SunnyD - Oct 29, 2012

toclafane1 - Oct 29, 2012

Just wondering if anyone else has the same issue - when I go to log in with my Facebook, I have to click "Log in to Facebook" twice to log in.

2 Responses

toclafane1 is now following Hawkee - Oct 25, 2012

toclafane1 is now following DEATHJ0KER - Oct 24, 2012

toclafane1 commented on a Snippet, Spin The Bottle - Oct 24, 2012

Updated. :)

Respond

toclafane1 commented on a Snippet, English Slang Definition Checker - Oct 20, 2012

Thanks mate.

Quote

[1:08am] <&thunderbolt> Early English term for

Respond

toclafane1 commented on a Snippet, English Slang Definition Checker - Oct 20, 2012

Why do I keep getting "\" in the text?

Quote

[10:19pm] <&thunderbolt> Early English term for \

Respond

toclafane1 commented on a Snippet, $chr(#) search Dialog II - Oct 17, 2012

Why the bad use of $chr() ? @Ghost-writer :P

Respond

toclafane1 commented on a Snippet, Random Quote Bot Script - Oct 17, 2012

Quote

[8:47am] <~Stewie> @Quote
[8:47am] <&thunderbolt> Searching for your Quote. Please wait........
[8:47am] <&thunderbolt> I don`t believe in quotas. America was founded on a philosophy of individual rights, not group rights. by Clarence Thomas

Thank you. :)

Respond

toclafane1 commented on a Snippet, Random Quote Bot Script - Oct 16, 2012

I did try it, and it didn't work. Would be a nice addition to my bot though!

Quote

[12:17am] <~Stewie> @quote
[12:17am] <&thunderbolt> Searching for your Quote. Please wait........

and that's all I got.,,,

Respond