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

天马酷游戏

[@MAIN] #if #act MOV S1 MOV S2 MOV S2 HUMAN 神兵积分 MOV S1 < INC S1 S2 INC S1 /FColor=58> OPENMERCHANTDLG 19|130|1|542|274|0|0|0|1|393|25 #SAY <{i=3;li=20;ih=4;id=5;x=390;y=20}/@exit>\ 　玛法勇士！你有多余的高级神兵吗？只要你能给我这些武器我将\ 　送你大量神兵积分.怒斩 龙牙=5点神兵积分，逍遥扇，霸者之刃\ 　=20点神兵积分。屠龙 嗜魂法杖=30点神兵积分，天之屠龙 天之\ 　嗜魂法杖 天之逍遥扇=50点神兵积分.如果你拥有1000点积分可以\ 　去卧龙后院找我师弟(卧龙老庄主)换取黄金武器一把！\ 　<我想上交武器换取积分/@我想上交武器换取积分><(请保管好贵重物品，如回收一律自负)/FColor=58>\ 　<我想提取神兵积分/@我想提取神兵积分>\ 　<300灵符锻造黄金陨铁/@@InPutInteger2|Title=请输入锻造的黄金陨铁数量（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=3;li=20;ih=4;id=5;x=390;y=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\充值积分\神兵积分Save.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\充值积分\神兵积分Save.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\充值积分\神兵积分Save.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\充值积分\神兵积分Save.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\充值积分\神兵积分Save.txt SENDMSG 6 提示：回收<$STR(S0)>获得了：50点神兵积分。 DELAYGOTO 300 @请帮我回收换取神兵积分吧 BREAK #ELSEACT SENDMSG 6 已完成可回收的武器，你当前神兵积分为；<$HUMAN(神兵积分)>！ [@我想提取神兵积分] <{i=3;li=20;ih=4;id=5;x=390;y=20}/@exit>\ 　你要提取多少积分呢？\ 　<10点神兵积分/@10点神兵积分>\ 　<100点神兵积分/@100点神兵积分>\ [@100点神兵积分] #IF CHECKVAR HUMAN 神兵积分 > 99 #act CALCVAR HUMAN 神兵积分 - 100 SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充值积分\神兵积分Save.txt give 100点神兵积分 DELAYGOTO 1 @我想提取神兵积分 SENDMSG 6 恭喜你提取：100点神兵积分 #ELSESAY <{i=3;li=20;ih=4;id=5;x=390;y=22}/@exit>\ 　你没有足够的神兵积分可提取! #ELSEACT break [@10点神兵积分] #IF CHECKVAR HUMAN 神兵积分 > 9 #act CALCVAR HUMAN 神兵积分 - 10 SAVEVAR HUMAN 神兵积分 ..\QuestDiary\充值积分\神兵积分Save.txt give 10点神兵积分 DELAYGOTO 1 @我想提取神兵积分 SENDMSG 6 恭喜你提取：10点神兵积分 #ELSESAY <{i=3;li=20;ih=4;id=5;x=390;y=22}/@exit>\ 　你没有足够的神兵积分可提取! #ELSEACT break