"Untitled"
By nanyobis (https://pastebin.com/u/nanyobis)

URL: https://pastebin.com/kyh1J6ez
Created on: Sunday 16th of February 2014 10:01:41 PM CDT
Retrieved on: Saturday 31 of October 2020 06:18:39 AM UTC


on *:text:*:#Chan1,#A:{ 
  addwininfo $nick $+ : $1- 
  var %CharLimit 192
  if ($len($1-) > %CharLimit) { ban -ku2 $chan $nick Please do not spam. }

  ;above is every channel below is just one specific channel.
  ;Just move the ; to the one you want to ignore

  ;if ($len($1-) > %CharLimit) && ($chan == #Chan1) { ban -ku2 $chan $nick Please do not enter too many characters in 1 post. }

  ;this script is to ban people who post certain links or say certain things
  if ($wildtok($1-,*example.com*,1,32)) { ban -ku2 $chan $nick Please do not spam. }
}
on *:action:*:#Chan1,#A:{ addwininfo * $nick $1- }
on *:input:#Chan1,#A: {
  if (($left($1,1) != /) || ($1 == /me)) {
    if ($1 == /me) { addwininfo  * $+($me) $2- }
    else { addwininfo  $me $+ : $1- }
  }
}
alias addwininfo {
  var %w = @ChannelText
  if (!$window(%w)) { window -Bdo +d %w 566 472 816 150 | window -Bdo +d %w 566 472 816 150 }
  aline -p %w $+($chr(2),$1) $2-
}