下面是效果圖,如果大家趕興趣,我會給出詳細步驟.
1.認識KML文件


kml文件是Google Earth的地標文件,在Google Earth界面中隨便插入一個地標,然后選中-右鍵-復制,打開一個文本文件,粘貼.你就會看到原始文件,其實就是XML擴展語言,很容易看懂.下面是一個例子:
<?xml version="1.0" encoding="UTF-8"?>
<kml xmlns="http://earth.google.com/kml/2.1">
<Document>
<name>KmlFile</name>
<StyleMap id="msn_ylw-pushpin">
<air>
<key>normal</key>
<styleUrl>#sn_ylw-pushpin</styleUrl>
</Pair>
<air>
<key>highlight</key>
<styleUrl>#sh_ylw-pushpin</styleUrl>
</Pair>
</StyleMap>
<Style id="sh_ylw-pushpin">
<IconStyle>
<scale>1.3</scale>
<Icon>
<href>http://maps.google.com/mapfiles/kml/pushpin/ylw-pushpin.png</href>
</Icon>
<hotSpot x="20" y="2" xunits="pixels" yunits="pixels"/>
</IconStyle>
</Style>
<Style id="sn_ylw-pushpin">
<IconStyle>
<scale>1.1</scale>
<Icon>
<href>http://maps.google.com/mapfiles/kml/pushpin/ylw-pushpin.png</href>
</Icon>
<hotSpot x="20" y="2" xunits="pixels" yunits="pixels"/>
</IconStyle>
</Style>
<lacemark>
<name>Untitled 地標</name>
<LookAt>
<longitude>-96.49999999999993</longitude>
<latitude>40.50000000000001</latitude><altitude>0</altitude>
<range>25484000.00000001</range>
<tilt>2.862499213317163e-014</tilt>
<heading>7.802569820582511e-015</heading>
</LookAt>
<styleUrl>#msn_ylw-pushpin</styleUrl>
<Point>
<coordinates>-96.49999999999994,40.50000000000001,0</coordinates>
</Point>
</Placemark>
</Document>
</kml>
這里面對我們有用的就是經緯度語言格式,生成基站層就可以用它,怎樣才能批量生成基站層呢?目前已經有很多軟件實現,但我要告訴大家的是用 EXCEL 制作基站數據.要下班了,今天先寫到這吧.
2.第2步,制作EXCEL數據
把上面XLM原文件集中到一行內,然后分批拷入EXCEL表格中,注意地標名(基站名)單獨占一列,經緯度各站一列,然后就可以把你的基站名稱和經緯度拷入相應列中,其它列數據用鼠標拖動復制即可,然后復制粘貼到txt文件中,另存為KML文件,用google earth打開后就是2樓的效果了.怎樣生成扇區(qū)呢,咱們下回書接著說.

3.maoinfo中生成基站扇區(qū)

我們可以用Mapinfo2Google軟件把maoinfo地圖轉成 Google Earth格式.但先要在maoinfo中生成基站扇區(qū),目前有很多mapinfo插件程序,這些程序都是通過maobasic 語言編寫的, 下面是生成扇區(qū)的關鍵程序, 希望給maobasic 語言愛好者一點幫助.

if T_cellinfo.col5=360 then
update T_cellinfo set obj=createcircle(T_cellinfo.col3,T_cellinfo.col4,T_cellinfo.col6*1000) where rowid=row
else
pline_Spointx=T_cellinfo.col3+cos((360-T_cellinfo.col5-T_cellinfo.col7/2+90) * DEG_2_RAD)*T_cellinfo.col6*0.00001
pline_Spointy=T_cellinfo.col4+sin((360-T_cellinfo.col5-T_cellinfo.col7/2+90) * DEG_2_RAD)*T_cellinfo.col6*0.00001

pline1_Mpointx=T_cellinfo.col3
pline1_Mpointy=T_cellinfo.col4

pline2_Mpointx=T_cellinfo.col3+cos((360-T_cellinfo.col5+90) * DEG_2_RAD)*T_cellinfo.col6*0.00001
pline2_Mpointy=T_cellinfo.col4+sin((360-T_cellinfo.col5+90) * DEG_2_RAD)*T_cellinfo.col6*0.00001

pline_Epointx=T_cellinfo.col3+cos((360-T_cellinfo.col5+T_cellinfo.col7/2+90) * DEG_2_RAD)*T_cellinfo.col6*0.00001
pline_Epointy=T_cellinfo.col4+sin((360-T_cellinfo.col5+T_cellinfo.col7/2+90) * DEG_2_RAD)*T_cellinfo.col6*0.00001

create pline into variable pline1_obj 3 (pline_Spointx,pline_Spointy)(pline1_Mpointx,pline1_Mpointy)(pline_Epointx,pline_Epointy) pen(1,2,black)
create pline into variable pline2_obj 3 (pline_Spointx,pline_Spointy)(pline2_Mpointx,pline2_Mpointy)(pline_Epointx,pline_Epointy) pen(1,2,black) smooth

cell_obj=converttoregion(combine(pline1_obj,pline2_obj))
update T_cellinfo set obj=cell_obj where rowid=row
end if

下次講Mapinfo2Google軟件的使用.

[ 本帖最后由 cuit 于 2007-8-17 08:17 編輯 ]