Localisation par adresse ip en script batch

set "api_key=

@echo off
chcp 65001 >nul
mode con cols=80 lines=60
setlocal enableextensions enabledelayedexpansion

set "api_key=at#VeUYrH7jk2PHaNn5NFHF9LcwWwwZT"

:debut

set "adresse="
cls & echo.
set /p adresse=">>> Entrez l'adresse IP à géolocaliser = "
if not defined adresse (goto :debut)

echo %adresse% | findstr /r "\<[0-9][0-9]*\.[0-9][0-9]*\.[0-9][0-9]*\.[0-9][0-9]*\>" >nul || goto :debut

curl -G -s "https://geo.ipify.org/api/v1?apiKey=%api_key%&ipAddress=%adresse%" > %TMP%\temp498.txt
set /p string=<%TMP%\temp498.txt

set "prefix="

:parse

for /f "tokens=1* delims=," %%A in ("!string!") do set data=%%A & set string=%%B

set data=!data:"= !
set data=!data:{= !
set data=!data:}= !
set data=!data:\=!
set data=!data:[=!
set data=!data:]=!
set data=!data:location :  =!
set data=!data: ip :=ip :!
set data=!data:as :  =!
set data=!data:proxy :  =!

set data=!data:u00ce=Î!
set data=!data:u00e9=é!
set data=!data:u00e8=è!
set data=!data:u00ee=î!
set data=!data:u00f4=ô!
set data=!data:u00e0=à!
set data=!data:u00ea=ê!

echo.!data! | findstr /lic:"Located in" >nul && set "prefix=!data:~0,-1!," || (echo. & echo !prefix!!data! & set "prefix=")

if defined string (goto :parse)

echo.
echo ###############################################################################
echo.

for /f "tokens=2 delims=:" %%A in ('curl -G -s "https://geo.ipify.org/service/account-balance?apiKey=%api_key%"') do set credit=%%A

set credit=!credit:~0,-1!

echo Grâce à l'api gratuite d'ipify vous avez droit à 1000 requêtes par mois.
echo.
echo Ce mois-ci, il vous reste !credit! requêtes à effectuer.
echo.
echo ###############################################################################

echo. & pause
exit