Odkapavac (openscad no sci-fi)

Toto fórum slouží k prezentaci vlastní tvorby, včeně stl, popřípadě i src. Nevkládejte prosím komerční nabídky a ani prezentace tvorby, která není zpřístupněna ostatním zdarna. Děkuji

Odkapavac (openscad no sci-fi)

Příspěvekod nasranek » 15.11.2017 15:24

Jednoduchý výtvor v OpenScadu s použitím knihovny (knihovna je moje male dílko, protože jak jsem studoval
podobné prográmky na netu tak to tam bylo samé sinus/pi/cos/.... a přitom to jde udělat jednoduše.

Omlouvám se tu je final verze umožňuje i plastev_raznice (x,y,z,t);

Tak tu je knihovna (program) umístit do kmenového viz popis:
Kód: Vybrat vše
/*Jednoduchá plastev *** nasranek@seznam.cz ***
použití
use <net/plastev.scad>  - net umístění v kmenovém adresáři
viz: C:\Program Files\OpenSCAD\libraries\net\plastev.scad

plastev (x,y,z,t,$fn);
plastev_raznice (x,y,z,t,$fn);
x=délka
y=šířka
z=výška
t=šířka mezer plastve /9 pro plástev
$fn=tvar 3-trojuhehelnik,4 kosočtverec, 5 uhelnik
6= plastev
nad 12 už je to kruh a je nutnu upravit t

*/

    t=9;
x=50;
    y=25;
z=1;
$fn=6;
module plastev (){

    module plastevzakl (){
for (a=[5:16:x]){
   for (b=[1:9:y])
    {
    translate ([a,b,0]) cylinder (h=z+1,d=t,center=false);
   
        translate ([
        a+8,b+4,0]) cylinder (h=z+1,d=t,center=false);
}}}

difference (){
   
    cube([x,y,z],center=false);
plastevzakl();}}
//plastev ();

module plastev_raznice (){
for (a=[5:16:x]){
   for (b=[1:9:y])
    {
    translate ([a,b,0]) cylinder (h=z,d=t,center=false);
   
        translate ([
        a+8,b+4,0]) cylinder (h=z,d=t,center=false);
}}}

plastev_raznice ();

Houbicka_Final.stl
OpenSad
(1.05 MiB) Zobrazeno 5108 krát


Zase omluva tady je skript na ten odkapávač.

Kód: Vybrat vše
use <net/plastev.scad>
$fn=120;
module dno (){
module zaklad (){
difference (){
cube ([110,70,22],center=true);
translate ([0,0,2])cube ([106,44,22],center=true);
    translate ([0,0,2])cube ([84,66,22],center=true);
    translate ([0,0,11])cube ([106,66,22],center=true);
}}
difference (){
zaklad();

for(x=[-47:94:47]){
    for (y=[-27:54:27]){
    z=-10;
translate ([x,y,z])cylinder (h=10,d=5,center=true);}
}}}

module noha(){
cylinder (h=4,d=4.5,center=true);
translate ([0,0,-4]) cylinder (h=4,d=9,$fn=6,center=true);
cylinder (h=4,d=4.5,center=true);
}

module vsuvka (){
    difference (){
    cube([105,65,1.2],center=true);
    cube([100,60,2],center=true);
    }
       translate([-51,-30,-0.6])  plastev (x=102,y=60,z=1.2);
    }
 
    module nahled (){
dno ( );
  translate ([0,0,2]) vsuvka ();       
for(x=[-47:94:47]){
    for (y=[-27:54:27]){
    z=-8;
translate ([x,y,z]) noha ();
   }}}
        //nahled (); dno ();  noha (); vsuvka (); generovat samostatně
   
nahled();
  • 0

Naposledy upravil nasranek dne 15.11.2017 19:59, celkově upraveno 4
nasranek
 
Příspěvky: 268
Images: 0
Registrován: 06.03.2017 01:16
Bydliště: Orlová 4
Reputation: 0

Re: Odkapavac (openscad no sci-fi)

Příspěvekod nasranek » 15.11.2017 16:20

Dobrá tedy něco jednoduchého:

Kód: Vybrat vše
use <net/plastev.scad>
   difference (){
    cube([105,65,30],center=true);
    cube([100,60,32],center=true);
    }
       translate([-51,-30,-14.6])  plastev (x=102,y=60,z=1.2);


BezejmennĂ˝.stl
(412.47 KiB) Zobrazeno 5092 krát


skus toto udělat rychlejc v jiném programu
  • 0

nasranek
 
Příspěvky: 268
Images: 0
Registrován: 06.03.2017 01:16
Bydliště: Orlová 4
Reputation: 0

Re: Odkapavac (openscad no sci-fi)

Příspěvekod nasranek » 15.11.2017 18:40

Použití plastev_raznice (x,y,z,t);
je to jednoduchý tvar , no více tvaru udělám toho více pro názornou ukázku:
upraveno s 60 na 66 aby se nedotýkaly :oops:

test.stl
(1.09 MiB) Zobrazeno 5055 krát


tady je skript:
Kód: Vybrat vše
use <net/plastev.scad>

 a=6;
 
module zaklad (){
difference (){
    cylinder (h=30,d=60,center=true,$fn=a);
    cylinder (h=30,d=58,center=true,$fn=a);
}}


module zakladR (){
difference (){
    cylinder (h=30,d=60,center=true,$fn=a);
  translate ([0,0,2])  cylinder (h=30,d=58,center=true,$fn=a);
    translate ([-45,-40,-15]) plastev_raznice (x=80,y=80,z=3);
}}

zakladR ();
zaklad ();
translate ([-66,60,0])zakladR (a=5);
translate ([-66,60,0])zaklad (a=5);
translate ([66,0,0])zakladR (a=100);
translate ([66,0,0])zaklad (a=100);
translate ([66,60,0])zakladR (a=3);
translate ([66,60,0])zaklad (a=3);
translate ([0,66,0])zakladR (a=4);
translate ([0,66,0])zaklad (a=4);
translate ([-66,0,0])zakladR (a=8);
translate ([-66,0,0])zaklad (a=8);
  • 0

Naposledy upravil nasranek dne 15.11.2017 19:39, celkově upraveno 2
nasranek
 
Příspěvky: 268
Images: 0
Registrován: 06.03.2017 01:16
Bydliště: Orlová 4
Reputation: 0

Re: Odkapavac (openscad no sci-fi)

Příspěvekod fdd1222 » 15.11.2017 18:50

nasranek píše:Použití plastev_raznice (x,y,z,t);
je to jednoduchý tvar , no více tvaru udělám toho více pro názornou ukázku:


A k cemu je dobry takovy odkapavac ve tvaru trojuhelniku? :-)
  • 0

fdd1222
 
Příspěvky: 511
Images: 0
Registrován: 12.11.2016 19:59
Reputation: -5
Pokud je snaha, dá se to napravit.

Re: Odkapavac (openscad no sci-fi)

Příspěvekod nasranek » 15.11.2017 18:55

Hm chtělo by to přejmenovat, odkapávač je jen první příspěvek ten zbytek je jen ukázka knihovny.
Dávám to tu k volnému použití, jelikož jsem se ve škole učil Rusky, doma česky, polsky a hanácky + krajove narzeczy v OKD a nevládnu psanou angličtinou tak to máte tady a ne na thingu :mrgreen:
chybí mi tu smajl co plazí jazyk a trojúhelníkovou houbičku jsem už viděl a ve finále je to použitelné na kryty např:ventilátoru, Arduina nesmyslu/krabiček a ...
  • 0

nasranek
 
Příspěvky: 268
Images: 0
Registrován: 06.03.2017 01:16
Bydliště: Orlová 4
Reputation: 0

Re: Odkapavac (openscad no sci-fi)

Příspěvekod Thrawn » 15.11.2017 19:23

Paráda, pěkný příklad použití skutečně parametrického modelování.
  • 0

Thrawn
 
Příspěvky: 38
Registrován: 29.04.2015 12:26
Bydliště: Cajzlov a Medvědín
Reputation: 0

Re: Odkapavac (openscad no sci-fi)

Příspěvekod nasranek » 15.11.2017 19:54

A o to tady právě jde neumím kreslit , ale od 1986 kdy jsem poprvé čuchnul k řekněme počítačům (IQ 151 s G modulem) a něco málo k Basicu a minulý rok k Arduinu tak tvořit 3D blbustky v OpenScadu jsou pro mně přirozenější.
Teď v něm dělám ze šneka pokladničku https://www.thingiverse.com/thing:2538533
už mám vytištěný základ s dírama a teď jen vnitřní vložku se zámkem, ale až v pátek se k tomu zas dostanu.
0.6 velikost šneka + ulity (šedo/černý) trvala cca 15 hodin , jednobarevný by byl rychlejc , ale nevynikne tak.
Fajni jsou na 0.3 a nestíhám je tisknout.

Odbočka od původního tématu :oops:
  • 0

nasranek
 
Příspěvky: 268
Images: 0
Registrován: 06.03.2017 01:16
Bydliště: Orlová 4
Reputation: 0

Re: Odkapavac (openscad no sci-fi)

Příspěvekod koppik » 15.11.2017 20:01

Já smekám přede všemi, kteří modelují 3d tělesa v "mathlabu". Před časem jsem si musel základy openscadu naštudovat, abych si mohl upravit stlka držáků x-osy na rebelixe pro trapézy a bylo to peklo :-D
  • 0

Rebelix X2 - bowden; E3D V6 čajna; Mega 2560 + Ramps; Marlin v1.1.0 RC7;
Raspbery Pi 3 + Octoprint + OctoAndroid
http://www.koppik.cz
koppik
 
Příspěvky: 13
Registrován: 24.03.2017 17:51
Bydliště: Ostrava
Reputation: 0

Re: Odkapavac (openscad no sci-fi)

Příspěvekod fdd1222 » 15.11.2017 20:12

JJ, ten program je pro praci nepouzitelny, ale zase kdo si hraje nezlobi :-)
  • 0

fdd1222
 
Příspěvky: 511
Images: 0
Registrován: 12.11.2016 19:59
Reputation: -5
Pokud je snaha, dá se to napravit.

Re: Odkapavac (openscad no sci-fi)

Příspěvekod nasranek » 16.11.2017 12:52

Nechci se s tebou hádat, ale na běžné věci je víc než použitelný a zadarmo, abych to upřesnil - člověk který
si naprogramuje např.: Arduino (nějaké výtvory jsem speněžil) a potřebuje na ně obaly a neumí v CADu,...
tak v OpenScadu když ho pochopí (učí se pořád a to není jen o OpSc.) tak do toho vklouzne úplně lehce.

Mně na pochopení stačil kurz Basicu v roce 1986, a na základě jeho jsem pochopil Basic na Sincleru, Amos na Amize, ale od té doby co mám internet už jsem vlastně neprogramoval, protože dodržuji zásadu prvně se podívej co je ve světě a když to nenajdeš napiš to.
No a před cca 18 měsíci jsem náhodou narazil na Arduino s Chiny za pár kaček tak jsem si řekl zkusím to a ejhle ono to šlo, takže pro mně je OpenScad dar z nebes i když kdyby umožňoval občas i nějaké zakřivení tahem myši tak bych se nezlobil.
Osobně nemám zájem se učit něco složitějšího, protože ve svém zaměstnání jsem spokojen a měnit ho nebudu
a za necelých 9 let jdu do důchodu takže o mně stejně nikdo jiný zájem mít nebude.
  • 0

nasranek
 
Příspěvky: 268
Images: 0
Registrován: 06.03.2017 01:16
Bydliště: Orlová 4
Reputation: 0

Re: Odkapavac (openscad no sci-fi)

Příspěvekod bahora » 16.11.2017 18:24

Některým lidem prostě nevysvětlíš k čemu jsou takové věci jako programování dobré.

Až fdd1222 do svého oblíbeného CADu nainstaluje knihovnu/aplikaci která mu bude generovat šrouby, ozubená kola a další užitečné parametrické věci, pak se bude oblizovat až za ušima ..... a vůbec pak netuší na co je taková věc jako OpenSCAD dobrá :)
  • 0

bahora
 
Příspěvky: 245
Images: 1
Registrován: 23.11.2016 01:12
Reputation: 0

Re: Odkapavac (openscad no sci-fi)

Příspěvekod fdd1222 » 16.11.2017 18:29

Kreslim v Inventoru...
  • 0

fdd1222
 
Příspěvky: 511
Images: 0
Registrován: 12.11.2016 19:59
Reputation: -5
Pokud je snaha, dá se to napravit.

Re: Odkapavac (openscad no sci-fi)

Příspěvekod n1kd0 » 16.11.2017 19:03

tak každý holt nemůže být programátor.. tak holt požívámě jiný "běžný" CAD..
  • 0

RebeliX X2
n1kd0
 
Příspěvky: 179
Registrován: 22.04.2015 23:28
Bydliště: Písek
Reputation: 0

Re: Odkapavac (openscad no sci-fi)

Příspěvekod nasranek » 16.11.2017 19:51

Ono vlastně nejde o to v čem ten objekt vygeneruješ, ale o tom co ti vyhovuje a kolik jsi za to ochoten utratit.
Už dávno uznávám jednu zásadu cena/výkon/návratnost.
Já si dělám věci pro radost z toho že to dokážu udělat a když se mi něco podaří rád se podělím.
Některé věci které jsem udělal ať už Arduino, nebo 3D, ba i opravy a reinstalace PC byli nejednou na hraně s náklady a pravdu díc ono udělat návrh blbého tlačítka do starožitného magnetofonu https://cs.m.wikipedia.org/wiki/Magnetofon :mrgreen: není o penězích, ale o tom že někomu pomůžeš v jeho koníčku, protože náklady na vítisk jsou zanedbatelné, ale návrh už je o penězích které ti nikdo nedá.
  • 0

nasranek
 
Příspěvky: 268
Images: 0
Registrován: 06.03.2017 01:16
Bydliště: Orlová 4
Reputation: 0

Re: Odkapavac (openscad no sci-fi)

Příspěvekod fdd1222 » 16.11.2017 20:13

Ale no tak da se udelat vsechno. Prikladne minuly tyden jsem musel psat v ASM vypocet prirozenych logaritmu na nejakem 8bitu, kdyz uz si nakous to programovani.

Jako ze nakonec to slo, ale v zadnem pripade bych nikomu nedoporucoval neco takoveho provadet :-)
  • 0

fdd1222
 
Příspěvky: 511
Images: 0
Registrován: 12.11.2016 19:59
Reputation: -5
Pokud je snaha, dá se to napravit.

Další

Zpět na Uživatelská tvorba - FREE

Kdo je online

Uživatelé procházející toto fórum: Žádní registrovaní uživatelé a 5 návštevníků