http://brokendagger.com/wiki/api.php?action=feedcontributions&feedformat=atom&user=12.189.32.36The Broken Dagger Wiki - User contributions [en]2026-07-26T18:02:24ZUser contributionsMediaWiki 1.22.5?title=CutscriptCutscript2008-04-24T03:22:22Z<p>12.189.32.36: </p>
<hr />
<div>A cutscript is a way to make IRC post more text than it will usually hold in its buffer. This script will (possibly) only work in mIRC, and handles up to three posts worth of text. Just put it into your Remote Scripts and load it.<br />
<br />
on *:input:*: {<br />
if ( ( $left($1,1) != / ) || ( $1 == /me ) ) {<br />
var %next = -<br />
var %continue = -<br />
var %done = -|<br />
var %more = -<br />
var %textlen = $len($1-)<br />
if (%textlen > 400) {<br />
var %pos = 1<br />
var %text = $mid($1-, %pos, 400)<br />
var %firsttime = 1<br />
while ( %text != $null ) {<br />
if ( $len($deltok(%text, -1, 32)) < 370 ) {<br />
%text = $left(%text, 370)<br />
inc %pos 370<br />
}<br />
else {<br />
%text = $deltok(%text,-1,32)<br />
inc %pos $len(%text)<br />
inc %pos<br />
}<br />
var %outtext = %text<br />
%text = $mid($1-, %pos, 400)<br />
if (%firsttime == 1) {<br />
if ($gettok(%outtext, 1, 32) == /me) {<br />
%outtext %next<br />
}<br />
else {<br />
say %outtext %next<br />
}<br />
%firsttime = 0;<br />
}<br />
else {<br />
if (%text != $null) {<br />
say %continue %outtext %next<br />
}<br />
else {<br />
if (%textlen <= 945) {<br />
say %continue %outtext %done<br />
}<br />
else {<br />
say %continue %outtext %more<br />
}<br />
}<br />
}<br />
}<br />
halt<br />
}<br />
}<br />
}</div>12.189.32.36?title=CutscriptCutscript2008-04-24T03:19:33Z<p>12.189.32.36: </p>
<hr />
<div>A cutscript is a way to make IRC post more text than it will usually hold in its buffer. This script will (possibly) only work in mIRC, and handles up to three posts worth of text. Just put it into your Remote Scripts and load it.<br />
<br />
----<br />
<br />
on *:input:*:<br />
if ( ( $left($1,1) != / ) || ( $1 == /me ) ) {<br />
var %next = -<br />
var %continue = -<br />
var %done = -|<br />
var %more = -<br />
var %textlen = $len($1-)<br />
if (%textlen > 400) {<br />
var %pos = 1<br />
var %text = $mid($1-, %pos, 400)<br />
var %firsttime = 1<br />
while ( %text != $null ) {<br />
if ( $len($deltok(%text, -1, 32)) < 370 ) {<br />
%text = $left(%text, 370)<br />
inc %pos 370<br />
}<br />
else {<br />
%text = $deltok(%text,-1,32)<br />
inc %pos $len(%text)<br />
inc %pos<br />
}<br />
var %outtext = %text<br />
%text = $mid($1-, %pos, 400)<br />
if (%firsttime == 1) {<br />
if ($gettok(%outtext, 1, 32) == /me) {<br />
%outtext %next<br />
}<br />
else {<br />
say %outtext %next<br />
}<br />
%firsttime = 0;<br />
}<br />
else {<br />
if (%text != $null) {<br />
say %continue %outtext %next<br />
}<br />
if (%textlen <= 945) {<br />
say %continue %outtext %done<br />
}<br />
else {<br />
say %continue %outtext %more<br />
}<br />
}<br />
}<br />
}<br />
halt<br />
}<br />
}</div>12.189.32.36