+ Responder ao Tópico



  1. #1
    Avatar de 5gnetnovoprogresso
    Ingresso
    Nov 2015
    Localização
    Novo Progresso, PA, Brasil
    Posts
    20

    Angry Mikrotik Script, Quem pode me ajudar de terminar este Script

    # RouterOS v.6.33rc37 03/11/2015 #
    # Up and Download Rate Calculator + Queue-Simple Generator v1.0 #
    # To use with the New Terminal #
    # Para usar com o New Terminal Console do Mikrotik #
    # Para os Brasileiros #
    # Não use esta Calculadora abaixo de 300 kb/ps #
    {
    # Select here to switch the auto queue-simple Generator on/off #
    # Selecione aqui para usar ou não o auto gerador de queues-simples on/off #
    :global selector "on";
    # set your desired queue simple Name here #
    # coloque o Nome da queue simple aqui #
    :global name "test";
    # Address and Mask setup here #
    # Configurar Endereço é Mascara aqui #
    :local ip "192.168.0.0"; # <- set Target Address for simple queue here ( coloque aqui o Endereço do Alvo da queue-simple ) #
    :local msk "26"; # <- set mask here, for single address /32 ( coloque a mascara de rede aqui, se for endereço unico coloque /32 ) #
    # set your Contract Download Bandwidth here, only Numbers, do not use less than 300 kb/ps, required format is kb/ps #
    # coloque a Veloçidade de Download do Contrato Cliente aqui, escreve em kb/ps, não use menos de 300 kb/ps, vai da error #
    :local cdb "512";
    # set how much Percent from Download your Upload will be #
    # coloque aqui quantos % baseado no Download ceria o Upload #
    :local up "25";
    # set how much Percent more than Contracted Bandwidth your Client can reach, 1% -> 100% Recomendet is max of 50% #
    # the Burst Value, maximal upload/download data rate which can be reached while the burst is allowed #
    # coloque aqui o bico maximo em %, a Velocidade a qual o Cliente chegara por algums segundos #
    :local burst "25";
    # set the Value burst-threshold in Percent less than Contracted Bandwidh, Recommended is 10% -> 50% #
    # burst-threshold - this is value of burst on/off switch #
    # coloque aqui a média do bico da Velocidade, Recomendado e de 10 a 50% #
    :local thre "10";
    # set the Value burst-time here, allowed 1-60 seconds, Recomended 10 seconds #
    # coloque aqui o tempo em segundos do bico, Recomendado 10 segundos #
    :local time "10";
    # set the Priority here allowed Value 1-8, Recomended Value= 8, smaller Value causes more Cpu Usage #
    # coloque aqui a Prioridade, Valores entre 1 é 8, Valor Recomendado= 8, Cuidado se da Prioridade de mais vai dar muito CPU Consumo, Numero maiór menos Prioridade #
    :local prt "8";
    # set how much Percent is your guaranted Bandwidth, Recomended is 25% - 80%, get Information from your ISP #
    # coloque aqui a Velocidade minima qual Você pode garantir com certeza #
    :local guaranty "50";
    # DO NOT CHANGE ANY VALUES BELOW #
    :local ca [($cdb / 100)];
    :local cb [($ca*$up)];
    :local cc [($cdb / 100)];
    :local cd [($cc*$burst)];
    :local ce [($cd+$cdb)];
    :local cf [($cb / 100)];
    :local cg [($cf*$burst)];
    :local ch [($cg+$cb)];
    :local ci [($cf*$thre)];
    :local cj [($cb-$ci)];
    :local ck [($cc*$thre)];
    :local cl [($cdb-$ck)];
    :local cm [($cb / 100)];
    :local cn [($cm*$guaranty)];
    :local co [($ca*$guaranty)];
    :put ("Calculated Rate Limit is -> " . "$cb" . "k" . "/" . "$cdb" . "k" . " " . "$ch"\
    . "k" . "/" . "$ce" . "k" . " " . "$cj" . "k" . "/" . "$cl" . "k" . " " . "$time" . "/" . "$time" . " " . "$prt"\
    . " " . "$cn" . "k" . "/" . "$co" ."k");
    :put ("Your Contract calculated Upload" . " / " . "Upload do Contrato Calculado -> $cb kb/ps");
    :put ("Your Contract Download" . " / " . "Download do Contrato -> $cdb kb/ps");
    :put ("Burst-Limit Upload" . " / " . "Bico Maximo do Upload -> $ch kb/ps");
    :put ("Burst-Limit Download" . " / " . "Bico Maximo do Download -> $ce kb/ps");
    :put ("Burst-Threshold-Upload" . " / " . "Media do Bico do Upload -> $cj kb/ps");
    :put ("Burst-Threshold-Download" . " / " . "Media do Bico do Download -> $cl kb/ps");
    :put ("Burst-Time in Seconds" . " / " . "Tempo do Bico em Segundos -> $time");
    :put ("Your minimal guaranted Upload Speed" . " / " . "Garantia do Upload no minimo -> $cn kb/ps");
    :put ("Your minimal guaranted Download Speed" . " / " . "Garantia do Download no minimo $co kb/ps");
    :if ($selector = "on") do={
    :put ("QUEUE AUTO GENERATOR IS ON");
    :put ("O QUEUE GERADOR ESTA ATIVADO");
    :if ([/queue simple find comment="$name" ] = "$name" ) do={
    :local eng "CHECK YOUR SIMPLES QUEUES!! ALREADY EXIST QUEUE SIMPLES WITH SUCH NAME -> $name ";
    :local ptbr "VEREFICE SEUS SIMPLES QUEUES !! JA TEM UMA COM ESTE MESMO NOME -> $name ";
    :put ("$eng");
    :put ("$ptbr");} else={
    /queue simple
    add burst-limit=("$ch" . "k" . "/" . "$ce" . "k") burst-threshold=("$cj" . "k" . "/" . "$cl" . "k") burst-time=("$time" . "s" . "/" . "$time" . "s")\
    comment="$name" limit-at=("$cn" . "k" . "/" . "$co" . "k") max-limit=("$cb" . "k" . "/" . "$cdb" . "k") name="$name" target=("$ip" . "/" . "$msk")
    :put ("Gerando queue-simple com o Nome -> $name, Endereco do Alvo $ip, Mascara de Rede " . "/" . "$msk");
    :put ("Generating queue-simple with Name -> $name, Target address $ip, Network Mask " . "/" . "$msk");
    }
    } else={
    :put ("THE QUEUE AUTO GENERATOR IS SWITCHED OFF, IF YOU WISH TO USE TURN -> ON <- ABOVE");
    :put ("O QUEUE GERADOR ESTA DESATIVADO, PARA ATIVAR SELECIONE -> ON <- LA EM CIMA");}
    }

    # O problema e a console da error se ue insirar com mesmo nome duas vezes, deve ser a parte do find comment="$name" #

    Calculated Rate Limit is -> 125k/512k 150k/637k 115k/462k 10/10 8 50k/250k
    Your Contract calculated Upload / Upload do Contrato Calculado -> 125 kb/ps
    Your Contract Download / Download do Contrato -> 512 kb/ps
    Burst-Limit Upload / Bico Maximo do Upload -> 150 kb/ps
    Burst-Limit Download / Bico Maximo do Download -> 637 kb/ps
    Burst-Threshold-Upload / Media do Bico do Upload -> 115 kb/ps
    Burst-Threshold-Download / Media do Bico do Download -> 462 kb/ps
    Burst-Time in Seconds / Tempo do Bico em Segundos -> 10
    Your minimal guaranted Upload Speed / Garantia do Upload no minimo -> 50 kb/ps
    Your minimal guaranted Download Speed / Garantia do Download no minimo 250 kb/ps
    QUEUE AUTO GENERATOR IS ON
    O QUEUE GERADOR ESTA ATIVADO
    failure: already have such name

    Eu quero a console mostra a minha mensagem
    "VEREFICE SEUS SIMPLES QUEUES !! JA TEM UMA COM ESTE MESMO NOME -> $name ";
    quando ja tem uma queue-simple com o mesmo nome !!!!

  2. #2
    André Andrade*MikrotikRio Avatar de interhome
    Ingresso
    Oct 2008
    Localização
    Brasil.
    Posts
    1.116
    Posts de Blog
    15

    Padrão Re: Mikrotik Script, Quem pode me ajudar de terminar este Script

    O que espera no final?

  3. #3
    Avatar de 5gnetnovoprogresso
    Ingresso
    Nov 2015
    Localização
    Novo Progresso, PA, Brasil
    Posts
    20

    Padrão Re: Mikrotik Script, Quem pode me ajudar de terminar este Script

    failure: already have such name
    resolver istu ai, eu quero que o mikrotik não tenta criar outra queue com mesmo nome é por causa disu da esta failure mensagem.
    Por que esta parte do meu script não funciona?
    :if ([/queue simple find comment="$name" ] = "$name" ) do={
    :local eng "CHECK YOUR SIMPLES QUEUES!! ALREADY EXIST QUEUE SIMPLES WITH SUCH NAME -> $name ";
    :local ptbr "VEREFICE SEUS SIMPLES QUEUES !! JA TEM UMA COM ESTE MESMO NOME -> $name ";
    ut ("$eng");
    ut ("$ptbr");} else={
    /queue simple
    Estes tão de Smiles quebra scripts também rem
    Você usa Mikrotik? V. e Programmador ?