设为首页
收藏本站
传奇版本库-免费提供各种传奇服务端版本下载
开启辅助访问
切换到宽版
充值积分
登录
注册传奇版本库账号
传奇版本库首页
BBS
传奇服务端
手游版本
登录器列表
搜索
搜索
每日签到
论坛文字广告【50元/月】自助购买
论坛文字广告【50元/月】自助购买
论坛文字广告【50元/月】自助购买
论坛文字广告【50元/月】自助购买
论坛文字广告【50元/月】自助购买
论坛文字广告【50元/月】自助购买
论坛文字广告【50元/月】自助购买
论坛文字广告【50元/月】自助购买
论坛文字广告【50元/月】自助购买
论坛文字广告【50元/月】自助购买
本版
帖子
用户
传奇版本库
»
传奇版本库首页
›
传奇版本资源分享
›
传奇技术教程
›
天下第一脚本BLUE引擎传奇NPC脚本代码编写
返回列表
发新帖
[技术文章]
天下第一脚本BLUE引擎传奇NPC脚本代码编写
[复制链接]
1389
|
0
|
2022-9-2 20:07:12
|
显示全部楼层
|
阅读模式
天下第一脚本BLUE编写的天下第一脚本(传奇)
天下第一脚本功能:
1.检测申请人等级,最高即可申请当前职业的天下第一;
2.申请成功后可获得1.1倍攻击属性;
3.系统每六小时刷新清零一次,刷新后需要重新申请;
4.如碰到最高等级相同的两个或几个人,可使用无限RMB申请。
()
%100
[@main]
国王有令:为天下最强的勇士们在盟重土城树立雕像,彰显 \
他们名号。天下群豪尽可以到我这里来登记在案,看看到底 \
谁是群雄中的最强者。如果来登记的勇士中你是最强的一位 \
你从此以后就可以名扬天下了。 \
<我是天下第一/@天下第一> \
<天下第一有谁/@查看第一> \
<离开/@exit> \
[@查看第一]
<天下第一男战士/@男战> \
<天下第一女战士/@女战> \
<天下第一男道士/@男道> \
<天下第一女道士/@女道> \
<天下第一男法师/@男法> \
<天下第一女法师/@女法> \
[@天下第一]
#IF
CHECKLEVELEX < 49
#act
break
#say
看来你很有信心,不过你还没有达到资格,你需要50级来证明自己的实力\
现在来申请天下第一恐怕还嫌早.\
<离开/@exit>
#IF
gender man
checkjob warrior
#act
break
mov A0 <$LEVEL>
goto @男战申请
#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 ↘天下第一男战↙\
inc S1 <$USERNAME>
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 ↘天下第一男战↙\
inc S1 <$USERNAME>
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 ↘天下第一男法↙\
inc S2 <$USERNAME>
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 ↘天下第一男法↙\
inc S2 <$USERNAME>
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 ↘天下第一男道↙\
inc S3 <$USERNAME>
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 ↘天下第一男道↙\
inc S3 <$USERNAME>
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 ↘天下第一女战↙\
inc S4 <$USERNAME>
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 ↘天下第一女战↙\
inc S4 <$USERNAME>
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 ↘天下第一女法↙\
inc S5 <$USERNAME>
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 ↘天下第一女法↙\
inc S5 <$USERNAME>
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 ↘天下第一女道↙\
inc S6 <$USERNAME>
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] @天下第一道女
以上为加入检测天下第一人的脚本!以下是变量显示:
[@天下第一道男]
{
天下第一男道士:<$STR(A14)>\
所属行会:<$STR(A15)> \\
纷扰乱世群雄逐鹿,<$STR(A14)>在烽烟四起的<$SERVERNAME>中修炼成为\
天下第一、他从<$STR(A17)>至今还没有人可以超越。\
<$STR(A14)>的目前等级为<$STR(A16)>级。\
今天的天下第一是<$STR(A14)>,明天的天下第一会是谁?\
申请天下第一名号,请到比齐皇宫找天下第一 <离开/@exit>
}
[@天下第一法男]
{
天下第一男法师:<$STR(A10)>\
所属行会:<$STR(A11)> \\
纷扰乱世群雄逐鹿,<$STR(A10)>在烽烟四起的<$SERVERNAME>中修炼成为\
天下第一、他从<$STR(A13)>至今还没有人可以超越。\
<$STR(A10)>的等级目前为<$STR(A12)>级。\
今天的天下第一是<$STR(A10)>,明天的天下第一会是谁?\
申请天下第一名号,请到比齐皇宫找天下第一 <离开/@exit>
}
[@天下第一战男]
{
天下第一男战士:<$STR(A6)>\
所属行会:<$STR(A7)> \ \
纷扰乱世群雄逐鹿,<$STR(A6)>在烽烟四起的<$SERVERNAME>中修炼成为\
天下第一、他从<$STR(A9)>至今还没有人可以超越。\
<$STR(A6)>的等级目前为<$STR(A8)>级。\
今天的天下第一是<$STR(A6)>,明天的天下第一会是谁?\
申请天下第一名号,请到比齐皇宫找天下第一 <离开/@exit>
}
[@天下第一道女]
{
天下第一女道士:<$STR(A26)>\
所属行会:<$STR(A27)> \\
纷扰乱世群雄逐鹿,<$STR(A26)>在烽烟四起的<$SERVERNAME>中修炼成为\
天下第一、她从<$STR(A29)>至今还没有人可以超越。\
<$STR(A26)>的等级目前为<$STR(A28)>级。\
今天的天下第一是<$STR(A26)>,明天的天下第一会是谁?\
申请天下第一名号,请到比齐皇宫找天下第一 <离开/@exit>
}
[@天下第一法女]
{
天下第一女法师:<$STR(A22)>\
所属行会:<$STR(A23)> \\
纷扰乱世群雄逐鹿,<$STR(A22)>在烽烟四起的<$SERVERNAME>中修炼成为\
天下第一、她从<$STR(A25)>至今还没有人可以超越。\
<$STR(A22)>的等级目前为<$STR(A24)>级。\
今天的天下第一是<$STR(A22)>,明天的天下第一会是谁?\
申请天下第一名号,请到比齐皇宫找天下第一 <离开/@exit>
}
[@天下第一战女]
{
天下第一女战士:<$STR(A18)>\
所属行会:<$STR(A19)> \\
纷扰乱世群雄逐鹿,<$STR(A18)>在烽烟四起的<$SERVERNAME>中修炼成为\
天下第一、她从<$STR(A21)>至今还没有人可以超越。\
<$STR(A18)>的等级目前为<$STR(A20)>级。\
今天的天下第一是<$STR(A18)>,明天的天下第一会是谁?\
申请天下第一名号,请到比齐皇宫找天下第一 <离开/@exit>
}
BLUE引擎
,
传奇脚本
,
传奇NPC
上一篇:
传奇版本男女衣服互换脚本保持原有属性思路
下一篇:
新手写脚本必看脚本教程-传奇脚本代码
相关帖子
•
利用Text变量+遍历循环+变量嵌套实现随机套装
•
NPC界面对话框中播放图片和动画-传奇GEE引擎
•
查看他人装备触发-GEE引擎查看英雄装备触发QF脚本
•
仙剑情缘2.8龙珠传奇NPC任务大全脚本代码
•
传奇常量设置脚本代码超好用Defines详细用法
•
带编号1&img:N:F的脚本写入传奇GEE引擎代码
•
传奇GXX引擎LUA脚本的优势
回复
使用道具
举报
返回列表
发新帖
高级模式
B
Color
Image
Link
Quote
Code
Smilies
您需要登录后才可以回帖
登录
|
注册传奇版本库账号
本版积分规则
发表回复
回帖后跳转到最后一页
传奇版本库
1354
主题
1557
帖子
16万
积分
管理员
积分
161200
加好友
发消息
回复楼主
返回列表
传奇技术教程
传奇补丁模板
传奇软件工具
引擎登录器
传奇版本服务端推荐
传奇dbc2000数据库下载【中文免费版】32和64位
2018-10-13
176复古金币91M2引擎基础版「开发底板免费下载」
2022-10-26
血源大陆-轻变单职业传奇服务端「免费下载」
2022-11-19
1.76风云公益元素传奇服务端「免费下载」
2022-05-12
185单机版本GOM引擎带假人
2022-06-13
服务端版本排行
1
传奇91M2手游引擎更新包「官方源码」
2
龙族longzuyq引擎包20230927更新下载
3
176金币月卡复古传奇版本服务端「纯净版」
4
nginx-1.24.0服务器网站web建设win软件工具
5
1.76御风复古小极品三职业版「免费下载」
6
传奇手游架设配置nginx服务端教程GXX引擎
7
传奇GXX引擎LUA脚本的优势
8
1.76赤月屠龙终极「御风复古」网站html模板
9
传奇GXX引擎手游 Lua脚本接口
10
传奇GXXM2引擎自定义按钮添加脚本功能