元神排名.txt

企业版传奇世界本

[@元神排名]
{
#IF
checkys
#ACT
MOV P0 $YSLEVEL
MOV S20 $YSGENDER
MOV S21 $YSJOB
goto @判断大小
break
#ELSESAY
你还没有元神呢！

[@判断大小]
#IF
SMALL P0 40
#SAY
看来你很有信心，不过你的元神进入名人堂的资格还没有达到，\
需要40级来证明他的实力，现在来申请天下第一恐怕还嫌早。\
<离开/@exit>\
#ACT
break
#IF
EQUAL S20 女
EQUAL S21 战士
LARGE P0 $STR(G51)
#ACT
MOV S5 天下第一元神女战士：<COLOR=green[]
INC S5 $YSNAME
INC S5 >\她是<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神，目前等级为：<COLOR=green[]
INC S5 $YSLEVEL
INC S5 >。\纷扰乱世群雄追鹿。<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神<COLOR=green[]
INC S5 $YSNAME
INC S5 >\资质甚高，领悟非凡，勇闯铁血魔宫，奋战修罗魔族，在\
INC S5 战火四起的传世大陆中成为了天下第一，至今没人可以超\
INC S5 越。\
INC S5 今天的天下第一元神是<COLOR=green[]
INC S5 $YSNAME
INC S5 >，明天将会是谁呢？\申请天下第一名号，请速到中州魔法阵祭祀处申请。\
INC S5 <离开/@exit>\
CALCVAR GLOBAL F45 = $STR(S5)
SAVEVAR GLOBAL F45 ..\QuestDiary\数据文件\F类变量\F45Save.txt
MOV G51 $YSLEVEL
SENDMSG 2 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神女战士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 8 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神女战士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 10 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神女战士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
goto @通过第一
break
#IF
EQUAL S20 女
EQUAL S21 法师
LARGE P0 $STR(G46)
#ACT
MOV S5 天下第一元神女法师：<COLOR=green[]
INC S5 $YSNAME
INC S5 >\她是<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神，目前等级为：<COLOR=green[]
INC S5 $YSLEVEL
INC S5 >。\纷扰乱世群雄追鹿。<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神<COLOR=green[]
INC S5 $YSNAME
INC S5 >\资质甚高，领悟非凡，勇闯铁血魔宫，奋战修罗魔族，在\
INC S5 战火四起的传世大陆中成为了天下第一，至今没人可以超\
INC S5 越。\
INC S5 今天的天下第一元神是<COLOR=green[]
INC S5 $YSNAME
INC S5 >，明天将会是谁呢？\申请天下第一名号，请速到中州魔法阵祭祀处申请。\
INC S5 <离开/@exit>\
CALCVAR GLOBAL F46 = $STR(S5)
SAVEVAR GLOBAL F46 ..\QuestDiary\数据文件\F类变量\F46Save.txt
MOV G46 $YSLEVEL
SENDMSG 2 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神女法师，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 8 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神女法师，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 10 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神女法师，想要申请元神天下第一速到中州魔法阵祭祀处申请。
goto @通过第一
break
#IF
EQUAL S20 女
EQUAL S21 道士
LARGE P0 $STR(G47)
#ACT
MOV S5 天下第一元神女道士：<COLOR=green[]
INC S5 $YSNAME
INC S5 >\她是<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神，目前等级为：<COLOR=green[]
INC S5 $YSLEVEL
INC S5 >。\纷扰乱世群雄追鹿。<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神<COLOR=green[]
INC S5 $YSNAME
INC S5 >\资质甚高，领悟非凡，勇闯铁血魔宫，奋战修罗魔族，在\
INC S5 战火四起的传世大陆中成为了天下第一，至今没人可以超\
INC S5 越。\
INC S5 今天的天下第一元神是<COLOR=green[]
INC S5 $YSNAME
INC S5 >，明天将会是谁呢？\申请天下第一名号，请速到中州魔法阵祭祀处申请。\
INC S5 <离开/@exit>\
CALCVAR GLOBAL F47 = $STR(S5)
SAVEVAR GLOBAL F47 ..\QuestDiary\数据文件\F类变量\F47Save.txt
MOV G47 $YSLEVEL
SENDMSG 2 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神女道士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 8 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神女道士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 10 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神女道士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
goto @通过第一
break
#IF
EQUAL S20 男
EQUAL S21 战士
LARGE P0 $STR(G48)
#ACT
MOV S5 天下第一元神男战士：<COLOR=green[]
INC S5 $YSNAME
INC S5 >\他是<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神，目前等级为：<COLOR=green[]
INC S5 $YSLEVEL
INC S5 >。\纷扰乱世群雄追鹿。<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神<COLOR=green[]
INC S5 $YSNAME
INC S5 >\资质甚高，领悟非凡，勇闯铁血魔宫，奋战修罗魔族，在\
INC S5 战火四起的传世大陆中成为了天下第一，至今没人可以超\
INC S5 越。\
INC S5 今天的天下第一元神是<COLOR=green[]
INC S5 $YSNAME
INC S5 >，明天将会是谁呢？\申请天下第一名号，请速到中州魔法阵祭祀处申请。\
INC S5 <离开/@exit>\
CALCVAR GLOBAL F48 = $STR(S5)
SAVEVAR GLOBAL F48 ..\QuestDiary\数据文件\F类变量\F48Save.txt
MOV G48 $YSLEVEL
SENDMSG 2 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神男战士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 8 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神男战士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 10 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神男战士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
goto @通过第一
break
#IF
EQUAL S20 男
EQUAL S21 法师
LARGE P0 $STR(G49)
#ACT
MOV S5 天下第一元神男法师：<COLOR=green[]
INC S5 $YSNAME
INC S5 >\他是<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神，目前等级为：<COLOR=green[]
INC S5 $YSLEVEL
INC S5 >。\纷扰乱世群雄追鹿。<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神<COLOR=green[]
INC S5 $YSNAME
INC S5 >\资质甚高，领悟非凡，勇闯铁血魔宫，奋战修罗魔族，在\
INC S5 战火四起的传世大陆中成为了天下第一，至今没人可以超\
INC S5 越。\
INC S5 今天的天下第一元神是<COLOR=green[]
INC S5 $YSNAME
INC S5 >，明天将会是谁呢？\申请天下第一名号，请速到中州魔法阵祭祀处申请。\
INC S5 <离开/@exit>\
CALCVAR GLOBAL F49 = $STR(S5)
SAVEVAR GLOBAL F49 ..\QuestDiary\数据文件\F类变量\F49Save.txt
MOV G49 $YSLEVEL
SENDMSG 2 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神男法师，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 8 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神男法师，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 10 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神男法师，想要申请元神天下第一速到中州魔法阵祭祀处申请。
goto @通过第一
break
#IF
EQUAL S20 男
EQUAL S21 道士
LARGE P0 $STR(G50)
#ACT
MOV S5 天下第一元神男道士：<COLOR=green[]
INC S5 $YSNAME
INC S5 >\他是<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神，目前等级为：<COLOR=green[]
INC S5 $YSLEVEL
INC S5 >。\纷扰乱世群雄追鹿。<COLOR=green[]
INC S5 $USERNAME
INC S5 >的元神<COLOR=green[]
INC S5 $YSNAME
INC S5 >\资质甚高，领悟非凡，勇闯铁血魔宫，奋战修罗魔族，在\
INC S5 战火四起的传世大陆中成为了天下第一，至今没人可以超\
INC S5 越。\
INC S5 今天的天下第一元神是<COLOR=green[]
INC S5 $YSNAME
INC S5 >，明天将会是谁呢？\申请天下第一名号，请速到中州魔法阵祭祀处申请。\
INC S5 <离开/@exit>\
CALCVAR GLOBAL F50 = $STR(S5)
SAVEVAR GLOBAL F50 ..\QuestDiary\数据文件\F类变量\F50Save.txt
MOV G50 $YSLEVEL
SENDMSG 2 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神男道士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 8 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神男道士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
SENDMSG 10 [<$STR(S34)>]的元神[<$YSNAME>]以<$YSLEVEL>级证实了他才是天下第一元神男道士，想要申请元神天下第一速到中州魔法阵祭祀处申请。
goto @通过第一
break

[@通过第一]
你的元神已经通过他的实力证明了他才是天下第一\
但是，想要保持你元神现在的地位你还得努力。\
你元神的伟绩我已经帮你记录下来了。\\
<返回/@exit>\
}