烟台市.wor

烟台地区电子地图,包括县市区地图

!Workspace
!Version 400
!Charset WindowsSimpChinese
Open Table "主要堤" As 主要堤
Open Table "单线河" As 单线河
Open Table "堤" As 堤
Open Table "电力线" As 电力线
Open Table "二级道路" As 二级道路
Open Table "高速公路" As 高速公路
Open Table "沟渠" As 沟渠
Open Table "国道" As 国道
Open Table "湖泊" As 湖泊
Open Table "郊区地物" As 郊区地物
Open Table "居民地" As 居民地
Open Table "绿地" As 绿地
Open Table "桥" As 桥
Open Table "桥名" As 桥名
Open Table "区界" As 区界
Open Table "三级道路" As 三级道路
Open Table "山名" As 山名
Open Table "省道" As 省道
Open Table "双线河" As 双线河
Open Table "水阐" As 水阐
Open Table "铁路" As 铁路
Open Table "县界" As 县界
Open Table "县乡道" As 县乡道
Open Table "一般堤" As 一般堤
Open Table "一级道路" As 一级道路
Open Table "邮政界" As 邮政界
Open Table "城区地物" As 城区地物
Select *  from 一级道路 , 双线河  where 一级道路 . Obj intersects 双线河 . Obj  into Query26 
Select *  from 三级道路 , 双线河  where 三级道路 . Obj intersects 双线河 . Obj  into Query27 
Select *  from 铁路 , 双线河  where 铁路 . Obj intersects 双线河 . Obj  into Query28 
Map From 郊区地物,城区地物,山名,桥名,高速公路,国道,
  省道,一级道路,二级道路,三级道路,县乡道,铁路,
  桥,水阐,主要堤,一般堤,堤,电力线,
  沟渠,单线河,绿地,居民地,湖泊,双线河,
  县界,邮政界,区界 
  Position (0.0666667,-0.0166667) Units "in"
  Width 5.575 Units "in" Height 4.725 Units "in" 
Set Window FrontWindow() ScrollBars On Autoscroll On
Set Map
  CoordSys Earth Projection 1, 104
  Center (120.73576,37.1970235)
  Zoom 266.6429678 Units "km"
  Preserve Zoom Display Zoom
  XY Units "degree" Distance Units "km" Area Units "sq km"
Set Map
  Layer 1
    Display Graphic
    Zoom (0, 40) Units "km" 
    Label Line Arrow Position Right Font ("楷体_GB2312",256,10,128,16777215) Pen (1,2,0) 
      With NAME
      Parallel On Auto On Overlap Off Duplicates On Offset 2
      Visibility Zoom (0, 20) Units "km"
  Layer 2
    Display Graphic
    Zoom (0, 3) Units "km" 
    Label Line Arrow Position Right Font ("楷体_GB2312",256,10,128,16777215) Pen (1,2,0) 
      With NAME
      Parallel On Auto On Overlap Off Duplicates On Offset 2
      Visibility Zoom (0, 1.5) Units "km"
  Layer 3
    Display Graphic
    Zoom (0, 40) Units "km" 
    Label Line Arrow Position Right Font ("楷体_GB2312",256,12,128,16777215) Pen (1,2,0) 
      With NAME
      Parallel On Auto On Overlap Off Duplicates On Offset 2
      Visibility Zoom (0, 20) Units "km"
  Layer 4
    Display Graphic
    Zoom (0, 40) Units "km" 
    Label Line Arrow Position Right Font ("楷体_GB2312",256,12,12595216,16777215) Pen (1,2,0) 
      With NAME
      Parallel On Auto On Overlap Off Duplicates On Offset 2
      Visibility Zoom (0, 20) Units "km"
  Layer 5
    Display Graphic
    Label Line Arrow Position Above Font ("楷体_GB2312",256,12,128,16777215) Pen (1,2,0) 
      With name
      Parallel On Auto On Overlap Off Duplicates Off Offset 2
      Visibility On
  Layer 6
    Display Graphic
    Label Line Arrow Position Above Font ("楷体_GB2312",256,12,0,16777215) Pen (1,2,0) 
      With name
      Parallel On Auto On Overlap Off Duplicates Off Offset 2
      Visibility On
  Layer 7
    Display Graphic
    Zoom (0, 140) Units "km" 
    Label Line Arrow Position Above Font ("Arial",0,12,0) Pen (1,2,0) 
      With name
      Parallel On Auto Off Overlap Off Duplicates Off Offset 2
      Visibility On
  Layer 8
    Display Graphic
    Zoom (0, 140) Units "km" 
    Label Line Arrow Position Above Font ("楷体_GB2312",256,12,12595216,16777215) Pen (1,2,0) 
      With NAME
      Parallel On Auto On Overlap Off Duplicates Off Offset 2
      Visibility Zoom (0, 70) Units "km"
  Layer 9
    Display Graphic
    Zoom (0, 70) Units "km" 
    Label Line Arrow Position Above Font ("楷体_GB2312",256,12,24624,16777215) Pen (1,2,0) 
      With NAME
      Parallel On Auto On Overlap Off Duplicates Off Offset 2
      Visibility Zoom (0, 35) Units "km"
  Layer 10
    Display Graphic
    Zoom (0, 35) Units "km" 
    Label Line Arrow Position Above Font ("楷体_GB2312",256,10,13127246,16777215) Pen (1,2,0) 
      With NAME
      Parallel On Auto On Overlap Off Duplicates Off Offset 2
      Visibility Zoom (0, 20) Units "km"
  Layer 11
    Display Graphic
    Zoom (0, 70) Units "km" 
    Label Line Arrow Position Above Font ("Arial",0,12,0) Pen (1,2,0) 
      With name
      Parallel On Auto Off Overlap Off Duplicates Off Offset 2
      Visibility On
  Layer 12
    Display Graphic
    Zoom (0, 35) Units "km" 
    Label Line Arrow Position Above Font ("楷体_GB2312",256,12,0,16777215) Pen (1,2,0) 
      With name
      Parallel On Auto Off Overlap Off Duplicates Off Offset 2
      Visibility Zoom (0, 18) Units "km"
  Layer 13
    Display Graphic
    Zoom (0, 20) Units "km" 
    Label Line Arrow Position Above Font ("Arial",0,12,0) Pen (1,2,0) 
      With name
      Parallel On Auto Off Overlap Off Duplicates Off Offset 2
      Visibility On
  Layer 14
    Display Graphic
    Zoom (0, 20) Units "km" 
    Label Line Arrow Position Above Font ("Arial",0,12,0) Pen (1,2,0) 
      With name
      Parallel On Auto Off Overlap Off Duplicates Off Offset 2
      Visibility On
  Layer 15
    Display Graphic
    Zoom (0, 20) Units "km" 
    Label Line Arrow Position Above Font ("Arial",0,12,0) Pen (1,2,0) 
      With name
      Parallel On Auto Off Overlap Off Duplicates Off Offset 2
      Visibility On
  Layer 16
    Display Graphic
    Zoom (0, 20) Units "km" 
    Label Line Arrow Position Above Font ("Arial",0,12,0) Pen (1,2,0) 
      With name
      Parallel On Auto Off Overlap Off Duplicates Off Offset 2
      Visibility On
  Layer 17
    Display Graphic
    Zoom (0, 20) Units "km" 
    Label Line Arrow Position Above Font ("Arial",0,12,0) Pen (1,2,0) 
      With NAME
      Parallel On Auto Off Overlap Off Duplicates Off Offset 2
      Visibility On
  Layer 18
    Display Graphic
    Zoom (0, 10) Units "km" 
    Label Line Arrow Position Above Font ("Arial",0,12,0) Pen (1,2,0) 
      With name
      Parallel On Auto Off Overlap Off Duplicates Off Offset 2
      Visibility On
  Layer 19
    Display Graphic
    Zoom (0, 35) Units "km" 
    Label Line Arrow Position Above Font ("Arial",0,12,0) Pen (1,2,0) 
      With name
      Parallel On Auto Off Overlap Off Duplicates Off Offset 2
      Visibility Zoom (0, 20) Units "km"
  Layer 20
    Display Graphic
    Zoom (0, 35) Units "km" 
    Label Line Arrow Position Above Font ("宋体",256,11,255,16777215) Pen (1,2,0) 
      With name
      Parallel On Auto On Overlap Off Duplicates Off Offset 2
      Visibility Zoom (0, 20) Units "km"
  Layer 21
    Display Graphic
    Zoom (0, 20) Units "km" 
    Label Line None Position Center Font ("Arial",0,12,0) Pen (1,2,0) 
      With NAME
      Parallel On Auto Off Overlap Off Duplicates On Offset 2
      Visibility On
  Layer 22
    Display Graphic
    Zoom (0, 20) Units "km" 
    Label Line None Position Center Font ("Arial",0,12,0) Pen (1,2,0) 
      With name
      Parallel On Auto Off Overlap Off Duplicates On Offset 2
      Visibility On
  Layer 23
    Display Graphic
    Zoom (0, 20) Units "km" 
    Label Line None Position Center Font ("楷体_GB2312",0,12,255) Pen (1,2,0) 
      With name
      Parallel On Auto On Overlap Off Duplicates On Offset 2
      Visibility Zoom (0, 20) Units "km"
  Layer 24
    Display Graphic
    Zoom (0, 10) Units "km" 
    Label Line None Position Center Font ("楷体_GB2312",0,12,255) Pen (1,2,0) 
      With name
      Parallel On Auto On Overlap Off Duplicates On Offset 2
      Visibility Zoom (0, 5) Units "km"
  Layer 25
    Display Graphic
    Label Line None Position Center Font ("宋体",256,12,144,16777215) Pen (1,2,0) 
      With name
      Parallel On Auto On Overlap Off Duplicates On Offset 2
      Visibility On
  Layer 26
    Display Graphic
    Label Line None Position Center Font ("宋体",256,12,16719904,16777215) Pen (1,2,0) 
      With NAME
      Parallel On Auto On Overlap Off Duplicates On Offset 2
      Visibility Zoom (0, 20) Units "km"
  Layer 27
    Display Graphic
    Label Line None Position Center Font ("宋体",256,12,16719904,16777215) Pen (1,2,0) 
      With name
      Parallel On Auto On Overlap Off Duplicates On Offset 2
      Visibility On
Dim WorkspaceMaximizedWindow As Integer
WorkspaceMaximizedWindow = Frontwindow()
Set Window WorkspaceMaximizedWindow Max
Undim WorkspaceMaximizedWindow