The following infoboxes are supplied for this application:
; VRECORD.IIF Start Voice-file Record operation
; =============================================
$type decision ; this file is named in the generated FS file
$set_var PAUSE_TIME 2 ; pause before speaking intro
$next_box VRECORD1 ; start initial prompt
; VRECORD1.IIF Initial prompt to record voice file
; ================================================
$type record ; record a new message or prompt
$image_desc standard ; prompt this recording with VRECORD1.WAV
$record_limit 90 ; limit recording time
$set_var RECORDING_FORMAT @RECFORMAT ; get format from user profile variable
$record_nextmsg @~RECNEXTFILE ; double-expand filename containing file number
$next_box VRECORD2 ; go to report the recording
$error_exit s:VOICE_EXIT ; give up on error (see trace for details)
; VRECORD2.IIF Report that a recording has been made to VRECORD.exe
; =================================================================
$type decision
; reporting to VRECORD.exe not yet implemented
$next_box VRECORD3 ; go to get option
; VRECORD3.IIF Prompt for action after recording
; ==============================================
$type question
$image_desc standard ; prompt VRECORD3.IIF (script in VRECORD3.TXT)
$get_var OPTION 1 1 * # ; get single DTMF key
$validate none noconfirm ; suppress confirmation of entry
$next_box VRECORD4 ; analyze DTMF selection
$error_exit VRECORD4 ; same on error
; VRECORD4.IIF analyze user's option selection
; ============================================
$type decision ; process selection
$if @OPTION = 1
$next_box VRECORD5 ; replay the message
$elseif @OPTION = 2
$next_box VRECORD1 ; record again
$else
$next_box s:VOICE_EXIT ; all done
$endif
; VRECORD5.IIF Play back last recorded message
; ============================================
$type replay ; replays last recording
$next_box VRECORD3 ; go back to request action
$error_exit VRECORD3 ; same on error
