神兵积分换取提取脚本，锻造黄金陨铁

admin

[@MAIN]
        #if
        #act
        MOV S1
        MOV S2
        MOV S2 HUMAN 神兵积分
        MOV S1 </divdiv        INC S1 S2/divdiv        INC S1 /FColor=58>
        OPENMERCHANTDLG 19|130|1|542|274|0|0|0|1|393|25
        #SAY
       
        　玛法勇士！你有多余的高级神兵吗？只要你能给我这些武器我将
        　送你大量神兵积分.怒斩 龙牙=5点神兵积分，逍遥扇，霸者之刃
        　=20点神兵积分。屠龙 嗜魂法杖=30点神兵积分，天之屠龙 天之
        　嗜魂法杖 天之逍遥扇=50点神兵积分.如果你拥有1000点积分可以
        　去卧龙后院找我师弟(卧龙老庄主)换取黄金武器一把！
        　
        　
        　你当前的神兵积分数量是∶  
       
       
       
        [@InPutInteger2]
        #IF
        LARGE N2 0
        SMALL N2 100
        #act
        MOV N3 0
        MUL N3 N2 300
        #ELSEACT
        MESSAGEBOX 你输入的数量有误，请重新输入1-99之间是数量
        GOTO @MAIN
        BREAK
       
        #if
        CHECKGAMEGIRD >
        #act
        GIVE 黄金陨铁
        GAMEGIRD -
        SENDMSG 7 恭喜：你成功使用个灵符锻造了；颗黄金陨铁！
        SENDMSG 0 使用个灵符锻造了；颗黄金陨铁！
        GOTO @MAIN
        #ELSEACT
        MESSAGEBOX 对不起，您没有足够的灵符来兑换黄金陨铁！
        GOTO @MAIN
       
        [@我想上交武器换取积分]
       
        　
        　你确定要回收背包可回收武器吗？？？
        　怒斩 龙牙=5点神兵积分，天之怒斩 天之龙牙=8点神兵积分，
        　逍遥扇，霸者之刃=20点神兵积分，屠龙 嗜魂法杖=30点神兵积分，
        　天之屠龙 天之嗜魂法杖 天之逍遥扇=50点神兵积分！　
       
       
        　　　　　\
       
       
       
       
       
       
        [@请帮我回收换取神兵积分吧]
        #IF
        CheckBagItems QuestDiary装备回收怒斩龙牙.txt 0 S0
        #ACT
        TAKE  1
        CALCVAR HUMAN 神兵积分 + 5
        SAVEVAR HUMAN 神兵积分 ..QuestDiary充值积分神兵积分Save.txt
        SENDMSG 6 提示：回收获得了：5点神兵积分。
        DELAYGOTO 300 @请帮我回收换取神兵积分吧
       
        #IF
        CheckBagItems QuestDiary装备回收天之怒斩龙牙.txt 0 S0
        #ACT
        TAKE  1
        CALCVAR HUMAN 神兵积分 + 8
        SAVEVAR HUMAN 神兵积分 ..QuestDiary充值积分神兵积分Save.txt
        SENDMSG 6 提示：回收获得了：8点神兵积分。
        DELAYGOTO 300 @请帮我回收换取神兵积分吧
       
        #IF
        CheckBagItems QuestDiary装备回收逍遥霸者.txt 0 S0
        #ACT
        TAKE  1
        CALCVAR HUMAN 神兵积分 + 20
        SAVEVAR HUMAN 神兵积分 ..QuestDiary充值积分神兵积分Save.txt
        SENDMSG 6 提示：回收获得了：20点神兵积分。
        DELAYGOTO 300 @请帮我回收换取神兵积分吧
       
        #IF
        CheckBagItems QuestDiary装备回收屠龙嗜魂.txt 0 S0
        #ACT
        TAKE  1
        CALCVAR HUMAN 神兵积分 + 30
        SAVEVAR HUMAN 神兵积分 ..QuestDiary充值积分神兵积分Save.txt
        SENDMSG 6 提示：回收获得了：30点神兵积分。
        DELAYGOTO 300 @请帮我回收换取神兵积分吧
       
        #IF
        CheckBagItems QuestDiary装备回收天之武1器.txt 0 S0
        #ACT
        TAKE  1
        CALCVAR HUMAN 神兵积分 + 50
        SAVEVAR HUMAN 神兵积分 ..QuestDiary充值积分神兵积分Save.txt
        SENDMSG 6 提示：回收获得了：50点神兵积分。
        DELAYGOTO 300 @请帮我回收换取神兵积分吧
       
        BREAK
        #ELSEACT
        SENDMSG 6 已完成可回收的武器，你当前神兵积分为；！
       
       
        [@我想提取神兵积分]
       
        　你要提取多少积分呢？
       
        　
        　
       
       
        [@100点神兵积分]
        #IF
        CHECKVAR HUMAN 神兵积分 > 99
        #act
        CALCVAR HUMAN 神兵积分 - 100
        SAVEVAR HUMAN 神兵积分 ..QuestDiary充值积分神兵积分Save.txt
        give 100点神兵积分
        DELAYGOTO 1 @我想提取神兵积分
        SENDMSG 6 恭喜你提取：100点神兵积分
        #ELSESAY
       
        　你没有足够的神兵积分可提取!
        #ELSEACT
        break
       
        [@10点神兵积分]
        #IF
        CHECKVAR HUMAN 神兵积分 > 9
        #act
        CALCVAR HUMAN 神兵积分 - 10
        SAVEVAR HUMAN 神兵积分 ..QuestDiary充值积分神兵积分Save.txt
        give 10点神兵积分
        DELAYGOTO 1 @我想提取神兵积分
        SENDMSG 6 恭喜你提取：10点神兵积分
        #ELSESAY
       
        　你没有足够的神兵积分可提取!
        #ELSEACT
        break