天碑.txt

企业版传奇世界本

[@天碑]
{
#IF
EQUAL d0 1
#SAY
幸运的人类勇士，你果然智勇双全，成功的来到了天关。如\
果你接受命运给的挑战，杀死指定的怪兽，你将得到天赐的\
奖励：若放弃挑战，你可以用灵符从那边的5条小路出去，\
通过天关之门时，隐身的仙人将为你指点迷津。看到那边的\
天界小贩了么？他年轻时曾是商人，后来修道成仙，所以被\
安排在天关路上，帮助进入天关的人类。你可以找他买卖物\
品，换灵符，特修装备，存取和打包。\
<我先看看奖励/@看看奖励>\
<多谢指点/@exit>
#ELSESAY
我对智勇双全的人类重来不提示第二遍\
你可以考虑去找那边的天关之门。\\
<多谢指点/@exit>

[@看看奖励]
#IF
CHECKVAR GLOBAL XT01 > 9
#ACT
CALCVAR GLOBAL XT01 = 0
SAVEVAR GLOBAL XT01 ..\QuestDiary\数据文件\天关\XT01.txt
GOTO @10点奖励
break
#IF
CHECKVAR GLOBAL XT02 > 29
#ACT
CALCVAR GLOBAL XT01 + 1
SAVEVAR GLOBAL XT01 ..\QuestDiary\数据文件\天关\XT01.txt
CALCVAR GLOBAL XT02 = 0
SAVEVAR GLOBAL XT02 ..\QuestDiary\数据文件\天关\XT02.txt
GOTO @50点奖励
break
#IF
CHECKVAR GLOBAL XT03 > 69
#ACT
CALCVAR GLOBAL XT01 + 1
SAVEVAR GLOBAL XT01 ..\QuestDiary\数据文件\天关\XT01.txt
CALCVAR GLOBAL XT02 + 1
SAVEVAR GLOBAL XT02 ..\QuestDiary\数据文件\天关\XT02.txt
CALCVAR GLOBAL XT03 = 0
SAVEVAR GLOBAL XT03 ..\QuestDiary\数据文件\天关\XT03.txt
GOTO @150点奖励
break
#IF
CHECKVAR GLOBAL XT04 > 149
#ACT
CALCVAR GLOBAL XT01 + 1
SAVEVAR GLOBAL XT01 ..\QuestDiary\数据文件\天关\XT01.txt
CALCVAR GLOBAL XT02 + 1
SAVEVAR GLOBAL XT02 ..\QuestDiary\数据文件\天关\XT02.txt
CALCVAR GLOBAL XT03 + 1
SAVEVAR GLOBAL XT03 ..\QuestDiary\数据文件\天关\XT03.txt
CALCVAR GLOBAL XT04 = 0
SAVEVAR GLOBAL XT04 ..\QuestDiary\数据文件\天关\XT04.txt
GOTO @500点奖励
break
#IF
CHECKVAR GLOBAL XT05 > 299
#ACT
CALCVAR GLOBAL XT01 + 1
SAVEVAR GLOBAL XT01 ..\QuestDiary\数据文件\天关\XT01.txt
CALCVAR GLOBAL XT02 + 1
SAVEVAR GLOBAL XT02 ..\QuestDiary\数据文件\天关\XT02.txt
CALCVAR GLOBAL XT03 + 1
SAVEVAR GLOBAL XT03 ..\QuestDiary\数据文件\天关\XT03.txt
CALCVAR GLOBAL XT04 + 1
SAVEVAR GLOBAL XT04 ..\QuestDiary\数据文件\天关\XT04.txt
CALCVAR GLOBAL XT05 = 0
SAVEVAR GLOBAL XT05 ..\QuestDiary\数据文件\天关\XT05.txt
GOTO @1000点奖励
break
#IF
CHECKVAR GLOBAL XT06 > 799
#ACT
CALCVAR GLOBAL XT01 + 1
SAVEVAR GLOBAL XT01 ..\QuestDiary\数据文件\天关\XT01.txt
CALCVAR GLOBAL XT02 + 1
SAVEVAR GLOBAL XT02 ..\QuestDiary\数据文件\天关\XT02.txt
CALCVAR GLOBAL XT03 + 1
SAVEVAR GLOBAL XT03 ..\QuestDiary\数据文件\天关\XT03.txt
CALCVAR GLOBAL XT04 + 1
SAVEVAR GLOBAL XT04 ..\QuestDiary\数据文件\天关\XT04.txt
CALCVAR GLOBAL XT05 + 1
SAVEVAR GLOBAL XT05 ..\QuestDiary\数据文件\天关\XT05.txt
CALCVAR GLOBAL XT06 = 0
SAVEVAR GLOBAL XT06 ..\QuestDiary\数据文件\天关\XT06.txt
GOTO @2000点奖励
break
#IF
CHECKVAR GLOBAL XT07 > 1499
#ACT
CALCVAR GLOBAL XT01 + 1
SAVEVAR GLOBAL XT01 ..\QuestDiary\数据文件\天关\XT01.txt
CALCVAR GLOBAL XT02 + 1
SAVEVAR GLOBAL XT02 ..\QuestDiary\数据文件\天关\XT02.txt
CALCVAR GLOBAL XT03 + 1
SAVEVAR GLOBAL XT03 ..\QuestDiary\数据文件\天关\XT03.txt
CALCVAR GLOBAL XT04 + 1
SAVEVAR GLOBAL XT04 ..\QuestDiary\数据文件\天关\XT04.txt
CALCVAR GLOBAL XT05 + 1
SAVEVAR GLOBAL XT05 ..\QuestDiary\数据文件\天关\XT05.txt
CALCVAR GLOBAL XT06 + 1
SAVEVAR GLOBAL XT06 ..\QuestDiary\数据文件\天关\XT06.txt
CALCVAR GLOBAL XT07 = 0
SAVEVAR GLOBAL XT07 ..\QuestDiary\数据文件\天关\XT07.txt
GOTO @4000点奖励
break
#IF
CHECKVAR GLOBAL XT08 > 3999
#ACT
CALCVAR GLOBAL XT01 + 1
SAVEVAR GLOBAL XT01 ..\QuestDiary\数据文件\天关\XT01.txt
CALCVAR GLOBAL XT02 + 1
SAVEVAR GLOBAL XT02 ..\QuestDiary\数据文件\天关\XT02.txt
CALCVAR GLOBAL XT03 + 1
SAVEVAR GLOBAL XT03 ..\QuestDiary\数据文件\天关\XT03.txt
CALCVAR GLOBAL XT04 + 1
SAVEVAR GLOBAL XT04 ..\QuestDiary\数据文件\天关\XT04.txt
CALCVAR GLOBAL XT05 + 1
SAVEVAR GLOBAL XT05 ..\QuestDiary\数据文件\天关\XT05.txt
CALCVAR GLOBAL XT06 + 1
SAVEVAR GLOBAL XT06 ..\QuestDiary\数据文件\天关\XT06.txt
CALCVAR GLOBAL XT07 + 1
SAVEVAR GLOBAL XT07 ..\QuestDiary\数据文件\天关\XT07.txt
CALCVAR GLOBAL XT08 = 0
SAVEVAR GLOBAL XT08 ..\QuestDiary\数据文件\天关\XT08.txt
GOTO @8000点奖励
break
#IF
CHECKVAR GLOBAL XT09 > 9999
#ACT
CALCVAR GLOBAL XT01 + 1
SAVEVAR GLOBAL XT01 ..\QuestDiary\数据文件\天关\XT01.txt
CALCVAR GLOBAL XT02 + 1
SAVEVAR GLOBAL XT02 ..\QuestDiary\数据文件\天关\XT02.txt
CALCVAR GLOBAL XT03 + 1
SAVEVAR GLOBAL XT03 ..\QuestDiary\数据文件\天关\XT03.txt
CALCVAR GLOBAL XT04 + 1
SAVEVAR GLOBAL XT04 ..\QuestDiary\数据文件\天关\XT04.txt
CALCVAR GLOBAL XT05 + 1
SAVEVAR GLOBAL XT05 ..\QuestDiary\数据文件\天关\XT05.txt
CALCVAR GLOBAL XT06 + 1
SAVEVAR GLOBAL XT06 ..\QuestDiary\数据文件\天关\XT06.txt
CALCVAR GLOBAL XT07 + 1
SAVEVAR GLOBAL XT07 ..\QuestDiary\数据文件\天关\XT07.txt
CALCVAR GLOBAL XT08 + 1
SAVEVAR GLOBAL XT08 ..\QuestDiary\数据文件\天关\XT08.txt
CALCVAR GLOBAL XT09 = 0
SAVEVAR GLOBAL XT09 ..\QuestDiary\数据文件\天关\XT09.txt
GOTO @15000点奖励
break
#ELSEACT
CALCVAR GLOBAL XT01 + 1
SAVEVAR GLOBAL XT01 ..\QuestDiary\数据文件\天关\XT01.txt
CALCVAR GLOBAL XT02 + 1
SAVEVAR GLOBAL XT02 ..\QuestDiary\数据文件\天关\XT02.txt
CALCVAR GLOBAL XT03 + 1
SAVEVAR GLOBAL XT03 ..\QuestDiary\数据文件\天关\XT03.txt
CALCVAR GLOBAL XT04 + 1
SAVEVAR GLOBAL XT04 ..\QuestDiary\数据文件\天关\XT04.txt
CALCVAR GLOBAL XT05 + 1
SAVEVAR GLOBAL XT05 ..\QuestDiary\数据文件\天关\XT05.txt
CALCVAR GLOBAL XT06 + 1
SAVEVAR GLOBAL XT06 ..\QuestDiary\数据文件\天关\XT06.txt
CALCVAR GLOBAL XT07 + 1
SAVEVAR GLOBAL XT07 ..\QuestDiary\数据文件\天关\XT07.txt
CALCVAR GLOBAL XT08 + 1
SAVEVAR GLOBAL XT08 ..\QuestDiary\数据文件\天关\XT08.txt
CALCVAR GLOBAL XT09 + 1
SAVEVAR GLOBAL XT09 ..\QuestDiary\数据文件\天关\XT09.txt
GOTO @普通奖励
break

;===================================================================
;===================================================================

[@显示物品奖励]
#ACT
MOV D4 9
RANDOMX 9 S3
MOV S4 @显示物品啦
INC S4 $str(S3)
GOTO $str(S4)
break

[@显示物品啦0]
全新的天关系统，幸运的光环绕着你，你将获得:\\
<$str(s95)>\\
但是你必须先杀死：　三头蛇王   1只\\
<接受挑战/@接受挑战01>\

[@显示物品啦1]
全新的天关系统，幸运的光环绕着你，你将获得:\\
<$str(s95)>\\
但是你必须先杀死：　三头蛇王   2只\\
<接受挑战/@接受挑战02>\

[@显示物品啦2]
全新的天关系统，幸运的光环绕着你，你将获得:\\
<$str(s95)>\\
但是你必须先杀死：　地下小鬼   5只\\
<接受挑战/@接受挑战03>\

[@显示物品啦3]
全新的天关系统，幸运的光环绕着你，你将获得:\\
<$str(s95)>\\
但是你必须先杀死：　地下小鬼   3只\\
<接受挑战/@接受挑战04>\

[@显示物品啦4]
全新的天关系统，幸运的光环绕着你，你将获得:\\
<$str(s95)>\\
但是你必须先杀死：　逆魔卫士   5只\\
<接受挑战/@接受挑战05>\

[@显示物品啦5]
全新的天关系统，幸运的光环绕着你，你将获得:\\
<$str(s95)>\\
但是你必须先杀死：　逆魔卫士   3只\\
<接受挑战/@接受挑战06>\

[@显示物品啦6]
全新的天关系统，幸运的光环绕着你，你将获得:\\
<$str(s95)>\\
但是你必须先杀死：　白蛇妖   1只\\
<接受挑战/@接受挑战07>\

[@显示物品啦7]
全新的天关系统，幸运的光环绕着你，你将获得:\\
<$str(s95)>\\
但是你必须先杀死：　白蛇妖   2只\\
<接受挑战/@接受挑战08>\

[@显示物品啦8]
全新的天关系统，幸运的光环绕着你，你将获得:\\
<$str(s95)>\\
但是你必须先杀死：　藤妖   2只\\
<接受挑战/@接受挑战09>\

[@显示物品啦9]
全新的天关系统，幸运的光环绕着你，你将获得:\\
<$str(s95)>\\
但是你必须先杀死：　兽骑兵   2只\\
<接受挑战/@接受挑战10>\

[@接受挑战01]
#IF
EQUAL D4 9
#ACT
MOV D4 0
mobplacex $X $Y 0 三头蛇王8 1
close

[@接受挑战02]
#IF
EQUAL D4 9
#ACT
MOV D4 0
mobplacex $X $Y 0 三头蛇王8 2
close

[@接受挑战03]
#IF
EQUAL D4 9
#ACT
MOV D4 0
mobplacex $X $Y 0 地下小鬼8 5
close

[@接受挑战04]
#IF
EQUAL D4 9
#ACT
MOV D4 0
mobplacex $X $Y 0 地下小鬼8 3
close

[@接受挑战05]
#IF
EQUAL D4 9
#ACT
MOV D4 0
mobplacex $X $Y 0 逆魔卫士8 5
close

[@接受挑战06]
#IF
EQUAL D4 9
#ACT
MOV D4 0
mobplacex $X $Y 0 逆魔卫士8 3
close

[@接受挑战07]
#IF
EQUAL D4 9
#ACT
MOV D4 0
mobplacex $X $Y 0 白蛇妖8 1
close

[@接受挑战08]
#IF
EQUAL D4 9
#ACT
MOV D4 0
mobplacex $X $Y 0 白蛇妖8 2
close

[@接受挑战09]
#IF
EQUAL D4 9
#ACT
MOV D4 0
mobplacex $X $Y 0 藤妖8 2
close

[@接受挑战10]
#IF
EQUAL D4 9
#ACT
MOV D4 0
mobplacex $X $Y 0 兽骑兵8 2
close

;===================================================================
;===================================================================

[@普通奖励]
#CALL [\游戏功能\天关\普通奖励.txt] @随机奖励

[@10点奖励]
#CALL [\游戏功能\天关\10点奖励.txt] @1元奖励

[@50点奖励]
#CALL [\游戏功能\天关\50点奖励.txt] @5元奖励

[@150点奖励]
#CALL [\游戏功能\天关\150点奖励.txt] @15元奖励

[@500点奖励]
#CALL [\游戏功能\天关\500点奖励.txt] @50元奖励

[@1000点奖励]
#CALL [\游戏功能\天关\1000点奖励.txt] @100元奖励

[@2000点奖励]
#CALL [\游戏功能\天关\2000点奖励.txt] @200元奖励

[@4000点奖励]
#CALL [\游戏功能\天关\4000点奖励.txt] @400元奖励

[@8000点奖励]
#CALL [\游戏功能\天关\8000点奖励.txt] @800元奖励

[@15000点奖励]
#CALL [\游戏功能\天关\15000点奖励.txt] @1500元奖励

}