irc:nnscript:acrohack

Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen angezeigt.

Link zu dieser Vergleichsansicht

Beide Seiten der vorigen Revision Vorhergehende Überarbeitung
irc:nnscript:acrohack [2008/12/15 18:48] – G5 psycoreirc:nnscript:acrohack [2008/12/15 21:06] (aktuell) – psycore
Zeile 1: Zeile 1:
 +====== Acromancer Hack nnscript ======
  
 +===== events.nns 4.20 =====
 +
 +Zeile 124:
 +
 +<code mirc>
 +on *:input:#:{ process.input $1- }
 +on *:input:?:{ process.input $1- }
 +</code>
 +
 +ändern in
 +
 +<code mirc>
 +;-------------------------------------------------------
 +;commented out for acromancer compatibility
 +;on *:input:#:{ process.input $1- }
 +;on *:input:?:{ process.input $1- }
 +;-------------------------------------------------------
 +</code>
 +
 +===== events.nns 4.21 =====
 +
 +Zeile 124
 +
 +Löschen:
 +<code mirc>
 +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
 +    }
 +  }
 +}
 +</code>
 +
 +===== events.nns 4.22 =====
 +
 +Zeile 100 löschen:
 +
 +<code mirc>
 +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
 +    }
 +  }
 +}
 +</code>
 +
 +Zeile 140 löschen:
 +
 +<code mirc>
 +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
 +    }
 +  }
 +}
 +</code>