传奇七号站-为优质资源而生分享无止境,七版本站Ctrl+D收藏本站!
列表空间| 签到| 登录| 注册
传奇七号站
登录后，享受更多优质服务哦
  1. 当前位置
  2. 主页
  3. 技术经验
  4. 传奇脚本

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

侠名 次 收藏
[@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(女法经验)>]经验！
 
 
 
 

☉若无特殊注明本文皆为传奇版本库原创，转载请保留文章出处。
☉本站提供的资源来源网络收集，仅供学习研究之用切勿用于商业用途。
上一篇：gom引擎招兵买马脚本行会招人
下一篇：gom引擎充值回馈脚本

我要评论
说点什么吧
  • 全部评论（0）
    还没有评论，快来抢沙发吧！