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

[复制链接]
查看1018 | 回复87 | 2023-12-15 16:31:47 | 显示全部楼层 |阅读模式
  [@申请天下一号]

  国王有令:为天下醉强的勇士们在盟重土城树立雕像,彰显 \

  他们名号.天下群豪尽可以到我这里来登记在案,看看到底 \

  谁是群雄中的醉强者.如果来登记的勇士中你是醉强的一位 \

  你从此以后就可以名扬天下了. \

  <我是天下一号/@天下一号> \

  <天下一号有谁/@查看一号> \

  <离开/@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)>

  }




上一篇:商业拍卖系统blue leg引擎专用
下一篇:功能: 自定义变量功能,不再受固定几个变量限制
回复

使用道具 举报

唐利 | 2023-12-15 16:31:55 | 显示全部楼层
站长,有没有超变之类的版本,我想开个超变传奇和朋友一块玩!
回复

使用道具 举报

传奇一条龙 | 2023-12-15 16:31:55 | 显示全部楼层
请问这个版本需要用到什么配置的电脑?家里的机器可以开起来吗?试过的朋友麻烦告诉我一下?
回复

使用道具 举报

你妹哦 | 2023-12-15 16:31:56 | 显示全部楼层
Leg引擎引擎的版本多更新点吧,我会好好的给GM起点宣传宣传。
回复

使用道具 举报

快乐英雄 | 2023-12-15 16:35:20 | 显示全部楼层
有没有信誉的传奇支付平台?有的话,回复我一下,在线等!
回复

使用道具 举报

小佛 | 2023-12-15 16:38:54 | 显示全部楼层
有喜欢1.85炎龙传奇的吗?找个合伙人一块弄个这样的私服!
回复

使用道具 举报

大大大 | 2023-12-15 16:38:55 | 显示全部楼层
有没有开这种类型传奇sf的人啊?我要玩玩!
回复

使用道具 举报

黑夜比白天 | 2023-12-15 16:38:55 | 显示全部楼层
站长,有没有这个传奇服务端相关的架设教程啊?
回复

使用道具 举报

飘荡的青春 | 2023-12-15 16:38:56 | 显示全部楼层
我开了个迷失传奇,请问有没有好点的迷失传奇私服发布网推荐一下?
回复

使用道具 举报

爱,不单行 | 2023-12-15 16:38:56 | 显示全部楼层
虽然这个版本不错,但我个人比较喜欢1.76元素大极品的。
回复

使用道具 举报

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

本版积分规则