rchart 1.2.2 → 2.0.1

data/lib/rchart_helper.rb

@@ -0,0 +1,265 @@
+
+module RchartHelper
+
+  # Set font Properties font_name,font_size
+  # font_name is
+  # * GeosansLight.ttf,
+  # * MankSans.ttf,
+  # * pf_arma_five.ttf,
+  # * Silkscreen.ttf,
+  # * tahoma.ttf
+  def set_font_properties(font_name, font_size)
+    @font_size = font_size
+    @font_name = "#{Rchart::FONT_PATH}/#{font_name}"
+  end
+
+  def validate_color(b, g, r)
+    r = 0    if ( r < 0 )
+    r = 255  if ( r > 255 )
+    g = 0    if ( g < 0 )
+    g = 255  if ( g > 255 )
+    b = 0    if ( b < 0 )
+    b = 255  if ( b > 255 )
+    return b, g, r
+  end
+  #color Helper
+  def allocate_color(picture,r,g,b,factor=0)
+    r = r + factor
+    g = g + factor
+    b = b + factor
+    b,g,r= validate_color(b,g,r)
+    image_color_allocate(picture,r,g,b)
+  end
+
+#Use this function to set shadow properties.
+  def set_shadow_properties(x_distance=1,y_distance=1,r=60,g=60,b=60,alpha=50,blur=0)
+    @shadow_active    = true
+    @shadow_x_distance = x_distance
+    @shadow_y_distance = y_distance
+    @shadow_r_color    = r
+    @shadow_g_color    = g
+    @shadow_b_color    = b
+    @shadow_alpha     = alpha
+    @shadow_blur      = blur
+  end
+
+  # Use this function to deactivate the shadow options.
+  # Drawing shadows is time and CPU intensive.
+  def clear_shadow
+    @shadow_active = false
+  end
+
+
+  # This function allow you to customise the way lines are drawn in charts.
+  # This function only applies during chart drawing calls ( line charts,.. ).
+  # You can specify the width of the lines & if they are dotted.
+  def set_line_style(width=1,dot_size=0)
+    @line_width = width
+    @line_dot_size = dot_size
+  end
+
+  # Set currency symbol
+  def set_currency(currency)
+    @currency = currency
+  end
+  # This function allows you to merge an external PNG picture with your graph specifying the position and the transparency
+  def draw_from_png(file_name,x,y,alpha=100)
+    draw_from_picture(1,file_name,x,y,alpha)
+  end
+
+  #This function allows you to merge an external GIF picture with your graph specifying the position and the transparenc
+  #def draw_from_gif(file_name,x,y,alpha=100)
+  #self.draw_from_picture(2,file_name,x,y,alpha)
+  #end
+
+  # This function allows you to merge an external JPG picture with your graph specifying the position and the transparency.
+  def draw_from_jpg(file_name,x,y,alpha=100)
+    draw_from_picture(3,file_name,x,y,alpha)
+  end
+
+  # Generic loader function for external pictures accepts png format
+  def draw_from_picture(pic_type,file_name,x,y,alpha=100)
+    if ( File.exist?(file_name))
+      raster = image_create_from_png(file_name) if ( pic_type == 1 )
+      # raster = image_create_from_gif(file_name) if ( pic_type == 2 )
+      raster = image_create_from_jpeg(file_name) if ( pic_type == 3 )
+      infos  = get_image_size(raster)
+      width  = infos[0]
+      height = infos[1]
+      image_copy_merge(raster,@picture,x,y,0,0,width,height,alpha)
+      image_destroy(raster)
+    end
+  end
+
+
+# Validate data contained in the description array  Internal function
+  def validate_data_description(function_name,data_description,description_required=true)
+    if (data_description["position"].nil?)
+      @errors  << "[Warning] #{function_name} - Y Labels are not set."
+      data_description["position"] = "name"
+    end
+
+    if (description_required)
+      if ((data_description["description"].nil?))
+        @errors  << "[Warning] #{function_name} - Series descriptions are not set."
+        data_description["values"].each do |value|
+          if data_description["description"].nil?
+            data_description["description"]={value=> value}
+          else
+            data_description["description"]=data_description["description"].merge(value=>value)
+          end
+        end
+      end
+
+      data_desc_count = data_description["values"].is_a?(Array) ? data_description["values"].count : 1
+      if ((data_description["description"].count) < data_desc_count)
+        @errors << "[Warning] #{function_name} - Some series descriptions are not set."
+        data_description["values"].each do |value|
+          data_description["description"][value] = value  if ( data_description["description"][value].nil?)
+        end
+      end
+    end
+    return data_description
+  end
+  #Validate data contained in the data array Internal function
+  def validate_data(function_name,data)
+    data_summary = {}
+    data.each do |v|
+      v.each do |key,val|
+
+        if (data_summary[key].nil?)
+          data_summary[key] = 1
+        else
+          data_summary[key] = data_summary[key]+1
+        end
+      end
+    end
+    if ( data_summary.max.last == 0 ) #TODO Check method
+      @errors << "[Warning]  #{function_name} No data set."
+    end
+    data_summary.each do |k,v|
+      if v < data_summary.max.last
+        @errors << "#{function_name} Missing Data in serie #{key}"
+      end
+    end
+    return data
+  end
+  #Convert seconds to a time format string
+  def to_time(value)
+    hour   = (value/3600).floor
+    minute = ((value - hour*3600)/60).floor
+    second =(value - hour*3600 - minute*60).floor
+
+    hour = "0.#{Hour}"  if (hour.length == 1 )
+    minute = "0.#{minute}"    if (minute.length == 1 )
+    second = "0.#{second}"  if (second.length == 1 )
+
+    return ("#{hour}.:.#{minute}}.:.#{second}")
+  end
+
+  # Convert to metric system */
+  def to_metric(value)
+    go = (value/1000000000).floor
+    mo = ((value - go*1000000000)/1000000).floor
+    ko = ((value - go*1000000000 - mo*1000000)/1000).floor
+    o  = (value - go*1000000000 - mo*1000000 - ko*1000).floor
+
+    return("#{go}..#{mo}.g")   if (go != 0)
+    return("#{mo}...#{ko}.m")   if (mo != 0)
+    return("#{ko}...#{o}).k")   if (ko != 0)
+    return o
+  end
+
+# Convert to curency
+  def to_currency(value)
+    go = (value/1000000000).floor
+    mo = ((value - go*1000000000)/1000000).floor
+    ko = ((value - go*1000000000 - mo*1000000)/1000).floor
+    o  = (value - go*1000000000 - mo*1000000 - ko*1000).floor
+
+    o = "00.#{o}"  if ( (o.length) == 1 )
+    o = "0.#{o}"   if ( (o.length) == 2 )
+
+    result_string = o
+    result_string = "#{ko}...#{result_string}"   if ( ko != 0 )
+    result_string = "#{mo}...#{result_string}"   if ( mo != 0 )
+    result_string = "#{go}...#{result_string}"   if ( go != 0 )
+
+    result_string = @currency.result_string
+    result_string
+  end
+  # Set date format for axis labels TODO
+  def set_date_format(format)
+    @date_format = format
+  end
+
+  def to_date(value)
+    #return(Time.parse(value))
+  end
+  #	Check if a number is a full integer (for scaling)
+  def is_real_int(value)
+    value.ceil == value.floor
+  end
+  # round of particular decimal
+  def round_of(no,n=0)
+    (no * (10.0 ** n)).round * (10.0 ** (-n))
+  end
+
+  #convert degree to radian
+  def deg2rad(deg)
+    deg*Math::PI/180
+  end
+
+  def raise_fatal(message)
+    puts "[FATAL] "+message
+    return -1
+  end
+  # Print all error messages on the CLI or graphically
+  def print_errors(mode="cli")
+    return(0) if (@errors.count == 0)
+
+    if mode == "cli"
+      @errors.each do |value|
+        puts value
+      end
+    elsif ( mode == "gd" )
+      set_line_style(width=1)
+      max_width = 0
+      @errors.each do |value|
+        position  = image_ftb_box(@error_font_size,0,@error_font_name,value)
+        text_width = position[2]-position[0]
+        max_width = text_width if ( text_width > max_width )
+      end
+      draw_filled_rounded_rectangle(@x_size-(max_width+20),@y_size-(20+((@error_font_size+4)*(@errors.count))),@x_size-10,@y_size-10,6,233,185,185)
+      draw_rounded_rectangle(@x_size-(max_width+20),@y_size-(20+((@error_font_size+4)*(@errors.count))),@x_size-10,@y_size-10,6,193,145,145)
+      c_text_color = allocate_color(@picture,133,85,85)
+      ypos        = @y_size - (18 + ((@errors.count)-1) * (@error_font_size + 4))
+      @errors.each do |value|
+        image_ttf_text(@picture,@error_font_size,0,@x_size-(max_width+15),ypos,c_text_color,@error_font_name,value)
+        ypos = ypos + (@error_font_size + 4)
+      end
+    end
+  end
+  
+  # resize image on passing png,jpeg,or gd image
+  # pass file_name/gd image,new_file_name,percentage,or resize width,resize height
+  def resize_image(file_name,resize_file_name="test",resized_width=0,resized_height=0,render_file_as="png")
+    image = Image.import(file_name)
+    resize_image = image.resize(resized_width, resized_height,true)
+
+    file=File.new(resize_file_name,"wb")
+    if render_file_as == "png"
+      file.write resize_image.png
+    elsif	 render_file_as == "jpeg"
+      file.write resize_image.jpeg
+    elsif	 render_file_as == "gd"
+      file.write resize_image.gd
+    elsif	 render_file_as == "gd2"
+      file.write resize_image.gd2
+    else
+      puts "Provide proper image"
+    end
+    file.close
+  end
+
+end

data/lib/rdata.rb

@@ -1,7 +1,9 @@
+require 'rubygems'
+
 class Rdata
 # This function create a new Rdata object.
 # This object will be used during all the steps of the data population.
-# Data will be extracted from this object using get_data and get_data_description 
+# Data will be extracted from this object using get_data and get_data_description
 	def initialize
 		@data                          = []
 		@data_description              = {}
@@ -36,7 +38,7 @@ class Rdata
 				@data[id]= @data[id].merge(serie => value)
 			end
 			if description != ""
-				@data[id]["name"] = description;
+				@data[id]["name"] = description
 			elsif @data[id]["name"].nil?
 				@data[id]["name"] = id
 			end
@@ -85,9 +87,9 @@ class Rdata
 	# Generate some data...
 	# * chart_data.add_point([2,4,9,5,1,0],"Serie1")
 	# * chart_data.add_point([(1,1,2,2,3,3],"Serie2")
-	# This will mark both Serie1 & Serie2 as "graphable"  
+	# This will mark both Serie1 & Serie2 as "graphable"
 	# * chart_data.add_all_series
-	
+
 	def add_all_series
 		@data_description["values"] = []
 		if(!@data[0].nil?)
@@ -108,10 +110,10 @@ class Rdata
 	# * chart_data.add_all_series
 	# This will remove the "graphable" status of Serie2
 	# * chart_data.remove_serie("Serie2")
-	
+
 	def remove_serie(serie_name="Serie1")
 		if (!@data_description["values"].nil?)
-			found = false;
+			found = false
 			@data_description["values"].each do |v|
 				@data_description["values"].delete(v)  if (v == serie_name )
 			end
@@ -126,7 +128,7 @@ class Rdata
 	# * chart_data.add_serie("Serie2")
 	# * chart_data.add_serie("Serie3")
 	# Set Serie as abcisse label
-	# * chart_data.set_abscise_label_serie("Serie1")  
+	# * chart_data.set_abscise_label_serie("Serie1")
 	def set_abscise_label_serie(serie_name = "name")
 		@data_description["position"] = serie_name
 	end
@@ -139,7 +141,7 @@ class Rdata
  # * chart_data.set_serie_name("January")
  # This will set the name of Serie2 to "February"
  # * chart_data.set_serie_name("February","Serie2")
-	
+
 	def set_serie_name(name,serie_name="Serie1")
 		if @data_description["description"].nil?
 			@data_description["description"]={serie_name => name}
@@ -158,7 +160,7 @@ class Rdata
 		end
 	end
 	# This will give a name to the Y axis, writting it horizontally behind the chart
-	# * chart_data.set_y_axis_name("Temperature") 
+	# * chart_data.set_y_axis_name("Temperature")
 	def set_y_axis_name(name="Y Axis")
 		if @data_description["axis"].nil?
 			@data_description["axis"]= {"y" => name}
@@ -187,11 +189,11 @@ class Rdata
 	def set_x_axis_unit(unit="")
 		@data_description["unit"]["x"] = unit
 	end
-	
+
 # Set the axis unit. This will be appended to the axis value
 # Give the "m/s" unit to the Y axis
 # * chart_data.set_x_axis_unit("m/s")
-	
+
 	def set_y_axis_unit(unit="")
 		@data_description["unit"]["y"] = unit
 	end
@@ -219,7 +221,7 @@ class Rdata
 	# This function can be used to remove the description of a serie.
 	# This description will be written on the graph when calling the drawLegend function.
 	# Removing it's name using this function can be usefull to hide previously used series
-	
+
 	def remove_all_series
 		@data_description["values"].each do |v|
 			@data_description["values"] = []
@@ -230,10 +232,9 @@ class Rdata
 	def get_data
 		@data
 	end
-	# This function is used everytime you want to retrieve the Data description stored in the Rdata structure 
+	# This function is used everytime you want to retrieve the Data description stored in the Rdata structure
 	def get_data_description
 		@data_description
 	end
 
 end
-

data/lib/scale.rb

@@ -0,0 +1,538 @@
+module Scale
+# Allow you to clear the scale : used if drawing multiple charts
+  # You'll need to call this function only if you're planning to draw a second chart in the rendered picture.
+  # Calling this function will clear the current scaling parameters thus you'll need to call again the draw_scale function before drawing any new chart.
+  def clear_scale
+    @vmin     = nil
+    @vmax       = nil
+    @v_x_min   = nil
+    @v_x_max      = nil
+    @divisions  = 0
+    @x_divisions = 0
+  end
+
+  # Allow you to fix the scale, use this to bypass the automatic scaling
+  # You can use this function to skip the automatic scaling.
+  # vmin and vmax will be used to render the graph.
+  def set_fixed_scale(v_min,v_max,divisions=5,v_x_min=0,v_x_max=0,x_divisions=5)
+    @vmin      = v_min.to_f
+    @vmax      = v_max.to_f
+    @divisions = divisions.to_f
+
+    if (!v_x_min == 0 )
+      @v_x_min      = v_x_min.to_f
+      @v_x_max      = v_x_max.to_f
+      @x_divisions = x_divisions.to_f
+    end
+  end
+
+  # Wrapper to the draw_scale function allowing a second scale to be drawn
+  # It takes the same parameters of the draw_scale function.
+  # The scale values will be written on the right side of the graph area.
+  def draw_right_scale(data,data_description,scale_mode,r,g,b,draw_ticks=true,angle=0,decimals=1,with_margin=false,skip_labels=1)
+    self.	draw_scale(data, data_description, scale_mode, r, g, b,draw_ticks,angle,decimals,with_margin,skip_labels,true)
+  end
+
+  # This function will draw both axis and write values on it. You can disable the labelling of the axis setting draw_ticks to false. angle can be used to rotate the vertical ticks labels.
+  # decimal specify the number of decimal values we want to keep. Setting draw_ticks to false will not draw vertical & horizontal ticks on the axis ( labels will also not be written ).
+  # There is four way of computing scales :
+  # * Getting Max & Min values per serie : scale_mode = Rchart::SCALE_NORMAL
+  # * Like the previous one but setting the min value to 0 : scale_mode = Rchart::SCALE_START0
+  # * Getting the series cumulative Max & Min values : scale_mode = Rchart::SCALE_ADDALL
+  # * Like the previous one but setting the min value to 0 : scale_mode = Rchart::SCALE_ADDALLSTART0
+  # This will depends on the kind of graph you are drawing,   Drawing graphs were you want to fix the min value to 0 you must use the Rchart::SCALE_START0 option.
+  # You can display only one x label every xi labels using the skip_labels parameter.
+  # Keeping with_margin to false will make the chart use all the width of the graph area. For most graphs the rendering will be better. In some circumstances you'll have to set it to true ( introducing left & right margin ) : bar charts will require it.
+  def draw_scale(data,data_description,scale_mode,r,g,b,draw_ticks=true,angle=0,decimals=1,with_margin=false,skip_labels=1,right_scale=false)
+    # Validate the Data and DataDescription array
+    data = self.validate_data("draw_scale",data)
+    c_text_color         = allocate_color(@picture,r,g,b)
+    self.draw_line(@g_area_x1,@g_area_y1,@g_area_x1,@g_area_y2,r,g,b)
+    self.draw_line(@g_area_x1,@g_area_y2,@g_area_x2,@g_area_y2,r,g,b)
+    scale =0
+    divisions =0
+    if(@vmin.nil? && @vmax.nil?)
+      if (!data_description["values"][0].nil?)
+        #My hack TODO for LINE GRAPH
+        if data_description["values"].is_a?(Array)
+          @vmin =data[0][data_description["values"][0]]
+          @vmax =data[0][data_description["values"][0]]
+        else
+          @vmin =data[0][data_description["values"][0]]
+          @vmax =data[0][data_description["values"]]
+        end
+
+      else
+        @vmin = 2147483647
+        @vmax = -2147483647
+      end
+#       /* Compute Min and Max values */
+      if(scale_mode == Rchart::SCALE_NORMAL || scale_mode == Rchart::SCALE_START0)
+        @vmin = 0 if (scale_mode == Rchart::SCALE_START0 )
+
+        data.each do |key|
+          data_description["values"].each do |col_name|
+            if(!key[col_name].nil?)
+              value = key[col_name]
+              if (value.is_a?(Numeric))
+                @vmax = value if ( @vmax < value)
+                @vmin = value  if ( @vmin > value)
+              end
+            end
+          end
+        end
+      elsif ( scale_mode == Rchart::SCALE_ADDALL || scale_mode == Rchart::SCALE_ADDALLSTART0 ) # Experimental
+        @vmin = 0 if (scale_mode == Rchart::SCALE_ADDALLSTART0)
+        data.each do |key|
+          sum = 0
+          data_description["values"].each do|col_name|
+            if (!key[col_name].nil?)
+              value =key[col_name]
+              sum  += value if ((value).is_a?(Numeric))
+            end
+          end
+          @vmax = sum if (@vmax < sum)
+          @vmin = sum if (@vmin > sum)
+        end
+
+      end
+
+      if(@vmax.is_a?(String))
+        @vmax = @vmax.gsub(/\.[0-9]+/,'')+1 if (@vmax > @vmax.gsub(/\.[0-9]+/,'') )
+      end
+      # If all values are the same */
+      if ( @vmax == @vmin )
+        if ( @vmax >= 0 )
+          @vmax = @vmax+1
+        else
+          @vmin = @vmin-1
+        end
+      end
+
+      data_range = @vmax - @vmin
+      data_range = 0.1 if (data_range.to_f == 0.0)
+
+      #Compute automatic scaling */
+      scale_ok = false
+      factor = 1
+      min_div_height = 25
+      max_divs = (@g_area_y2 - @g_area_y1)*1.0 / min_div_height
+
+      if (@vmin == 0 && @vmax == 0 )
+        @vmin = 0
+        @vmax = 2
+        scale = 1
+        divisions = 2
+      elsif (max_divs > 1)
+        while(!scale_ok)
+          scale1 = ( @vmax - @vmin )*1.0 / factor
+          scale2 = ( @vmax - @vmin )*1.0 /factor / 2
+      #    scale4 = ( @vmax - @vmin )*1.0 / factor / 4
+          if ( scale1 > 1 && scale1 <= max_divs && !scale_ok)
+            scale_ok = true
+            divisions = (scale1).floor
+            scale = 1
+          end
+          if (scale2 > 1 && scale2 <= max_divs && !scale_ok)
+            scale_ok = true
+            divisions = (scale2).floor
+            scale = 2
+          end
+          if (!scale_ok)
+            factor = factor * 10 if ( scale2 > 1 )
+            factor = factor / 10  if ( scale2 < 1 )
+          end
+        end # while end
+        if ((((@vmax*1.0 / scale) / factor)).floor != ((@vmax*1.0 / scale) / factor))
+          grid_id     = ( @vmax*1.0 / scale / factor).floor  + 1
+          @vmax       = grid_id * scale * factor
+          divisions   = divisions+1
+        end
+
+        if (((@vmin*1.0 / scale) / factor).floor != ((@vmin*1.0 / scale) / factor))
+
+          grid_id     = ( @vmin*1.0 / scale / factor).floor
+          @vmin       = grid_id * scale * factor*1.0
+          divisions   = divisions+1
+        end
+
+      else #/* Can occurs for small graphs */
+        scale = 1
+      end
+      divisions = 2 if ( divisions.nil? )
+
+      divisions = divisions-1 if (scale == 1 && divisions%2 == 1)
+
+    else
+      divisions = @divisions
+    end
+
+    @division_count = divisions
+    data_range = @vmax - @vmin
+    data_range = 0.1  if (data_range.to_f == 0.0 )
+    @division_height = ( @g_area_y2 - @g_area_y1 )*1.0 / divisions
+    @division_ratio  = ( @g_area_y2 - @g_area_y1 )*1.0 /data_range
+    @g_area_x_offset  = 0
+    if ( data.count > 1 )
+      if ( with_margin == false)
+        @division_width = ( @g_area_x2 - @g_area_x1 )*1.0 / ((data).count-1)
+      else
+        @division_width = ( @g_area_x2 - @g_area_x1 ) *1.0/ (data).count
+        @g_area_x_offset  = @division_width*1.0 / 2
+      end
+    else
+      @division_width = (@g_area_x2 - @g_area_x1)*1.0
+      @g_area_x_offset  = @division_width*1.0 / 2
+    end
+
+    @data_count = (data).count
+    return(0) if (draw_ticks == false )
+    ypos = @g_area_y2
+    xmin = nil
+    i =1
+
+    while(i<= divisions+1)
+      if (right_scale )
+        self.draw_line(@g_area_x2,ypos,@g_area_x2+5,ypos,r,g,b)
+      else
+        self.draw_line(@g_area_x1,ypos,@g_area_x1-5,ypos,r,g,b)
+      end
+      value     = @vmin*1.0 + (i-1) * (( @vmax - @vmin ) / divisions)
+      value     = (round_of(value * (10**decimals),2)) / (10**decimals)
+      value= value.round if value.floor == value.ceil
+      value = "#{value} #{data_description['unit']['y']}"  if ( data_description["format"]["y"]== "number")
+      value = self.to_time(value)                  if ( data_description["format"]["y"] == "time" )
+      value = self.to_date(value)                  if ( data_description["format"]["y"] == "date" )
+      value = self.to_metric(value)                if ( data_description["format"]["Y"] == "metric" )
+      value = self.to_currency(value)             if ( data_description["format"]["Y"] == "currency" )
+      position  = image_ftb_box(@font_size,0,@font_name,value)
+      text_width =position[2]-position[0]
+      if ( right_scale )
+        image_ttf_text(@picture,@font_size,0,@g_area_x2+10,ypos+(@font_size/2),c_text_color,@font_name,value)
+        xmin = @g_area_x2+15+text_width if (xmin.nil? || xmin < @g_area_x2+15+text_width  )
+      else
+        image_ttf_text(@picture,@font_size,0,@g_area_x1-10-text_width,ypos+(@font_size/2),c_text_color,@font_name,value)
+        xmin = @g_area_x1-10-text_width if (  xmin.nil? || xmin > @g_area_x1-10-text_width)
+      end
+      ypos = ypos - @division_height
+      i = i+1
+    end
+    # Write the Y Axis caption if set */
+
+    if (!data_description["axis"].nil? && !data_description["axis"]["y"].nil? )
+      position   = image_ftb_box(@font_size,90,@font_name,data_description["axis"]["y"])
+      text_height = (position[1]).abs+(position[3]).abs
+      text_top    = ((@g_area_y2 - @g_area_y1) / 2) + @g_area_y1 + (text_height/2)
+
+      if (right_scale )
+        image_ttf_text(@picture,@font_size,90,xmin+@font_size,text_top,c_text_color,@font_name,data_description["axis"]["y"])
+      else
+        image_ttf_text(@picture,@font_size,90,xmin-@font_size,text_top,c_text_color,@font_name,data_description["axis"]["y"])
+      end
+    end
+    # Horizontal Axis */
+    xpos = @g_area_x1 + @g_area_x_offset
+    id = 1
+    ymax = nil
+    data.each do |key|
+      if ( id % skip_labels == 0 )
+        self.draw_line((xpos).floor,@g_area_y2,(xpos).floor,@g_area_y2+5,r,g,b)
+        value      =key[data_description["position"]]
+        value =  "#{value} #{data_description['unit']['x']}" if ( data_description["format"]["x"] == "number" )
+        value = self.to_time(value)       if ( data_description["format"]["x"] == "time" )
+        value = self.to_date(value)       if ( data_description["format"]["x"] == "date" )
+        value = self.to_metric(value)     if ( data_description["format"]["x"] == "metric" )
+        value = self.to_currency(value)   if ( data_description["format"]["x"] == "currency" )
+        position   = image_ftb_box(@font_size,angle,@font_name,value.to_s)
+        text_width  = (position[2]).abs+(position[0]).abs
+        text_height = (position[1]).abs+(position[3]).abs
+        if ( angle == 0 )
+          ypos = @g_area_y2+18
+          image_ttf_text(@picture,@font_size,angle,(xpos).floor-(text_width/2).floor,ypos,c_text_color,@font_name,value.to_s)
+        else
+          ypos = @g_area_y2+10+text_height
+          if ( angle <= 90 )
+            image_ttf_text(@picture,@font_size,angle,(xpos).floor-text_width+5,ypos,c_text_color,@font_name,value.to_s)
+          else
+            image_ttf_text(@picture,@font_size,angle,(xpos).floor+text_width+5,ypos,c_text_color,@font_name,value.to_s)
+          end
+        end
+        ymax = ypos if (ymax.nil? ||(!ymax.nil? && ymax < ypos))
+      end
+      xpos = xpos + @division_width
+      id = id+1
+    end   #loop ended
+    #Write the X Axis caption if set */
+
+    if ((!data_description["axis"].nil? && !data_description["axis"]["x"].nil?) )
+      position   = image_ftb_box(@font_size,90,@font_name,data_description["axis"]["x"])
+      text_width  = (position[2]).abs+(position[0]).abs
+      text_left   = ((@g_area_x2 - @g_area_x1) / 2) + @g_area_x1 + (text_width/2)
+      image_ttf_text(@picture,@font_size,0,text_left,ymax+@font_size+5,c_text_color,@font_name,data_description["axis"]["x"].to_s)
+    end
+
+  end
+
+  # This function is used by scatter charts.
+  # It will compute everything needed to draw the associated line and plot charts.
+  # You must specify the name of the two series that will be used as X and Y data. By default this function will compute the min & max values of both series, anyway you can override the automatic scaling by calling first the setFixedScale function.
+  def draw_xy_scale(data,data_description,y_serie_name,x_serie_name,r,g,b,with_margin=0,angle=0,decimals=1)
+
+    self.validate_data("draw_xy_scale",data)
+    c_text_color         = allocate_color(@picture,r,g,b)
+    self.draw_line(@g_area_x1,@g_area_y1,@g_area_x1,@g_area_y2,r,g,b)
+    self.draw_line(@g_area_x1,@g_area_y2,@g_area_x2,@g_area_y2,r,g,b)
+
+    # Process Y scale */
+    if(@vmin.nil? && @vmax.nil?)
+      @vmin = data[0][y_serie_name]
+      @vmax = data[0][y_serie_name]
+      data.each do |key|
+        if !key[y_serie_name].nil?
+          value = key[y_serie_name]
+          if (value.is_a?(Numeric))
+            @vmax = value if ( @vmax < value)
+            @vmin = value  if ( @vmin > value)
+          end
+        end
+      end
+
+      if(@vmax.is_a?(String))
+        @vmax = @vmax.gsub(/\.[0-9]+/,'')+1 if (@vmax > @vmax.gsub(/\.[0-9]+/,'') )
+      end
+      data_range = @vmax - @vmin
+      data_range = 0.1 if (data_range.to_f == 0.0 )
+
+      #Compute automatic scaling
+      scale_ok = false
+      factor = 1
+      min_div_height = 25
+      max_divs = (@g_area_y2 - @g_area_y1)*1.0 / min_div_height
+      if (@vmin == 0 && @vmax == 0 )
+        @vmin = 0
+        @vmax = 2
+        scale = 1
+        divisions = 2
+      elsif (max_divs > 1)
+        while(!scale_ok)
+          scale1 = ( @vmax - @vmin )*1.0 / factor
+          scale2 = ( @vmax - @vmin )*1.0 /factor / 2
+          scale4 = ( @vmax - @vmin )*1.0 / factor / 4
+
+          if ( scale1 > 1 && scale1 <= max_divs && !scale_ok)
+            scale_ok = true
+            divisions = (scale1).floor
+            scale = 1
+          end
+          if ( scale2 > 1 && scale2 <= max_divs && !scale_ok)
+            scale_ok = true
+            divisions = (scale2).floor
+            scale = 2
+          end
+          if (!scale_ok)
+            factor = factor * 10  if ( scale2 > 1 )
+            factor = factor / 10  if ( scale2 < 1 )
+          end
+        end
+        if ((((@vmax*1.0 / scale) / factor)).floor != ((@vmax*1.0 / scale) / factor))
+          grid_id     = ( @vmax*1.0 / scale / factor).floor  + 1
+          @vmax       = grid_id * scale * factor
+          divisions   = divisions+1
+        end
+
+        if (((@vmin*1.0 / scale) / factor).floor != ((@vmin*1.0 / scale) / factor))
+
+          grid_id     = ( @vmin*1.0 / scale / factor).floor
+          @vmin       = grid_id * scale * factor*1.0
+          divisions   = divisions+1
+        end
+
+      else #/* Can occurs for small graphs */
+        scale = 1
+      end
+      divisions = 2 if ( divisions.nil? )
+
+      if ( is_real_int((@vmax-@vmin)/(divisions-1)))
+        divisions-=1
+      elsif ( is_real_int((@vmax-@vmin)/(divisions+1)))
+        divisions+=1
+      end
+    else
+      divisions =@divisions
+    end
+    @division_count = divisions
+
+    data_range = @vmax - @vmin
+    data_range = 0.1  if (data_range.to_f == 0.0 )
+    @division_height = ( @g_area_y2 - @g_area_y1 )*1.0 / divisions
+    @division_ratio  = ( @g_area_y2 - @g_area_y1 )*1.0 /data_range
+    ypos = @g_area_y2
+    xmin = nil
+    i =1
+
+    while(i<= divisions+1)
+      self.draw_line(@g_area_x1,ypos,@g_area_x1-5,ypos,r,g,b)
+      value     = @vmin*1.0 + (i-1) * (( @vmax - @vmin ) / divisions)
+      value     = (round_of(value * (10**decimals),2)) / (10**decimals)
+      value= value.round if value.floor == value.ceil
+      value = "#{value} #{data_description['unit']['y']}"  if ( data_description["format"]["y"]== "number")
+      value = self.to_time(value)                  if ( data_description["format"]["y"] == "time" )
+      value = self.to_date(value)                  if ( data_description["format"]["y"] == "date" )
+      value = self.to_metric(value)                if ( data_description["format"]["Y"] == "metric" )
+      value = self.to_currency(value)             if ( data_description["format"]["Y"] == "currency" )
+
+      position  = image_ftb_box(@font_size,0,@font_name,value)
+      text_width =position[2]-position[0]
+      image_ttf_text(@picture,@font_size,0,@g_area_x1-10-text_width,ypos+(@font_size/2),c_text_color,@font_name,value)
+      xmin = @g_area_x1-10-text_width if (  xmin.nil? || xmin > @g_area_x1-10-text_width)
+      ypos = ypos - @division_height
+      i = i+1
+
+    end
+
+    # Process X scale */
+    if(@v_x_min.nil? && @v_x_max.nil?)
+
+      @v_x_min =data[0][x_serie_name]
+      @v_x_max =data[0][x_serie_name]
+      data.each do |key|
+
+        if !key[x_serie_name].nil?
+          value = key[x_serie_name]
+          if (value.is_a?(Numeric))
+
+            @v_x_max = value if ( @v_x_max < value)
+            @v_x_min = value  if ( @v_x_min > value)
+          end
+        end
+      end
+
+      if (@v_x_max.is_a?(String))
+        @v_x_max = @v_x_max.gsub(/\.[0-9]+/,'')+1 if (@v_x_max > @v_x_max.gsub(/\.[0-9]+/,'') )
+      end
+
+      data_range = @vmax - @vmin
+      data_range = 0.1 if (data_range.to_f == 0.0 )
+
+      # Compute automatic scaling
+      scale_ok = false
+      factor = 1
+      min_div_width = 25
+      max_divs = (@g_area_x2 - @g_area_x1) / min_div_width
+
+      if ( @v_x_min == 0 && @v_x_max == 0 )
+        @v_x_min = 0
+        @v_x_max = 2
+        scale = 1
+        x_divisions = 2
+      elsif (max_divs > 1)
+
+        while(!scale_ok)
+          scale1 = ( @v_x_max - @v_x_min ) / factor
+          scale2 = ( @v_x_max - @v_x_min ) / factor / 2
+          scale4 = ( @v_x_max - @v_x_min ) / factor / 4
+          if ( scale1 > 1 && scale1 <= max_divs && !scale_ok)
+            scale_ok = true
+            x_divisions = (scale1).floor
+            scale = 1
+          end
+
+          if ( scale2 > 1 && scale2 <= max_divs && !scale_ok)
+            scale_ok = true
+            x_divisions = (scale2).floor
+
+            scale = 2
+          end
+          if (!scale_ok)
+            factor = factor * 10 if ( scale2 > 1 )
+            factor = factor / 10  if ( scale2 < 1 )
+          end
+        end
+
+        if ( (@v_x_max*1.0 / scale / factor).floor != @v_x_max / scale / factor)
+          grid_id     =  ( @v_x_max*1.0 / scale / factor).floor + 1
+          @v_x_max = grid_id * scale * factor
+          x_divisions+=1
+        end
+
+        if ( (@v_x_min*1.0 / scale / factor).floor != @v_x_min / scale / factor)
+          grid_id     = floor( @v_x_min / scale / factor)
+          @v_x_min = grid_id * scale * factor
+          x_divisions+=1
+        end
+      else #/* Can occurs for small graphs */
+        scale = 1
+      end
+      x_divisions = 2 if ( x_divisions.nil? )
+
+      if ( is_real_int((@v_x_max-@v_x_min)/(x_divisions-1)))
+        x_divisions-=1
+      elsif ( is_real_int((@v_x_max-@v_x_min)/(x_divisions+1)))
+        x_divisions+=1
+      end
+    else
+
+      x_divisions = @x_divisions
+    end
+
+    @x_division_count = divisions
+    @data_count      = divisions + 2
+
+    x_data_range = @v_x_max - @v_x_min
+    x_data_range = 0.1   if ( x_data_range == 0 )
+
+    @division_width   = ( @g_area_x2 - @g_area_x1 ) / x_divisions
+    @x_division_ratio  = ( @g_area_x2 - @g_area_x1 ) / x_data_range
+    xpos = @g_area_x1
+    ymax =nil
+    i=1
+
+    while(i<= x_divisions+1)
+      self.draw_line(xpos,@g_area_y2,xpos,@g_area_y2+5,r,g,b)
+      value     = @v_x_min + (i-1) * (( @v_x_max - @v_x_min ) / x_divisions)
+      value     = (round_of(value * (10**decimals),2)) / (10**decimals)
+      value= value.round if value.floor == value.ceil
+      value = "#{value}#{data_description['unit']['y']}"  if ( data_description["format"]["y"]== "number")
+      value = self.to_time(value)                  if ( data_description["format"]["y"] == "time" )
+      value = self.to_date(value)                  if ( data_description["format"]["y"] == "date" )
+      value = self.to_metric(value)                if ( data_description["format"]["Y"] == "metric" )
+      value = self.to_currency(value)             if ( data_description["format"]["Y"] == "currency" )
+      position  = image_ftb_box(@font_size,angle,@font_name,value)
+      text_width =position[2].abs+position[0].abs
+      text_height = position[1].abs+position[3].abs
+
+      if ( angle == 0 )
+        ypos = @g_area_y2+18
+        image_ttf_text(@picture,@font_size,angle,(xpos).floor-(text_width/2).floor,ypos,c_text_color,@font_name,value)
+      else
+
+        ypos = @g_area_y2+10+text_height
+        if ( angle <= 90 )
+          image_ttf_text(@picture,@font_size,angle,(xpos).floor-text_width+5,ypos,c_text_color,@font_name,value)
+        else
+          image_ttf_text(@picture,@font_size,angle,(xpos).floor+text_width+5,ypos,c_text_color,@font_name,value)
+        end
+
+      end
+
+      ymax = ypos if (ymax.nil? || ymax < ypos)
+      i=i+1
+      xpos = xpos + @division_width
+    end
+    #Write the Y Axis caption if set
+    if ((!data_description["axis"].nil? && !data_description["axis"]["y"].nil?) )
+      position   = image_ftb_box(@font_size,90,@font_name,data_description["axis"]["y"])
+      text_height  = (position[1]).abs+(position[3]).abs
+      text_top   = ((@g_area_y2 - @g_area_y1) / 2) + @g_area_y1 + (text_width/2)
+      image_ttf_text(@picture,@font_size,90,xmin-@font_size,text_top,c_text_color,@font_name,data_description["axis"]["y"].to_s)
+    end
+    if ((!data_description["axis"].nil? && !data_description["axis"]["x"].nil?) )
+      position   = image_ftb_box(@font_size,90,@font_name,data_description["axis"]["x"])
+      text_width  = (position[2]).abs+(position[0]).abs
+      text_left   = ((@g_area_x2 - @g_area_x1) / 2) + @g_area_x1 + (text_width/2)
+      image_ttf_text(@picture,@font_size,0,text_left,ymax+@font_size+5,c_text_color,@font_name,data_description["axis"]["x"].to_s)
+    end
+
+  end
+
+end