Cek Kuota Voucher Hotspot dengan Bot Telegram

:local send [:parse [/system script get tg_sendMessage source]]
:local param1 [:pick $params 0 [:find $params " "]]
:local param2 [:pick $params ([:find $params " "]+1) [:len $params]]
:local param3 [:pick [:pick $params ([:find $params " "]+1) [:len $params]] ([:find [:pick $params ([:find $params " "]+1) [:len $params]] " "]+1) [:len [:pick $params ([:find $params " "]+1) [:len $params]]]]
:if ([:len [:find $param2 " "]]>0) do={
	:set param2 [:pick [:pick $params ([:find $params " "]+1) [:len $params]] 0 [:find [:pick $params ([:find $params " "]+1) [:len $params]] " "]]
} else={
	:set param3 ""
}

:put $params
:put $param1
:put $param2
:put $param3
:put $chatid
:put $from

:local output
:foreach activeIndex in=[/ip hotspot user find name=$params] do={
:local byteout [/ip hotspot user get value-name="bytes-out" $activeIndex];
:local bytein [/ip hotspot user get value-name="bytes-in" $activeIndex];
:local limittotal [/ip hotspot user get value-name="limit-bytes-total" $activeIndex];
:local kuotaterpakai ("*Kuota Terpakai: * ".(($byteout+$bytein) / 1024 / 1024)." Mb %0A")
:local kuota ("*Kuota:* ".($limittotal / 1024 / 1024)." Mb%0A")
:local user ("*Username:* ".[/ip hotspot user get value-name="name" $activeIndex]."%0A")
:local password ("*Password:* ".[/ip hotspot user get value-name="password" $activeIndex]."%0A")
:local uptime ("*Uptime:* ".[/ip hotspot user get value-name="uptime" $activeIndex]."%0A")
:local disable ("*Disable:* ".[/ip hotspot user get value-name="disable" $activeIndex]."%0A")
:set output ($output.$user.$password.$uptime.$disable.$kuota.$kuotaterpakai."%0A")
}
$send chat=$chatid text=("$output") mode="Markdown"