Mir2000金币建会脚本，比奇国王[建会]

2024-05-07
[@MAIN] #IF CHECKLEVELEX > 0 #ACT SetMerchantDlgImgName xk1.png #SAY <COLOR=clAqua ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~> 　　　　 <COLOR=$00FF92 ≡≡><COLOR=$00FFA3 Ｍ><COLOR=$00FFB4 Ｉ><COLOR=$00FFD6 Ｒ><COLOR=$00FFE7 ２０００><COLOR=$00FFF8 ＊><COLOR=$00E4FF 醉><COLOR=$00D3FF 新><COLOR=$00C2FF 独><COLOR=$00B1FF 家><COLOR=$00A0FF 脚><COLOR=$0079FF 本≡≡> <COLOR=clAqua ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~> <> <COLOR=clLime ┏><COLOR=$00D3FF ━━━━━━━━━━━><COLOR=clLime ┓> <COLOR=clLime ┏><COLOR=$00D3FF ━━━━━━━━━━━><COLOR=clLime ┓> <> ┃ <请求创建行会/@创建行会>·√ ┃ ┃ <申请行会战争/@行会战争>·ㄨ ┃ <> ┣<COLOR=$00B1FF ━━━━━━━━━━━>┫ ┣<COLOR=$00B1FF ━━━━━━━━━━━>┫ <> ┃ <询问如何建立行会/@查询建会> ┃ ┃ <退出行会战争/@退出战争>·¤ ┃ <> <COLOR=clLime ┗><COLOR=$0079FF ━━━━━━━━━━━><COLOR=clLime ┛> <COLOR=clLime ┗><COLOR=$0079FF ━━━━━━━━━━━><COLOR=clLime ┛> <> 攻城说明：新区第三天、全服统一攻城，大部分行会自动参与。 <> 注意事项：创建行会请避免不健康文字，共建和谐网络文明！ [@查询建会] #IF CHECKLEVELEX > 0 #ACT SetMerchantDlgImgName xk1.png #SAY <COLOR=clAqua ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~> 　　　　 <COLOR=$00FF92 ≡≡><COLOR=$00FFA3 Ｍ><COLOR=$00FFB4 Ｉ><COLOR=$00FFD6 Ｒ><COLOR=$00FFE7 ２０００><COLOR=$00FFF8 ＊><COLOR=$00E4FF 醉><COLOR=$00D3FF 新><COLOR=$00C2FF 独><COLOR=$00B1FF 家><COLOR=$00A0FF 脚><COLOR=$0079FF 本≡≡> <COLOR=clAqua ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~> <> 建立行会您应该证明您有资格，须支付一万米宝作为酬劳。 <> 而且要取得位于沃玛寺庙底部深处、沃玛教主所拥有的号角！ <> <返回/@MAIN> [@创建行会] #IF CHECKLEVELEX > 0 #ACT SetMerchantDlgImgName xk1.png #SAY <COLOR=clAqua ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~> 　　　　 <COLOR=$00FF92 ≡≡><COLOR=$00FFA3 Ｍ><COLOR=$00FFB4 Ｉ><COLOR=$00FFD6 Ｒ><COLOR=$00FFE7 ２０００><COLOR=$00FFF8 ＊><COLOR=$00E4FF 醉><COLOR=$00D3FF 新><COLOR=$00C2FF 独><COLOR=$00B1FF 家><COLOR=$00A0FF 脚><COLOR=$0079FF 本≡≡> <COLOR=clAqua ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~> <> 填写您要建立的行会名字，但我需要：沃玛号角+1万米宝的酬劳。 <> <我要建立行会/@建立行会> <> <返回/@MAIN> [@建立行会] #IF H呵呵eGuild #ACT MESSAGEBOX 你有行会就别来趁热闹了！ CLOSE #ELSEACT QUERYVALUE 30 0 20 @建立确认输入你要建立的行会名字： BREAK [@建立确认] #IF CHECKSTRINGLIST ....GuildBaseGuildList.txt <$STR(S30)> #ACT MESSAGEBOX <$STR(S30)>，已被使用，请重新输入。 CLOSE BREAK #IF CHECKITEM 沃玛号角 1 CHECKGAMEGOLD ? 10000 #ACT TAKE 沃玛号角 1 GAMEGOLD - 10000 BREAK GMEXECUTE +行会 <$STR(S30)> <$USERNAME> MESSAGEBOX <$STR(S30)>，行会建立成功！ CLOSE BREAK ;--------------------------------------------------------------------------- ;--------------------------------------------------------------------------- [@行会战争] #IF CHECKLEVELEX > 0 #ACT SetMerchantDlgImgName xk1.png #SAY <COLOR=clAqua ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~> 　　　　 <COLOR=$00FF92 ≡≡><COLOR=$00FFA3 Ｍ><COLOR=$00FFB4 Ｉ><COLOR=$00FFD6 Ｒ><COLOR=$00FFE7 ２０００><COLOR=$00FFF8 ＊><COLOR=$00E4FF 醉><COLOR=$00D3FF 新><COLOR=$00C2FF 独><COLOR=$00B1FF 家><COLOR=$00A0FF 脚><COLOR=$0079FF 本≡≡> <COLOR=clAqua ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~> <> 填写与您交战的敌对行会的名字，申请战争须支付5万米宝。 <> <立即申请行会战争/@建立战争> <> <返回/@MAIN> [@建立战争] #IF IsGuildMaster #ACT QUERYVALUE 30 0 20 @开战确认输入你要开战的行会名字： #ELSEACT MESSAGEBOX 你不是掌门人，不能申请行会战争。 CLOSE BREAK [@开战确认] #IF CHECKGAMEGOLD ? 50000 CHECKSTRINGLIST ....GuildBaseGuildList.txt <$STR(S30)> #ACT GUILDWAR SELF <$STR(S30)> MESSAGEBOX 你的行会正式向：<$STR(S30)>，宣战。 CLOSE BREAK #ELSEACT MESSAGEBOX 条件不足，可能是行会名称不正确，或你元宝不足5万。 BREAK ;--------------------------------------------------------------------------- ;--------------------------------------------------------------------------- [@退出战争] #IF CHECKLEVELEX > 0 #ACT SetMerchantDlgImgName xk1.png #SAY <COLOR=clAqua ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~> 　　　　 <COLOR=$00FF92 ≡≡><COLOR=$00FFA3 Ｍ><COLOR=$00FFB4 Ｉ><COLOR=$00FFD6 Ｒ><COLOR=$00FFE7 ２０００><COLOR=$00FFF8 ＊><COLOR=$00E4FF 醉><COLOR=$00D3FF 新><COLOR=$00C2FF 独><COLOR=$00B1FF 家><COLOR=$00A0FF 脚><COLOR=$0079FF 本≡≡> <COLOR=clAqua ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~> <> 投降是合法与被认可的行为，但请我阻止战争需要10万米宝。 <> <立即停止行会战争/@停止战争> <> <返回/@MAIN> [@停止战争] #IF IsGuildMaster #ACT QUERYVALUE 30 0 20 @停战确认输入你要停战的行会名字： #ELSEACT MESSAGEBOX 你不是掌门人，不能停止行会战争。 CLOSE BREAK [@停战确认] #IF CHECKGAMEGOLD ? 100000 CHECKSTRINGLIST ....GuildBaseGuildList.txt <$STR(S30)> #ACT CANCELGUILDWAR SELF <$STR(S30)> MESSAGEBOX 与：<$STR(S30)>，之间的战争停止。 CLOSE BREAK #ELSEACT MESSAGEBOX 条件不足，可能是行会名称不正确，或你元宝不足10万。 BREAK