It turned out to be easy to let move the camera onto one stepper motoshaft and let it turn together with motor shaft.
The union of both is created in "ptc(ang2)".
Then in "pt(ang,ang2)" instead of moving just the geraed stepper to motorshaft of base stepper, now "ptc()" is moved, and all works.
The handling of animation $t variable is a bit clumsy, but doable with if else ladder:The only change in NopSCADlib repo is described in previous posting, I will create a feature proposal issue i the repo proposing the motor shaft angle parameter for "geared_stepper()".
Start "openscad pt2.scad", then click on "View->View All", then on "View->Animate", enter 72 in "Steps:" field and finally 9 in "FPS:" field will make animation start. Like in previous posting animation was captured with wf-recorder, relevant part is extracted from .mp4 with ffmpeg and vid2gif converted that to this animated .gif:
![Image]()
Not exactly the same movements as in below video, but separate movements of both geared stepper motors, and combined movements, so above is good enough for me:
![Image]()
P.S:
The new feature proposal issue:
https://github.com/nophead/NopSCADlib/issues/277
The union of both is created in "ptc(ang2)".
Then in "pt(ang,ang2)" instead of moving just the geraed stepper to motorshaft of base stepper, now "ptc()" is moved, and all works.
The handling of animation $t variable is a bit clumsy, but doable with if else ladder:
Code:
pi@raspberrypi5:~ $ cat pt2.scad include <NopSCADlib/vitamins/geared_steppers.scad>include <NopSCADlib/core.scad>include <NopSCADlib/vitamins/cameras.scad>use <NopSCADlib/vitamins/pcb.scad>module ptc(ang2) { rotate([180,0,0]) union(){ geared_stepper(28BYJ_48,ang2); rotate([90,0,180-ang2]) translate([9.8,-16.5,1.7]) rotate([0,0,90]) camera(cameras[0]); }}module pt(ang,ang2) { rotate([180,0,0]) geared_stepper(28BYJ_48,ang); rotate([0,0,ang]) rotate([270,0,0]) translate([0,-29.0,-1.5]) ptc(ang2);}deg=90;c=90;if($t<0.125){ a=180+$t/0.125*deg; pt(a,c);}else if ($t<0.25){ a=180+deg-($t-0.125)/0.125*deg; pt(a,c);}else if ($t<0.375){ b=c+($t-0.25)/0.125*deg; pt(180,b);}else if ($t<0.5){ b=c+deg-($t-0.375)/0.125*deg; pt(180,b);} else if($t<0.625){ a=180+($t-0.5)/0.125*deg; b=c+deg-90+($t-0.5)/0.125*deg; pt(a,b);}else if ($t<0.75){ a=180+deg-($t-0.625)/0.125*deg; b=c+deg-($t-0.625)/0.125*deg; pt(a,b);}else if ($t<0.875){ a=180-($t-0.75)/0.125*deg; b=c-($t-0.75)/0.125*deg; pt(a,b);}else{ a=90+($t-0.875)/0.125*deg; b=c+deg-180+($t-0.875)/0.125*deg; pt(a,b);} pi@raspberrypi5:~ $ Start "openscad pt2.scad", then click on "View->View All", then on "View->Animate", enter 72 in "Steps:" field and finally 9 in "FPS:" field will make animation start. Like in previous posting animation was captured with wf-recorder, relevant part is extracted from .mp4 with ffmpeg and vid2gif converted that to this animated .gif:
Not exactly the same movements as in below video, but separate movements of both geared stepper motors, and combined movements, so above is good enough for me:
P.S:
The new feature proposal issue:
https://github.com/nophead/NopSCADlib/issues/277
Statistics: Posted by HermannSW — Sun Jun 30, 2024 10:34 am