我编写的给pppoe计时的脚本---脚本的风采
第一次编写脚本，写得很乱这个脚本必须要求任何时候至少有一个pppoe连接，不然不好使
还有数据是保存在内存里的，要是重起了数据就没了
使用时把****换成用户名，然后加到脚本里，run。这个脚本会自动循环
:set b 0
:set c 0
:set d 0
:set e 0
:set f 0
:set t 0
:foreach i in= do={:set c ($c+1);:put $c;:set a ;:put $i;:put $a;:if(($a=*****) && ($b=0)) do={:set e [:pick $i 1 2];:set *****up1 ;:set *****up2 ;:set c $****up2;:set *****up ("*****-up " . $*****up1 . " " . $*****up2);:log warning $*****up;:set b 1;:put $a}}
:while($f<5) do={:while($b=0) do={:delay 60;:foreach i in= do={:set a ;:put $i;:put $a;:if(($a=*****) && ($b=0)) do={:set *****up1 ;:set *****up2 ;:set c $*****up2;:set *****up ("*****-up " . $*****up1 . " " . $*****up2);:log warning $*****up;:set b 1;:put $a}}};:while($b=1) do={:delay 60;:foreach i in= do={:set a ;:put $i;:put $a;:if(($a=*****)) do={:set b 1} else={:set b 0}}};:if ($b=0) do={:set *****down1 ;:set *****down2 ;:set d $*****down2;:set *****down ("*****-down " . $*****down1 . " " . $*****down2);:log warning $*****down;:set b 0;:put $d;:put $c;:set uptime1 ($d - $c);:if ($uptime1<0s) do={:set uptime1 ($uptime1+1d)};:set e $uptime1;:log warning $e;};:set t ($t + $e);:log warning $t;:log warning end;:set c 0;}
[ 本帖最后由 cracks 于 2007-11-4 12:59 编辑 ] 忘记说了，在log里显示
先是登陆时间，然后是登出时间，单次时间，累计时间 这个好啊，现在有了2。9.27应该用不上了 2.9.27能自动对pppoe拨入计时吗 学习..
页:
[1]