>

[@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 @拒绝了


[@拒绝了]
　\
　\
　\
对方拒绝了和你结义,你的血滴子浪费了.