传奇开区一条龙最新结义系统

[@main] #if CheckOnline <$STR(T60)> #act MOV S$在线 <在线/SCOLOR=242> GetHumVar <$STR(T60)> <$MapTitle> S$地图 GOTO @界面 #elseact MOV S$在线 <不在线/SCOLOR=249> GOTO @界面 [@界面] #IF #ACT OPENMERCHANTBIGDLG 1 288 1 4 0 0 0 0 0 #SAY <ImgEx:1:83:84:85:457:22/@exit>\ \ \ \ \ \ \ 　  <结义要求：/SCOLOR=150><两人必须面对面站一起/SCOLOR=146> <(均未结义)/SCOLOR=251>　<每人只允许结义一位兄弟/SCOLOR=21>\ \ 　  <结义费用：/SCOLOR=150><结义双方各有“血滴子*99个”/SCOLOR=215> (<必须双方都准备充足才可结义 否则请自负/AUTOCOLOR=242,251,249,253>)\ \ 　  <结义奖励：/SCOLOR=150><@允许召唤/SCOLOR=251>　<@召唤兄弟/SCOLOR=251>\ \ 　　　　　　<开始义结金兰|251#需要物品：血滴子*99个,BOOS可爆/@结义>      <割袍断义|251#需要物品：忘情水/@断绝>\ \ 　  <你当前的兄弟是：/SCOLOR=95><$STR(T60)>　　<在线状态：/SCOLOR=215><$STR(S$在线)>　　<当前所在地图：/SCOLOR=146>{<$STR(S$地图)>/SCOLOR=150}\ 　　　　　　<购买血滴子|251#物品爆率：各大BOOS可爆/@购买1>      <购买忘情水|251#物品爆率：各大BOOS可爆/@购买2>\ [@购买2] #IF CHECKGAMEGOLD > 999999 #ACT GAMEGOLD - 1000000 GIVE 忘情水 1 break #elseact MessageBox 失败\\购买1个忘情水需要1000000元宝 break [@购买1] #IF CHECKGAMEDIAMOND > 1 #ACT GAMEDIAMOND - 1 GIVE 血滴子 1 break #elseact MessageBox 失败\\购买1个血滴子需要1RMB点 break [@结义] #IF EQUAL T60 #ELSEACT MessageBox 你已经有兄弟了,要那么多兄弟搞基啊? break #IF CHECKITEM 血滴子 99 #ELSEACT MessageBox 要滴血为证,需要血滴子99个99才能完成结拜仪式做兄弟噢! break #IF CHECKGAMEGIRD > 24999 #ELSEACT MessageBox 需要25000快手币手续费噢! break #IF CHECKPOSEDIR 1 #ACT GETPOSENAME S1 S1.GETPOSENAME S1 #ELSEACT MessageBox 既然结义两人都得到场,而且必须面对面! break #IF S1.EQUAL T60 #ELSEACT S1.MessageBox 已经有兄弟了,要那么多兄弟搞基啊? MessageBox 对方已经有兄弟了,要那么多兄弟搞基啊? break #IF S1.CHECKITEM 血滴子 99 #ELSEACT S1.MessageBox 要滴血为证,需要血滴子99个99才能完成结拜仪式做兄弟噢! MessageBox 对方没有准备血滴子,要滴血为证,需要血滴子99个才能完成结拜仪式做兄弟噢! break #IF #ACT MessageBox 是否确定现在烧掉手中血滴子,和对方结为兄弟？ @确定结义 @取消 [@确定结义] #IF CHECKITEM 血滴子 99 #ACT TAKE 血滴子 99 S1.MessageBox 对方请求与您结义,是否喝下兄弟的血滴子,与对方结为兄弟？ @同意结义 @取消 #SAY 　\ 　\ 　\ 手中血滴子已燃烧,对方收到了您的结义请求\ [@同意结义] #IF CHECKITEM 血滴子 99 #ACT TAKE 血滴子 99 MOV T60 <$STR(S1)> S1.MOV T60 <$STR(S1)> ;GiveFengHao ☆情义天下☆ ;S1.GiveFengHao ☆情义天下☆ SENDMSG 0 <$USERNAME>与<$STR(S1)>结为兄弟,从此肝胆相照,在奇遇记中所向披靡. SETWEATHEREFFECT 3 2 20 0 SCENESHAKE 1 2 SuperMoveMsg 1 251 0 20 100 2 恭喜[{<$USERNAME>|253:0:1}]与[{<$STR(T60)>|253:0:1}]完成桃园结义||从此多了一位好兄弟！ #ELSEACT MessageBox 你没有血滴子! break [@断绝] #IF EQUAL T60 #ACT MessageBox 你都没有兄弟,和谁割袍断义啊？ break #IF CHECKITEM 忘情水 1 #ELSEACT MessageBox 想要和兄弟断绝关系,需要一杯忘情水. break #IF CHECKITEM 忘情水 1 #ACT TAKE 忘情水 1 SuperMoveMsg 1 251 0 20 100 2 [{<$USERNAME>|253:0:1}]与[{<$STR(T60)>|253:0:1}]割袍断义||从此成为陌路人，再无瓜葛！ T60.MOV T60 MOV T60 break [@取消] #act close S1.GOTO @拒绝了 [@拒绝了] 　\ 　\ 　\ 对方拒绝了和你结义,你的血滴子浪费了.