annotate trunk/tests/ChipmunkDemos/samples/Springies.d @ 16:af2f61a96318

ported chipmunk demos
author Extrawurst
date Sat, 04 Dec 2010 02:02:29 +0100
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
16
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
1
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
2 // written in the D programming language
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
3
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
4 module samples.Springies;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
5
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
6 import chipmunkd.chipmunk;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
7
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
8 import samples.ChipmunkDemo;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
9
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
10 static cpSpace *space;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
11
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
12 static cpFloat
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
13 springForce(cpConstraint *spring, cpFloat dist)
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
14 {
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
15 cpFloat clamp = 20.0f;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
16 return cpfclamp(cpDampedSpringGetRestLength(spring) - dist, -clamp, clamp)*cpDampedSpringGetStiffness(spring);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
17 }
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
18
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
19 static cpConstraint *
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
20 new_spring(cpBody *a, cpBody *b, cpVect anchr1, cpVect anchr2, cpFloat restLength, cpFloat stiff, cpFloat damp)
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
21 {
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
22 cpConstraint *spring = cpDampedSpringNew(a, b, anchr1, anchr2, restLength, stiff, damp);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
23 cpDampedSpringSetSpringForceFunc(spring, &springForce);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
24
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
25 return spring;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
26 }
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
27
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
28 static void
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
29 update(int ticks)
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
30 {
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
31 enum int steps = 1;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
32 enum cpFloat dt = 1.0f/60.0f/cast(cpFloat)steps;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
33
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
34 for(int i=0; i<steps; i++){
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
35 cpSpaceStep(space, dt);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
36 }
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
37 }
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
38
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
39 static cpBody *
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
40 add_bar(cpVect a, cpVect b, int group)
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
41 {
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
42 cpVect center = cpvmult(cpvadd(a, b), 1.0f/2.0f);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
43 cpFloat length = cpvlength(cpvsub(b, a));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
44 cpFloat mass = length/160.0f;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
45
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
46 cpBody *_body = cpSpaceAddBody(space, cpBodyNew(mass, mass*length*length/12.0f));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
47 _body.p = center;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
48
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
49 cpShape *shape = cpSpaceAddShape(space, cpSegmentShapeNew(_body, cpvsub(a, center), cpvsub(b, center), 10.0f));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
50 shape.group = group;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
51
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
52 return _body;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
53 }
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
54
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
55 static cpSpace *
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
56 init()
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
57 {
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
58 space = cpSpaceNew();
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
59 cpBody *staticBody = &space.staticBody;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
60
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
61 cpBody *body1 = add_bar(cpv(-240, 160), cpv(-160, 80), 1);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
62 cpBody *body2 = add_bar(cpv(-160, 80), cpv( -80, 160), 1);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
63 cpBody *body3 = add_bar(cpv( 0, 160), cpv( 80, 0), 0);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
64 cpBody *body4 = add_bar(cpv( 160, 160), cpv( 240, 160), 0);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
65 cpBody *body5 = add_bar(cpv(-240, 0), cpv(-160, -80), 2);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
66 cpBody *body6 = add_bar(cpv(-160, -80), cpv( -80, 0), 2);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
67 cpBody *body7 = add_bar(cpv( -80, 0), cpv( 0, 0), 2);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
68 cpBody *body8 = add_bar(cpv( 0, -80), cpv( 80, -80), 0);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
69 cpBody *body9 = add_bar(cpv( 240, 80), cpv( 160, 0), 3);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
70 cpBody *body10 = add_bar(cpv( 160, 0), cpv( 240, -80), 3);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
71 cpBody *body11 = add_bar(cpv(-240, -80), cpv(-160, -160), 4);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
72 cpBody *body12 = add_bar(cpv(-160, -160), cpv( -80, -160), 0);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
73 cpBody *body13 = add_bar(cpv( 0, -160), cpv( 80, -160), 0);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
74 cpBody *body14 = add_bar(cpv( 160, -160), cpv( 240, -160), 0);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
75
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
76 cpSpaceAddConstraint(space, cpPivotJointNew2( body1, body2, cpv( 40,-40), cpv(-40,-40)));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
77 cpSpaceAddConstraint(space, cpPivotJointNew2( body5, body6, cpv( 40,-40), cpv(-40,-40)));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
78 cpSpaceAddConstraint(space, cpPivotJointNew2( body6, body7, cpv( 40, 40), cpv(-40, 0)));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
79 cpSpaceAddConstraint(space, cpPivotJointNew2( body9, body10, cpv(-40,-40), cpv(-40, 40)));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
80 cpSpaceAddConstraint(space, cpPivotJointNew2(body11, body12, cpv( 40,-40), cpv(-40, 0)));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
81
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
82 cpFloat stiff = 100.0f;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
83 cpFloat damp = 0.5f;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
84 cpSpaceAddConstraint(space, new_spring(staticBody, body1, cpv(-320, 240), cpv(-40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
85 cpSpaceAddConstraint(space, new_spring(staticBody, body1, cpv(-320, 80), cpv(-40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
86 cpSpaceAddConstraint(space, new_spring(staticBody, body1, cpv(-160, 240), cpv(-40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
87
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
88 cpSpaceAddConstraint(space, new_spring(staticBody, body2, cpv(-160, 240), cpv( 40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
89 cpSpaceAddConstraint(space, new_spring(staticBody, body2, cpv( 0, 240), cpv( 40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
90
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
91 cpSpaceAddConstraint(space, new_spring(staticBody, body3, cpv( 80, 240), cpv(-40, 80), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
92
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
93 cpSpaceAddConstraint(space, new_spring(staticBody, body4, cpv( 80, 240), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
94 cpSpaceAddConstraint(space, new_spring(staticBody, body4, cpv( 320, 240), cpv( 40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
95
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
96 cpSpaceAddConstraint(space, new_spring(staticBody, body5, cpv(-320, 80), cpv(-40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
97
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
98 cpSpaceAddConstraint(space, new_spring(staticBody, body9, cpv( 320, 80), cpv( 40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
99
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
100 cpSpaceAddConstraint(space, new_spring(staticBody, body10, cpv( 320, 0), cpv( 40,-40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
101 cpSpaceAddConstraint(space, new_spring(staticBody, body10, cpv( 320,-160), cpv( 40,-40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
102
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
103 cpSpaceAddConstraint(space, new_spring(staticBody, body11, cpv(-320,-160), cpv(-40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
104
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
105 cpSpaceAddConstraint(space, new_spring(staticBody, body12, cpv(-240,-240), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
106 cpSpaceAddConstraint(space, new_spring(staticBody, body12, cpv( 0,-240), cpv( 40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
107
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
108 cpSpaceAddConstraint(space, new_spring(staticBody, body13, cpv( 0,-240), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
109 cpSpaceAddConstraint(space, new_spring(staticBody, body13, cpv( 80,-240), cpv( 40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
110
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
111 cpSpaceAddConstraint(space, new_spring(staticBody, body14, cpv( 80,-240), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
112 cpSpaceAddConstraint(space, new_spring(staticBody, body14, cpv( 240,-240), cpv( 40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
113 cpSpaceAddConstraint(space, new_spring(staticBody, body14, cpv( 320,-160), cpv( 40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
114
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
115 cpSpaceAddConstraint(space, new_spring( body1, body5, cpv( 40,-40), cpv(-40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
116 cpSpaceAddConstraint(space, new_spring( body1, body6, cpv( 40,-40), cpv( 40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
117 cpSpaceAddConstraint(space, new_spring( body2, body3, cpv( 40, 40), cpv(-40, 80), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
118 cpSpaceAddConstraint(space, new_spring( body3, body4, cpv(-40, 80), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
119 cpSpaceAddConstraint(space, new_spring( body3, body4, cpv( 40,-80), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
120 cpSpaceAddConstraint(space, new_spring( body3, body7, cpv( 40,-80), cpv( 40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
121 cpSpaceAddConstraint(space, new_spring( body3, body7, cpv(-40, 80), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
122 cpSpaceAddConstraint(space, new_spring( body3, body8, cpv( 40,-80), cpv( 40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
123 cpSpaceAddConstraint(space, new_spring( body3, body9, cpv( 40,-80), cpv(-40,-40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
124 cpSpaceAddConstraint(space, new_spring( body4, body9, cpv( 40, 0), cpv( 40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
125 cpSpaceAddConstraint(space, new_spring( body5, body11, cpv(-40, 40), cpv(-40, 40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
126 cpSpaceAddConstraint(space, new_spring( body5, body11, cpv( 40,-40), cpv( 40,-40), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
127 cpSpaceAddConstraint(space, new_spring( body7, body8, cpv( 40, 0), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
128 cpSpaceAddConstraint(space, new_spring( body8, body12, cpv(-40, 0), cpv( 40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
129 cpSpaceAddConstraint(space, new_spring( body8, body13, cpv(-40, 0), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
130 cpSpaceAddConstraint(space, new_spring( body8, body13, cpv( 40, 0), cpv( 40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
131 cpSpaceAddConstraint(space, new_spring( body8, body14, cpv( 40, 0), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
132 cpSpaceAddConstraint(space, new_spring(body10, body14, cpv( 40,-40), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
133 cpSpaceAddConstraint(space, new_spring(body10, body14, cpv( 40,-40), cpv(-40, 0), 0.0f, stiff, damp));
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
134
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
135 return space;
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
136 }
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
137
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
138 static void
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
139 destroy()
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
140 {
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
141 cpSpaceFreeChildren(space);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
142 cpSpaceFree(space);
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
143 }
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
144
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
145 chipmunkDemo Springies = {
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
146 "Springies",
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
147 null,
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
148 &init,
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
149 &update,
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
150 &destroy,
af2f61a96318 ported chipmunk demos
Extrawurst
parents:
diff changeset
151 };