3dCustomizer.net: Design custom 3D Models for 3D printing

OpenSCAD Paste

// Parameters
BaseDiam = 0.9; // Diameter of the base circles in millimeters
TopDiam = 0.3; // Diameter of the top circles in millimeters
num_cones = 200; // Number of cones to place
cone_height = 1; // Height for the cones in millimeters

// Size of the platform
platform_size = 25;

// Set the fragment count for smoother circles in the preview
$fn = 10;

// Calculate the minimum spacing between cones based on the wavelength parameter
wavelength_parameter = 18/16; // Change this value as needed
min_spacing = BaseDiam * wavelength_parameter;

// square surface pad
CubePoints = [
    [-12.5, -12.5, -2], //0
    [12.5, -12.5, -2], //1
    [12.5, 12.5, -2], //2
    [-12.5, 12.5, -2], //3
    [-12.5, -12.5, 0], //4
    [12.5, -12.5, 0], //5
    [12.5, 12.5, 0], //6
    [-12.5, 12.5, 0] //7
];

CubeFaces = [
    [0, 1, 2, 3],  // bottom
    [4, 5, 1, 0],  // front
    [7, 6, 5, 4],  // top
    [5, 6, 2, 1],  // right
    [6, 7, 3, 2],  // back
    [7, 4, 0, 3]   // left
];

// Label
difference() {
    polyhedron(CubePoints, CubeFaces); // subsurface indent
    translate([0, 0, -2.01]) linear_extrude(0.75) mirror([0, 1, 0]) 
    
    text("555V 65", size = 1.75, valign = "center");
}

// Function to generate random cone positions
function MakePositions(count, i=0, positions=[]) =
    i >= count ? positions : MakePositions(count, i+1, [each positions, rands(-platform_size/2 + BaseDiam/2, platform_size/2 - BaseDiam/2, 2)]);

// Generate cone positions
cone_positions = MakePositions(num_cones);

// Generate cones at the specified positions
union() {
    for (pos = cone_positions) {
        translate([pos[0], pos[1], 0]) {
            cylinder(cone_height, d1 = BaseDiam, d2 = TopDiam, center = false);
            translate([0, 0, cone_height])
                sphere(r = 0.15);
        }
    }
}