[@main]
最近，老夫的修炼打到一个前所未有的高度，通过对\
心法的修炼，老夫的修真境界又得到了大大的提高。\
心法，是一种无形的精神力量，需要修炼者<color=orange 无心、无念>\
<color=orange 无欲、无为>。而原子道家的天元心法乃增强元神能力的心法。\
当心法提升到一定重数后，你的元神就会有新的能力出现。\
<学习天元心法/@学习天元> <了解天元心法/@了解天元> <color=red 新><学习元力恢复/@元力恢复>\
<与魔法阵威力相关的事情需要帮忙/@魔法阵>\
<我要进入神威狱/@进入神威狱> <与分身相关的事情需要帮忙/@分身相关>\
<我要提升灵力/@提神灵力> <通天之路/@通天之路> <离开/@exit>
[@元力恢复]
#IF
SMALL $EXIDTYZ.0 1
#SAY
你的天元心法尚不足5重。\
我无法传授你元力恢复技能。\
#ACT
BREAK
#IF
!equal $USERMAGIC[106].NAME 元力恢复
#act
ADDSKILL 元力恢复 0
SENDMSG 5 恭喜你，领悟元力恢复技能！
break
#elsesay
你已经领悟过了元力恢复！\\
<返回/@back>
[@学习天元]
#IF
!CHECKONLINE $YSNAME
#say
领取心法必须放出你的元神。\
如果你没有元神，请先完成修真任务分出元神，魔法\
阵祭祀可帮助你。\\
<返回/@back>
#act
break
#IF
SMALL $EXIDTYZ.0 1
#ACT
EXIDTYZ 0 + 1
EXIDTYZ 1 + 10
EXIDTYZ 2 = 120
SENDMSG 5 恭喜你！领悟天元心法，你可用天元石提高天元值提升天元心法重数。
break
#ELSESAY
你已经领悟过了天元心法！\\
<返回/@back>
[@通天之路]
<进入修罗神殿/@进入修罗神殿>\
<用精炼五行魔石进入封印魔地/@进入封印魔地>\
<我要骑上宠物豹，上天空与阿修罗搏斗/@搏斗>\\
<离开/@exit>
[@搏斗]
据说天地间出了一些神奇的豹子，它们是通过丛林豹转\
生而来，它们能载着主人，驰俜魔穴地洞，飞天入地，无所\
不能。\
你可以骑上你的宠物豹，直达天空。宠物豹的等级越高\
，每天能带它主人上天空的次数就越多，而且每次在天空待\
的时间也就更长，但是每次宠物带它的主人上天空，都会消\
耗大量体力，需要及时喂食，千别亏待了你忠实的宠物豹。\
<我准备好了，让我去天空吧/@带去天空>\
<离开/@exit>
[@带去天空]
#IF
checkclb
#ACT
#ELSESAY
你没有放出你的灵兽，怎么去天空！\\\\
<知道了/@exit>
#ELSEACT
break
#IF
LARGE $PET.VIT 3
#ACT
UPGRADEMONVIT = 3
UPDATEMONSTONE
mapmove AS003 36 58
DELAY 0 @显示提示1
break
#ELSESAY
灵兽要处于饱食状态，才有力气带你去天空！\\\\\
<知道了/@exit>
[@显示提示1]
你的灵兽载着你一跃而起，带你进入了天空之城！
[@进入封印魔地]
没有精炼五行魔石，无法发动法阵。\
<离开/@exit>
[@进入修罗神殿]
#IF
CHECKVAR HUMAN 日09 = $DATAS
#ELSEACT
CALCVAR HUMAN 天次 = $STR(G25)
SAVEVAR HUMAN 天次 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
CALCVAR HUMAN 日09 = $DATAS
SAVEVAR HUMAN 日09 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
#IF
CHECKLEVELEX > 45
#ACT
#ELSESAY
无法催动法阵，只有46级以上才可直接通过魔法阵进入天空\
之城，除此之外，你还可以在禁地、通天、炼狱魔境九层找\
到通天旋涡进入天空。\\
<离开/@exit>
#ELSEACT
break
#IF
CHECKVAR HUMAN 天次 > 0
#ACT
CALCVAR HUMAN 天次 - 1
SAVEVAR HUMAN 天次 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
mapmove AS003 36 58
DELAY 0 @显示提示3
break
#ELSESAY
46级以上，每天可以使用魔法阵的力量直接进入天空<$STR(G25)>次，\
你今天使用次数太多了，等明天再来吧。\
除此之外，还想进入天空可以到禁地、通天、炼狱魔境九\
层找到通天旋涡进入天空。\\
<离开/@exit>
[@显示提示3]
魔法阵发动神奇的力量，带你进入了天空之城！
[@可接任务]
可以完成的任务：\
<新手任务--化形炼体/@任务1>\\
<离开/@exit>
[@任务1]
新手刚出生就已经获得元神了，所以元婴炼化后将\
获得改造强化第一元神属性的机会，大大提升元神的各\
项属性和能力。\
<COLOR=GREEN 紫府>元婴，可提升第一元神30%防御和10点攻击力\
<COLOR=GREEN 璇玑>元婴，可提升第一元神40%防御和20点攻击力\
<COLOR=GREEN 灵虚>元婴，可提升第一元神50%防御和30点攻击力\
<COLOR=GREEN 神华>元婴，可提升第一元神60%防御和40点攻击力\
<COLOR=red 只有一次机会，建议将元婴提升到神华元婴再来。>\
<我已完成了化形炼体！/@已经完成> <放弃/@exit>
[@已经完成]
#IF
SMALL $ADDYSZL 1
#ACT
break
#SAY
你当前还没有元婴，无法化形炼体！\\
<离开/@exit>
#IF
checkys
#ACT
#ELSESAY
你都还没有分身呢？叫我怎么帮助你呢？\\
<离开。/@exit>
#ELSEACT
break
#IF
CHECKONLINE $YSNAME
#ACT
#ELSESAY
你的分身呢？都没有释放出来，叫我怎么帮助你呢？\\
<我马上放出我的分身。/@exit>
#ELSEACT
break
#IF
LARGE $HUMANINFO.$YSNAME.$BSS3 $ADDYSZL
#SAY
<COLOR=GREEN 在元神分身的漫长修真路中，你已经获得了关键性的进阶。>\
<COLOR=GREEN 未来的日子，细心的将元神培养成强大的助手，降妖除魔，>\
<COLOR=GREEN 为国为民出力，将是你责无旁贷的重任。继续努力吧，这个>\
<COLOR=GREEN 动荡的世界需要你这样的修真者！>\
<离开/@exit>
#ACT
break
#IF
SMALL $ADDYSHX(0) 100
#SAY
当前你元婴的<COLOR=red 化形男形值没有达到100%>，不能进行化形\
炼体，你可以将第一元神回收到体内，再按 F10打开人物属\
性栏，就可以在右上角看见元婴的标签，点击后可以看见你\
当前元婴的种类及化形炼体情况。\
放入各种三魂七魄灵石、灵符、灵皓石，点炼化元婴，\
就可以增加<COLOR=GREEN 男形、女形、战士之体、法师之体、道士之体>的\
值，当这五种属性均达到100%后，即可进行化形炼体了。\\
<知道了/@exit>
#ACT
break
#IF
SMALL $ADDYSHX(1) 100
#SAY
当前你元婴的<COLOR=red 化形女形值没有达到100%>，不能进行化形\
炼体，你可以将第一元神回收到体内，再按 F10打开人物属\
性栏，就可以在右上角看见元婴的标签，点击后可以看见你\
当前元婴的种类及化形炼体情况。\
放入各种三魂七魄灵石、灵符、灵皓石，点炼化元婴，\
就可以增加<COLOR=GREEN 男形、女形、战士之体、法师之体、道士之体>的\
值，当这五种属性均达到100%后，即可进行化形炼体了。\\
<知道了/@exit>
#ACT
break
#IF
SMALL $ADDYSHX(2) 100
#SAY
当前你元婴的<COLOR=red 战士之体值没有达到100%>，不能进行化形\
炼体，你可以将第一元神回收到体内，再按 F10打开人物属\
性栏，就可以在右上角看见元婴的标签，点击后可以看见你\
当前元婴的种类及化形炼体情况。\
放入各种三魂七魄灵石、灵符、灵皓石，点炼化元婴，\
就可以增加<COLOR=GREEN 男形、女形、战士之体、法师之体、道士之体>的\
值，当这五种属性均达到100%后，即可进行化形炼体了。\\
<知道了/@exit>
#ACT
break
#IF
SMALL $ADDYSHX(3) 100
#SAY
当前你元婴的<COLOR=red 法师之体值没有达到100%>，不能进行化形\
炼体，你可以将第一元神回收到体内，再按 F10打开人物属\
性栏，就可以在右上角看见元婴的标签，点击后可以看见你\
当前元婴的种类及化形炼体情况。\
放入各种三魂七魄灵石、灵符、灵皓石，点炼化元婴，\
就可以增加<COLOR=GREEN 男形、女形、战士之体、法师之体、道士之体>的\
值，当这五种属性均达到100%后，即可进行化形炼体了。\\
<知道了/@exit>
#ACT
break
#IF
SMALL $ADDYSHX(4) 100
#SAY
当前你元婴的<COLOR=red 道士之体值没有达到100%>，不能进行化形\
炼体，你可以将第一元神回收到体内，再按 F10打开人物属\
性栏，就可以在右上角看见元婴的标签，点击后可以看见你\
当前元婴的种类及化形炼体情况。\
放入各种三魂七魄灵石、灵符、灵皓石，点炼化元婴，\
就可以增加<COLOR=GREEN 男形、女形、战士之体、法师之体、道士之体>的\
值，当这五种属性均达到100%后，即可进行化形炼体了。\\
<知道了/@exit>
#ACT
break
#ELSEACT
ENDtask 修真任务8
ENDtask 修真任务9
CALCVAR HUMAN 任A1 = 56
SAVEVAR HUMAN 任A1 ..\QUESTDIARY\数据文件\个人变量\个人变量.txt
HCALL $YSNAME @元神化形炼体
#ELSESAY
<COLOR=GREEN 在元神分身的漫长修真路中，你已经获得了关键性的进阶。>\
<COLOR=GREEN 未来的日子，细心的将元神培养成强大的助手，降妖除魔，>\
<COLOR=GREEN 为国为民出力，将是你责无旁贷的重任。继续努力吧，这个>\
<COLOR=GREEN 动荡的世界需要你这样的修真者！>\\
<COLOR=red 你的元婴为你的元神提升了强大的能力>\\
<离开/@exit>
[@提神灵力]
灵力灵石是修真者的能量基础，灵力的多少决定了修真\
者的能力。而且<COLOR=GREEN 灵力还可以用来炼丹药、修炼元神装备，>你\
要是带来了七魄灵石或灵皓石，我就把灵石里面的灵力打入\
你的体内。<COLOR=GREEN 两点灵石灵力可以变成一点>灵力。\
<COLOR=GREEN (灵皓石可以增加50点元神分身灵力>)。\\
<请帮我炼制高灵力灵石/@炼制高灵石>\
<我带来了灵石，请帮我/@我带灵石>\
<我去找灵石/@exit>
[@炼制高灵石]
我会把你包裹所有同类型的灵石炼制为高灵力灵石。炼\
制后高灵力灵石将含有所有同类型灵石的灵力点数。\\
<请帮我炼制高灵力灵石/@正开炼制>\
<返回/@提神灵力>
[@正开炼制]
#IF
checkitem 天魂灵石 2
#ACT
MOV P3 $ItemExALL.13.天魂灵石
TAKE 天魂灵石 99
GIVE 天魂灵石 1
UpgradeUserItemEx $PARAM(0) 13 = $STR(P3)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 地魂灵石 2
#ACT
MOV P3 $ItemExALL.13.地魂灵石
TAKE 地魂灵石 99
GIVE 地魂灵石 1
UpgradeUserItemEx $PARAM(0) 13 = $STR(P3)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 命魂灵石 2
#ACT
MOV P3 $ItemExALL.13.命魂灵石
TAKE 命魂灵石 99
GIVE 命魂灵石 1
UpgradeUserItemEx $PARAM(0) 13 = $STR(P3)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 天冲灵石 2
#ACT
MOV P3 $ItemExALL.13.天冲灵石
TAKE 天冲灵石 99
GIVE 天冲灵石 1
UpgradeUserItemEx $PARAM(0) 13 = $STR(P3)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 灵慧灵石 2
#ACT
MOV P3 $ItemExALL.13.灵慧灵石
TAKE 灵慧灵石 99
GIVE 灵慧灵石 1
UpgradeUserItemEx $PARAM(0) 13 = $STR(P3)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 力魄灵石 2
#ACT
MOV P3 $ItemExALL.13.力魄灵石
TAKE 力魄灵石 99
GIVE 力魄灵石 1
UpgradeUserItemEx $PARAM(0) 13 = $STR(P3)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 昆仑玄铁 2
#ACT
MOV P3 $ItemExALL.13.昆仑玄铁
TAKE 昆仑玄铁 99
GIVE 昆仑玄铁 1
UpgradeUserItemEx $PARAM(0) 13 = $STR(P3)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 草木之灵 2
#ACT
MOV P3 $ItemExALL.13.草木之灵
TAKE 草木之灵 99
GIVE 草木之灵 1
UpgradeUserItemEx $PARAM(0) 13 = $STR(P3)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 山海精华 2
#ACT
MOV P3 $ItemExALL.13.山海精华
TAKE 山海精华 99
GIVE 山海精华 1
UpgradeUserItemEx $PARAM(0) 13 = $STR(P3)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 中枢灵石 2
#ACT
MOV P3 $ItemExALL.13.中枢灵石
TAKE 中枢灵石 99
GIVE 中枢灵石 1
UpgradeUserItemEx $PARAM(0) 13 = $STR(P3)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL P4 1
#SAY
恐怕你并没有带来灵石把？这叫我如何帮你？你还是再去\
找找吧。\\\
<我知道了，我马上去找寻灵石。/@exit>
#ELSESAY
你包裹中的灵石灵力已经帮你炼制完成！\\
<谢谢你，辛苦了/@exit>
#ELSEACT
MOV P4 0
[@我带灵石]
提升灵力将收走你包裹中所有灵皓石和七魄灵石，你\
决定要提升吗？\\\
<我要提升灵力！/@正式提升>\
<我去找灵石/@exit>
[@正式提升]
#IF
checkitem 灵皓石 1
#ACT
take 灵皓石 1
YSPOINT + 50
MOV P4 1
#IF
LARGE $ItemExALL.13.天冲灵石 1999
#ACT
MOV P2 $ItemExALL.13.天冲灵石
DIV P2 2000
take 天冲灵石 99
YSPOINT + $STR(P2)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
LARGE $ItemExALL.13.灵慧灵石 1999
#ACT
MOV P2 $ItemExALL.13.灵慧灵石
DIV P2 2000
take 灵慧灵石 99
YSPOINT + $STR(P2)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
LARGE $ItemExALL.13.力魄灵石 1999
#ACT
MOV P2 $ItemExALL.13.力魄灵石
DIV P2 2000
take 力魄灵石 99
YSPOINT + $STR(P2)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
LARGE $ItemExALL.13.昆仑玄铁 1999
#ACT
MOV P2 $ItemExALL.13.昆仑玄铁
DIV P2 2000
take 昆仑玄铁 99
YSPOINT + $STR(P2)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
LARGE $ItemExALL.13.草木之灵 1999
#ACT
MOV P2 $ItemExALL.13.草木之灵
DIV P2 2000
take 草木之灵 99
YSPOINT + $STR(P2)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
LARGE $ItemExALL.13.山海精华 1999
#ACT
MOV P2 $ItemExALL.13.山海精华
DIV P2 2000
take 山海精华 99
YSPOINT + $STR(P2)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
LARGE $ItemExALL.13.中枢灵石 1999
#ACT
MOV P2 $ItemExALL.13.中枢灵石
DIV P2 2000
take 中枢灵石 99
YSPOINT + $STR(P2)
MOV P4 1
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL P4 1
#SAY
你的七魄灵石呢？快点耐心去找吧。是天冲灵石、灵慧\
灵石、力魄灵石、中枢灵石、山海精华、昆仑玄铁、草木之\
灵这七种，记住了吗？随便一种都行的。\\
<我去找灵石/@exit>
#ELSEACT
MOV P4 0
SENDMSG 5 你当前体内的灵力有：<$YSPOINT>
#ELSESAY
灵石的灵力已经成功注入到你的体内！\\
你当前体内的灵力有：<$YSPOINT>\\
<非常感谢你的帮助/@exit>
[@分身相关]
元神分身的力量的确神奇，拥有了元神你就会拥有了无\
畏的勇气。\
你想找我帮忙什么？\\
<我想让分身变得更加强大/@更加强大>\
<返回/@main>
[@更加强大]
据远古手札记载，分身修炼需经历五重境界：<COLOR=GREEN 固本、陪>\
<COLOR=GREEN 元、明心、大悟和飞升>。每普升一重境界，分身的能力便会\
大幅提升，每重境界还有很多神器，可让分身如虎添翼！\
经过苦心研究，我发现运用三魂七魄灵石中蕴含的灵力\
可帮助分身提升境界，<COLOR=GREEN 而且还可以提升分身的灵力值。>\\
<换取分身灵佩/@换取灵佩>\
<我想用灵石修炼分身/@灵石修炼> <多谢指点/@exit>
[@拥有分身]
#IF
checkys
#ACT
break
#SAY
伟大的勇士，你是这个大陆上为数不多的能练成元神分\
身神技的人之一，你的名字已经响彻大陆的每一个角落，为\
人们传诵。\
从今而后，带着强大的分身降妖除魔、除暴安良，是上\
苍赐予你的神圣使命，请继续努力！\\
<了解分神/@liaojiefenshen>\
<进入灵台仙境进行分神/@Ineedhelp>\
<返回/@back>
#elseSAY
中州王城果然不同凡响，到处都是热闹非凡的景象，车\
水马龙，川流不息。经历了修罗之战和无数次魔军的攻击，\
中州子民已经强大起来，自从玄玄老人一语道出元神分身修\
炼之法，更是让历史翻开了新的篇章。\
如今，已经有越来越多的人拥有了元神分身，我们的实\
力也在不断的壮大！我们愿意加入我们的抗魔队伍吗？\
<我愿意/@开始分出>\
<我不想冒险/@exit>
[@Ineedhelp]
#ACT
MAPMOVE QUEYSH00 8 19
#SAY
凝意识为海，入灵台镜天。你已经进入了你灵魂深处\
意识之海，你疑惑将在这里烟消云散.....\\\
<谢谢/@exit>\
[@liaojiefenshen]
分神境界乃高级修真者的一大标志，当你进入分神境界\
后，你目前的元神会<color=green 内敛进入体内>，而在你体外会形成一个\
<color=green 新得外现元神>。\
此时内敛元神可以增益你外现元神的<color=green 基本属性（攻击力、>\
<color=green 生命值全面提升）>，而你和你的<color=green 内敛、外现两个>元神也相辅\
相成，可达到<color=green 三位一体>的奇妙效果，当然内敛和外现元神<color=green 随>\
<color=green 时可在灵台仙人处进行切换>。\\
<原来分神后可以获得两个元神啊，太好了！/@exit>\
[@开始分出]
#IF
checkys
#SAY
伟大的勇士，你是这个大陆上为数不多的能练成元神分\
身神技的人之一，你的名字已经响彻大陆的每一个角落，为\
人们传诵。\
从今而后 ，带着强大的分身降妖除魔、除暴安良，是上\
苍赋予你的神圣使命，请继续努力！\\
<离开/@exit>
#ACT
break
#IF
CHECKLEVELEX < 46
#ACT
MessageBox 进行元神分身，需要人物等级46级才可以进行
break
#ELSESAY
你现在可以选择一下，你第一元神的职业和性别，不过你\
<COLOR=GREEN 只有一次的选择机会>，当你成功获得你的第一元神后，将\
无法再更换，请仔细选择！\\
<元神(男战士)/@输入名字&0&0> <元神(男法师)/@输入名字&1&0> <元神(男道士)/@输入名字&2&0>\\
<元神(女战士)/@输入名字&0&1> <元神(女法师)/@输入名字&1&1> <元神(女道士)/@输入名字&2&1>\\
<离开/@exit>
[@输入名字]
#IF
checkys
#SAY
伟大的勇士，你是这个大陆上为数不多的能练成元神分\
身神技的人之一，你的名字已经响彻大陆的每一个角落，为\
人们传诵。\
从今而后，带着强大的分身降妖除魔、除暴安良，是上\
苍赋予你的神圣使命，请继续努力！\\
<离开/@exit>
#ACT
break
#ELSEACT
queryvalue 请输入元神的名字 2 14 108
[@getstring108]
#IF
checkys
#SAY
你已经有元神了\\
<返回/@main>
#ACT
break
#ELSEACT
Getstring s0
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
EQUAL s0
#SAY
元神名字不能为空。\\
<返回/@main>
#ACT
break
#ELSEACT
createys $str(s0) $PARAM(0) $PARAM(1)
delay 10 @gotomap1
break
close
[@gotomap1]
#IF
checkys
#ACT
YSFENGHAO 0
SENDMSG 0 三魂化形得精神、七魄炼体凝肉身，历经磨难，魂魄合一之后，勇士%s修炼元神分身成功，光芒照亮了传世大陆！
SENDMSG 10 三魂化形得精神、七魄炼体凝肉身，历经磨难，魂魄合一之后，勇士%s修炼元神分身成功，光芒照亮了传世大陆！
MAPMOVE QUEYSH00 21 16
break
close
[@进入神威狱]
#ACT
MAPMOVE SWYZB
SENDWINS 0
break
close
[@强化技能]
要学会元神强化技能，必须有<COLOR=GREEN 元神强化技能书>。若要提\
升强化技能等级，有<COLOR=GREEN 两种办法：>\
第一，在神威狱中<COLOR=GREEN 囚禁心魔，累计技能经验>；\
第二，拿到<COLOR=GREEN 高阶的强化技能书>，直接提升技能等级。\\
<了解元神强化技能/@了解技能> <了解邪心乾坤咒的用途/@乾坤咒>\
<我要囚禁心魔/@囚禁心魔>\
<我要进入神威狱镇压心魔/@进入神威狱>\
<返回/@main>
[@乾坤咒]
邪心乾坤咒是心魔用来制造各种投影的符咒，他可以将\
各种心魔存于天地间的怨气聚拢成型化为实体，而这种心魔\
投影被击散后，会掉落出邪心乾坤咒，每个符咒能给其对应\
的修真者带来能力的提升。如果你有这样的符咒，我可以帮\
你获得这些能力。\\
<我有邪心乾坤咒/@给邪心乾坤咒>\
<明白了，我去找找看/@exit>
[@给邪心乾坤咒]
#ACT
checkitembox 请放入邪心乾坤咒： 1 6
#SAY
只有带有你名字的邪心乾坤咒才能提升你的能力。
[@getboxitem6]
你给我的不是邪心乾坤咒。快到神威狱里找几个来吧，\
顺便提醒你下，邪心乾坤咒只有其对应的修真者才获得其中\
的能力。\\
<啊，给错了？我再找找/@exit>
[@囚禁心魔]
在镇魔塔建好之前，神威狱是囚禁心魔的场所。你想囚\
禁心魔就去神威狱找那里的守卫，他能帮你这个忙。\\
<我要进入神威狱囚禁心魔/@进入神威狱>\
<返回/@强化技能>
[@了解技能]
魔消则神长，将心魔囚禁到神威狱中，可以累计元神强\
化技能经验，提示元神强化技能等级。\
囚禁的心魔<COLOR=GREEN 数量越多，境界越高>，则元神强化技能经验\
增长的<COLOR=GREEN 速度越快>。但是一旦心魔逃出神威狱，那么元神强化\
技能经验就会停止增长。\
<强化技能有多少个等级？/@多少等级>\
<怎样才能让心魔不逃逸？/@如何逃逸>\
<返回/@强化技能>
[@多少等级]
强化技能分为5个等级。如果你运气好，直接拿到5重强\
化技能书，你就拥有了<COLOR=GREEN 比狂龙紫电更恐怖的攻击力>。如果你\
从 1重开始修炼，那就要靠囚禁心魔，逐步获得技能经验来\
将强化技能提升到 5重了。\
打败神威狱中的心魔，有可能得到 5重强化技能书，你\
不妨去试试运气！\
<返回/@了解技能>
[@如何逃逸]
魔法阵威力不够，镇不住神威狱中的心魔。所以心魔会\
从神威狱底层往上逃逸，每<COLOR=GREEN 冲破1层需要1天。>我力量有限，\
只能将心魔囚禁在神威狱一层，若不增加镇魔力量，那心魔\
1天之内就会逃出来。\
增加镇魔力量只有一种方法，就是<COLOR=GREEN 组队进入神威狱>，将\
心魔从神威狱一层击退到底层，就可以<COLOR=GREEN 将心魔囚禁时间延长>\
<COLOR=GREEN 三天。>\
<返回/@了解技能> <下一页/@下一爷说>
[@下一爷说]
神威狱凶险无比，不但有你囚禁的心魔，还有许多凶横\
的其他妖魔，凶险无比！\
最好以四人组队形式进入神威狱。当然，你还可以使用\
<COLOR=GREEN 镇魔符召唤心魔>来协助战斗，那就容易多了！\
到了神威狱底层可千万小心，那里有最强横的天魔，恐\
怖无比。不过神威狱中有许多神兵利器，天魔手中甚至还有\
传说中的<COLOR=GREEN 蟠龙金甲>，值得去冒险。\
<我要进入神威狱/@进入神威狱>\
<上一页/@如何逃逸> <返回/@了解技能>
[@换取灵佩]
灵佩是魔法阵中各种灵力凝聚而成的奇妙之物品，分身只\
要佩戴上它，提高的能力一定会让你吃惊。\
但此物珍稀，只能先奖励给那些贡献突出的勇士。如果\
你也需要灵佩，那就要使用你的声望来换取。而且，灵佩源\
自然魔法阵灵力，所以还需要你交些灵石给我，催动法阵来\
获得灵佩！\
<我想换取青木灵佩/@青木>\
<我想换取白石灵佩/@白石>\
<我想换取紫玉灵佩/@紫玉> <离开/@exit>
[@青木]
分身到<COLOR=GREEN 陪元境界>才可以佩带<COLOR=GREEN 青木灵佩>，青木灵佩能大大\
提高分身的防御能力，抵挡更强的攻击。\
要想换取青木灵佩，需要你付出<COLOR=GREEN 10点声望>，再给我一些\
三魂七魄灵石，灵石蕴含<COLOR=GREEN 灵力和至少20点>才行。\
你想现在就换取青木灵佩吗？\\
<是的，现在就换取/@换青木灵佩>\
<返回/@main>\
[@换青木灵佩]
#ACT
MOV P2 0
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 天魂灵石 1
#ACT
INC P2 $ItemExALL.13.天魂灵石
#IF
checkitem 地魂灵石 1
#ACT
INC P2 $ItemExALL.13.地魂灵石
#IF
checkitem 命魂灵石 1
#ACT
INC P2 $ItemExALL.13.命魂灵石
#IF
checkitem 天冲灵石 1
#ACT
INC P2 $ItemExALL.13.天冲灵石
#IF
checkitem 灵慧灵石 1
#ACT
INC P2 $ItemExALL.13.灵慧灵石
#IF
checkitem 力魄灵石 1
#ACT
INC P2 $ItemExALL.13.力魄灵石
#IF
checkitem 昆仑玄铁 1
#ACT
INC P2 $ItemExALL.13.昆仑玄铁
#IF
checkitem 草木之灵 1
#ACT
INC P2 $ItemExALL.13.草木之灵
#IF
checkitem 山海精华 1
#ACT
INC P2 $ItemExALL.13.山海精华
#IF
checkitem 中枢灵石 1
#ACT
INC P2 $ItemExALL.13.中枢灵石
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL P2 20000
#SAY
你没有带来含有足够灵力的灵石，无法让你换取灵佩。\\
<确定/@exit>
#ACT
break
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MessageBox 对不起，您身上背包的位置不够，请清理出空位！
break
#IF
CHECKCREDITPOINT < 10
#SAY
你的声望不足10点，无法让你换取灵佩。\\
<确定/@exit>
#ACT
break
#IF
RANDOM 5
#ACT
take 天魂灵石 60
take 地魂灵石 60
take 命魂灵石 60
take 天冲灵石 60
take 灵慧灵石 60
take 力魄灵石 60
take 昆仑玄铁 60
take 草木之灵 60
take 山海精华 60
take 中枢灵石 60
CREDITPOINT - 10
give 青木灵佩1 1
break
close
#ELSEACT
take 天魂灵石 60
take 地魂灵石 60
take 命魂灵石 60
take 天冲灵石 60
take 灵慧灵石 60
take 力魄灵石 60
take 昆仑玄铁 60
take 草木之灵 60
take 山海精华 60
take 中枢灵石 60
CREDITPOINT - 10
give 青木灵佩 1
break
close
[@白石]
分身到<COLOR=GREEN 明心境界>才可以佩戴<COLOR=GREEN 白石灵佩>，白石灵佩不但可\
以提高分身的能力，而且这些能力还能附加到主人身上！\
要想换取白石灵佩，需要你付出<COLOR=GREEN 40点声望>，再给我一些\
三魂七魄石，灵石蕴含<COLOR=GREEN 灵力之和至少30点>才行。\
你想现在就换取白石灵佩吗？\\
<是的，现在就换取/@换白石灵佩>\
<返回/@mai>
[@换白石灵佩]
#ACT
MOV P2 0
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 天魂灵石 1
#ACT
INC P2 $ItemExALL.13.天魂灵石
#IF
checkitem 地魂灵石 1
#ACT
INC P2 $ItemExALL.13.地魂灵石
#IF
checkitem 命魂灵石 1
#ACT
INC P2 $ItemExALL.13.命魂灵石
#IF
checkitem 天冲灵石 1
#ACT
INC P2 $ItemExALL.13.天冲灵石
#IF
checkitem 灵慧灵石 1
#ACT
INC P2 $ItemExALL.13.灵慧灵石
#IF
checkitem 力魄灵石 1
#ACT
INC P2 $ItemExALL.13.力魄灵石
#IF
checkitem 昆仑玄铁 1
#ACT
INC P2 $ItemExALL.13.昆仑玄铁
#IF
checkitem 草木之灵 1
#ACT
INC P2 $ItemExALL.13.草木之灵
#IF
checkitem 山海精华 1
#ACT
INC P2 $ItemExALL.13.山海精华
#IF
checkitem 中枢灵石 1
#ACT
INC P2 $ItemExALL.13.中枢灵石
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL P2 40000
#SAY
你没有带来含有足够灵力的灵石，无法让你换取灵佩。\\
<确定/@exit>
#ACT
break
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MessageBox 对不起，您身上背包的位置不够，请清理出空位！
break
#IF
CHECKCREDITPOINT < 40
#SAY
你的声望不足40点，无法让你换取灵佩。\\
<确定/@exit>
#ACT
break
#IF
RANDOM 5
#ACT
take 天魂灵石 60
take 地魂灵石 60
take 命魂灵石 60
take 天冲灵石 60
take 灵慧灵石 60
take 力魄灵石 60
take 昆仑玄铁 60
take 草木之灵 60
take 山海精华 60
take 中枢灵石 60
CREDITPOINT - 40
give 白石灵佩1 1
break
close
#ELSEACT
take 天魂灵石 60
take 地魂灵石 60
take 命魂灵石 60
take 天冲灵石 60
take 灵慧灵石 60
take 力魄灵石 60
take 昆仑玄铁 60
take 草木之灵 60
take 山海精华 60
take 中枢灵石 60
CREDITPOINT - 40
give 白石灵佩 1
break
close
[@紫玉]
分身到大悟境界才可以佩带紫玉灵佩，紫玉灵佩可以使\
分身的能力得到全面提高，而且这些能力还能附加到主人\
身上！\
要想换取紫玉灵佩，需要你付出70点声望，再给我一些\
三魂七魄灵石，灵石蕴含灵力之和至少50点才行。\
你想现在就换取紫玉灵佩吗？\\
<是的，现在就换取/@换紫玉灵佩>\
<返回/@main>
[@换紫玉灵佩]
#ACT
MOV P2 0
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
checkitem 天魂灵石 1
#ACT
INC P2 $ItemExALL.13.天魂灵石
#IF
checkitem 地魂灵石 1
#ACT
INC P2 $ItemExALL.13.地魂灵石
#IF
checkitem 命魂灵石 1
#ACT
INC P2 $ItemExALL.13.命魂灵石
#IF
checkitem 天冲灵石 1
#ACT
INC P2 $ItemExALL.13.天冲灵石
#IF
checkitem 灵慧灵石 1
#ACT
INC P2 $ItemExALL.13.灵慧灵石
#IF
checkitem 力魄灵石 1
#ACT
INC P2 $ItemExALL.13.力魄灵石
#IF
checkitem 昆仑玄铁 1
#ACT
INC P2 $ItemExALL.13.昆仑玄铁
#IF
checkitem 草木之灵 1
#ACT
INC P2 $ItemExALL.13.草木之灵
#IF
checkitem 山海精华 1
#ACT
INC P2 $ItemExALL.13.山海精华
#IF
checkitem 中枢灵石 1
#ACT
INC P2 $ItemExALL.13.中枢灵石
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL P2 50000
#SAY
你没有带来含有足够灵力的灵石，无法让你换取灵佩。\\
<确定/@exit>
#ACT
break
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MessageBox 对不起，您身上背包的位置不够，请清理出空位！
break
#IF
CHECKCREDITPOINT < 70
#SAY
你的声望不足70点，无法让你换取灵佩。\\
<确定/@exit>
#ACT
break
#IF
RANDOM 5
#ACT
take 天魂灵石 60
take 地魂灵石 60
take 命魂灵石 60
take 天冲灵石 60
take 灵慧灵石 60
take 力魄灵石 60
take 昆仑玄铁 60
take 草木之灵 60
take 山海精华 60
take 中枢灵石 60
CREDITPOINT - 70
give 紫玉灵佩1 1
break
close
#ELSEACT
take 天魂灵石 60
take 地魂灵石 60
take 命魂灵石 60
take 天冲灵石 60
take 灵慧灵石 60
take 力魄灵石 60
take 昆仑玄铁 60
take 草木之灵 60
take 山海精华 60
take 中枢灵石 60
CREDITPOINT - 70
give 紫玉灵佩 1
break
close
;----------------------------------------------------------------------------------
[@元神封神]
<元神男战士封神榜/@JobSex&男战士>\
<元神女战士封神榜/@JobSex&女战士>\
<元神男法师封神榜/@JobSex&男法师>\
<元神女法师封神榜/@JobSex&女法师>\
<元神男道士封神榜/@JobSex&男道士>\
<元神女道士封神榜/@JobSex&女道士>\
<返回/@main> <关闭/@exit>\
[@提升身灵]
元神是秉承天地灵气而生，灵力的深厚程度决定了你元\
神的能力。而且灵力还可以用来炼内丹、修炼元神装备，你\
要是带来了七魄灵石，我就把灵石里面的灵力打入你的元神\
分身体内。两点灵石灵力可以便成一点元神分身灵力。\
要是你的元神分身有了一千点的灵力，那你的元神修炼\
之路将会顺利很多。\
<我带来了灵石，请帮我/@放入灵石>\
<我去找灵石/@exit>\
<返回/@加强大>
[@灵石修炼]
#IF
checkys
#ACT
#ELSESAY
你都还没有分身呢？叫我怎么帮助你呢？\\
<离开。/@exit>
#ELSEACT
break
#IF
CHECKONLINE $YSNAME
#ACT
#ELSESAY
你的分身呢？都没有释放出来，叫我怎么帮助你呢？\\
<我马上放出我的分身。/@exit>
#ELSEACT
break
#IF
LARGE $HUMANINFO.$YSNAME.$BSS2 $YSFENGHAO
#SAY
你的分身已经用灵石或者灵皓石修炼过了一次吧？这种\
靠灵石提升分身的办法是不能多用的。提升分身境界的关键\
在于你带着分身不懈修炼。<COLOR=GREEN 只有分身普升到更高境界，>才能\
发挥越来越大的威力。\
若你只是来<COLOR=GREEN 炼制高灵力灵石>，我倒是可以帮你，拿来吧。\
<请帮我炼制高灵力灵石/@炼制高灵石>\
<多谢指点/@exit>
#ELSESAY
分身的修炼是从固本培元开始的，在魔法阵威力的帮助\
下，我可以将七魄灵石中的灵力注入你的元神中，帮助你快\
速修炼分身。天冲、灵慧、力魄、中枢、山害精华、昆仑玄\
铁、草木之灵，随便哪种都行。\
但是，<COLOR=GREEN 只有灵力在30点以上的灵石>或者<COLOR=GREEN 灵皓石>才可以，\
我可以帮你把<COLOR=GREEN 多个灵石的灵力汇聚到一个灵石>中，只要你有\
心，一定能凑够30点灵力的。\
<请帮我用灵石修炼分身/@灵石修炼1> <请帮我用灵皓石修炼分身/@灵皓石修炼>\
<请帮我炼制高灵力灵石/@炼制高灵石>
[@灵石修炼1]
#IF
checkys
#ACT
MOV P21 0
MOV P22 0
MOV P23 0
MOV P24 0
MOV P25 0
MOV P26 0
MOV P27 0
MOV P28 0
MOV P29 0
MOV P30 0
#ELSESAY
你都还没有分身呢？叫我怎么帮助你呢？\\
<离开。/@exit>
#ELSEACT
break
#IF
CHECKONLINE $YSNAME
#ACT
#ELSESAY
你的分身呢？都没有释放出来，叫我怎么帮助你呢？\\
<我马上放出我的分身。/@exit>
#ELSEACT
break
#IF
LARGE $HUMANINFO.$YSNAME.$BSS2 $YSFENGHAO
#SAY
你的分身已经用灵石或者灵皓石修炼过了一次吧？这种\
靠灵石提升分身的办法是不能多用的。提升分身境界的关键\
在于你带着分身不懈修炼。<COLOR=GREEN 只有分身普升到更高境界，>才能\
发挥越来越大的威力。\
若你只是来<COLOR=GREEN 炼制高灵力灵石>，我倒是可以帮你，拿来吧。\
<请帮我炼制高灵力灵石/@炼制高灵石>\
<多谢指点/@exit>
#ACT
break
#IF
checkitem 天魂灵石 1
#ACT
MOV P21 $ItemExALL.13.天魂灵石
#IF
checkitem 地魂灵石 1
#ACT
MOV P22 $ItemExALL.13.地魂灵石
#IF
checkitem 命魂灵石 1
#ACT
MOV P23 $ItemExALL.13.命魂灵石
#IF
checkitem 天冲灵石 1
#ACT
MOV P24 $ItemExALL.13.天冲灵石
#IF
checkitem 灵慧灵石 1
#ACT
MOV P25 $ItemExALL.13.灵慧灵石
#IF
checkitem 力魄灵石 1
#ACT
MOV P26 $ItemExALL.13.力魄灵石
#IF
checkitem 昆仑玄铁 1
#ACT
MOV P27 $ItemExALL.13.昆仑玄铁
#IF
checkitem 草木之灵 1
#ACT
MOV P28 $ItemExALL.13.草木之灵
#IF
checkitem 山海精华 1
#ACT
MOV P29 $ItemExALL.13.山海精华
#IF
checkitem 中枢灵石 1
#ACT
MOV P30 $ItemExALL.13.中枢灵石
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
LARGE P21 29000
#ACT
take 天魂灵石 60
GOTO @可以修炼吧
break
#IF
LARGE P22 29000
#ACT
take 地魂灵石 60
GOTO @可以修炼吧
break
#IF
LARGE P23 29000
#ACT
take 命魂灵石 60
GOTO @可以修炼吧
break
#IF
LARGE P24 29000
#ACT
take 天冲灵石 60
GOTO @可以修炼吧
break
#IF
LARGE P25 29000
#ACT
take 灵慧灵石 60
GOTO @可以修炼吧
break
#IF
LARGE P26 29000
#ACT
take 力魄灵石 60
GOTO @可以修炼吧
break
#IF
LARGE P27 29000
#ACT
take 昆仑玄铁 60
GOTO @可以修炼吧
break
#IF
LARGE P28 29000
#ACT
take 草木之灵 60
GOTO @可以修炼吧
break
#IF
LARGE P29 29000
#ACT
take 山海精华 60
GOTO @可以修炼吧
break
#IF
LARGE P29 29000
#ACT
take 中枢灵石 60
GOTO @可以修炼吧
break
#ELSESAY
你没有带来含有足够灵力的灵石，无法让你进行修炼。\\
<确定/@exit>
[@可以修炼吧]
#ACT
HCALL $YSNAME @灵石修炼分身
#SAY
恭喜你，你的分身吸取了灵石的灵力，修炼过程大大\
加快，以后的路就要靠你自己了。\\\
<多谢帮忙/@exit>
[@灵皓石修炼]
#IF
checkitem 灵皓石 1
#ACT
#ELSESAY
你包裹内没有修炼分身必须的灵皓石，不能进行修炼。\\
<离开/@exit>
#ELSEACT
break
#IF
checkys
#ACT
#ELSESAY
你都还没有分身呢？叫我怎么帮助你呢？\\
<离开。/@exit>
#ELSEACT
break
#IF
CHECKONLINE $YSNAME
#ACT
#ELSESAY
你的分身呢？都没有释放出来，叫我怎么帮助你呢？\\
<我马上放出我的分身。/@exit>
#ELSEACT
break
#IF
LARGE $HUMANINFO.$YSNAME.$BSS2 $YSFENGHAO
#SAY
你的分身已经用灵石或者灵皓石修炼过了一次吧？这种\
靠灵石提升分身的办法是不能多用的。提升分身境界的关键\
在于你带着分身不懈修炼。<COLOR=GREEN 只有分身普升到更高境界，>才能\
发挥越来越大的威力。\
若你只是来<COLOR=GREEN 炼制高灵力灵石>，我倒是可以帮你，拿来吧。\
<请帮我炼制高灵力灵石/@炼制高灵石>\
<多谢指点/@exit>
#ELSEACT
take 灵皓石 1
HCALL $YSNAME @灵石修炼分身
#ELSESAY
恭喜你，你的分身吸取了灵皓石的灵力，修炼过程大大\
加快，以后的路就要靠你自己了。\\\
<多谢帮忙/@exit>
[@魔法阵]
魔法阵就在眼前，投入天玉宝石和龙珠才可以有更大魔\
力。等魔法阵的魔力达到顶峰，就可以镇住妖气了。\\
<那我现在就投入天玉宝石。/@投入天玉>\
<让我来投入龙珠吧。/@投入龙珠>\
<请问魔法阵现在的威力多大？/@魔法阵现在的威力多大>\
<我想要领取铁血令。/@领取铁血令>\
<铁血令换取技能书。/@铁血令换取技能书>\
<返回/@main> <离开/@exit>
[@魔法阵现在的威力多大]
通过大家的努力，魔法阵的魔力已经提高到<$STR(G23)>层！\
<离开/@exit>
[@投入天玉]
#IF
checkitem 天玉宝石 1
#ACT
take 天玉宝石 1
MOV S2 天玉宝石
GOTO @投掷奖励
#ELSEACT
break
#ELSESAY
你包裹里没有天玉宝石。\\
<去收集天玉宝石/@exit>
[@投入龙珠]
#IF
checkitem 一星珠 1
#ACT
take 一星珠 1
MOV S2 龙珠
GOTO @投掷奖励
break
#IF
checkitem 二星珠 1
#ACT
take 二星珠 1
MOV S2 龙珠
GOTO @投掷奖励
break
#IF
checkitem 三星珠 1
#ACT
take 三星珠 1
MOV S2 龙珠
GOTO @投掷奖励
break
#IF
checkitem 四星珠 1
#ACT
take 四星珠 1
MOV S2 龙珠
GOTO @投掷奖励
break
#IF
checkitem 五星珠 1
#ACT
take 五星珠 1
MOV S2 龙珠
GOTO @投掷奖励
break
#IF
checkitem 六星珠 1
#ACT
take 六星珠 1
MOV S2 龙珠
GOTO @投掷奖励
break
#IF
checkitem 七星珠 1
#ACT
take 七星珠 1
MOV S2 龙珠
GOTO @投掷奖励
break
#ELSESAY
您的包裹里没有龙珠。\\
<赶快去收集龙珠/@exit>
[@投掷奖励]
#IF
random 8
#ACT
MOVR P3 3
INC P3 1
ReadRandomStr ..\QuestDiary\数据文件\文本数据\天玉刷怪.txt S3
GOTO @随机刷怪
break
#IF
random 5
#ACT
MOVR P3 3
INC P3 1
GOTO @随机传送
break
#IF
random 1
#ACT
MOVR P3 3
INC P3 1
INC G23 $STR(P3)
ReadRandomStr ..\QuestDiary\数据文件\文本数据\天玉奖励.txt S5
GOTO @随机奖励
break
[@随机传送]
#IF
SMALL G23 $STR(P3)
#ELSEACT
DEC G23 $STR(P3)
#IF
random 5
#ACT
MAPMOVE MC004
MOV S7 地下魔域四层
GOTO @传送显示
break
#IF
random 4
#ACT
MAPMOVE S018
MOV S7 逆魔古刹四层
GOTO @传送显示
break
#IF
random 3
#ACT
MAPMOVE J006
MOV S7 生死门
GOTO @传送显示
break
#IF
random 2
#ACT
MAPMOVE N004
MOV S7 盘蛇道
GOTO @传送显示
break
#IF
random 1
#ACT
MAPMOVE TT005
MOV S7 五行宫殿
GOTO @传送显示
break
[@传送显示]
#ACT
SENDMSG 10 (*)%s的<$STR(S2)>使魔法阵的威力降低了<$STR(P3)>点，还被传送到<$STR(S7)>
[@随机奖励]
#IF
EQUAL S2 龙珠
#ACT
GIVE $STR(S5) 1
SENDMSG 10 (*)%s的<$STR(S2)>使魔法阵的威力提高了<$STR(P3)>点，还获得了<$STR(S5)>
#SAY
你的<$STR(S2)>使魔法阵的威力提高了<$STR(P3)>点！\
你还获得了<$STR(S5)>。\\
<再次投入龙珠/@再次投入龙珠>\
<离开/@exit>
#ELSEACT
GIVE $STR(S5) 1
SENDMSG 10 (*)%s的<$STR(S2)>使魔法阵的威力提高了<$STR(P3)>点，还获得了<$STR(S5)>
#ELSESAY
你的<$STR(S2)>使魔法阵的威力提高了<$STR(P3)>点！\
你还获得了<$STR(S5)>。\\
<再次投入天玉宝石/@投入天玉>\
<离开/@exit>
[@刷怪显示]
#IF
EQUAL S2 龙珠
#ACT
SENDMSG 10 (*)%s的<$STR(S2)>使魔法阵的威力降低了<$STR(P3)>点，并还招来了<$STR(S6)>
#SAY
你的<$STR(S2)>使魔法阵的威力降低了<$STR(P3)>点！\
并还招来了<$STR(S6)>。\\
<再次投入龙珠/@再次投入龙珠>\
<离开/@exit>
#ELSEACT
SENDMSG 10 (*)%s的<$STR(S2)>使魔法阵的威力降低了<$STR(P3)>点，并还招来了<$STR(S6)>
#ELSESAY
你的<$STR(S2)>使魔法阵的威力降低了<$STR(P3)>点！\
并还招来了<$STR(S6)>。\\
<再次投入天玉宝石/@投入天玉>\
<离开/@exit>
[@随机刷怪]
#IF
SMALL G23 $STR(P3)
#ELSEACT
DEC G23 $STR(P3)
#IF
EQUAL S3 尸霸
#ACT
mobplacex $X $Y 3 尸霸 1
MOV S6 尸霸
GOTO @刷怪显示
break
#IF
EQUAL S3 三头蛇王
#ACT
mobplacex $X $Y 3 三头蛇王 1
MOV S6 三头蛇王
GOTO @刷怪显示
break
#IF
EQUAL S3 闪电魔
#ACT
mobplacex $X $Y 3 闪电魔 1
MOV S6 闪电魔
GOTO @刷怪显示
break
#IF
EQUAL S3 利爪魔4
#ACT
mobplacex $X $Y 3 利爪魔 1
MOV S6 利爪魔
GOTO @刷怪显示
break
#IF
EQUAL S3 白蛇妖4
#ACT
mobplacex $X $Y 3 白蛇妖 1
MOV S6 白蛇妖
GOTO @刷怪显示
break
#IF
EQUAL S3 幽影武士
#ACT
mobplacex $X $Y 3 幽影武士 1
MOV S6 幽影武士
GOTO @刷怪显示
break
#IF
EQUAL S3 炎魔
#ACT
mobplacex $X $Y 3 炎魔 2
MOV S6 炎魔
GOTO @刷怪显示
break
[@领取铁血令]
铁血令是非常珍贵的宝物，一般人无法轻易得到。现在国王\
已经收集到了数量不多的铁血令，并打算奖励给德高望重的\
英雄。现在可以用5点声望值换取1块铁血令，请注意，领取\
铁血令就要花费声望值的。你想这么做吗？\\
<声望值交换铁血令/@声望值交换>
[@声望值交换]
#IF
CHECKBAGSIZE 1
#ACT
#ELSEACT
MessageBox 对不起，您身上背包的位置不够，请清理出空位！
break
#IF
CHECKCREDITPOINT > 4
#ACT
CREDITPOINT - 5
give 铁血令 1
#SAY
你已经获得了一块铁血令。你可以用它来交换高级技能书。\
<返回/@领取铁血令>\
<离开/@exit>
#ELSESAY
你的声望太低了，必须有5点以上的声望才可以来这里换取\
铁血令。去努力提高自己的声望吧。\\
<离开/@exit>
[@铁血令换取技能书]
现在已经有越来越多的英雄获得了铁血令。现在有机会用铁\
血令换取技能书了。每块铁血令都可以换到一本高级的技能\
书。但到底是什么就看每个人不同的命运了。拥有高级技能\
是所有英雄的梦想，尽快拿铁血令来换吧！\\
<现在就换取技能书/@现在就换取>
[@现在就换取]
#IF
checkitem 铁血令 1
#ACT
ReadRandomStr ..\QuestDiary\数据文件\文本数据\铁血换书.txt S2
TAKE 铁血令 1
GIVE $STR(S2) 1
#SAY
命运中是公平的，祝贺你，获得了最新的新技能书\
“<$STR(S2)>”。练就新技能，寻找属于自己的道路！\\
<离开/@exit>
#elsesay
你必须带着铁血令才能换取高级的技能书，去寻找铁血令吧。\\
<离开/@exit>
