irchainscriptz

irchainscriptz

Joined
Jul 15, 2008
Occupation
Renovations
Location
Montreal Quebec
Website
Interests
Scripting ..Hockey..Roller Blading...Mountain Climbing & More

Activity Stream

irchainscriptz   -  Sep 05, 2012

Happy Birthday Wes aka Eyecu

Image

 Respond  
irchainscriptz commented on a mIRC Script,   NeCRoNoMiCoN³ Eng powered HAWKEE  -  Jun 08, 2012

nice when will it be released?

 Respond  
irchainscriptz commented on a Page, IMDb search for eggdrop  -  May 29, 2012

Nice FordLawnmower

 Respond  
irchainscriptz commented on a Page, IRCop connect/exit windows  -  May 22, 2012

nice but I prefer this one instead all info in a window.

on *:BAN:# {
  if (!$window(@Network-Logs)) window -n @Network-Logs
  echo -t @Network-Logs 4 $server  5? BAN4 : ( $+ $chan $+ )( $+ $nick $+ ) BANNED ( $+ $bnick $+ ): $1-
}

on *:KICK:# {
  if (!$window(@Network-Logs)) window -n @Network-Logs
  echo -t @Network-Logs 4 $server  5? KICK4 : ( $+ $chan $+ )( $+ $nick $+ ) KICKED ( $+ $knick $+ ): $1-
} 

on *:NICK: {
  if (!$window(@Network-Logs)) window -n @Network-Logs
  echo -t @Network-Logs 4 $server  5? NICK CHANGE4 :( $+ $nick $+ ) CHANGED TO ( $+ $newnick $+ ) ( $+ $time $+ )
}

on *:RAWMODE:# {
  if (!$window(@Network-Logs)) window -n @Network-Logs
  echo -t @Network-Logs 4 $server  5? RAWMODE4 : ( $+ $chan $+ )( $+ $nick $+ ) $1-
}

on *:MODE:# {
  if (!$window(@Network-Logs)) window -n @Network-Logs
  echo -t @Network-Logs 4 $server  5? MODE4 : ( $+ $chan $+ )( $+ $nick $+ ) $1-
}

on *:QUIT: {
  if (!$window(@Network-Logs)) window -n @Network-Logs
  echo -t @Network-Logs 4 $server  5? QUIT4 : ( $+ $nick $+ )( $+ $time $+ )
}

on *:notice:*:*: {
  if ($nick == $me) { return }
  if (!$window(@Network-Logs)) window -n @Network-Logs
  echo -t @Network-Logs 4 $server  5? NOTICE4 :( $+ $nick $+ ): $1-
}

on *:snotice:*: {
  if (!$window(@Network-Logs)) window -n @Network-Logs
  echo -t @Network-Logs 4 $server  5? SERVERNOTICE4 : $1-
}

menu @Network-Logs {
  Clear: clear $active
  Close: close -@ $active
}
 Respond  
irchainscriptz commented on a Page, Now playing Radio Station (shoutcast based)  -  May 17, 2012

Nice likes!!

 Respond  
irchainscriptz commented on a Page, Keyboard - Disco & Chain v7.0 (Pre-released)  -  Apr 27, 2012

your going to have to give credit for using my name hahahahahaha

 Respond  

No it was meant to show you how to get urls and that RSS feeds are not limited on IRC. I'll have a gander at it and see what I come up with.

 Respond  

Here's a look at what I mean

Image

 Respond  

They work great on any chat server, depending how the code is done, for instance a good friend of mine uses tinyurl to get the feeds. here's an example

on *:Join:*: { 
  if ($nick == $me) { 
    .timer.hawkee 0 15 hawkee 
 } 
}

; Menu =====================================================================================
menu channel {
  Feeder
    .$iif(%Feed.hknews. [ $+ [ $active ] ] == on,$style(1)) Hawkee: $iif(%Feed.hknews. [ $+ [ $active ] ] == on,unset %Feed.hknews. [ $+ [ $active ] ],set %Feed.hknews. [ $+ [ $active ] ] on)
    .-
  .Add All $chan : {
    set %Feed.hknews. [ $+ [ $active ] ] on
  }
  .Remove All $chan : unset %Feed.*. [ $+ [ $active ] ]
  .-
  .Clear Saved Topics: unset %Topic.*
}  

; Aliases ==================================================================================
alias striphtml {
  if (!$isid) || (!$1) return
  var %H = $1 , %T = $regsub(%H,/(<[^>]+>)/g,,%H)
  if ($chr(38) isin %H) {
    set %H $replacecs(%H,&#x26;,&,&quot;," ,&lt;,< ,&gt;,> ,&amp;,& ,&nbsp;,$iif($prop,$chr($prop),$chr(32)) ,&pound;,£ ,&sect;,$chr(36) ,&uml;,¨ ,&laquo;,« ,&raquo;,» ,&szlig;,ß, &Ntilde;,Ñ ,&ntilde;,ñ,&#39;,')
    set %H $replacecs(%H,&Agrave;,À ,&Aacute;,Á ,&Acirc;, ,&Atilde;,à ,&Auml;,Ä ,&Aring;,Å ,&AElig;,Æ ,&agrave;,à ,&aacute;,á ,&acirc;,â ,&atilde;,ã ,&auml;,ä ,&aring;,å ,&aelig;,æ)
    set %H $replacecs(%H,&Egrave;,È,&Eacute;,É,&Ecirc;,Ê,&Euml;,Ë,&egrave;,è,&eacute;,é,&ecirc;,ê,&euml;,ë,&Igrave;,Ì,&Iacute;,Í,&Icirc;,Î,&Iuml;,Ï,&igrave;,ì,&iacute;,í,&icirc;,î)
    set %H $replacecs(%H,&iuml;,ï,&Ograve;,Ò,&Oacute;,Ó,&Ocirc;,Ô,&Otilde;,Õ,&Ouml;,Ö,&Oslash;,Ø,&ograve;,ò,&oacute;,ó,&ocirc;,ô,&otilde;,õ,&ouml;,ö,&oslash;,ø,&Ugrave;,Ù,&Uacute;,Ú,&Ucirc;,Û,&Uuml;,Ü,&Yacute;,Ý,&ugrave;,ù,&uacute;,ú,&ucirc;,û,&uuml;,ü,&yacute;,ý,&yuml;,ÿ)
  }
  return %H
}
alias turl {
  var %s tinyURL. $+ $ticks
  sockopen %s tinyurl.com 80
  sockmark %s $1 $2 $4 $5 $3
}
on *:sockopen:TinyURL.*: { sockwrite -tn $sockname $+(GET /api-create.php?url= $+ $gettok($sock($sockname).mark,3,32) HTTP/1.1,$crlf,Host: tinyurl.com,$crlf,$str($crlf,2)) }
on *:sockread:TinyURL.*:{
  var %r | sockread %r
  if ($left(%r,7) == HTTP://) {
    var %f 1
    while ($chan(%f)) { 
      var %g $gettok($sock($sockname).mark,2,32) $+ . $+ $chan(%f)
      if (%FEED. [ $+ [ %g ] ] == on) && (($me isop $chan(%f)) || ($me ishop $chan(%f))) { 
        msg $chan(%f) $gettok($sock($sockname).mark,1,32) Topic Update: $striphtml($gettok($sock($sockname).mark,5-,32)) - %r $iif($gettok($sock($sockname).mark,4,32) != n/a,- by $striphtml($gettok($sock($sockname).mark,4,32))) 
      }
      inc %f
    }
  }
}
; Hawkee ======================================================================================
alias hawkee {
  if ($status != connected) { halt }
  sockclose hawkeeforum
  sockopen hawkeeforum hawkee.com 80
  if (%Topic.HAWKEE == $null) { set %Topic.HAWKEE on }
  set %hawkee.check 1
}
on *:sockopen:hawkeeforum: { 
  if ($sockerr) { sockclose $sockname | halt }
  sockwrite -n $sockname GET /comment.rss.php HTTP/1.1
  sockwrite -n $sockname Host: www.hawkee.com
  sockwrite -n $sockname $crlf
}
on *:sockread:hawkeeforum: {
  if ($sockerr > 0) return
  var %hawkee
  sockread %hawkee
  if (%hawkee == 0) || (%hawkee.check > 3) { 
    sockclose $sockname 
    if (%hawkee.linktemp != $null) && (%hawkee.linktemp != on) && (%hawkee.linktemp != %Topic.HAWKEE) {
      set %Topic.HAWKEE %hawkee.linktemp
      $turl(Hawkee,hknews,$striphtml(%hawkee.title),$replace(%hawkee.linktemp,&amp;,&),n/a)
    }
    unset %hawkee.* 
  }
  else {
    if (%hawkee.check == 1) var %hawkeer = /<item>/ig
    if (%hawkee.check == 2) var %hawkeer = /<title>(.*)<\/title>/ig
    if (%hawkee.check == 3) var %hawkeer = /<link>(.*)<\/link>/ig
    if ($regex(hawkeeforum, %hawkee, %hawkeer) > 0) {
      if (%hawkee.check == 2) set %hawkee.title $regml(hawkeeforum,1)
      if (%hawkee.check == 3) set %hawkee.linktemp $regml(hawkeeforum,1)
      inc %hawkee.check
    }
  }
}

The creator of this is err0r from TG007.net

 Respond  
irchainscriptz commented on a Page, Hawkee User Profile Lookup (Search by Nicknames)  -  Mar 28, 2012

Great Job Jethro!!

 Respond  
irchainscriptz commented on a mIRC Script, DCX & MDX StatusBar  -  Mar 28, 2012

Yup very nice ..used it and like it 10/10 Very useful!!

 Respond  
irchainscriptz commented on a mIRC Script, mIRC DeluXe II - The Lost Version  -  Mar 13, 2012

Image

Nice job N3M3S1S

 Respond  
irchainscriptz commented on a Page, Give Of The Day  -  Feb 23, 2012

Hey had a friend do one err0r from TG007 with also the time remaining!! only thing you have to add your room name!!

1.
alias giveaway {

 2.
  sockclose give | sockopen give www.giveawayoftheday.com 80

 3.
}

 4.
on *:sockopen:give: {

 5.
  if ($sockerr) { echo -s $sockname error | sockclose give }

 6.
  else {

 7.
    sockwrite -n $sockname GET / HTTP/1.1

 8.
    sockwrite -n $sockname Host: giveawayoftheday.com

 9.
    sockwrite -n $sockname $crlf

 10.
  }

 11.
}

 12.
on *:sockread:give: {

 13.
  var %give.temp

 14.
  sockread %give.temp

 15.
  if ($regex(%give.temp,/<title>(.*)<\/title>/)) { set %giveaway.title $regml(1) }

 16.
  if ($regex(%give.temp,/<a href=\"http:\/\/www.giveawayoftheday.com\/(.*?)\/\">/)) { set %giveaway.link $regml(1) }

 17.
  if ($regex(%give.temp,/(.*)<!--\/mfunc-->(.*)<\/p>/)) { set %giveaway.time $regml(1) | msg $+($chr(37),$chr(35),Room Name Here) Free Giveaway of the Day: $htmlfree($remove(%giveaway.title,Giveaway of the Day - free licensed software daily.)) | msg $+($chr(37),$chr(35),Room Name Here) http://www.giveawayoftheday.com/ $+ %giveaway.link $+ / | msg $+($chr(37),$chr(35),ROOM Name Here) Time remaining : %giveaway.time | sockclose $sockname  }

 18.
}

 19.
alias -l htmlfree {

 20.
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;n&deg;,&quot;&#8217;)

 21.
  return %x

 22.
}
 Respond  
irchainscriptz commented on a Page, Clone killer  -  Dec 07, 2011

Nice snippet there xdesoto

 Respond  
irchainscriptz commented on a Page, Wraith mp3  -  Nov 16, 2011

Should Add a screenshot so people could see it.

 Respond  
irchainscriptz commented on a mIRC Script,   NeCRoNoMiCoN³ Eng powered HAWKEE  -  Nov 08, 2011

Pangaea just go to your profile and select site preferences and click no to email notifications..simple boom done!!

 Respond  
irchainscriptz commented on a mIRC Script,   NeCRoNoMiCoN³ Eng powered HAWKEE  -  Nov 08, 2011

stop bugging him so he can continue and maybe finish it faster LOL

 Respond  
irchainscriptz commented on a Page, kvirc to mIRC Avatars  -  Oct 25, 2011

Yes it dose. its a IRC client based on the GUI and is extremly devolped by Szymon Stefanek and also least not forget the developement Team which consists of IRC addicted developers around the world. So this is still continuing with all developers across the world and there are constant updates and new added plugins. As is also the IceChat made by Snerf. But all clients are done in there different Languages and like here this is what brings us to scripting. Good Snippet to bring it to a regular mIRC TMFKSOFT

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.