Hallo,
a) entweder mit Normbearbeitung, Freie Bohrung, Durchgangsbohrung, Durchmesser wählen, Raster linear, ny auf 1 stellen und Abstände vorgeben - siehe Bild!
b) oder als Makro die Abstände von Hicad nach ihren Vorgaben ausrechnen lassen - siehe Beispielmakro
Lernprogrammm Makro unter: http://home.wms-hn.de/people/teachers/ch/christ/christ4.html
durcharbeiten...
c) oder als Featurevariante eine "Leiste" anlegen
Welche Strategie wollen Sie auswählen?
Zeilen in den Editor kopieren und als leiste.mac speichern
Makrobeispiel mit STRG + 8 starten
REM HICAD-Next VN:1212
REM HiCAD
START 59
HNEXT
%L:=1000
var %L Rechtecklänge in X-Richtung >= 200
%BR:=150
var %BR Rechtecklänge in y-Richtung >= 3 x Durchmesser Loch
%C:=BR/2
%H:=30
var %H Dicke der Platte H
%R:=20
var %R Randabstand R >= 3 x Durchmesser Loch
%B:=L-(2*R)
%D:=10
var %D Durchmesser Löcher
%D:=D/2
%AZ:=B/100
%AZG:=NINT (AZ)
%AB:=AZG+1
%BB:=B/AZG
REM HiCAD 3 = 3-D SZENE
OPTION 3 59
REM ALT2
OPTION 22 0
REM KOORD. SYSTEM 9 = Verändern
OPTION 9 152
REM PROJEKTION 7 = Draufsicht
OPTION 7 111
OPTION ESC
OPTION ESC
OPTION ESC
REM BERECHNUNG BERECHNUNG
OPTION 3 159
REM 3D - SZENE S9= 3D Funktionen
OPTION 19 101
REM 3D FUNKTIONEN 5 = Skizze anlegen
OPTION 5 196
OPTION ESC
REM 3D - SZENE 3 = Bearbeiten
OPTION 3 101
REM TEILE 1 = Bearbeiten
OPTION 1 102
REM BEARBEITEN 2 = Kantenzüge
OPTION 2 106
REM 3D KANTENZUG 4 = 3D Konstrukt.
OPTION 4 137
POINT A 0 0
POINT A L 0
POINT A L BR
POINT A 0 BR
POINT A 0 0
POINT ESC
POINT ESC
OPTION ESC
OPTION ESC
OPTION ESC
REM 3D - SZENE S9= 3D Funktionen
OPTION 19 101
REM 3D FUNKTIONEN S2= Hauptteil neu
OPTION 12 196
REM Eingabe über Macros?
ANTWORT 1
REM Translationskörper
INTEGER 8
REM Dynamisch (j)? oder Werteingabe (n)?
ANTWORT 0
REM Referenziert?
ANTWORT 0
REM Featureprotokoll?
ANTWORT 1
REM Formschräge:
REAL 0
REM Anfangshöhe :
REAL 0
REM Endhöhe
REAL H
REM Körpername :
STRING 111
STRING RET
OPTION ESC
OPTION ESC
REM HiCAD 3 = 3-D SZENE
OPTION 3 59
OPTION ESC
REM BERECHNUNG 2 = Eigene Verf.
OPTION 2 159
REM ZEICHENTEILE 3 = ZTL bearbeit.
OPTION 3 1
REM BAUTEILE 8 = Hauptteil neu
OPTION 8 2
REM NEUES TEIL 1 = Teil anlegen
OPTION 1 3
STRING loch1
REM BAUTEILE 1 = Linien
OPTION 1 2
REM LINIEN 5 = Kreis/-bogen
OPTION 5 6
REM KREISBOGEN 5 = MP- Radius
OPTION 5 11
POINT A r c
REM ~(INT = Punkt auf Kreis) ~Radius :
DISTANZ d
POINT ESC
OPTION ESC
REM BAUTEILE 4 = wiederholen
OPTION 4 2
REM WIEDERHOLUNG 1 = Translation
OPTION 1 19
REM Zu zeichnende Exemplare =
INTEGER AB
POINT A r c
POINT R BB 0
REM Wiederholungen sofort auflösen ?
ANTWORT 0
OPTION ESC
OPTION ESC
REM ZEICHENTEILE 3 = ZTL bearbeit.
OPTION 3 1
REM ALT10
OPTION 30 0
REM Dateiname :
STRING INT
REM BAUTEILE 6 = Bt. speichern
OPTION 6 2
REM Teil als SZN speichern ?
ANTWORT 0
STRING C:LOCH1
OPTION ESC
OPTION ESC
REM HiCAD 3 = 3-D SZENE
OPTION 3 59
OPTION ESC
REM BERECHNUNG 2 = Eigene Verf.
OPTION 2 159
OPTION ESC
REM HiCAD 2 = 2-D ZTL
OPTION 2 59
REM ZEICHENTEILE 3 = ZTL bearbeit.
OPTION 3 1
REM BAUTEILE 10= Bt. auswählen
OPTION 10 2
STRING RET
REM BAUTEILE 7 = Bt. löschen
OPTION 7 2
REM O.K. ?
ANTWORT 1
OPTION ESC
OPTION ESC
REM HiCAD 3 = 3-D SZENE
OPTION 3 59
REM 3D - SZENE S9= 3D Funktionen
OPTION 19 101
REM 3D FUNKTIONEN 5 = Skizze anlegen
OPTION 5 196
REM Als Teil anlegen (j) oder als Hauptteil (n) ?
ANTWORT 0
OPTION ESC
REM 3D - SZENE 3 = Bearbeiten
OPTION 3 101
REM TEILE 1 = Bearbeiten
OPTION 1 102
REM BEARBEITEN 2 = Kantenzüge
OPTION 2 106
REM 3D KANTENZUG 3 = Kntzug aus 2D
OPTION 3 137
REM 2D MIT TRANS. 6 = Figur aus DB
OPTION 6 112
STRING C:Loch1
REM mit Translation
INTEGER 1
POINT A r c
POINT A r c
OPTION ESC
OPTION ESC
OPTION ESC
REM 3D - SZENE S9= 3D Funktionen
OPTION 19 101
REM 3D FUNKTIONEN S2= Hauptteil neu
OPTION 12 196
REM Eingabe über Macros?
ANTWORT 1
REM Translationskörper
INTEGER 8
REM Dynamisch (j)? oder Werteingabe (n)?
ANTWORT 0
REM Referenziert?
ANTWORT 0
REM Featureprotokoll?
ANTWORT 1
REM Formschräge:
REAL RET
REM Anfangshöhe :
REAL RET
REM Endhöhe
REAL H
REM Körpername :
STRING 222
STRING RET
OPTION ESC
OPTION ESC
REM BERECHNUNG BERECHNUNG
OPTION 3 159
REM 3D - SZENE 3 = Bearbeiten
OPTION 3 101
REM TEILE 1 = Bearbeiten
OPTION 1 102
REM BEARBEITEN S6= Bool. Operat.
OPTION 16 106
INTEGER ESC
OPTION ESC
REM TEILE 10= Aktivieren
OPTION 10 102
STRING 111
OPTION ESC
REM 3D - SZENE 3 = Bearbeiten
OPTION 3 101
REM TEILE 1 = Bearbeiten
OPTION 1 102
REM BEARBEITEN S6= Bool. Operat.
OPTION 16 106
REM Differenz
INTEGER 3
STRING 222
REM zweites Teil erhalten :
ANTWORT 0
OPTION ESC
OPTION ESC
REM HiCAD 3 = 3-D SZENE
OPTION 3 59
REM 3D - SZENE 3 = Bearbeiten
OPTION 3 101
REM TEILE 10= Aktivieren
OPTION 10 102
STRING C:3D-Skizze
REM TEILE 7 = Löschen
OPTION 7 102
REM O.K. ?
ANTWORT 1
REM TEILE 10= Aktivieren
OPTION 10 102
STRING RET
REM TEILE 7 = Löschen
OPTION 7 102
REM O.K. ?
ANTWORT 1
OPTION ESC
END
Ohne Gewährleistung!
------------------
K. Christ
Fachschule für Technik - Technikerschule
Heilbronn
http://home.wms-hn.de/people/teachers/ch/christ/
Hicad Hilfestellungen und Makros:
http://home.wms-hn.de/people/teachers/ch/christ/christ4.html
Stellenangebote für Techniker und Konstrukteure:
http://home.wms-hn.de/people/teachers/ch/christ/christ3.html
[Diese Nachricht wurde von ch am 19. Apr. 2009 editiert.]
[Diese Nachricht wurde von ch am 19. Apr. 2009 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP