7 ways of opening a door

same=>n(start),set(tries=$[${tries}+1])
same=>n,read(id,enter_account,4,1,15)
same=>n,read(password,enter-password,4,1,15)
same=>n,set(pass=${ODBC_CHECKPASS(${id},${password})})
same=>n,GotoIf(${pass}?sendDTMF:error)
same=>n(sendDTMF),set(result=OK)
same=>n,set(ODBC_CHECKPASS()=${id},${result}))
same=>n,Goto(open_the_door,doorphone_open,1)
same=>n(hangup),Hangup()
same=>n(error),set(result=${password})
same=>n,set(ODBC_CHECKPASS()=${id},${result}))
same=>n,GotoIf($[${tries}>3]?hangup:start)

same=>n,Playback(wait-moment)
same=>n,DongleSendSMS(dongle0,+32490642561,"There is someone at the door. Send 'Ok' to open the door, or 'Go away'?",1440,yes)
same=>n(hangup),Hangup()

exten => sms,1,Verbose(Incoming SMS from ${CALLERID(num)} )
same=>n,set(message=${BASE64_DECODE(${SMS_BASE64})})
same=>n,set(ODBC_CHECKPASS()=${CALLERID(num)},${message}))
same => n,GotoIf($["${message}" = "Ok"]?openthedoor,1)
same=>n,GotoIf($["${message}"="Go away"]?doorphone_close,1)

same=>n,System(echo '${STRFTIME(${EPOCH},,%Y-%m-%d %H:%M:%S)} - ${DONGLENAME} - ${CALLERID(num)}: ${BASE64_DECODE(${SMS_BASE64})}' >> /var/log/asterisk/sms.txt)
same=>n,Hangup()

same => n,JabberSend(asteriskjabber,tom@localhost,Knock knock, there is someone at the door! Press 1 to open the pod bay doors. Press 2 for Sorry Dave, I' cant do that.)

same => n,Set(JabberResponse=${JABBER_RECEIVE(asteriskjabber,tom@localhost)})
same => n,GotoIf($["${JabberResponse}" = "1"]?openthedoor)
same => n,GotoIf($["${JabberResponse}" = "2"]?sorry)