;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

[@Defence_SubFlag]
{

#SAY
{FCOLOR/10} SabukWall Owners {FCOLOR/12}\\
{FCOLOR/1}<$CS_SABUK_OWNER>{FCOLOR/12}'s Flag\\
}


[@Defence_MainFlag]
{
#IF
IsOnCastleWar [SABUK]
IsAttackGuild [SABUK]
IsGuildMaster
CheckLevel 40
!IsCastleGuild [SABUK]
!IsCastleGuild [TAOSUNG]
#ACT
ReadValueSql "TBL_CastleFlagDef" "FLD_CASTLENAME='SABUK'" "FLD_FLAGSTATUS" @Defence_MainFlag_Check
break

#IF
IsOnCastleWar [SABUK]
IsDefenseGuild [SABUK]
IsGuildMaster
CheckLevel 40
!IsCastleGuild [SABUK]
!IsCastleGuild [TAOSUNG]
#ACT
ReadValueSql "TBL_CastleFlagDef" "FLD_CASTLENAME='SABUK'" "FLD_FLAGSTATUS" @Defence_MainFlag_Check
break

#IF
#SAY
{FCOLOR/10} SabukWall Owners {FCOLOR/12}\\
{FCOLOR/1}<$CS_SABUK_OWNER>{FCOLOR/12}'s Flag\\

[@Defence_MainFlag_Check()]
#IF
#ACT
mov A8 %ARG(1)

#IF
Equal A8 "Ready"
IsOnCastleWar [SABUK]
IsAttackGuild [SABUK]
IsGuildMaster
!IsCastleGuild [SABUK]
!IsCastleGuild [TAOSUNG]
CheckPos 3 205 118 0
#ACT
goto @RecusiveTimeRootin
break

#IF
Equal A8 "Ready"
IsOnCastleWar [SABUK]
IsAttackGuild [SABUK]
IsGuildMaster
!IsCastleGuild [SABUK]
!IsCastleGuild [TAOSUNG]
CheckPos 3 206 118 0
#ACT
goto @RecusiveTimeRootin
break

#IF
Equal A8 "Ready"
IsOnCastleWar [SABUK]
IsDefenseGuild [SABUK]
IsGuildMaster
!IsCastleGuild [SABUK]
!IsCastleGuild [TAOSUNG]
CheckPos 3 205 118 0
#ACT
goto @RecusiveTimeRootin
break

#IF
Equal A8 "Ready"
IsOnCastleWar [SABUK]
IsDefenseGuild [SABUK]
IsGuildMaster
!IsCastleGuild [SABUK]
!IsCastleGuild [TAOSUNG]
CheckPos 3 206 118 0
#ACT
goto @RecusiveTimeRootin
break

#IF
Equal A8 "Confuse"
IsOnCastleWar [SABUK]
IsGuildMaster
!IsCastleGuild [SABUK]
#SAY
You cannot capture the flag at the moment\\
#ACT
break

#IF
#SAY
{FCOLOR/10} SabukWall Owners {FCOLOR/12}\\
{FCOLOR/1}<$CS_SABUK_OWNER>{FCOLOR/12}'s Flag\\

[@RecusiveTimeRootin]
#IF
#SAY
You have captured the Flag!!!!!\\
#ACT
CAPTURECASTLEFLAG [SABUK]
UpdateValueSql "TBL_CastleFlagDef" "FLD_CASTLENAME='SABUK'" "FLD_FLAGSTATUS='Confuse'"
mov D0 0
SENDCMD "3, 0, 0, 1000" SabuKFlag "@_Startup"
linemsg "3" "'<$GUILD>' has captured SabukWall!"
linemsg "3" "You cannot Capture the Flag for 3 minutes!"
goto @RecusiveTimeRootin_next_10
;goto @RecusiveTimeRootin_next

[@RecusiveTimeRootin_next]
#IF
IsOnCastleWar [SABUK]
#ACT
Speak "Flag Preperation 0%"
Delaygoto [Grobal] 18 @RecusiveTimeRootin_next_1

[@RecusiveTimeRootin_next_1]
#IF
IsOnCastleWar [SABUK]
#ACT
Speak "Flag Preperation 10%"
Delaygoto [Grobal] 18 @RecusiveTimeRootin_next_2

[@RecusiveTimeRootin_next_2]
#IF
IsOnCastleWar [SABUK]
#ACT
Speak "Flag Preperation 20%"
Delaygoto [Grobal] 18 @RecusiveTimeRootin_next_3

[@RecusiveTimeRootin_next_3]
#IF
IsOnCastleWar [SABUK]
#ACT
Speak "Flag Preperation 30%"
Delaygoto [Grobal] 18 @RecusiveTimeRootin_next_4

[@RecusiveTimeRootin_next_4]
#IF
IsOnCastleWar [SABUK]
#ACT
Speak "Flag Preperation 40%"
Delaygoto [Grobal] 18 @RecusiveTimeRootin_next_5

[@RecusiveTimeRootin_next_5]
#IF
IsOnCastleWar [SABUK]
#ACT
Speak "Flag Preperation 50%"
Delaygoto [Grobal] 18 @RecusiveTimeRootin_next_6

[@RecusiveTimeRootin_next_6]
#IF
IsOnCastleWar [SABUK]
#ACT
Speak "Flag Preperation 60%"
Delaygoto [Grobal] 18 @RecusiveTimeRootin_next_7

[@RecusiveTimeRootin_next_7]
#IF
IsOnCastleWar [SABUK]
#ACT
Speak "Flag Preperation 70%"
Delaygoto [Grobal] 18 @RecusiveTimeRootin_next_8

[@RecusiveTimeRootin_next_8]
#IF
IsOnCastleWar [SABUK]
#ACT
Speak "Flag Preperation 80%"
Delaygoto [Grobal] 18 @RecusiveTimeRootin_next_9

[@RecusiveTimeRootin_next_9]
#IF
IsOnCastleWar [SABUK]
#ACT
Speak "Flag Preperation 90%"
Delaygoto [Grobal] 18 @RecusiveTimeRootin_next_10

[@RecusiveTimeRootin_next_10]
#IF
IsOnCastleWar [SABUK]
#ACT
Speak "Flag Preperation 100%"
UpdateValueSql "TBL_CastleFlagDef" "FLD_CASTLENAME='SABUK'" "FLD_FLAGSTATUS='Ready'"
LineMsg "3" "You can now capture the Flag!!"
Eventmsg Grobal "<$CS_SABUK_OWNER> Has taken Sabuk Wall!!!" 10003 
break
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;