| 6 | | exten => s,2,Flite("Welcome to the Vox Forge automated reecording system!") |
|---|
| 7 | | exten => s,3,Goto(custom-voxforge-license|s|1) |
|---|
| | 6 | exten => s,2,Set(ran-instructions=0) |
|---|
| | 7 | exten => s,3,Flite("Welcome to the Vox Forge automated reecording system!") |
|---|
| | 8 | exten => s,4,Goto(custom-voxforge-license|s|1) |
|---|
| 322 | | exten => 2,2,System(mv ${RECORDED_FILE}.wav ${session-dir}/rec-${last-prompt-priority}.wav) |
|---|
| 323 | | exten => 2,3,System(grep -R --no-filename ${last-prompt-name} /voxforge-code/prompts/ >> ${session-dir}/prompts) |
|---|
| 324 | | exten => 2,4,Set(num-complete=$[${num-complete} + 1]) |
|---|
| 325 | | exten => 2,5,Goto(50|$[${last-prompt-priority} + 1]) |
|---|
| | 325 | exten => 2,2,Gosub(sub-voxforge-get-next|s|1) |
|---|
| 329 | | exten => 3,4,Goto(2|1) |
|---|
| 330 | | exten => 10,1,Flite('Do they sound the same? Is your reecording free of laugh ing.... Cough ing.... Stutter ing.... Mispronunciations.... And background noise? Press 1 to try again. Press 2 to continue. Press 3 to hear your reecording again.'|123) |
|---|
| | 329 | exten => 3,20,Goto(2|1) |
|---|
| | 330 | exten => 4,1,Flite('OK, skipping this prompt and try ing the next one...') |
|---|
| | 331 | exten => 4,2,System(rm ${RECORDED_FILE}.wav) |
|---|
| | 332 | exten => 4,3,Gosub(sub-voxforge-do-next|s|1) |
|---|
| | 333 | exten => 10,1,Flite('Do they sound the same? Is your reecording free of laugh ing.... Cough ing.... Stutter ing.... Mispronunciations.... And background noise? Press 1 to try again. Press 2 to continue. Press 3 to hear your reecording again. Press 4 if the prompt is unclear and you would like to try a different reecording.'|1234) |
|---|
| 378 | | exten => s,1,Flite('Congratulations! You have completed ${num-complete} phrases.') |
|---|
| 379 | | exten => s,2,Flite('We appreciate your contribution. Please complete 5 more.') |
|---|
| 380 | | exten => s,3,Flite('Press 1 to complete 5 more. Or Press 9 to hang up.'|12) |
|---|
| 381 | | exten => 1,1,Goto(custom-voxforge-selectscript|s|1) |
|---|
| | 381 | exten => s,1,Set(num-complete-this-round=0) |
|---|
| | 382 | exten => s,2,Flite('Congratulations! You have completed ${num-complete} phrases.') |
|---|
| | 383 | exten => s,3,Flite('We appreciate your contribution. Please. Take a moment to complete 5 more.') |
|---|
| | 384 | exten => s,4,Flite('Press 1 to complete 5 more. Or Press 9 to hang up.'|12) |
|---|
| | 385 | exten => 1,1,Gosub(sub-voxforge-do-next|s|1) |
|---|
| 385 | | exten => 9,4,Macro(voxforge-autosubmit) |
|---|
| 386 | | exten => i,1,Flite('Sorry, that is not a valid choice.'|1234567890) |
|---|
| 387 | | exten => i,2,Goto(s|1) |
|---|
| 388 | | exten => h,1,Macro(voxforge-autosubmit) |
|---|
| | 389 | exten => 9,4,Gosub(sub-voxforge-autosubmit|s|1) |
|---|
| | 390 | exten => i,1,Flite('Sorry, that is not a valid choice.'|1234567890) |
|---|
| | 391 | exten => i,2,Goto(s|1) |
|---|
| | 392 | exten => h,1,Gosub(sub-voxforge-autosubmit|s|1) |
|---|
| | 393 | |
|---|
| | 394 | [sub-voxforge-get-next] |
|---|
| | 395 | exten => s,1,System(mv ${RECORDED_FILE}.wav ${session-dir}/${last-prompt-name}.wav) |
|---|
| | 396 | exten => s,2,System(grep -R --exclude \'*.svn*\' --no-filename ${last-prompt-name} /voxforge-code/prompts/ >> ${session-dir}/prompts) |
|---|
| | 397 | exten => s,3,Set(num-complete=$[${num-complete} + 1]) |
|---|
| | 398 | exten => s,4,Set(num-complete-this-round=$[${num-complete-this-round} + 1]) |
|---|
| | 399 | exten => s,5,GotoIf($[${num-complete-this-round} < 5]?20) |
|---|
| | 400 | exten => s,6,Gosub(sub-voxforge-phoneme-finished|s|1) |
|---|
| | 401 | exten => s,20,Gosub(sub-voxforge-do-next|s|1) |
|---|
| | 402 | |
|---|
| | 403 | [sub-voxforge-do-next] |
|---|
| | 404 | exten => s,1,GotoIf($[${last-prompt-priority} < 5]?2:3) |
|---|
| | 405 | exten => s,2,Goto(${last-prompt-context}|50|$[${last-prompt-priority} + 1]) |
|---|
| | 406 | exten => s,3,Goto(custom-voxforge-selectscript|s|1) |
|---|
| | 407 | |
|---|
| 407 | | exten => s,1,Flite('OK, this is how it works: I will reed a phrase to you. Then you will hear a beep.') |
|---|
| 408 | | exten => s,2,Flite('After the beep, please wait for 1 second.') |
|---|
| 409 | | exten => s,3,Flite('Then you say out loud the phrase you just herd.') |
|---|
| 410 | | exten => s,4,Flite('Wait another second and then press the pound key.') |
|---|
| 411 | | exten => s,5,Flite('Some phrases sound silly. Or strange.') |
|---|
| 412 | | exten => s,6,Flite('Please avoid Laugh ing... Cough ing... Stutter ing.... Mispronunciations.... And background noise.') |
|---|
| 413 | | exten => s,7,Flite('If any of these things happen. Please go back and reecord the phrase again.') |
|---|
| 414 | | exten => s,8,Return() |
|---|
| | 426 | exten => s, 1,GotoIf($[${ran-instructions} = 1]?2:3) |
|---|
| | 427 | exten => s, 2,Return() |
|---|
| | 428 | exten => s, 3,Flite('OK, this is how it works: I will reed a phrase to you. Then you will hear a beep.') |
|---|
| | 429 | exten => s, 4,Flite('After the beep, please wait for 1 second.') |
|---|
| | 430 | exten => s, 5,Flite('Then you say out loud the phrase you just herd.') |
|---|
| | 431 | exten => s, 6,Flite('Wait another second and then press the pound key.') |
|---|
| | 432 | exten => s, 7,Flite('Some phrases sound silly. Or strange.') |
|---|
| | 433 | exten => s, 8,Flite('Please avoid Laugh ing... Cough ing... Stutter ing.... Mispronunciations.... And background noise.') |
|---|
| | 434 | exten => s, 9,Flite('If any of these things happen. Please go back and reecord the phrase again.') |
|---|
| | 435 | exten => s,10,Return() |
|---|