探测外网　上传ＩＰ　实现花生壳功能　　３０块　请留下微信转账

@echo off&setlocal EnableDelayedExpansion 
CD /D "%~dp0"
:2
if errorlevel 0 goto 0
if errorlevel 1 goto 1
:0
echo 当前时间 %time%
@for /f "tokens=1-7 delims=^|" %%a in ('type ip.txt') do (set N=%%d
    for /f "delims=" %%j in ('curl "http://www.bathome.net/s/ip.php"^|grep -oP "\d+\.\d+\.\d+\.\d+"') do (set M=%%j
if !N! equ !M! (
echo ip相同，不替换
) else (
cls
echo !N!替换!M!
sed -i "s/!N!/!M!/g" ip.txt
    )
  )
)
ftp -s:ftp.txt
ping -n 300 127.1>nul

goto :2
:1
echo ……
pause
复制代码

open ip 端口
用户名
密码
MDELETE ip.txt
y
put ip.txt ip.txt
bye
复制代码

open 192.168.2.100 2121
ftp
123456
MDELETE ip.txt
y
put ip.txt ip.txt
bye
复制代码