| 1 | # -*-Mode:Tcl-*- |
|---|
| 2 | # This file is automatically generated by WaveSurfer |
|---|
| 3 | |
|---|
| 4 | $widget configure -background "#d9d9d9" |
|---|
| 5 | $widget configure -foreground "Black" |
|---|
| 6 | $widget configure -troughcolor "#c3c3c3" |
|---|
| 7 | $widget configure -cursorcolor "red" |
|---|
| 8 | $widget configure -wavebarheight "25" |
|---|
| 9 | $widget configure -pixelspersecond "400.0" |
|---|
| 10 | $widget configure -playmapfilter "1" |
|---|
| 11 | |
|---|
| 12 | set pane [$widget addPane -maxheight 20 -minheight 20] |
|---|
| 13 | $pane configure -height {20} |
|---|
| 14 | $pane configure -scrollheight {20} |
|---|
| 15 | $pane configure -background {white} |
|---|
| 16 | $pane configure -yaxisfont {Helvetica 10} |
|---|
| 17 | |
|---|
| 18 | if {[wsurf::PluginEnabled transcription_format_htk]} { |
|---|
| 19 | set ::wsurf::transcription_format_htk::${pane}::var(matchComponents) 1 |
|---|
| 20 | set ::wsurf::transcription_format_htk::${pane}::var(level) 1 |
|---|
| 21 | set ::wsurf::transcription_format_htk::${pane}::var(mlf) "" |
|---|
| 22 | set ::wsurf::transcription_format_htk::${pane}::var(hideQuotes) 1 |
|---|
| 23 | set ::wsurf::transcription_format_htk::${pane}::var(alternative) 1 |
|---|
| 24 | } |
|---|
| 25 | |
|---|
| 26 | if {[wsurf::PluginEnabled transcription]} { |
|---|
| 27 | $widget trans::addTranscription $pane -alignment e -format "WaveSurfer" -extension ".lab" -labelcolor black -boundarycolor black -backgroundcolor white -labeldirectory "" -fileencoding "" -labelmenuevent Shift-ButtonPress-3 -adjustleftevent Control-l -adjustrightevent Control-r -playlabelevent Control-space -locked 0 -quickenter 1 -quickentertolerance 20 -extendboundaries 0 -linkboundaries 0 -playhighlight 0 -font {Courier 10} -labelmenu { |
|---|
| 28 | 2 7 |
|---|
| 29 | lab1 lab2 |
|---|
| 30 | lab3 lab4 |
|---|
| 31 | lab5 lab6 |
|---|
| 32 | lab7 lab8 |
|---|
| 33 | {} {} |
|---|
| 34 | {} {} |
|---|
| 35 | {} {} |
|---|
| 36 | } |
|---|
| 37 | } |
|---|
| 38 | |
|---|
| 39 | set pane [$widget addPane -maxheight 2048 -minheight 10] |
|---|
| 40 | $pane configure -background {#d9d9d9} |
|---|
| 41 | $pane configure -yaxisfont {Helvetica 10} |
|---|
| 42 | |
|---|
| 43 | if {[wsurf::PluginEnabled analysis]} { |
|---|
| 44 | $widget analysis::addWaveform $pane -channel all -predraw 0 -limit -1 -sectfftlength 512 -sectwintype Hamming -sectanalysistype FFT -sectlpcorder 20 -sectpreemphasis 0.0 -sectreference -110.0 -sectrange 110.0 -sectdoall 0 -sectexportheader 0 -subsample 1 -trimstart 1 -scrollspeed 250 -fill black |
|---|
| 45 | } |
|---|
| 46 | |
|---|
