Unnamed

[office-day]
exten => _X.,1,Wait(1)
exten => _X.,2,Answer
exten => _X.,3,zapateller ; torture telemarketers
exten => _X.,4,Goto(hours,s,1)

[hours]
exten => s,1,NoOp
exten => s,2,GotoIfTime(*|*|1|jan?office-holiday,s,1)
exten => s,3,GotoIfTime(*|*|4|jul?office-holiday,s,1)
exten => s,4,GotoIfTime(*|*|25|dec?office-holiday,s,1)
exten => s,5,GotoIfTime(09:00-20:30|mon-fri|*|*?office-open|s|1)
exten => s,6,Goto(office-night,s,1)
exten => *,1,Goto(s,1)

exten => #,1,Background(goodbye)
exten => #,2,Hangup
exten => t,1,Goto(i,1)         ; If they take too long, give up
exten => i,1,Background(pbx-invalid)   ; "That's not valid, try again"
exten => i,2,Wait(1)
exten => i,3,Goto(s,5)

[office-night]
exten => s,1,Background(airstar/intro-night) ; play the intro message
exten => s,2,Background(airstar/weburl) ; one second silence
exten => s,3,NoOp
exten => s,4,NoOp(${FLOWCONTROL})
exten => s,5,Set(TIMEOUT(digit)=15) ; give them 5 seconds between digits
exten => s,6,Set(TIMEOUT(response)=90) ; give them 90 seconds to make a choice
exten => *,1,Goto(s,4)
exten => #,1,Background(goodbye)
exten => #,2,Hangup
exten => t,1,VoiceMail(u${DEFVM})  ; If they take too long, send to vmail
exten => t,2,Hangup
exten => i,1,Background(pbx-invalid)   ; "That's not valid, try again"
exten => i,2,NoOp
exten => i,3,Goto(office-night,s,4)

[office-holiday]
exten => s,1,Background(airstar/holiday)
exten => s,2,Background(airstar/reach)
exten => s,3,Background(airstar/weburl)
exten => s,4,Goto(office-night,s,1)
exten => *,1,Goto(office-night,s,1)
exten => #,1,Background(goodbye)
exten => #,2,Hangup
exten => t,1,VoiceMail(u${DEFVM})  ; If they take too long, send to vmail
exten => t,2,Hangup
exten => i,1,Background(pbx-invalid)   ; "That's not valid, try again"
exten => i,2,Wait(1)
exten => i,3,Goto(office-night,s,1)


[office-open]
exten => s,1,Background(airstar/intro-day)
exten => s,2,Background(airstar/intro-press)
exten => s,3,Background(airstar/reach)
exten => s,4,Background(airstar/weburl)
exten => s,5,Set(TIMEOUT(digit)=10) ; give them 5 seconds between digits
exten => s,6,Set(TIMEOUT(response)=90) ; give them 90 seconds to make a choice
exten => *,1,Goto(s,1)
exten => #,1,Background(goodbye)
exten => #,2,Hangup
exten => t,1,VoiceMail(u${DEFVM})
exten => t,2,Hangup
exten => i,1,Background(pbx-invalid)   ; "That's not valid, try again"
exten => i,2,Wait(1)
exten => i,3,Goto(s,9)