egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2009-05-08T07:54:07-04:00 https://forum.eggheads.org/app.php/feed/topic/16864 2009-05-08T07:54:07-04:00 2009-05-08T07:54:07-04:00 https://forum.eggheads.org/viewtopic.php?p=88696#p88696 <![CDATA[To ignore command for a time specifies]]>

Statistics: Posted by Fill — Fri May 08, 2009 7:54 am

]]> 2009-05-08T07:26:49-04:00 2009-05-08T07:26:49-04:00 https://forum.eggheads.org/viewtopic.php?p=88694#p88694 <![CDATA[To ignore command for a time specifies]]>
Maravilha em Este Forum aqui nao tem explicacao 100%
Galera aqui se ajuda mesmo.

Bom Deu Tudo Certo ai garfwen

Muito Obrigado Pela Ajuda e pela rapides !

Flw.


:D

Statistics: Posted by hmetall — Fri May 08, 2009 7:26 am

]]> 2009-05-07T17:22:19-04:00 2009-05-07T17:22:19-04:00 https://forum.eggheads.org/viewtopic.php?p=88692#p88692 <![CDATA[To ignore command for a time specifies]]>
Sou Portugues, Portugal!


Bem existe uma maneira relativamente facil:

Code: 

bind pub - .am pub_ambind pub - .save pub_save# Apos o utilizador fazer um comando o bot vai deixar de responder passado X segundos# Metes portanto aqui o tempo, em segundos, que o bot esteja caladoset repeattime 120set time 0set canal1 "#UOplus"set canal2 #EBclan" proc pub_am {nick host handle channel arg} {global time repeattimeif {[expr [unixtime] - $time] >= $repeattime } {  putserv "PRIVMSG #EBclan :.am"set time [unixtime]}}proc pub_save {nick host handle channel arg} {global time repeattimeif {[expr [unixtime] - $time] >= $repeattime } {  putserv "PRIVMSG #EBclan :.save"set time [unixtime]}}putlog "TCL Captura \2AM - SAVE \2 Carregada..."
[ Não foi testado - Untested ]

Neste script o bot "guarda" a ultima vez que foi executado o comando e faz uma conta para ver se a diferença de tempo entre a ultima vez e o tempo real é maior ou igual que o tempo minimo para que volte a responder.


Espero que tenhas percebido...
Cumps GaRfWeN

Statistics: Posted by garfwen — Thu May 07, 2009 5:22 pm

]]> 2009-05-07T12:44:56-04:00 2009-05-07T12:44:56-04:00 https://forum.eggheads.org/viewtopic.php?p=88689#p88689 <![CDATA[To ignore command for a time specifies]]>
Firstly he/she wanted to say that am Brazilian I am writing through
translators;)

Good My problem is the following I am new in TCL
I am wanting to do the following function for TCL

That she catches a word it specifies of another channel I specify and write in another channel
Tie oh it is simple the problem that if the person repeats the same word I wanted
that the script didn't repeat her for a certain time the same command or it ignores himself for certain
time!


I will pass my first script.

Code: 

set canal1 "#UOplus"set canal2 #EBclan"bind pubm - *.am* pub_ambind pubm - *.save* pub_saveproc pub_am {nick host handle channel arg} {  putserv "PRIVMSG #EBclan :.am"  return 1}proc pub_save {nick host handle channel arg} {  putserv "PRIVMSG #EBclan :.save"  return 1}putlog "TCL Captura \2AM - SAVE \2 Carregada..."
Could anybody help me to do that as I should do?

They will understand it is simple to catch a command of a channel and it orders for other and the principal not to let to repeat the same command for a certain time.

Muito Obrigado.
Thank you.

Statistics: Posted by hmetall — Thu May 07, 2009 12:44 pm

]]>