---

Servus,

ich bin ein völliger APDL neulich und brauche nun Hilfe :-)

Ich haben in Ansys eine CAD Obeflächenmodel eingelanden. Die CAD Datei (SolidWorks) ist mit Parametern definiert. Durch diese Parameter erscheinen und verschwinden Ringe, besser gesagt einzelt definierte Komponenten. Ich möchte nun diese Oberflächen Dicken zuweisen. Diesen Befehl habe ich mittlerweile schon gefunden. Das Problem ist nur, dass ich, wenn ich die Anzahl der Ringe verändere, das Programm Ringe aufdicken will die sich garnicht mehr im Modell befinden. Wie lass ich das Programm überprüfen ob sich die Komponente im Bauteil befindet oder eben nicht?

Was meine Idee war, die leider nicht funktioniert:

!##############Elementabfrage  ob vorhanden #####################
*GET,nsExist1,NS_Ring1,2,COUNT
*IF,nsExist1,GT,0,THEN

!################ NS_Ring1 #########################
! Define  NS_Ring1 (Flächen)
! Create new section
sectype,101,shell
secdata,ARG1

! Assign Thickness
cmsel,s,NS_Ring1
esln,,1
emodif,all,secnum,101
allsel
!##############NS_Ring1 ###########################

!##############Elementabfrage ob vorhanden #####################
*GET,nsExist2,NS_Ring2,2,COOUNT
*IF,nsExist2,GT,0,THEN

!################ NS_Ring2 #########################
! Define  NS_Ring2
! Create new section
sectype,102,shell
secdata,ARG2

! Assign Thickness
cmsel,s,NS_Ring2
esln,,1
emodif,all,secnum,102
allsel
!##############NS_Ring2 ###########################

Kann mir da jemand helfen?

Gruß Pete

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

hi,
guckst du hier

http://ww3.cad.de/foren/ubb/Forum101/HTML/007732.shtml

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Vielen Dank Solve1

Ich Habe mit:

!##############Elementabfrage #####################
*get,NS_Ring1,comp,i,name            !Name der i-ten Komponente
  !strpos is case - sensitiv
  *if,strpos(NS_Ring1,'gesucht'),eq,1,then
   

!################ NS_Ring1 #########################
! Define  NS_Ring1 (Flächen)
! Create new section
sectype,101,shell
secdata,ARG1

! Assign Thickness
cmsel,s,NS_Ring1
esln,,1
emodif,all,secnum,101
allsel
!##############NS_Ring1 ###########################

*endif

für Ring1 eine Laufende Schleife.

Das Die schleife läuft jetzt auch durch aber die Aufdickung der Oberflchen wird Ignoriert obwohl dies eben gemacht werden sollte.

Ich gebe zu, ich verstehe die Progmamiersprache so gut wie garnicht.

Bitte um Hilfe.

Gruß Pete

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Moin, meine Problem Hat sich gelöst.

Durch eine Do Schleife konnte ich die Elemente abfragen.

*DO, zaehler, 1, AnzahlElement, 1
sectype,10%zaehler%,shell
secdata,ARG%zaehler%

! Assign Thickness
cmsel,s,NS_Ring%zaehler%
esln,,1
emodif,all,secnum,10%zaehler%
allsel

*ENDDO

Gruß Pete

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP