少尉
- 注册时间
- 2009-10-13
- 金币
- 226 个
- 威望
- 1 个
- 荣誉
- 0 个
累计签到：32 天
连续签到：0 天
[LV.50]初入江湖
|
发表于 2017-6-6 21:29
: O, s4 O+ I: w5 |: C0 m5 b
/system clock
' a- ]/ y5 Z/ t y7 D$ T:global currenttime# [, ~* O) Y) o4 k2 Q
:set currenttime [ get time]
6 o1 ]# e! [; L$ t' h& `3 Q
, _ Y! r; c) ^$ f3 b:local hotspotcount 0
u' s, ]/ B3 s- ~* U! K:local hotspotcounthotspotcount 200+ p& ]- r ~1 U T6 S' d
:local nl 4
& C2 n8 J. O8 k! a \" f3 D! V% ], m( |0 ?' `5 X/ R0 } i
/system license$ w8 u5 Y: }: @8 q+ _1 ]! d
:set nl [get nlevel ]; l* g- U* r; _1 m6 \* N9 S
2 a4 ?, o2 i. E! u- s* n5 h$ ]
:if ($nl=4) do={:set hotspotcount 200}5 `. A- E$ P. \' ?) A
:if ($nl=5) do={:set hotspotcount 420}
7 Q# T: j6 ?; \:if ($nl=6) do={:set hotspotcount 840}
' K! d0 X% H( T$ T& }/ F! U8 L/ N L6 R4 C9 e
/ip hotspot active
6 c b; F/ E/ d3 \% {* L0 m:foreach i in=[ /ip hotspot active find ] do={:set hotspotcount (hotspotcount+1); }
+ C% y2 T- [& A( q9 g7 @
0 ?5 o' R0 q+ n! ]5 G$ Z: K:if (($currenttime>"1:00:00" && $currenttime <"5:30:00")|| $hotspotcount >$hotspotcount) do={ 0 e- ^! ]' |3 x1 q7 |
5 N$ ^ t6 @ K8 {
/ip hotspot active3 h; D: F* F. d0 }- s3 \1 @
:foreach i in=[ /ip hotspot active find idle-time > 1800 ] do={ :log info message=[ get $i ] ;remove $i;:delay delay-time=1;};, N# w4 r! U7 \( ^* I4 x2 y- z
( u4 w. I/ M; }1 ]# m/ip hotspot host/ Y7 z# s3 \! \/ ]% G5 C6 \
:foreach i in=[ /ip hotspot host find idle-time > 1800 ] do={ :log info message=[ get $i ] ;remove $i;:delay delay-time=1;};
' A$ y0 I: k j$ b) g. ]. ?:log info message=($currenttime." hotspot clear");
9 X# [+ p6 v7 }* S! q5 O
6 c, E) e3 h& j2 E# R9 I:if ($hotspotcount >$hotspotcount) do={( T! @1 u/ j. u; W; K% Q9 U- Z0 {
) @) Z" k: r h( S8 I# x$ d; _}
% k# j+ ^) E# C' W}
$ D* B% f* G3 m, s% a, D% f6 e+ m) K+ T" m
|
|
IP卡
狗仔卡
