原始传奇

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 8|回复: 0

龙骨小极品天下第一脚本上线提高全身1.5倍的属性

[复制链接]

3万

主题

4万

帖子

12万

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
129053
发表于 2017-8-12 21:22:44 | 显示全部楼层 |阅读模式

[@main]
#IF
ISADMIN
#SAY

  <2017最火爆传奇游戏,龙骨小极品,经典制作,超级耐玩/AUTOCOLOR=253,250,254,249>
   <----------------------------------------------------------/SCOLOR=13>
  <点此申请天下第一男战士/@男战>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(男战名字)>/SCOLOR=254}<」/SCOLOR=7>
  <点此申请天下第一女战士/@女战>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(女战名字)>/SCOLOR=254}<」/SCOLOR=7>
  <点此申请天下第一男法师/@男法>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(男法名字)>/SCOLOR=254}<」/SCOLOR=7>
  <点此申请天下第一女法师/@女法>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(女法名字)>/SCOLOR=254}<」/SCOLOR=7>
  <点此申请天下第一男道士/@男道>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(男道名字)>/SCOLOR=254}<」/SCOLOR=7>
  <点此申请天下第一女道士/@女道>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(女道名字)>/SCOLOR=254}<」/SCOLOR=7>
  <----------------------------------------------------------/SCOLOR=13>
  <提醒:/SCOLOR=250><天下第一将提高全身1.5倍的属性/SCOLOR=58>  <清理数据/@清理>。

#ELSESAY

  <2017最火爆传奇游戏,龙骨小极品,经典制作,超级耐玩/AUTOCOLOR=253,250,254,249>
  <----------------------------------------------------------/SCOLOR=13>
  <点此申请天下第一男战士/@男战>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(男战名字)>/SCOLOR=254}<」/SCOLOR=7>
  <点此申请天下第一女战士/@女战>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(女战名字)>/SCOLOR=254}<」/SCOLOR=7>
  <点此申请天下第一男法师/@男法>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(男法名字)>/SCOLOR=254}<」/SCOLOR=7>
  <点此申请天下第一女法师/@女法>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(女法名字)>/SCOLOR=254}<」/SCOLOR=7>
  <点此申请天下第一男道士/@男道>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(男道名字)>/SCOLOR=254}<」/SCOLOR=7>
  <点此申请天下第一女道士/@女道>  <目前王者归属为:「/SCOLOR=7>{<$GLOBAL(女道名字)>/SCOLOR=254}<」/SCOLOR=7>
  <----------------------------------------------------------/SCOLOR=13>
  <提醒:/SCOLOR=250><天下第一将提高全身1.5倍的属性/SCOLOR=58>  每3个小时清理数据。



[@清理]
#ACT
CALCVAR GLOBAL 男战名字 = 暂无入榜
CALCVAR GLOBAL 男战等级 = 0
CALCVAR GLOBAL 男战经验 = 0
CALCVAR GLOBAL 男战行会 = 暂无
CALCVAR GLOBAL 男战时间 =   
SAVEVAR GLOBAL 男战名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战时间 ..QuestDiary重要数据天下第一数据.txt
CALCVAR GLOBAL 女战名字 = 暂无入榜
CALCVAR GLOBAL 女战等级 = 0
CALCVAR GLOBAL 女战经验 = 0
CALCVAR GLOBAL 女战行会 = 暂无
CALCVAR GLOBAL 女战时间 =   
SAVEVAR GLOBAL 女战名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战时间 ..QuestDiary重要数据天下第一数据.txt
CALCVAR GLOBAL 女法名字 = 暂无入榜
CALCVAR GLOBAL 女法等级 = 0
CALCVAR GLOBAL 女法经验 = 0
CALCVAR GLOBAL 女法行会 = 暂无
CALCVAR GLOBAL 女法时间 =   
SAVEVAR GLOBAL 女法名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法时间 ..QuestDiary重要数据天下第一数据.txt
CALCVAR GLOBAL 男法名字 = 暂无入榜
CALCVAR GLOBAL 男法等级 = 0
CALCVAR GLOBAL 男法经验 = 0
CALCVAR GLOBAL 男法行会 = 暂无
CALCVAR GLOBAL 男法时间 =   
SAVEVAR GLOBAL 男法名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法时间 ..QuestDiary重要数据天下第一数据.txt
CALCVAR GLOBAL 男道名字 = 暂无入榜
CALCVAR GLOBAL 男道等级 = 0
CALCVAR GLOBAL 男道经验 = 0
CALCVAR GLOBAL 男道行会 = 暂无
CALCVAR GLOBAL 男道时间 =   
SAVEVAR GLOBAL 男道名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道时间 ..QuestDiary重要数据天下第一数据.txt
CALCVAR GLOBAL 女道名字 = 暂无入榜
CALCVAR GLOBAL 女道等级 = 0
CALCVAR GLOBAL 女道经验 = 0
CALCVAR GLOBAL 女道行会 = 暂无
CALCVAR GLOBAL 女道时间 =   
SAVEVAR GLOBAL 女道名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道时间 ..QuestDiary重要数据天下第一数据.txt



[@男战]
#ACT
MOV S0 <
MOV S1 <
MOV S2 <
MOV S3 <
MOV S4 <
INC S0 <$GLOBAL(男战名字)>
INC S1 <$GLOBAL(男战行会)>
INC S2 <$GLOBAL(男战经验)>
INC S3 <$GLOBAL(男战时间)>
INC S4 <$GLOBAL(男战等级)>
INC S0 /SCOLOR=255>
INC S1 /SCOLOR=255>
INC S2 /SCOLOR=255>
INC S3 /SCOLOR=255>
INC S4 级/SCOLOR=255>
CloseBigDialogBox
#SAY
<╔/SCOLOR=249><──────────/SCOLOR=151>
<│/SCOLOR=151><天下第一男战/SCOLOR=250>:<[/SCOLOR=254><$STR(S0)><]/SCOLOR=254>   <【/SCOLOR=242><申请天下第一/@申请第一男战><】/SCOLOR=242>
<│/SCOLOR=151><上榜时间/SCOLOR=250>:<[/SCOLOR=254><$STR(S3)><]/SCOLOR=254>
<│/SCOLOR=151><所属行会/SCOLOR=250>:<[/SCOLOR=254><$STR(S1)><]/SCOLOR=254>
<│/SCOLOR=151><当时等级/SCOLOR=250>:<[/SCOLOR=254><$STR(S4)><]/SCOLOR=254>
<│/SCOLOR=151><当时经验/SCOLOR=250>:<[/SCOLOR=254><$STR(S2)><]/SCOLOR=254>
 <温馨提示/SCOLOR=253>:                      <│/SCOLOR=151>
    45级以上可申请.享受<全身属性攻道魔1.2倍属性  │/SCOLOR=151>
                  <──────────/SCOLOR=151><╝/SCOLOR=249>  

[@申请第一男战]
#IF
CheckVar GLOBAL 女战名字 = <$USERNAME>
#act
MessageBox 伟大的王者神!正式宣布您已经是天下第一女战了
break
#IF
CHECKLEVEL 45
#elseact
messagebox 您的级别太低,45级以上才可以申请天下第一。
BREAK
#IF
GENDER MAN
#ELSEACT
messagebox 喂喂喂...你一个MM跑来想冒充帅哥啊
break
#IF
CheckJob Taoist
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#IF
CheckJob Wizard
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#if
CHECKVAR GLOBAL 男战名字 = <$USERNAME>
#ACT
CALCVAR GLOBAL 男战等级 = <$LEVEL>
CALCVAR GLOBAL 男战经验 = <$EXP>
CALCVAR GLOBAL 男战行会 = <$GUILDNAME>
SENDMSG 6 您的信息已经更新
Gmexecute 开始提问 @男战还原
SET [235] 1
GOTO @main
BREAK
#IF
CHECKLEVELEX > <$GLOBAL(男战等级)>
#ACT
CALCVAR GLOBAL 男战名字 = <$USERNAME>
CALCVAR GLOBAL 男战等级 = <$LEVEL>
CALCVAR GLOBAL 男战经验 = <$EXP>
CALCVAR GLOBAL 男战行会 = <$GUILDNAME>
CALCVAR GLOBAL 男战时间 = <$DATETIME>
SAVEVAR GLOBAL 男战名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249  恭喜“<$USERNAME>”成功申请成为了風雲天下第一男战士! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @男战还原
SET [235] 1
GOTO @main
break
#IF
CHECKLEVELEX = <$GLOBAL(男战等级)>
CHECKEXP > <$GLOBAL(男战经验)>
#ACT
CALCVAR GLOBAL 男战名字 = <$USERNAME>
CALCVAR GLOBAL 男战等级 = <$LEVEL>
CALCVAR GLOBAL 男战经验 = <$EXP>
CALCVAR GLOBAL 男战行会 = <$GUILDNAME>
CALCVAR GLOBAL 男战时间 = <$DATETIME>
SAVEVAR GLOBAL 男战名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男战时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249  恭喜“<$USERNAME>”成功申请成为了風雲天下第一男战士! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @男战还原
SET [235] 1
GOTO @main
break
#ELSEACT
messagebox 对不起,申请失败。您的等级未超越天下第一男战士的等级或者您的等级和天下第一男战士相同但经验未超过目前天下第一男战士的[<$GLOBAL(男战经验)>]经验!



[@女战]
#ACT
MOV S0 <
MOV S1 <
MOV S2 <
MOV S3 <
MOV S4 <
INC S0 <$GLOBAL(女战名字)>
INC S1 <$GLOBAL(女战行会)>
INC S2 <$GLOBAL(女战经验)>
INC S3 <$GLOBAL(女战时间)>
INC S4 <$GLOBAL(女战等级)>
INC S0 /SCOLOR=255>
INC S1 /SCOLOR=255>
INC S2 /SCOLOR=255>
INC S3 /SCOLOR=255>
INC S4 级/SCOLOR=255>
CloseBigDialogBox
#SAY
<╔/SCOLOR=249><──────────/SCOLOR=151>
<│/SCOLOR=151><天下第一女战/SCOLOR=250>:<[/SCOLOR=254><$STR(S0)><]/SCOLOR=254>   <【/SCOLOR=242><申请天下第一/@申请第一女战><】/SCOLOR=242>
<│/SCOLOR=151><上榜时间/SCOLOR=250>:<[/SCOLOR=254><$STR(S3)><]/SCOLOR=254>
<│/SCOLOR=151><所属行会/SCOLOR=250>:<[/SCOLOR=254><$STR(S1)><]/SCOLOR=254>
<│/SCOLOR=151><当时等级/SCOLOR=250>:<[/SCOLOR=254><$STR(S4)><]/SCOLOR=254>
<│/SCOLOR=151><当时经验/SCOLOR=250>:<[/SCOLOR=254><$STR(S2)><]/SCOLOR=254>
 <温馨提示/SCOLOR=253>:                      <│/SCOLOR=151>
    45级以上可申请.享受<全身属性攻道魔1.2倍属性│/SCOLOR=151>
                  <──────────/SCOLOR=151><╝/SCOLOR=249>  

[@申请第一女战]
#IF
CheckVar GLOBAL 男战名字 = <$USERNAME>
#act
MessageBox 伟大的王者神!正式宣布您已经是天下第一男战了
break
#IF
CHECKLEVEL 45
#elseact
messagebox 您的级别太低,45级以上才可以申请天下第一。
BREAK
#IF
GENDER MAN
#ACT
messagebox 喂喂喂...你一个帅哥跑来想冒充MM啊!
break
#IF
CheckJob Taoist
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#IF
CheckJob Wizard
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#if
CHECKVAR GLOBAL 女战名字 = <$USERNAME>
#ACT
CALCVAR GLOBAL 女战等级 = <$LEVEL>
CALCVAR GLOBAL 女战经验 = <$EXP>
CALCVAR GLOBAL 女战行会 = <$GUILDNAME>
SENDMSG 6 您的信息已经更新
GOTO @main
BREAK
#IF
CHECKLEVELEX > <$GLOBAL(女战等级)>
#ACT
CALCVAR GLOBAL 女战名字 = <$USERNAME>
CALCVAR GLOBAL 女战等级 = <$LEVEL>
CALCVAR GLOBAL 女战经验 = <$EXP>
CALCVAR GLOBAL 女战行会 = <$GUILDNAME>
CALCVAR GLOBAL 女战时间 = <$DATETIME>
SAVEVAR GLOBAL 女战名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249   恭喜“<$USERNAME>”成功申请成为了風雲天下第一女战士! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @女战还原
SET [236] 1
GOTO @main
break
#IF
CHECKLEVELEX = <$GLOBAL(女战等级)>
CHECKEXP > <$GLOBAL(女战经验)>
#ACT
CALCVAR GLOBAL 女战名字 = <$USERNAME>
CALCVAR GLOBAL 女战等级 = <$LEVEL>
CALCVAR GLOBAL 女战经验 = <$EXP>
CALCVAR GLOBAL 女战行会 = <$GUILDNAME>
CALCVAR GLOBAL 女战时间 = <$DATETIME>
SAVEVAR GLOBAL 女战名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女战时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249   恭喜“<$USERNAME>”成功申请成为了風雲天下第一女战士! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @女战还原
SET [236] 1
GOTO @main
break
#ELSEACT
messagebox 对不起,申请失败。您的等级未超越天下第一女战士的等级或者您的等级和天下第一女战士相同但经验未超过目前天下第一女战士的[<$GLOBAL(女战经验)>]经验!



[@男道]
#ACT
MOV S0 <
MOV S1 <
MOV S2 <
MOV S3 <
MOV S4 <
INC S0 <$GLOBAL(男道名字)>
INC S1 <$GLOBAL(男道行会)>
INC S2 <$GLOBAL(男道经验)>
INC S3 <$GLOBAL(男道时间)>
INC S4 <$GLOBAL(男道等级)>
INC S0 /SCOLOR=255>
INC S1 /SCOLOR=255>
INC S2 /SCOLOR=255>
INC S3 /SCOLOR=255>
INC S4 级/SCOLOR=255>
CloseBigDialogBox
#SAY
<╔/SCOLOR=249><──────────/SCOLOR=151>
<│/SCOLOR=151><天下第一男道/SCOLOR=250>:<[/SCOLOR=254><$STR(S0)><]/SCOLOR=254>   <【/SCOLOR=242><申请天下第一/@申请第一男道><】/SCOLOR=242>
<│/SCOLOR=151><上榜时间/SCOLOR=250>:<[/SCOLOR=254><$STR(S3)><]/SCOLOR=254>
<│/SCOLOR=151><所属行会/SCOLOR=250>:<[/SCOLOR=254><$STR(S1)><]/SCOLOR=254>
<│/SCOLOR=151><当时等级/SCOLOR=250>:<[/SCOLOR=254><$STR(S4)><]/SCOLOR=254>
<│/SCOLOR=151><当时经验/SCOLOR=250>:<[/SCOLOR=254><$STR(S2)><]/SCOLOR=254>
 <温馨提示/SCOLOR=253>:                      <│/SCOLOR=151>
    45级以上可申请.享受<全身属性攻道魔1.2倍属性│/SCOLOR=151>
                  <──────────/SCOLOR=151><╝/SCOLOR=249>  

[@申请第一男道]
#IF
CheckVar GLOBAL 女道名字 = <$USERNAME>
#act
MessageBox 伟大的神!正式宣布您已经是天下第一女道了
break
#IF
GENDER MAN
#ELSEACT
messagebox 喂喂喂...你一个MM跑来想冒充帅哥啊
break
#IF
CheckJob Warrior
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#IF
CheckJob Wizard
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#IF
GENDER MAN
#ELSEACT
messagebox 喂喂喂...你一个MM跑来想冒充帅哥啊
break
#IF
CheckJob Wizard
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#if
CHECKVAR GLOBAL 男道名字 = <$USERNAME>
#ACT
CALCVAR GLOBAL 男道等级 = <$LEVEL>
CALCVAR GLOBAL 男道经验 = <$EXP>
CALCVAR GLOBAL 男道行会 = <$GUILDNAME>
SENDMSG 6 您的信息已经更新
GOTO @main
BREAK
#IF
CHECKLEVELEX > <$GLOBAL(男道等级)>
#ACT
CALCVAR GLOBAL 男道名字 = <$USERNAME>
CALCVAR GLOBAL 男道等级 = <$LEVEL>
CALCVAR GLOBAL 男道经验 = <$EXP>
CALCVAR GLOBAL 男道行会 = <$GUILDNAME>
CALCVAR GLOBAL 男道时间 = <$DATETIME>
SAVEVAR GLOBAL 男道名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249   恭喜“<$USERNAME>”成功申请成为了風雲天下第一男道士! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @男道还原
SET [237] 1
GOTO @main
break
#IF
CHECKLEVELEX = <$GLOBAL(男道等级)>
CHECKEXP > <$GLOBAL(男道经验)>
#ACT
CALCVAR GLOBAL 男道名字 = <$USERNAME>
CALCVAR GLOBAL 男道等级 = <$LEVEL>
CALCVAR GLOBAL 男道经验 = <$EXP>
CALCVAR GLOBAL 男道行会 = <$GUILDNAME>
CALCVAR GLOBAL 男道时间 = <$DATETIME>
SAVEVAR GLOBAL 男道名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男道时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249   恭喜“<$USERNAME>”成功申请成为了風雲天下第一男道士! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @男道还原
SET [237] 1
GOTO @main
break
#ELSEACT
messagebox 对不起,申请失败。您的等级未超越天下第一男道士的等级或者您的等级和天下第一男道士相同但经验未超过目前天下第一男道士的[<$GLOBAL(男道经验)>]经验!







[@女道]
#ACT
MOV S0 <
MOV S1 <
MOV S2 <
MOV S3 <
MOV S4 <
INC S0 <$GLOBAL(女道名字)>
INC S1 <$GLOBAL(女道行会)>
INC S2 <$GLOBAL(女道经验)>
INC S3 <$GLOBAL(女道时间)>
INC S4 <$GLOBAL(女道等级)>
INC S0 /SCOLOR=255>
INC S1 /SCOLOR=255>
INC S2 /SCOLOR=255>
INC S3 /SCOLOR=255>
INC S4 级/SCOLOR=255>
CloseBigDialogBox
#SAY
<╔/SCOLOR=249><──────────/SCOLOR=151>
<│/SCOLOR=151><天下第一女道/SCOLOR=250>:<[/SCOLOR=254><$STR(S0)><]/SCOLOR=254>   <【/SCOLOR=242><申请天下第一/@申请第一女道><】/SCOLOR=242>
<│/SCOLOR=151><上榜时间/SCOLOR=250>:<[/SCOLOR=254><$STR(S3)><]/SCOLOR=254>
<│/SCOLOR=151><所属行会/SCOLOR=250>:<[/SCOLOR=254><$STR(S1)><]/SCOLOR=254>
<│/SCOLOR=151><当时等级/SCOLOR=250>:<[/SCOLOR=254><$STR(S4)><]/SCOLOR=254>
<│/SCOLOR=151><当时经验/SCOLOR=250>:<[/SCOLOR=254><$STR(S2)><]/SCOLOR=254>
 <温馨提示/SCOLOR=253>:                      <│/SCOLOR=151>
    45级以上可申请.享受<全身属性攻道魔1.2倍属性│/SCOLOR=151>
                  <──────────/SCOLOR=151><╝/SCOLOR=249>  

[@申请第一女道]
#IF
CheckVar GLOBAL 男道名字 = <$USERNAME>
#act
MessageBox 伟大的王者神!正式宣布您已经是天下第一男道了
break
#IF
CHECKLEVEL 45
#elseact
messagebox 您的级别太低,45级以上才可以申请天下第一。
BREAK
#IF
GENDER MAN
#ACT
messagebox 喂喂喂...你一个帅哥跑来想冒充MM啊!
break
#IF
CheckJob Warrior
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#IF
CheckJob Wizard
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#if
CHECKVAR GLOBAL 女道名字 = <$USERNAME>
#ACT
CALCVAR GLOBAL 女道等级 = <$LEVEL>
CALCVAR GLOBAL 女道经验 = <$EXP>
CALCVAR GLOBAL 女道行会 = <$GUILDNAME>
SENDMSG 6 您的信息已经更新
GOTO @main
BREAK
#IF
CHECKLEVELEX > <$GLOBAL(女道等级)>
#ACT
CALCVAR GLOBAL 女道名字 = <$USERNAME>
CALCVAR GLOBAL 女道等级 = <$LEVEL>
CALCVAR GLOBAL 女道经验 = <$EXP>
CALCVAR GLOBAL 女道行会 = <$GUILDNAME>
CALCVAR GLOBAL 女道时间 = <$DATETIME>
SAVEVAR GLOBAL 女道名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249 恭喜“<$USERNAME>”成功申请成为了風雲天下第一女道士! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @女道还原
SET [238] 1
GOTO @main
break
#IF
CHECKLEVELEX = <$GLOBAL(女道等级)>
CHECKEXP > <$GLOBAL(女道经验)>
#ACT
CALCVAR GLOBAL 女道名字 = <$USERNAME>
CALCVAR GLOBAL 女道等级 = <$LEVEL>
CALCVAR GLOBAL 女道经验 = <$EXP>
CALCVAR GLOBAL 女道行会 = <$GUILDNAME>
CALCVAR GLOBAL 女道时间 = <$DATETIME>
SAVEVAR GLOBAL 女道名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女道时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249 恭喜“<$USERNAME>”成功申请成为了風雲天下第一女道士! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @女道还原
SET [238] 1
GOTO @main
break
#ELSEACT
messagebox 对不起,申请失败。您的等级未超越天下第一女道士的等级或者您的等级和天下第一女道士相同但经验未超过目前天下第一女道士的[<$GLOBAL(女道经验)>]经验!




[@男法]
#ACT
MOV S0 <
MOV S1 <
MOV S2 <
MOV S3 <
MOV S4 <
INC S0 <$GLOBAL(男法名字)>
INC S1 <$GLOBAL(男法行会)>
INC S2 <$GLOBAL(男法经验)>
INC S3 <$GLOBAL(男法时间)>
INC S4 <$GLOBAL(男法等级)>
INC S0 /SCOLOR=255>
INC S1 /SCOLOR=255>
INC S2 /SCOLOR=255>
INC S3 /SCOLOR=255>
INC S4 级/SCOLOR=255>
CloseBigDialogBox
#SAY
<╔/SCOLOR=249><──────────/SCOLOR=151>
<│/SCOLOR=151><天下第一男法/SCOLOR=250>:<[/SCOLOR=254><$STR(S0)><]/SCOLOR=254>   <【/SCOLOR=242><申请天下第一/@申请第一男法><】/SCOLOR=242>
<│/SCOLOR=151><上榜时间/SCOLOR=250>:<[/SCOLOR=254><$STR(S3)><]/SCOLOR=254>
<│/SCOLOR=151><所属行会/SCOLOR=250>:<[/SCOLOR=254><$STR(S1)><]/SCOLOR=254>
<│/SCOLOR=151><当时等级/SCOLOR=250>:<[/SCOLOR=254><$STR(S4)><]/SCOLOR=254>
<│/SCOLOR=151><当时经验/SCOLOR=250>:<[/SCOLOR=254><$STR(S2)><]/SCOLOR=254>
 <温馨提示/SCOLOR=253>:                      <│/SCOLOR=151>
    45级以上可申请.享受<全身属性攻道魔1.2倍属性│/SCOLOR=151>
                  <──────────/SCOLOR=151><╝/SCOLOR=249>  
[@申请第一男法]
#IF
CheckVar GLOBAL 女法名字 = <$USERNAME>
#act
MessageBox 伟大的王者神!正式宣布您已经是天下第一女法了
break
#IF
CHECKLEVEL 45
#elseact
messagebox 您的级别太低,45级以上才可以申请天下第一。
BREAK
#IF
GENDER MAN
#ELSEACT
messagebox 喂喂喂...你一个MM跑来想冒充帅哥啊
break
#IF
CheckJob Warrior
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#IF
CheckJob Taoist
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#if
CHECKVAR GLOBAL 男法名字 = <$USERNAME>
#ACT
CALCVAR GLOBAL 男法等级 = <$LEVEL>
CALCVAR GLOBAL 男法经验 = <$EXP>
CALCVAR GLOBAL 男法行会 = <$GUILDNAME>
SENDMSG 6 您的信息已经更新
GOTO @main
BREAK
#IF
CHECKLEVELEX > <$GLOBAL(男法等级)>
#ACT
CALCVAR GLOBAL 男法名字 = <$USERNAME>
CALCVAR GLOBAL 男法等级 = <$LEVEL>
CALCVAR GLOBAL 男法经验 = <$EXP>
CALCVAR GLOBAL 男法行会 = <$GUILDNAME>
CALCVAR GLOBAL 男法时间 = <$DATETIME>
SAVEVAR GLOBAL 男法名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249  恭喜“<$USERNAME>”成功申请成为了風雲天下第一男法师! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @男法还原
SET [239] 1
GOTO @main
break
#IF
CHECKLEVELEX = <$GLOBAL(男法等级)>
CHECKEXP > <$GLOBAL(男法经验)>
#ACT
CALCVAR GLOBAL 男法名字 = <$USERNAME>
CALCVAR GLOBAL 男法等级 = <$LEVEL>
CALCVAR GLOBAL 男法经验 = <$EXP>
CALCVAR GLOBAL 男法行会 = <$GUILDNAME>
CALCVAR GLOBAL 男法时间 = <$DATETIME>
SAVEVAR GLOBAL 男法名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 男法时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249  恭喜“<$USERNAME>”成功申请成为了風雲天下第一男法师! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @男法还原
SET [239] 1
GOTO @main
break
#ELSEACT
messagebox 对不起,申请失败。您的等级未超越天下第一男法师的等级或者您的等级和天下第一男法师相同但经验未超过目前天下第一男法师的[<$GLOBAL(男法经验)>]经验!




[@女法]
#ACT
MOV S0 <
MOV S1 <
MOV S2 <
MOV S3 <
MOV S4 <
INC S0 <$GLOBAL(女法名字)>
INC S1 <$GLOBAL(女法行会)>
INC S2 <$GLOBAL(女法经验)>
INC S3 <$GLOBAL(女法时间)>
INC S4 <$GLOBAL(女法等级)>
INC S0 /SCOLOR=255>
INC S1 /SCOLOR=255>
INC S2 /SCOLOR=255>
INC S3 /SCOLOR=255>
INC S4 级/SCOLOR=255>
CloseBigDialogBox
#SAY
<╔/SCOLOR=249><──────────/SCOLOR=151>
<│/SCOLOR=151><天下第一女法/SCOLOR=250>:<[/SCOLOR=254><$STR(S0)><]/SCOLOR=254>   <【/SCOLOR=242><申请天下第一/@申请第一女法><】/SCOLOR=242>
<│/SCOLOR=151><上榜时间/SCOLOR=250>:<[/SCOLOR=254><$STR(S3)><]/SCOLOR=254>
<│/SCOLOR=151><所属行会/SCOLOR=250>:<[/SCOLOR=254><$STR(S1)><]/SCOLOR=254>
<│/SCOLOR=151><当时等级/SCOLOR=250>:<[/SCOLOR=254><$STR(S4)><]/SCOLOR=254>
<│/SCOLOR=151><当时经验/SCOLOR=250>:<[/SCOLOR=254><$STR(S2)><]/SCOLOR=254>
 <温馨提示/SCOLOR=253>:                      <│/SCOLOR=151>
    45级以上可申请.享受<全身属性攻道魔1.2倍属性│/SCOLOR=151>
                  <──────────/SCOLOR=151><╝/SCOLOR=249>  
[@申请第一女法]
#IF
CheckVar GLOBAL 男法名字 = <$USERNAME>
#act
MessageBox 伟大的王者神!正式宣布您已经是天下第一男法了
break
#IF
CHECKLEVEL 45
#elseact
messagebox 您的级别太低,45级以上才可以申请天下第一。
BREAK
#IF
GENDER MAN
#ACT
messagebox 喂喂喂...你一个帅哥跑来想冒充MM啊!
break
#IF
CheckJob Warrior
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#IF
CheckJob Taoist
#ACT
messagebox 额?职业不对口,你想欺骗我这双真诚的眼睛吗?
break
#if
CHECKVAR GLOBAL 女法名字 = <$USERNAME>
#ACT
CALCVAR GLOBAL 女法等级 = <$LEVEL>
CALCVAR GLOBAL 女法经验 = <$EXP>
CALCVAR GLOBAL 女法行会 = <$GUILDNAME>
SENDMSG 6 您的信息已经更新
GOTO @main
BREAK
#IF
CHECKLEVELEX > <$GLOBAL(女法等级)>
#ACT
CALCVAR GLOBAL 女法名字 = <$USERNAME>
CALCVAR GLOBAL 女法等级 = <$LEVEL>
CALCVAR GLOBAL 女法经验 = <$EXP>
CALCVAR GLOBAL 女法行会 = <$GUILDNAME>
CALCVAR GLOBAL 女法时间 = <$DATETIME>
SAVEVAR GLOBAL 女法名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249  恭喜“<$USERNAME>”成功申请成为了風雲天下第一女法师! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @女法还原
SET [240] 1
GOTO @main
break
#IF
CHECKLEVELEX = <$GLOBAL(女法等级)>
CHECKEXP > <$GLOBAL(女法经验)>
#ACT
CALCVAR GLOBAL 女法名字 = <$USERNAME>
CALCVAR GLOBAL 女法等级 = <$LEVEL>
CALCVAR GLOBAL 女法经验 = <$EXP>
CALCVAR GLOBAL 女法行会 = <$GUILDNAME>
CALCVAR GLOBAL 女法时间 = <$DATETIME>
SAVEVAR GLOBAL 女法名字 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法等级 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法经验 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法行会 ..QuestDiary重要数据天下第一数据.txt
SAVEVAR GLOBAL 女法时间 ..QuestDiary重要数据天下第一数据.txt
SendCenterMsg 161 249   恭喜“<$USERNAME>”成功申请成为了風雲天下第一女法师! 1
messagebox 为为止数据出错,请小退给于天下第一属性!
Gmexecute 开始提问 @女法还原
SET [240] 1
GOTO @main
break
#ELSEACT
messagebox 对不起,申请失败。您的等级未超越天下第一女法师的等级或者您的等级和天下第一女法师相同但经验未超过目前天下第一女法师的[<$GLOBAL(女法经验)>]经验!

回复

使用道具 举报

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

本版积分规则

QQ|Archiver|手机版|小黑屋|原始传奇 ( 皖ICP备14013508号

GMT+8, 2017-8-20 01:00 , Processed in 0.312000 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表