flash on 2014-9-19
♥0 |
Line 35 |
Modified 2014-09-23 09:51:22 |
MIT License
archived:2017-03-20 03:18:20
ActionScript3 source code
/**
* Copyright tepe ( http://wonderfl.net/user/tepe )
* MIT License ( http://www.opensource.org/licenses/mit-license.php )
* Downloaded from: http://wonderfl.net/c/8msR
*/
package {
import flash.display.Sprite;
import flash.text.*;
public class FlashTest extends Sprite {
private var tf:TextField = new TextField();
public function FlashTest() {
// write as3 code here..
tf.text = "test";
tf.text = "";
tf.width=400;
tf.height=400;
addChild(tf);
test1();
}
private var r:Number = 6378.137;
private function test1():void{
var b:int = 10;
var c:Number = 90/b;
for(var i:int=0;i<10;i++){
var a:Number = i*10;
var len:Number = func2(a);
tf.appendText("lat:"+a.toString()+" "+Math.floor(len).toString()+"km\n");
}
a = 89.99;
len = func2(a);
tf.appendText("lat:"+a.toString()+" "+Math.floor(len).toString()+"km\n");
}
//緯度を指定し一周の長さを取得する(km)
public function func2(n:Number):Number{
if(90<=Math.abs(n))return 0;
const r:Number = 6378.137;//赤道半径(km)
var rad:Number = (n/90)*Math.PI/2;
var len:Number = (r*Math.cos(rad))*Math.PI*2;
return len;
}
}
}