Explorando: ./tcl

Repositorio de scripts de irc.terrachat.cl desde los canales #TRAFFIC y #LATINWAREZ.

⬅️ Volver

Vista previa de: Mp3xdiabolic.tcl

# * * * * * * * * * * * * * * * * * * * ## ## Arquivo de configura��o do FsArk. ## ## * * * * * * * * * * * * * * * * * * * ## ## -=<( ATEN��O! )>=- ## Esse TCL n�o trabalha com nomes de arquivos que contenham dois-pontos ':', ## ex.: 'M�sica:01.mp3', 'M�sica::2004::.ogg', etc. Se voc� tem arquivos ou ## pastas com dois-pontos no nome, renomeie-os antes de rodar esse FServe! De ## outra forma, eles n�o ser�o inclu�dos no servidor. # ## Ajuste as vari�veis, a seguir, de acordo com as necessidades de seu BOT. ## # Diret�rio dos arquivos gerados pelo fserv (listas e registros). #set dirbot "FsArk/" set dirbot "/home/N/Noelia/eggdrop/mp3/" # Pasta(as) RAIZ que cont�m os arquivos que o FServ servir�. # O TCL busca recursivamente, ou seja, se ajustar apenas "/home/mp3/", o script # incluir� os diret�rios "/home/mp3/", "/home/mp3/subdir1/","/home/mp3/subdir2/" # "/home/mp3/subdir1/sub_subdir1/", e assim por diante. # ATEN��O! Coloque-os entre chaves e uma barra no final! set dirsroot { {/home/N/Noelia/eggdrop/mp3/} } # O script dever� procurar por novos diret�rios que cont�m arquivos para servir # a cada atualiza��o da lista de arquivos? Defina para ZERO se n�o. (0 ou 1). # Obs.: O script SEMPRE buscar� novas pastas quando reiniciar (restart) ou # recarregar (rehash). set lst(buscadirs) 1 # Ao ordenar as pastas, o script o far� a partir do diret�rio raiz? # Nota: O script pode ordenar as pastas desde o ponto # de montagem ou a partir do primeiro diret�rio (subdir). # Se 1, a ordena��o ser� a partir do primeiro subdir (se existir) e # isso custa mais CPU. set lst(mont) 0 # Quais os tipos de arquivos que deseja servir? # Separe-os com um espa�o, n�o use asterisco e use o ponto. Desejando listar # qualquer tipo de arquivo, deixe em branco. Ex.: set lst(tipos) "" # set lst(tipos) ".mp3 .ogg .wav .voc .mid .mod .mpg .mpeg .rm .avi .wmv .swf .ra .jpg .gif .png .zip .exe .txt" set lst(tipos) "" # Caminho/Nome do execut�vel ZIP se desejar enviar a lista compactada em # formato ZIP. Deixando em branco (""), o script enviar� a lista em TXT. # Ex.: set lst(comp) "" #set lst(comp) "/usr/bin/zip" set lst(comp) "" # Defina, abaixo, de quanto em quanto tempo a lista de arquivos dever� ser # atualizada. O valor � em MINUTOS e deve ser maior ou igual a 60. # Obs.: 0 (ZERO) a lista n�o ser� atualizada automaticamente. set lst(upitv) 1440 # M�ximo de envios por usu�rio. # Esse valor n�o pode ser maior que o 'dccs(slot)', abaixo. set dccs(usu) 1 # M�ximo de envios (total de dccs). # Esse valor deve ser um m�ltiplo do 'dccs(usu)', definido acima. set dccs(slot) 2 # M�ximo de posi�es de um mesmo usu�rio na fila. # N�o desejando ter fila, ajuste para 0 (zero). # Esse valor n�o pode ser maior que o 'dccs(fila)', abaixo. set dccs(ufila) 10 # M�ximo de usu�rios na fila. # N�o desejando ter fila, ajuste para 0 (zero). set dccs(fila) 100 # M�nimo de posi�es na fila para que ela seja enviada via-dcc quando usu�rios # solicitarem uma listagem da lista de espera. # N�o desejando enviar lista de espera em TXT, ajuste para 0 (zero). set dccs(filalist) 5 # Desejando que determinados arquivos sejam enviados com prioridade 1, como � # realizado com as listas e arquivos de ajuda, defina-os abaixo, pelo seu # tamanho EM BYTES! # N�o desejando ter arquivos com envios privilegiados, deixe 0 (ZERO). # Ex.: set dccs(priv) 0 # Arquivos privilegiados N�O ser�o contabilizados APENAS para recordes de # transfer�ncias realizadas com sucesso. # Atualmente, o BOT aceita 1 envio por pessoa (at� a conclus�o do mesmo) # e at� 3 envios simult�neos (exceto listas e arquivos de ajuda). set dccs(priv) 100000 # Pedidos realizados, ao fserv e com sucesso, e remo��o de pedidos da lista de # espera (PART/QUIT) informados no CHAT? # Coloque 0 (ZERO) se n�o desejar isso. set dccs(msglogo) 1 # Deseja que pedidos realizados, ao fserv e sem sucesso, sejam informados no # CHAT? # Coloque 0 (ZERO) se n�o desejar isso. set dccs(msglogf) 1 # Canais do BOT (separe-os com um espa�o). set home "#TRAFFIC-NO-SPAM" # Canais alternativos para envios de mensagens de conclus�o de DCCs com sucesso # do FServ (separe-os com um espa�o). set althome "#TRAFFIC-NO-SPAM" # Para qual/quais #canal/#canais o BOT enviar� as mensagens de conclus�o de DCC # com sucesso? # 0 - Para nenhum #canal; # 1 - Para o HOME, apenas; # 2 - Para o ALTHOME, apenas; # 3 - Para ambos os #canais. set msgs(can) 0 # Ajuste o boolean, abaixo, para 0 (zero) se N�O desejar enviar mensagem # de falha no envio e/ou pedido para resumo (0 ou 1). set msgs(conc) 0 # Intervalo de envios dos an�ncios (mins). Deixe 0 (zero) para N�O enviar o # an�ncio. S�o 4 an�ncios e deve separ�-los com um espa�o. # Os valores devem ser inteiros e n�o menores que 20. A ordem �: # 1. An�ncio do @Nick; # 2. An�ncio do @Nick-Top; # 3. An�ncio do @Nick-Ajuda; # 4. An�ncios dos @Nick-Info e @Nick-Rec. # Ex.: set msgs(fsark) "60 62 30 40" set msgs(fsark) "10 22 35 55" # Qual tema de cor de mensagens deseja usar? Os temas est�o definidos no arquivo # de temas e s�o, no m�ximo, 9 temas. # Obs.: Use 0 (zero) para rand�mico. set msgs(temas) 0 # Quantos no p�dio dos 'Arquivos Mais Copiados'? set topx(max) 20 # Ajuste o boolean, abaixo, para 0 (zero) se N�O desejar criar ranking. # Arquivos enviados ainda ser�o registrados. ZERO, apenas n�o criar� # o arquivo com os TopXX Mais Copiados (0 ou 1). set topx(ftopx) 1 # Ajuste o boolean, abaixo, para 0 (zero) se N�O desejar criar estat�stica # alguma dos arquivos enviados (0 ou 1). # ZERO, somente resultar� em um �nfimo menor custo de CPU (n�o-recomend�vel). set topx(fenvs) 1 # M�nimo de caracteres para o @locator/@find? set loc(minc) 3 # M�ximo de resultados a serem exibidos no @locator/@find. set loc(maxr) 4 # O BOT dever� aguardar por alguns segundos para responder ao comando # @Find/@Locator logo ap�s j� ter respondido a um outro? # Isso serve tanto para proteger o BOT de flood quanto para o BOT n�o causar # flood na rede. O valor � de SEGUNDOS e deve ser maior ou igual a 10. # Obs.: Coloque 0 (ZERO) se n�o desejar aguardar ou -1 se n�o desejar usar o # locator. set loc(itv) 0 # O BOT dever� responder ao comando 'ctcp VERSION'? # Coloque 0 (zero) se desejar que o BOT n�o responda: # Ex.: set fsarkVers 0 # Coloque 1 (um) se desejar que o BOT responda com a mensagem padr�o: # Ex.: set fsarkVers 1 # Ou crie sua pr�pria mensagem e defina-a entre aspas: # Ex.: set fsarkVers "Rodando Script TCL FsArk para FServ [lindex $home 0] por M8088." set fsarkVers 0 # ## Ajuste os nomes para os arquivos gerados pelo BOT, a seguir, de acordo ## com as 'necessidades' do mesmo. # # Arquivo que conter� os diret�rios para servir. set rg(dirs) "$nick-dirs_fserv.reg" # Arquivo onde registrar os arquivos enviados com sucesso. # Mesmo que tenha ajustado ZERO para 'topx(fenvs)', mantenha definido, abaixo. set rg(envs) "$nick-enviados.reg" # Arquivo onde armazenar o ranking. # Mesmo que tenha ajustado ZERO para 'topx(ftopx)', mantenha definido, abaixo. set prd(topx) "$nick-Top.txt" # Arquivo que cont�m o 'Ajuda'. O arquivo deve estar na mesma pasta # das listas e ter como extens�o padr�o '.txt', mesmo que seu BOT tenha # arquivos de ajuda nos formatos html e/ou pdf. E, se o seu BOT n�o # possuir nenhum arquivo de ajuda, mantenha definido, abaixo! # Obs.: As extens�es de todos os arquivos de ajuda devem estar em min�sculo! set prd(ajuda) "Mp3zone_Ayuda.txt" # Arquivo que conter� a lista de espera para envios via-dcc. # Mesmo que tenha ajustado ZERO para 'dccs(filalist)', mantenha definido, abaixo. set prd(fila) "$nick-QueTxt.txt" # Arquivo que conter� os dccs em andamento para envios via-dcc. set prd(stats) "$nick-StatsTxt.txt" # Arquivo onde manter a fila. set rg(fila) "$nick-fila.reg" # Arquivo onde guardar as estat�sticas do FServ. set rg(est) "$nick-Counter.reg" # Arquivo que manter� os dccs em andamento. set rg(dccs) "$nick-dccs.reg" # Arquivo que cont�m os ADSs. set rg(ads) "ads.reg" # Arquivo que cont�m os temas de cores das mensagens. set rg(temas) "Mp3zoneTemas.reg" # # Comente a linha abaixo ap�s todos os ajustes realizados. # die "OO0oops()! Eu ainda n�o ajustei meu FServ!" #source scripts/FsArk-1.6.tcl putlog "##########################" putlog "##### FsArk @ TRAFFIC ####" putlog "##########################"

👁️ 4 vistas • 📥 0 descargas

⬆ Subir