kingBook

导航

统计

滑轮关节 实现悬挂物

复制代码
package{
    import Box2D.Collision.b2AABB;
    import Box2D.Collision.b2RayCastInput;
    import Box2D.Collision.b2RayCastOutput;
    import Box2D.Collision.Shapes.b2CircleShape;
    import Box2D.Collision.Shapes.b2PolygonShape;
    import Box2D.Collision.Shapes.b2Shape;
    import Box2D.Common.Math.b2Vec2;
    import Box2D.Dynamics.b2Body;
    import Box2D.Dynamics.b2BodyDef;
    import Box2D.Dynamics.b2Fixture;
    import Box2D.Dynamics.b2FixtureDef;
    import Box2D.Dynamics.b2World;
    import flash.display.Sprite;
    import flash.utils.getTimer;
    import Box2D.Dynamics.Joints.b2PulleyJoint;
    import Box2D.Dynamics.Joints.b2PulleyJointDef;

    /**
    * 
    */
    public class Main extends BaseMain{
        
        
        public function Main(){
            super(new b2Vec2(0,10));
        }
        
        override protected function init():void{
            var bodyA:b2Body=this.createBox(50,50,400,350);
            var bodyB:b2Body=_world.GetGroundBody();
            
            var jointDef:b2PulleyJointDef=new b2PulleyJointDef();
            
            //悬挂点
            var bindPos:b2Vec2=new b2Vec2(400/_pixelToMeter,300/_pixelToMeter);
            
            var anchorA:b2Vec2=bodyA.GetWorldCenter();
            var anchorB:b2Vec2=bodyB.GetWorldCenter();
            
            //距离必须大于滑轮关节的最小距离
            if(b2Vec2.Distance(anchorA,bindPos)>b2PulleyJoint.b2_minPulleyLength){
                var r:Number=0;
                jointDef.Initialize(bodyA,bodyB,bindPos,bindPos,anchorA,anchorB,r);
                var joint:b2PulleyJoint=_world.CreateJoint(jointDef) as b2PulleyJoint;
            }
            
        }
        
        override protected function stepBefore():void{ 
            
        }
        
        
    };
}
复制代码

源码地址:链接:http://pan.baidu.com/s/1gf5WpxD 密码:bsfh

posted on   kingBook  阅读(377)  评论(0编辑  收藏  举报

编辑推荐:
· AI与.NET技术实操系列(二):开始使用ML.NET
· 记一次.NET内存居高不下排查解决与启示
· 探究高空视频全景AR技术的实现原理
· 理解Rust引用及其生命周期标识(上)
· 浏览器原生「磁吸」效果!Anchor Positioning 锚点定位神器解析
阅读排行:
· DeepSeek 开源周回顾「GitHub 热点速览」
· 记一次.NET内存居高不下排查解决与启示
· 物流快递公司核心技术能力-地址解析分单基础技术分享
· .NET 10首个预览版发布:重大改进与新特性概览!
· .NET10 - 预览版1新功能体验(一)
点击右上角即可分享
微信分享提示