Exit Dialog

[risker]

function vt takes nothing returns nothing
    if (ZS()) then
        set pJ = false
        set Dj = true
        set fj = WQ(Condition(function WS))
        if (zS()) then
            set Zc = GetTriggerPlayer()
            call DialogClear(Fj)
            call DialogSetMessage(Fj, "Choose an enemy")
            call ForForce(fj, function YS)
            call DialogDisplayBJ(true, Fj, GetTriggerPlayer())
            call DestroyForce(fj)
        else
            call DisplayTextToForce(WQ(Condition(function yS)), "|cffff0000Do not have enough players to have a duel..|r")
            call DestroyForce(fj)
            set Dj = false
        endif
    else
        call DisplayTextToForce(WQ(Condition(function tS)), "|cffff0000Error: A duel is already 'in progress'.|r")
    endif
endfunction

I want to able to have a "cancel" button.