Difference between revisions of "Cutscript"

Revision as of 14:10, 9 June 2008

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.

on *:input:*: {

 if ( ( $left($1,1) != / ) || ( $1 == /me ) ) {
   var %next = -
   var %continue = -
   var %done =  -|
   var %more = -
   var %textlen = $len($1-)
   if (%textlen > 400) {
     var %pos = 1
     var %text = $mid($1-, %pos, 400)
     var %firsttime = 1
     while ( %text != $null ) {
       if ( $len($deltok(%text, -1, 32)) < 370 ) {
         %text = $left(%text, 370)
         inc %pos 370
       }
       else {
         %text = $deltok(%text,-1,32)
         inc %pos $len(%text)
         inc %pos
       }
       var %outtext = %text
       %text = $mid($1-, %pos, 400)
       if (%firsttime == 1) {
         if ($gettok(%outtext, 1, 32) == /me) {
           %outtext %next
         }
         else {
           say %outtext %next
         }
         %firsttime = 0;
       }
       else {
         if (%text != $null) {
           say %continue %outtext %next
         }
         else {
           if (%textlen <= 945) {
             say %continue %outtext %done
           }
           else {
             say %continue %outtext %more
           }
         }
       }
     }
     halt
   }
 }

}