class TestItController < ApplicationController
  def index_scatterline
    @graph = open_flash_chart_object(600,300,"/test_it/graph_code_scatterline")
  end

  def graph_code_scatterline
    # based on this example - http://teethgrinder.co.uk/open-flash-chart-2/scatter-line-chart.php
    #$chart = new open_flash_chart();
    chart =OpenFlashChart.new
    #$title = new title( date("D M d Y") );
    title = Title.new(Date.today.to_s)
    #$chart->set_title( $title );
    chart.set_title(title)
    #$s = new scatter_line( '#FFD600', 3 );
    scatter_line = ScatterLine.new( '#FFD600', 3 )
    #$v = array();
    v = Array.new
    #$x = 0.0;
    x = 0
    #$y = 0;
    y = 0
    #do
    while x < 25 
      #  $v[] = new scatter_value( $x, $y );
      v.push(ScatterValue.new(x,y))
      #    // move up or down in Y axis:
      #    $y += rand(-20, 20)/10;
      y += (-1+2*rand)*2
      #    if( $y > 10 )
      #        $y = 10;
      if y>10
        y=10
      end
      #    if( $y < -10 )
      #        $y = -10;
      if y<-10
        y=-10
      end
      #    $x += rand(5, 15)/10;
      x += (5+10*rand)/10
      #while( $x < 25 );
    end
    #$s->set_values( $v );
    scatter_line.set_values(v)
    #$chart->add_element( $s );
    chart.add_element(scatter_line)
    #$x = new x_axis();
    x_axis = XAxis.new
    #$x->set_range( 0, 25 );
    x_axis.set_range(0,25)
    #$chart->set_x_axis( $x );
    chart.x_axis = x_axis
    #$y = new x_axis();
    y_axis = YAxis.new
    #$y->set_range( -10, 10 );
    y_axis.set_range( -10, 10 )
    #$chart->add_y_axis( $y );
    chart.y_axis = y_axis
    #echo $chart->toPrettyString();
    render :text => chart.to_s
  end
end

<script type="text/javascript" src="/javascripts/swfobject.js"></script>
<%= @graph %>