[@main]
#say
我是丹塔的练丹大师。我能帮你炼制 【<噬生丹>】【<皇极丹>】【<破宗丹>】 !\ \

成功几率七成，失败的话药材都会废掉!炼制成功则需要扣除相应荣誉值! \ \

<炼制噬生丹/@jqs> = 幽冥草*10 + 修魔果*10 + 噬魔花*10 + 8点荣誉值\
<炼制皇极丹/@zjd> = 绿冥果浆*10 + 邪魂妖果*10 + 蟒魂魔叶*10 + 16点荣誉值\
<炼制破宗丹/@dld> = 双生灵果*10 + 地妖魔根*10 + 厄血魔叶*10 + 32点荣誉值\

[@jqs]
#if
CHECKGLORYPOINT > 7
CHECKKIMNEEDLE 幽冥草 10
CHECKKIMNEEDLE 修魔果 10
CHECKKIMNEEDLE 噬魔花 10
#act
MOVR d65 9
goto @HC
#ELSEsay
你没有炼制所需药材或者荣誉值。无法炼制！

[@hc]
#if
equal D65 0
#act
TAKEKIMNEEDLE 幽冥草 10
TAKEKIMNEEDLE 修魔果 10
TAKEKIMNEEDLE 噬魔花 10
SENDMSG 0 <$USERNAME>运气不佳，在:%m%x:%y处炼制噬生丹失败！
break

#if
equal D65 1
#act
GLORYCHANGE - 8
TAKEKIMNEEDLE 幽冥草 10
TAKEKIMNEEDLE 修魔果 10
TAKEKIMNEEDLE 噬魔花 10
give 噬生丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制噬生丹！
break

#if
equal D65 2
#act
GLORYCHANGE - 8
TAKEKIMNEEDLE 幽冥草 10
TAKEKIMNEEDLE 修魔果 10
TAKEKIMNEEDLE 噬魔花 10
give 噬生丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制噬生丹！
break

#if
equal D65 3
#act
TAKEKIMNEEDLE 幽冥草 10
TAKEKIMNEEDLE 修魔果 10
TAKEKIMNEEDLE 噬魔花 10
SENDMSG 0 <$USERNAME>运气不佳，在:%m%x:%y处炼制噬生丹失败！
break

#if
equal D65 4
#act
GLORYCHANGE - 8
TAKEKIMNEEDLE 幽冥草 10
TAKEKIMNEEDLE 修魔果 10
TAKEKIMNEEDLE 噬魔花 10
give 噬生丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制噬生丹！
break

#if
equal D65 5
#act
GLORYCHANGE - 8
TAKEKIMNEEDLE 幽冥草 10
TAKEKIMNEEDLE 修魔果 10
TAKEKIMNEEDLE 噬魔花 10
give 噬生丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制噬生丹！
break

#if
equal D65 6
#act
GLORYCHANGE - 8
TAKEKIMNEEDLE 幽冥草 10
TAKEKIMNEEDLE 修魔果 10
TAKEKIMNEEDLE 噬魔花 10
give 噬生丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制噬生丹！
break

#if
equal D65 7
#act
GLORYCHANGE - 8
TAKEKIMNEEDLE 幽冥草 10
TAKEKIMNEEDLE 修魔果 10
TAKEKIMNEEDLE 噬魔花 10
give 噬生丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制噬生丹！
break

#if
equal D65 8
#act
GLORYCHANGE - 8
TAKEKIMNEEDLE 幽冥草 10
TAKEKIMNEEDLE 修魔果 10
TAKEKIMNEEDLE 噬魔花 10
give 噬生丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制噬生丹！
break

#if
equal D65 9
#act
TAKEKIMNEEDLE 幽冥草 10
TAKEKIMNEEDLE 修魔果 10
TAKEKIMNEEDLE 噬魔花 10
SENDMSG 0 <$USERNAME>运气不佳，在:%m%x:%y处炼制噬生丹失败！
break

[@zjd]
#if
CHECKGLORYPOINT > 15
CHECKKIMNEEDLE 绿冥果浆 10
CHECKKIMNEEDLE 邪魂妖果 10
CHECKKIMNEEDLE 蟒魂魔叶 10
#act
MOVR d65 9
goto @HC1
#ELSEsay
你没有炼制所需药材或者荣誉值。无法炼制！

[@hc1]
#if
equal D65 0
#act
GLORYCHANGE - 16
TAKEKIMNEEDLE 绿冥果浆 10
TAKEKIMNEEDLE 邪魂妖果 10
TAKEKIMNEEDLE 蟒魂魔叶 10
give 皇极丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制皇极丹！
break

#if
equal D65 1
#act
GLORYCHANGE - 16
TAKEKIMNEEDLE 绿冥果浆 10
TAKEKIMNEEDLE 邪魂妖果 10
TAKEKIMNEEDLE 蟒魂魔叶 10
give 皇极丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制皇极丹！
break

#if
equal D65 2
#act
GLORYCHANGE - 16
TAKEKIMNEEDLE 绿冥果浆 10
TAKEKIMNEEDLE 邪魂妖果 10
TAKEKIMNEEDLE 蟒魂魔叶 10
give 皇极丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制皇极丹！
break

#if
equal D65 3
#act
GLORYCHANGE - 16
TAKEKIMNEEDLE 绿冥果浆 10
TAKEKIMNEEDLE 邪魂妖果 10
TAKEKIMNEEDLE 蟒魂魔叶 10
give 皇极丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制皇极丹！
break

#if
equal D65 4
#act
GLORYCHANGE - 16
TAKEKIMNEEDLE 绿冥果浆 10
TAKEKIMNEEDLE 邪魂妖果 10
TAKEKIMNEEDLE 蟒魂魔叶 10
give 皇极丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制皇极丹！
break

#if
equal D65 5
#act
GLORYCHANGE - 16
TAKEKIMNEEDLE 绿冥果浆 10
TAKEKIMNEEDLE 邪魂妖果 10
TAKEKIMNEEDLE 蟒魂魔叶 10
give 皇极丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制皇极丹！
break

#if
equal D65 6
#act
GLORYCHANGE - 16
TAKEKIMNEEDLE 绿冥果浆 10
TAKEKIMNEEDLE 邪魂妖果 10
TAKEKIMNEEDLE 蟒魂魔叶 10
give 皇极丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制皇极丹！
break

#if
equal D65 7
#act
TAKEKIMNEEDLE 绿冥果浆 10
TAKEKIMNEEDLE 邪魂妖果 10
TAKEKIMNEEDLE 蟒魂魔叶 10
SENDMSG 0 <$USERNAME>运气不佳，在:%m%x:%y处炼制皇极丹失败！
break

#if
equal D65 8
#act
TAKEKIMNEEDLE 绿冥果浆 10
TAKEKIMNEEDLE 邪魂妖果 10
TAKEKIMNEEDLE 蟒魂魔叶 10
SENDMSG 0 <$USERNAME>运气不佳，在:%m%x:%y处炼制皇极丹失败！
break

#if
equal D65 9
#act
TAKEKIMNEEDLE 绿冥果浆 10
TAKEKIMNEEDLE 邪魂妖果 10
TAKEKIMNEEDLE 蟒魂魔叶 10
SENDMSG 0 <$USERNAME>运气不佳，在:%m%x:%y处炼制皇极丹失败！
break

[@dld]
#if
CHECKGLORYPOINT > 31
CHECKKIMNEEDLE 双生灵果 10
CHECKKIMNEEDLE 地妖魔根 10
CHECKKIMNEEDLE 厄血魔叶 10
#act
MOVR d65 9
goto @HC2
#ELSEsay
你没有炼制所需药材或者荣誉值。无法炼制！

[@hc2]
#if
equal D65 0
#act
GLORYCHANGE - 32
TAKEKIMNEEDLE 双生灵果 10
TAKEKIMNEEDLE 地妖魔根 10
TAKEKIMNEEDLE 厄血魔叶 10
give 破宗丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制破宗丹！
break

#if
equal D65 1
#act
GLORYCHANGE - 32
TAKEKIMNEEDLE 双生灵果 10
TAKEKIMNEEDLE 地妖魔根 10
TAKEKIMNEEDLE 厄血魔叶 10
give 破宗丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制破宗丹！
break

#if
equal D65 2
#act
GLORYCHANGE - 32
TAKEKIMNEEDLE 双生灵果 10
TAKEKIMNEEDLE 地妖魔根 10
TAKEKIMNEEDLE 厄血魔叶 10
give 破宗丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制破宗丹！
break

#if
equal D65 3
#act
GLORYCHANGE - 32
TAKEKIMNEEDLE 双生灵果 10
TAKEKIMNEEDLE 地妖魔根 10
TAKEKIMNEEDLE 厄血魔叶 10
give 破宗丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制破宗丹！
break

#if
equal D65 4
#act
GLORYCHANGE - 32
TAKEKIMNEEDLE 双生灵果 10
TAKEKIMNEEDLE 地妖魔根 10
TAKEKIMNEEDLE 厄血魔叶 10
give 破宗丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制破宗丹！
break

#if
equal D65 5
#act
GLORYCHANGE - 32
TAKEKIMNEEDLE 双生灵果 10
TAKEKIMNEEDLE 地妖魔根 10
TAKEKIMNEEDLE 厄血魔叶 10
give 破宗丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制破宗丹！
break

#if
equal D65 6
#act
GLORYCHANGE - 32
TAKEKIMNEEDLE 双生灵果 10
TAKEKIMNEEDLE 地妖魔根 10
TAKEKIMNEEDLE 厄血魔叶 10
give 破宗丹 1
SENDMSG 0 <$USERNAME>在:%m%x:%y处成功炼制破宗丹！
break

#if
equal D65 7
#act
TAKEKIMNEEDLE 双生灵果 10
TAKEKIMNEEDLE 地妖魔根 10
TAKEKIMNEEDLE 厄血魔叶 10
SENDMSG 0 <$USERNAME>运气不佳，在:%m%x:%y处炼制破宗丹失败！
break

#if
equal D65 8
#act
TAKEKIMNEEDLE 双生灵果 10
TAKEKIMNEEDLE 地妖魔根 10
TAKEKIMNEEDLE 厄血魔叶 10
SENDMSG 0 <$USERNAME>运气不佳，在:%m%x:%y处炼制破宗丹失败！
break

#if
equal D65 9
#act
TAKEKIMNEEDLE 双生灵果 10
TAKEKIMNEEDLE 地妖魔根 10
TAKEKIMNEEDLE 厄血魔叶 10
SENDMSG 0 <$USERNAME>运气不佳，在:%m%x:%y处炼制破宗丹失败！
break