• Dieses Forum ist die maschinengenerierte Übersetzung von www.cad3d.it/forum1 - der italienischen Design-Community. Einige Begriffe sind nicht korrekt übersetzt.

Drucken der Gewichtsberechnung

  • Ersteller Ersteller fabang
  • Erstellt am Erstellt am

fabang

Guest
Beppe schrieb:
ich möchte wissen, ob sie mit autocad lt das gewicht eines bestimmten stückes berechnen können, denke ich nicht
ich möchte auch wissen, ob es sehr praktische beispiele in der zirkulation gibt, um den xrif-befehl besser zu verstehen

danke.
Zum Vergrößern anklicken....
hallo leute! das ist meine erste frage im forum.
ich konnte das gewicht eines feststoffes durch ein programm berechnen
lisp, ich klicke auf den festen und das gewicht zurück (in diesem fall spezifisches eisengewicht). meine frage ist: ich brauche das gewicht zurückgegeben werden unter
textform in einem bestimmten designbereich. ich würde vermeiden, das gewicht in einem blatt zu platzieren und dann in das diseno mit dem textbefehl einfügen! ich denke an eine art block mit attribut, die automatisch auf den festen klickt, schreibt mein gewicht in der zeichnung, aber wie tun sie es?? ich hoffe, ich war klar!! danke.
 
fabang schrieb:
hallo leute! das ist meine erste frage im forum.
ich konnte das gewicht eines feststoffes durch ein programm berechnen
lisp, ich klicke auf den festen und das gewicht zurück (in diesem fall spezifisches eisengewicht). meine frage ist: ich brauche das gewicht zurückgegeben werden unter
textform in einem bestimmten designbereich. ich würde vermeiden, das gewicht in einem blatt zu platzieren und dann in das diseno mit dem textbefehl einfügen! ich denke an eine art block mit attribut, die automatisch auf den festen klickt, schreibt mein gewicht in der zeichnung, aber wie tun sie es?? ich hoffe, ich war klar!! danke.
Zum Vergrößern anklicken....
vielleicht wäre es besser, wenn sie die lise befestigen oder den link einfügen, wo sie ihn gefunden haben. vielleicht kann es jemand ändern.
 
Das ist die lippe, die ich durchpower habe!
Mein zul ist es, das ausgewählt ergebnisvolume in
ein txt in der zeichnung! hilfe

(refun c:ale_geight (/entobj volval wspval)
(vl-load-com)
(fallssetq entobj (ale_entselfilter "selects a solid"(0).
"3dsolid '
(Progn)
(sektq)
entobj (ale_vlax-ename>vla-object entobj)
volval (fla-get-volume entobj)
wspval (getreal "\npesospesifisch: "
)
(wenn wspval)
(princ)
(sing)
"\nvolume: (rtos volval 2 1)
" - Gewicht: (rtos (* volval wspval) Artikel 2
)
)
)
)
)
(princ)
)
;
; Copyright ©2005 - marc'antonio alessi, italy - allerecht vorbehalten
; http://xoomer.virgilio.it/alessi;
; funktion: ale_entselfilter
;
; version 1.00 - 22/02/2005
;
; beschreibung:
; ssget für eine einheit mit filterliste
;
; argumente:
; prmstr = benutzeraufforderung [STR]; fltlst = ssget filter list
  • ;
    ; beispiel:
    ; (ale_entselfilter "select attibuted block" '((0. "insert") (66.1)))
    ;
    ; rückgabewerte:
    ; [ENAME] Name des unternehmens
    ; nil, wenn Exploiter drücken 'return' oder 'space '
    ;
    (defun ale_entselfilter)
    (princ "\n_ ")
    (prompt (setq prmstr (strcat "\n" prmstr ": ")))))
    (Fälle)
    (Zwanzig)
    (Satzq entnam (ssget "_:e:s" fltlst))
    (Kousin (setq flgslt t))
    (wenn (= 52) (getvar "errno")
    (setq flgslt t)
    (prompt (strcat "\nnessun oggetto selezionato o valido),
    riprova!"
    )
    )
    )
    (Kousin "\ncomando annullato.")
    (Name entnam 0)
    )
    )
    ;
    ; Funktion: ale_vlax-ename>vla Objekt
    ;
    ; Version 1.00 - 22/02/2005
    ;
    ; beschreibung:
    ; validieren Sie eingabeobekt
    ;
    ; Argument:
    ; entobj = [VLA-OBJECT] oder [ENAME];
    rückgabewerte:
    ; [VLA-OBJECT] Wenn Sie eingabeobjekt
    , nil andernfalls
    ;
    (refun ale_vlax-ename>vla object (entobj)
    (Fortsetzung)
    (entobj-Typ)
    (= (entobj type) 'ename) (setq entobj (vlax-ename->vla object)
    (entobj)
    (t (prompt "\ntipo di oggetto non valido!)
    )
    )
    ;
    (princ)
 
die einfachste form, mit stil, texthöhe und aktuellem winkel:(refun c:ale_geight (/entobj volval wspval)
(vl-load-com)
(setq entobj (ale_entselfilter "selezioni un solido" ((0).
"3dsolid")))))))))
(Prog.)
(setq)
entobj (ale_vlax-ename>vla-object entobj)
Fla-get Volumen entobj
wspval (getreal "\npeso specifico: ')
)
(wenn wspval)
(princ)
(Stukat)
"\nvolume: " (rtos volval 2 1)
" - peso: " (rtos (* volval wspval) Artikel 2
)
)
)
)
)(setq vol) Diese String nur die wert (setq vol (strcat "volume" (rtos volval 2 1))) kettet von scrivere Volumen + wert (Prompt "\npoint of insert of the text (volume) ")
(Befehl "_text" bricht "" vol)(Snaps)
)
 
... aus diesem chaos.
befehl: ; fehler: fehlerhafte liste auf eingabe

die saiten, die du mir gegeben hast, sind teil der ganzen lispe?

GP. schrieb:
die einfachste form, mit stil, texthöhe und aktuellem winkel:(refun c:ale_geight (/entobj volval wspval)
(vl-load-com)
(setq entobj (ale_entselfilter "selezioni un solido" ((0).
"3dsolid")))))))))
(Prog.)
(setq)
entobj (ale_vlax-ename>vla-object entobj)
Fla-get Volumen entobj
wspval (getreal "\npeso specifico: ')
)
(wenn wspval)
(princ)
(Stukat)
"\nvolume: " (rtos volval 2 1)
" - peso: " (rtos (* volval wspval) Artikel 2
)
)
)
)
)(setq vol) Diese String nur die wert (setq vol (strcat "volume" (rtos volval 2 1))) kettet von scrivere Volumen + wert (Prompt "\npoint of insert of the text (volume) ")
(Befehl "_text" bricht "" vol)(Snaps)
)
Zum Vergrößern anklicken....
 
ich veröffentlichte nur den teil zu integrieren, die lispe sollte so vollständig wie sie es ursprünglich veröffentlicht.
 
oder krönen sie diesen string:(setq vol) dieser string nur den wert zu schreiben oder dies tun:(setq vol (strcat "volume" (rtos volval 2 1))) dieser string zu schreiben volumen + wert


nicht inkollar der blaue teil, ich habe es nur reingelegt, um ihnen einen hinweis zu geben.
 
Danke! drahtlos abspritzen
selbstst wenn ich ein chaos habe. Ich weiß nicht.
befehl: ; fehler: schlecht argument type: file "0.41"
Mal sehen, ob wir es abnehmen können.

in der zwischenzeit die ganze lispe, die geändert wurde
und an meine Bedürfnisse angepasst. Ich bin sicher, du kannst zurückkommen.
Los!
Da ist es.

: diese lispe loves das volumen in litern von jedem "3dsolid"
: Denken Sie daran, dass der feststoff in Millimetern an Muscheln gesaugt wurde.
: bei der eingabeaufforderung, type: wörtlich
:
(defun ale_vlax-ename>vla object (entobj)
(cond)
(Typ entobj) (fla object) entobj
(Typ entobj) 'ename) (setq entobj (vlax-ename->vla object)
)
(t (prompt "\ntipo oder Objekt nicht gültig!)
)
)
(refun c:litro (/countr selset entnam entobj volval wspval)
(vl-load-com)
(f)
(sectq selset)
(ale_ssgetfilter "wählt einen oder mehrere feststoffe" ((0. "3dsolid")))
)
(Progn)
(sektq)
wspval 7.85
Volumen 0,0
Zähler 0
)
(while (setq entnam) 0)
(sektq)
entobj (ale_vlax-ename>vla object entnam)
volval (+ (fla-get-volume entobj) volval)
Countr (1+ Countr)
)
(sdel entnam selset)
)
(wenn wspval)
(princ)
(sing)
)
(setq vol (rtos (* volval 0.00001) Artikel 2
(Befehl "_text" bricht "" vol)
)
)
(vlax release object entobj)
)
)
(princ)
)
(defun ale_ssgetfilter (prmstr fltlst / flgslt selset)
(princ "\n_ ")
(prompt (setq prmstr (strcat "\n" prmstr ": ")
(f)
(Zwanzig)
(Fälle (setq selset (ssget fltlst))
(Kousin (setq flgslt t)
(if= 52)
(setq flgslt t)
(sing)
(sing)
"\nnessa ausgewähltes oder gültiges objekt, veruchen sie es wieder!" prmstr
)
)
)
)
)
(Kousin (princ "\ncommand storniert). "
Sonstige
)
)
 
ich sage dir meins:

1) weil sie die anfrage nicht behalten haben "texteinführpunkt"? wer den deckel verwendet, kann nicht wissen, was nach der auswahl der feststoffe zu tun.

2) ich vermisse den grund, warum das volumen in litern zurückzugeben und millimeter zu ziehen, wäre es nicht besser, das gemeldete volumen an die einheit zurückzugeben, die jeder für ihre arbeit setzt?
wer in mm zieht, wird das volumen in mm3 haben, die in meter zieht wird das volumen in m3 haben, etc.
aber vielleicht sage ich ein fest, weil die meisten der potenziellen nutzer der lispe die notwendigkeit hat, in liter zurückzukehren (wenn sie so einen grund getan haben, wird es sein).

jedenfalls...:4425:
 
... zuerst vielen dank für die gerade!!!
ohne unterstützung ich habe den deckel nicht geschlossen!
ich freue mich, ihre fragen zu beantworten

1) nach der auswahl der festen die letzte anfrage ist: geben sie startpunkt text oder ....ich benutze autocad in englisch, so bin ich an diese art von chaos gewöhnt.

2).. das volumen in liter ist die solide in mm., es ist ausschließlich eine persönliche anforderung, ich bin ein mechanischer designer, so dass sie verstehen werden!

cmq kann der deckel verbessert und an die bedürfnisse jedes angepasst werden! in bezug auf die liter oder m3 nur etwas 0 auf den einzigen wert 0,000001!! )

danke wieder g.p für support
 
..es scheinen notwendig, um eine generische lisp Beiträge
die tie weight und volumen eines festen 3dkal, mit dem bedarf ein spezifischer Gewicht!

Hi.

; Version 1.00 - 06/11/2008 - modifiziert von fabrizio
; bei der eingabeaufforderung, Typ:
; dieses Volumen in m3 und Gewicht in kg
; von einem 3dfest, behandelt spezifiches Gewicht (z.B. Anforderungen 7.85 etc...)!
; gute Arbeit überhaupt
;
(defun ale_vlax-ename>vla object (entobj)
(cond)
(Typ entobj) (fla object) entobj
(Typ entobj) 'ename) (setq entobj (vlax-ename->vla object)
)
(t (prompt "\ntipo oder Objekt nicht gültig!)
)
)
(defunc c:vol (/countr selset entobj volval wspval)
(vl-load-com)
(f)
(sectq selset)
(ale_ssgetfilter "wählt einen oder mehrere feststoffe" ((0. "3dsolid")))
)
(Progn)
(sektq)
wspval (getreal "\npesospesifisch: "
Volumen 0,0
Zähler 0
)
(while (setq entnam) 0)
(sektq)
entobj (ale_vlax-ename>vla object entnam)
volval (+ (fla-get-volume entobj) volval)
Countr (1+ Countr)
)
(sdel entnam selset)
)
(wenn wspval)
(princ)
(sing)
"\n' (itoa countr) "feste' volume m3: (rtos (* volumen 0.000000001) l 347 vom 20.12.2013, s. 1).
" - Gewicht kg: (rtos (* volval wspval 0.00001) Artikel 2
)
)
)
(vlax release object entobj)
)
)
(princ)
)
(defun ale_ssgetfilter (prmstr fltlst / flgslt selset)
(princ "\n_ ")
(prompt (setq prmstr (strcat "\n" prmstr ": ")
(f)
(Zwanzig)
(Fälle (setq selset (ssget fltlst))
(Kousin (setq flgslt t)
(if= 52)
(setq flgslt t)
(sing)
(sing)
"\nnessa ausgewähltes oder gültiges objekt, veruchen sie es wieder!" prmstr
)
)
)
)
)
(Kousin (princ "\ncommand storniert). "
Sonstige
)
)
 

Statistik des Forums

Themen
58.521
Beiträge
499.056
Mitglieder
104.110
Neuestes Mitglied
ChristianR

Zurzeit aktive Besucher

Keine Mitglieder online.
Gesamt: 0 (Mitglieder: 0, Gäste: 0)
Zurück
Oben