egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2003-10-23T02:57:05-04:00 https://forum.eggheads.org/app.php/feed/topic/5908 2003-10-23T02:57:05-04:00 2003-10-23T02:57:05-04:00 https://forum.eggheads.org/viewtopic.php?p=28820#p28820 <![CDATA[need help]]>
thanks a lot it works just fine

just remind me to have a good night sleep before doing tcl :)

thanks again

Pitchat

Statistics: Posted by Pitchat — Thu Oct 23, 2003 2:57 am

]]> 2003-10-23T02:51:27-04:00 2003-10-23T02:51:27-04:00 https://forum.eggheads.org/viewtopic.php?p=28818#p28818 <![CDATA[need help]]>

Code: 

bind pubm  - $voiceflag pubm:revoice
to

Code: 

bind pubm $voiceflag * pubm:revoice

Statistics: Posted by strikelight — Thu Oct 23, 2003 2:51 am

]]> 2003-10-23T02:41:10-04:00 2003-10-23T02:41:10-04:00 https://forum.eggheads.org/viewtopic.php?p=28817#p28817 <![CDATA[need help]]>
it suppose tu voice people who have specifics flags ( +p) as soon as they talk on a channel then remove that voice after a certain time .the problem is that it doesnt voice anybody

anyone ?

Code: 

# CONFIGURATION # ------------- # Sur quel canal cette fonction prendra effetset channel "#pitchat"# Combien de temps avant de dévoiceset idletime 20# Qui voicer? (* pour tout le monde)set voiceflag p################################################## Manipulation ...if {![validchan $channel]} {putlog "$channel n'est pas un canal couvert par $botnick!"return 0}set channel [string tolower $channel]# Déclanchement événementielbind pubm  - $voiceflag pubm:revoicebind time - "* % % % %" time:devoice# Procédure redonnant le +vproc pubm:revoice {nick host hand chan text} {global channel# Validation du canalif {[string tolower $chan] != $channel || [isvoice $nick $chan]} {return 0}putquick "MODE $chan +v $nick"}# Procédure enlevant le +vproc time:devoice {m h d o y} {global channel idletime# Listage des usager du canalforeach list [chanlist $channel] {# Validation de la néssecité de dévoicerif {[getchanidle $list $channel] > $idletime} {putserv "Mode $channel -v $list"}}return 0}
thanks

Pitchat

Statistics: Posted by Pitchat — Thu Oct 23, 2003 2:41 am

]]>