12/05/2011, 11:53
bonjour,
je souhaiterais savoir si il est possible que vous m'aidiez à optimisé mon code.
le code fonctionne mais je sais pas pourquoi j'ai quelque doute sur la manière que je l'ai codé,est m'en remet a vous pour l'amélioré svp.
Cordialement
je souhaiterais savoir si il est possible que vous m'aidiez à optimisé mon code.
le code fonctionne mais je sais pas pourquoi j'ai quelque doute sur la manière que je l'ai codé,est m'en remet a vous pour l'amélioré svp.
tcl
namespace eval OpbOt {
variable version 3.0
variable Nom DnS
variable pass "PASS"
variable chekbOt 10
}
proc OpbOt::Join {nick host hand chan args} {
if {[channel get $chan SalonOp]} {
putlog "\002\00303\[Ok\]\002\00314 Je me Op sur $chan"
utimer $OpbOt::chekbOt [list OpbOt::JoinMess $nick $chan]
} else {
if {![channel get $chan SalonOp]} {
putlog "\002\00304\[Refuser\]\002\00314 Je ne suis pas activé sur $chan"
return 0
}
}
}
Cordialement
[font=Times New Roman]La différence entre Linux et Windows ,c'est que Linux c'est comme une belle fille , il faut l'apprivoiser , la comprendre , la séduire tandis que Windows , c'est comme une prostitué , il faut payer et surtout bien se protéger.[/font]