大家都知道私服区组多相同名字在所难免,
特别是自己辛苦练出一个号合到老区结果因为重名无耐名字后面带上a,
真是删号不舍,继续玩名字看起来实在别扭。
根据以上问题,天成娱乐制作了一套可以让名字后加“a”的玩家自助更换姓名的脚本,让玩家不必为重命名而苦恼。
我们先打开我们的传奇私服服务端目录下的makedef,
新建一个TXT文本,人物改名-3.TXT,
打开文本写入()
%100
[@main]
尊敬的骨灰玩家您好.我能帮你在线转移等级,元宝,积分<$Leg引擎LEVEL>。\
(首先请您注册一个新的游戏帐号,建一个新的游戏角色)\
请将新游戏角色登陆游戏后开始认真读取以下转移条件：\
1."<$USERNAME>"被称为“旧角色”，您的新角色被称“新角色”。\
2.“旧角色”和“新角色”加双方英雄一定要同时在线。\
3.“旧角色”和“新角色”的IP要一样。(您的IP：<$IPADDR>)\
4.转移后,“新角色”将会获得“旧角色”的等级,元宝,积分.\
5.转移后,“旧角色”的等级,元宝,积分,会变成0。\
<[设置转移密码]/@设置英雄删除密码> <[开始转移等级,元宝,积分数据给另一个新角色]/@开始转移等级>
[@设置英雄删除密码]
1.请不要把删除英雄的密码设置的和登陆密码一样\
2.合区之后就会清理您的英雄删除密码.\
3.请不要相信游戏中的骗子，特别不要下载盗号的游戏外挂\
4.设置英雄删除密码后不可以更改,请您一定要牢记\
5.<密码请使用8位以下的数字/FCOLOR=222> \
<提示：本密码和英雄删除密码一致>\
<如果您设置过英雄删除密码。那就无须设置了/FCOLOR=250> \ \
<[确定设置转移密码]/@@InPutInteger71|Title=请设置一个密码(8位以下的数字)> <[返回上页]/@main>
[@@InPutInteger71]
#IF
CHECKVAR HUMAN 英雄删除密码 = 0
#Act
DelayGoto 500 ~InPutInteger71
#ELSEsay
您已经设置过删除密码了,请合区后再点我重新设置！ <[返回上页]/@main>
[~InPutInteger71]
#IF
CHECKVAR HUMAN 英雄删除密码 = 0
LARGE N71 0
SMALL N71 100000000
#Act
CALCVAR HUMAN 英雄删除密码 = <$STR(N71)>
SAVEVAR HUMAN 英雄删除密码 ..\QuestDiary\副本地图\是否开启.txt
#say
设置成功! <[返回上页]/@main>
#ELSEact
messagebox 只能输入8位以下的纯数字！
goto @设置英雄删除密码
break
[@开始转移等级]
请您输入转移密码\ \
<[输入转移密码]/@@InPutInteger72|Title=请输入您的转移密码>\
<[返回上页]/@main>\
[@@InPutInteger72]
#IF
CHECKVAR HUMAN 英雄删除密码 > 0
#Act
DelayGoto 500 ~InPutInteger72
#ELSEsay
您并没有设置过删除密码，请您先设置删除密码后再来 <[返回上页]/@main>
[~InPutInteger72]
#IF
CHECKVAR HUMAN 英雄删除密码 = <$STR(N72)>
#Act
goto @开始转移等级1
break
#ELSEact
messagebox 密码输入错误！
goto @main
break
[@开始转移等级1]
恭喜您,密码输入正确。\
您好,您必须清楚自己在做什么再使用本功能.否则后果请自负.\ \
<[输入新角色的名字]/@@InPutString1|Title=请输入您的新角色名字>\
<[返回上页]/@main>\
[@@InPutString1]
#IF
checklevelex < 190
#Act
close
MESSAGEBOX 对不起,您的等级不足190级,无法操作。
BREAK
#IF
#Act
DelayGoto 500 ~InPutString1
BREAK
[~InPutString1]
#IF
EQUAL S1
#ACT
MESSAGEBOX [错误]:输入内容为空,请重新输入!
GOTO @main
BREAK
#IF
EQUAL S1 <$USERNAME>
#ACT
MESSAGEBOX 我日。“<$USERNAME>”是旧角色，您必须输入新角色的名字。
GOTO @main
BREAK
#ELSESAY
请您确认一下。\ \ \
您的新角色名字为：<$STR(s1)>\ \
您确定将“<$USERNAME>”的数据转移给“<$STR(s1)>”吗？\ \
为了避免恶意转移,每转移1次需要支付10万元宝\
<[确定支付10万元宝进行转移]/@确定转移111> <[返回上页]/@main>\
[@确定转移111]
#if
HAVELeg引擎
#act
#ELSEACT
MESSAGEBOX 对不起，您还没有申请英雄！
goto @main
BREAK
#if
CHECKLeg引擎ONLINE
#act
#ELSEACT
close
MESSAGEBOX 对不起，您的英雄不在线！
BREAK
#IF
CHECKLeg引擎LEVEL > 189
#ACT
#ELSEact
messagebox 对不起,您的英雄没有190级。无法操作
break
#IF
CHECKGAMEGOLD > 99999
#act
#ELSEact
messagebox 对不起,您的元宝不足10万个。
DelayGoto 100 ~InPutString1
break
#IF
CheckOnline <$STR(s1)>
#ACT
#ELSEact
messagebox 对不起,“<$STR(s1)>”不在线,操作失败。
DelayGoto 100 ~InPutString1
break
#IF
#ACT
mov a230
inc a230 <$USERNAME>
mov a231
inc a231 <$STR(s1)>
mov a232
inc a232 <$IPADDR>
mov g246 <$LEVEL>
mov g241 <$GOLDCOUNT>
mov g242 <$GAMEGOLD>
mov g243 <$GAMEPOINT>
mov g244 <$GAMEDIAMOND>
mov g245 <$GAMEGIRD>
GAMEGOLD - 100000
HCall <$STR(a231)> @转移检测IP
break
==============================分割线===================================
2.QManage.txt中添加以下内容
[@转移检测IP]
#if
HAVELeg引擎
#act
#ELSEACT
HCall <$STR(a230)> @转移检测英雄没通过
BREAK
#if
CHECKLeg引擎ONLINE
#act
#ELSEACT
HCall <$STR(a230)> @转移检测英雄没通过
BREAK
#IF
EQUAL a232 <$IPADDR>
#act
mov s1
inc s1 <$STR(a230)>
mov m0 <$STR(g246)>
mov m1 <$STR(g241)>
mov m2 <$STR(g242)>
mov m3 <$STR(g243)>
mov m4 <$STR(g244)>
mov m5 <$STR(g245)>
HCall <$STR(a230)> @转移检测IP通过
break
#say
重要提示：\ \
玩家“<$STR(a230)>”决定将数据转移给您,请问您是否确定转移？\ \ \
<[确定转移]/@确定转移数据>
#IF
#act
HCall <$STR(a230)> @转移检测IP没通过
break
[@转移检测IP没通过]
#IF
#act
messagebox 对不起,操作失败。“<$STR(s1)>”的IP与你不同。
break
[@确定转移数据]
#IF
#act
GMEXECUTE 级 <$STR(m0)>
;give 金币 <$STR(m1)>
GAMEGOLD + <$STR(m2)>
mov m2 0
GAMEPOINT + <$STR(m3)>
mov m3 0
GAMEDIAMOND + <$STR(m4)>
mov m4 0
GAMEGIRD + <$STR(m5)>
mov m5 0
CHANGELeg引擎LEVEL = 190
close
messagebox 恭喜您,转移成功！您获得了“<$STR(s1)>”转移给你的所有能力。\声明：您的转移记录已经被保存,如果您是盗号的，那你就等死吧。
break
[@转移检测IP通过]
#IF
#act
changelevel = 1
CHANGELeg引擎LEVEL = 1
GAMEGOLD = 0
GAMEPOINT = 0
GAMEDIAMOND = 0
GAMEGIRD = 0
CHANGELeg引擎LEVEL = 1
close
SendCenterMsg 249 255 [公告]玩家“<$USERNAME>”将等级转移给了另一个新号. 1 15 1
messagebox 恭喜您,等级，元宝，积分转移成功！装备物品请自己交易转。
break
[@转移检测英雄没通过]
#IF
#act
close
messagebox 对不起,“<$STR(a230)>”的英雄不在线或没建立。
break
保存,后叉掉。M2上控制,重新加载NPC脚本。完成,去体验一下这个新功能吧!
此脚本已在3k引擎上实现,至于Leg引擎与Blue大家可以尝试测试一下。
如果您感觉我们做的脚本还算不错,请把我们的私服一条龙网站推荐给您的朋友,
关注天成娱乐,学习独具特色私服游戏功能脚本,让您的私服与众不同!
|传奇服务端| 一休论坛 ( 冀ICP备2023015431号-6 ) |网站地图
成长值: 10557
发表于 2015-6-30 11:22:31
发表于 2015-7-1 06:09:39
