Code: ›
:local k 0
:local traf 0
:local cas [:pick [/system clock get time] 0 2]
:if (($cas > 9) && ($cas <22)) do {
  /queue tree
  :foreach k in=[/queue tree find disabled=no ] do {
    :local meno [:pick [/queue tree get $k name] 0 4]
    :local rych [get $k max-limit]
    :local par [get $k parent]
  :local traf [get $k bytes]
   :if ( $meno!="free" ) do {
#kontrola downloadu
      :if ($traf > 500000000) do = {
:if ( $par="DW_Skupina 1_P2P" ) do {
:if ( $rych="1650000" ) do {
       /queue tree set $k max-limit=511000 priority=5 parent="DW_Skupina 1_LOW"
      }     
:if ( $rych="2200000" ) do {
         /queue tree set $k max-limit=512000 priority=5 parent="DW_Skupina 1_LOW"
      }   
      }
:if ( $par="DW_Skupina 2_P2P" ) do {
:if ( $rych="2200000" ) do {
  /queue tree set $k max-limit=1022000 priority=5 parent="DW_Skupina 2_LOW"
      }     
:if ( $rych="2700000" ) do {
         /queue tree set $k max-limit=1023000 priority=5 parent="DW_Skupina 2_LOW"
      }   
      }
}
#kontrola uploadu
    :if ($traf > 100000000) do = {
:if ( $par="UP_Skupina 1" ) do {
:if ( $rych="150000" ) do {
  /queue tree set $k max-limit=100000 priority=5 parent="UP_Skupina 1_LOW"
      }   
:if ( $rych="280000" ) do {
  /queue tree set $k max-limit=164000 priority=5 parent="UP_Skupina 1_LOW"
      }   
   }
:if ( $par="UP_Skupina 2" ) do {
:if ( $rych="400000" ) do {
  /queue tree set $k max-limit=164000 priority=5 parent="UP_Skupina 2_LOW"
      }   
:if ( $rych="280000" ) do {
  /queue tree set $k max-limit=100000 priority=5 parent="UP_Skupina 2_LOW"
      } 
      }}
    }
  }
  }