Fermeture automatique d'un salon a une heure prédéfinie

[Chris32]

Bonjour, ..
Je vien de coder ceci, regarde si ca marche, je n'est pas testé :s
Pour plus de facilité à tes salons contrôle les via .db Je te rajoute ce qu'il faut :)

Bien sur dans le dossier scripts de ton eggdrop rajoute un fichier nommé chan.db et met y les salons que tu veut que l'eggdrop ferme, il doit être OP !!

tclcopier

# Minute de fermeture de salon
set CC(min) "00"

# Heure de fermeture du salon
set CC(ferme) "22"

# Heure d'ouverture du salon
set CC(ouvre) "10"

# Minute d'ouverture du salon
set CC(mouvre) "00"

# Heure d'avertissement de fermeture
set CC(afh)   "21"

# Minute d'avertissement de fermeture
set CC(amn)   "55"

# Mode de fermeture de salon
set CC(mode) "+iRm"

# Message d'avertissement de fermeture
set CC(af)   "Fermeture du salon dans 05minute.. veuillez quitter ce salon !"

# Message de fermeture
set CC(close) "Fermeture du salon !" 

# Message d'ouverture
 
set CC(ouvert) "Ouverture du salon ! Bon t'chat à tous ! ;)"
 
 
if {![file exists "scripts/chan.db"]} { set file_chan [open "host.db" a+]; close $file_chan }
 
bind time - "$CC(amn) $CC(afh) * * *" time:averto
proc time:averto {} {
global CC
catch {open scripts/chan.db r} salle
while {![eof $salle]} { gets $salle salon; if {$salon!=""} { puts "PRIVMSG $salon :$CC(af)" } }
catch {close $salle}
}
 
bind time - "$CC(min) $CC(ferme) * * *" time:close
proc time:close {} {
global CC
catch {open scripts/chan.db r} salle
while {![eof $salle]} { gets $salle salon; if {$salon!=""} { puts "PRIVMSG $salon :$CC(close)"; puts "MODE $salon +$CC(mode)"; foreach users [chanlist $salon] { puts "KICK $salon $user :$CC(ouvert)"} } }
catch {close $salle}
}
 
bind time - "$CC(mouvre) $CC(ouvre) * * *" time:ouvre
proc time:ouvre {} {
global CC
catch {open scripts/chan.db r} salle
while {![eof $salle]} { gets $salle salon; if {$salon!=""} { puts "PRIVMSG $salon :$CC(ouvert)"; puts "MODE $salon -$CC(mode)" } }
catch {close $salle}
}

Voila.. essaye ceci je sais pas si il marche