2024-05-07
[@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(女法经验)>]经验！
上一篇:
geem2调整宝宝攻击人物的威力倍率
下一篇:
传奇版本添加npc修改增加npc方法以及配置参数教程
