;仿QQ登陆IP安全提示 ;1.在数据文件文件夹内新建文件夹取名登陆记录 ;2.在登陆记录新建文本文件取名为登陆名单.txt ;3.把以下脚本复制到登陆脚本中 ;--当前登陆与上次登陆IP地址对比--账号安全提示------------传奇官方--------------
;仿QQ登陆IP安全提示 ;1.在数据文件文件夹内新建文件夹取名登陆记录 ;2.在登陆记录新建文本文件取名为登陆名单.txt ;3.把以下脚本复制到登陆脚本中 ;--当前登陆与上次登陆IP地址对比--账号安全提示------------传奇官方--------------布拉格家族战歌--------------------------- #IF CHECKLISTTEXT ..QuestDiary数据文件登陆记录登陆名单.txt $USERNAME #ACT GetRandomName ..QuestDiary数据文件登陆记录$USERNAMEIP.txt S0 GetRandomName ..QuestDiary数据文件登陆记录$USERNAMEdz.txt S1 GetRandomName ..QuestDiary数据文件登陆记录$USERNAMEt.txt S2 GetRandomName ..QuestDiary数据文件登陆记录$USERNAMEn.txt S10 MOV N0 $STR(S10) DelTextList ..QuestDiary数据文件登陆记录$USERNAMEIP.txt $STR(S0) DelTextList ..QuestDiary数据文件登陆记录$USERNAMEdz.txt $STR(S1) DelTextList ..QuestDiary数据文件登陆记录$USERNAMEt.txt $STR(S2) DelTextList ..QuestDiary数据文件登陆记录$USERNAMEn.txt $STR(N0) MOV S3 安全提醒:当前登陆与上次登陆IP地址不同。请注意账号安全! #ELSEACT MOV N0 0 MOV S0 未记录 MOV S1 未记录 MOV S2 未记录 MOV S3 安全提醒:为了您的账号安全,记录您当前IP和所在地。谢谢您的支持! AddTextList ..QuestDiary数据文件登陆记录登陆名单.txt $USERNAME #IF equal S0 $IPADDR #ACT SENDMSG 7 安全提醒:当前登陆与上次登陆IP地址相同。谢谢您的支持! #ELSEACT SENDMSG 7 $STR(S3) #IF CHECKLEVELEX 0 #ACT SENDMSG 7 您上次登陆时间:$STR(S2) SENDMSG 7 您当前登陆时间:$DATETIME SENDMSG 7 您上次登陆IP:『$STR(S0)』所属地区:『$STR(S1)』 SENDMSG 7 您当前登陆IP:『$IPADDR』所属地区:『$IPLOCAL』 INC N0 1 SENDMSG 7 系统提示:当前第$STR(N0)条IP记录。 AddTextList ..QuestDiary数据文件登陆记录$USERNAMEIP.txt $IPADDR AddTextList ..QuestDiary数据文件登陆记录$USERNAMEdz.txt $IPLOCAL最新变态传奇私服 AddTextList ..QuestDiary数据文件登陆记录$USERNAMEt.txt $DATETIME AddTextList ..QuestDiary数据文件登陆记录$USERNAMEN.txt $STR(N0) AddTextList ..QuestDiary数据文件登陆记录$USERNAME.txt [$IPADDR]|『$IPLOCAL』|$DATETIME
TAGS:热血传奇 炼狱