HILFE: Script-Korrektur mit Multiwerkzeug

[tobiaskern]

Hallo Forum,

 

grüße Euch.

 

Ich möchte in meiner Vorlagedatei die Bemaßungen nicht autom. auf die Klasse "Bemaßung" legen,

d.h. ich habe in den Dokumenteinstellungen den Haken dementsprechend bei der Automatisierung

entfernt.

 

Um Bemassungen zu zeichnen, nutze ich Scripte, welche ich mit dem Mulitwerkzeug erzeugt habe.

Dazu habe ich ein Scriptpalette erstellt. Für jede Bemassungsart lieht ein eigenes Script darin.

Per Doppelklick auf das Script wird die Prozedur aktiviert und das Bemaßungswerkzeug aktiviert.

Durch die Scripte werden die Bemassungen, auf meine gewünschten Klassen gelegt.

 

… doch leider lässt es das Multiwerkzeug nicht zu, den Bemassungsstandard mit in das Script zu speichern,

d.h. nach Aktivierung des Scriptes muss ich dennoch noch den Bemassungstandard definieren.

Diesen Prozess würde ich auch gerne mit dem Script automatisieren.

 

Gibt es ggf. mittels Eingriff in das Script, eine Möglichkeit, doch noch den Bemassungstandard

in das Script einzubinden?

 

Ich denke diese Anfrage ist ziemlich speziell, aber ggf. gibt es einen Script_Spezialisten unter Euch!?

 

Hier mal der Code welcher durch das Multiwerkzeug erstellt wurde:

 

Procedure CustTool;

VAR

Name:STRING;

Result:BOOLEAN;

BEGIN PushAttrs;

NameClass('Bemaßung');

SetPref( 3, True );

SetPref( 1013, True );

SetPref( 1014, False );

SetPref( 1015, False );

SetPrefReal( 78, 1.000000 );

SetPrefReal( 79, 1.000000 );

SetPrefReal( 1019, 1000.000000 );

SetPrefReal( 1020, 1000.000000 );

SetPrefReal( 1021, 0.000000 );

SetPrefReal( 1022, 2540.000000 );

SetPrefReal( 1023, 2540.000000 );

SetPrefReal( 1024, 25400.000000 );

SetPrefReal( 1025, 25400.000000 );

SetPrefReal( 1026, 0.000000 );

SetPref( 35, False );

SetPref( 36, False );

SetPref( 1027, True );

SetPref( 1028, True );

SetPref( 1029, True );

SetPref( 1030, True );

SetPref( 1031, True );

SetPref( 1032, True );

SetPref( 1033, True );

SetPrefString( 1034, '45.000000;30.000000' );

SetPref( 1035, True );

SetPref( 1036, True );

SetPrefReal( 53, 0.000000 );

SetPref( 1037, True );

SetPref( 1038, True );

SetPref( 1039, True );

SetPrefReal( 1040, 1.000000 );

SetPref( 4, False );

SetPrefReal( 1041, 2.000000 );

SetPref( 1042, False );

SetPrefReal( 1043, 0.000000 );

SetPref( 1044, False );

SetPrefReal( 1045, 0.500000 );

SetPref( 1046, True );

SetPref( 1047, False );

SetPrefReal( 1048, 0.000000 );

SetPref( 1049, True );

SetPref( 1050, True );

SetPrefReal( 1051, 0.250000 );

SetPrefReal( 1052, 0.000000 );

SetPref( 1053, False );

SetConstrain('qswd');

CallTool(-210);

PopAttrs;

END;

Run(CustTool);

 

Grüße und besten Dank für die Hilfe
Tobi

[KroVex]

Salü tobiaskern

 

 

Anbei das Script was du suchst:

# Bem-Script edited by KroVex
Dim_Std = {}  
i = 0;
v = ''

while v != 1:
    try:
        vs.SetDimStd(i)
    except:
        pass
    vs.LinearDim((0, 0), (0, 0), 0, 0, 0, 0, 0)
    h = vs.LNewObj()
    v = vs.GetObjectVariableInt(h, 0)  
    n = vs.GetObjectVariableString(h, 27)
    vs.DelObject(h)
    i = i - 1
    if v != 1:
        Dim_Std[n] = v

vs.NameClass('040_Bemassung-041_Bemassung-Bem_MST_100'); # Klasse der Bemassung
vs.SetDimStd(Dim_Std.get('Bemassung_100')); # Bemassungsstandard
vs.SetPref(44, False);
vs.SetTool(-210);
vs.TextSize(13); # Ignorieren - Textgroesse wird ueber Bemassungsstandard definiert

Gruss KroVex

[tobiaskern]

Hi Krovex.

 

grüße Dich und 1.000 Dank für die Hilfe und Zeit.

 

… würde zu gerne lernen wie man Scripte erstellt.

Wie lange dauert es, so ein Script zu erstellen?

 

Beim Kompilieren bekomme ich folgenden Fehler angezeigt:

siehe Screenshot anbei.

 

Ich habe die entsprechende Klasse und den Bemassungsstandard im Script

ausgetauscht.

 

Viele Grüße
Tobi

 

 

[KroVex]

vor 33 Minuten schrieb tobiaskern:

… würde zu gerne lernen wie man Scripte erstellt.

Wie lange dauert es, so ein Script zu erstellen?

Ich bin leider nicht der Script-Profi, den du suchst. Ich bin mehr so "ahh, da hat's ein Script was so in etwa tut was ich vorhabe.. hmm das könnte etwa dies bedeuten und dass das.. versuchen wir mal diesen Wert zu ändern und schauen wir was passiert.. Klappt das auch wenn ich noch das anhänge?! *eine menge Fluchwörter einsetzen* Ahhh jetzt funktioniert's.. keine Ahnung wieso aber es geht" -Script-Typ  Ich möchte es gerne auch besser verstehen/anwenden können, aber irgendwie halse ich mir immer zu viele Projekte auf und das Python-Lernen kommt immer zu kurz 

Vielleicht kann dir da @Manuel Roth mehr zur Materie berichten

 

vor 42 Minuten schrieb tobiaskern:

Beim Kompilieren bekomme ich folgenden Fehler angezeigt:

siehe Screenshot anbei.

Hast du es auch auf Python gestellt?

 

Ansonsten so:
Bemassung-Script.vwx

 

Gruss KroVex

 

[tobiaskern]

Hi Krovex,

 

grüße Dich.

 

Dann sind wir uns ähnlich, bin auch mehr der Learning-by-doing-Typ,

welcher erst probiert und dann ggf. die Anleitung in die Hand nimmt.

 

… in der Tat es war die Script-Sprache. Mit Python gehts.

 

Viele Grüße und nochmals besten Dank!

Tobi