:global ddnsuser "username"
:global ddnspass "password"
:global ddnshost "mydomain.changeip.com"
:global ddnsinterface "lte1"
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# END OF USER DEFINED CONFIGURATION
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

:global ddnssystem ("mt-" . [/system package get [/system package find name=routeros] version] )
:global ddnsip [ /ip address get [/ip address find interface=$ddnsinterface] address ]
:global ddnslastip


:if ([:len [/interface find name=$ddnsinterface]] = 0 ) do={ :log info "DDNS: No interface named $ddnsinterface, please check configuration." }

:if ([ :typeof $ddnslastip ] = "nothing" ) do={ :global ddnslastip 0.0.0.0/0 }


:if ([ :typeof $ddnsip ] = "nothing" ) do={

:log info ("DDNS: No ip address present on " . $ddnsinterface . ", please check.")

} else={
 :if ($ddnsip != $ddnslastip) do={

    :log info "DDNS: Sending UPDATE!"
    :global changeipsvr [:put [:resolve nic.changeip.com]]
    :log info $"changeipsvr"
    # PROBLEM is here times out #
    :log info [ :put [/tool dns-update name=$ddnshost address=[:pick $ddnsip 0 [:find $ddnsip "/"] ] key-name=$ddnsuser key=$ddnspass dns-server=$changeipsvr zone="nic.changeip.com" ] ]

  :log info ("DDNS Updated")
   :global ddnslastip $ddnsip
 
  } else={ 
    :log info "DDNS: No changes necessary."
  }
}

:local interfacename "interfacename";
:local ddns "example.ChangeIP.com";
:local login "login";
:local password "password";
:local url "https://nic.ChangeIP.com/nic/update";

:local CurrentDynDNSIP [/resolve $ddns];
:local TMPDynDNSIP [/ip address get [/ip address find interface=$interfacename] address];
:local RealDynDNSIP [:pick $TMPDynDNSIP 0 ([:len $TMPDynDNSIP]-3)];
:if ($CurrentDynDNSIP!=$RealDynDNSIP) do={
/tool fetch url=($url . "?ip=$RealDynDNSIP&hostname=$ddns") mode=https user=$login password=$password http-method=post output=none;
/log info "Host $ddns updated on changeip.com with IP $RealDynDNSIP";
}