Fermeture automatique d'un salon a une heure prédéfinie
#46
Essaye d'ouvrir dans mes bind entre les {} rajoute min hour day month year
ex :

tcl
bind time - "$CC(amn) $CC(afh) * * *" time:averto
proc time:averto {min hour day month year} {
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 {min hour day month year} {
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 {min hour day month year} {
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..
Alsyx v1.0, en cours de développement.
Répondre Avertir


Messages dans ce sujet
RE: Fermeture automatique d'un salon a une heure prédéfinie - par Chris32 - 21/09/2009, 09:46

Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)
Tchat 100% gratuit -Discutez en toute liberté