传奇一条龙服务教你制作在线改名脚本制作教程_传奇改名字大全

[@main]

#IF

#ACT

CloseBigDialogBox

#SAY

<改名师/SCOLOR=19> <尊敬的玩家,您好/SCOLOR=151> <〖欢迎使用改名服务〗/SCOLOR=87>\

<改名每次收费100W元宝/SCOLOR=250>　<改名前先查询是否可用，如不查询，后果自负/SCOLOR=249>\

<√查询名称是否被占用/@@InputString1(请输入查询的名称：)><√我要改当前人物名字/@@InputString2(请输入新的名称：)>\

[@InputString1]

Equal S1

SENDMSG 6 请输入一个正确的名称

Break

CHECKTEXTLIST ..\QuestDiary\禁止修改名称.txt <$Str(S1)>

#Act

MessageBox [提示:]\\该名字已被其他玩家使用!

#OR

CheckStringlength S1 > 20

CheckStringlength S1 < 4

SENDMSG 6 输入名称长度不正确

QUERYHUMNAMEEXIST S1

[@InputString2]

CHECKGAMEGOLD < 1000000

messagebox 你元宝不足!

BREAK

#if

equal s2 <$username>

#act

messagebox 输入的名称为现在名称.无需修改!

break

Equal S2

CheckStringlength S2 > 20

CheckStringlength S2 < 4

GAMEGOLD - 1000000

CHANGEHUMNAME S2