Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


Plainte.tcl
#1
Bonjour je voudrais savoir si sa serai possible de me créer un plainte.tcl pour mettre sur mon eggdrop pour mon serv. j'ai deja une source qui fonctionne que je voudrai améliorer.


tcl
###############
# Plainte.tcl #
###############
 
bind msgm - "*" plainte:send 
proc plainte:send { nick uhost hand arg } {
    set backroom "#Plainte"
    if { [string equal -nocase [lindex $arg 1] "plainte"] } {
        putserv "PRIVMSG $backroom :\[ Plainte \] [lindex $arg 0] contre [lrange $arg 2 end]"
	  putserv "NOTICE $nick :Votre plainte as été déposé au service abus. Merci de patienter."
    } 
}


Donc je voudrais qu'il enregistre les plaintes sur un fichier .txt
Que je tape !list pour avoir toute la liste des plaintes en notice.
quand je tape !read N° de la plainte ( !read 1 ) elle s'affiche sur le salon #Plainte et envoi une notice as la personne qui as porter plainte pour lui dire que la plainte as ete prise en charge par le service abus
et enfin un !del N° de la plainte ( !del 1 ) pour l'effacer de la base txt.

Merci D'avance.
Cordialement Aragorn


Messages In This Thread
Plainte.tcl - by Aragorn - 22/12/2008, 17:16
RE: Plainte.tcl - by CrazyCat - 23/12/2008, 10:08
RE: Plainte.tcl - by LitteulBlack - 25/12/2008, 20:11
RE: Plainte.tcl - by Babytigrou16 - 24/12/2008, 04:24
RE: Plainte.tcl - by CrazyCat - 24/12/2008, 10:28
RE: Plainte.tcl - by Babytigrou16 - 24/12/2008, 21:22
RE: Plainte.tcl - by Aragorn - 27/12/2008, 17:52
RE: Plainte.tcl - by MorDenX - 11/04/2009, 23:32
RE: Plainte.tcl - by MorDenX - 13/04/2009, 01:56
RE: Plainte.tcl - by MorDenX - 14/04/2009, 12:36
Plainte TCL et Server ????? - by Babytigrou16 - 11/01/2009, 18:06
RE: Plainte TCL et Server ????? - by CrazyCat - 11/01/2009, 19:39

Possibly Related Threads…
Thread Author Replies Views Last Post
  Plainte avec contrôle anti flood Amand 0 203 02/09/2022, 18:34
Last Post: Amand
  [Résolu] Commande /plainte pseudo raison gérer par un eggdrop avec un alias Unrealircd Alucard`68 3 4,048 01/02/2017, 03:39
Last Post: Alucard`68
Money_euro Système de plainte BlackNight 9 6,423 26/06/2009, 16:18
Last Post: Merwin

Forum Jump:


Users browsing this thread: 1 Guest(s)