# ====================================================================
# Public methods
- # ---- trackpoints compile SWF of trackpoints
+ # ---- trackpoints compile SWF of trackpoints
def trackpoints
- # - Initialise
+ # - Initialise
baselong = params["baselong"].to_f
basey = params["basey"].to_f
params["xmax"], params["ymax"])
start = params["start"].to_i
- # - Begin movie
+ # - Begin movie
bounds_left = 0
bounds_right = 320 * 20
bounds_top = 240 * 20
m = ""
- m += swf_record(9, 255.chr + 155.chr + 155.chr) # Background
+ m += swf_record(9, 255.chr + 155.chr + 155.chr) # Background
absx = 0
absy = 0
xl = yb = 9999999
xr = yt = -9999999
- # - Send SQL for GPS tracks
+ # - Send SQL for GPS tracks
b = ""
lasttime = 0
m += swf_record(2, pack_u16(1) + pack_rect(xl, xr, yb, yt) + r)
m += swf_record(4, pack_u16(1) + pack_u16(1))
- # - Create Flash header and write to browser
+ # - Create Flash header and write to browser
m += swf_record(1, "") # Show frame
m += swf_record(0, "") # End
m = pack_rect(bounds_left, bounds_right, bounds_bottom, bounds_top) + 0.chr + 12.chr + pack_u16(1) + m
m = "FWS" + 6.chr + pack_u32(m.length + 8) + m
- render :text => m, :content_type => "application/x-shockwave-flash"
+ render :body => m, :content_type => "application/x-shockwave-flash"
end
private
s += 2.chr # Two line styles
s += pack_u16(0) + 0.chr + 255.chr + 255.chr # Width 5, RGB #00FFFF
s += pack_u16(0) + 255.chr + 0.chr + 255.chr # Width 5, RGB #FF00FF
- s += 34.chr # 2 fill, 2 line index bits
+ s += 34.chr # 2 fill, 2 line index bits
s
end
d = "001001" # Line style change, moveTo
l = [length_sb(x), length_sb(y)].max
d += format("%05b%0*b%0*b", l, l, x, l, y)
- d += col # Select line style
+ d += col # Select line style
d
end