|
Lesestoff im Handbuch 
Beispiele aus den geöffneten Algorithmen...
cd21 Modell 5306
skalieren((a1,b1,c1),Punkt,Winkel,C1,C2, ((a1_s,b1_s,c1_s));
Was bedeutet c1?
Welche Arten von Koeffizienten kommen in den Algorithmen vor?
Aufgabe:
Mit diesem Algorithmus die Werte für C1 und C2 verändern.
Das ist keine Mathematik ...das nennt sich “Ausprobieren”!!
“Fon” ist hier sehr hilfreich.
Eine Strecke soll um 1% verkürzt werden .....wie heißt dann der Koeffizient?
-Was ist richtig?
0.09?
0.9?
Ja,ja...eine Fangfrage! Was ist denn richtig?
Jetzt soll die Stecke 10% länger werden?
-Was ist richtig?
1.01?
1.1?
Warum ist der Wert für c2 gleich 1 im Übungsalgorithmus?
Was bedeutet c1=1.3?
Aufgabe:
Ein Tuch 2ox60cm soll 5cm länger werden.
Wie heißt hier der Koeffizient?
Ausprobieren hilft hier leider nicht weiter.Also wird gerechnet:
neuer Wert geteilt durch alten Wert.
65:60=1.0833333
Aufgabe:
Ein Shirt ist nur 59cm lang. Es soll aber 63cm lang sein.
Aufgabe:
Ein Rock ist 85cm lang. 65 cm werden gewünscht.
Nahtlängen werden angepasst:
Koef:=(lange Strecke) geteilt durch (kurze Strecke);
Ein weiteres Beispiel..zu finden in der Demo mit Druckfunktion
GROESSEN;
EINGEBEN("r", rz_48, "Kopfumfang", rz_48);
ogl:=rz_48; Kopfumfang
p_ogl:=2; Zugabe zum Kopfumfang
kol_klin:=4; Anzahl der Segmente
pr_sh_mekh:=0.0;
k1:=PUNKT(10,10);
k2:=PUNKT(k1.X+(ogl+p_ogl)/kol_klin,k1.Y);Breite eines Segments
k3:=PUNKT(k1.X+[k1:k2].L*0.5,k2.Y-ogl*0.35); Höhe des Segments
sk1:=SPLINE_K[30](k1,k3,-90,-50,1.3); dieser Spline wird gespiegelt....
dafür benötigen wir einen Abschnitt.....ABSCHNITT(k3,k4)
k4:=PUNKT(k1.X+[k1:k2].L*0.5,k1.Y);
SPIEGELN((sk1),ABSCHNITT(k3,k4),"_p");
SPEICHERN(NAME=(HUT),
KONTOUR=(sk1,-sk1_p,k2,k1),
SCHNITTMENGE=(2,2),
STOFF=GRUND_STOFF,
ZUGABE=1,
FARBE=10);
SPEICHERN(NAME=(HUT),
KONTOUR=(sk1,-sk1_p,k2,k1),
SCHNITTMENGE=(2,2),
STOFF=FUTTER,
ZUGABE=1.0,
FADENLAUF=(k3,45),
FARBE=15);
{ HUTBAND }
shir_pol:=4.0;
dl_pol:=8.0;
ug_pol:=90;
pol1:=PUNKT(50,0);
pol2:=PUNKT(pol1.X,pol1.Y+shir_pol);
pol3:=PUNKT(pol1.X+dl_pol,pol1.Y);
KREUZ_RICHTUNG(pol1,ug_pol,pol2,0,pol4);
KREUZ_RICHTUNG(pol3,ug_pol,pol2,0,pol5);
{ HUTKREMPE }
shir_polei:=8.5 ;
PUNKT_ERZEUGEN(pol1,180,(ogl+p_ogl)/3.141,p1);
PUNKT_ERZEUGEN(p1,90,[p1:pol1].L*0.92,p2);
sp1:=SPLINE_K[100](p2,pol1,0,-90,1.4);
koef_szjat:=((ogl+p_ogl)/2)/sp1.L ;
SKALIEREN((sp1,p2),pol1,0,koef_szjat,1,"");
p3:=PUNKT_ERZEUGEN(pol1,0,shir_polei);
p4:=PUNKT_ERZEUGEN(p2,90,shir_polei*0.7);
SPLINE_KK[100](p3,p4,[pol1:p3].F1+90,[p2:p4].F2+92,1.35,1.4);
mPOL1:=MARKIERUNG(pol1,4,0,2,1);
SPEICHERN(NAME=(UNTER._HUTKREMPENTEIL),
SYMMETRISCH,
KONTOUR=(S_P3_P4,sp1 ),
INNERE_LINIE=((mPOL1)),
FADENLAUF=(pol1,[pol1:p3].F1),
STOFF=GRUND_STOFF,
SCHNITTMENGE=(1,0),
WINKEL_NAME=(90),
ZUGABE=1.0,
FARBE=14);
SPEICHERN(NAME=(OBER._HUTKREMPENTEIL),
SYMMETRISCH,
KONTOUR=(S_P3_P4,sp1 ),
INNERE_LINIE=((mPOL1)),
FADENLAUF=(pol1,[pol1:p3].F1),
STOFF=PELZ,
SCHNITTMENGE=(1,0),
WINKEL_NAME=(90),
ZUGABE=1.0,
FARBE=15);
ENDE;
Frage für Fortgeschrittene:
Mit welchen verschiedenen Befehlen können Nahtlängen angeglichen werden?
1.
2.
3.
|
