"auto-ban for too many characters and echo text in @window"
By nanyobis (https://pastebin.com/u/nanyobis)

URL: https://pastebin.com/93P6ScTR
Created on: Sunday 16th of February 2014 08:23:48 PM CDT
Retrieved on: Saturday 31 of October 2020 06:18:44 AM UTC


on *:text:*:#ExampleChannel1,#ExampleChannel2:{ 
  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 == #ExampleChannel1) { ban -ku2 $chan $nick Please do not enter too many characters in 1 post. }

}
on *:action:*:#ExampleChannel1,#ExampleChannel2:{ addwininfo * $nick $1- }
on *:input:#ExampleChannel1,#ExampleChannel2: {
  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-
}