/system/script remove [find name="bgp_lokal_export"]

/system/script add name=bgp_lokal_export dont-require-permissions=yes source={ \
:log info "BGP Export: mulai..."; \
/ip firewall address-list remove [find list="bgp-export"]; \
:local cnt 0; \
:foreach r in=[/routing/route find where distance=15] do={ \
  :local dst [/routing/route get $r dst-address]; \
  :if ($dst != "0.0.0.0/0" && $dst != "::/0") do={ \
    /ip firewall address-list add list="bgp-export" address=$dst; \
    :set cnt ($cnt + 1); \
  }; \
}; \
:log info "BGP Export: CDN selesai ($cnt)"; \
:foreach r in=[/routing/route find where distance=200] do={ \
  :local dst [/routing/route get $r dst-address]; \
  :if ($dst != "0.0.0.0/0" && $dst != "::/0") do={ \
    /ip firewall address-list add list="bgp-export" address=$dst; \
    :set cnt ($cnt + 1); \
  }; \
}; \
:log info "BGP Export: selesai total $cnt rute"; \
}