1 files changed, 13 insertions, 9 deletions
diff --git a/lasttretrad.scad b/lasttretrad.scad
index f0dd6a0..56da29a 100644
--- a/lasttretrad.scad
+++ b/lasttretrad.scad
@@ -1,4 +1,5 @@
 use <wheel.scad>;
+use <suspension_fork.scad>;
 
 // total outer dimension of the lasttretrad
 ltr_length = 3000;
@@ -40,34 +41,37 @@ module cargo_bed() {
 
 // specify (f)ront/(c)enter/(b)ack as -1/0/1 and (l)eft/(r)ight as -1/1
 module wheel_position(fcb, lr) {
-    translate([1300 * fcb, 450 * lr, -350])
+    translate([1250 * fcb, 450 * lr, 0])
     children();
 }
 
 // specify (f)ront/(b)ack and (l)eft/(r)ight as -1/1
-module steered_wheel(fb=-1, lr=-1, rot=0) {
-    rotate([90, 0, fb*rot])
-    wheel();
+module steered_wheel(fb=-1, lr=-1, rot=0, suspension_depth=0) {
+    rotate([ 0, 0, fb*rot]) suspension_fork(suspension_depth);
+
+    translate([0, 0, wheel_offset(suspension_depth)])
+    rotate([90, 0, fb*rot]) wheel();
 }
 
 // specify (l)eft/(r)ight as -1/1
-module powered_wheel(lr=-1) {
+module powered_wheel(lr=-1, suspension_depth=0) {
+    translate([0, 0, wheel_offset(suspension_depth)])
     rotate([90])
     wheel();
 }
 
-module lasttretrad() {
+module lasttretrad(rot=0, suspension_depth=0) {
     frame();
     cargo_bed();
     
     for (lr = [-1,1])
     for (fb = [-1,1])
     wheel_position(fb, lr)
-    steered_wheel(fb, lr, rot=30);
+    steered_wheel(fb, lr, rot=rot, suspension_depth=suspension_depth);
     
     for (lr = [-1,1])
     wheel_position(0, lr)
-    powered_wheel(lr);
+    powered_wheel(lr, suspension_depth=suspension_depth);
 }
 
-lasttretrad();
+lasttretrad(70, 50);