configs/telcordia-1.adsi

   1 ;
   2 ; Asterisk default ADSI script
   3 ;
   4 ;
   5 ; Begin with the preamble requirements
   6 ;
   7 DESCRIPTION "Telcordia Demo"            ; Name of vendor
   8 VERSION 0x02                            ; Version of stuff
   9 ;SECURITY "_AST"                                ; Security code
  10 SECURITY 0x0000                         ; Security code
  11 FDN 0x0000000f                          ; Descriptor number
  12
  13 ;
  14 ; Predefined strings
  15 ;
  16 DISPLAY "talkingto" IS "Talking To" "$Call1p" WRAP
  17 DISPLAY "titles" IS "20th Century IQ Svc"
  18 DISPLAY "newcall" IS "New Call From" "$Call1p" WRAP
  19 DISPLAY "ringing" IS "Ringing"
  20
  21 ;
  22 ; Begin state definitions
  23 ;
  24 STATE "callup"          ; Call is currently up
  25 STATE "inactive"        ; No active call
  26
  27 ;
  28 ; Begin soft key definitions
  29 ;
  30 KEY "CB_OH" IS "Block" OR "Call Block"
  31         OFFHOOK
  32         VOICEMODE
  33         WAITDIALTONE
  34         SENDDTMF "*60"
  35         SUBSCRIPT "offHook"
  36 ENDKEY
  37
  38 KEY "CB" IS "Block" OR "Call Block"
  39         SENDDTMF "*60"
  40 ENDKEY
  41
  42 ;
  43 ; Begin main subroutine
  44 ;
  45
  46 SUB "main" IS
  47         IFEVENT NEARANSWER THEN
  48                 CLEAR
  49                 SHOWDISPLAY "talkingto" AT 1
  50                 GOTO "stableCall"
  51         ENDIF
  52         IFEVENT OFFHOOK THEN
  53                 CLEAR
  54                 SHOWDISPLAY "titles" AT 1
  55                 SHOWKEYS "CB"
  56                 GOTO "offHook"
  57         ENDIF
  58         IFEVENT IDLE THEN
  59                 CLEAR
  60                 SHOWDISPLAY "titles" AT 1
  61                 SHOWKEYS "CB_OH"
  62         ENDIF
  63         IFEVENT CALLERID THEN
  64                 CLEAR
  65                 SHOWDISPLAY "newcall" AT 1
  66         ENDIF
  67 ENDSUB
  68
  69 SUB "offHook" IS
  70         IFEVENT FARRING THEN
  71                 CLEAR
  72                 SHOWDISPLAY "ringing" AT 1
  73         ENDIF
  74         IFEVENT FARANSWER THEN
  75                 CLEAR
  76                 SHOWDISPLAY "talkingto" AT 1
  77                 GOTO "stableCall"
  78         ENDIF
  79 ENDSUB
  80
  81 SUB "stableCall" IS
  82
  83 ENDSUB