Stránka 1 z 1

FUP-SQ 2.9.5 funguje, 3.13 nefunguje

Napsal: 08 Dec 2008 21:32
od travel21
Nemáte prosím někdo tento nebo jiny script FUP na SQ funkční ve verzi 3.13. Ve 2.9.5 RB133 mi fungoval na RB433 v3.13 mi ale nejde.
Předem děkuji za odpověď

Kód: Vybrat vše

/queue simple; :foreach i in=[find] \
do={  \
     :set sqName [get $i name]; \
     :set sqTotalBytes [get $i total-bytes]; \
     :set sqLevel [:find $sqName "uzivatel1"]; \
     :if ($sqLevel >= 0)  do={ \
        set $i limit-at=512000/512000 max-limit=1000000/4000000; \
        :if ($sqTotalBytes  > (400 * 1048576))  do = { \
          set $i limit-at=192000/512000 max-limit=192000/512000; \
        }; \
     } else {
       :set sqLevel [:find $sqName "uzivatel2"]; \
       :if ($sqLevel >= 0)  do={ \
           set $i limit-at=512000/512000 max-limit=1000000/4000000; \
           :if ($sqTotalBytes  > (400 * 1048576))  do = { \
             set $i limit-at=192000/512000 max-limit=192000/512000; \
           }; \
     } else {
       :set sqLevel [:find $sqName "uzivatel3"]; \
       :if ($sqLevel >= 0)  do={ \
           set $i limit-at=512000/512000 max-limit=1000000/4000000; \
           :if ($sqTotalBytes  > (300 * 1048576))  do = { \
             set $i limit-at=192000/512000 max-limit=192000/512000; \
           }; \
    } else {
       :set sqLevel [:find $sqName "uzivatel4"]; \
       :if ($sqLevel >= 0)  do={ \
           set $i limit-at=512000/512000 max-limit=1000000/4000000; \
           :if ($sqTotalBytes  > (300 * 1048576))  do = { \
             set $i limit-at=192000/384000 max-limit=192000/384000; \
           }; \
    } else {
       :set sqLevel [:find $sqName "uzivatel5"]; \
       :if ($sqLevel >= 0)  do={ \
           set $i limit-at=512000/512000 max-limit=1000000/4000000; \
           :if ($sqTotalBytes  > (300 * 1048576))  do = { \
             set $i limit-at=192000/384000 max-limit=192000/384000; \
           }; \
  } else {
       :set sqLevel [:find $sqName "uzivatel6"]; \
       :if ($sqLevel >= 0)  do={ \
           set $i limit-at=512000/512000 max-limit=2000000/4000000; \
           :if ($sqTotalBytes  > (1000 * 1048576))  do = { \
             set $i limit-at=192000/384000 max-limit=192000/384000; \
           }; \
     }; \
     }; \
     }; \
     }; \
     }; \
     }; \
     :if ($sqLevel >= 0) do { \
        :put ([get $i name] . " : " . [get $i limit-at] . " : " . [get $i max-limit]  . " : " . [get $i burst-limit]   . " : " . [get $i burst-threshold]  . " : " . [get $i burst-time]) ; \
     }; \
}