网络广告风险自担 网络广告风险自担 网络广告风险自担 网络广告风险自担 网络广告风险自担 网络广告风险自担 网络广告风险自担 网络广告风险自担

 找回密码
 立即注册
搜索
查看: 2991|回复: 0

传奇NPC中常见的天下第一申请脚本

[复制链接]

1万

主题

7562

回帖

2万

积分

积分
26645
发表于 2016-12-20 16:06:58 | 显示全部楼层 |阅读模式

摘要:[@申请天下第一] 国王有令:为天下最强的勇士们在盟重土城树立雕像,彰显 \ 他们名号.天下群豪尽可以到我这里来登记在案,看看到底 \ 谁是群雄中的最强者.如果来登记的勇士中你是最强的一位 \ 你从此以后就可以名扬天下了. \ 我是天下第一/@天下第一 \ 天下第


[@申请天下第一]
国王有令:为天下最强的勇士们在盟重土城树立雕像,彰显 \
他们名号.天下群豪尽可以到我这里来登记在案,看看到底 \
谁是群雄中的最强者.如果来登记的勇士中你是最强的一位 \
你从此以后就可以名扬天下了. \
<我是天下第一/@天下第一> \
<天下第一有谁/@查看第一> \
<离开
/@exit> \
[@查看第一]
<天下第一男战士/@男战> \
<天下第一女战士/@女战> \
<天下第一男道士/@男道> \
<天下第一女道士/@女道> \
<天下第一男法师/@男法> \
<天下第一女法师/@女法> \
[@天下第一]
#IF
CHECKLEVELEX < 49
#act
break
#say
看来你很有信心,不过你还没有达到资格,你需要50级来证明自己的实力\
现在来申请天下第一恐怕还嫌早.\
<离开
/@exit>
#IF
gender man
checkjob warrior
#act
mov A0 <$LEVEL>
goto @男战申请
break
#IF
gender man
checkjob wizard
#act
break
mov A1 <$LEVEL>
goto @男法申请
#IF
gender man
checkjob taoist
#act
break
mov A2 <$LEVEL>
goto @男道申请
#IF
checkjob warrior
#act
break
mov A3 <$LEVEL>
goto @女战申请
#IF
checkjob wizard
#act
break
mov A4 <$LEVEL>
goto @女法申请
#IF
checkjob taoist
#act
break
mov A5 <$LEVEL>
goto @女道申请
[@男战申请]
#IF
large G24 <$STR(A0)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
EQUAL G24 <$STR(A0)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
HAVEGUILD
#act
break
mov G24 <$STR(A0)>
mov s1 <$USERNAME>\
inc S1 ↘天下第一男战↙
inc S1 \
mov A6 <$USERNAME>
mov A7 <$GUILDNAME>
mov A8 <$LEVEL>
mov A9 <$DATETIME>
SETRANKLEVELNAME <$STR(S1)>
CLEARNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
addnamelist ..\QuestDiary\天下第一\男战士名单.txt
SENDMSG 4 %s成功申请了天下第一男战士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一男战士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一男战士是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开
/@exit>
#IF
#act
mov G24 <$STR(A0)>
mov s1 <$USERNAME>\
inc S1 ↘天下第一男战↙\
inc S1 \
mov A6 <$USERNAME>
mov A7 暂无
mov A8 <$LEVEL>
mov A9 <$DATETIME>
SETRANKLEVELNAME <$STR(S1)>
CLEARNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
addnamelist ..\QuestDiary\天下第一\男战士名单.txt
SENDMSG 4 %s成功申请了天下第一男战士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一男战士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一男战士是<$USERNAME>,\
明天的天下第一会是谁? \ \
[@男法申请]
#IF
large G25 <$STR(A1)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
EQUAL G25 <$STR(A1)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
HAVEGUILD
#act
break
mov G25 <$STR(A1)>
mov s2 <$USERNAME>\
inc S2 ↘天下第一男法↙
inc S2 \
mov A10 <$USERNAME>
mov A11 <$GUILDNAME>
mov A12 <$LEVEL>
mov A13 <$DATETIME>
SETRANKLEVELNAME <$STR(S2)>
CLEARNAMELIST ..\QuestDiary\天下第一\男法师名单.txt
addnamelist ..\QuestDiary\天下第一\男法师名单.txt
SENDMSG 4 %s成功申请了天下第一男法师!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一男法师!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一男法师是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开
/@exit>
#IF
#act
mov G25 <$STR(A1)>
mov s2 <$USERNAME>\
inc S2 ↘天下第一男法↙
inc S2 \
mov A10 <$USERNAME>
mov A11 暂无
mov A12 <$LEVEL>
mov A13 <$DATETIME>
SETRANKLEVELNAME <$STR(S2)>
CLEARNAMELIST ..\QuestDiary\天下第一\男法师名单.txt
addnamelist ..\QuestDiary\天下第一\男法师名单.txt
SENDMSG 4 %s成功申请了天下第一男法师!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一男法师!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一男法师是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开
/@exit>
[@男道申请]
#IF
large G26 <$STR(A2)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
EQUAL G26 <$STR(A2)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
HAVEGUILD
#act
break
mov G26 <$STR(A2)>
mov s3 <$USERNAME>\
inc S3 ↘天下第一男道↙
inc S3 \
mov A14 <$USERNAME>
mov A15 <$GUILDNAME>
mov A16 <$LEVEL>
mov A17 <$DATETIME>
SETRANKLEVELNAME <$STR(S3)>
CLEARNAMELIST ..\QuestDiary\天下第一\男道士名单.txt
addnamelist ..\QuestDiary\天下第一\男道士名单.txt
SENDMSG 4 %s成功申请了天下第一男道士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一男道士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一男道士是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开
/@exit>
#IF
#act
mov G26 <$STR(A2)>
mov s3 <$USERNAME>\
inc S3 ↘天下第一男道↙
inc S3 \
mov A14 <$USERNAME>
mov A15 暂无
mov A16 <$LEVEL>
mov A17 <$DATETIME>
SETRANKLEVELNAME <$STR(S3)>
CLEARNAMELIST ..\QuestDiary\天下第一\男道士名单.txt
addnamelist ..\QuestDiary\天下第一\男道士名单.txt
SENDMSG 4 %s成功申请了天下第一男道士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一男道士!他在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一男道士是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开
/@exit>
[@女战申请]
#IF
large G27 <$STR(A3)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
EQUAL G27 <$STR(A3)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
HAVEGUILD
#act
break
mov G27 <$STR(A3)>
mov s4 <$USERNAME>\
inc S4 ↘天下第一女战↙
inc S4 \
mov A18 <$USERNAME>
mov A19 <$GUILDNAME>
mov A20 <$LEVEL>
mov A21 <$DATETIME>
SETRANKLEVELNAME <$STR(S4)>
CLEARNAMELIST ..\QuestDiary\天下第一\女战士名单.txt
addnamelist ..\QuestDiary\天下第一\女战士名单.txt
SENDMSG 4 %s成功申请了天下第一女战士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一女战士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一女战士是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开
/@exit>
#IF
#act
mov G27 <$STR(A3)>
mov s4 <$USERNAME>\
inc S4 ↘天下第一女战↙
inc S4 \
mov A18 <$USERNAME>
mov A19 暂无
mov A20 <$LEVEL>
mov A21 <$DATETIME>
SETRANKLEVELNAME <$STR(S4)>
CLEARNAMELIST ..\QuestDiary\天下第一\女战士名单.txt
addnamelist ..\QuestDiary\天下第一\女战士名单.txt
SENDMSG 4 %s成功申请了天下第一女战士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一女战士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一女战士是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开
/@exit>
[@女法申请]
#IF
large G28 <$STR(A4)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
EQUAL G28 <$STR(A4)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
HAVEGUILD
#act
break
mov G28 <$STR(A4)>
mov s5 <$USERNAME>\
inc S5 ↘天下第一女法↙
inc S5 \
mov A22 <$USERNAME>
mov A23 <$GUILDNAME>
mov A24 <$LEVEL>
mov A25 <$DATETIME>
SETRANKLEVELNAME <$STR(S5)>
CLEARNAMELIST ..\QuestDiary\天下第一\女法师名单.txt
addnamelist ..\QuestDiary\天下第一\女法师名单.txt
SENDMSG 4 %s成功申请了天下第一女法师!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一女法师!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一女法师是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开
/@exit>
#IF
#act
mov G28 <$STR(A4)>
mov s5 <$USERNAME>\
inc S5 ↘天下第一女法↙
inc S5 \
mov A22 <$USERNAME>
mov A23 暂无
mov A24 <$LEVEL>
mov A25 <$DATETIME>
SETRANKLEVELNAME <$STR(S5)>
CLEARNAMELIST ..\QuestDiary\天下第一\女法师名单.txt
addnamelist ..\QuestDiary\天下第一\女法师名单.txt
SENDMSG 4 %s成功申请了天下第一女法师!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一女法师!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一女法师是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开
/@exit>
[@女道申请]
#IF
large G29 <$STR(A5)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
EQUAL G29 <$STR(A5)>
#act
break
#say
对不起!!你目前还不是最高等级!\\\
#IF
HAVEGUILD
#act
break
mov G29 <$STR(A5)>
mov s6 <$USERNAME>\
inc S6 ↘天下第一女道↙
inc S6 \
mov A26 <$USERNAME>
mov A27 <$GUILDNAME>
mov A28 <$LEVEL>
mov A29 <$DATETIME>
SETRANKLEVELNAME <$STR(S6)>
CLEARNAMELIST ..\QuestDiary\天下第一\女道士名单.txt
addnamelist ..\QuestDiary\天下第一\女道士名单.txt
SENDMSG 4 %s成功申请了天下第一女道士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一女道士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一女道士是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开
/@exit>
#IF
#act
mov G29 <$STR(A5)>
mov s6 ↘天下第一女道↙\
inc S6 <$USERNAME>
inc S6 \
mov A26 <$USERNAME>
mov A27 暂无
mov A28 <$LEVEL>
mov A29 <$DATETIME>
SETRANKLEVELNAME <$STR(S6)>
CLEARNAMELIST ..\QuestDiary\天下第一\女道士名单.txt
addnamelist ..\QuestDiary\天下第一\女道士名单.txt
SENDMSG 4 %s成功申请了天下第一女道士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
SENDMSG 0 %s成功申请了天下第一女道士!她在烽烟四起的<$SERVERNAME>中修炼成为天下第一,明天的天下第一会是谁?
#say
申请成功!目前今天的天下第一女道士是<$USERNAME>,\
明天的天下第一会是谁? \ \
<离开
/@exit>
[@男战]
#CALL [\\天下第一\男战士.txt] @天下第一战男
[@男法]
#CALL [\\天下第一\男法师.txt] @天下第一法男
[@男道]
#CALL [\\天下第一\男道士.txt] @天下第一道男
[@女战]
#CALL [\\天下第一\女战士.txt] @天下第一战女
[@女法]
#CALL [\\天下第一\女法师.txt] @天下第一法女
[@女道]
#CALL [\\天下第一\女道士.txt] @天下第一道女


登陆时的封号读取脚本:
路径自己修改.
[@第一封号]
{
#IF
CHECKNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
#ACT
Mov S1 <$USERNAME>\
INC S1 ↘天下第一男战士↙\
SETRANKLEVELNAME <$STR(S1)>
Break
#IF
CHECKNAMELIST ..\QuestDiary\天下第一\男道士名单.txt
#ACT
Mov S1 <$USERNAME>\
INC S1 ↘天下第一男道士↙\
SETRANKLEVELNAME <$STR(S1)>
Break
#IF
CHECKNAMELIST ..\QuestDiary\天下第一\男法师名单.txt
#ACT
Mov S1 <$USERNAME>\
INC S1 ↘天下第一男法师↙\
SETRANKLEVELNAME <$STR(S1)>
Break
#IF
CHECKNAMELIST ..\QuestDiary\天下第一\女战士名单.txt
#ACT
Mov S1 <$USERNAME>\
INC S1 ↘天下第一女战士↙\
SETRANKLEVELNAME <$STR(S1)>
Break
#IF
CHECKNAMELIST ..\QuestDiary\天下第一\女道士名单.txt
#ACT
Mov S1 <$USERNAME>\
INC S1 ↘天下第一女道士↙\
SETRANKLEVELNAME <$STR(S1)>
Break
#IF
CHECKNAMELIST ..\QuestDiary\天下第一\女法师名单.txt
#ACT
Mov S1 <$USERNAME>\
INC S1 ↘天下第一女法师↙\
SETRANKLEVELNAME <$STR(S1)>

}



@



免责声明 1、本站所有内容、所有版本仅限于单机使用均由互联网收集整理、网友投稿赠予,仅供大家参考、学习研究使用,不存在任何商业目的与商业用途。 2、论坛的所有内容都不保证其准确性,完整性,有效性,因本站内容因误导等因素而造成的损失本站不承担连带责任。 3、本站以《2013 中华人民共和国计算机软件保护条例》第二章 “软件著作权” 第十七条为原则:为了学习和研究软件内含的设计思想和原理,通过安装、显示、传输或者存储软件等方式使用软件的,可以不经软件著作权人许可,若有用户需要商用本站资源,请务必联系版权方购买正版授权! 4、对于含有"打金、提现"等违规内容的版本坚决抵制、坚决反对《涉赌/黄》游戏版本,站内资源仅限于个人单机使用自娱自乐不得传播,如有其他用途请自行删除对应相关内容并获取正规授权,如未删除擅自用于商业的行为引起不良后果由使用者承担全部后果,本站有权对违规使用者信息进行记录和举报。 告知各位学习交流人员: 本站内容均来自互联网收集,仅为提供个人单机学习和研究软件版本的设计思想和原理为目的的交流探讨,不参与使用者如何使用,敬告请合理合规使用。 对于使用者对软件内容的增加删除与修改概不参与与本站无关。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ||手机版| ( 豫ICP备2021018486号 )

Powered by Discuz! X3.4 Licensed© 2001-2013 Comsenz Inc.