;;;QQ:67762207
[@Castle_Execution]
{
#SAY
Guild Management Panel, what would you like to do?\
<Create a Guild/@MakeGuild>\
<Explain Guild Creation/@buildguildexp> \
Guild Match, the endless grudges and team scores\ 
very large-scale war, be here to enter!\
<Join Guild Match/@COMEONWAR>\\
#IF
IsGuildMaster
#SAY
<Change Guild Flag/@UserChangeFlag>\
<Request Guild War/@guildwar>\
#if
#say
<Explain Guild War/@guildwarexp>\
#if
ISADMIN
#SAY
<Admin Start Guild Match/@guildwar>\

[@UserChangeFlag]
#IF
IsGuildMaster
#SAY
To change guild flag it will cost 100,000 gold.\\
<Pay 100,000 gold/@UserChangeFlag_next>
#ELSESAY
Only guild leaders have the right to change the flags\ 
style and color\\
<Close/@exit>

[@UserChangeFlag_next]
#ACT
SendCmd "0,478,367,1" л @TestUserFlag


[@MakeGuild]
#IF
HasGuild
#SAY
You can not create a guild, because you are in a guild.\\
<Close/@exit>
#ACT
break

#IF
!checkgold 1000000
#SAY
Sorry, you dont have enough money and can not create a guild.\\
<Close/@exit>
#ACT
break

#IF
checkitem WoomaHorn 1
checkgold 1000000
#ACT
EnableCmd @@buildguild
break
#SAY
<Please enter the name of the guild you want to create./@@BuildGuild> \\

#IF
#SAY
You do not have a WoomaHorn \\
<Close/@exit>

[@@buildguild]
#IF
#ACT
mov A0 %INPUTSTR
#IF
EQUAL A0 "systemindex"
#ACT
break
#SAY
Guild name is Incorrect.


#IF
checkitem WoomaHorn 1
checkgold 1000000
#ACT
take Gold 1000000
take WoomaHorn 1
BuildGuild @MakeGuildOK
#ELSESAY
You do not have a WoomaHorn\\
<Close/@exit>

[@MakeGuildOK]
#SAY
<$USENAME> is now <$INPUTSTR>'s Guild Leader \\
<Close/@exit>

[@MakeGuildOK~]
#SAY
This NAme is not suitable for a guild name.\\
<Close/@exit>

#ACT
give WoomaHorn 1
give gold 1000000

[@buildguildexp]
#SAY
To create a guild you must meet the following conditions:\
1. Have WoomaHorm.   2. Have 1,000,000 gold.\\
<Close/@exit>

[@guildwar]
#SAY
Enter the name of the guild who you wish to start a war with.\
This costs 30,000,000 gold.\\
<Confirm Guild War/@comfirmGuildWar> \
<Close/@exit>\

[@ComfirmGuildWar]
#IF
checkgold 30000000
#ACT
EnableCmd @@guildwar
#SAY
<Enter the name of guild/@@guildwar>\
#ELSESAY
You do not have enough money.\\
<Close/@exit>

[@@GuildWar]
#IF
checkgold 30000000
IsGuildMaster
#ACT
Mov A8 %INPUTSTR
#ELSEACT
break
#ELSESAY
You do not have enough money.\\
< /@exit>

#IF
Equal A8 %GUILDNAME
#SAY
_Cannot apply for war with your own guild.\\
_<Close/@exit>
#ACT
break

#ELSEACT
GuildWar @GuildMakeWarOK

[@GuildMakeWarOK]
#ACT
take  Gold  30000000
#SAY
<$GUILD> is at war with <$INPUTSTR>.\\
<Close/@exit>

[@GuildMakeWarOK~]
#ACT
#SAY
Errors in guild input name.\
_<Close/@exit>

[@guildwarexp]
#SAY
<Guild Wars/@guildwar2> refer to the lawful conduct of war.\
There are many conflicts between guilds, and only in <circumstances/@warrule> \
are allowed to fight under lawful conduct.\
<Apply/@propose> 1 timelasts for 1 hourwar application fee of 30,000,000.\\
<Close/@exit>

[@guildwar2]
#SAY
Apply for guild wars, guild members of the same name into a blue\
hostile members of the guild's name into a deep red. War, the chat\
window will show a state of war information, to kill members of\ 
rival guild name will not be red. \ \
<Previous/@guildwarexp>

[@warrule]
#SAY
Guild Wars in addition to the shops outside the city within the \
house or other buildings away from the city's places. \ \
<Previous/@guildwarexp>

[@propose]
#SAY
Only guild leaders are eligible to apply for Guild Wars.\\
<Previous/@guildwarexp>

[@COMEONWAR]
#CALL [EventSystem\GuildWar\gmatch.txt] @GmatchMain

}
;;;QQ:67762207