mirror.MikroTik/furaihan.simple-mikrotik-script
1
0
Fork 0
mirror of https://github.com/furaihan/simple-mikrotik-script.git synced 2025-06-28 17:00:06 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Update first-setup

Browse source
This commit is contained in:
furaihan 2020-08-30 17:18:36 +07:00
parent fcc796dd39
commit b0755b9d0e
1 changed files with 23 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

45
first-setup
View file

@ -14,43 +14,44 @@
} }
} }
#source: https://s.id/q4f-O #source: https://s.id/q4f-O
global ConvertLowerCase do={ :global ConvertLowerCase do={
local alphabet {"A"="a";"B"="b";"C"="c";"D"="d";"E"="e";"F"="f";"G"="g";"H"="h";"I"="i";"J"="j";"K"="k";"L"="l";"M"="m";"N"="n";"O"="o";"P"="p";"Q"="q";"R"="r";"S"="s";"T"="t";"U"="u";"V"="v";"X"="x";"Z"="z";"Y"="y";"W"="w"}; :local alphabet {"A"="a";"B"="b";"C"="c";"D"="d";"E"="e";"F"="f";"G"="g";"H"="h";"I"="i";"J"="j";"K"="k";"L"="l";"M"="m";"N"="n";"O"="o";"P"="p";"Q"="q";"R"="r";"S"="s";"T"="t";"U"="u";"V"="v";"X"="x";"Z"="z";"Y"="y";"W"="w"};
local result :local result
local character :local character
for strings from=0 to=([:len $1] - 1) do={ :for strings from=0 to=([:len $1] - 1) do={
local single [:pick $1 $strings] :local single [:pick $1 $strings]
set character ($alphabet->$single) :set character ($alphabet->$single)
if ([:typeof $character] = "str") do={set single $character} :if ([:typeof $character] = "str") do={set single $character}
:set result ($result.$single) :set result ($result.$single)
} }
:return $result :return $result
} }
global ConvertUpperCase do={ :global ConvertUpperCase do={
local alphabet {"a"="A";"b"="B";"c"="C";"d"="D";"e"="E";"f"="F";"g"="G";"h"="H";"i"="I";"j"="J";"k"="K";"l"="L";"m"="M";"n"="N";"o"="O";"p"="P";"q"="Q";"r"="R";"s"="S";"t"="T";"u"="U";"v"="V";"x"="X";"z"="Z";"y"="Y";"w"="W"}; :local alphabet {"a"="A";"b"="B";"c"="C";"d"="D";"e"="E";"f"="F";"g"="G";"h"="H";"i"="I";"j"="J";"k"="K";"l"="L";"m"="M";"n"="N";"o"="O";"p"="P";"q"="Q";"r"="R";"s"="S";"t"="T";"u"="U";"v"="V";"x"="X";"z"="Z";"y"="Y";"w"="W"};
local result :local result
local character :local character
for strings from=0 to=([:len $1] - 1) do={ :for strings from=0 to=([:len $1] - 1) do={
local single [:pick $1 $strings] :local single [:pick $1 $strings]
set character ($alphabet->$single) :set character ($alphabet->$single)
if ([:typeof $character] = "str") do={set single $character} :if ([:typeof $character] = "str") do={set single $character}
:set result ($result.$single) :set result ($result.$single)
} }
:return $result :return $result
} }
global CheckConnection do={ :global ConnectionAvailable do={
global ConnectionAvailable :local internet
tool flood-ping 8.8.8.8 count=10 do={ /tool flood-ping 8.8.8.8 count=10 do={
/if ($received > 8) do={ /if ($received > 8) do={
set $ConnectionAvailable [tobool true] :set $internet true;
} else={ } else={
set $ConnectionAvailable [tobool false] :set internet false;
} }
} }
:return $internet
} }
#This script is inspired by TSOKOTSA's script published in the Mikrotik forum #This script is inspired by TSOKOTSA's script published in the Mikrotik forum
global GenerateRandomString do={ :global GenerateRandomString do={
:local hour [:pick [/system clock get time] 0 2] :local hour [:pick [/system clock get time] 0 2]
:local hourx :local hourx
:local minute [:pick [/system clock get time] 3 5] :local minute [:pick [/system clock get time] 3 5]