Please visit http://OpenSCAD.DIY3DTech.com for more information on this and many other projects! As in this episode we will be designing, coding and then printing an Art Pencil and Tool Carousel so come check out this multi function build!
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 |
/* * Open SCAD Name.: Round_Art_Stand.scad * Copyright (c)..: 2016 www.DIY3DTech.com * * Creation Date..:07/15/2016 * Discription....: Round Art Pencil or Tool Holder * * Rev 1: Developed Model * Rev 2: * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * If used commercially attribution is required (OpenSCAD.DIY3DTech.com) * */ /*------------------Customizer View-------------------*/ // preview[view:north, tilt:top] /*---------------------Parameters---------------------*/ max_dia = 7.0; //max dia in inches /*-----------------------Execute----------------------*/ Art_Stand(); /*-----------------------Modules----------------------*/ module Art_Stand() { //set circle resolution $fn = 60; difference(){ union() { //create center tower #translate([0,0,100/2]) cylinder(100,25.4,25.4,center=true); //create tiered outer loops circleloop(10,70,20,0,60); circleloop(20,50,20,0,85); circleloop(30,30,30,0,110); //create outer rim rim(); }//end union //start difference //create center tower opening translate([0,0,(105/2)+3]) cylinder(105,22,22,center=true); //create tiered outer loop holes circleloop(10,100,12,3,60); circleloop(20,100,10,3,85); circleloop(30,100,10,3,110); }//end differance }//end module module circleloop(number,height,dia,z_off,spread){ //create circle pattern for (i=[0:(360/number):360]) { //theta is degrees set by for loop from 0 to 360 (degrees) theta=i; //this sets the x axis point based on the COS of the theta x=0+(spread/2)*cos(theta); //this sets the y axis point based on the sin of the theta y=0+(spread/2)*sin(theta); //this creates the circle or other obect at the x,y point translate([x,y,(height/2)+z_off]) rotate([0,0,0]) cylinder(height,dia/2,dia/2,center=true); }//end for loop for circle creation }//end module module rim(){// create outer rim of tray difference(){ union() { translate([0,0,3/2]) cylinder(10,(25.4*max_dia)/2,(25.4*max_dia)/2,center=true); }//end union //start difference #translate([0,0,10/2]) cylinder(10,((25.4*max_dia)-1.5)/2,((25.4*max_dia)-1.5)/2,center=true); }//difference }//end module /*---------------------End Program--------------------*/ |
If your looking for looking 3D Printer, Laser Cutter and CNC Swag (T-Shirts, Hats, Mugs, etc), please support the channel by visiting our online shop at: http://swag.DIY3DTech.com
Also subscribe to our parent YouTube Channel DIY3DTech.com YouTube Channel for 3D Printing, Laser Manufacturing and CNC Machining: http://YouTube.DIY3DTech.com
More Ideas!
Open SCAD – Scale Guides!
Open SCAD – Introduction Part 1 for New Users!
Open SCAD – Universal Base Designer!