传奇一条龙服务教你如何制作在线改名脚本制作教程

教皇

[@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


免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！