Hallo,
ich habe nun meine Tools etwas erweitert, wenn interesse besteht bitte eine PM schicken. Anbei die neuen Funktionen.
RoSiNiNo Ver. 03-02-25
-----------------------
Inhalt von RoSiNiNo030225.zip:
-------------------------------
ReadMe.txt --> diese Datei
RoSiNiNo.mnu --> Menü BlockNumm
RoSiNiNo.dvb --> VBA-Datei
RoSiNiNo.cmd --> Befehlszuweisung (mit Texteditor editierbar)
acaddoc.lsp --> wird bei jeder Zeichnung geladen (lädt RoSiNiNo.cmd)
diese Datei ist nicht notwendig wenn man RoSiNiNo.cmd in Startgruppe von "appload" geladen wird
Blöcke:
HK-O.dwg
HK-U.dwg
PT-B-OL.dwg
PT-B-OR.dwg
PT-B-UL.dwg
PT-B-UR.dwg
PT-C-OL.dwg
PT-C-OR.dwg
PT-C-UL.dwg
PT-C-UR.dwg
Icons:
Abwicklung.bmp
BlockNRefr.bmp
BlockNumm.bmp
BlockRefr.bmp
BlockScale.bmp
DivideEx.bmp
InsertEx.bmp
LaengeEx.bmp
MeasureEx.bmp
MoveEx.bmp
OffsetEx.bmp
Boeschung1.bmp
Boeschung2.bmp
AusrichtenVerteilen.bmp
MstSet.bmp
Installation:
-------------
Um alle Funktionen nutztn zu können benötigt man "AcadX.arx".
Download unter http://members.bellatlantic.net/~vze2vjds/acadx/acadx15.htm
Das Zip-File in einen beliebigen Ordner entpacken. Der Pfad muß nicht in Acad gesetzt sein.
Danach AcadX.arx in die Startgruppe von "appload" geben.
BlockNumm021217.zip in eigenen Pfad der in Acad gesetzt werden muß, entpacken.
Sollte bereits eine acaddoc.lsp vorhanden sein, in dieser RoSiNiNo.cmd laden oder RoSiNiNo.cmd in die Startgruppe von "appload" geben.
Menü RoSiNiNo laden, Acad neu starten.
Funktionen:
-----------
Maßstab setzten --> MSTS - wird für "Numerierte Blöcke einsetzten" benötigt
Numerierte Blöcke einsetzten --> BLOCKNUMM - setzt Blöcke ein und nummeriert gewähltes Attribut fortlaufend
BlockScale --> BLKSCALE - Skaliert Blöcke um deren Einsetzpunkt
Block Refresh --> BLREFR - Setzt gewählte Blöcke neu ein und übernimmt Inhalt von gleichen Attributen
Block New Refresh --> BLNREFR - Wechselt Blöcke mit neuem Block aus und übernimmt Inhalt von gleichen Attributen
Messen mit Anfangspunkt --> MEX
Dieser Befehl ist ein erweiterter Messen-Befehl.
1. Objekt wählen (Linie, Polylinie, Kreisbogen, Ellipse,...)
2. Anfanspunkt und Richtung wählen
3. Segmentlänge angeben oder Blockname, Blockname aus Liste, Block zeigen
3.1 Block ausrichten?
4. Anzahl eingeben
Teilen mit Anfangspunkt und Endpunkt --> TEX
Dieser Befehl ist ein erweiterter Teilen-Befehl
1. Objekt wählen
2. Anfangs- und Endpunkt wählen
3. Anzahl der Segmente oder Blockname, Block aus Liste, Block zeigen, maximaler Abstand, minimaler Abstand
3.1 Block ausrichten?
Länge --> LEX
Es wird der Abstand von einem Punkt zu einem zweiten Punkt auf einem Objekt angegeben
1. Objekt wählen
2. Zweiten Punkt angeben oder ersten Punkt angeben (es wird beim ersten Aufruf der Anfangspunkt des Objekts angenommen)
An Objekt ausgerichtet einsetzen --> EEX
Es werden Blöcke auf einem Objekt ausgerichtet
1. Objekt wählen
2. Blockname oder Block durch zeigen
3. Punkt zeigen oder neues Objekt wählen
Abwicklung --> ABWICKLUNG
Es werden Punkte an einem Objekt abgewickelt und auf einer Linie aufgetragen
1. Objekt wählen
2. Punkte wählen
3. Einsetzpunkt und Winkel der Abwicklung angeben
NEUE BEFEHLE:
Schieben-erweitert --> SEx
Es werden Objekte entlang einer "Kurve" verschoben
1. Objekte wählen
2. "Kurve" wählen
3. Basispunkt zeigen
4. Zweiten Punkt zeigen
5. Abstand bestätigen oder eingeben
Versetzen-erweitert --> VEx
Es werden Objekte normal auf eine "Kurve" verschoben
1. Objekte wählen
2. "Kurve" wählen
3. Basispunkt zeigen
4. Zweiten Punkt zeigen
5. Abstand bestätigen oder eingeben
Böschung1 --> B1
Es werden Böschungslinien gezeichnet
1. Böschungsoberkante wählen
2. Böschungsunterkante wählen
3. Abstand der Böschungslinien eingeben
4. Länge der langen Linien in % angeben
5. Länge der kurzen Linien in % angeben
Böschung2 --> B2
Es werden Böschungslinien gezeichnet
1. Böschungsoberkante wählen
2. Abstand der Böschungslinien eingeben
3. Länge der langen Linien angeben
4. Länge der kurzen Linien angeben
Ausrichten und Verteilen --> AusrVer
Objekte werden ausgerichten und/oder verteilt
Allgemeines:
------------
Die gezeigten Punkte müssen nicht auf dem Objekt liegen, es wird immer der näheste Punkt auf dem Objekt verwendet.
Um die Funktionen zu entfernen einfach Menü RoSiNiNo entfernen, unter "appload" die geladenen Dateien entfernen und Acad neu starten.
------------------
Roland
[Diese Nachricht wurde von RoSiNiNo am 26. Februar 2003 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP