Skip to content

Instantly share code, notes, and snippets.

View t-paul's full-sized avatar

Torsten Paul t-paul

45 followers · 5 following
View GitHub Profile
@t-paul
t-paul / cura-git.sh
Last active December 25, 2015 07:19
cura-scripts
#!/bin/bash
#
# The script will fetch the latest version from github,
# compile and install CuraEngine and start the GUI.
#
# Configuration:
#
# Installation folder where the Cura and support repositories
# are cloned/updated to.
#
@t-paul
t-paul / 00info.txt
Last active March 3, 2019 01:51
openscad
Image link:
![My Image](https://gist.github.com/t-paul/7171783#file-openscad-freetype-4-png)
@t-paul
t-paul / generate-scad-file.sh
Created February 15, 2014 20:36
#!/bin/bash
CNT=0
WINID=$(xwininfo -name "OpenSCAD - test.scad" | grep "Window id:" | awk '{ print $4; }')
NUM=${1-50}
echo "Using ${NUM}x${NUM} cube area..."
while true
do
@t-paul
t-paul / branches.md
Last active August 29, 2015 13:57
openscad-branches

text-module

  • Render 2D text shapes

translation1

  • GUI translation (locales: de, ru, cz on the way)

mdi+dockable-windows

@t-paul
t-paul / math-surface.scad
Created January 29, 2015 21:58
Math Surface
size = 20;
step = 0.5;
function f0(x, y) = sin(sqrt(pow(x, 2) + pow(y, 2)) * 180 / PI) + 2;
function f1(x, y) = sqrt(pow(x, 2) + pow(y, 2) + 3);
function f(x, y) = 20 * f0(x, y) / f1(x, y) + 4;
// see https://github.com/openscad/scad-utils
function flatten(list) = [ for (i = list, v = i) v ];
@t-paul
t-paul / cube-2014.03.stl
Last active April 1, 2020 15:10
cube
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
@t-paul
t-paul / animation
Created September 21, 2015 12:33
// Enable animation, e.g. FPS = 20, Steps = 500
$fa = 1;
$fs = 1;
$vpd = 600; // fixed distance, comment to scale the viewport
size = 20;
// --- helper functions for animation ----------------------------------------
@t-paul
t-paul / profile1.scad
Last active October 14, 2016 12:24
CAM profile animation
function d(a) = a % 360 < 180 ? 30 + 5 * sin(3 * a) : 30;
points = [ for (a = [0 : 359]) let(t = a + $t * 360) [
d(t) * -sin(a),
d(t) * cos(a)
] ];
polygon(points);
translate([-d($t * 360 + 90) - 10, 0]) {
color("blue") square([20, 1], center = true);
@t-paul
t-paul / wavy-thing.scad
Created September 17, 2018 23:16
$fa = 2; $fs = 0.2;
r = 4;
w = 50;
h = 155;
cnt = 7;
steps = 8;
space = 12;
function weave(x) = [
@t-paul
t-paul / drawing_cm.svg
Created February 27, 2019 19:53
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.