传奇服务端随机捡宝-B011活动脚本

[@MAIN]#IF#SAYImg:194:0:-20:-8\　\　\　\　 　 　百分百拣宝:还等什么!终极装备/SCOLOR=57等你拣...\　\　温馨提示:/SCOLOR=57已全面更新!不会出现掉单现象,请放心拣宝!/SCOLOR=254\　 \　拣宝需要5000元宝,是否启动?/SCOLOR=250\　　　　　　　　　　 Img:195:0:33:-25/@启动拣宝 Img:196:0:33:-25/@返回盟重\[@启动拣宝]#IFCHECKGAMEGOLD 5000#ACTMESSAGEBOX [提示]：你最少要【5000】元宝才可以飞去捡。BREAK#EL新传奇外传私服SEACTGAMEGOLD - 5000MOVR M1 1 39GetRandomText .\QuestDiary\随机拣宝\坐标列表X.txt S1 $STR(M1)GetRandomText .\QuestDiary\随机拣宝\坐标列表Y.txt S2 $STR(M1)ClearItemMap B011 $STR(S1) $STR(S2) 1 *MOV S0 $GLOBAL(INC S0 拣宝物品INC S0 $STR私服发布(M1)INC S0 )ThrowItem B011 $STR(S1) $STR(S2) 1 $STR(S0)奇私服 1MAPMOVE B011 $STR(S1) $STR(S2)GetRandomText .\QuestDiary\随机拣宝\物品列表.t传奇私服开区xt S0ThrowItem B011 $STR(S1) $STR(S2) 1 $STR(S0) 1|600久游传奇00MOV S1 拣宝物品INC S1 $STR(M1)CALCVAR GLOBAL $STR(S1) = $STR(S0)BREAK[@返回盟重]#IF#ACTmapmove 3 333 333BREAK