+- Communauté Eggdrop (https://forum.eggdrop.fr)
+-- Forum : Eggdrop et scripts (https://forum.eggdrop.fr/forumdisplay.php?fid=8)
+--- Forum : Scripts (https://forum.eggdrop.fr/forumdisplay.php?fid=4)
+--- Sujet : Kick et KickBans rapides (/showthread.php?tid=483)
Kick et KickBans rapides - Meribre - 14/08/2009
Bonsoir
J'aimerais avoir les tcl pour
!poli pseudo !comp pseudo !sexe pseudo !racisme pseudo !pub pseudo
et !kpoli pseudo !kcom pseudo !ksexe pseudo !kracisme pseudo !kpub pseudo
J'aimerais avoir les mêmes options que chatland sur les kicks rapides
et kicks ban rapide mais que les gens axx puis s'en servir
Merci d'(avance
RE: Kick et KickBans rapides - heretoc - 14/08/2009
Si tu aurais un minimum rechercher divers tcl le propose sur le forum et de nombreuses explications donne comment faire , dsl d'etre "aggressif" comme disent certains mais le "J'aimerais avoir les tcl" j'aime pas trop ^^
M'enfin regarde la partie telechargement => Clam Moderation
RE: Kick et KickBans rapides - NimaG` - 25/08/2009
Un coup de bind, un coup de proc, un coup de putserv et c'est reglé ! Je suis en train de faire un méga script avec quasiment toute les commandes de server
RE: Kick et KickBans rapides - Babytigrou16 - 25/08/2009
je te donne un seul exemple et à toi de continuer le reste :)
tcl
bind pub - !flood flood
proc flood {nick uhost handle chan args} {
if {![isop $nick $chan] && ![ishalfop $nick $chan]} { putquick "PRIVMSG $nick Tu doit être Halfop pour utiliser cette commande"; return 0}
if {[lindex $args 0]!=""} {
set vnick [lindex $args 0]
if {![onchan $vnick $chan]} { putquick "PRIVMSG $nick $nick n'est pas sur $chan"; return 0}
putquick "KICK $chan $vnick $nick : Le flood ( grosse masse de texte inutile ) est interdit !"
return
} else {
puthelp "NOTICE $nick Syntaxe !! !flood pseudo"
return
}
}
Voila j'espere t'avoir aider :)
RE: Kick et KickBans rapides - MorDenX - 12/10/2009
Déjà vu ce scripts qu'elle que part ...
RE: Kick et KickBans rapides - TechNicienInfo - 25/10/2009
tcl
bind pub - !script script
proc script {nick uhost handle chan args} {
if {![isop $nick $chan] && ![ishalfop $nick $chan]} { putquick "PRIVMSG $nick Tu doit être Halfop pour utiliser cette commande"; return 0}
if {[lindex $args 0]!=""} {
set vnick [lindex $args 0]
if {![onchan $vnick $chan]} { putquick "PRIVMSG $nick $nick n'est pas sur $chan"; return 0}
putquick "KICK $chan $vnick $nick : 5Votre script est trop voyant, vous devez être plus discret ! ( 12 Http://Site.com "
return
} else {
puthelp "NOTICE $nick Syntaxe !! !script pseudo"
return
}
}
bind pub - !sexe sexe
proc sexe {nick uhost handle chan args} {
if {![isop $nick $chan] && ![ishalfop $nick $chan]} { putquick "PRIVMSG $nick Tu doit être Halfop pour utiliser cette commande"; return 0}
if {[lindex $args 0]!=""} {
set vnick [lindex $args 0]
if {![onchan $vnick $chan]} { putquick "PRIVMSG $nick $nick n'est pas sur $chan"; return 0}
putquick "KICK $chan $vnick $nick : 5Pas de sexe sur ce salon, il y en a d'autres pour ça ! ( 12 Http://Site.com "
return
} else {
puthelp "NOTICE $nick Syntaxe !! !sexe pseudo"
return
}
}
RE: Kick et KickBans rapides - BlackNight - 26/10/2009
Les couleurs mirc... faut lire avant de poster svp :(
RE: Kick et KickBans rapides - foufou - 27/10/2009
tcl
bind pub - !script script
proc script {nick uhost handle chan args} {
if {![isop $nick $chan] && ![ishalfop $nick $chan]} { putquick "PRIVMSG $nick Tu doit être Halfop pour utiliser cette commande"; return 0}
if {[lindex $args 0]!=""} {
set vnick [lindex $args 0]
if {![onchan $vnick $chan]} { putquick "PRIVMSG $nick $nick n'est pas sur $chan"; return 0}
putquick "KICK $chan $vnick $nick : Votre script est trop voyant, vous devez être plus discret ! ( Http://Site.com"
return
} else {
puthelp "NOTICE $nick Syntaxe !! !script pseudo"
return
}
}
bind pub - !sexe sexe
proc sexe {nick uhost handle chan args} {
if {![isop $nick $chan] && ![ishalfop $nick $chan]} { putquick "PRIVMSG $nick Tu doit être Halfop pour utiliser cette commande"; return 0}
if {[lindex $args 0]!=""} {
set vnick [lindex $args 0]
if {![onchan $vnick $chan]} { putquick "PRIVMSG $nick $nick n'est pas sur $chan"; return 0}
putquick "KICK $chan $vnick $nick : Pas de sexe sur ce salon, il y en a d'autres pour ça ! ( Http://Site.com"
return
} else {
puthelp "NOTICE $nick Syntaxe !! !sexe pseudo"
return
}
}
Tu crois pas qu'il y a un soucis quelque part là ?
tcl
if {![onchan $vnick $chan]} { putquick "PRIVMSG $nick $nick n'est pas sur $chan"; return 0}
Tu peux me dire pourquoi mettre deux fois $nick au lieu de:
tcl
if {![onchan $vnick $chan]} { putquick "PRIVMSG $nick $vnick n'est pas sur $chan"; return 0}
????
Faudrai peut etre éviter de faire (peut être des C/c) et essayer de comprendre le TCL avant de poster :)
Cordialement