Advertisement
nanyobis

Untitled

Feb 16th, 2014
195
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 1.14 KB | None | 0 0
  1. on @*:text:*:#Chan1,#A:{
  2.   addwininfo $nick $+ : $1-
  3.   var %CharLimit 192
  4.   if ($len($1-) > %CharLimit) { ban -ku1 $chan $nick Please do not spam. }
  5.  
  6.   ;above is every channel below is just one specific channel.
  7.   ;Just move the ; to the one you want to ignore
  8.  
  9.   ;if ($len($1-) > %CharLimit) && ($chan == #Chan1) { ban -ku1 $chan $nick Please do not enter too many characters in 1 post. }}
  10.  
  11.   ; Spam Kick/Ban v1.0.1
  12.   ; Put in remotes (alt+r) and change #chan
  13.   ; Bad sites list in %bad = *blah* *blah2*on @*:text:*:#Chan1,#A:{
  14.   var %a = 1, %bad = *example.com* *example.net* *example.org* *example.edu*, %c
  15.   while  ($gettok(%bad,%a,32)) {
  16.     %c = $v1
  17.     if ($wildtok($1-,%c,1,32)) { ban -ku1 # $nick 3 Banned for spamming | break }
  18.     inc %a
  19.   }
  20. }
  21. on *:action:*:#Chan1,#A:{ addwininfo * $nick $1- }
  22. on *:input:#Chan1,#A: {
  23.   if (($left($1,1) != /) || ($1 == /me)) {
  24.     if ($1 == /me) { addwininfo  * $+($me) $2- }
  25.     else { addwininfo  $me $+ : $1- }
  26.   }
  27. }
  28. alias addwininfo {
  29.   var %w = @ChannelText
  30.   if (!$window(%w)) { window -Bdo +d %w 566 472 816 150 | window -Bdo +d %w 566 472 816 150 }
  31.   aline -p %w $+($chr(2),$1) $2-
  32. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement