exten => s,1,set(__COUNT=1)
exten => s,2,set(__WINNERS=0)
exten => s,3,while($[${WINNERS} < 1])                        ;while we dont have a winner...
exten => s,4,goto(Brad,1)              ;go to an extension based on roommate name below

        exten => Brad,1,random(1:s,6)                         ;jump to the end if we have a winner
        exten => Brad,2,set(__COUNT=$[${COUNT}+1])                           ;if not incrementthe count
        exten => Brad,3,noop(The Count is ${COUNT})                        ;whats the count
        exten => Brad,4,goto(s,3)                                          ;and try again

exten => s,5,endwhile

exten => s,6,noop(success)
exten => s,7,hangup





    -- Executing Random("SIP/Brian-d4ec", "1:s|6") in new stack
    -- Executing Set("SIP/Brian-d4ec", "__COUNT=1902") in new stack
    -- Executing NoOp("SIP/Brian-d4ec", "The Count is 1902") in new stack
    -- Executing Goto("SIP/Brian-d4ec", "s|3") in new stack
    -- Goto (gototest,s,3)
    -- Executing While("SIP/Brian-d4ec", "1") in new stack
(AND IT NEVER ENDS)