     while @_index < i
       runOneStep(@_index)
       @_index++
+
+    @seekControl.val(@_index)
       
     @render()
 

      .val(@_index)
      .attr('min', 0)
      .attr('step', 1)
      .attr('max', (@_funcQueue?.length || 1) - 1)

  _setIndex: (i) ->
    runOneStep = (step) =>
      { name, args } = @_funcQueue[step]
      @exposedFuncs[name](args...)
    prevIndex = @_index
    @seekControl.val(@_index)

    if prevIndex > i
      @loadInitialState()

          @pause()
      @seekControl.on 'mouseup', =>
        if pausedForSeek
          @play()
        pausedForSeek = false
      @seekControl.on 'input', =>
        @_setIndex(parseInt(@seekControl.val(), 10))

