Communauté sur les Eggdrops - Community about Eggdrops
Modification Script Chanrelay - Printable Version

+- Communauté sur les Eggdrops - Community about Eggdrops (https://forum.eggdrop.fr)
+-- Forum: Eggdrop et TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=8)
+--- Forum: Scripts TCL (https://forum.eggdrop.fr/forumdisplay.php?fid=4)
+--- Thread: Modification Script Chanrelay (/showthread.php?tid=1336)



Modification Script Chanrelay - protec - 21/04/2013

Bonjour,

Avec l'aide d Crazycat j'ai réussis à mettre en place le botnet relai.
c'est un script qui remplie très très bien l'ensemble des fonctions possible.
merci à lui c'est vraiment du beau travail.

Lien vers le script : http://forum.eggdrop.fr/Script-ChanRelay-3-t-703.html

Actuellement quand le bot renvoie les infos sur le chan de déstination :
(NIck@Network) message.........

Les modifications que j'aimerai réaliser :
-déplacer (Nick@Network) en fin de ligne donc apres message.....
-Supprimer (Nick@Network)

dans le pire des cas juste le déplacer en fin de ligne me suffit sachant que j'ai un script tcl qui a besoin de lire le premier mot de la ligne et donc cela me gêne.

je ne trouve pas dans le code ou le modifié je pense avoir trouvé pour retirer le Network mais pas pour le reste

je vous remercie vous votre aide.

Bonne après-midi


Protec.


RE: Modification Script Chanrelay - CrazyCat - 21/04/2013

Bon...
Déjà, merci de mettre un titre plus parlant que "modification script tcl". Et ne cherche pas, je l'ai déjà fait.

Ensuite, comme dit sur IRC, pour ne pas afficher le nom du réseau, c'est la directive "snet" qu'il faut mettre à "n", soit dans la configuration soit en faisant /msg eggdrop rc.net off

Et finalement, pour ne pas afficher le nick et le réseau, tu n'as pas du bien chercher. Il y a une procédure qui s'appelle make:user, il suffit de la modifier pour qu'elle ne retourne rien.
Donc :

tcl
# Generates an user@network name
    # based on nick and from bot
    proc make:user { nick frm_bot } {
		if {[string length $::crelay::hlnick] > 0 } {
			set ehlnick [string index $::crelay::hlnick 0]
		} else {
			set ehlnick ""
		}
	    array set him $::crelay::regg($frm_bot)
        if { $::crelay::me(snet) == "y" } {
            set speaker [concat "$::crelay::hlnick\($nick@$him(network)\)$ehlnick"]
        } else {
            set speaker $::crelay::hlnick$nick$ehlnick
        }
        return $speaker
    }

devient:

tcl
# Generates an user@network name
    # based on nick and from bot
    proc make:user { nick frm_bot } {
        return ""
    }

Pas bien dur, non ?


RE: Modification Script Chanrelay - protec - 21/04/2013

un grand merci.
je vais faire les modifications dans l'après-midi