forked from: [Papervision3D]頂点制御の練習
forked from [Papervision3D]頂点制御の練習 (diff: 15)
ActionScript3 source code
/**
* Copyright macomputer ( http://wonderfl.net/user/macomputer )
* MIT License ( http://www.opensource.org/licenses/mit-license.php )
* Downloaded from: http://wonderfl.net/c/pC8w
*/
// forked from Nicolas's [Papervision3D]頂点制御の練習
package {
import flash.display.Sprite;
import flash.events.Event;
import org.papervision3d.core.geom.*;
import org.papervision3d.core.geom.renderables.*;
import org.papervision3d.view.*;
import org.papervision3d.objects.primitives.*;
import org.papervision3d.materials.*;
public class FlashTest extends BasicView {
private var plane:Plane;
private var time:int = 0;
private var h1:Number = 0;
private var h2:Number = 0;
public function FlashTest() {
var material:WireframeMaterial = new WireframeMaterial(0xFF0000);
//平面を作る。引数は(material, width, height, segmentsW, segmentsH)
plane = new Plane(material, 500, 500, 1, 1);
//plane.rotationX = 90;
//sceneに追加
scene.addChild(plane);
//カメラ設定
// camera.y = 800;
camera.zoom = 80;
//レンダリング開始
startRendering();
//毎フレーム頂点をいじるよ
addEventListener(Event.ENTER_FRAME, loop);
}
private function loop(e:Event):void{
//左の高さh1と右の高さh2を計算
//h1 = 200 * Math.sin(time * Math.PI / 180);
//h2 = 200 * Math.sin((time + 180) * Math.PI / 180);//位相が180度ずれている
var v:Array = plane.geometry.vertices;//3Dオブジェクトの各頂点が含まれる配列
//segmentがW,Hともに1ならば、[0]と[1]が左側、[2]と[3]が右側の頂点を表す
v[0].x = h1;
//v[1].x = -h1;
//v[2].z = v[3].z = h2;
h1 += 1;
// h2 -= 1;
}
}
}
