#
# Konstruktion eines nichtparametrischen Teiles mit Folien und Formelementen. 
#
#----------------------------------------------------------------------------------
#$ TITEL "Konstruktion mit Folien und Formelementen";
#
#$ MELDUNG "
#-@f@ ACHTUNG !!!
#-Bei Tutorialbeginn wird die aktuelle Konstruktion gelöscht!@n@
#-
#-Soll Ihre aktuelle Konstruktion erhalten bleiben, dann muß diese @f@jetzt@n@ vor Tutorial-
#-beginn gespeichert werden! (Siehe nachfolgend Speichern der aktuellen Konstruktion!)  
#-Wenn dieses @f@nicht@n@ der Fall ist, dann kann das Tutorial durch Anklicken des 
#-Feldes @f@ Bestätigen @n@ fortgesetzt werden.
#-
#-
#-@f@Wird das Tutorial während des Ablaufes beendet@n@ bleibt die Konstruktion, welche bis
#-zu diesem Zeitpunkt erzeugt wurde, erhalten. Es erfolgt eine Abfrage, ob SISCAD-P 
#-die Konstruktion löschen soll.
#-
#-
#-@f@Speichern der aktuellen Konstruktion:@n@
#-!
#-!     Das Tutorial muß dafür nicht beendet werden. Öffnen Sie die Zeichnungsverwaltung
#-!     durch anklicken des Symboles
#-!     @I<CTKatal>@
#-!     und wählen Sie @f@ selektieren nach ...    Konstruktionen @n@ an.
#-!     Wählen Sie eine eventuell vorhandene Bibliothek an, oder speichern Sie sofort
#-!     die aktuelle Konstruktion, indem Sie @f@ speichern @n@ anklicken. Es wird ein
#-!     Fenster mit der Überschrift:@f@ speichern @n@  angezeigt. Klicken sie in das rechte 
#-!     Feld unter @f@ Name der Konstruktion @n@ und geben den Dateinamen ein.
#-!     Für die Befehlsausführung klicken Sie auf das Symbol
#-!     @I<COk>@
#-!     Wurde eine Konstruktion unter dem angegebenen Namen in diesem Verzeichnis
#-!     schon einmal gespeichert erfolgt eine Abfrage, ob die vorhandene Datei über- 
#-!     schrieben werden soll. Wird dieses nicht beabsichtigt, dann klicken Sie auf @f@Nein@n@,
#-!     wiederholen den Speichervorgang und speichern die Konstruktion unter neuen
#-!     Namen ab. Schließen Sie die Zeichnungsverwaltung, durch anklicken des Symboles
#-!     @I<GTKatal>
#-!
#-";
#
#$ INFO "
#-Die aktuelle Konstruktion wird gelöscht.
#-
#-Das Tutorial-Konstruktion mit Folien und Formelementen
#-wird von SISCAD-P eingelesen. Bitte etwas Geduld! 
#-";
#$ LOESCHE KONSTRUKTION ;
#$ MELDUNG "
#-@k@                                                                            
#-i              @x@           Konstruktion eines nichtparametrischen Teiles @k@
#-i              @x@                     mit Folien und Formelementen. @k@
#-i
#-i     Diese CAD-Demo soll zeigen, in welchen Arbeitsschritten eine Konstruktion  
#-i     erstellt wird. Es beginnt mit der Folienerzeugung und endet mit den
#-i     Stammdaten.         
#-i                                                                                
#-i     Ein verstärktes Augenmerk wird auf den Einsatz von Folien und Form-
#-i     elementen in einem nichtparametrischen Teil gelegt.                                      
#-i                                                                                
#-i     Als erster Arbeitsschritt sollten die Ansichtsfolien für die Konstruktion      
#-i     erzeugt werden. Auf diesen Folien werden die Geometrieobjekte, Bemaßung,   
#-i     Texte usw. erzeugt und abgelegt. Formelemente werden nach ihrer Plazierung
#-i     in die Konstruktion den Ansichtsfolien zugewiesen. 
#-i                                                                                
#-i     Das Arbeiten mit den Ansichtsfolien hat den Vorteil, daß man die Ansichten      
#-i     komplett ausblenden kann und bei einer Plazierung des Teiles in eine    
#-i     Gesamtkonstruktion nach Ansichten (Folien) selektieren kann.                   
#-i                                                                                
#-i     Beispiel für Definition der Ansichtsfolien-Namen:                              
#-i                                                                                  
#-i     Vorderansicht             Folienname = VA                                      
#-i     Seitenansicht rechts Folienname = SAR                                          
#-i     Seitenansicht links   Folienname = SAL                                         
#-i     Draufsicht                   Folienname = DS                                
#-i@x@
#-i
#-i                                       ACHTUNG Hinweis !!!
#-i
#-i@k@     Im Ablauf des Tutorials werden alle Arbeitsschritte automatisch aus-@x@
#-i@k@     geführt. Ein Eingriff in den Tutorialablauf, z. B. einen Plaziervor-@x@
#-i@k@     gang selbsttätig ausführen, bewirkt, daß der Tutorialablauf von @x@
#-i@k@     SISCAD-P nicht mehr Ordnungsgemäß ausgeführt werden kann!@x@
#-i@k@     Deshalb:@x@
#-i     Bitte führen Sie nur die Arbeitsschritte aus, zu denen Sie aufgefordert
#-i     werden!
#-i@k@     Werden dennoch eigene Anwendungen während des tutorialablaufes vor-@x@
#-i@k@     genommen, kann das Tutorial nicht mehr ausgeführt werden (SISCAD-P bringt@x@
#-i@k@     Fehlermeldung!). Das Tutorial muß dann gestoppt und neu geladen werden!@x@
#-i@x@
#-i@k@     Die Aufforderungstexte sind in @n@ 'normalen Text' @k@ und mit einem @x@
#-i@k@     Ausrufezeichen @n@ '!' @k@ beginnend, gekennzeichnet.@x@
#-i
#-i@k@     Generell wird jede Information, über die Ausführung des Arbeits-@x@
#-i@k@     schrittes oder über SISCAD-P Themen wie die Parametrik, in@x@
#-i@k@     'kursiver Schriftart'   und mit einem  'i'  beginnend, gekennzeichnet.@x@
#-i
#-";
#$ MELDUNG  "
#-@k@
#-i     SISCAD-P wird standardmäßig mit ausgeschalteter Parametrik installiert.
#-i     Für den Ablauf des Tutorials ist der Parametrikeinsatz notwendig.
#-i     Die Parametrik und die Parametrikbemaßung wird zu Tutorialbeginn ein-
#-i     geschaltet und bei Tutorialende ausgeschaltet.
#-i
#-i     Die Kennzeichen für die eingeschaltete Parametrik sind:
#-i
#-i     a) Im Hauptmenü erscheint das Symbol Automatischer Eigenschaftmodus.
#-i        @I<CTAutC>@
#-i     b) Das Symbol Freiheitsgrade (Hauptmenü) erscheint mit gelben Massbild.
#-i        @I<CTFrPar>@
#-";
#
#$ INFO "
#-Die Parametrik wird eingeschaltet.
#-";
#
MODIFY PART PARM 1;PRC=1;!
#$ WARTE 5 ;
#
#$ INFO "
#-Die Parametrik-Bemaßung wird eingeschaltet.
#-";
#
MODIFY DEFAULT SDIM PRC=1;!
#$ WARTE 5 ;
#
#$ MELDUNG "
#-!
#-!     Öffnen Sie die Folien-Info 
#-!     @I<CTFolie>@
#-!     um das Arbeiten mit den Folien zu verfolgen.
#-!
#-!     Sollten die Folien-Fenster störend wirken, werden diese mit der Maus 
#-!     verschoben.
#-!
#-";
#
#$ INFO "
#-Die Ansichtsfolien für Vorderansicht (VA) und Draufsicht (DS) werden erzeugt.
#-";
#
CREATE LAYER NA=VA;!
#
#$ WARTE 5;
#
CREATE LAYER NA=DS;!
#
#$ WARTE 5;
#
#$ INFO "
#-@k@
#-i
#-i     Die Ansichtsfolien werden vor der Konstruktion der Ansichten aktiviert.
#-i @n@
#-";
#
#$ INFO "
#-Die Ansichtsfolie Draufsicht (DS) wird aktiviert.
#-";
ACTIVATE LAYER OP=DS;!
#$ WARTE 5;
#$ MELDUNG "
#-@k@
#-i     
#-i     Bei Beginn einer Konstruktion sollte der Nullpunkt (Ursprung des 
#-i     Koordinatensystemes) des Teiles sich innerhalb der gezeichneten Ansichten
#-i     befinden.
#-i
#-i     Begründung:
#-i
#-i     a)  Die Konstruktion wird als Pixelgrafik zur visuellen Orientierung in 
#-i         der Zeichnungsverwaltung angelegt. Der Aufbau der Grafik orientiert
#-i         sich am Nullpunkt des Teiles. Je weiter der Nullpunkt sich außerhalb
#-i         der Konstruktion befindet, desto undeutlicher erscheint die Pixel-
#-i         grafik.
#-i
#-i     b)  Beim Plazieren wird voreinstellungsmäßig der Nullpunkt als Anknuepf-
#-i         bzw. Bezugspunkt des zu plazierenden Teiles angeboten. Es kann aber
#-i         auch ein anderer Punkt oder Koordinate der Konstruktion angegeben
#-i         werden. 
#-i @n@
#-";
#
#$ INFO "
#-Erzeugung der Flächen, vom Nullpunkt des Teiles ausgehend.
#-
#-
#-Die Fläche ( Rechteck ) der Draufsicht wird erzeugt.
#-";
#
CREATE AREA PLW PNT=0,0;LEN=86;WID=15;!
#
#$ WARTE 5;
#
#$ INFO "
#-Die Ansichtsfolie Vorderansicht (VA) wird aktiviert.
#-";
#
ACTIVATE LAYER OP=VA;!
#
#$ WARTE 5 ;
#
#$ INFO "
#-Die Fläche ( Rechteck ) der Vorderansicht wird erzeugt.
#-";
#
CREATE AREA PLW PNT=0,40;LEN=86;WID=6;!
#
#$ WARTE 5 ;
#$ MELDUNG  "
#-@k@
#-i
#-i     Um die Systemfolien (GeoFolie, TextFolie usw.),welche voreinstellungs-
#-i     mäßig vorhanden sind, zu aktivieren, muß in der Folien - Info
#-i     @I<CTFolie>@ 
#-i     Defaulteinstellung angeklickt werden.
#-i@n@     
#-";
#
#$ INFO "
#-Die Systemfolien werden aktiviert.
#-";
#
#$ WARTE 5 ;
#
MODIFY DEFAULT LYRS SETGEO=GEOFOLIE;SETTXT=TEXTFOLIE;SETRDIM=REFERENZBEMFOLIE;SETPDIM=PARAMETRIKBEMFOLIE;SETHAT=SCHRAFFURFOLIE;SETPNR=POSNRFOLIE;SETSTS=BEARBEITUNGFOLIE;!
#
#$ WARTE 5;
#$ MELDUNG "
#-@k@
#-i
#-i    Bohrungen, Senkungen, Ausfräsungen usw. können natürlich in SISCAD-P
#-i    konstruiert werden. Jedoch rationeller erfolgt dieselbe Teilekonstruktion,
#-i    wenn die SISCAD-P Formelemente eingesetzt werden.
#-i
#-i    @x@ Formelemente @k@
#-i    sind Konstruktionen, welche aus fertigungs- und/oder DIN-gerechten
#-i    Gesichtspunkten erstellt werden und deren Einsatz beim Konstruieren immer
#-i    wieder erforderlich ist.
#-i
#-i    Formelemente besitzen technische Daten, mit deren Hilfe man leichter
#-i    NC-Programme erstellt. Diese Daten (Koordinaten, Sachnummern, Anzahl usw.)
#-i    stehen in der Formelementliste des Teiles (Teile-Info), welche auch als
#-i    Datei ausgegeben werden kann.
#-i
#-i    Formelemente werden parametrisch konstruiert und können eine Sachmerkmal-
#-i    leiste mit Varianten haben.
#-i
#-";
#
#$ INFO "
#-@k@
#-i
#-i    Es werden alle Formelemente plaziert, bis auf jene, welche nicht für die
#-i    Bemaßung des Teiles nötig sind und kopiert werden können. Kopierte Form-
#-i    elemente können bei der Parametrischen Bemaßung nicht berücksichtigt
#-i    werden, weil das (Formelement-)Parametrikmaß bereits eine Konstruktions-
#-i    beziehung eingegangen ist. 
#-i@n@
#-";
#
#$ WARTE 15 ;
#
#$ INFO " 
#-Die Zeichnungsverwaltung wird aktiviert und über den Menuepunkt:
#-@f@ selektieren nach @n@   wird die Bibliothek Formelemente aufgerufen.
#-";
#
#$ MELDUNG "
#-!
#-!     Öffnen Sie die Zeichnungsverwaltung
#-!     @I<CTKatal>@
#-!     und wählen Sie @f@ selektieren nach ...    Formelemente @n@ an.
#-!
#-";
#
#$ MELDUNG "
#-!     Es wird die Bibliothek @f@ maschinenbau @n@ angezeigt. 
#-!
#-!     Klicken Sie die Bibliothek an und es werden die Unterbibliotheken
#-!     @f@ allgemein @n@ und @f@ dinlike @n@ angezeigt. @k@
#-
#-i     In @x@ allgemein: @k@
#-i     finden sich Formelemente wieder, welche aus fertigungstechnischen
#-i     Gesichtspunkten erstellt wurden.
#-i
#-i     In @x@ dinlike: @k@
#-i     finden sich Formelemente in der Anlehnung an die DIN wieder.
#-i   @n@
#-
#-!     Wählen Sie die Bibliothek @f@ allgemein @n@ an.
#-";
#
#$ MELDUNG "
#-@k@
#-i
#-i            @x@WICHIGER HINWEIS FÜR DEN WEITEREN TUTORIALABLAUF!@k@
#-i
#-i    Im Tutorialablauf kann das Plazieren von Teilen und Formelementen nicht im
#-i    normalen Ablauf (z.B. Öffnen der Sachmerkmalleiste, Auswahl der Varianten usw.)
#-i    dargestellt werden. Es wird bei der automatischen Plazieraktion nur der 
#-i    CAD-Befehl in der Befehlszeile des Tutorials angezeigt.
#-i    Der normale Ablauf wird als Information, beginnend mit 'i' und in @x@'kursiver'@k@
#-i    Schriftart dokumentiert.
#-i    Der einzelne Ablaufschritt im Tutorial wird in @f@'normaler'@k@ Schriftart angezeigt.
#-i
#-i    Bitte führen Sie nur die Anweisungen aus, zu denen Sie aufgefordert werden, damit
#-i    das Tutorial ordnungsgemäß abläuft!
#-i    Anweisungen beginnen mit '!' und werden in @f@'normaler'@k@ Schriftart dargestellt.
#-i    Die Anweisungen sollen die einzelnen Arbeitsschritte verdeutlichen und gleichzeitig
#-i    eine Anwendungsübung sein.
#-i    Werden dennoch eigene Anwendungen während des Tutorialablaufes vorgenommen, 
#-i    kann das Tutorial nicht mehr ausgeführt werden (SISCAD-P bringt Fehlermeldung!).
#-i    Das Tutorial muß dann gestoppt und neu geladen werden!
#-i
#-i@n@
#-";
#
#$ INFO "
#-Es folgt die Auswahl des Formelementes bohrung-d aus der Bibliothek allgemein.
#-
#-@k@
#-i    Für das erste Formelement wird der normale Plazierablauf dokumentiert:
#-i
#-i    Die Auswahl im normalen Plazierablauf eines Formelementes : 
#-i
#-i    Das Feld @x@ plazieren @k@ wird angeklickt und danach das Formelement.
#-i
#-";
#$ WARTE 5 ;
INCLUDE PART BLW PNT=0,0;FILE="/usr/siscadp/fel/maschinenbau/allgemein/bohrung-d.fel";ANG=0;BOM=0;!
#
#$ WARTE 5;
#$ MELDUNG "
#-@k@
#-i    (Normaler Plazierablauf eines Formelementes)
#-i    Nach der Auswahl vom Formelement öffnet sich seine Sachmerkmalleiste mit
#-i    Variantentabelle.
#-i
#-i    @x@ Erklärungen zur Variantentabelle: @k@
#-i
#-i    In der Variantentabelle sind die Varianten (größer und kleiner in den Ab-
#-i    maßen) der Konstruktion abgelegt.
#-i    Die Ausführung der Variationsauswahl besteht darin, daß die Sachnummer
#-i    (Identnummer des Teiles) der Variante angeklickt wird.
#-i
#-i    In der Variantentabelle können bei Parametern Bereichsangaben z.B. [0;[
#-i    stehen. Dann wird eine Eingabe erwartet. Die Sachnummer kann wegen der
#-i    fehlenden Angabe im Parameter nicht erzeugt werden und fehlt daher.
#-i    Bei der Plazierung wird die Sachnummer dann erstellt. 
#-i
#-";
#
#$ INFO "
#-Auswahl in der Variantentabelle der Sachmerkmalleiste.
#-";
#
MODIFY PART TAC OP=4;VIDX=1;PIDX=1;HLDG=8!
#
#$ WARTE 5 ;
#
#$ MELDUNG "
#-@k@
#-i     (Normaler Plazierablauf eines Formelementes)
#-i     Bei den Plazierangaben für das Formelement werden voreinstellungsmäßig
#-i     der Bezugspunkt mit den Koordinaten 0,0 ( Nullpunkt ) und der Plazier-
#-i     winkel mit 0° angegeben. Diese Angaben können neu eingegeben werden,
#-i     indem z.B. neue Bezugspunktkoordinaten angegeben oder ein neuer Punkt der 
#-i     Formelementkonstruktion ( im Grafik-Fenster 15 dargestellt ) 
#-i     identifiziert wird. 
#-i     Die Angabe für den Plazierpunkt in der Teile-Konstruktion kann über
#-i     Koordinatenangabe, Punktidentifizierung oder Punktangabe mit dem
#-i     Intelligenten Fangmodus erfolgen.
#-i@n@ 
#-
#-Der Plazierpunkt für das Formelement wird durch Koordinaten angegeben.
#-Die Angaben für Bezugspunkt und Winkel werden übernommen. 
#-";
#
MODIFY PART PARM OP=4;PNT=CADD(0,0;77,7.5;CMLT(-1;0,0));GLOB=1!
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART FFT OP=4!
#
#$ MELDUNG "
#-@k@
#-i     (Normaler Plazierablauf eines Formelementes) 
#-i     Zu einem Formelement kann es eine Kurzbenennung nach DIN 30 geben.
#-i     Handelt es sich um ein Formelement welches aus fertigungstechnischen
#-i     Gesichtspunkten erzeugt wurde ( zum Beispiel: bogen, schwalb_nut_v ), 
#-i     gibt es keine Kurzbenennung nach DIN 30.
#-i    
#-i     Die Angaben für die Kurzbenennung werden durch Interpretieren eines
#-i     Makros, welches denselben Namen wie das Formelement hat 
#-i     ( d273m-d.fel , d273m-d.his ) erzeugt. Dieser Vorgang erfolgt beim 
#-i     Plazieren eines Formelementes automatisch.
#-i
#-i     Die Kurzbenennung für ein Formelement werden auf der Formelement-Folie
#-i     FeKurzbenennungFolie abgelegt. Diese Folie ist voreinstellungsmäßig 
#-i     ausgeblendet abgelegt, daher ist die Kurzbenennung nach dem Plazieren
#-i     nicht sichtbar!
#-i     
#-i     Der normale Plaziervorgang eines Formelementes ist beendet. 
#-i@n@
#-
#-Der Text für die Kurzbenennung nach DIN 30 wird mit Hinweislinie erzeugt.
#-";
#INTERPRETIERE FILE="/usr/siscadp/fel/maschinenbau/allgemein/bohrung-d.his"!
#WENN (( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))>135)*( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))<=315))
MODIFY TEXT E TCAT("FT_";CONVN2T(IDENTLC;0));TXTA=0!
#SONST
#Ende des Makros "/usr/siscadp/fel/maschinenbau/allgemein/bohrung-d.his"
#
#$ INFO "
#-Die Formelementbibliothek bleibt nach dem Plazieren geöffnet und das Form-
#-element bohrung-d wird plaziert. 
#-";
#
INCLUDE PART BLW PNT=0,0;FILE="/usr/siscadp/fel/maschinenbau/allgemein/bohrung-d.fel";ANG=0;BOM=0;!
#$ WARTE 3 ;
MODIFY PART TAC OP=4;VIDX=1;PIDX=1;HLDG=8!
#$ WARTE 3 ;
MODIFY PART PARM OP=4;PNT=CADD(0,0;9,7.5;CMLT(-1;0,0));GLOB=1!
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART FFT OP=4!
#INTERPRETIERE FILE="/usr/siscadp/fel/maschinenbau/allgemein/bohrung-d.his"!
#WENN (( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))>135)*( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))<=315))
MODIFY TEXT E TCAT("FT_";CONVN2T(IDENTLC;0));TXTA=0!
#SONST
#Ende des Makros "/usr/siscadp/fel/maschinenbau/allgemein/bohrung-d.his"
#
#$ MELDUNG "
#-Nun wird in den Unterbibliotheken dinlike für DIN-Teile und dsenkungen für
#-alle DIN-Senkungen geblättert.
#-@n@
#-!
#-!    Blättern Sie in der Zeichnungsverwaltung (Pfeiltaste drücken) soweit zu-
#-!    rück, bis die Unterbibliotheken @f@ allgemein @n@ und @f@ dinlike @n@ an-
#-!    gezeigt werden.
#-!
#-!    Öffnen Sie die Bibliothek @f@ dinlike @n@ und danach die Unterbibliothek
#-!    @f@ dsenkungen. @n@
#-!
#-";
#
#$ INFO "
#-Die Auswahl und die Plazierung von Formelement d74am-d erfolgt zweimal.
#-";
#
INCLUDE PART BLW PNT=0,0;FILE="/usr/siscadp/fel/maschinenbau/dinlike/dsenkungen/d74am-d.fel";ANG=0;BOM=0;!
#$ WARTE 3;
MODIFY PART TAC OP=4;VIDX=14!
#$ WARTE 3;
MODIFY PART PARM OP=4;PNT=CADD(0,0;63,7.5;CMLT(-1;0,0));GLOB=1!
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART FFT OP=4!
#INTERPRETIERE FILE="/usr/siscadp/fel/maschinenbau/dinlike/dsenkungen/d74am-d.his"!
#WENN (( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))>135)*( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))<=315))
MODIFY TEXT E TCAT("FT_";CONVN2T(IDENTLC;0));TXTA=0!
#SONST
#Ende des Makros "/usr/siscadp/fel/maschinenbau/dinlike/dsenkungen/d74am-d.his"
#$ WARTE 3 ;
INCLUDE PART BLW PNT=0,0;FILE="/usr/siscadp/fel/maschinenbau/dinlike/dsenkungen/d74am-d.fel";ANG=0;BOM=0;!
#$ WARTE 3;
MODIFY PART TAC OP=4;VIDX=14!
MODIFY PART PARM OP=4;PNT=CADD(0,0;23,7.5;CMLT(-1;0,0));GLOB=1!
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART FFT OP=4!
#INTERPRETIERE FILE="/usr/siscadp/fel/maschinenbau/dinlike/dsenkungen/d74am-d.his"!
#WENN (( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))>135)*( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))<=315))
MODIFY TEXT E TCAT("FT_";CONVN2T(IDENTLC;0));TXTA=0!
#SONST
#Ende des Makros "/usr/siscadp/fel/maschinenbau/dinlike/dsenkungen/d74am-d.his"
#
#$ INFO "
#-Das Formelement d74am-s wird ausgewählt und plaziert.
#-";
#
INCLUDE PART BLW PNT=0,0;FILE="/usr/siscadp/fel/maschinenbau/dinlike/dsenkungen/d74am-s.fel";ANG=0;BOM=0;!
#$ WARTE 3;
MODIFY PART TAC OP=4;VIDX=14;PIDX=2;HLDG=6!
#
#$ WARTE 5;
#
#$ INFO "
#-Der Plazierpunkt für das Formelement erfolgt durch Punktangabe mit dem 
#-Intelligenten Fangmodus.
#-@I<CTFang>@
#-";
# 
#$ WARTE 5;
#
#$ INFO "
#-Der Intelligente Fangmodus wird eingeschaltet, durch drücken des Symboles 
#-@I<GTFang>@.
#-";
#
SWITCH RULE INxON 11!
#
#$ WARTE 5;
#
MODIFY PART PARM OP=4;PNT=CADD(0,0;63,46;CMLT(-1;0,0));GLOB=1!
#
#$ WARTE 5;
#
#$ INFO "
#-Die Plazierangaben für Bezugspunkt und Winkel werden übernommen.
#-";
#
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART FFT OP=4!
#INTERPRETIERE FILE="/usr/siscadp/fel/maschinenbau/dinlike/dsenkungen/d74am-s.his"!
#WENN (( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))>135)*( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))<=315))
MODIFY TEXT E TCAT("FT_";CONVN2T(IDENTLC;0));TXTA=0!
#SONST
#Ende des Makros "/usr/siscadp/fel/maschinenbau/dinlike/dsenkungen/d74am-s.his"
#
#$ MELDUNG "
#-
#-!
#-!    Blättern Sie in der Zeichnungsverwaltung (Pfeiltaste drücken) soweit zu-
#-!    rück bis die Unterbibliotheken @f@ allgemein @n@ und @f@ dinlike @n@ ange-
#-!    zeigt werden.
#-!
#-!    Öffnen Sie die Bibliothek @f@ allgemein. @n@
#-!
#-
#-In der Unterbibliothek allgemein erfolgt die Auswahl und Plazierung von 
#-Formelement bohrung-s.
#-";
#
INCLUDE PART BLW PNT=0,0;FILE="/usr/siscadp/fel/maschinenbau/allgemein/bohrung-s.fel";ANG=0;BOM=0;!
#$ WARTE 3 ;
MODIFY PART TAC OP=4;VIDX=1;PIDX=1;HLDG=8;PIDX=2;HLDG=6!
#$ WARTE 3 ;
MODIFY PART PARM OP=4;PNT=CADD(0,0;77.3,46;CMLT(-1;0,0));GLOB=1!
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART PARM OP=4;ANG=0!
MODIFY PART FFT OP=4!
#INTERPRETIERE FILE="/usr/siscadp/fel/maschinenbau/allgemein/bohrung-s.his"!
#WENN (( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))>135)*( ANGLXD( TCAT("FML_";CONVN2T(IDENTLC;0)))<=315))
MODIFY TEXT E TCAT("FT_";CONVN2T(IDENTLC;0));TXTA=0!
#SONST
#Ende des Makros "/usr/siscadp/fel/maschinenbau/allgemein/bohrung-s.his"
#
#$ INFO "
#-Ausschalten des Intelligenten Fangmodus, durch anklicken des Symboles 
#-@I<GTFang>@.
#-";
#
SWITCH RULE OUTxOFFxWITH 11!
#
#$ WARTE 5;
#
#$ BILD NEU ;
#
#$ WARTE 5;
#
#$ MELDUNG "
#-!
#-!     Die Zeichnungsverwaltung kann geschlossen werden, durch drücken des
#-!     Schloß-Symboles. @I<CClose>@
#-!
#-";
#
#$ INFO "
#-Es wird ein Ausschnitt erzeugt, damit die Änderung der Formelementgeometrie in
#-die unsichtbare Darstellung besser ersichtlich ist.
#-";
#
#$ FENSTER 51 51.7 84.1 35.8 ;
#
#$ WARTE 5;
#
#$ MELDUNG "
#-!
#-!    Es besteht die Möglichkeit, daß durch Ihre Anordnung der geöffneten Fenster
#-!    ( Folien-Info und Tutorial ) der Ausschnitt verdeckt ist.
#-!    Mit Hilfe der Funktionen im Grafik-Fenster ( Fensterschieben, Dynamischer
#-!    Zoom ) können Sie den Ausschnitt in den sichtbaren Bereich des Grafik -
#-!    Fensters verschieben!
#-!
#-";
#
#$ INFO "
#-Die Änderung der Formelementgeometrie für die unsichtbare Darstellung wird mit
#-dem Befehl @f@  MODIFY LINE @n@ ausgeführt.
#-";
#
MODIFY LINE OP=[LINE]34;LT=2;!
#
#$ WARTE 5;
#
MODIFY LINE OP=[LINE]32;LT=2;!
#
#$ WARTE 5;
#
MODIFY LINE OP=[LINE]27;LT=2;!
#
#$ WARTE 5;
#
MODIFY LINE OP=[LINE]26;LT=2;!
#
#$ WARTE 5;
#
MODIFY LINE OP=[LINE]28;LT=2;!
#
#$ WARTE 5;
#
MODIFY LINE OP=[LINE]29;LT=2;!
#
#$ WARTE 5;
#
MODIFY LINE OP=[LINE]22;LT=2;!
#
#$ WARTE 5;
#
#$ INFO "
#-Die Gesamtansicht der Konstruktion wird dargestellt. 
#-";
#
#$ ZOOM GANZ ;
#
#$ WARTE 5;
#
#$ MELDUNG "
#-!
#-!    Es besteht die Möglichkeit, daß durch Ihre Anordnung der geöffneten Fenster
#-!   (Folien-Info und Zeichnungsverwaltung) die Gesamtansicht der Konstruktion
#-!    verdeckt ist. Mit Hilfe der Funktionen im Grafik-Fenster (Fensterschieben,
#-!    Dynamischer Zoom) können Sie die Gesamtansicht der Konstruktion in den
#-!    sichtbaren Bereich des Grafik-Fensters verschieben!
#-!
#-";
#
#$ INFO "
#-Da Formelemente eigene Folien besitzen, müssen die Formelementgeometrien den
#-Ansichts-Folien zugewiesen werden.
#-
#-Formelementobjekte werden der Ansichts-Folie Vorderansicht (VA) zugewiesen.
#-";
#
MODIFY LAYER OP=VA;ENTi=[LINE]32;[LINE]30;[LINE]34;[LINE]22;[LINE]26;[LINE]28;[LINE]27;[LINE]29;[LINE]21;[POINT]47;[POINT]37;!
#$ MELDUNG "
#-!     Stoppen Sie das Tutorial und lassen Sie sich die [LINE]32 anzeigen, indem Sie
#-!     einen Doppelklick mit der linken Maustaste auf den Parameter ENTi= in der Befehls-
#-!     zeile vom Tutorial ausführen!
#-@k@
#-i     Das Parameter-Symbol wird im Tutorial angezeigt und die [LINE]32 erscheint
#-i     farbig in der Konstruktion.
#-@n@
#-!     Starten Sie das Tutorial wieder, indem Sie  Bestätigen  anklicken!
#-";
#
#$ INFO "
#-Durch Ein- und Ausblenden der Ansichts-Folien kann kontrolliert werden, ob die
#-gewünschten Elemente auf den Folien liegen.
#-";
#
FADE LAYER OUTxOFFxWITH OP=VA;!
#
#$ WARTE 5;
#
FADE LAYER INxON OP=VA;!
#
#$ WARTE 5;
#
#$ INFO "
#-Formelementobjekte werden der Ansichts-Folie Draufsicht (DS) zugewiesen.
#-";
#
MODIFY LAYER OP=DS;ENTi=[LINE]10;[LINE]15;[LINE]18;[LINE]13;[POINT]4;[POINT]23;[POINT]30;[POINT]16;[CIRCLE]1;[CIRCLE]4;[CIRCLE]3;[CIRCLE]5;[CIRCLE]6;[CIRCLE]2;!
#
#$ WARTE 5;
#
#$ INFO "
#-Durch Ein- und Ausblenden der Ansichts-Folien kann kontrolliert werden, ob die
#-gewünschten Elemente auf den Folien liegen.
#-";
#
FADE LAYER OUTxOFFxWITH OP=DS;!
#
#$ WARTE 5;
#
FADE LAYER INxON OP=DS;!
#
#$ WARTE 5 ;
#
#$ BILD NEU ;
#
#$ WARTE 5;
#
#$ INFO "
#-Bevor die in der Darstellung geänderten Formelemente kopiert werden, wird die
#-Ansichts-Folie VA aktiviert. Die Formelementkopien liegen somit auf der 
#-entsprechenden Ansichts-Folie.
#-";
#
ACTIVATE LAYER OP=VA;!
#
#$ WARTE 5;
#
#$ INFO "
#-Das Formelement bohrung-s wird kopiert.
#-";
#
COPY FORMFEATURE PP OP=[FORMFEATURE]6;PNT1=[POINT]4;PNT2=[POINT]16;!
#
#$ WARTE 5;
#
#$ BILD NEU ;
#
#$ WARTE 5;
#
#$ INFO "
#-Das Formelement d74am-s wird kopiert.
#-";
#
COPY FORMFEATURE PP OP=[FORMFEATURE]5;PNT1=[POINT]23;PNT2=[POINT]30;!
#
#$ BILD NEU ;
#
#$ WARTE 5;
#
#$ INFO "
#-Die Systemfolien werden aktiviert.
#-";
#
MODIFY DEFAULT LYRS SETGEO=GEOFOLIE;SETTXT=TEXTFOLIE;SETRDIM=REFERENZBEMFOLIE;SETPDIM=PARAMETRIKBEMFOLIE;SETHAT=SCHRAFFURFOLIE;SETPNR=POSNRFOLIE;SETSTS=BEARBEITUNGFOLIE;!
#
#$ WARTE 5 ;
#
#$ INFO "
#-Es sollte vermieden werden, daß Geometrie 'aufeinander' zum Liegen kommt.
#-Bei den waagerechten Mittellinien der Formelemente bohrung-d und d74am-d würde
#-dieses nach der Konstruktion der waagerechten Mittellinie (Symmetrielinie) in
#-der Draufsicht zutreffen. Deshalb werden diese Geraden gelöscht.
#-";
#
#$ WARTE 5;
# 
#$ INFO "
#-Es wird ein Ausschnitt erzeugt, damit das Löschen der Geraden in der Draufsicht
#-besser ersichtlich ist.
#-";
#
#$ FENSTER 3.9 17.8 88.7 19 ;
#
#$ WARTE 5;
#
#$ MELDUNG "
#-!
#-!    Es besteht die Möglichkeit, daß durch Ihre Anordnung der geöffneten Fenster
#-!    ( Folien-Info und Zeichnungsverwaltung ) der Ausschnitt verdeckt ist.
#-!    Mit Hilfe der Funktionen im Grafik-Fenster ( Fensterschieben, Dynamischer
#-!    Zoom ) können Sie den Ausschnitt in den sichtbaren Bereich des Grafik -
#-!    Fensters verschieben!
#-!
#-";
#
DELETE LINE OP=[LINE]12;!
#
#$ WARTE 5;
#
DELETE LINE OP=[LINE]19;!
#
#$ WARTE 5;
#
DELETE LINE OP=[LINE]16;!
#
#$ WARTE 5;
#
DELETE LINE OP=[LINE]9;!
#
#$ WARTE 5;
#
#$ INFO "
#-Die Ansichts-Folie für die Draufsicht (DS) wird aktiviert.
#-";
#
ACTIVATE LAYER OP=DS;!
#
#$ WARTE 5;
#
#$ INFO "
#-Die Symmetrielinie (Mittellinie) der Draufsicht wird mit dem intelligenten
#-Fangmodus erzeugt.
#-
#-
#-Einschalten des Intelligenten Fangmodus durch anklicken des Symboles.
#-@I<CTFang>@
#-";
#
SWITCH RULE INxON 11!
#
#$ WARTE 5;
#
CREATE LINE PP PNT1=0,7.5([LINE]4,[LINE]4);PNT2=86,7.5([LINE]2,[CIRCLE]1);LT=4;!
#
#$ WARTE 5;
#
#$ INFO "
#-Ausschalten des Intelligenten Fangmodus durch anklicken des Symboles.
#-@I<GTFang>@
#-";
#
SWITCH RULE OUTxOFFxWITH 11!
#
#$ WARTE 5;
#
#$ INFO "
#-Die Systemfolien werden aktiviert.
#-";
#
MODIFY DEFAULT LYRS SETGEO=GEOFOLIE;SETTXT=TEXTFOLIE;SETRDIM=REFERENZBEMFOLIE;SETPDIM=PARAMETRIKBEMFOLIE;SETHAT=SCHRAFFURFOLIE;SETPNR=POSNRFOLIE;SETSTS=BEARBEITUNGFOLIE;!
#
#$ BILD NEU ;
#
#$ WARTE 5;
#
#$ MELDUNG "
#-!
#-!     Das Folien-Info kann geschlossen werden, durch drücken des Schloß-Symboles.
#-!     @I<CClose>@
#-!
#-";
#
#$ INFO "
#-Die Gesamtansicht der Konstruktion wird dargestellt. 
#-";
#
#$ ZOOM GANZ ;
#
#$ WARTE 5;
#
#$ MELDUNG "
#-!
#-!    Es besteht die Möglichkeit, daß durch Ihre Anordnung der geöffneten Fenster
#-!    ( Tutorial ) die Gesamtansicht der Konstruktion
#-!    verdeckt ist. Mit Hilfe der Funktionen im Grafik-Fenster ( Fensterschieben,
#-!    Dynamischer Zoom ) können Sie die Gesamtansicht der Konstruktion in den
#-!    sichtbaren Bereich des Grafik-Fensters verschieben!
#-!
#-";
#
#$ WARTE 2 ;
#
#$ MELDUNG "
#-@k@
#-i
#-i     Das Blenden der Formelementfolien in der Folien-Info bewirkt, daß die
#-i     Formelementfolien von @x@ allen @k@ plazierten Formelementen geblendet
#-i     werden!
#-i
#-i     Das Blenden einer Formelementfolie eines @x@ einzelnen @k@ Formelementes
#-i     wird mit dem CAD-Befehl: @x@ FADE FORMFEATURE @k@ ausgeführt.
#-i
#-@n@
#-Die Kurzbezeichnung der Senkung wird durch Einblenden der
#-FeKurzbenennungsFolie vom Formelement erstellt.
#-";
#
FADE FORMFEATURE INxON OP=[FORMFEATURE]4;LONLY=FEKURZBENENNUNGFOLIE;!
#
#$ BILD NEU ;
#
#$ WARTE 5;
#
#$ INFO "
#-Die Durchmesserbemaßung der Bohrung erfolgt durch das Einblenden der
#-FeParametrikBemFolie vom Formelement.
#-";
#
FADE FORMFEATURE INxON OP=[FORMFEATURE]1;LONLY=FEPARAMETRIKBEMFOLIE;!
#
#$ WARTE 5;
#
#$ INFO "
#-Die Toleranzangabe für das Durchmessermaß wird angegeben.
#-";
#
MODIFY LINEARDIM OP=[LINEARDIM]1;DEVH="H7";PDL=86.2,18.1;!
#
#$ WARTE 5;
#
#$ BILD NEU ;
#
#$ WARTE 5;
#
#$ INFO "
#-Die weitere Bemaßung für das Teil erfolgt durch verschiedene Möglichkeiten
#-der Erzeugung von Längenmaßen.
#-";
#
#$ WARTE 5 ;
#
#$ INFO "
#-Erzeugen von Längenmaßen senkrecht zur X-Achse des Teiles.
#-";
#
CREATE LINEARDIM VRT REFE1=[LINE]5(1.5,40.2;0);REFE2=[LINE]7(2.4,45.8;0);PDL=-4.2,43.8;!
#$ WARTE 5 ;
CREATE LINEARDIM VRT REFE1=[LINE]1(3.8,-0.4;0);REFE2=[LINE]3(2.2,15.1;0);PDL=-4.3,11.5;DEVL="h6"!
#$ WARTE 5 ;
#
#$ INFO "
#-Erzeugen eines Längenmaßes senkrecht zum ersten Element.
#-";
#
CREATE LINEARDIM VRTE REFE1=[LINE]18(22.5,2.6;0);REFE2=[LINE]15(62.7,2.4;0);PDL=42.4,-2.9;CIDxREFL=[LINE]1;DEVH=+0.1;DEVL=-0.1;!
#
#$ WARTE 5 ;
#
#$ INFO "
#-Erzeugen eines Längenmaßes zwischen Punkten.
#-";
#
CREATE LINEARDIM BTWP REFP1=[POINT]16;REFP2=[POINT]4;PDL=68.4,-13.7;CIDxREFL=[LINE]1;DEVH=+0.1;DEVL=-0.1;PDT=1;PDL=55.8,-13.7;PDL=52.1,-14.5;PDL=47.7,-13.9;!
#
#$ WARTE 5 ;
#
#$ INFO "
#-Erzeugen eines Längenmaßes paralell zu der X-Achse des Teiles.
#-";
#
CREATE LINEARDIM PRL REFE1=[LINE]4(-0.1,11;0);REFE2=[LINE]2(85.8,10.7;0);PDL=45.5,-22;CIDxREFL=[LINE]1;!
#
#$ WARTE 5 ;
#
#$ INFO "
#-Das Oberflächenzeichen für die Bearbeitung des Teiles wird erzeugt.
#-";
#
CREATE SURFACESYMBOL LEG PNT=39.5,66.7;STSS="N8M";!
#
#$ WARTE 5;
#
#$ INFO "
#-Die Stammdaten des Teiles werden in der Teile-Info eingegeben.
#-@I<CTStruk>@
#-
#-Die Artikel-Daten werden eingetragen.
#-";
#
MODIFY PART PARM OP=1;ITNR="52E03052";!
#
#$ WARTE 5;
#
CREATE VARIABLE T TXT="52E03052";NA=&ZEICHNR;!
#
#$ WARTE 5;
#
CREATE VARIABLE T TXT="Führungsleiste";NA=&BENENNUNG;!
#
#$ WARTE 5;
#
CREATE VARIABLE T TXT="1.2510P";NA=&WERKSTOFF;!
#
#$ WARTE 5;
#
#$ INFO "
#-Die Schriftfeld-Daten werden eingetragen.
#-";
#
CREATE  VARIABLE T TXT="02.03.95";NA=&DATUMBEARB;!
#
#$ WARTE 5;
#
CREATE VARIABLE T TXT="P.Dittrich";NA=&NAMEBEARB;!
#
#$ WARTE 5;
#
CREATE VARIABLE T TXT="1";NA=&BLATTNR;!
#
#$ WARTE 5 ;
#
CREATE VARIABLE T TXT="1";NA=&BLATTANZAHL;!
#
#$ MELDUNG "
#-!
#-!     Öffnen Sie die Teile-Info!
#-!     @I<CStrFa>@
#-!
#-!     Klicken Sie das Symbol für die Stammdaten - Eingabe an!
#-!     @I<CStammIo>@
#-!     Wählen Sie @f@ Artikel @n@ ( durch anklicken ) an und es erscheint die
#-!     ausgefüllte Artikeldatenmaske. 
#-!
#-!     Schließen Sie die Artikeldatenmaske mit dem Schloß-Symbol
#-!     @I<CClose>@
#-!     und wählen Sie @f@ Schriftfeld @n@ ( durch anklicken ) an.
#-!     Es erscheint die ausgefüllte Schriftfelddatenmaske.
#-!
#-!     Schließen Sie die Schriftfelddatenmaske und die Teile-Info mit dem
#-!     Schloß-Symbol.
#-!     @I<CClose>@
#-!
#-";
MODIFY PART PARM OP=1;ITNR="52E03052";!
#$ MELDUNG "
#-@k@
#-i
#-i     Die Konstruktion ist nun komplett erstellt und könnte nun in der Zeich-
#-i     nungsverwaltung gespeichert werden.
#-i
#-i     Die Zeichnung wird erst mit den Zeichnungselementen Schriftfeld und 
#-i     Zeichnungsrahmen versehen, wenn eine Ausgabe (Druck, Plott) nötig ist.
#-i     Beim Plazieren der Konstruktion sind die Zeichnungselemente nicht
#-i     relevant.
#-i
#-i     Wenn Sie sich die Zeichnungselemente für die Konstruktion nicht erzeugen
#-i     und anzeigen wollen, dann beenden oder laden Sie ein Tutorial.
#-i
#-@n@
#-!
#-!     Soll die erstellte Konstruktion mit den Zeichnungselementen erzeugt und
#-!     angezeigt werden, dann aktivieren Sie die Zeichnungsverwaltung, durch 
#-!     anklicken des Symboles.
#-!     @I<CTKatal>@
#-!     Über den Menuepunkt @f@ selektieren nach... @n@ wählen Sie die @f@Makros@n@ an. 
#-!     Interpretieren Sie das Makro Schriftfeld und die Zeichnungselemente
#-!     werden automatisch erstellt.
#-!     Die Interpretation wird folgendermaßen ausgeführt:
#-!
#-!     Das Symbol @f@ interpretieren @n@ wird angeklickt und danach das Makro Schriftfeld.
#-!
#-!     Anschließend führen Sie die Grafik-Funktion Gesamtansicht aus und die
#-!     Zeichnung mit ausgefülltem Schriftfeld und Zeichnungsrahmen wird ange-
#-!     zeigt.
#-!
#-";
#
#$ WARTE 5;
#
#$ INFO "
#-Die Parametrik wird ausgeschaltet und das Tutorial beendet.
#-";
#
MODIFY PART PARM 1;PRC=0;!
#
#$ WARTE 2;
#
MODIFY DEFAULT SDIM PRC=0;!
#
#$ WARTE 2;
#
#$ LOESCHE INFO;
#
#$ ENDE;
