irc:nnscript:acrohack

Acromancer Hack nnscript

Zeile 124:

on *:input:#:{ process.input $1- }
on *:input:?:{ process.input $1- }

ändern in

;-------------------------------------------------------
;commented out for acromancer compatibility
;on *:input:#:{ process.input $1- }
;on *:input:?:{ process.input $1- }
;-------------------------------------------------------

Zeile 124

Löschen:

on *:input:?:{
  var %ul = $minirc.actchan
  if (!$halted) {
    if ($inpaste) {
      .timerpaste -io 1 0 dopaste
      haltdef
    }
    elseif (!$cmdchar($1)) || ($ctrlenter) {
      inc %stat.writtenchars $len($1-)
      inc %stat.writtenwords $0
      inc %stat.writtenlines
      if ($right($1-,1) == ?) { inc %stat.writtenqu }
      if (%ul) && (!$ctrlenter) && (%nick.comp) && ($right($1,1) isin %nick.comp.chr) && ($len($1) > 3) {
        var %r = $n.comp($left($1,-1),0)
        if (%r > 1) {
          set %nickcomp.text $1-
          set %nickcomp.chan %ul
          if (!$dialog(nickcomp)) {
            nndlg $iif($active == @MinIRC,-mdo,-m) nickcomp
            while (%r) {
              did -a nickcomp 3 $n.comp($left($1,-1),%r)
              dec %r
            }
            did -c nickcomp 3 1
          }
          haltdef
          return
        }
        elseif ($n.comp($left($1,-1),0)) {
          var %x = $replace(%nickcomp.format,<nick>,$n.comp($left($1,-1),1))
          msg %ul $iif($cchan(%ul),$strip(%x),%x) $2-
          haltdef
          return
        }
      }
      if (%away.ipback) && (%away.status) { back }
      msg %ul $1-
      haltdef
    }
  }
}
on *:input:#:{
  var %ul = $minirc.actchan
  if (!$halted) {
    if ($inpaste) {
      .timerpaste -io 1 0 dopaste
      haltdef
    }
    elseif (!$cmdchar($1)) || ($ctrlenter) {
      inc %stat.writtenchars $len($1-)
      inc %stat.writtenwords $0
      inc %stat.writtenlines
      if ($right($1-,1) == ?) { inc %stat.writtenqu }
      if (%ul) && (!$ctrlenter) && (%nick.comp) && ($right($1,1) isin %nick.comp.chr) && ($len($1) > 3) {
        var %r = $n.comp($left($1,-1),0)
        if (%r > 1) {
          set %nickcomp.text $1-
          set %nickcomp.chan %ul
          if (!$dialog(nickcomp)) {
            nndlg $iif($active == @MinIRC,-mdo,-m) nickcomp
            while (%r) {
              did -a nickcomp 3 $n.comp($left($1,-1),%r)
              dec %r
            }
            did -c nickcomp 3 1
          }
          haltdef
          return
        }
        elseif ($n.comp($left($1,-1),0)) {
          var %x = $replace(%nickcomp.format,<nick>,$n.comp($left($1,-1),1))
          msg %ul $iif($cchan(%ul),$strip(%x),%x) $2-
          haltdef
          return
        }
      }
      if (%away.ipback) && (%away.status) { back }
      msg %ul $1-
      haltdef
    }
  }
}

Zeile 100 löschen:

on *:input:?:{
  var %ul = $minirc.actchan
  if (!$halted) {
    if ($inpaste) {
      .timerpaste -io 1 0 dopaste
      haltdef
    }
    elseif (!$cmdchar($1)) || ($ctrlenter) {
      inc %stat.writtenchars $len($1-)
      inc %stat.writtenwords $0
      inc %stat.writtenlines
      if ($right($1-,1) == ?) { inc %stat.writtenqu }
      if (%ul) && (!$ctrlenter) && (%nick.comp) && ($right($1,1) isin %nick.comp.chr) && ($len($1) > 3) {
        var %r = $n.comp($left($1,-1),0)
        if (%r > 1) {
          set %nickcomp.text $1-
          set %nickcomp.chan %ul
          if (!$dialog(nickcomp)) {
            nndlg $iif($active == @MinIRC,-mdo,-m) nickcomp
            while (%r) {
              did -a nickcomp 3 $n.comp($left($1,-1),%r)
              dec %r
            }
            did -c nickcomp 3 1
          }
          haltdef
          return
        }
        elseif ($n.comp($left($1,-1),0)) {
          var %x = $replace(%nickcomp.format,<nick>,$n.comp($left($1,-1),1))
          msg %ul $iif($cchan(%ul),$strip(%x),%x) $2-
          haltdef
          return
        }
      }
      if (%away.ipback) && (%away.status) { back }
      msg %ul $1-
      haltdef
    }
  }
}

Zeile 140 löschen:

on *:input:#:{
  var %ul = $minirc.actchan
  if (!$halted) {
    if ($inpaste) {
      .timerpaste -io 1 0 dopaste
      haltdef
    }
    elseif (!$cmdchar($1)) || ($ctrlenter) {
      inc %stat.writtenchars $len($1-)
      inc %stat.writtenwords $0
      inc %stat.writtenlines
      if ($right($1-,1) == ?) { inc %stat.writtenqu }
      if (%ul) && (!$ctrlenter) && (%nick.comp) && ($right($1,1) isin %nick.comp.chr) && ($len($1) > 3) {
        var %r = $n.comp($left($1,-1),0)
        if (%r > 1) {
          set %nickcomp.text $1-
          set %nickcomp.chan %ul
          if (!$dialog(nickcomp)) {
            nndlg $iif($active == @MinIRC,-mdo,-m) nickcomp
            while (%r) {
              did -a nickcomp 3 $n.comp($left($1,-1),%r)
              dec %r
            }
            did -c nickcomp 3 1
          }
          haltdef
          return
        }
        elseif ($n.comp($left($1,-1),0)) {
          var %x = $replace(%nickcomp.format,<nick>,$n.comp($left($1,-1),1))
          msg %ul $iif($cchan(%ul),$strip(%x),%x) $2-
          haltdef
          return
        }
      }
      if (%away.ipback) && (%away.status) { back }
      msg %ul $1-
      haltdef
    }
  }
}
on *:input:@MinIRC:{
  var %ul = $minirc.actchan
  if (!$halted) {
    if ($inpaste) {
      .timerpaste -io 1 0 dopaste
      haltdef
    }
    elseif (!$cmdchar($1)) || ($ctrlenter) {
      inc %stat.writtenchars $len($1-)
      inc %stat.writtenwords $0
      inc %stat.writtenlines
      if ($right($1-,1) == ?) { inc %stat.writtenqu }
      if (%ul) && (!$ctrlenter) && (%nick.comp) && ($right($1,1) isin %nick.comp.chr) && ($len($1) > 3) {
        var %r = $n.comp($left($1,-1),0)
        if (%r > 1) {
          set %nickcomp.text $1-
          set %nickcomp.chan %ul
          if (!$dialog(nickcomp)) {
            nndlg $iif($active == @MinIRC,-mdo,-m) nickcomp
            while (%r) {
              did -a nickcomp 3 $n.comp($left($1,-1),%r)
              dec %r
            }
            did -c nickcomp 3 1
          }
          haltdef
          return
        }
        elseif ($n.comp($left($1,-1),0)) {
          var %x = $replace(%nickcomp.format,<nick>,$n.comp($left($1,-1),1))
          msg %ul $iif($cchan(%ul),$strip(%x),%x) $2-
          haltdef
          return
        }
      }
      if (%away.ipback) && (%away.status) { back }
      msg %ul $1-
      haltdef
    }
  }
}
  • irc/nnscript/acrohack.txt
  • Zuletzt geändert: 2008/12/15 21:06
  • von psycore