flag_holder_v1.cfg

reset_flags = [
    loop i 2 [
        reset_flagholder (? (> $i 0) "red" "blue")
        reset_flagdrop_time (? (> $i 0) "red" "blue")
    ]
]

reset_flagholder = [ scriptvector v_holder $arg1 -1 ]

reset_flagdrop_time = [ scriptvector v_time $arg1 0 ]

get_flag_color = [
    local player_team flag_color

    player_team = (getclientteam $arg1)
    flag_color = (? (=s $player_team (getteam)) "red" "blue")

    result $flag_color
]

store_flagholder_cn = [
    local flag_color player_name

    flag_color = (get_flag_color $arg1)

    scriptvector v_holder $flag_color $arg1
    reset_flagdrop_time $flag_color
]

store_flagdrope_time = [
    local flag_color

    flag_color = (get_flag_color $arg1)

    scriptvector v_time $flag_color (getlastmillis)
    reset_flagholder $flag_color
]

reset_returned_flag = [
    local flag_color player_team

    player_team = (getclientteam $arg1)
    flag_color = (? (=s $player_team (getteam)) "blue" "red")

    reset_flagholder $flag_color
    reset_flagdrop_time $flag_color
]

scriptevent "flagtake"   "player_cn" [ store_flagholder_cn $player_cn  ]
scriptevent "flagdrop"   "player_cn" [ store_flagdrope_time $player_cn ]
scriptevent "flagreturn" "player_cn" [ reset_returned_flag $player_cn  ]
scriptevent "flagscore"              [ reset_flags ]

//scriptevent "intermission" [ reset_flags ]
scriptevent "mapstart" "modename" [
    if (> (strstr $modename "ctf") -1) [
        reset_flags
    ]
]

scriptevent "connect" [
    scriptvector v_holder
    scriptvector v_time
]

scriptevent "disconnect" [
    delscriptvector v_holder
    delscriptvector v_time
]

scriptevent "scriptinit"   [ echo "^f6Script extension Flag Countdown loaded." ]

count_down = [
    local end_time time_left seconds

    end_time = (+ $arg1 10000)
    time_left = (- $end_time (getlastmillis))

    if (> $time_left 0) [
        seconds = (div $time_left 1000)
    ][
        seconds = 0     // or seconds = $time_left
        reset_flagdrop_time $arg2
    ]
    result $seconds
]

flag_holders_hud = [
    local aux_hud text_color player_cn fsecs
    aux_hud = ""    // maybe is not necesary, :P

    loopscriptvector v_time flag_color droped_time [

        if (> $droped_time 0) [
            fsecs = (count_down $droped_time $flag_color)
            text_color = (? (=s $flag_color "blue") "^f1" "^f3")
            aux_hud = (concatword $aux_hud "^f4" $flag_color " flag return in: " $text_color $fsecs "^f9 sec.")
        ][
            text_color = (? (=s $flag_color "blue") "^f3" "^f1")
            player_cn = (scriptvector v_holder $flag_color)
            aux_hud = (concatword $aux_hud $text_color (? (>= $player_cn 0) (concatword (getclientname $player_cn) "^f4 has the " $flag_color " flag") "--"))
        ]

        aux_hud = (concatword $aux_hud (? (=s $flag_color "blue") "^n"))
    ]

    result $aux_hud
]

gamehud = [ result (? (m_ctf (getmode)) (flag_holders_hud) ) ]