[Flex,천문] 구에서 두 지점 간 거리구하기 소스 -지돌스타 블로그-

[Flex,천문] 구에서 두 지점 간 거리구하기 소스

2007/08/31 13:22

Leave a Comment

[공지]이미지나 링크가 깨졌다면 댓글 부탁드립니다.

구에서 두 지점간의 거리에 대한 글을 예전에 쓴 적이 있다. 이것을 Flex로 구현해보았다.

참고글 : http://blog.jidolstar.com/172

아래의 위 프로그램의 소스코드이다.

TwoPointDistanceSphere.zip

main.mxml (Language : xml)

<?xml version="1.0" encoding="utf-8"?>
<mx:Application xmlns:mx="http://www.adobe.com/2006/mxml" layout="absolute">

<mx:Script>
<![CDATA[
import mx.controls.Alert;
private function calculate(radius:Number, lon1:Number, lat1:Number, lon2:Number, lat2:Number):Number
{
if(radius <= 0)
{
mx.controls.Alert.show("반지름은 0보다 커야합니다.");
return 0;
}
if(lon1 < 0 || lon1>360)
{
mx.controls.Alert.show("경도는 0~360사이값이어야 합니다.");
return 0;
}
if(lon2 < 0 || lon2>360)
{
mx.controls.Alert.show("경도는 0~360사이값이어야 합니다.");
return 0;
}
if(lat1 < -90 || lat1>90)
{
mx.controls.Alert.show("위도는 -90~90사이값이어야 합니다.");
return 0;
}
if(lat1 < -90 || lat1>90)
{
mx.controls.Alert.show("위도는 -90~90사이값이어야 합니다.");
return 0;
}
var D2R:Number = Math.PI / 180.0;
lon1 = lon1 * D2R;
lat1 = lat1 * D2R;
lon2 = lon2 * D2R;
lat2 = lat2 * D2R;
var dlon:Number = lon2-lon1;
var dlat:Number = lat2-lat1;
var a:Number = Math.pow( Math.sin(dlat/2.0), 2.0) + Math.cos(lat1) * Math.cos(lat2) * Math.pow(Math.sin(dlon/2.0),2.0);
var c:Number = 2.0 * Math.atan2( Math.sqrt(a), Math.sqrt(1-a));
var distance:Number = radius* c;
return distance;
}
]]>
</mx:Script>
<mx:Panel layout="vertical" title="구에서 두 지점간의 거리 구하기" height="550" y="0" width="550" x="0"
paddingBottom="5" paddingLeft="5" paddingRight="5" paddingTop="5">

<mx:TabNavigator width="100%" height="100%" paddingBottom="5" paddingLeft="5" paddingRight="5" paddingTop="5">
<mx:Canvas label="계산" width="100%" height="100%">
<mx:VBox>
<mx:Label text="입력값"/>
<mx:HBox>
<mx:Form x="10" y="10" width="100%" height="100%">
<mx:FormHeading label="1 지점"/>
<mx:FormItem label="경도">
<mx:TextInput id="txtLon1" x="66" y="100" restrict="[0-9\.]" text="0"/>
</mx:FormItem>
<mx:FormItem label="위도">
<mx:TextInput id="txtLat1" x="66" y="100" restrict="[\-0-9\.]" text="90"/>
</mx:FormItem>
</mx:Form>
<mx:Form x="10" y="10" width="100%" height="100%">
<mx:FormHeading label="2 지점"/>
<mx:FormItem label="경도">
<mx:TextInput id="txtLon2" x="66" y="100" restrict="[0-9\.]" text="0"/>
</mx:FormItem>
<mx:FormItem label="위도">
<mx:TextInput id="txtLat2" x="66" y="100" restrict="[\-0-9\.]" text="-90"/>
</mx:FormItem>
</mx:Form>
</mx:HBox>
<mx:Form x="10" y="10" width="100%" height="100%">
<mx:FormItem label="구의 반지름(지구반지름 km)">
<mx:TextInput id="txtRadius" x="66" y="100" restrict="[0-9]" maxChars="3" text="6376.5" width="114"/>
</mx:FormItem>
</mx:Form>
<mx:Box horizontalAlign="right" width="100%">
<mx:Button x="181" y="170" label="거리계산" click="txtResult.text = String(calculate(Number(txtRadius.text), Number(txtLon1.text), Number(txtLat1.text), Number(txtLon2.text), Number(txtLat2.text)))"/>
</mx:Box>

<mx:HRule width="100%"/>
<mx:Label text="계산결과"/>
<mx:TextInput id="txtResult" width="100%"/>
</mx:VBox>
</mx:Canvas>
<mx:Canvas label="공식" width="100%" height="100%">
<mx:VBox>
<mx:Image source="@Embed('1348441504.png')" />
<mx:Image source="@Embed('1282734412.png')"/>
</mx:VBox>
</mx:Canvas>

</mx:TabNavigator>
<mx:ApplicationControlBar width="100%">
<mx:HBox id="footerBox" width="100%" height="26" y="{this.height-footerBox.height}">
   <mx:LinkButton label="Adobe Flex/AIR Korean documentation"
   click="navigateToURL(new URLRequest('http://flexdocs.kr'));"
   styleName="footerLink" textDecoration="underline" alpha="0.2"
   />
   <mx:Spacer width="100%" />
   <mx:LinkButton label="Created by Jidolstar"
   click="navigateToURL(new URLRequest('http://blog.jidolstar.com/'));"
   styleName="footerLink"
   textDecoration="underline" alpha="0.2"
   />
</mx:HBox>
</mx:ApplicationControlBar>
</mx:Panel>

<mx:Style>
Application{
fontSize:12pt
}
.flexdocLink{
   fontFamily: Verdana;
   fontSize: 12;
   fontWeight: normal;
   color: #FFFFFF;
   rollOverColor: #FFFFFF;
   textRollOverColor: #FFFFFF;
   selectionColor: #FFFFFF;
   textSelectionColor: #000000;
}

.footerLink {
   fontFamily: Verdana;
   fontSize: 9;
   fontWeight: normal;
   color: #FFFFFF;
   rollOverColor: #FFFFFF;
   textRollOverColor: #FFFFFF;
   selectionColor: #FFFFFF;
   textSelectionColor: #000000;
}

</mx:Style>
</mx:Application>

글쓴이 : 지돌스타(http://blog.jidolstar.com/217)

크리에이티브 커먼즈 라이선스

이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-동일조건변경허락 2.0 대한민국 라이선스에 따라 이용하실 수 있습니다.

'천문학 > 천문프로그래밍' 카테고리의 다른 글

천문학에서 쓰이는 좌표계의 종류 (0)	2009/09/11
[천문]각도변환문제 : 도(degree), 시(hour), 라디안(radian) (2)	2009/05/15
[Flex,천문] 구에서 두 지점 간 거리구하기 소스 (0)	2007/08/31
[천문 프로그래밍] 태양의 대략적인 위치 계산 방법 (0)	2007/08/16
[천문] 별자리 프로그램의 기본-3차원을 2차원으로 표현해보자 (0)	2007/07/26
[천문] 구에서 두 좌표의 거리 구하기 (7)	2007/07/26