- def get_picture(min_lat, min_lon, max_lat, max_lon, num_points)
- #puts "getting picfor bbox #{min_lat},#{min_lon} - #{max_lat},#{max_lon}"
- frames = 10
- width = 250
- height = 250
- rat= Math.cos( ((max_lat + min_lat)/2.0) / 180.0 * 3.141592)
- proj = OSM::Mercator.new((min_lat + max_lat) / 2, (max_lon + min_lon) / 2, (max_lat - min_lat) / width / rat, width, height)
-
- images = []
-
- frames.times do
- gc = Magick::Draw.new
- gc.stroke_linejoin('miter')
- gc.stroke('#FFFFFF')
- gc.fill('#FFFFFF')
- gc.rectangle(0,0,width,height)
- gc.stroke_width(1)
- images << gc
- end
-
- oldpx = 0.0
- oldpy = 0.0
-
- first = true
-
- m = 0
- mm = 0
- points do |p|
- px = proj.x(p['longitude'])
- py = proj.y(p['latitude'])
- frames.times do |n|
- images[n].stroke_width(1)
- images[n].stroke('#BBBBBB')
- images[n].fill('#BBBBBB')
- # puts "A #{px},#{py} - #{oldpx},#{oldpy}"
- images[n].line(px, py, oldpx, oldpy ) unless first
- end
- images[mm].stroke_width(3)
- images[mm].stroke('#000000')
- images[mm].fill('#000000')
- images[mm].line(px, py, oldpx, oldpy ) unless first
- # puts "B #{px},#{py} - #{oldpx},#{oldpy}"
- m +=1
- if m > num_points.to_f / frames.to_f * (mm+1)
- mm += 1
- end
- first = false
- oldpy = py
- oldpx = px
- end
-
- il = Magick::ImageList.new
-
- frames.times do |n|
- canvas = Magick::Image.new(width, height) {
- self.background_color = 'white'
- }
- begin
- images[n].draw(canvas)
- rescue ArgumentError
- end
- canvas.format = 'GIF'
- il << canvas
- end