[Gelöst] [Eggdrop] Nick change tcl

[Thoughless]

Hoffe ich bin richtig!

Ich "suche" eine tcl die Nickchanges in allen channels in denen der Eggdrop ist erkennt und z.b.: im channel #info-channel wiedergibt.

z.b.:
<eggdrop> NICK CHANGE user: Test123 ( ident@addy) änderte seinen Nick zu Test|offline

Habe gesucht und nichts gefunden. Da dieses Script nicht sehr gross ich glaube ich des es dieses gibt !


Thx im vorraus

---edit----

Sorry ich bin mit mit der tclTK nicht sicher da ich leider Totaler neuling bin! Was mann irgendwo brügsichtigen sollte!

Ich danke chaosKrieger :D

[ChaosKrieger]

antwort bekommst du sobald du mir sagen kannst was an deinem posting falsch war,

es gibt regeln die du nicht beachtet hast, diese wirst du jetzt suchen, und mir sagen welche das ist...

sorry, aber sollangsam glaube ich das regeln in einem forum nur nebensache sind

by Chaos

edit:

also, das hier war gemeint: http://www.coding-board.de/board/showthread.php?t=14930

tcl/tk == gui
tcl/sh == shell
usw..

---------------------------

zum problem:

bind NICK - * proc


NICK (stackable)

bind nick <flags> <mask> <proc>
procname <nick> <user@host> <handle> <channel> <newnick>

Description: triggered when someone changes nicknames. The mask is matched against '#channel newnick' and can contain wildcards. Channel is "*" if the user isn't on a channel (usually the bot not yet in a channel).


nachzulesen:

www.sleipnir18.de (http://www.sleipnir18.de) -> tcl -> tcl -commands -> "bind"

das script solltest du selbst auf die reihe bekommen.. ist nicht besonderst schwer

[Thoughless]

Nach durchgemachten nächten nerven anspannung bis zum letzten und kleinen erfolgen blieb nun eines egal was ich machte bestehen

[21:14:52] <Karma> [21:14] Tcl error [newnick]: invalid command name "newnick"
[21:14:52] <Karma> [21:14] Tcl error [newnick]: invalid command name "newnick"
[21:14:52] <Karma> [21:14] Tcl error [newnick]: invalid command name "newnick"
[21:14:52] <Karma> [21:14] Tcl error [newnick]: invalid command name "newnick"
[21:14:52] <Karma> [21:14] Tcl error [newnick]: invalid command name "newnick"


leider weiß ich nicht mehr weiter...vielleicht hat einer nen tipp für mich..


##### Aktive Chans #####

# * = Alle Chans

set nick_chans "*"

##### Ausgabe Chan #####

# "" = Keine Ausgabe im Chan

set ausgabe_chan_nick "#info-channel"

######Ab hier der Code#####

bind nick - * nkch

proc nkch {oldnick uhost handle chan newnick} {

global nick ausgabe_chan_nick nick_chans

if {$oldnick == $nick} {

putlog "$ausgabe_chan_nick $nkch:$oldnick hat nick in $nick gewechselt"

}

}

[ChaosKrieger]

proc nkch {oldnick uhost handle chan newnick} {
global ausgabe_chan_nick nick_chans
putlog "$ausgabe_chan_nick $oldnick hat nick in $newnick gewechselt"
}

mehr nicht ;)

By Chaos

[Thoughless]

naja dies Postet er in der Partyline..weder im info-channel noch einem andern-

Und ich verstehe nicht was das error zu bedeutet hat..warum sagt bzw. tuht er es!

[21:35:50] <Karma> [21:35] #info-channel Creed1 hat nick in Creed2 gewechselt
[21:35:50] <Karma> [21:35] Tcl error [newnick]: invalid command name "newnick"
[21:35:50] <Karma> [21:35] #info-channel Creed1 hat nick in Creed2 gewechselt
[21:35:50] <Karma> [21:35] Tcl error [newnick]: invalid command name "newnick"
[21:35:50] <Karma> [21:35] #info-channel Creed1 hat nick in Creed2 gewechselt
[21:35:50] <Karma> [21:35] Tcl error [newnick]: invalid command name "newnick"
[21:35:50] <Karma> [21:35] #info-channel Creed1 hat nick in Creed2 gewechselt
[21:35:50] <Karma> [21:35] Tcl error [newnick]: invalid command name "newnick"
[21:35:50] <Karma> [21:35] #info-channel Creed1 hat nick in Creed2 gewechselt
[21:35:50] <Karma> [21:35] Tcl error [newnick]: invalid command name "newnick"

[ChaosKrieger]

er macht es schon richtig, allerdings is die fehlermeldung etwas komisch..


bind nick - * nickchance
proc nickchance {oldnick uhost handle chan newnick} {
putserv "PRIVMSG #info-channel : $oldnick hat nick in $nick gewechselt"
}


versuch es mal so, und mach alles andere raus, das is das gesammte script

[Thoughless]

ne ich weiß echt null was des sein kann! Und er postet es nich im #info-channel

[21:47:40] <Karma> [21:47] Tcl error [nickchance]: can't read "nick": no such variable
[21:47:40] <Karma> [21:47] #info-channel Creed2 hat nick in Creed1 gewechselt
[21:47:40] <Karma> [21:47] Tcl error [nkch]: wrong # args: should be "putserv text ?options?"
[21:47:40] <Karma> [21:47] Tcl error [newnick]: invalid command name "newnick"
[21:47:40] <Karma> [21:47] Tcl error [nickchance]: can't read "nick": no such variable
[21:47:40] <Karma> [21:47] #info-channel Creed2 hat nick in Creed1 gewechselt
[21:47:40] <Karma> [21:47] Tcl error [nkch]: wrong # args: should be "putserv text ?options?"
[21:47:40] <Karma> [21:47] Tcl error [newnick]: invalid command name "newnick"
[21:47:40] <Karma> [21:47] Tcl error [nickchance]: can't read "nick": no such variable
[21:47:40] <Karma> [21:47] #info-channel Creed2 hat nick in Creed1 gewechselt
[21:47:40] <Karma> [21:47] Tcl error [nkch]: wrong # args: should be "putserv text ?options?"
[21:47:40] <Karma> [21:47] Tcl error [newnick]: invalid command name "newnick"
[21:47:40] <Karma> [21:47] Tcl error [nickchance]: can't read "nick": no such variable
[21:47:40] <Karma> [21:47] #info-channel Creed2 hat nick in Creed1 gewechselt
[21:47:40] <Karma> [21:47] Tcl error [nkch]: wrong # args: should be "putserv text ?options?"
[21:47:40] <Karma> [21:47] Tcl error [newnick]: invalid command name "newnick"
[21:47:40] <Karma> [21:47] Tcl error [nickchance]: can't read "nick": no such variable
[21:47:40] <Karma> [21:47] #info-channel Creed2 hat nick in Creed1 gewechselt
[21:47:40] <Karma> [21:47] Tcl error [nkch]: wrong # args: should be "putserv text ?options?"
[21:47:40] <Karma> [21:47] Tcl error [newnick]: invalid command name "newnick"

[ChaosKrieger]

lol.. irgendwas machst du falsch...

benutze mal mein code, und las den bot neu starten.. da hängt noch irgendwas im hintergrund

[Thoughless]

so hab mal das $nick in $newnick geändert da die fehler meldung noch kam...



bind nick - * nickchange

proc nickchange {oldnick uhost handle chan newnick} {

putserv "PRIVMSG #info-channel : $oldnick hat nick in $newnick gewechselt"

}






Das klappt auch und er Postet es im #info-channel! Aber 4 mal weil die bots in 4 channels sind ? wie kann ich das unterbinden das er es nur einmal postet

[22:03:33] <Karma> Creed hat nick in Creed1 gewechselt
[22:03:34] <Karma> Creed hat nick in Creed1 gewechselt
[22:03:34] <Karma> Creed hat nick in Creed1 gewechselt
[22:03:36] <Karma> Creed hat nick in Creed1 gewechselt
[22:03:38] <Karma> Creed hat nick in Creed1 gewechselt

[ChaosKrieger]

set ::nick 0
bind nick - * nickchange
proc nickchange {oldnick uhost handle chan newnick} {
if {$::nick != $oldnick} {
putserv "PRIVMSG #info-channel : $oldnick hat nick in $newnick gewechselt"
set ::nick $oldnick
}
}


sollte so funktionieren

[ind00r]

du könntest eine variable beim ersten nickchange setzen und diese nach ein paar sekunden auslaufen lassen, bei jeden nickchange muss dann eine überprüfung da sein, ob die Variable gesetzt ist, oder nicht, falls ja -> return 0

[Thoughless]

hmm nein der bot ändert den nick ?


[22:13:02] <Karma> Creed1 hat nick in Creed2 gewechselt
[22:13:03] * Karma is now known as Creed1
[22:13:09] <Creed1> Karma hat nick in Creed1 gewechselt
[22:13:11] * Creed1 is now known as Karma
[22:13:15] <Karma> Creed1 hat nick in Karma gewechselt
[22:13:17] * Karma is now known as Creed1
[22:13:21] <Creed1> Karma hat nick in Creed1 gewechselt
nun weiß ich ned warum...

[ChaosKrieger]

lol.. hab nicht ganz mit gedacht :)


set ::cnick 0
bind nick - * nickchange
proc nickchange {oldnick uhost handle chan newnick} {
if {$::cnick != $oldnick} {
putserv "PRIVMSG #info-channel : $oldnick hat nick in $newnick gewechselt"
set ::cnick $oldnick
utimer 20 [unset ::cnick]
}
}

[Thoughless]

Also er macht die ausgabe im channel! Und er stürzt nicht ab!

aber eine kleinigkeit

[22:29:09] <Karma> [22:29] Tcl error [nickchange]: can't unset "cnick": no such variable

[ChaosKrieger]

set ::cnick 0
bind nick - * nickchange
proc nickchange {oldnick uhost handle chan newnick} {
if {$::cnick != $oldnick} {
putserv "PRIVMSG #info-channel : $oldnick hat nick in $newnick gewechselt"
set ::cnick $oldnick
}
}


dann machs so, das reicht

[Thoughless]

So nun hat alles geklappt! danke danke danke!

[olli43berlin]

hier der script der dir einen nickwechsel anzeigt. füge ihn untet Tools- scripteditor- remote einfach ein und speicher das wars.




on ^*:JOIN:#: {
if ($nick == $me) { halt }
var %NickMatch = $Check($site)
if ((%NickMatch != $nick) && (%NickMatch != $null) && ($ial($address($nick,2),0) == 1)) {
echo $chan [NICK]-[ nick wurde gewechselt..! 4 $nick 1 war vorher als4 $Check($site) 1auf $network unterwegs ]-[NICK]
}
}
on ^*:PART:#: { if ($nick != $me) { writeini -n $shortfn(Nicks.ini) Hosts $site $nick | CLimit } }
on ^*:NICK: { if ($nick != $me) { writeini -n $shortfn(Nicks.ini) Hosts $site $nick | CLimit } }
on ^*:KICK:#: { if ($knick != $me) { writeini -n $shortfn(Nicks.ini) Hosts $site $nick | CLimit } }
on ^*:QUIT: { if ($nick != $me) { writeini -n $shortfn(Nicks.ini) Hosts $site $nick | CLimit } }
alias Check { var %NickCheck = $readini $shortfn(Nicks.ini) Hosts $1 | return %NickCheck }
alias CLimit { if ($file(Nicks.ini).size > 60000) .write -c $shortfn(Nicks.ini) }