package net.systemeD.halcyon { import flash.display.Loader; import flash.display.Sprite; import flash.events.*; import flash.external.ExternalInterface; import flash.geom.Rectangle; import flash.net.*; import flash.text.Font; import flash.text.TextField; import flash.ui.Keyboard; import net.systemeD.halcyon.connection.*; import net.systemeD.halcyon.styleparser.*; // for experimental export function: // import flash.net.FileReference; // import com.adobe.images.JPGEncoder; /** The representation of part of the map on the screen, including information about coordinates, background imagery, paint properties etc. */ public class Map extends Sprite { /** master map scale - how many Flash pixels in 1 degree longitude (for Landsat, 5120) */ public const MASTERSCALE:Number=5825.4222222222; /** don't zoom out past this */ public const MINSCALE:uint=13; /** don't zoom in past this */ public const MAXSCALE:uint=23; // Container for MapPaint objects private var paintContainer:Sprite; /** map scale */ public var scale:uint=14; /** current scaling factor for lon/latp */ public var scalefactor:Number=MASTERSCALE; public var edge_l:Number; // current bounding box public var edge_r:Number; // | public var edge_t:Number; // | public var edge_b:Number; // | public var centre_lat:Number; // centre lat/lon public var centre_lon:Number; // | /** urllon-xradius/masterscale; */ public var baselon:Number; /** lat2lat2p(urllat)+yradius/masterscale; */ public var basey:Number; /** width (Flash pixels) */ public var mapwidth:uint; /** height (Flash pixels) */ public var mapheight:uint; /** Is the map being panned */ public var dragstate:uint=NOT_DRAGGING; // dragging map (panning) /** Can the map be panned */ private var _draggable:Boolean=true; // | private var lastxmouse:Number; // | private var lastymouse:Number; // | private var downX:Number; // | private var downY:Number; // | private var downTime:Number; // | public const NOT_DRAGGING:uint=0; // | public const NOT_MOVED:uint=1; // | public const DRAGGING:uint=2; // | /** How far the map can be dragged without actually triggering a pan. */ public const TOLERANCE:uint=7; // | /** object containing HTML page parameters: lat, lon, zoom, background_dim, background_sharpen, tileblocks */ public var initparams:Object; /** reference to backdrop sprite */ public var backdrop:Object; /** background tile object */ public var tileset:TileSet; /** show all objects, even if unstyled? */ public var showall:Boolean=true; // ------------------------------------------------------------------------------------------ /** Map constructor function */ public function Map() { // Remove any existing sprites while (numChildren) { removeChildAt(0); } // 900913 background tileset=new TileSet(this); addChild(tileset); // Container for all MapPaint objects paintContainer = new Sprite(); addChild(paintContainer); addEventListener(Event.ENTER_FRAME, everyFrame); scrollRect=new Rectangle(0,0,800,600); if (ExternalInterface.available) { ExternalInterface.addCallback("setPosition", function (lat:Number,lon:Number,zoom:uint):void { updateCoordsFromLatLon(lat, lon); changeScale(zoom); }); } } // ------------------------------------------------------------------------------------------ /** Initialise map at a given lat/lon */ public function init(startlat:Number, startlon:Number, startscale:uint=0):void { if (startscale>0) { scale=startscale; this.dispatchEvent(new MapEvent(MapEvent.SCALE, {scale:scale})); } scalefactor=MASTERSCALE/Math.pow(2,13-scale); baselon =startlon -(mapwidth /2)/scalefactor; basey =lat2latp(startlat)+(mapheight/2)/scalefactor; updateCoords(0,0); this.dispatchEvent(new Event(MapEvent.INITIALISED)); download(); } // ------------------------------------------------------------------------------------------ /** Recalculate co-ordinates from new Flash origin */ private function updateCoords(tx:Number,ty:Number):void { setScrollRectXY(tx,ty); edge_t=coord2lat(-ty ); edge_b=coord2lat(-ty+mapheight); edge_l=coord2lon(-tx ); edge_r=coord2lon(-tx+mapwidth ); setCentre(); tileset.update(); } /** Move the map to centre on a given latitude/longitude. */ private function updateCoordsFromLatLon(lat:Number,lon:Number):void { var cy:Number=-(lat2coord(lat)-mapheight/2); var cx:Number=-(lon2coord(lon)-mapwidth/2); updateCoords(cx,cy); } private function setScrollRectXY(tx:Number,ty:Number):void { var w:Number=scrollRect.width; var h:Number=scrollRect.height; scrollRect=new Rectangle(-tx,-ty,w,h); } private function setScrollRectSize(width:Number,height:Number):void { var sx:Number=scrollRect.x ? scrollRect.x : 0; var sy:Number=scrollRect.y ? scrollRect.y : 0; scrollRect=new Rectangle(sx,sy,width,height); } private function getX():Number { return -scrollRect.x; } private function getY():Number { return -scrollRect.y; } private function setCentre():void { centre_lat=coord2lat(-getY()+mapheight/2); centre_lon=coord2lon(-getX()+mapwidth/2); this.dispatchEvent(new MapEvent(MapEvent.MOVE, {lat:centre_lat, lon:centre_lon, scale:scale, minlon:edge_l, maxlon:edge_r, minlat:edge_b, maxlat:edge_t})); } /** Sets the offset between the background imagery and the map. */ public function nudgeBackground(x:Number,y:Number):void { this.dispatchEvent(new MapEvent(MapEvent.NUDGE_BACKGROUND, { x: x, y: y })); } private function moveMap(dx:Number,dy:Number):void { updateCoords(getX()+dx,getY()+dy); updateAllEntityUIs(false, false); download(); } /** Recentre map at given lat/lon, updating the UI and downloading entities. */ public function moveMapFromLatLon(lat:Number,lon:Number):void { updateCoordsFromLatLon(lat,lon); updateAllEntityUIs(false,false); download(); } /** Recentre map at given lat/lon, if that point is currently outside the visible area. */ public function scrollIfNeeded(lat:Number,lon:Number): void{ if (lat> edge_t || lat < edge_b || lon < edge_l || lon > edge_r) { moveMapFromLatLon(lat, lon); } } // Co-ordinate conversion functions public function latp2coord(a:Number):Number { return -(a-basey)*scalefactor; } public function coord2latp(a:Number):Number { return a/-scalefactor+basey; } public function lon2coord(a:Number):Number { return (a-baselon)*scalefactor; } public function coord2lon(a:Number):Number { return a/scalefactor+baselon; } public function latp2lat(a:Number):Number { return 180/Math.PI * (2 * Math.atan(Math.exp(a*Math.PI/180)) - Math.PI/2); } public function lat2latp(a:Number):Number { return 180/Math.PI * Math.log(Math.tan(Math.PI/4+a*(Math.PI/180)/2)); } public function lat2coord(a:Number):Number { return -(lat2latp(a)-basey)*scalefactor; } public function coord2lat(a:Number):Number { return latp2lat(a/-scalefactor+basey); } // ------------------------------------------------------------------------------------------ /** Resize map size based on current stage and height */ public function updateSize(w:uint, h:uint):void { mapwidth = w; centre_lon=coord2lon(-getX()+w/2); mapheight= h; centre_lat=coord2lat(-getY()+h/2); setScrollRectSize(w,h); this.dispatchEvent(new MapEvent(MapEvent.RESIZE, {width:w, height:h})); if ( backdrop != null ) { backdrop.width=mapwidth; backdrop.height=mapheight; } if ( mask != null ) { mask.width=mapwidth; mask.height=mapheight; } } /** Download map data. Data is downloaded for the currently visible layers * The bounding box for the download is taken from the current map edges. */ public function download():void { for (var i:uint=0; i>>> REFACTOR: needs to do the equivalent of VectorLayer.blank() } } public function findLayer(name:String):MapPaint { for (var i:uint=0; i