江影 发表于 2023-12-15 22:45:21

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






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

勇敢牛牛 发表于 2023-12-15 23:03:48

喜欢这里的东西,方便又好用!

76合击 发表于 2023-12-16 03:08:39

楼主发贴辛苦了,谢谢楼主分享!感谢楼主提供这么好的论坛!

迷失沉默 发表于 2023-12-16 10:52:34

这东西我收了!

进化录混沌 发表于 2023-12-16 16:08:34

这个帖子不回对不起自己!

金币合击 发表于 2023-12-17 08:30:31

下次在来看脚本

山河万象 发表于 2023-12-18 01:38:47

下次在来看脚本

风云合击 发表于 2023-12-18 02:45:47

感谢站长分享传奇脚本,让我学习到很多知识。

帝王火龙 发表于 2023-12-18 11:03:03

楼主发贴辛苦了,谢谢楼主分享!感谢楼主提供这么好的论坛!

幻想大陆 发表于 2023-12-18 11:11:26

感谢站长分享传奇脚本,让我学习到很多知识。
页: [1] 2 3 4
查看完整版本: 传奇一条龙服务教你如何制作在线改名脚本制作教程