传奇一条龙服务教你如何制作在线改名脚本制作教程
[@main]
#IF
#ACT
CloseBigDialogBox
#SAY
<改名师/SCOLOR=19> <尊敬的玩家,您好/SCOLOR=151> <〖欢迎使用改名服务〗/SCOLOR=87>\
{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\
{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\
{禁止使用空白名字,非法符号,擦边球之内的发现直接删号永不恢复/SCOLOR=249}\ \
<改名每次收费100W元宝/SCOLOR=250> <改名前先查询是否可用,如不查询,后果自负/SCOLOR=249>\
<√查询名称是否被占用/@@InputString1(请输入查询的名称:)><√我要改当前人物名字/@@InputString2(请输入新的名称:)>\
[@InputString1]
#IF
Equal S1
#ACT
SENDMSG 6 请输入一个正确的名称
Break
#IF
CHECKTEXTLIST ..\QuestDiary\禁止修改名称.txt <$Str(S1)>
#Act
MessageBox [提示:]\\该名字已被其他玩家使用!
Break
#OR
CheckStringlength S1 > 20
CheckStringlength S1 < 4
#ACT
SENDMSG 6 输入名称长度不正确
Break
#IF
#ACT
QUERYHUMNAMEEXIST S1
[@InputString2]
#IF
CHECKGAMEGOLD < 1000000
#ACT
messagebox 你元宝不足!
BREAK
#if
equal s2 <$username>
#act
messagebox 输入的名称为现在名称.无需修改!
break
#IF
Equal S2
#ACT
SENDMSG 6 请输入一个正确的名称
Break
#OR
CheckStringlength S2 > 20
CheckStringlength S2 < 4
#ACT
SENDMSG 6 输入名称长度不正确
Break
#IF
#ACT
GAMEGOLD - 1000000
CHANGEHUMNAME S2 喜欢这里的东西,方便又好用! 楼主发贴辛苦了,谢谢楼主分享!感谢楼主提供这么好的论坛! 这东西我收了! 这个帖子不回对不起自己! 下次在来看脚本 下次在来看脚本 感谢站长分享传奇脚本,让我学习到很多知识。 楼主发贴辛苦了,谢谢楼主分享!感谢楼主提供这么好的论坛! 感谢站长分享传奇脚本,让我学习到很多知识。