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

　　[@MAIN] #if #act MOV S1 MOV S2 MOV S2 HUMAN 神兵积分 MOV S1 INC S1 S2 INC S1 /FColor=58 OPENMERCHANTDLG 191301542274000139325 #SAY {i=3li=20ih=4id=5x=390y=20}/@exit\ 玛法勇士！你有多余的高级神兵吗？只要你能给我这些武器我将\ 送你大量神兵积分.怒斩 龙牙=5点神兵积分，逍遥扇，霸者之刃\ =20点神兵积分。屠龙 嗜魂法杖=30点神兵积分，天之屠龙 天之\ 嗜魂法杖 天之逍遥扇=50点神兵积分.如果你拥有1000点积分可以\ 去卧龙后院找我师弟(卧龙老庄主)换取黄金武器一把！\ 我想上交武器换取积分/@我想上交武器换取积分(请保管好贵重物品，如回收一律自负)/FColor=58\ 我想提取神兵积分/@我想提取神兵积分\ 300灵符锻造黄金陨铁/@@InPutInteger2Title=请输入锻造的黄金陨铁数量（1-99）你当前的神兵积分数量是∶$STR(S1)\ \ \ [@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 $STR(N3) #act GIVE 黄金陨铁 $STR(N2) GAMEGIRD - $STR(N3) SENDMSG 7 恭喜：你成功使用$STR(N3)个灵符锻造了；$STR(N2)颗黄金陨铁！ SENDMSG 0 $USERNAME使用$STR(N3)个灵符锻造了；$STR(N2)颗黄金陨铁！ GOTO @MAIN #ELSEACT MESSAGEBOX 对不起，您没有足够的灵符来兑换黄金陨铁！ GOTO @MAIN [@我想上交武器换取积分] {i=3li=20ih=4id=5x=390y=20}/@exit\ (请保管好贵重物品，如回收一律自负)/FColor=58\ 你确定要回收背包可回收武器吗？？？\ 怒斩 龙牙=5点神兵积分，天之怒斩 天之龙牙=8点神兵积分，\ 逍遥扇，霸者之刃=20点神兵积分，屠龙 嗜魂法杖=30点神兵积分，\ 天之屠龙 天之嗜魂法杖 天之逍遥扇=50点神兵积分！\\ 请帮我回收换取神兵积分吧/@请帮我回收换取神兵积分吧算了!我不回收了/@EXIT\\ [@请帮我回收换取神兵积分吧] #IF CheckBagItems \QuestDiary\装备回收\怒斩龙牙.txt 0 S0 #ACT TAKE $STR(S0) 1 CALCVAR HUMAN 神兵积分 + 5 SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt SENDMSG 6 提示：回收$STR(S0)获得了：5点神兵积分。 DELAYGOTO 300 @请帮我回收换取神兵积分吧 #IF CheckBagItems \QuestDiary\装备回收\天之怒斩龙牙.txt 0 S0 #ACT TAKE $STR(S0) 1 CALCVAR HUMAN 神兵积分 + 8 SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt SENDMSG 6 提示：回收$STR(S0)获得了：8点神兵积分。 DELAYGOTO 300 @请帮我回收换取神兵积分吧 #IF CheckBagItems \QuestDiary\装备回收\逍遥霸者.txt 0 S0 #ACT TAKE $STR(S0) 1 CALCVAR HUMAN 神兵积分 + 20 SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt SENDMSG 6 提示：回收$STR(S0)获得了：20点神兵积分。 DELAYGOTO 300 @请帮我回收换取神兵积分吧 #IF CheckBagItems \QuestDiary\装备回收\屠龙嗜魂.txt 0 S0 #ACT TAKE $STR(S0) 1 CALCVAR HUMAN 神兵积分 + 30 SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt SENDMSG 6 提示：回收$STR(S0)获得了：30点神兵积分。 DELAYGOTO 300 @请帮我回收换取神兵积分吧 #IF CheckBagItems \QuestDiary\装备回收\天之武1器.txt 0 S0 #ACT TAKE $STR(S0) 1 CALCVAR HUMAN 神兵积分 + 50 SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt SENDMSG 6 提示：回收$STR(S0)获得了：50点神兵积分。 DELAYGOTO 300 @请帮我回收换取神兵积分吧 BREAK #ELSEACT SENDMSG 6 已完成可回收的武器，你当前神兵积分为；$HUMAN(神兵积分)！ [@我想提取神兵积分] {i=3li=20ih=4id=5x=390y=20}/@exit\ 你要提取多少积分呢？\ 10点神兵积分/@10点神兵积分\ 100点神兵积分/@100点神兵积分\ [@100点神兵积分] #IF CHECKVAR HUMAN 神兵积分 99 #act CALCVAR HUMAN 神兵积分 - 100 SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt give 100点神兵积分 DELAYGOTO 1 @我想提取神兵积分 SENDMSG 6 恭喜你提取：100点神兵积分 #ELSESAY {i=3li=20ih=4id=5x=390y=22}/@exit\ 你没有足够的神兵积分可提取! #ELSEACT break [@10点神兵积分] #IF CHECKVAR HUMAN 神兵积分 9 #act CALCVAR HUMAN 神兵积分 - 10 SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充米积分\神兵积分S呵呵e.txt give 10点神兵积分 DELAYGOTO 1 @我想提取神兵积分 SENDMSG 6 恭喜你提取：10点神兵积分 #ELSESAY {i=3li=20ih=4id=5x=390y=22}/@exit\ 你没有足够的神兵积分可提取! #ELSEACT break