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

OpenSCAD Paste

// Set a random seed
randSeed = floor(rands(1, 999999, 1[0]));
seed(randSeed);

// Parameters
BaseDiam = 0.9; // Diameter of the base circles in millimeters
TopDiam = 0.3; // Diameter of the top circles in millimeters
num_cones = 300; // 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 = 15;

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

// Define the maximum spacing between cones
max_spacing = BaseDiam * 20/16; // Adjust this value as needed

// 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]) linear_extrude(0.75) mirror([0, 1, 0]) text("555V 65", size = 1.75, valign = "center");
}

// Initialize an empty array to store cone positions
cone_positions = [];

// Randomly place pointy cones with minimum and maximum spacing
for (i = [1 : num_cones]) {
    valid_position = false;
    while (!valid_position) {
        x = rand(-platform_size / 2 + BaseDiam / 2, platform_size / 2 - BaseDiam / 2); // Generate random x coordinate
        y = rand(-platform_size / 2 + BaseDiam / 2, platform_size / 2 - BaseDiam / 2); // Generate random y coordinate

valid_position = true; // Assume the position is valid

// Check against existing cone positions
        for (pos = cone_positions) {
            dist = sqrt((x - pos[0])^2 + (y - pos[1])^2); // Calculate distance
            if (dist < min_spacing || dist > max_spacing) {
                valid_position = false; // Position is not valid
            }
        }
    }

// Create pointy cones with a base diameter of 0.9 mm and a rounded top 
    union() {
        translate([x, y, 0]) 
            cylinder(cone_height, d1 = BaseDiam, d2 = TopDiam, center = false);
    
        translate([x, y, cone_height]) 
            sphere(r = 0.15);
    }

// Append the cone position to the cone_positions array
    cone_positions = concat(cone_positions, [[x, y]]);
}