-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathbt-test
48 lines (35 loc) · 1.31 KB
/
bt-test
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
#### MAKE ATTENTION
#### read this post on mikrotik forum for update bt-server https://forum.mikrotik.com/viewtopic.php?t=104266&start=600#p932261
:log info "Esecuzione script SpeedTest in corso";
:local luser "MikrotikBtest";
:local lpass "MikrotikBtest";
:local Addr "23.162.144.120";
:local avrRX 0;
:local avrTX 0;
# DOWNLOAD TEST
:log info "Test velocità in Download";
:do {/tool
bandwidth-test duration=30s user=$luser password=$lpass protocol=tcp address=$Addr direction=receive do={
:set $avrRX ("Velocità Download: " . ($"rx-total-average" / 1048576) . "." . ($"rx-total-average" % (1048576) / 1024) . " Mbps" );
}
} on-error={:log error message="RX script failed"}
:delay 2s;
# UPLOAD TEST
:log info "Test velocità in Upload";
:do {/tool
bandwidth-test duration=30s user=$luser password=$lpass protocol=tcp address=$Addr direction=transmit do={
:set $avrTX ("Velocità Upload: " . ($"tx-total-average" / 1048576) . "." . ($"tx-total-average" % (1048576) / 1024) . " Mbps" );
}
} on-error={:log error message="TX script failed"}
# PING TEST
:local avgping
/tool flood-ping $Addr count=1 size=56 do={
:set avgping ($"avg-rtt");
}
:if ($avgping > 10) do={
$avgping
}
:log info message=$avrRX;
:log info message=$avrTX;
:log info message=$avgping;
:log info "-------- Fine Test ------------";