下面是效果圖,如果大家趕興趣,我會(huì)給出詳細(xì)步驟.
1.認(rèn)識(shí)KML文件


kml文件是Google Earth的地標(biāo)文件,在Google Earth界面中隨便插入一個(gè)地標(biāo),然后選中-右鍵-復(fù)制,打開(kāi)一個(gè)文本文件,粘貼.你就會(huì)看到原始文件,其實(shí)就是XML擴(kuò)展語(yǔ)言,很容易看懂.下面是一個(gè)例子:
<?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 地標(biāo)</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>
這里面對(duì)我們有用的就是經(jīng)緯度語(yǔ)言格式,生成基站層就可以用它,怎樣才能批量生成基站層呢?目前已經(jīng)有很多軟件實(shí)現(xiàn),但我要告訴大家的是用 EXCEL 制作基站數(shù)據(jù).要下班了,今天先寫(xiě)到這吧.
2.第2步,制作EXCEL數(shù)據(jù)
把上面XLM原文件集中到一行內(nèi),然后分批拷入EXCEL表格中,注意地標(biāo)名(基站名)單獨(dú)占一列,經(jīng)緯度各站一列,然后就可以把你的基站名稱(chēng)和經(jīng)緯度拷入相應(yīng)列中,其它列數(shù)據(jù)用鼠標(biāo)拖動(dòng)復(fù)制即可,然后復(fù)制粘貼到txt文件中,另存為KML文件,用google earth打開(kāi)后就是2樓的效果了.怎樣生成扇區(qū)呢,咱們下回書(shū)接著說(shuō).

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

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

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 編輯 ]