红鹰论坛

 找回密码
 立即注册
查看: 1724|回复: 5

传奇私服脚本系列-仿QQ登陆IP安全提示脚本-完美修复报错

[复制链接]
 成长值: 13235

6576

主题

266

回帖

3万

积分

论坛管理员

Rank: 17Rank: 17Rank: 17Rank: 17Rank: 17

积分
39622

推广达人宣传达人突出贡献优秀版主荣誉管理论坛元老

发表于 2013-5-18 20:52:40 | 显示全部楼层 |阅读模式
Mir200\Envir\MapQuest_def\QManage.txt [@Login]段代码下增加
#CALL [\登陆记录\登陆记录.txt] @登陆记录

Mir200\Envir\QuestDiary\里创建个文件夹 登陆记录
Mir200\Envir\QuestDiary\登陆记录 里创建个文件夹 记录

Mir200\Envir\QuestDiary\登陆记录 里创建个文本 登陆名单.txt
Mir200\Envir\QuestDiary\登陆记录 里创建个文本 登陆记录.txt

Mir200\Envir\QuestDiary\登陆记录\登陆记录.txt 里的代码如下:

[@登陆记录]
{
#IF
CheckTextList .\QuestDiary\登陆记录\登陆名单.txt <$USERNAME>
#ACT
GetRandomName .\QuestDiary\登陆记录\记录\<$USERNAME>IP.txt S0
GetRandomName .\QuestDiary\登陆记录\记录\<$USERNAME>dz.txt S1
GetRandomName .\QuestDiary\登陆记录\记录\<$USERNAME>t.txt S2
GetRandomName .\QuestDiary\登陆记录\记录\<$USERNAME>n.txt S10
MOV N0 <$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)>
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记录。
CreateFile QuestDiary\登陆记录\记录\<$USERNAME>IP.txt
CreateFile QuestDiary\登陆记录\记录\<$USERNAME>dz.txt
CreateFile QuestDiary\登陆记录\记录\<$USERNAME>t.txt
CreateFile QuestDiary\登陆记录\记录\<$USERNAME>N.txt
CreateFile QuestDiary\登陆记录\记录\<$USERNAME>.txt
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>>|
}





上一篇:传奇私服脚本系列-摇骰子验证码脚本
下一篇:传奇新装备属性元素出极品的控制说明
请认真回贴,发垃圾贴,一律做封号处理。请到小黑屋申请解封.站长QQ:18341427QQ群:85527291
回复

举报

0

主题

3

回帖

19

积分

一级GM

Rank: 2

积分
19
发表于 2013-10-23 09:01:07 | 显示全部楼层
楼主是超人

0

主题

5

回帖

21

积分

一级GM

Rank: 2

积分
21
发表于 2013-10-23 09:30:42 | 显示全部楼层
好帖就是要顶

0

主题

4

回帖

18

积分

一级GM

Rank: 2

积分
18
发表于 2013-10-23 09:02:58 | 显示全部楼层
说的非常好

0

主题

4

回帖

18

积分

一级GM

Rank: 2

积分
18
发表于 2013-10-23 09:01:22 | 显示全部楼层
不错不错

0

主题

5

回帖

20

积分

一级GM

Rank: 2

积分
20
发表于 2013-10-23 09:15:46 | 显示全部楼层
LZ真是人才
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

新手推荐上一条 /1 下一条

传奇服务端|传奇一条龙|站点地图|手机版|gm基地|红鹰论坛 ( 冀ICP备2023015431号-1 )|网站地图

GMT+8, 2024-11-10 11:22

Powered by 传奇版本 X3.4

本站于2013年2月28日成立,至今运行: 天。本站所有资源均来自网络,严禁商业使用,请于24小时内删除!
快速回复 返回顶部 返回列表