KinKinnyKith

KinKinnyKith

Joined
Feb 02, 2012

Activity Stream

KinKinnyKith is now following nox`  -  Jul 06, 2013
KinKinnyKith liked a Web App, Regex101 - free regular expression tool  -  Jul 06, 2013
KinKinnyKith is now following FordLawnmower  -  Sep 04, 2012
KinKinnyKith is now following Lindrian  -  Sep 04, 2012
KinKinnyKith commented on a Page, here  -  May 30, 2012
 Respond  
KinKinnyKith is now following kiri  -  May 08, 2012
KinKinnyKith created a Page  -  Feb 20, 2012
1 288 

Long /me action messages sent over the Justin.TV IRC Network are not displayed as actions by XChat-WDK clients. This requested snippet corrects this quirk.

 Respond   Perl  
KinKinnyKith commented on a Page, /BANSYNC Channel Ban Synchronization  -  Feb 04, 2012

Nice 8)

Sharing a modification that was requested to handle the case where the ban list is not populated for the source channel, and also bot trigger:

on *:text:!bansync*:#: { if (($nick isop $chan) || ($nick ishop $chan)) { bansync $2 $$3 } }
alias bansync {
  if (($me !isop $1) && ($me !ishop $1)) { echo -a Not an operator on $1 | return }
  if ($me !ison $$2) { echo -a Not on channel $2 | return }
  echo -a Synchronizing the banlist of $1 to the banlist of $+($2,.)
  if (!$chan($2).ibl) { set -e %BanSync $1 $2 | .enable #BanSync | .timerBanSyncTimeout 1 8 modesync $1 $2 timeout | mode $2 +b }
  else { modesync $1 $2 }
}
#BanSync off
raw 368:*: { .timerBanSyncTimeout off | .disable #BanSync | if (%BanSync) { modesync %BanSync | unset %BanSync } }
#BanSync end
alias -l modesync {
  if ($3) { .disable #BanSync }
  var %x $ibl($2,0)
  while %x {
    var %y $addtok(%y,$ibl($2,%x),32)
    if $numtok(%y,32) == $modespl { mode $1 + $+ $str(b,$modespl) %y | var %y $null }
    dec %x
  }
  if %y { mode $1 + $+ $str(b,$modespl) %y }
}
 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.