中国DOS联盟

@echo off
title 飞信发信程序  By radem (2009-9)
echo.
echo.        说明：1.本程序只使用于飞信好友之间发短信
echo.              2.无需安装飞信客户端
echo.              3.免费
echo.
pause
:new
cls
set sno=
set psw=
set rno=
set /p sno=请输入发信号码：
if "%sno%#" == "#" goto err
set /p psw=请输入密码：
if "%psw%#" == "#" goto err
set /p rno=请输入收信号码：
if "%rno%#" == "#" goto err
if not exist @#$fx.txt cd.>@#$fx.txt
start @#$fx.txt
:send
cls
echo.
echo.请在打开的记事本（@#$fx.txt）输入要发送的内容
echo.记住要保存，而且一行有效。
echo.
echo.按任意键发送&pause>nul
for /f "delims=" %%a in ('type "@#$fx.txt"') do set msg=%%a
mshta "http://sms.api.bz/fetion.php?username=%sno%&password=%psw%&sendto=%rno%&message=%msg%"
echo.已经完成！
echo.
if "%sno%#" == "#" goto new
echo.[Q]退出        [N]改变发号、密码、收号        [其他继续]
set /p slt=请选择：
if /i "%slt%#" == "q#" exit
if /i "%slt%#" == "n#" goto new
goto send
:err
echo 错误！按人任意键退出&pause>nul&goto :eof