仿QQ登陆IP安全提示脚本-登陆提示语

;仿QQ登陆IP安全提示
;1.在<数据文件>文件夹内新建文件夹取名<登陆记录>
;2.在<登陆记录>新建文本文件取名为<登陆名单.txt>
;3.把以下脚本复制到登陆脚本中
;--当前登陆与上次登陆IP地址对比--账号安全提示-----------------------------------------------------
#IF
CHECKLISTTEXT..QuestDiary数据文件登陆记录登陆名单.txt<$USERNAME>
#ACT
GetRandomName..QuestDiary数据文件登陆记录<$USERNAME>IP.txtS0
GetRandomName..QuestDiary数据文件登陆记录<$USERNAME>dz.txtS1
GetRandomName..QuestDiary数据文件登陆记录<$USERNAME>t.txtS2
GetRandomName..QuestDiary数据文件登陆记录<$USERNAME>n.txtS10
MOVN0<$STR(S10)>
DelTextList..QuestDiary数据文件登陆记录<$USERNAME>IP.txt<$STR(S0)>
DelTextList..QuestDiary数据文件登陆记录<$USERNAME>dz.txt<$STR(S1)>
DelTextList..QuestDiary数据文件登陆记录<$USERNAME>t.txt<$STR(S2)>
DelTextList..QuestDiary数据文件登陆记录<$USERNAME>n.txt<$STR(N0)>
MOVS3安全提醒:当前登陆与上次登陆IP地址不同。请注意账号安全！
#ELSEACT
MOVN00
MOVS0未记录
MOVS1未记录
MOVS2未记录
MOVS3安全提醒:为了您的账号安全，记录您当前IP和所在地。谢谢您的支持！
AddTextList..QuestDiary数据文件登陆记录登陆名单.txt<$USERNAME>
#IF
equalS0<$IPADDR>
#ACT
SENDMSG7安全提醒:当前登陆与上次登陆IP地址相同。谢谢您的支持！
#ELSEACT
SENDMSG7<$STR(S3)>
#IF
CHECKLEVELEX>0
#ACT
SENDMSG7您上次登陆时间:<$STR(S2)>
SENDMSG7您当前登陆时间:<$DATETIME>
SENDMSG7您上次登陆IP:『<$STR(S0)>』所属地区:『<$STR(S1)>』
SENDMSG7您当前登陆IP:『<$IPADDR>』所属地区:『<$IPLOCAL>』
INCN01
SENDMSG7系统提示:当前第<$STR(N0)>条IP记录。
AddTextList..QuestDiary数据文件登陆记录<$USERNAME>IP.txt<$IPADDR>
AddTextList..QuestDiary数据文件登陆记录<$USERNAME>dz.txt<$IPLOCAL>
AddTextList..QuestDiary数据文件登陆记录<$USERNAME>t.txt<$DATETIME>
AddTextList..QuestDiary数据文件登陆记录<$USERNAME>N.txt<$STR(N0)>
AddTextList..QuestDiary数据文件登陆记录<$USERNAME>.txt[<$IPADDR>]|『<$IPLOCAL>』|<$DATETIME