Cut Scripts

[Scribe]

on 1:input:*: {
/if ($len($1-) > 405) {
%cuttext = $remove($1-,$left($1-,405))
/timerCut 1 1 /say 1 (14C1o14n1t14i1n14u1e14d1)14 %cuttext
}
}.

-Or-

on 1:input:*: {
if ($len($1-) > 420) {
{ %pos = 420
:loop
if %pos < 390 goto end |
%chara = $mid($1-,%pos,1)
if $asc(%chara) == 32 goto end |
%pos = %pos - 1
goto loop
:end
}
%first = $left($1-,%pos - 1)
%cuttext = $remove($1-,%first)
%prefix = $left(%first,4)
%mtch = { /me }
if (%prefix == %mtch) { %metxt = $remove(%first,%mtch) | /me %metxt } | /else { /say %first }
/say %cuttext
/halt
}
}

[Scribe]

Please note. This Cut script with not work with the newer mIRC. So if you have downloaded IRC in the last few months or even year, please understand that a cutscript is built inside already. Thank you.