exten => s,1,Set(_IVR_CONTEXT_${CONTEXT}=${IVR_CONTEXT})
same => 2,Set(_IVR_CONTEXT=${CONTEXT})
same => 3,Set(__IVR_RETVM=)
same => 4,GotoIf($["${CHANNEL(state)}" = "Up"]?skip)
same => 5,Answer()
same => 6,Wait(1)
same => 7(skip),Set(IVR_MSG=custom/-_01)
same => 8(start),Set(TIMEOUT(digit)=3)
same => 9,ExecIf($["${IVR_MSG}" != ""]?Background(${IVR_MSG}))
same => 10,WaitExten(5,)

exten => 1,1,Macro(blkvm-clr,)
same => 2,Set(__NODEST=)
same => 3,Set(IVRSELECTION=${EXTEN}|${IVR_CONTEXT})
same => 4,QueueLog(NONE,${UNIQUEID},NONE,INFO,IVRAPPEND|${IVRSELECTION})
same => 5,(ivrsel-1),Goto(from-did-direct,100,1)


exten => 2,1,Macro(blkvm-clr,)
same => 2,Set(__NODEST=)
same => 3,Set(IVRSELECTION=${EXTEN}|${IVR_CONTEXT})
same => 4,QueueLog(NONE,${UNIQUEID},NONE,INFO,IVRAPPEND|${IVRSELECTION})
same => 5,(ivrsel-2),Goto(from-did-direct,501,1)

exten => 3,1,Macro(blkvm-clr,)
same => 2,Set(__NODEST=)
same => 3,Set(IVRSELECTION=${EXTEN}|${IVR_CONTEXT})
same => 4,QueueLog(NONE,${UNIQUEID},NONE,INFO,IVRAPPEND|${IVRSELECTION})
same => 5,(ivrsel-2),Goto(from-did-direct,700,1)


exten => i,1,Goto(from-did-direct,100,1)
exten => t,1,Goto(from-did-direct,100,1)
exten => fax,1,Goto(${CUT(FAX_DEST,^,1)},${CUT(FAX_DEST,^,2)},${CUT(FAX_DEST,^,3)})

exten => return,1, Set(_IVR_CONTEXT=${CONTEXT})
same => 2,Set(_IVR_CONTEXT_${CONTEXT}=${IVR_CONTEXT_${CONTEXT}})
same => 3,Set(IVR_MSG=custom/-_01)
same => 4,Goto(s,start)

exten => hang,1,Playback(vm-goodbye)
same => 2,Hangup()
exten => h,1, Hangup()