[Gm版本库]传奇天下第一排行榜系列脚本

[@main]
#IF
ISADMIN
#say
第一男战士：  【<$STR(A6)>】-所属行会【<$STR(A7)>】\
第一女战士：  【<$STR(A18)>】-所属行会【<$STR(A19)>】\
第一男法师：  【<$STR(A10)>】-所属行会【<$STR(A11)>】\
第一女法师：  【<$STR(A22)>】-所属行会【<$STR(A23)>】\
第一男道士：  【<$STR(A14)>】-所属行会【<$STR(A15)>】\
第一女道士：  【<$STR(A26)>】-所属行会【<$STR(A27)>】\
-------------------<查看详细/@查看第一>------------------\
-------------------<清空/@初始化>------------------\
<申请天下第一/@申请天下第一><每日凌晨零点需重新申请>\
#ELSESAY
第一男战士：  【<$STR(A6)>】-所属行会【<$STR(A7)>】\
第一女战士：  【<$STR(A18)>】-所属行会【<$STR(A19)>】\
第一男法师：  【<$STR(A10)>】-所属行会【<$STR(A11)>】\
第一女法师：  【<$STR(A22)>】-所属行会【<$STR(A23)>】\
第一男道士：  【<$STR(A14)>】-所属行会【<$STR(A15)>】\
第一女道士：  【<$STR(A26)>】-所属行会【<$STR(A27)>】\
-------------------<查看详细/@查看第一>------------------\
-------------------<久仰大名!/@exit>------------------\
<申请天下第一/@申请天下第一><每日凌晨零点需重新申请>\


[@查看第一]
\ \
『<天下第一男战士/@男战>』           『<天下第一女战士/@女战>』\ \
『<天下第一男法师/@男法>』           『<天下第一女法师/@女法>』\ \
『<天下第一男道士/@男道>』           『<天下第一女道士/@女道>』\ \


[@申请天下第一]
#IF
CHECKLEVELEX < 38
#act
break
#say
看来你很有信心，不过你还没有达到资格，你需要38级来证明自己的实力\
现在来申请天下第一恐怕还嫌早.\
<离开/@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)>
SMALL G30 <$EXP>
HAVEGUILD
#act
mov G24 <$STR(A0)>
mov A6 <$USERNAME>
mov A7 <$GUILDNAME>
mov A8 <$LEVEL>
mov A9 <$DATETIME>
mov G30 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
addnamelist ..\QuestDiary\天下第一\男战士名单.txt
SENDMSG 4 %s成功申请了天下第一男战士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男战士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一男战士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
EQUAL G24 <$STR(A0)>
SMALL G30 <$EXP>
#act
mov G24 <$STR(A0)>
mov A6 <$USERNAME>
mov A7 暂无
mov A8 <$LEVEL>
mov A9 <$DATETIME>
mov G30 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
addnamelist ..\QuestDiary\天下第一\男战士名单.txt
SENDMSG 4 %s成功申请了天下第一男战士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男战士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一男战士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
#IF
EQUAL G24 <$STR(A0)>
#ACT
BREAK
#say
对不起！！你目前还不是最高等级！\\\
#IF
HAVEGUILD
#act
mov G24 <$STR(A0)>
mov A6 <$USERNAME>
mov A7 <$GUILDNAME>
mov A8 <$LEVEL>
mov A9 <$DATETIME>
mov G30 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
addnamelist ..\QuestDiary\天下第一\男战士名单.txt
SENDMSG 4 %s成功申请了天下第一男战士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男战士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一男战士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
#act
mov G24 <$STR(A0)>
mov A6 <$USERNAME>
mov A7 暂无
mov A8 <$LEVEL>
mov A9 <$DATETIME>
mov G30 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男战士名单.txt
addnamelist ..\QuestDiary\天下第一\男战士名单.txt
SENDMSG 4 %s成功申请了天下第一男战士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男战士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一男战士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
[@男法申请]
#IF
large G25 <$STR(A1)>
#act
break
#say
对不起！！你目前还不是最高等级！\\\
#IF
EQUAL G25 <$STR(A1)>
SMALL G31 <$EXP>
HAVEGUILD
#act
mov G25 <$STR(A1)>
mov A10 <$USERNAME>
mov A11 <$GUILDNAME>
mov A12 <$LEVEL>
mov A13 <$DATETIME>
mov G31 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男法师名单.txt
addnamelist ..\QuestDiary\天下第一\男法师名单.txt
SENDMSG 4 %s成功申请了天下第一男法师！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男法师！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一男法师是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
EQUAL G25 <$STR(A1)>
SMALL G31 <$EXP>
#act
mov G25 <$STR(A1)>
mov A10 <$USERNAME>
mov A11 暂无
mov A12 <$LEVEL>
mov A13 <$DATETIME>
mov G31 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男法师名单.txt
addnamelist ..\QuestDiary\天下第一\男法师名单.txt
SENDMSG 4 %s成功申请了天下第一男法师！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男法师！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一男法师是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
EQUAL G25 <$STR(A1)>
#ACT
BREAK
#say
对不起！！你目前还不是最高等级！\\\
#IF
HAVEGUILD
#act
mov G25 <$STR(A1)>
mov A10 <$USERNAME>
mov A11 <$GUILDNAME>
mov A12 <$LEVEL>
mov A13 <$DATETIME>
mov G31 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男法师名单.txt
addnamelist ..\QuestDiary\天下第一\男法师名单.txt
SENDMSG 4 %s成功申请了天下第一男法师！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男法师！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一男法师是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
#act
mov G25 <$STR(A1)>
mov A10 <$USERNAME>
mov A11 暂无
mov A12 <$LEVEL>
mov A13 <$DATETIME>
mov G31 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男法师名单.txt
addnamelist ..\QuestDiary\天下第一\男法师名单.txt
SENDMSG 4 %s成功申请了天下第一男法师！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男法师！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一男法师是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
[@男道申请]
#IF
large G26 <$STR(A2)>
#act
break
#say
对不起！！你目前还不是最高等级！\\\
#IF
EQUAL G26 <$STR(A2)>
SMALL G32 <$EXP>
HAVEGUILD
#act
mov G26 <$STR(A2)>
mov A14 <$USERNAME>
mov A15 <$GUILDNAME>
mov A16 <$LEVEL>
mov A17 <$DATETIME>
mov G32 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男道士名单.txt
addnamelist ..\QuestDiary\天下第一\男道士名单.txt
SENDMSG 4 %s成功申请了天下第一男道士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男道士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一男道士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
EQUAL G26 <$STR(A2)>
SMALL G32 <$EXP>
#act

mov G26 <$STR(A2)>
mov A14 <$USERNAME>
mov A15 暂无
mov A16 <$LEVEL>
mov A17 <$DATETIME>
mov G32 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男道士名单.txt
addnamelist ..\QuestDiary\天下第一\男道士名单.txt
SENDMSG 4 %s成功申请了天下第一男道士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男道士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一男道士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
EQUAL G26 <$STR(A2)>
#ACT
BREAK
#say
对不起！！你目前还不是最高等级！\\\
#IF
HAVEGUILD
#act

mov G26 <$STR(A2)>
mov A14 <$USERNAME>
mov A15 <$GUILDNAME>
mov A16 <$LEVEL>
mov A17 <$DATETIME>
mov G32 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男道士名单.txt
addnamelist ..\QuestDiary\天下第一\男道士名单.txt
SENDMSG 4 %s成功申请了天下第一男道士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男道士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一男道士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
#act

mov G26 <$STR(A2)>
mov A14 <$USERNAME>
mov A15 暂无
mov A16 <$LEVEL>
mov A17 <$DATETIME>
mov G32 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\男道士名单.txt
addnamelist ..\QuestDiary\天下第一\男道士名单.txt
SENDMSG 4 %s成功申请了天下第一男道士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一男道士！他在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一男道士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
[@女战申请]
#IF
large G27 <$STR(A3)>
#act
break
#say
对不起！！你目前还不是最高等级！\\\
#IF
EQUAL G27 <$STR(A3)>
SMALL G33 <$EXP>
HAVEGUILD
#act

mov G27 <$STR(A3)>
mov A18 <$USERNAME>
mov A19 <$GUILDNAME>
mov A20 <$LEVEL>
mov A21 <$DATETIME>
mov G33 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女战士名单.txt
addnamelist ..\QuestDiary\天下第一\女战士名单.txt
SENDMSG 4 %s成功申请了天下第一女战士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女战士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一女战士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
EQUAL G27 <$STR(A3)>
SMALL G33 <$EXP>
#act

mov G27 <$STR(A3)>
mov A18 <$USERNAME>
mov A19 暂无
mov A20 <$LEVEL>
mov A21 <$DATETIME>
mov G33 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女战士名单.txt
addnamelist ..\QuestDiary\天下第一\女战士名单.txt
SENDMSG 4 %s成功申请了天下第一女战士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女战士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一女战士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
EQUAL G27 <$STR(A3)>
#ACT
BREAK
#say
对不起！！你目前还不是最高等级！\\\
#IF
HAVEGUILD
#act

mov G27 <$STR(A3)>
mov A18 <$USERNAME>
mov A19 <$GUILDNAME>
mov A20 <$LEVEL>
mov A21 <$DATETIME>
mov G33 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女战士名单.txt
addnamelist ..\QuestDiary\天下第一\女战士名单.txt
SENDMSG 4 %s成功申请了天下第一女战士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女战士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一女战士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
#act

mov G27 <$STR(A3)>
mov A18 <$USERNAME>
mov A19 暂无
mov A20 <$LEVEL>
mov A21 <$DATETIME>
mov G33 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女战士名单.txt
addnamelist ..\QuestDiary\天下第一\女战士名单.txt
SENDMSG 4 %s成功申请了天下第一女战士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女战士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一女战士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
[@女法申请]
#IF
large G28 <$STR(A4)>
#act
break
#say
对不起！！你目前还不是最高等级！\\\
#IF
EQUAL G28 <$STR(A4)>
SMALL G34 <$EXP>
HAVEGUILD
#act

mov G28 <$STR(A4)>
mov A22 <$USERNAME>
mov A23 <$GUILDNAME>
mov A24 <$LEVEL>
mov A25 <$DATETIME>
mov G34 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女法师名单.txt
addnamelist ..\QuestDiary\天下第一\女法师名单.txt
SENDMSG 4 %s成功申请了天下第一女法师！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女法师！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一女法师是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
EQUAL G28 <$STR(A4)>
SMALL G34 <$EXP>
#act

mov G28 <$STR(A4)>
mov A22 <$USERNAME>
mov A23 暂无
mov A24 <$LEVEL>
mov A25 <$DATETIME>
mov G34 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女法师名单.txt
addnamelist ..\QuestDiary\天下第一\女法师名单.txt
SENDMSG 4 %s成功申请了天下第一女法师！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女法师！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一女法师是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
EQUAL G28 <$STR(A4)>
#ACT
BREAK
#say
对不起！！你目前还不是最高等级！\\\
#IF
HAVEGUILD
#act

mov G28 <$STR(A4)>
mov A22 <$USERNAME>
mov A23 <$GUILDNAME>
mov A24 <$LEVEL>
mov A25 <$DATETIME>
mov G34 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女法师名单.txt
addnamelist ..\QuestDiary\天下第一\女法师名单.txt
SENDMSG 4 %s成功申请了天下第一女法师！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女法师！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一女法师是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
#act

mov G28 <$STR(A4)>
mov A22 <$USERNAME>
mov A23 暂无
mov A24 <$LEVEL>
mov A25 <$DATETIME>
mov G34 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女法师名单.txt
addnamelist ..\QuestDiary\天下第一\女法师名单.txt
SENDMSG 4 %s成功申请了天下第一女法师！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女法师！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一女法师是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
[@女道申请]
#IF
large G29 <$STR(A5)>
#act
break
#say
对不起！！你目前还不是最高等级！\\\
#IF
EQUAL G29 <$STR(A5)>
SMALL G35 <$EXP>
HAVEGUILD
#act

mov G29 <$STR(A5)>
mov A26 <$USERNAME>
mov A27 <$GUILDNAME>
mov A28 <$LEVEL>
mov A29 <$DATETIME>
mov G35 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女道士名单.txt
addnamelist ..\QuestDiary\天下第一\女道士名单.txt
SENDMSG 4 %s成功申请了天下第一女道士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女道士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一女道士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
EQUAL G29 <$STR(A5)>
SMALL G35 <$EXP>
#act

mov G29 <$STR(A5)>
mov A26 <$USERNAME>
mov A27 暂无
mov A28 <$LEVEL>
mov A29 <$DATETIME>
mov G35 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女道士名单.txt
addnamelist ..\QuestDiary\天下第一\女道士名单.txt
SENDMSG 4 %s成功申请了天下第一女道士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女道士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一女道士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
#IF
EQUAL G29 <$STR(A5)>
#ACT
BREAK
#say
对不起！！你目前还不是最高等级！\\\
#IF
HAVEGUILD
#act

mov G29 <$STR(A5)>
mov A26 <$USERNAME>
mov A27 <$GUILDNAME>
mov A28 <$LEVEL>
mov A29 <$DATETIME>
mov G35 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女道士名单.txt
addnamelist ..\QuestDiary\天下第一\女道士名单.txt
SENDMSG 4 %s成功申请了天下第一女道士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女道士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
break
#say
申请成功！目前今天的天下第一女道士是<$USERNAME>，\
明天的天下第一会是谁？ \ \
<离开/@exit>
#IF
#act

mov G29 <$STR(A5)>
mov A26 <$USERNAME>
mov A27 暂无
mov A28 <$LEVEL>
mov A29 <$DATETIME>
mov G35 <$EXP>
CLEARNAMELIST ..\QuestDiary\天下第一\女道士名单.txt
addnamelist ..\QuestDiary\天下第一\女道士名单.txt
SENDMSG 4 %s成功申请了天下第一女道士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
SENDMSG 0 %s成功申请了天下第一女道士！她在烽烟四起的<$SERVERNAME>中修炼成为天下第一，1.1倍攻击的待遇，明天的天下第一会是谁？
#say
申请成功！目前今天的天下第一女道士是<$USERNAME>，\
明天的天下第一会是谁？ \ \

[@男战]
#CALL [\\天下第一\男战士.txt] @天下第一战男
[@男法]
#CALL [\\天下第一\男法师.txt] @天下第一法男
[@男道]
#CALL [\\天下第一\男道士.txt] @天下第一道男
[@女战]
#CALL [\\天下第一\女战士.txt] @天下第一战女
[@女法]
#CALL [\\天下第一\女法师.txt] @天下第一法女
[@女道]
#CALL [\\天下第一\女道士.txt] @天下第一道女


[@初始化]
#IF
ISADMIN
#act
mov G24 0
mov G25 0
mov G26 0
mov G27 0
mov G28 0
mov G29 0
mov G30 0
mov G31 0
mov G32 0
mov G33 0
mov G34 0
mov G35 0
mov A0
mov A1
mov A2
mov A3
mov A4
mov A5
mov A6 暂无
mov A7 暂无
mov A8 7
mov A10 暂无
mov A11 暂无
mov A12 7
mov A14 暂无
mov A15 暂无
mov A16 7
mov A18 暂无
mov A19 暂无
mov A20 7
mov A22 暂无
mov A23 暂无
mov A24 7
mov A26 暂无
mov A27 暂无
mov A28 7
MOV A35 暂无\天下第一男战士
MOV A36 暂无\天下第一女战士
MOV A37 暂无\天下第一男法师
MOV A38 暂无\天下第一女法师
MOV A39 暂无\天下第一男道士
MOV A40 暂无\天下第一女道士
CLEARNAMELIST ..\QuestDiary\数据文件\天下第一\男道士.txt
CLEARNAMELIST ..\QuestDiary\数据文件\天下第一\女道士.txt
CLEARNAMELIST ..\QuestDiary\数据文件\天下第一\男战士.txt
CLEARNAMELIST ..\QuestDiary\数据文件\天下第一\女战士.txt
CLEARNAMELIST ..\QuestDiary\数据文件\天下第一\男法师.txt
CLEARNAMELIST ..\QuestDiary\数据文件\天下第一\女法师.txt
SENDMSG 5 天下第一设置已初始化
GOTO @main
#ELSEACT
messagebox 闲杂人等闪开！！！！！！！