积分购买.txt

企业版传奇世界本

[@天关购物]
{
请选择你要购买的装备类别：\\
　　<COLOR=GREEN 套装物品>---<三神套装/@购买三神套>　　<帝王套装/@购买帝王>\\
　　<COLOR=GREEN 特殊物品>---<盔甲衣服/@盔甲衣服>　　<武器类/@武器类>　　<COLOR=GREEN 购买><天关积分/@购买积分天>\\
　　当前拥有天关积分[<$HUMAN(TGJ)>]点\\

　　　　　　　　　　　　　　　　　　　　　　　　<返回上页/@闯天关3>

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

[@购买积分天]
　　如果你很急切的需要获得天关积分，那么可以在这里使用一\
定的元宝来购买！原本天关积分是不能直接购买的，但为了生活\
我们不得已出此下策！！！\
　　我们一般还是建议大家使用灵符直接闯关获得天关积分！不\
想闯直接购买的话，是需要多花费代价的！\\
　　当前天关积分是：[<$HUMAN(TGJ)>]点\\
　　<COLOR=GREEN 购买1点天关积分需要7个元宝！>　　<我要购买/@购买积分1>　　<返回上页/@天关购物>


[@购买积分1]
#ACT
queryvalue 请输入你要购买多少点[天关积分]: 2 7 4202
break

[@getstring4202]
#ACT
Getstring s1
CALCVAR HUMAN SCL = $STR(s1)
CALCVAR HUMAN SCL * 7
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
CHECKVAR HUMAN SCL < 1
#ACT
MessageBox 对不起，你输入数量错误！请重新输入数字，不能为0或带字符
break
#IF
CHECKGAMEGOLD > $human(SCL)
CHECKVAR HUMAN SCL > 0
#ACT
GAMEGOLD - $human(SCL)
CALCVAR HUMAN 消费 + $human(SCL)
SAVEVAR HUMAN 消费 ..\QuestDiary\数据文件\消费.txt
CALCVAR HUMAN TGJ + $STR(s1)
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
SENDMSG 5 您使用:[<$human(SCL)>个元宝]购买了:[<$STR(s1)>点]天关积分
goto @购买积分天
#ELSEACT
MessageBox 对不起，本次购买需要元宝[<$human(SCL)>]，你的元宝不足，购买失败。






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

[@武器类]
请选择你要购买的武器类别：\\
\
　　<COLOR=GREEN 初级武器>---<雷裂刀、霹雳法杖、道玄剑/@购买初级武器>\
　　<COLOR=GREEN 中级武器>---<雷霆怒斩、龙牙利刃、逍遥无极扇/@购买中级武器>\
　　<COLOR=GREEN 高级武器>---<赤明天帝、碧海天王、紫月圣君、耀阳圣尊/@购买高级武器>\
　　<COLOR=GREEN 超级武器>---<屠龙刀、嗜魂、倚天剑/@购买超级武器>\
　　<COLOR=GREEN 套装武器>---<战轮神器、法轮魔器、道轮仙器/@购买套装武器>　　　　<返回上页/@天关购物>


[@购买套装武器]
请选择你要购买的武器类别：\\
帝王战武器：<COLOR=GREEN 战轮神器>　　价格：2000点天关积分　　<立即购买/@WQ110121>\
帝王法武器：<COLOR=GREEN 法轮魔器>　　价格：2000点天关积分　　<立即购买/@WQ120121>\
帝王道武器：<COLOR=GREEN 道轮仙器>　　价格：2000点天关积分　　<立即购买/@WQ130121>\\
当前拥有天关积分[<$HUMAN(TGJ)>]点\\
<返回上页/@武器类>


[@购买超级武器]
请选择你要购买的武器类别：\\
战士终极：<COLOR=GREEN 屠龙刀>　　价格：1200点天关积分　　<立即购买/@WQ11012>\
法师终极：<COLOR=GREEN 嗜魂>　　　价格：1200点天关积分　　<立即购买/@WQ12012>\
道士终极：<COLOR=GREEN 倚天剑>　　价格：1200点天关积分　　<立即购买/@WQ13012>\\
当前拥有天关积分[<$HUMAN(TGJ)>]点\\
<返回上页/@武器类>

[@WQ110121]
#IF
CHECKVAR HUMAN TGJ < 2000
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 战轮神器 1
SENDMSG 5 你成功花费了[2000]天关积分购买了[战轮神器]
CALCVAR HUMAN TGJ - 2000
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break


[@WQ120121]
#IF
CHECKVAR HUMAN TGJ < 2000
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 法轮魔器 1
SENDMSG 5 你成功花费了[2000]天关积分购买了[法轮魔器]
CALCVAR HUMAN TGJ - 2000
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break

[@WQ130121]
#IF
CHECKVAR HUMAN TGJ < 2000
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 道轮仙器 1
SENDMSG 5 你成功花费了[2000]天关积分购买了[道轮仙器]
CALCVAR HUMAN TGJ - 2000
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break

[@WQ11012]
#IF
CHECKVAR HUMAN TGJ < 1200
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 屠龙刀 1
SENDMSG 5 你成功花费了[1200]天关积分购买了[屠龙刀]
CALCVAR HUMAN TGJ - 1200
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break


[@WQ12012]
#IF
CHECKVAR HUMAN TGJ < 1200
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 嗜魂 1
SENDMSG 5 你成功花费了[1200]天关积分购买了[嗜魂]
CALCVAR HUMAN TGJ - 1200
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break

[@WQ13012]
#IF
CHECKVAR HUMAN TGJ < 1200
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 倚天剑 1
SENDMSG 5 你成功花费了[1200]天关积分购买了[倚天剑]
CALCVAR HUMAN TGJ - 1200
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break


[@购买高级武器]
请选择你要购买的武器类别：\\
<COLOR=GREEN 赤明天帝>　　价格：600点天关积分　　<立即购买/@WQ1101>\
<COLOR=GREEN 碧海天王>　　价格：500点天关积分　　<立即购买/@WQ1201>\
<COLOR=GREEN 紫月圣君>　　价格：500点天关积分　　<立即购买/@WQ1301>\
<COLOR=GREEN 耀阳圣尊>　　价格：500点天关积分　　<立即购买/@WQ1401>\\
当前拥有天关积分[<$HUMAN(TGJ)>]点\
<返回上页/@武器类>


[@WQ1101]
#IF
CHECKVAR HUMAN TGJ < 600
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 赤明天帝 1
SENDMSG 5 你成功花费了[600]天关积分购买了[赤明天帝]
CALCVAR HUMAN TGJ - 600
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break

[@WQ1201]
#IF
CHECKVAR HUMAN TGJ < 500
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 碧海天王 1
SENDMSG 5 你成功花费了[500]天关积分购买了[碧海天王]
CALCVAR HUMAN TGJ - 500
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break

[@WQ1301]
#IF
CHECKVAR HUMAN TGJ < 500
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 紫月圣君 1
SENDMSG 5 你成功花费了[500]天关积分购买了[紫月圣君]
CALCVAR HUMAN TGJ - 500
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break


[@WQ1401]
#IF
CHECKVAR HUMAN TGJ < 500
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 耀阳圣尊 1
SENDMSG 5 你成功花费了[500]天关积分购买了[耀阳圣尊]
CALCVAR HUMAN TGJ - 500
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break


[@购买中级武器]
请选择你要购买的武器类别：\\
<COLOR=GREEN 雷霆怒斩>　　价格：200点天关积分　　<立即购买/@WQ110>\
<COLOR=GREEN 龙牙利刃>　　价格：200点天关积分　　<立即购买/@WQ120>\
<COLOR=GREEN 逍遥无极扇>　　价格：200点天关积分　　<立即购买/@WQ130>\\
当前拥有天关积分[<$HUMAN(TGJ)>]点\
<返回上页/@武器类>

[@WQ110]
#IF
CHECKVAR HUMAN TGJ < 200
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 雷霆怒斩 1
SENDMSG 5 你成功花费了[200]天关积分购买了[雷霆怒斩]
CALCVAR HUMAN TGJ - 200
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break


[@WQ120]
#IF
CHECKVAR HUMAN TGJ < 200
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 龙牙利刃 1
SENDMSG 5 你成功花费了[200]天关积分购买了[龙牙利刃]
CALCVAR HUMAN TGJ - 200
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break

[@WQ130]
#IF
CHECKVAR HUMAN TGJ < 200
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 逍遥无极扇 1
SENDMSG 5 你成功花费了[200]天关积分购买了[逍遥无极扇]
CALCVAR HUMAN TGJ - 200
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break

[@购买初级武器]
请选择你要购买的武器类别：\\
<COLOR=GREEN 雷裂刀>　　　价格：45点天关积分　　<立即购买/@WQ11>\
<COLOR=GREEN 霹雳法杖>　　价格：60点天关积分　　<立即购买/@WQ12>\
<COLOR=GREEN 道玄剑>　　　价格：75点天关积分　　<立即购买/@WQ13>\
<COLOR=GREEN 血饮>　　　　价格：30点天关积分　　<立即购买/@WQ14>\\
当前拥有天关积分[<$HUMAN(TGJ)>]点\
<返回上页/@武器类>

[@WQ11]
#IF
CHECKVAR HUMAN TGJ < 45
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 雷裂刀 1
SENDMSG 5 你成功花费了[45]天关积分购买了[雷裂刀]
CALCVAR HUMAN TGJ - 45
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break


[@WQ12]
#IF
CHECKVAR HUMAN TGJ < 60
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 霹雳法杖 1
SENDMSG 5 你成功花费了[60]天关积分购买了[霹雳法杖]
CALCVAR HUMAN TGJ - 60
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break

[@WQ13]
#IF
CHECKVAR HUMAN TGJ < 75
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 道玄剑 1
SENDMSG 5 你成功花费了[75]天关积分购买了[道玄剑]
CALCVAR HUMAN TGJ - 75
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break


[@WQ14]
#IF
CHECKVAR HUMAN TGJ < 30
#ACT
messagebox 购买失败，你当前的天关积分不足！\天关积分的获得方式：\在闯天关中，每成功闯完一关即可获得增加1点天关积分
break
#ELSEACT
GIVE 血饮 1
SENDMSG 5 你成功花费了[30]天关积分购买了[血饮]
CALCVAR HUMAN TGJ - 30
SAVEVAR HUMAN TGJ ..\QuestDiary\数据文件\天关\TGJSave.txt
goto @天关购物
messagebox 购买成功，请检查你的包裹！
break


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

[@盔甲衣服]
请选择你要购买的衣服类别：\\
　　<COLOR=GREEN 中级盔甲>---<44级衣服/@购买44级衣服>\\
　　<COLOR=GREEN 高级盔甲>---<50级衣服/@购买50级衣服>\\
　　当前拥有天关积分[<$HUMAN(TGJ)>]点　　<返回上页/@天关购物>

[@购买44级衣服]
\
<COLOR=GREEN 神武战甲>　　价格：150点天关积分　　<立即购买/@KJ11>\
<COLOR=GREEN 神武战袍>　　价格：150点天关积分　　<立即购买/@KJ12>\
<COLOR=GREEN 天玄道袍>　　价格：150点天关积分　　<立即购买/@KJ13>\
<COLOR=GREEN 天玄道衣>　　价格：150点天关积分　　<立即购买/@KJ14>\
<COLOR=GREEN 幻魔披风>　　价格：150点天关积分　　<立即购买/@KJ15>\
<COLOR=GREEN 幻魔羽衣>　　价格：150点天关积分　　<立即购买/@KJ16>　　<返回上页/@盔甲衣服>\\
当前拥有天关积分[<$HUMAN(TGJ)>]点

[@购买50级衣服]
\
<COLOR=GREEN 战神玄铠>　　价格：400点天关积分　　<立即购买/@KJ110>\
<COLOR=GREEN 战神玄袍>　　价格：400点天关积分　　<立即购买/@KJ120>\
<COLOR=GREEN 魔神披风>　　价格：400点天关积分　　<立即购买/@KJ130>\
<COLOR=GREEN 魔神羽衣>　　价格：400点天关积分　　<立即购买/@KJ140>\
<COLOR=GREEN 道神仙袍>　　价格：400点天关积分　　<立即购买/@KJ150>\
<COLOR=GREEN 道神仙衣>　　价格：400点天关积分　　<立即购买/@KJ160>　　<返回上页/@盔甲衣服>\\
当前拥有天关积分[<$HUMAN(TGJ)>]点


[@KJ110]
#IF