:F EM_PRAK.MEN
:I      0,       0,       0
:! - ANSYS 11.0 EM-Praktikum V 2.0
:! FH-Dortmund -> EM-Praktikum V 2.0
:! Version zum Buch "FEM fr elektrische Antriebe"
:! Springer Vieweg
:! nachfolgende genullte Indexzeilen sind zu verwenden
:! i(9-18-27) s(9,16,23)
:!!I      0,       0,       0
:!!S      0,     0,     0
:!!
:N MenuRoot
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Root 14.01.2010
:C )/uis,msgpop,3
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Main Menu
:D EM-Praktikum V 2.0
Fnc_Preferences
Sep_
Men_Preproc
Men_Solution
Men_GenlPost
Men_TimePost
Sep_
Men_Topo
K_LN(alpha)
Men_DesOpt
K_LN(ALPHA)
Men_DesOpt_al
Men_ProbDesign
Men_Aux12
Men_RunStat
Sep_
Fnc_UNDO
Sep_
Fnc_FINISH
K_LN(UTILMENU)
Men_UtilMenu
Sep_
Men_EM_PRAK
Sep_
Fnc_FINISH
K_LN(UTILMENU)
Men_UtilMenu
:E END
:!!
:N Men_EM_PRAK
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_PRAK 16.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 3.11.2013
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM, Version zum Buch "FEM fr elektrische Antriebe"
:C /COM, Springer Vieweg
:C /COM,
:C )/GO
:A EM Praktikum
:D EM-Praktikum
Fnc_MODELL_NEU
Men_EM_TRAFO
Men_EM_GSM
Men_EM_SYN
Men_EM_ASYN
Men_EM_LIN
:E END
:!!
:N Men_EM_TRAFO
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_TRAFO 16.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Transformator
:D EM-Praktikum Transformator
Fnc_MODELL_NEU
Men_EM_Trafo1
Men_EM_Trafo2
:E END
:!!
:N Men_EM_GSM
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_PRAK 16.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Gleichstrommaschine 
:D EM-Praktikum Gleichstrommaschine
Fnc_MODELL_NEU
Men_EM_GSM1
Men_EM_GSM2
Men_EM_GSM3
Men_EM_GSM4
:E END
:!!
:N Men_EM_SYN
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_SYN 16.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Synchronmaschine 
:D EM-Praktikum Synchronmaschine
Fnc_MODELL_NEU
Men_EM_VOLL
Men_EM_SCHEN
:E END
:!!
:N Men_EM_ASYN
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_ASYN 16.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Asynchronmaschine 
:D EM-Praktikum Asynchronmaschine
Fnc_MODELL_NEU
Men_EM_ASMK
Men_EM_ASMS
:E END
:!!
:N Men_EM_LIN
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_LIN 16.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Linearmotor 
:D EM-Praktikum Linearmotor
Fnc_MODELL_NEU
Men_EM_LIN5
:E END
:!!
:N Fnc_MODELL_NEU
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor01 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Modell loeschen
:H Hlp_EMD_VOREIN2
:D Modell loeschen
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Das gesamte Modell wird geloescht
Cmd_)FINISH
Cmd_)allsel
Cmd_)edel,all
Cmd_)adel,all
Cmd_)ldel,all
Cmd_)kdel,all
Cmd_)/CLEAR,START
CAL_REFRESH
:E END
:!!
:N Men_EM_MAX1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_MAX1 10.01.10
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Maxwell'sche Theorie 1 (Streuung)
:D EM-Praktikum Maxwell'sche Theorie 1 (Streuung)
Men_VorMAX1
Sep_
Men_GeneMAX1
Sep_
Men_LoesMAX1
:E END
:!!
:N Men_EM_MAX2
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_MAX2 10.01.10
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Maxwell'sche Theorie 2 (Magnetischer Kreis)
:D EM-Praktikum Maxwell'sche Theorie 2 (Magnetischer Kreis)
Men_VorMAX2
Sep_
Men_GeneMAX2
Sep_
Men_LoesMAX2
:E END
:!!
:N Men_EM_MAX3
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_MAX3 10.01.10
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Maxwell'sche Theorie 3 (Lorentzkraft)
:D EM-Praktikum Maxwell'sche Theorie 3 (Lorentzkraft)
Men_VorMAX3
Sep_
Men_GeneMAX3
Sep_
Men_LoesMAX3
:E END
:!!
:N Men_EM_MAX4
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_MAX4 10.01.10
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Maxwell'sche Theorie 4 (Stromverdraengung)
:D EM-Praktikum Maxwell'sche Theorie 4 (Stromverdraengung)
Men_VorMAX4
Sep_
Men_GeneMAX4
Sep_
Men_LoesMAX4
:E END
:!!
:N Men_EM_STV1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_STV1 16.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Stromverdraengung 1 (einseitig)
:D EM-Praktikum Stromverdraengung (einseitig)
Men_Vor11
Sep_
Men_Gene11
Sep_
Fnc_rech11
:E END
:!!
:N Men_EM_STV2
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_STV2 16.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Stromverdraengung 2 (allseitig)
:D EM-Praktikum Stromverdraengung (allseitig)
Men_Vor12
Sep_
Men_Gene12
Sep_
Fnc_rech12
:E END
:!!
:N Men_EM_Trafo1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_Traf1 16.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Trafo1 (Einphasentransformator)
:D EM-Praktikum Trafo1 (Einphasentransformator)
Men_Vor0
Sep_
Men_Gene0
Sep_
Men_Aend0
Sep_
Men_Loes0
Sep_
Men_Ausw0
:E END
:!!
:N Men_Vor0
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor0 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Einphasentransformator
:D EM-Praktikum Voreinstellung Einphasentransformator
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Geometriedaten (Einphasentransformator)-
Fnc_Vor01
Fnc_Vor02
Fnc_Vor03
Fnc_Vor03b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor01
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor01 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Jochblechdaten (Einphasentransformator)
:H Hlp_EMD_VOREIN2
:D Jochblechdaten (Einphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,jochbreite
Fld_2
 Prm_Jochbreite  [m]
 Typ_Real
DEF_*PAR(jochbreite)
Cmd_)*SET,jochhoehe
Fld_2
 Prm_Jochhoehe  [m]
 Typ_Real
DEF_*PAR(jochhoehe)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Jochdicke   [m]
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe   [m]
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,1
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor02
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor02 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Primaerwicklungsdaten (Einphasentransformator)
:H Hlp_EMD_VOREIN1
:D Primaerwicklungsdaten (Einphasentransformator)
:K #(TRAFO1+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Primaerwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite1
Fld_2
 Prm_Wicklungsbreite primaer [m]
 Typ_Real
DEF_*PAR(wickbreite1)
Cmd_)*SET,wickhoehe1
Fld_2
 Prm_Wicklungshoehe primaer [m]
 Typ_Real
DEF_*PAR(wickhoehe1)
Cmd_)*SET,wickabstand1
Fld_2
 Prm_Wicklungsabstand primaer [m]
 Typ_Real
DEF_*PAR(wickabstand1)
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl primaer
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor03
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor03 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Sekundaerwicklungsdaten (Einphasentransformator)
:H Hlp_EMD_VOREIN3
:D Sekundaerwicklungsdaten (Einphasentransformator)
:K #(TRAFO1+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Sekundaerwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite2
Fld_2
 Prm_Wicklungsbreite sekundaer [m]
 Typ_Real
DEF_*PAR(wickbreite2)
Cmd_)*SET,wickhoehe2
Fld_2
 Prm_Wicklungshoehe sekundaer [m]
 Typ_Real
DEF_*PAR(wickhoehe2)
Cmd_)*SET,wickabstand2
Fld_2
 Prm_Wicklungsabstand sekundaer [m]
 Typ_Real
DEF_*PAR(wickabstand2)
Cmd_)*SET,nwin2
Fld_2
 Prm_Windungszahl sekundaer
 Typ_Real
DEF_*PAR(nwin2)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor03b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor03b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Umgebungsdaten (Einphasentransformator)
:H Hlp_EMD_VOREIN3
:D Umgebungsdaten (Einphasentransformator)
:K #(TRAFO1+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Umgebungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,breiteaussen
Fld_2
 Prm_Breite Aussenbereich  [m]
 Typ_Real
DEF_*PAR(breiteaussen)
Cmd_)*SET,hoeheaussen
Fld_2
 Prm_Hoehe Aussenbereich   [m]
 Typ_Real
DEF_*PAR(hoeheaussen)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
Cmd_)KEYW,GENE,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor04
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor04 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter (Einphasentransformator)
:H Hlp_EMD_VOREIN4
:D Netzparameter (Einphasentransformator)
:K #(TRAFO1+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,meshaussen
Fld_2
 Prm_Maschenweite auen   [m]
 Typ_Real
DEF_*PAR(meshaussen)
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshinnen
Fld_2
 Prm_Maschenweite innen   [m]
 Typ_Real
DEF_*PAR(meshinnen)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,DEFI1,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor05
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor05 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter primaer (Einphasentransformator)
:H Hlp_EMD_VOREIN4
:D Schaltungsparameter primaer (Einphasentransformator)
:K #(TRAFO1+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter primaer
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand primaer [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet primaer [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung primaer [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,NETZ,0
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor05b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor05b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter sekundaer (Einphasentransformator)
:H Hlp_EMD_VOREIN4
:D Schaltungsparameter sekundaer (Einphasentransformator)
:K #(TRAFO1+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter sekundaer
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn2
Fld_2
 Prm_Stirnwiderstand sekundaer [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2)
Cmd_)*SET,lwickstirn2
Fld_2
 Prm_Stirninduktivitaet sekundaer [H]
 Typ_Real
DEF_*PAR(lwickstirn2)
Cmd_)*SET,rlast
Fld_2
 Prm_Lastwiderstand sekundaer [Ohm]
 Typ_Real
DEF_*PAR(rlast)
Cmd_)KEYW,SCHALT2,1
Cmd_)KEYW,SCHALT1,0
CAL_REFRESH
:E END
:!!
:N Men_Gene0
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene01 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Einphasentransformator
:D EM-Praktikum Generierung Einphasentransformator
:K #(TRAFO1+GENE)
Fnc_EMM_HIN
Sep_
-Definition Einphasentransformator-
Fnc_elemente0
Fnc_material0
-Geometriegenerierung Einphasentransformator-
Fnc_t1geometrie
Fnc_t1flaechen
-Vernetzung Einphasentransformator-
Fnc_Vor04
Fnc_nettrafo1
-Kopplungen Einphasentransformator-
Fnc_cptrafo1
-Verschaltung Einphasentransformator-
Fnc_Vor05
Fnc_Vor05b
Fnc_schalttrafo1
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente0
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente0
:C )/GO
:A Elementdefinition Einphasentransformator
:H Hlp_elemente
:D Elementdefinition Einphasentransformator
:K #(TRAFO1+DATEN)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition
Cmd_)trafo1p-elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cmd_)KEYW,DATEN,0
Cal_REFRESH
:E END
:!!
:N Fnc_material0
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_material0
:C )/GO
:A Materialdefinition Einphasentransformator
:H Hlp_material
:D Materialdefinition Einphasentransformator
:K #(TRAFO1+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition
Cmd_)*SET,muer
Fld_2
 Prm_muer Eisen
 Typ_Real
 Def_*PAR(muer)
Cmd_)*SET,leit1
Fld_2
 Prm_Leitfaehigkeit primaer [S/m]
 Typ_Real
 Def_*PAR(leit1)
Cmd_)*SET,leit2
Fld_2
 Prm_Leitfaehigkeit sekundaer [S/m]
 Typ_Real
 Def_*PAR(leit2)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fil1
Fld_2
 Prm_Fuellfaktor primaer
 Typ_Real
 Def_*PAR(fil1)
Cmd_)*SET,fil2
Fld_2
 Prm_Fuellfaktor sekundaer
 Typ_Real
 Def_*PAR(fil2)
Cmd_)trafo1p-material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_t1geometrie
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_geometrietrafo1
:C )/GO
:A Generierung Geometrie Einphasentransformator
:H Hlp_statornut
:D Generierung Geometrie Einphasentransformator
:K #(TRAFO1+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Transformator Geometrie
Cmd_)trafo1p-geometrie.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_t1flaechen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_flaechentrafo1
:C )/GO
:A Generierung Trafo Flaechen
:H Hlp_statornut
:D Generierung Trafo Flaechen
:K #(TRAFO1+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Transformator Flaechen
Cmd_)trafo1p-flaechen.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_nettrafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_nettrafo1
:C )/GO
:A Netzgenerierung Einphasentransformator
:H Hlp_elemente
:D Netzgenerierung Einphasentransformator
:K #(TRAFO1+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Transformator
Cmd_)trafo1p-netz.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_cptrafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cptrafo1
:C )/GO
:A Kopplungen Einphasentransformator
:H Hlp_elemente
:D Kopplungen Einphasentransformator
:K #(TRAFO1+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)trafo1p-kopplung.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_schalttrafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalttrafo1
:C )/GO
:A Verschaltung Einphasentransformator
:H Hlp_elemente
:D Verschaltung Einphasentransformator
:K #(TRAFO1+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Einphasentransformator
Cmd_)trafo1p-schalt.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT2,0
Cal_REFRESH
:E END
:!!
:N Men_Loes0
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loes0 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Einphasentransformator
:D EM-Praktikum Loesung Einphasentransformator
:K #(TRAFO1+SCHALT)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Einphasentransformator-
Fnc_austrafo1
-Statische Rechnung Einphasentransformator-
Fnc_loes1trafo1
Fnc_loes2trafo1
Fnc_loes3trafo1
-Harmonische Rechnung Einphasentransformator-
Fnc_loes4trafo1
Fnc_loes5trafo1
Fnc_loes6trafo1
-Transiente Rechnung Einphasentransformator-
Fnc_loes7trafo1
Fnc_loes8trafo1
Fnc_loes9trafo1
Fnc_loes10trafo1
:E END
:!!
:N Fnc_austrafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_austrafo1
:C )/GO
:A Ausgabedefinition Einphasentransformator
:H Hlp_elemente
:D Ausgabedefinition Einphasentransformator
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Einphasentransformator
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)trafo1p-aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1trafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1trafo1
:C )/GO
:A Stromvorgabe primaer (Einphasentransformator)
:H Hlp_elemente
:D Stromvorgabe primaer (Einphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Rechnung mit primaerer Stromvorgabe
Cmd_)*SET,i1
Fld_2
 Prm_Primaerstrom
 Typ_Real
DEF_*PAR(i1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)trafo1p-loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2trafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2trafo1
:C )/GO
:A Stromvorgabe sekundaer (Einphasentransformator)
:H Hlp_elemente
:D Stromvorgabe sekundaer (Einphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Rechnung mit sekundaerer Stromvorgabe
Cmd_)*SET,i2
Fld_2
 Prm_Sekundaerstrom
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)trafo1p-loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3trafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3trafo1
:C )/GO
:A Stromvorgabe gesamt (Einphasentransformator)
:H Hlp_elemente
:D Stromvorgabe gesamt (Einphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Rechnung mit beidseitiger Stromvorgabe
Cmd_)*SET,i1
Fld_2
 Prm_Primaerstrom
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Sekundaerstrom
 Typ_Real
DEF_*PAR(i2)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)trafo1p-loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4trafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4trafo1
:C )/GO
:A Harmonische Leerlauf im Leerlauf (Einphasentransformator)
:H Hlp_elemente
:D Harmonische Rechnung im Leerlauf (Einphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Rechnung im Leerlauf
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,1
Cmd_)trafo1p-loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5trafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5trafo1
:C )/GO
:A Harmonische Rechnung im Kurzschlu (Einphasentransformator)
:H Hlp_elemente
:D Harmonische Rechnung im Kurzschlu (Einphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Rechnung im Kurzschlu
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,0
Cmd_)trafo1p-loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6trafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6trafo1
:C )/GO
:A Harmonisch Rechnung unter Last (Einphasentransformator)
:H Hlp_elemente
:D Harmonische Rechnung unter Last (Einphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Rechnung unter Last
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rlast
Fld_2
 Prm_Lastwiderstand sekundaer [Ohm]
 Typ_Real
DEF_*PAR(rlast)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,2
Cmd_)trafo1p-loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7trafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7trafo1
:C )/GO
:A Transiente Rechnung im Leerlauf (Einphasentransformator)
:H Hlp_elemente
:D Transiente Rechnung im Leerlauf (Einphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung im Leerlauf
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*set,leerlauf,1
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)trafo1p-loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8trafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8trafo1
:C )/GO
:A transient Kurzschlu
:H Hlp_elemente
:D Transiente Rechnung im Kurzschlu
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung im Kurzschlu
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,0
Cmd_)trafo1p-loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes9trafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes9trafo1
:C )/GO
:A Transiente Rechnung unter Last (Einphasentransformator)
:H Hlp_elemente
:D Transiente Rechnung unter Last (Einphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung unter Last
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rlast
Fld_2
 Prm_Lastwiderstand sekundaer [Ohm]
 Typ_Real
DEF_*PAR(rlast)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,2
Cmd_)trafo1p-loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes10trafo1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes10trafo1
:C )/GO
:A Transiente Rechnung unter Kurzschlu nach Zeit (Einphasentransformator)
:H Hlp_elemente
:D Transiente Rechnung unter Kurzschlu nach Zeit (Einphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung unter Kurzschlu nach Zeit
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rlast
Fld_2
 Prm_Lastwiderstand sekundaer [Ohm]
 Typ_Real
DEF_*PAR(rlast)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,zeitk
Fld_2
 Prm_Zeit bis Kurzschlu  [s]
 Typ_Real
DEF_*PAR(zeitk)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,3
Cmd_)trafo1p-loes7.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_DREH
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_DREH 16.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Drehfeld
:D EM-Praktikum Drehfeld
Men_Vor1
Sep_
Men_Gene1
Sep_
Men_Aend1
Sep_
Men_Loes1
Sep_
Men_Ausw1
:E END
:!!
:N Men_Vor1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Drehfeld
:D EM-Praktikum Voreinstellung Drehfeld
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Geometriedaten Drehfeld-
Fnc_Vor11
Fnc_Vor12
Fnc_Vor13
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor11
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor11 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statorblechdaten Drehfeld
:H Hlp_EMD_VOREIN2
:D Statorblechdaten Drehfeld
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,raussen
Fld_2
 Prm_Aussenradius (ras)
 Typ_Real
DEF_*PAR(raussen)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Statorstaerke gesamt (ssa)
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)*SET,delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nut/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)*SET,zweischicht
Fld_2
 Prm_Nutfuellung
 Typ_Lis_RadioB
 Lis_Einschicht,0
 Lis_Zweischicht,1
 Def_*PAR(zweischicht)
Cmd_)*SET,eps
Fld_2
 Prm_Sehnung epsilon
 Typ_Real
DEF_*PAR(eps)
Fld_0
 Typ_Sep
Cmd_)*SET,_freq
Fld_2
 Prm_(Grund)frequenz [Hz]
 Typ_Real
DEF_*PAR(_freq)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,1
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor12
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor12 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotorblechdaten Drehfeld
:H Hlp_EMD_VOREIN1
:D Rotorblechdaten Drehfeld
:K #(DREH+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rinnen
Fld_2
 Prm_Innenradius (rir)     [m]
 Typ_Real
DEF_*PAR(rinnen)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor13
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor13 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornutdaten Drehfeld
:H Hlp_EMD_VOREIN3
:D Statornutdaten Drehfeld
:K #(DREH+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Statornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite1
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite1)
Cmd_)*SET,wickhoehe1
Fld_2
 Prm_wicklungshoehe1 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe1)
Cmd_)*SET,wickisol
Fld_2
 Prm_Isolationshoehe (wi)   [m]
 Typ_Real
DEF_*PAR(wickisol)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)KEYW,VOREIN3,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor14
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor14 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Drehfeld
:H Hlp_EMD_VOREIN4
:D Netzparameter Drehfeld
:K #(DREH+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor15
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor14 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Drehfeld
:H Hlp_EMD_VOREIN4
:D Schaltungsparameter Drehfeld
:K #(DREH+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Rpar1
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Rpar1 23.04.1999
:C )*SET,_zx,'*.geo'
:C )/GO
:A Parameter lesen
:D EM-Praktikum Parameter lesen
:H Hlp_C_PARRES
Cmd_PARRES
 Fld_0
  Typ_Lab
  Prm_Lesen der Geoemetrieparameter
 Fld_3
  Prm_Fname  Lesen der Parameter
  Typ_FILE
  Def_*PAR(_zx)
:E END
:!!
:N Fnc_Wpar1
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Wpar1 23.04.1999
:C )*SET,_zx,'*.geo'
:C )/GO
:A Parameter sichern
:D EM-Praktikum Parameter sichern
:H Hlp_C_PARSAV
Cmd_PARSAV
Fld_0
Typ_Lab
Prm_ Schreiben der Geometrieparamter
Fld_3
Prm_Fname  Schreiben der Parameter
Typ_FILE
Def_*PAR(_zx)
:E END
:!!
:N Men_Gene1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Drehfeld
:D EM-Praktikum Drehfeld
:K #(DREH+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Drehfeld-
Fnc_elemente1
Fnc_material1
-Geometriegenerierung Drehfeld-
Fnc_statornut1
-Vernetzung Drehfeld-
Fnc_Vor14
Fnc_netdrehe
Fnc_netdrehg
-Kopplungen Drehfeld-
Fnc_cpdreh
-Verschaltung Drehfeld-
Fnc_Vor15
Fnc_schaltdreh
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente1
:C )/GO
:A Elementdefinition Drehfeld
:H Hlp_elemente
:D Elementdefinition Drehfeld
:K #(DREH+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition
Cmd_)Dreh_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cal_REFRESH
:E END
:!!
:N Fnc_material1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_material1
:C )/GO
:A Materialdefinition Drehfeld
:H Hlp_material
:D Materialdefinition Drehfeld
:K #(DREH+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Drehfeld
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit aussen [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fila
Fld_2
 Prm_Fuellfaktor aussen
 Typ_Real
 Def_*PAR(fila)
Cmd_)Dreh_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statornut1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statornut
:C )/GO
:A Generierung Statornut Drehfeld
:H Hlp_statornut
:D Generierung Statornut Drehfeld
:K #(DREH+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornut
Cmd_)Dreh_SNut.txt
Cmd_)KEYW,GEO,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netdrehe
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netdrehe
:C )/GO
:A Netzgenerierung Nut Drehfeld
:H Hlp_elemente
:D Netzgenerierung Nut Drehfeld
:K #(DREH+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Statornut
Cmd_)Dreh_nete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netdrehg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netdrehg
:C )/GO
:A Netzgenerierung Maschine Drehfeld
:H Hlp_elemente
:D Netzgenerierung Maschine Drehfeld
:K #(DREH+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)Dreh_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpdreh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpdreh
:C )/GO
:A Kopplungen Drehfeld
:H Hlp_elemente
:D Kopplungen Drehfeld
:K #(DREH+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)Dreh_cp.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltdreh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltdreh
:C )/GO
:A Verschaltung Drehfeld
:H Hlp_elemente
:D Verschaltung Drehfeld
:K #(DREH+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)Dreh_schalt.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Men_Loes1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loes1 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Drehfeld
:D EM-Praktikum Drehfeld
:K #(DREH+SCHALT)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Drehfeld-
Fnc_ausdreh
-Statische Rechnung Drehfeld-
Fnc_loes1dreh
Fnc_loes2dreh
-Transiente Rechnung Drehfeld-
Fnc_loes3dreh
:E END
:!!
:N Fnc_ausdreh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausdreh
:C )/GO
:A Ausgabedefinition Drehfeld
:H Hlp_elemente
:D Ausgabedefiniton Drehfeld
:K #(DREH+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Drehfeld
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)Dreh_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1dreh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1dreh
:C )/GO
:A Einzelschrittrechnung Drehfeld
:H Hlp_elemente
:D Einzelschrittrechnung Drehfeld
:K #(DREH+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,phase
Fld_2
 Prm_Phase in Grad
 Typ_Real
DEF_*PAR(Phase)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)Dreh_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2dreh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1dreh
:C )/GO
:A Mehrschrittrechnung Drehfeld
:H Hlp_elemente
:D Mehrschrittrechnung Drehfeld
:K #(DREH+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung
Cmd_)*SET,phasea
Fld_2
 Prm_Phasenanfang in Grad
 Typ_Real
DEF_*PAR(Phasea)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)Dreh_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3dreh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3dreh
:C )/GO
:A Mehrschrittrechnung Drehfeld
:H Hlp_elemente
:D Mehrschrittrechnung Drehfeld
:K #(DREH+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Mehrschrittrechnung
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,phasea
Fld_2
 Prm_Phasenanfang in Grad
 Typ_Real
DEF_*PAR(Phasea)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)Dreh_loes3.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_VOLL
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_Voll 17.01.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Vollpol-Synchronmaschine
:D EM-Praktikum Vollpol-Synchronmaschine
Men_Vor2
Sep_
Men_Gene2
Sep_
Men_Aend2
Sep_
Men_Loes2
Sep_
Men_Ausw2
:E END
:!!
:N Men_Vor2
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor2 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Vollpol-Synchronmaschine
:D EM-Praktikum Voreinstellung Vollpol-Synchronmaschine
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Vollpol-Synchronmaschine-
Fnc_Vor21
Fnc_Vor22
Fnc_Vor23
Fnc_Vor23b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor21
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor21 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten Vollpol-Synchronmaschine
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Statordaten Vollpol-Synchronmaschine
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,raussen
Fld_2
 Prm_Aussenradius (ras)
 Typ_Real
DEF_*PAR(raussen)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Statorstaerke gesamt (ssa)
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)*SET,delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nut/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)*SET,zweischicht
Fld_2
 Prm_Nutfuellung
 Typ_Lis_RadioB
 Lis_Einschicht,0
 Lis_Zweischicht,1
 Def_*PAR(zweischicht)
Cmd_)*SET,eps
Fld_2
 Prm_Sehnung epsilon
 Typ_Real
DEF_*PAR(eps)
Fld_0
 Typ_Sep
Cmd_)*SET,_freq
Fld_2
 Prm_(Grund)frequenz [Hz]
 Typ_Real
DEF_*PAR(_freq)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor22
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor22 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten Vollpol-Synchronmaschine
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Rotordaten Vollpol-Synchronmaschine
:K #(VOLL+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rinnen
Fld_2
 Prm_Innenradius (rir)     [m]
 Typ_Real
DEF_*PAR(rinnen)
Cmd_)*SET,z2
Fld_2
 Prm_Rotornutenzahl 
 Typ_Real
DEF_*PAR(z2)
Cmd_)*SET,z2spul
Fld_2
 Prm_Belegte Spulen je Pol
 Typ_Real
DEF_*PAR(z2spul)
Cmd_)*SET,nutfuell
Fld_2
 Prm_Leere Nuten fuellen
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
 Def_*PAR(nutfuell)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor23
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor23 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut Vollpol-Synchronmaschine
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statornut Vollpol-Synchronmaschine
:K #(VOLL+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Statornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite1
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite1)
Cmd_)*SET,wickhoehe1
Fld_2
 Prm_wicklungshoehe1 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe1)
Cmd_)*SET,wickisol
Fld_2
 Prm_Isolationshoehe (wi)   [m]
 Typ_Real
DEF_*PAR(wickisol)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor23b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor23b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotornut Vollpol-Synchronmaschine
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Rotornut Vollpol-Synchronmaschine
:K #(VOLL+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite2
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite2)
Cmd_)*SET,wickhoehe2
Fld_2
 Prm_wicklungshoehe2 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe2)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin2
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin2)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor24
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor24 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Vollpol-Synchronmaschine
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter Vollpol-Synchronmaschine
:K #(VOLL+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor25
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor25 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator Vollpol-Synchronmaschine
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator Vollpol-Synchronmaschine
:K #(VOLL+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,vollpol_styp
Fld_2
 Prm_Schaltungstyp
 Typ_Lis_RadioB
 Lis_einzeln,1
 Lis_Stern/Dreieck,2
DEF_*PAR(vollpol_styp)
Cmd_)*SET,stern1
Fld_2
 Prm_Stern/Dreieck
 Typ_Lis_RadioB
 Lis_Stern,1
 Lis_Dreieck,0
DEF_*PAR(stern1)
Cmd_)*SET,vstern1
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor25b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor25b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Rotor Vollpol-Synchronmaschine
:H Hlp_EMD_VOREIN5b
:D EM-Praktikum Schaltungsparameter Rotor Vollpol-Synchronmaschine
:K #(VOLL+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Rotors
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn2
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2)
Cmd_)*SET,lwickstirn2
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)KEYW,SCHALT3,1
Cmd_)KEYW,SCHALT2,0
CAL_REFRESH
:E END
:!!
:N Men_Gene2
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene2 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Vollpol-Synchronmaschine
:D EM-Praktikum Generierung Vollpol-Synchronmaschine
:K #(VOLL+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Vollpol-Synchronmaschine-
Fnc_elemente2
Fnc_material2
-Geometriegenerierung Vollpol-Synchronmaschine-
Fnc_statornut2
Fnc_rotornut2
Fnc_statorarea2
Fnc_rotorarea2
-Vernetzung Vollpol-Synchronmaschine-
Fnc_Vor24
Fnc_netvoll1e
Fnc_netvoll2e
Fnc_netvollg
-Kopplungen Vollpol-Synchronmaschine-
Fnc_cpvoll1
Fnc_cpvoll2
-Verschaltung Vollpol-Synchronmaschine-
Fnc_Vor25
Fnc_schaltvoll1
Fnc_Vor25b
Fnc_schaltvoll2
-Interface Vollpol-Synchronmaschine-
Fnc_interface2
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente2
:C )/GO
:A Elementdefinition Vollpol-Synchronmaschine
:H Hlp_elemente
:D Elementdefinition Vollpol-Synchronmaschine
:K #(VOLL+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Vollpol-Synchronmaschine
Cmd_)Vollpol_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_material2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_material2
:C )/GO
:A Materialdefinition Vollpol-Synchronmaschine
:H Hlp_material
:D Materialdefinition Vollpol-Synchronmaschine
:K #(VOLL+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Vollpol-Synchronmaschine
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit aussen [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit innen [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fila
Fld_2
 Prm_Fuellfaktor aussen
 Typ_Real
 Def_*PAR(fila)
Cmd_)*SET,fili
Fld_2
 Prm_Fuellfaktor innen
 Typ_Real
 Def_*PAR(fili)
Cmd_)Vollpol_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statornut2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statornut
:C )/GO
:A Generierung Statornut Vollpol-Synchronmaschine
:H Hlp_statornut
:D Generierung Statornut Vollpol-Synchronmaschine
:K #(VOLL+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornut
Cmd_)Vollpol_SNut.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotornut2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotornut2
:C )/GO
:A Generierung Rotornut Vollpol-Synchronmaschine
:H Hlp_rotornut
:D Generierung Rotornut Vollpol-Synchronmaschine
:K #(VOLL+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornut
Cmd_)Vollpol_RNut.txt
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorarea2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorarea2
:C )/GO
:A Flaechen Statornut Vollpol-Synchronmaschine
:H Hlp_statornut
:D Flaechen Statornut Vollpol-Synchronmaschine
:K #(VOLL+GEO2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Flaechen Statornut
Cmd_)Vollpol_SArea.txt
Cmd_)KEYW,GEO3,1
Cmd_)KEYW,GEO2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorarea2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorarea2
:C )/GO
:A Flaechen Rotornut Vollpol-Synchronmaschine
:H Hlp_rotornut
:D Flaechen Rotornut Vollpol-Synchronmaschine
:K #(VOLL+GEO3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Flaechen Rotornut
Cmd_)Vollpol_RArea.txt
Cmd_)KEYW,GEO,1
Cmd_)KEYW,GEO3,0
Cal_REFRESH
:E END
:!!
:N Fnc_netvoll1e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netvoll1e
:C )/GO
:A Netzgenerierung Statornut Vollpol-Synchronmaschine
:H Hlp_elemente
:D Netzgenerierung Statornut Vollpol-Synchronmaschine
:K #(VOLL+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Statornut
Cmd_)Vollpol_Snete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netvoll2e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netvoll2e
:C )/GO
:A Netzgenerierung Rotornut Vollpol-Synchronmaschine
:H Hlp_elemente
:D Netzgenerierung Rotornut Vollpol-Synchronmaschine
:K #(VOLL+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotornut
Cmd_)Vollpol_Rnete.txt
Cmd_)KEYW,NETZ3,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netvollg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netvollg
:C )/GO
:A Netzgenerierung Maschine Vollpol-Synchronmaschine
:H Hlp_elemente
:D Netzgenerierung Maschine Vollpol-Synchronmaschine
:K #(VOLL+NETZ3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)Vollpol_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ3,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpvoll1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpvoll1
:C )/GO
:A Kopplungen Stator Vollpol-Synchronmaschine
:H Hlp_elemente
:D Kopplungen Stator Vollpol-Synchronmaschine
:K #(VOLL+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)Vollpol_cp1.txt
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpvoll2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpvoll2
:C )/GO
:A Kopplungen Rotor Vollpol-Synchronmaschine
:H Hlp_elemente
:D Kopplungen Rotor Vollpol-Synchronmaschine
:K #(VOLL+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)Vollpol_cp2.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltvoll1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltvoll1
:C )/GO
:A Verschaltung Stator Vollpol-Synchronmaschine
:H Hlp_elemente
:D Verschaltung Stator Vollpol-Synchronmaschine
:K #(VOLL+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)*if,vollpol_styp,eq,1,then
Cmd_)Vollpol_schalt1_t1.txt
Cmd_)*else
Cmd_)Vollpol_schalt1_t2.txt
Cmd_)*endif
Cmd_)KEYW,SCHALT2,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltvoll2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltvoll2
:C )/GO
:A Verschaltung Rotor Vollpol-Synchronmaschine
:H Hlp_elemente
:D Verschaltung Rotor Vollpol-Synchronmaschine
:K #(VOLL+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)Vollpol_schalt2.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT3,0
Cal_REFRESH
:E END
:!!
:N Fnc_interface2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interface2
:C )/GO
:A Interface Stator/Rotor Vollpol-Synchronmaschine
:H Hlp_elemente
:D Interface Stator/Rotor Vollpol-Synchronmaschine
:K #(VOLL+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)Vollpol_interface.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT,0
Cal_REFRESH
:E END
:!!
:N Men_Loes2
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loes2 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Vollpol-Synchronmaschine
:D Loesung Vollpol-Synchronmaschine
:K #(VOLL+INTERF)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Vollpol-Synchronmaschine-
Fnc_ausvoll
-Statische Rechnung Vollpol-Synchronmaschine-
Fnc_loes1voll
Fnc_loes2voll
-Transiente Rechnung Vollpol-Synchronmaschine-
Fnc_loes3voll
Fnc_loes4voll
Fnc_loes5voll
Fnc_loes7voll
Fnc_loes8voll
Fnc_loes6voll
:E END
:!!
:N Fnc_ausvoll
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausvoll
:C )/GO
:A Ausgabedefinition Vollpol-Synchronmaschine
:H Hlp_elemente
:D Ausgabedefinition Vollpol-Synchronmaschine
:K #(VOLL+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Vollpol-Synchronmaschine
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)Vollpol_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1voll
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1voll
:C )/GO
:A Einzelschrittrechnung Vollpol-Synchronmaschine
:H Hlp_elemente
:D Einzelschrittrechnung Vollpol-Synchronmaschine
:K #(VOLL+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt [s]
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)Vollpol_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2voll
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2voll
:C )/GO
:A Mehrschrittrechnung Vollpol-Synchronmaschine
:H Hlp_elemente
:D Mehrschrittrechnung Vollpol-Synchronmaschine
:K #(VOLL+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Anfangswinkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,zeita
Fld_2
 Prm_Startzeitpunkt [s]
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,drehzahla
Fld_2
 Prm_Drehzahl [U/min]
 Typ_Real
DEF_*PAR(drehzahla)
Cmd_)*SET,tstepa
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(tstepa)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)Vollpol_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3voll
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3voll
:C )/GO
:A Induzierte Spannung Vollpol-Synchronmaschine
:H Hlp_elemente
:D Induzierte Spannung Vollpol-Synchronmaschine
:K #(VOLL+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Mehrschrittrechnung fuer induzierte Spannung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*SET,leerlauf,1
Cmd_)Vollpol_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4voll
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4voll
:C )/GO
:A Kurzschluss Vollpol-Synchronmaschine
:H Hlp_elemente
:D Kurzschluss Vollpol-Synchronmaschine
:K #(VOLL+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Mehrschrittrechnung fuer Kurzschluss
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*SET,leerlauf,0
Cmd_)Vollpol_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5voll
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5voll
:C )/GO
:A Hochlauf Vollpol-Synchronmaschine
:H Hlp_elemente
:D Hochlauf Vollpol-Synchronmaschine
:K #(VOLL+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,mtstep
Fld_2
 Prm_Maximaler Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,enddreh
Fld_2
 Prm_Enddrehzahl
 Typ_Real
DEF_*PAR(enddreh)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)Vollpol_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7voll
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7voll
:C )/GO
:A Erregung Vollpol-Synchronmaschine
:H Hlp_elemente
:D Erregungsaenderung Vollpol-Synchronmaschine
:K #(VOLL+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,etstep
Fld_2
 Prm_Zeitschritt E [s]
 Typ_Real
DEF_*PAR(etstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,esteps
Fld_2
 Prm_Einschwingschritte
 Typ_Real
DEF_*PAR(esteps)
Fld_0
  Typ_Sep
Cmd_)*SET,lsteps
Fld_2
 Prm_Lastschritte
 Typ_Real
DEF_*PAR(lsteps)
Cmd_)*SET,errstep
Fld_2
 Prm_Erregungsnderung
 Typ_Real
DEF_*PAR(errstep)
Cmd_)*SET,rsteps
Fld_2
 Prm_Lastschrittsteps
 Typ_Real
DEF_*PAR(rsteps)
Cmd_)*SET,ltstep
Fld_2
 Prm_Zeitschritt L [s]
 Typ_Real
DEF_*PAR(ltstep)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)Vollpol_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8voll
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8voll
:C )/GO
:A Last Vollpol-Synchronmaschine
:H Hlp_elemente
:D Lastaenderung Vollpol-Synchronmaschine
:K #(VOLL+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,etstep
Fld_2
 Prm_Zeitschritt E [s]
 Typ_Real
DEF_*PAR(etstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,esteps
Fld_2
 Prm_Einschwingschritte
 Typ_Real
DEF_*PAR(esteps)
Fld_0
  Typ_Sep
Cmd_)*SET,lsteps
Fld_2
 Prm_Lastschritte
 Typ_Real
DEF_*PAR(lsteps)
Cmd_)*SET,Last_step
Fld_2
 Prm_Lastaenderung
 Typ_Real
DEF_*PAR(Last_step)
Cmd_)*SET,rsteps
Fld_2
 Prm_Lastschrittsteps
 Typ_Real
DEF_*PAR(rsteps)
Cmd_)*SET,ltstep
Fld_2
 Prm_Zeitschritt L [s]
 Typ_Real
DEF_*PAR(ltstep)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)Vollpol_loes8.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6voll
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6voll
:C )/GO
:A U/f-Hochlauf Vollpol-Synchronmaschine
:H Hlp_elemente
:D U/f-Hochlauf Vollpol-Synchronmaschine
:K #(VOLL+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung U/f-Kennlinie
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,um
Fld_2
 Prm_Magnetisierungsspannung [V]
 Typ_Real
DEF_*PAR(um)
Cmd_)*SET,rtime
Fld_2
 Prm_Rampenzeit [s]
 Typ_Real
DEF_*PAR(rtime)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,mtstep
Fld_2
 Prm_Maximaler Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,enddreh
Fld_2
 Prm_Enddrehzahl
 Typ_Real
DEF_*PAR(enddreh)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)Vollpol_loes6.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_SCHEN
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_SCHEN 17.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Schenkelpol-Synchronmaschine
:D EM-Praktikum Schenkelpol-Synchronmaschine
Men_Vor3
Sep_
Men_Gene3
Sep_
Men_Aend3
Sep_
Men_Loes3
Sep_
Men_Ausw3
:E END
:!!
:N Men_Vor3
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor3 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Schenkelpol-Synchronmaschine
:D EM-Praktikum Voreinstellung Schenkelpol-Synchronmaschine
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Schenkelpol-Synchronmaschine-
Fnc_Vor31
Fnc_Vor32
Fnc_Vor33
Fnc_Vor33b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor31
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor21 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten Schenkelpol-Synchronmaschine
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Statordaten Schenkelpol-Synchronmaschine
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,raussen
Fld_2
 Prm_Aussenradius (ras)
 Typ_Real
DEF_*PAR(raussen)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Statorstaerke gesamt (ssa)
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)*SET,delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nut/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)*SET,zweischicht
Fld_2
 Prm_Nutfuellung
 Typ_Lis_RadioB
 Lis_Einschicht,0
 Lis_Zweischicht,1
 Def_*PAR(zweischicht)
Cmd_)*SET,eps
Fld_2
 Prm_Sehnung epsilon
 Typ_Real
DEF_*PAR(eps)
Fld_0
 Typ_Sep
Cmd_)*SET,_freq
Fld_2
 Prm_(Grund)frequenz [Hz]
 Typ_Real
DEF_*PAR(_freq)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,SCHEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor32
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor32 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten Schenkelpol-Synchronmaschine
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Rotordaten Schenkelpol-Synchronmaschine
:K #(SCHEN+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rinnen
Fld_2
 Prm_Innenradius (rir)     [m]
 Typ_Real
DEF_*PAR(rinnen)
Fld_0
  Typ_Sep
Cmd_)*SET,polschbreite
Fld_2
 Prm_Polschuhbreite 
 Typ_Real
DEF_*PAR(polschbreite)
Cmd_)*SET,polschhoehe
Fld_2
 Prm_Polschuhhoehe 
 Typ_Real
DEF_*PAR(polschhoehe)
Cmd_)*SET,polbreite
Fld_2
 Prm_Polbreite 
 Typ_Real
DEF_*PAR(polbreite)
Cmd_)*SET,joch2
Fld_2
 Prm_Jochstaerke Rotor [m] 
 Typ_Real
DEF_*PAR(joch2)
Cmd_)*SET,deltaer
Fld_2
 Prm_Luftspalterweiterung bei Winkel halber Pol  [m]
 Typ_Real
DEF_*PAR(deltaer)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor33
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor33 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut Schenkelpol-Synchronmaschine
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statornut Schenkelpol-Synchronmaschine
:K #(SCHEN+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Statornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite1
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite1)
Cmd_)*SET,wickhoehe1
Fld_2
 Prm_wicklungshoehe1 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe1)
Cmd_)*SET,wickisol
Fld_2
 Prm_Isolationshoehe (wi)   [m]
 Typ_Real
DEF_*PAR(wickisol)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor33b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor33b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotorpolschuh Schenkelpol-Synchronmaschine
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Rotorpolschuh Schenkelpol-Synchronmaschine
:K #(SCHEN+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorpolschuh
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite2
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite2)
Cmd_)*SET,wickhoehe2
Fld_2
 Prm_wicklungshoehe2 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe2)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin2
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin2)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor34
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor34 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Schenkelpol-Synchronmaschine
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter Schenkelpol-Synchronmaschine
:K #(SCHEN+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor35
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor35 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator Schenkelpol-Synchronmaschine
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator Schenkelpol-Synchronmaschine
:K #(SCHEN+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,schenkelpol_styp
Fld_2
 Prm_Schaltungstyp
 Typ_Lis_RadioB
 Lis_einzeln,1
 Lis_Stern/Dreieck,2
DEF_*PAR(schenkelpol_styp)
Cmd_)*SET,stern1
Fld_2
 Prm_Stern/Dreieck
 Typ_Lis_RadioB
 Lis_Stern,1
 Lis_Dreieck,0
DEF_*PAR(stern1)
Cmd_)*SET,vstern1
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor35b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor35b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Rotor Schenkelpol-Synchronmaschine
:H Hlp_EMD_VOREIN5b
:D EM-Praktikum Schaltungsparameter Rotor Schenkelpol-Synchronmaschine
:K #(SCHEN+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Rotors
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn2
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2)
Cmd_)*SET,lwickstirn2
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)KEYW,SCHALT3,1
Cmd_)KEYW,SCHALT2,0
CAL_REFRESH
:E END
:!!
:N Men_Gene3
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene2 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Schenkelpol-Synchronmaschine
:D EM-Praktikum Generierung Schenkelpol-Synchronmaschine
:K #(SCHEN+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Schenkelpol-Synchronmaschine-
Fnc_elemente3
Fnc_material3
-Geometriegenerierung Schenkelpol-Synchronmaschine-
Fnc_statornut3
Fnc_rotorpol3
Fnc_statorarea3
Fnc_rotorarea3
-Vernetzung Schenkelpol-Synchronmaschine-
Fnc_Vor34
Fnc_netschen1e
Fnc_netschen2e
Fnc_netscheng
-Kopplungen Schenkelpol-Synchronmaschine-
Fnc_cpschen1
Fnc_cpschen2
-Verschaltung Schenkelpol-Synchronmaschine-
Fnc_Vor35
Fnc_schaltschen1
Fnc_Vor35b
Fnc_schaltschen2
-Interface Schenkelpol-Synchronmaschine-
Fnc_interface3
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente3
:C )/GO
:A Elementdefinition Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Elementdefinition Schenkelpol-Synchronmaschine
:K #(SCHEN+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Schenkelpolmaschine
Cmd_)Schenkelpol_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_material3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_material3
:C )/GO
:A Materialdefinition Schenkelpol-Synchronmaschine
:H Hlp_material
:D Materialdefinition Schenkelpol-Synchronmaschine
:K #(SCHEN+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Schenkelpolmaschine
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit aussen [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit innen [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fila
Fld_2
 Prm_Fuellfaktor aussen
 Typ_Real
 Def_*PAR(fila)
Cmd_)*SET,fili
Fld_2
 Prm_Fuellfaktor innen
 Typ_Real
 Def_*PAR(fili)
Cmd_)Schenkelpol_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statornut3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statornut3
:C )/GO
:A Generierung Statornut Schenkelpol-Synchronmaschine
:H Hlp_statornut
:D Generierung Statornut Schenkelpol-Synchronmaschine
:K #(SCHEN+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornut
Cmd_)Schenkelpol_SNut.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorpol3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorpol3
:C )/GO
:A Generierung Rotorpol Schenkelpol-Synchronmaschine
:H Hlp_rotornut
:D Generierung Rotorpol Schenkelpol-Synchronmaschine
:K #(SCHEN+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotorschenkelpol
Cmd_)Schenkelpol_RPol.txt
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorarea3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorarea3
:C )/GO
:A Flaechen Statornut Schenkelpol-Synchronmaschine
:H Hlp_statornut
:D Flaechen Statornut Schenkelpol-Synchronmaschine
:K #(SCHEN+GEO2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Flaechen Statornut
Cmd_)Schenkelpol_SArea.txt
Cmd_)KEYW,GEO3,1
Cmd_)KEYW,GEO2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorarea3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorarea3
:C )/GO
:A Flaechen Rotorpol Schenkelpol-Synchronmaschine
:H Hlp_rotornut
:D Flaechen Rotorpol Schenkelpol-Synchronmaschine
:K #(SCHEN+GEO3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Flaechen Rotorschenkelpol
Cmd_)Schenkelpol_RArea.txt
Cmd_)KEYW,GEO,1
Cmd_)KEYW,GEO3,0
Cal_REFRESH
:E END
:!!
:N Fnc_netschen1e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netschen1e
:C )/GO
:A Netzgenerierung Statornut Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Netzgenerierung Statornut Schenkelpol-Synchronmaschine
:K #(SCHEN+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Statornut
Cmd_)Schenkelpol_Snete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netschen2e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netschen2e
:C )/GO
:A Netzgenerierung Rotornut Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Netzgenerierung Rotornut Schenkelpol-Synchronmaschine
:K #(SCHEN+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotornut
Cmd_)Schenkelpol_Rnete.txt
Cmd_)KEYW,NETZ3,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netscheng
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netscheng
:C )/GO
:A Netzgenerierung Maschine Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Netzgenerierung Maschine Schenkelpol-Synchronmaschine
:K #(SCHEN+NETZ3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)Schenkelpol_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ3,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpschen1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpschen1
:C )/GO
:A Kopplungen Stator Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Kopplungen Stator Schenkelpol-Synchronmaschine
:K #(SCHEN+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)Schenkelpol_cp1.txt
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpschen2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpschen2
:C )/GO
:A Kopplungen Rotor Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Kopplungen Rotor Schenkelpol-Synchronmaschine
:K #(SCHEN+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)Schenkelpol_cp2.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltschen1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltschen1
:C )/GO
:A Verschaltung Stator Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Verschaltung Stator Schenkelpol-Synchronmaschine
:K #(SCHEN+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)*if,schenkelpol_styp,eq,1,then
Cmd_)Schenkelpol_schalt1_t1.txt
Cmd_)*else
Cmd_)Schenkelpol_schalt1_t2.txt
Cmd_)*endif
Cmd_)KEYW,SCHALT2,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltschen2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltschen2
:C )/GO
:A Verschaltung Rotor Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Verschaltung Rotor Schenkelpol-Synchronmaschine
:K #(SCHEN+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)Schenkelpol_schalt2.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT3,0
Cal_REFRESH
:E END
:!!
:N Fnc_interface3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interface3
:C )/GO
:A Interface Stator/Rotor Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Interface Stator/Rotor Schenkelpol-Synchronmaschine
:K #(SCHEN+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)Schenkelpol_interface.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT,0
Cal_REFRESH
:E END
:!!
:N Men_Loes3
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loes3 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Schenkelpol-Synchronmaschine
:D Loesung Schenkelpol-Synchronmaschine
:K #(SCHEN+INTERF)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Schenkelpol-Synchronmaschine-
Fnc_ausschen
-Statische Rechnung Schenkelpol-Synchronmaschine-
Fnc_loes1schen
Fnc_loes2schen
-Transiente Rechnung Schenkelpol-Synchronmaschine-
Fnc_loes3schen
Fnc_loes4schen
Fnc_loes5schen
Fnc_loes7schen
Fnc_loes8schen
Fnc_loes9schen
Fnc_loes6schen
:E END
:!!
:N Fnc_ausschen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausschen
:C )/GO
:A Ausgabedefinition Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Ausgabedefinition Schenkelpol-Synchronmaschine
:K #(SCHEN+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)Schenkelpol_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1schen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1schen
:C )/GO
:A Einzelschrittrechnung Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Einzelschrittrechnung Schenkelpol-Synchronmaschine
:K #(SCHEN+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt [s]
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)Schenkelpol_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2schen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2schen
:C )/GO
:A Mehrschrittrechnung Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Mehrschrittrechnung Schenkelpol-Synchronmaschine
:K #(SCHEN+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Anfangswinkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,zeita
Fld_2
 Prm_Startzeitpunkt [s]
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,drehzahla
Fld_2
 Prm_Drehzahl [U/min]
 Typ_Real
DEF_*PAR(drehzahla)
Cmd_)*SET,tstepa
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(tstepa)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)Schenkelpol_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3schen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3schen
:C )/GO
:A Induzierte Spannung Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Induzierte Spannung Schenkelpol-Synchronmaschine
:K #(SCHEN+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Mehrschrittrechnung fuer induzierte Spannung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*SET,leerlauf,1
Cmd_)Schenkelpol_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4schen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4schen
:C )/GO
:A Kurzschluss Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Kurzschluss Schenkelpol-Synchronmaschine
:K #(SCHEN+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Mehrschrittrechnung fuer Kurzschluss
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*SET,leerlauf,0
Cmd_)Schenkelpol_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5schen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5schen
:C )/GO
:A Hochlauf Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Hochlauf Schenkelpol-Synchronmaschine
:K #(SCHEN+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,mtstep
Fld_2
 Prm_Maximaler Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,enddreh
Fld_2
 Prm_Enddrehzahl
 Typ_Real
DEF_*PAR(enddreh)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)schenkelpol_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6schen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6schen
:C )/GO
:A U/f-Hochlauf Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D U/f-Hochlauf Schenkelpol-Synchronmaschine
:K #(SCHEN+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung U/f-Kennlinie
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,um
Fld_2
 Prm_Magnetisierungsspannung [V]
 Typ_Real
DEF_*PAR(um)
Cmd_)*SET,rtime
Fld_2
 Prm_Rampenzeit [s]
 Typ_Real
DEF_*PAR(rtime)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,mtstep
Fld_2
 Prm_Maximaler Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,enddreh
Fld_2
 Prm_Enddrehzahl
 Typ_Real
DEF_*PAR(enddreh)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)schenkelpol_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7schen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7schen
:C )/GO
:A Erregung Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Erregungsaenderung Schenkelpol-Synchronmaschine
:K #(SCHEN+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,etstep
Fld_2
 Prm_Zeitschritt E [s]
 Typ_Real
DEF_*PAR(etstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,esteps
Fld_2
 Prm_Einschwingschritte
 Typ_Real
DEF_*PAR(esteps)
Fld_0
  Typ_Sep
Cmd_)*SET,lsteps
Fld_2
 Prm_Lastschritte
 Typ_Real
DEF_*PAR(lsteps)
Cmd_)*SET,errstep
Fld_2
 Prm_Erregungsnderung
 Typ_Real
DEF_*PAR(errstep)
Cmd_)*SET,rsteps
Fld_2
 Prm_Lastschrittsteps
 Typ_Real
DEF_*PAR(rsteps)
Cmd_)*SET,ltstep
Fld_2
 Prm_Zeitschritt L [s]
 Typ_Real
DEF_*PAR(ltstep)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)schenkelpol_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8schen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8schen
:C )/GO
:A Last Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Lastaenderung Schenkelpol-Synchronmaschine
:K #(SCHEN+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,etstep
Fld_2
 Prm_Zeitschritt E [s]
 Typ_Real
DEF_*PAR(etstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,esteps
Fld_2
 Prm_Einschwingschritte
 Typ_Real
DEF_*PAR(esteps)
Fld_0
  Typ_Sep
Cmd_)*SET,lsteps
Fld_2
 Prm_Lastschritte
 Typ_Real
DEF_*PAR(lsteps)
Cmd_)*SET,Last_step
Fld_2
 Prm_Lastaenderung
 Typ_Real
DEF_*PAR(Last_step)
Cmd_)*SET,rsteps
Fld_2
 Prm_Lastschrittsteps
 Typ_Real
DEF_*PAR(rsteps)
Cmd_)*SET,ltstep
Fld_2
 Prm_Zeitschritt L [s]
 Typ_Real
DEF_*PAR(ltstep)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)schenkelpol_loes8.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes9schen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes9schen
:C )/GO
:A Winkel Schenkelpol-Synchronmaschine
:H Hlp_elemente
:D Winkelaenderung Schenkelpol-Synchronmaschine
:K #(SCHEN+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u2i2
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u2i2)
Cmd_)*SET,u2
Fld_2
 Prm_Erregerspannung U2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,i2
Fld_2
 Prm_Erregerstrom I2 [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,etstep
Fld_2
 Prm_Zeitschritt E [s]
 Typ_Real
DEF_*PAR(etstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,esteps
Fld_2
 Prm_Einschwingschritte
 Typ_Real
DEF_*PAR(esteps)
Fld_0
  Typ_Sep
Cmd_)*SET,lsteps
Fld_2
 Prm_Lastschritte
 Typ_Real
DEF_*PAR(lsteps)
Cmd_)*SET,winkel_step
Fld_2
 Prm_Winkelaenderung
 Typ_Real
DEF_*PAR(winkel_step)
Cmd_)*SET,rsteps
Fld_2
 Prm_Lastschrittsteps
 Typ_Real
DEF_*PAR(rsteps)
Cmd_)*SET,ltstep
Fld_2
 Prm_Zeitschritt L [s]
 Typ_Real
DEF_*PAR(ltstep)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)schenkelpol_loes9.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_Trafo2
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_Trafo2 16.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Trafo2 (Dreiphasentransformator)
:D EM-Praktikum Trafo2 (Dreiphasentransformator)
Men_Vor4
Sep_
Men_Gene4
Sep_
Men_Aend4
Sep_
Men_Loes4
Sep_
Men_Ausw4
:E END
:!!
:N Men_Vor4
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor4 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Dreiphasentransformator
:D EM-Praktikum Voreinstellung Dreiphasentransformator
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Geometriedaten Dreiphasentransformator-
Fnc_Vor41
Fnc_Vor42
Fnc_Vor43
Fnc_Vor43b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor41
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor41 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Jochblechdaten Dreiphasentransformator
:H Hlp_EMD_VOREIN2
:D Jochblechdaten Dreiphasentransformator
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,jochbreite
Fld_2
 Prm_Jochbreite  [m]
 Typ_Real
DEF_*PAR(jochbreite)
Cmd_)*SET,jochhoehe
Fld_2
 Prm_Jochhoehe  [m]
 Typ_Real
DEF_*PAR(jochhoehe)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Jochdicke   [m]
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe   [m]
 Typ_Real
DEF_*PAR(jochtiefe)
Fld_0
  Typ_Sep
Cmd_)*SET,kern
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_Kernstransformator,1
 Lis_Manteltransformator,0
 Def_*PAR(kern)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,1
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor42
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor42 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Primaerwicklungsdaten Dreiphasentransformator
:H Hlp_EMD_VOREIN1
:D Primaerwicklungsdaten Dreiphasentransformator
:K #(TRAFO2+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Primaerwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite1
Fld_2
 Prm_Wicklungsbreite primaer [m]
 Typ_Real
DEF_*PAR(wickbreite1)
Cmd_)*SET,wickhoehe1
Fld_2
 Prm_Wicklungshoehe primaer [m]
 Typ_Real
DEF_*PAR(wickhoehe1)
Cmd_)*SET,wickabstand1
Fld_2
 Prm_Wicklungsabstand primaer [m]
 Typ_Real
DEF_*PAR(wickabstand1)
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl primaer
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor43
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor43 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Sekundaerwicklungsdaten Dreiphasentransformator
:H Hlp_EMD_VOREIN3
:D Sekundaerwicklungsdaten Dreiphasentransformator
:K #(TRAFO2+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Sekundaerwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite2
Fld_2
 Prm_Wicklungsbreite sekundaer [m]
 Typ_Real
DEF_*PAR(wickbreite2)
Cmd_)*SET,wickhoehe2
Fld_2
 Prm_Wicklungshoehe sekundaer [m]
 Typ_Real
DEF_*PAR(wickhoehe2)
Cmd_)*SET,wickabstand2
Fld_2
 Prm_Wicklungsabstand sekundaer [m]
 Typ_Real
DEF_*PAR(wickabstand1)
Cmd_)*SET,nwin2
Fld_2
 Prm_Windungszahl sekundaer
 Typ_Real
DEF_*PAR(nwin2)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor43b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor43b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Umgebungsdaten Dreiphasentransformator
:H Hlp_EMD_VOREIN3
:D Umgebungsdaten Dreiphasentransformator
:K #(TRAFO2+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Umgebungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,breiteaussen
Fld_2
 Prm_Breite Aussenbereich  [m]
 Typ_Real
DEF_*PAR(breiteaussen)
Cmd_)*SET,hoeheaussen
Fld_2
 Prm_Hoehe Aussenbereich   [m]
 Typ_Real
DEF_*PAR(hoeheaussen)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor44
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor44 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Dreiphasentransformator
:H Hlp_EMD_VOREIN4
:D Netzparameter Dreiphasentransformator
:K #(TRAFO2+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,meshaussen
Fld_2
 Prm_Maschenweite auen   [m]
 Typ_Real
DEF_*PAR(meshaussen)
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshinnen
Fld_2
 Prm_Maschenweite innen   [m]
 Typ_Real
DEF_*PAR(meshinnen)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor45
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor45 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter primaer Dreiphasentransformator
:H Hlp_EMD_VOREIN4
:D Schaltungsparameter primaer Dreiphasentransformator
:K #(TRAFO2+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter primaer
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand primaer [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet primaer [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung primaer [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor45b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor05b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter sekundaer Dreiphasentransformator
:H Hlp_EMD_VOREIN4
:D Schaltungsparameter sekundaer Dreiphasentransformator
:K #(TRAFO2+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter sekundaer
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn2
Fld_2
 Prm_Stirnwiderstand sekundaer [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2)
Cmd_)*SET,lwickstirn2
Fld_2
 Prm_Stirninduktivitaet sekundaer [H]
 Typ_Real
DEF_*PAR(lwickstirn2)
Cmd_)*SET,rlast
Fld_2
 Prm_Lastwiderstand sekundaer [Ohm]
 Typ_Real
DEF_*PAR(rlast)
Cmd_)KEYW,SCHALT2,1
Cmd_)KEYW,SCHALT1,0
CAL_REFRESH
:E END
:!!
:N Men_Gene4
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene4 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Dreiphasentransformator
:D EM-Praktikum Generierung Dreiphasentransformator
:K #(TRAFO2+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Dreiphasentransformator-
Fnc_elemente4
Fnc_material4
-Geometriegenerierung Dreiphasentransformator-
Fnc_t4geometrie
Fnc_t4flaechen
-Vernetzung Dreiphasentransformator-
Fnc_Vor44
Fnc_nettrafo4
-Kopplungen Dreiphasentransformator-
Fnc_cptrafo4
-Verschaltung Dreiphasentransformator-
Fnc_Vor45
Fnc_Vor45b
Fnc_schalttrafo4
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente4
:C )/GO
:A Elementdefinition Dreiphasentransformator
:H Hlp_elemente
:D Elementdefinition Dreiphasentransformator
:K #(TRAFO2+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition
Cmd_)trafo3p-elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_material4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_material4
:C )/GO
:A Materialdefinition Dreiphasentransformator
:H Hlp_material
:D Materialdefinition Dreiphasentransformator
:K #(TRAFO2+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition
Cmd_)*SET,murx
Fld_2
 Prm_murx Eisen
 Typ_Real
 Def_*PAR(murx)
Cmd_)*SET,leit1
Fld_2
 Prm_Leiterleitfaehigkeit primaer [S/m]
 Typ_Real
 Def_*PAR(leit1)
Cmd_)*SET,leit2
Fld_2
 Prm_Leiterleitfaehigkeit sekundaer [S/m]
 Typ_Real
 Def_*PAR(leit2)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fil1
Fld_2
 Prm_Fuellfaktor primaer
 Typ_Real
 Def_*PAR(fil1)
Cmd_)*SET,fil2
Fld_2
 Prm_Fuellfaktor sekundaer
 Typ_Real
 Def_*PAR(fil2)
Cmd_)trafo3p-material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_t4geometrie
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_t4geometrie
:C )/GO
:A Generierung Trafo Geometrie Dreiphasentransformator
:H Hlp_statornut
:D Generierung Trafo Geometrie Dreiphasentransformator
:K #(TRAFO2+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Transformator Geometrie
Cmd_)trafo3p-geometrie.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_t4flaechen
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_t4flaechen
:C )/GO
:A Generierung Trafo Flaechen Dreiphasentransformator
:H Hlp_statornut
:D Generierung Trafo Flaechen Dreiphasentransformator
:K #(TRAFO2+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Transformator Flaechen
Cmd_)trafo3p-flaechen.txt
Cmd_)KEYW,GEO,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_nettrafo4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_nettrafo4
:C )/GO
:A Netzgenerierung Transformator Dreiphasentransformator
:H Hlp_elemente
:D Netzgenerierung Transformator Dreiphasentransformator
:K #(TRAFO2+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Transformator
Cmd_)trafo3p-netz.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_cptrafo4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cptrafo4
:C )/GO
:A Kopplungen Dreiphasentransformator
:H Hlp_elemente
:D Kopplungen Dreiphasentransformator
:K #(TRAFO2+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)trafo3p-kopplung.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_schalttrafo4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalttrafo4
:C )/GO
:A Verschaltung Dreiphasentransformator
:H Hlp_elemente
:D Verschaltung Dreiphasentransformator
:K #(TRAFO2+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Trafo2
Cmd_)trafo3p-schalt.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT2,0
Cal_REFRESH
:E END
:!!
:N Men_Loes4
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loes4 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Dreiphasentransformator
:D Loesung Dreiphasentransformator
:K #(TRAFO2+SCHALT)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Dreiphasentransformator-
Fnc_austrafo2
-Statische Rechnung Dreiphasentransformator-
Fnc_loes1trafo2
Fnc_loes2trafo2
Fnc_loes3trafo2
-Harmonische Rechnung Dreiphasentransformator-
Fnc_loes4trafo2
Fnc_loes5trafo2
Fnc_loes6trafo2
-Transiente Rechnung Dreiphasentransformator-
Fnc_loes7trafo2
Fnc_loes8trafo2
Fnc_loes9trafo2
Fnc_loes10trafo2
:E END
:!!
:N Fnc_austrafo2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_austrafo2
:C )/GO
:A Ausgabedefinition Dreiphasentransformator
:H Hlp_elemente
:D Ausgabedefinition Dreiphasentransformator
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Dreiphasentransformator
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)trafo3p-aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1trafo2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1trafo2
:C )/GO
:A Stromvorgabe primaer (Dreiphasentransformator)
:H Hlp_elemente
:D Stromvorgabe primaer (Dreiphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Rechnung mit primaerer Stromvorgabe
Fld_0
 Typ_Lab
 Prm_Phasenverschiebung zwischen Phasen 360 Grad/m
Cmd_)*SET,i1
Fld_2
 Prm_Primaerstrom
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,zeit
Fld_2
 Prm_Zeit
 Typ_Real
DEF_*PAR(zeit)
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)trafo3p-loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2trafo2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2trafo2
:C )/GO
:A Stromvorgabe sekundaer (Dreiphasentransformator)
:H Hlp_elemente
:D Stromvorgabe sekundaer (Dreiphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Rechnung mit sekundaerer Stromvorgabe
Fld_0
 Typ_Lab
 Prm_Phasenverschiebung zwischen Phasen 360 Grad/m
Cmd_)*SET,i2
Fld_2
 Prm_Sekundaerstrom
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,zeit
Fld_2
 Prm_Zeit
 Typ_Real
DEF_*PAR(zeit)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)trafo3p-loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3trafo2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3trafo2
:C )/GO
:A Stromvorgabe gesamt (Dreiphasentransformator)
:H Hlp_elemente
:D Stromvorgabe gesamt (Dreiphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Rechnung mit beidseitiger Stromvorgabe
Fld_0
 Typ_Lab
 Prm_Phasenverschiebung zwischen Phasen 360 Grad/m
Cmd_)*SET,i1
Fld_2
 Prm_Primaerstrom
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Sekundaerstrom
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,zeit
Fld_2
 Prm_Zeit
 Typ_Real
DEF_*PAR(zeit)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)trafo3p-loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4trafo2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4trafo2
:C )/GO
:A Harmonische Rechnung im Leerlauf (Dreiphasentransformator)
:H Hlp_elemente
:D Harmonische Rechnung im Leerlauf (Dreiphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Rechnung im Leerlauf
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,1
Cmd_)trafo3p-loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5trafo2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5trafo2
:C )/GO
:A Harmonische Rechnung im Kurzschlu (Dreiphasentransformator)
:H Hlp_elemente
:D Harmonische Rechnung im Kurzschlu (Dreiphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Rechnung im Kurzschlu
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,0
Cmd_)trafo3p-loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6trafo2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6trafo2
:C )/GO
:A Harmonische Rechnung unter Last (Dreiphasentransformator)
:H Hlp_elemente
:D Harmonische Rechnung unter Last (Dreiphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Rechnung unter Last
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rlast
Fld_2
 Prm_Lastwiderstand sekundaer [Ohm]
 Typ_Real
DEF_*PAR(rlast)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,2
Cmd_)trafo3p-loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7trafo2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7trafo2
:C )/GO
:A Transiente Rechnung im Leerlauf (Dreiphasentransformator)
:H Hlp_elemente
:D Transiente Rechnung im Leerlauf (Dreiphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung im Leerlauf
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,1
Cmd_)trafo3p-loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8trafo2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8trafo2
:C )/GO
:A Transiente Rechnung im Kurzschlu (Dreiphasentransformator)
:H Hlp_elemente
:D Transiente Rechnung im Kurzschlu (Dreiphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung im Kurzschlu
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,0
Cmd_)trafo3p-loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes9trafo2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes9trafo2
:C )/GO
:A Transiente Rechnung unter Last (Dreiphasentransformator)
:H Hlp_elemente
:D Transiente Rechnung unter Last (Dreiphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung unter Last
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rlast
Fld_2
 Prm_Lastwiderstand sekundaer [Ohm]
 Typ_Real
DEF_*PAR(rlast)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,2
Cmd_)trafo3p-loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes10trafo2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes10trafo2
:C )/GO
:A Transiente Rechnung unter Kurzschlu nach Zeit (Dreiphasentransformator)
:H Hlp_elemente
:D Transiente Rechnung unter Kurzschlu nach Zeit (Dreiphasentransformator)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung unter Kurzschlu nach Zeit
Cmd_)*SET,u1
Fld_2
 Prm_Primaerspannung
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rlast
Fld_2
 Prm_Lastwiderstand sekundaer [Ohm]
 Typ_Real
DEF_*PAR(rlast)
Cmd_)*SET,zeita
Fld_2
 Prm_Anfangszeit
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitstep
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,jsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,zeitk
Fld_2
 Prm_Zeit bis Kurzschlu  [s]
 Typ_Real
DEF_*PAR(zeitk)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)*set,leerlauf,3
Cmd_)trafo3p-loes7.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_GSM1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_GSM1 17.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM GSM1 (GSM ohne Zusatz)
:D EM-Praktikum Gleichstrommaschine (GSM ohne Zusatz)
Men_Vor5
Sep_
Men_Gene5
Sep_
Men_Aend5
Sep_
Men_Loes5
Sep_
Men_Ausw5
:E END
:!!
:N Men_Vor5
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor5 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung GSM1 (GSM ohne Zusatz)
:D EM-Praktikum Voreinstellung GSM 1 (GSM ohne Zusatz)
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen GSM1 (GSM ohne Zusatz)-
Fnc_Vor51
Fnc_Vor52
Fnc_Vor53
Fnc_Vor53b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor51
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor51 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten GSM1 (GSM ohne Zusatz)
:H Hlp_EMD_VOREIN2
:D EM-Praktikum GSM1 (GSM ohne Zusatz)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,raussen
Fld_2
 Prm_Aussenradius     [m]
 Typ_Real
DEF_*PAR(raussen)
Cmd_)*SET,joch1
Fld_2
 Prm_Jochdicke [m]
 Typ_Real
DEF_*PAR(joch1)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Statorstaerke gesamt [m]
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)*SET,delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor52
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor52 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten GSM1 (GSM ohne Zusatz)
:H Hlp_EMD_VOREIN1
:D EM-Praktikum GSM1 (GSM ohne Zusatz)
:K #(GSM1+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rinnen
Fld_2
 Prm_Innenradius (rir)     [m]
 Typ_Real
DEF_*PAR(rinnen)
Cmd_)*SET,z2
Fld_2
 Prm_Rotorspulenzahl 
 Typ_Real
DEF_*PAR(z2)
Cmd_)*SET,zweischicht2,1
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor53
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor53 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statorpol GSM1 (GSM ohne Zusatz)
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statorpol GSM1 (GSM ohne Zusatz)
:K #(GSM1+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Statorpolgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,polschhoehe
Fld_2
 Prm_Polschuhhoehe    [m]
 Typ_Real
DEF_*PAR(polschhoehe)
Cmd_)*SET,polbreite
Fld_2
 Prm_Polbreite    [m]
 Typ_Real
DEF_*PAR(polbreite)
Cmd_)*SET,polschraeg
Fld_2
 Prm_Polstaerke aussen [m]
 Typ_Real
DEF_*PAR(polschraeg)
Cmd_)*SET,polwinkel
Fld_2
 Prm_Polteilung in Grad
 Typ_Real
DEF_*PAR(polwinkel)
Cmd_)*SET,wickbreite1
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite1)
Cmd_)*SET,wickhoehe1
Fld_2
 Prm_wicklungshoehe1 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe1)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor53b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor23b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotornut GSM1 (GSM ohne Zusatz)
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Rotornut GSM1 (GSM ohne Zusatz)
:K #(GSM1+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite2
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite2)
Cmd_)*SET,wickhoehe2
Fld_2
 Prm_wicklungshoehe2 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe2)
Cmd_)*SET,wickisol2
Fld_2
 Prm_Isolationsstaerke   [m]
 Typ_Real
DEF_*PAR(wickisol2)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin2
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin2)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor54
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor54 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter GSM1 (GSM ohne Zusatz)
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter GSM1 (GSM ohne Zusatz)
:K #(GSM1+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor55
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor55 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator GSM1 (GSM ohne Zusatz)
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator GSM1 (GSM ohne Zusatz)
:K #(GSM1+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom (Serie) [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor55b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor25b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Rotor GSM1 (GSM ohne Zusatz)
:H Hlp_EMD_VOREIN5b
:D EM-Praktikum Schaltungsparameter Rotor GSM1 (GSM ohne Zusatz)
:K #(GSM1+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Rotors
Cmd_)*SET,spulw2
Fld_2
 Prm_Spulenweite
 Typ_Real
DEF_*PAR(spulw2)
Cmd_)*SET,buebr2
Fld_2
 Prm_Buerstenbreite [Grad]
 Typ_Real
DEF_*PAR(buebr2)
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn2
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2)
Cmd_)*SET,lwickstirn2
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn2)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung   [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,rvor2
Fld_2
 Prm_Ankervorwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rvor2)
Cmd_)KEYW,SCHALT3,1
Cmd_)KEYW,SCHALT2,0
CAL_REFRESH
:E END
:!!
:N Men_Gene5
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene5 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung GSM1 (GSM ohne Zusatz)
:D EM-Praktikum Generierung GSM1 (GSM ohne Zusatz)
:K #(GSM1+DATEN)
Fnc_EMM_HIN
Sep_
-Definition GSM1 (GSM ohne Zusatz)-
Fnc_elemente5
Fnc_material5
-Geometriegenerierung GSM1 (GSM ohne Zusatz)-
Fnc_statorpol5
Fnc_rotornut5
Fnc_statorarea5
Fnc_rotorarea5
-Vernetzung GSM1 (GSM ohne Zusatz)-
Fnc_Vor54
Fnc_netgsm11e
Fnc_netgsm12e
Fnc_netgsm1g
-Kopplungen GSM1 (GSM ohne Zusatz)-
Fnc_cpgsm11
Fnc_cpgsm12
-Verschaltung GSM1 (GSM ohne Zusatz)-
Fnc_Vor55
Fnc_schaltgsm11
Fnc_Vor55b
Fnc_schaltgsm12
-Interface GSM1 (GSM ohne Zusatz)-
Fnc_interface5
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente5
:C )/GO
:A Elementdefinition GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Elementdefinition GSM1 (GSM ohne Zusatz)
:K #(GSM1+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Gleichstrommaschine 1
Cmd_)gsm1_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_material5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_material5
:C )/GO
:A Materialdefinition GSM1 (GSM ohne Zusatz)
:H Hlp_material
:D Materialdefinition GSM1 (GSM ohne Zusatz)
:K #(GSM1+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Gleichstrommaschine 1
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit aussen [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit innen [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fila
Fld_2
 Prm_Fuellfaktor aussen
 Typ_Real
 Def_*PAR(fila)
Cmd_)*SET,fili
Fld_2
 Prm_Fuellfaktor innen
 Typ_Real
 Def_*PAR(fili)
Cmd_)gsm1_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorpol5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorpol5
:C )/GO
:A Generierung Statorpol GSM1 (GSM ohne Zusatz)
:H Hlp_statornut
:D Generierung Statorpol GSM1 (GSM ohne Zusatz)
:K #(GSM1+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statorpol GSM1
Cmd_)gsm1_SPol.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotornut5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotornut5
:C )/GO
:A Generierung Rotornut GSM1 (GSM ohne Zusatz)
:H Hlp_rotornut
:D Generierung Rotornut GSM1 (GSM ohne Zusatz)
:K #(GSM1+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornut
Cmd_)gsm1_RNut.txt
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorarea5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorarea5
:C )/GO
:A Flaechen Statornut GSM1 (GSM ohne Zusatz)
:H Hlp_statornut
:D Flaechen Statornut GSM1 (GSM ohne Zusatz)
:K #(GSM1+GEO2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Flaechen Statornut
Cmd_)gsm1_SArea.txt
Cmd_)KEYW,GEO3,1
Cmd_)KEYW,GEO2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorarea5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorarea5
:C )/GO
:A Flaechen Rotornut GSM1 (GSM ohne Zusatz)
:H Hlp_rotornut
:D Flaechen Rotornut GSM1 (GSM ohne Zusatz)
:K #(GSM1+GEO3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Flaechen Rotornut
Cmd_)gsm1_RArea.txt
Cmd_)KEYW,GEO,1
Cmd_)KEYW,GEO3,0
Cal_REFRESH
:E END
:!!
:N Fnc_netgsm11e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netgsm11e
:C )/GO
:A Netzgenerierung Statornut GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Netzgenerierung Statornut GSM1 (GSM ohne Zusatz)
:K #(GSM1+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Statornut
Cmd_)gsm1_Snete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netgsm12e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netgsm12e
:C )/GO
:A Netzgenerierung Rotornut GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Netzgenerierung Rotornut GSM1 (GSM ohne Zusatz)
:K #(GSM1+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotornut
Cmd_)gsm1_Rnete.txt
Cmd_)KEYW,NETZ3,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netgsm1g
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netgsm1g
:C )/GO
:A Netzgenerierung Maschine GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Netzgenerierung Maschine GSM1 (GSM ohne Zusatz)
:K #(GSM1+NETZ3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)gsm1_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ3,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpgsm11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpgsm11
:C )/GO
:A Kopplungen Stator GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Kopplungen Stator GSM1 (GSM ohne Zusatz)
:K #(GSM1+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)gsm1_cp1.txt
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpgsm12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpgsm12
:C )/GO
:A Kopplungen Rotor GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Kopplungen Rotor GSM1 (GSM ohne Zusatz)
:K #(GSM1+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)gsm1_cp2.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltgsm11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltgsm11
:C )/GO
:A Verschaltung Stator GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Verschaltung Stator GSM1 (GSM ohne Zusatz)
:K #(GSM1+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)gsm1_schalt1.txt
Cmd_)KEYW,SCHALT2,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltgsm12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltgsm12
:C )/GO
:A Verschaltung Rotor GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Verschaltung Rotor GSM1 (GSM ohne Zusatz)
:K #(GSM1+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)gsm1_schalt2.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT3,0
Cal_REFRESH
:E END
:!!
:N Fnc_interface5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interface5
:C )/GO
:A Interface Stator/Rotor GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Interface Stator/Rotor GSM1 (GSM ohne Zusatz)
:K #(GSM1+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)gsm1_interface.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT,0
Cal_REFRESH
:E END
:!!
:N Men_Loes5
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loes5 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung
:D Loesung
:K #(GSM1+INTERF)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition  GSM1 (GSM ohne Zusatz)-
Fnc_ausgsm1
-Statische Rechnung GSM1 (GSM ohne Zusatz)-
Fnc_loes1gsm1
Fnc_loes2gsm1
Fnc_loes3gsm1
Fnc_loes4gsm1
-Transiente Rechnung GSM1 (GSM ohne Zusatz)-
Fnc_loes5gsm1
Fnc_loes6gsm1
Fnc_loes7gsm1
Fnc_loes8gsm1
:E END
:!!
:N Fnc_ausgsm1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausgsm1
:C )/GO
:A Ausgabedefinition GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Ausgabedefinition GSM1 (GSM ohne Zusatz)
:K #(GSM1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition GSM1
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)gsm1_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1gsm1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1gsm1
:C )/GO
:A Einzelschritt GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Einzelschritt GSM1 (GSM ohne Zusatz)
:K #(GSM1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i1
Fld_2
 Prm_Staendererregerstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm1_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2gsm1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2gsm1
:C )/GO
:A Mehrschritt i2=0 GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Mehrschritt i2=0 GSM1 (GSM ohne Zusatz)
:K #(GSM1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung nur Erregung mit i2=0
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm1_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3gsm1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3gsm1
:C )/GO
:A Mehrschritt i1=0 GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Mehrschritt i1=0 GSM1 (GSM ohne Zusatz)
:K #(GSM1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung ohne Erregung mit I2
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm1_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4gsm1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4gsm1
:C )/GO
:A Mehrschritt Rueckwirkung GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Mehrschritt Rueckwirkung GSM1 (GSM ohne Zusatz)
:K #(GSM1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung, Rueckwirkung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i1
Fld_2
 Prm_Staendererregerstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm1_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5gsm1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5gsm1
:C )/GO
:A Induzierte Spannung GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Induzierte Spannung GSM1 (GSM ohne Zusatz)
:K #(GSM1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Cmd_)*SET,jkommu
Fld_2
 Prm_Kommutierung (ja=1)
 Typ_Real
DEF_*PAR(jkommu)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm1_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6gsm1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6gsm1
:C )/GO
:A Klemmenurzschluss GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Klemmenkurzschluss GSM1 (GSM ohne Zusatz)
:K #(GSM1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung fr Klemmenkurzschluss
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm1_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7gsm1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6gsm1
:C )/GO
:A Betrieb, feste Drehzahl GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Betrieb, feste Drehzahl GSM1 (GSM ohne Zusatz)
:K #(GSM1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Betrieb bei fester Drehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm1_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8gsm1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8gsm1
:C )/GO
:A Hochlauf GSM1 (GSM ohne Zusatz)
:H Hlp_elemente
:D Hochlauf GSM1 (GSM ohne Zusatz)
:K #(GSM1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Hochlauf ab Startdrehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,terreg
Fld_2
 Prm_Ankerstromverzoegerung [s]
 Typ_Real
DEF_*PAR(terreg)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,mtstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm1_loes8.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_GSM2
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_GSM2 17.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM GSM2 (GSM mit Zusatz)
:D EM-Praktikum Gleichstrommaschine GSM2 (GSM mit Zusatz)
Men_Vor6
Sep_
Men_Gene6
Sep_
Men_Aend6
Sep_
Men_Loes6
Sep_
Men_Ausw6
:E END
:!!
:N Men_Vor6
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor6 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung GSM2 (GSM mit Zusatz)
:D EM-Praktikum GSM2 (GSM mit Zusatz)
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen GSM2 (GSM mit Zusatz)-
Fnc_Vor61
Fnc_Vor62
Fnc_Vor63
Fnc_Vor63b
Fnc_Vor63c
Fnc_Vor63d
Fnc_Vor63e
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor61
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor61 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten GSM2 (GSM mit Zusatz)
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Statordaten GSM2 (GSM mit Zusatz)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,raussen
Fld_2
 Prm_Aussenradius     [m]
 Typ_Real
DEF_*PAR(raussen)
Cmd_)*SET,joch1
Fld_2
 Prm_Jochdicke [m]
 Typ_Real
DEF_*PAR(joch1)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Statorstaerke gesamt [m]
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)*SET,delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,GSM2,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor62
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor62 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten GSM2 (GSM mit Zusatz)
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Rotordaten GSM2 (GSM mit Zusatz)
:K #(GSM2+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rinnen
Fld_2
 Prm_Innenradius (rir)     [m]
 Typ_Real
DEF_*PAR(rinnen)
Cmd_)*SET,z2
Fld_2
 Prm_Rotorspulenzahl 
 Typ_Real
DEF_*PAR(z2)
Cmd_)*SET,zweischicht2,1
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor63
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor63 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statorpol GSM2 (GSM mit Zusatz)
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statorpol GSM2 (GSM mit Zusatz)
:K #(GSM2+VOREIN2)
Fld_0
 Typ_Lab
 Prm_Eingabe der Statorpolgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,polschhoehe
Fld_2
 Prm_Polschuhhoehe    [m]
 Typ_Real
DEF_*PAR(polschhoehe)
Cmd_)*SET,polbreite
Fld_2
 Prm_Polbreite    [m]
 Typ_Real
DEF_*PAR(polbreite)
Cmd_)*SET,polschraeg
Fld_2
 Prm_Polstaerke aussen [m]
 Typ_Real
DEF_*PAR(polschraeg)
Cmd_)*SET,polwinkel
Fld_2
 Prm_Polteilung in Grad
 Typ_Real
DEF_*PAR(polwinkel)
Cmd_)*SET,wickbreite1
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite1)
Cmd_)*SET,wickhoehe1
Fld_2
 Prm_wicklungshoehe1 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe1)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,kompen
Fld_2
 Prm_mit Kompensationswicklung 
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(kompen)
Cmd_)*SET,kompound
Fld_2
 Prm_mit Kompoundwicklung 
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(kompound)
Cmd_)*SET,wende
Fld_2
 Prm_mit Wendepolwicklung 
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(wende)
Fld_0
 Typ_Sep
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor63b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor23b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotornut GSM2 (GSM mit Zusatz)
:H Hlp_EMD_VOREIN6b
:D EM-Praktikum Rotornut GSM2 (GSM mit Zusatz)
:K #(GSM2+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite2
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite2)
Cmd_)*SET,wickhoehe2
Fld_2
 Prm_wicklungshoehe2 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe2)
Cmd_)*SET,wickisol2
Fld_2
 Prm_Isolationsstaerke   [m]
 Typ_Real
DEF_*PAR(wickisol2)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin2
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin2)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor63c
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor63c 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Kompen.-Wick. GSM2 (GSM mit Zusatz)
:H Hlp_EMD_VOREIN6c
:D EM-Praktikum Kompen.-Wick. GSM2 (GSM mit Zusatz)
:K #(GSM2+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Kompensationswicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreitek
Fld_2
 Prm_Wicklungsbreite Komp.-Wick. [m]
 Typ_Real
DEF_*PAR(wickbreitek)
Cmd_)*SET,wickhoehek
Fld_2
 Prm_wicklungshoehe2 Komp.-Wick. [m]
 Typ_Real
DEF_*PAR(wickhoehek)
Cmd_)*SET,nnutk,8
Cmd_)*SET,nwink
Fld_2
 Prm_Windungszahl Komp.-Wick.
 Typ_Real
DEF_*PAR(nwink)
Cmd_)*SET,filk
Fld_2
 Prm_Fuellfaktor Kompens.-Wick.
 Typ_Real
DEF_*PAR(filk)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor63d
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor63d 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Kompund-Wick. GSM2 (GSM mit Zusatz)
:H Hlp_EMD_VOREIN6d
:D EM-Praktikum Kompound-Wick. GSM2 (GSM mit Zusatz)
:K #(GSM2+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Kompoundwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreiteko
Fld_2
 Prm_Wicklungsbreite Kompound.-Wick. [m]
 Typ_Real
DEF_*PAR(wickbreiteko)
Cmd_)*SET,wickisoko
Fld_2
 Prm_wicklungsisol.-Hoehe Kompound.-Wick. [m]
 Typ_Real
DEF_*PAR(wickisoko)
Cmd_)*SET,nwinko
Fld_2
 Prm_Windungszahl Kompound.-Wick.
 Typ_Real
DEF_*PAR(nwinko)
Cmd_)*SET,filko
Fld_2
 Prm_Fuellfaktor Kompound.-Wick.
 Typ_Real
DEF_*PAR(filko)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor63e
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor63e 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Wendepol-Wick. GSM2 (GSM mit Zusatz)
:H Hlp_EMD_VOREIN6d
:D EM-Praktikum Wendepol-Wick. GSM2 (GSM mit Zusatz)
:K #(GSM2+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Wendepolwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wendebreite
Fld_2
 Prm_Wendepolbreite [m]
 Typ_Real
DEF_*PAR(wendebreite)
Cmd_)*SET,wendedel
Fld_2
 Prm_Wendepolluftspalt  [m]
 Typ_Real
DEF_*PAR(wendedel)
Cmd_)*SET,wickbreitewen
Fld_2
 Prm_Wendepolwicklungsbreite [m]
 Typ_Real
DEF_*PAR(wickbreitewen)
Cmd_)*SET,wickhoehewen
Fld_2
 Prm_Wendepolwicklungshoehe [m]
 Typ_Real
DEF_*PAR(wickhoehewen)
Cmd_)*SET,nwinwen
Fld_2
 Prm_Windungszahl Wendepol-Wick.
 Typ_Real
DEF_*PAR(nwinwen)
Cmd_)*SET,filwen
Fld_2
 Prm_Fuellfaktor Wendepol-Wick.
 Typ_Real
DEF_*PAR(filwen)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor64
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor64 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter GSM2 (GSM mit Zusatz)
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter GSM2 (GSM mit Zusatz)
:K #(GSM2+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor65
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor65 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator GSM2 (GSM mit Zusatz)
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator GSM2 (GSM mit Zusatz)
:K #(GSM2+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom (Serie) [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,SSchaltung
Fld_2
 Prm_Schaltung Stator und Rotor
 Typ_Lis_RadioB
 Lis_fremderregt,0
 Lis_Nebenschlu,1
 Lis_Reihenschlu,2
 Def_*PAR(SSchaltung)
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirnk
Fld_2
 Prm_Stirnwiderstand Kompensationswick.[Ohm]
 Typ_Real
DEF_*PAR(rwickstirnk)
Cmd_)*SET,lwickstirnk
Fld_2
 Prm_Stirninduktivitaet Kompensationswick.[H]
 Typ_Real
DEF_*PAR(lwickstirnk)
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirnko
Fld_2
 Prm_Stirnwiderstand Kompoundwick.[Ohm]
 Typ_Real
DEF_*PAR(rwickstirnko)
Cmd_)*SET,lwickstirnko
Fld_2
 Prm_Stirninduktivitaet Kompoundwick.[H]
 Typ_Real
DEF_*PAR(lwickstirnko)
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirnwe
Fld_2
 Prm_Stirnwiderstand Wendepolwick.[Ohm]
 Typ_Real
DEF_*PAR(rwickstirnwe)
Cmd_)*SET,lwickstirnwe
Fld_2
 Prm_Stirninduktivitaet Wendepolwick.[H]
 Typ_Real
DEF_*PAR(lwickstirnwe)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor65b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor65b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Rotor GSM2 (GSM mit Zusatz)
:H Hlp_EMD_VOREIN5b
:D EM-Praktikum Schaltungsparameter Rotor GSM2 (GSM mit Zusatz)
:K #(GSM2+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Rotors
Cmd_)*SET,spulw2
Fld_2
 Prm_Spulenweite
 Typ_Real
DEF_*PAR(spulw2)
Cmd_)*SET,buebr2
Fld_2
 Prm_Buerstenbreite  [Grad]
 Typ_Real
DEF_*PAR(buebr2)
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn2
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2)
Cmd_)*SET,lwickstirn2
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn2)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung   [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,rvor2
Fld_2
 Prm_Ankervorwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rvor2)
Cmd_)KEYW,SCHALT3,1
Cmd_)KEYW,SCHALT2,0
CAL_REFRESH
:E END
:!!
:N Men_Gene6
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene6 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung GSM2 (GSM mit Zusatz)
:D EM-Praktikum GSM2 (GSM mit Zusatz)
:K #(GSM2+DATEN)
Fnc_EMM_HIN
Sep_
-Definition GSM2 (GSM mit Zusatz)-
Fnc_elemente6
Fnc_material6
-Geometriegenerierung GSM2 (GSM mit Zusatz)-
Fnc_statorpol6
Fnc_rotornut6
Fnc_statorarea6
Fnc_rotorarea6
-Vernetzung GSM2 (GSM mit Zusatz)-
Fnc_Vor64
Fnc_netgsm21e
Fnc_netgsm22e
Fnc_netgsm2g
-Kopplungen GSM2 (GSM mit Zusatz)-
Fnc_cpgsm21
Fnc_cpgsm22
-Verschaltung GSM2 (GSM mit Zusatz)-
Fnc_Vor65
Fnc_schaltgsm21
Fnc_Vor65b
Fnc_schaltgsm22
-Interface GSM2 (GSM mit Zusatz)-
Fnc_interface6
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente6
:C )/GO
:A Elementdefinition GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Elementdefinition GSM2 (GSM mit Zusatz)
:K #(GSM2+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Gleichstrommaschine 2
Cmd_)gsm2_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_material6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_material6
:C )/GO
:A Materialdefinition GSM2 (GSM mit Zusatz)
:H Hlp_material
:D Materialdefinition GSM2 (GSM mit Zusatz)
:K #(GSM2+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Gleichstrommaschine 2
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit aussen [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit innen [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fila
Fld_2
 Prm_Fuellfaktor aussen
 Typ_Real
 Def_*PAR(fila)
Cmd_)*SET,fili
Fld_2
 Prm_Fuellfaktor innen
 Typ_Real
 Def_*PAR(fili)
Cmd_)gsm2_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorpol6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorpol6
:C )/GO
:A Generierung Statorpol GSM2 (GSM mit Zusatz)
:H Hlp_statornut
:D Generierung Statorpol GSM2 (GSM mit Zusatz)
:K #(GSM2+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statorpol GSM2
Cmd_)gsm2_SPol.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotornut6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotornut6
:C )/GO
:A Generierung Rotornut GSM2 (GSM mit Zusatz)
:H Hlp_rotornut
:D Generierung Rotornut GSM2 (GSM mit Zusatz)
:K #(GSM2+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornut
Cmd_)gsm2_RNut.txt
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorarea6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorarea6
:C )/GO
:A Flaechen Statornut GSM2 (GSM mit Zusatz)
:H Hlp_statornut
:D Flaechen Statornut GSM2 (GSM mit Zusatz)
:K #(GSM2+GEO2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Flaechen Statornut
Cmd_)gsm2_SArea.txt
Cmd_)KEYW,GEO3,1
Cmd_)KEYW,GEO2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorarea6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorarea6
:C )/GO
:A Flaechen Rotornut GSM2 (GSM mit Zusatz)
:H Hlp_rotornut
:D Flaechen Rotornut GSM2 (GSM mit Zusatz)
:K #(GSM2+GEO3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Flaechen Rotornut
Cmd_)gsm2_RArea.txt
Cmd_)KEYW,GEO,1
Cmd_)KEYW,GEO3,0
Cal_REFRESH
:E END
:!!
:N Fnc_netgsm21e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netgsm21e
:C )/GO
:A Netzgenerierung Statornut GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Netzgenerierung Statornut GSM2 (GSM mit Zusatz)
:K #(GSM2+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Statornut
Cmd_)gsm2_Snete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netgsm22e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netgsm22e
:C )/GO
:A Netzgenerierung Rotornut GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Netzgenerierung Rotornut GSM2 (GSM mit Zusatz)
:K #(GSM2+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotornut
Cmd_)gsm2_Rnete.txt
Cmd_)KEYW,NETZ3,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netgsm2g
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netgsm2g
:C )/GO
:A Netzgenerierung Maschine GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Netzgenerierung Maschine GSM2 (GSM mit Zusatz)
:K #(GSM2+NETZ3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)gsm2_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ3,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpgsm21
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpgsm21
:C )/GO
:A Kopplungen Stator GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Kopplungen Stator GSM2 (GSM mit Zusatz)
:K #(GSM2+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)gsm2_cp1.txt
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpgsm22
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpgsm22
:C )/GO
:A Kopplungen Rotor GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Kopplungen Rotor GSM2 (GSM mit Zusatz)
:K #(GSM2+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)gsm2_cp2.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltgsm21
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltgsm21
:C )/GO
:A Verschaltung Stator GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Verschaltung Stator GSM2 (GSM mit Zusatz)
:K #(GSM2+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)gsm2_schalt1.txt
Cmd_)KEYW,SCHALT2,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltgsm22
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltgsm22
:C )/GO
:A Verschaltung Rotor GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Verschaltung Rotor GSM2 (GSM mit Zusatz)
:K #(GSM2+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)gsm2_schalt2.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT3,0
Cal_REFRESH
:E END
:!!
:N Fnc_interface6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interface6
:C )/GO
:A Interface Stator/Rotor GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Interface Stator/Rotor GSM2 (GSM mit Zusatz)
:K #(GSM2+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)gsm2_interface.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT,0
Cal_REFRESH
:E END
:!!
:N Men_Loes6
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loes6 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung GSM2 (GSM mit Zusatz)
:D Loesung GSM2 (GSM mit Zusatz)
:K #(GSM2+INTERF)
Fnc_EMM_HIN
Sep_
- Ausgabedefinition GSM2 (GSM mit Zusatz)-
Fnc_ausgsm2
- Wicklungsaenderung GSM2 (GSM mit Zusatz)-
Fnc_GSM2Aend
- Statische Rechnung GSM2 (GSM mit Zusatz)-
Fnc_loes1gsm2
Fnc_loes2gsm2
Fnc_loes3gsm2
Fnc_loes4gsm2
- Transiente Rechnung GSM2 (GSM mit Zusatz)-
Fnc_loes5gsm2
Fnc_loes6gsm2
Fnc_loes7gsm2
Fnc_loes8gsm2
:E END
:!!
:N Fnc_ausgsm2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausgsm2
:C )/GO
:A Ausgabedefinition GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Ausgabedefinition GSM2 (GSM mit Zusatz)
:K #(GSM2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition GSM2
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)gsm2_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_GSM2Aend
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_GSM2Aend 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Zusatzwicklung GSM2 (GSM mit Zusatz)
:H Hlp_EMD_VOREIN6c
:D EM-Praktikum Zusatzwicklungsaenderung GSM2 (GSM mit Zusatz)
:K #(GSM2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Aenderung der Kompensationswicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,nwink
Fld_2
 Prm_Windungszahl Kompens.-Wick.
 Typ_Real
DEF_*PAR(nwink)
Cmd_)*SET,filk
Fld_2
 Prm_Fuellfaktor Kompens.-Wick.
 Typ_Real
DEF_*PAR(filk)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Aenderung der Kompoundwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,nwinko
Fld_2
 Prm_Windungszahl Kompound.-Wick.
 Typ_Real
DEF_*PAR(nwinko)
Cmd_)*SET,filko
Fld_2
 Prm_Fuellfaktor Kompound.-Wick.
 Typ_Real
DEF_*PAR(filko)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Aenderung der Wendepolwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,nwinwen
Fld_2
 Prm_Windungszahl Wendepol-Wick.
 Typ_Real
DEF_*PAR(nwinwen)
Cmd_)*SET,filwen
Fld_2
 Prm_Fuellfaktor Wendepol-Wick.
 Typ_Real
DEF_*PAR(filwen)
Cmd_)gsm2_aend.txt
CAL_REFRESH
:E END
:!!
:N Fnc_loes1gsm2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1gsm2
:C )/GO
:A Einzelschrittrechnung GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Einzelschrittrechnung GSM2 (GSM mit Zusatz)
:K #(GSM2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i1
Fld_2
 Prm_Staendererregerstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm2_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2gsm2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2gsm2
:C )/GO
:A Mehrschritt i2=0 GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Mehrschritt i2=0 GSM2 (GSM mit Zusatz)
:K #(GSM2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung mit Erregung und i2=0
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm2_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3gsm2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3gsm2
:C )/GO
:A Mehrschritt i1=0 GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Mehrschritt i1=0 GSM2 (GSM mit Zusatz)
:K #(GSM2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung ohne Erregung mit I2
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm2_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4gsm2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4gsm2
:C )/GO
:A Mehrschritt Rueckwirkung GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Mehrschritt Rueckwirkung GSM2 (GSM mit Zusatz)
:K #(GSM2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung, Rueckwirkung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i1
Fld_2
 Prm_Staendererregerstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm2_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5gsm2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5gsm2
:C )/GO
:A Induzierte Spannung GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Induzierte Spannung GSM2 (GSM mit Zusatz)
:K #(GSM2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Cmd_)*SET,jkommu
Fld_2
 Prm_Kommutierung (ja=1)
 Typ_Real
DEF_*PAR(jkommu)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm2_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6gsm2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6gsm2
:C )/GO
:A Klemmenurzschluss GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Klemmenkurzschluss GSM2 (GSM mit Zusatz)
:K #(GSM2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung fr Klemmenkurzschluss
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm2_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7gsm2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7gsm2
:C )/GO
:A Betrieb, feste Drehzahl GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Betrieb, feste Drehzahl GSM2 (GSM mit Zusatz)
:K #(GSM2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Betrieb bei fester Drehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm2_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8gsm2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8gsm2
:C )/GO
:A Hochlauf GSM2 (GSM mit Zusatz)
:H Hlp_elemente
:D Hochlauf GSM2 (GSM mit Zusatz)
:K #(GSM2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Hochlauf ab Startdrehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,terreg
Fld_2
 Prm_Ankerstromverzoegerung [s]
 Typ_Real
DEF_*PAR(terreg)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,mtstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm2_loes8.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_UNI1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_UNI1 17.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Universalmaschine
:D EM-Praktikum Universalmaschine
Men_Voru6
Sep_
Men_Geneu6
Sep_
Men_Aendu6
Sep_
Men_Loesu6
Sep_
Men_Auswu6
:E END
:!!
:N Men_Voru6
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Voru6 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Universalmaschine
:D EM-Praktikum Universalmaschine
Fnc_EMM_HINu
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen-
Fnc_Voru61
Fnc_Voru62
Fnc_Voru63
Fnc_Voru63b
Fnc_Voru63c
Fnc_Voru63d
Fnc_Voru63e
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Voru61
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voru61 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten Universalmaschine
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Statordaten Universalmaschine
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,raussen
Fld_2
 Prm_Aussenradius     [m]
 Typ_Real
DEF_*PAR(raussen)
Cmd_)*SET,joch1
Fld_2
 Prm_Jochdicke [m]
 Typ_Real
DEF_*PAR(joch1)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Statorstaerke gesamt [m]
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)*SET,delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,GSM2,0
Cmd_)KEYW,UNI1,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Voru62
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voru62 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten Universalmaschine
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Rotordaten Universalmaschine
:K #(UNI1+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rinnen
Fld_2
 Prm_Innenradius (rir)     [m]
 Typ_Real
DEF_*PAR(rinnen)
Cmd_)*SET,z2
Fld_2
 Prm_Rotorspulenzahl 
 Typ_Real
DEF_*PAR(z2)
Cmd_)*SET,zweischicht2,1
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Voru63
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voru63 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statorpol Universalmaschine
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statorpol Universalmaschine
:K #(UNI1+VOREIN2)
Fld_0
 Typ_Lab
 Prm_Eingabe der Statorpolgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,polschhoehe
Fld_2
 Prm_Polschuhhoehe    [m]
 Typ_Real
DEF_*PAR(polschhoehe)
Cmd_)*SET,polbreite
Fld_2
 Prm_Polbreite    [m]
 Typ_Real
DEF_*PAR(polbreite)
Cmd_)*SET,polschraeg
Fld_2
 Prm_Polstaerke aussen [m]
 Typ_Real
DEF_*PAR(polschraeg)
Cmd_)*SET,polwinkel
Fld_2
 Prm_Polteilung in Grad
 Typ_Real
DEF_*PAR(polwinkel)
Cmd_)*SET,wickbreite1
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite1)
Cmd_)*SET,wickhoehe1
Fld_2
 Prm_wicklungshoehe1 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe1)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,kompen
Fld_2
 Prm_mit Kompensationswicklung 
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(kompen)
Cmd_)*SET,kompound
Fld_2
 Prm_mit Kompoundwicklung 
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(kompound)
Cmd_)*SET,wende
Fld_2
 Prm_mit Wendepolwicklung 
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(wende)
Fld_0
 Typ_Sep
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Voru63b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voru63b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotornut Universalmaschine
:H Hlp_EMD_VOREIN6b
:D EM-Praktikum Rotornut Universalmaschine
:K #(UNI1+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite2
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite2)
Cmd_)*SET,wickhoehe2
Fld_2
 Prm_wicklungshoehe2 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe2)
Cmd_)*SET,wickisol2
Fld_2
 Prm_Isolationsstaerke   [m]
 Typ_Real
DEF_*PAR(wickisol2)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin2
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin2)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Voru63c
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voru63c 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Kompen.-Wick. Universalmaschine
:H Hlp_EMD_VOREIN6c
:D EM-Praktikum Kompen.-Wick. Universalmaschine
:K #(UNI1+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Kompensationswicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreitek
Fld_2
 Prm_Wicklungsbreite Komp.-Wick. [m]
 Typ_Real
DEF_*PAR(wickbreitek)
Cmd_)*SET,wickhoehek
Fld_2
 Prm_wicklungshoehe2 Komp.-Wick. [m]
 Typ_Real
DEF_*PAR(wickhoehek)
Cmd_)*SET,nnutk,8
Cmd_)*SET,nwink
Fld_2
 Prm_Windungszahl Komp.-Wick.
 Typ_Real
DEF_*PAR(nwink)
Cmd_)*SET,filk
Fld_2
 Prm_Fuellfaktor Kompens.-Wick.
 Typ_Real
DEF_*PAR(filk)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Voru63d
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voru63d 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Kompund-Wick. Universalmaschine
:H Hlp_EMD_VOREIN6d
:D EM-Praktikum Kompound-Wick. Universalmaschine
:K #(UNI1+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Kompoundwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreiteko
Fld_2
 Prm_Wicklungsbreite Kompound.-Wick. [m]
 Typ_Real
DEF_*PAR(wickbreiteko)
Cmd_)*SET,wickisoko
Fld_2
 Prm_wicklungsisol.-Hoehe Kompound.-Wick. [m]
 Typ_Real
DEF_*PAR(wickisoko)
Cmd_)*SET,nwinko
Fld_2
 Prm_Windungszahl Kompound.-Wick.
 Typ_Real
DEF_*PAR(nwinko)
Cmd_)*SET,filko
Fld_2
 Prm_Fuellfaktor Kompound.-Wick.
 Typ_Real
DEF_*PAR(filko)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Voru63e
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voru63e 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Wendepol-Wick. Universalmaschine
:H Hlp_EMD_VOREIN6d
:D EM-Praktikum Wendepol-Wick. Universalmaschine
:K #(UNI1+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Wendepolwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wendebreite
Fld_2
 Prm_Wendepolbreite [m]
 Typ_Real
DEF_*PAR(wendebreite)
Cmd_)*SET,wendedel
Fld_2
 Prm_Wendepolluftspalt  [m]
 Typ_Real
DEF_*PAR(wendedel)
Cmd_)*SET,wickbreitewen
Fld_2
 Prm_Wendepolwicklungsbreite [m]
 Typ_Real
DEF_*PAR(wickbreitewen)
Cmd_)*SET,wickhoehewen
Fld_2
 Prm_Wendepolwicklungshoehe [m]
 Typ_Real
DEF_*PAR(wickhoehewen)
Cmd_)*SET,nwinwen
Fld_2
 Prm_Windungszahl Wendepol-Wick.
 Typ_Real
DEF_*PAR(nwinwen)
Cmd_)*SET,filwen
Fld_2
 Prm_Fuellfaktor Wendepol-Wick.
 Typ_Real
DEF_*PAR(filwen)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Voru64
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voru64 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Universalmaschine
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter Universalmaschine
:K #(UNI1+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO,0
CAL_REFRESH
:E END
:!!
:N Fnc_Voru65
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voru65 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator Universalmaschine
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator Universalmaschine
:K #(UNI1+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom (Serie) [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,SSchaltung,2
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirnk
Fld_2
 Prm_Stirnwiderstand Kompensationswick.[Ohm]
 Typ_Real
DEF_*PAR(rwickstirnk)
Cmd_)*SET,lwickstirnk
Fld_2
 Prm_Stirninduktivitaet Kompensationswick.[H]
 Typ_Real
DEF_*PAR(lwickstirnk)
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirnko
Fld_2
 Prm_Stirnwiderstand Kompoundwick.[Ohm]
 Typ_Real
DEF_*PAR(rwickstirnko)
Cmd_)*SET,lwickstirnko
Fld_2
 Prm_Stirninduktivitaet Kompoundwick.[H]
 Typ_Real
DEF_*PAR(lwickstirnko)
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirnwe
Fld_2
 Prm_Stirnwiderstand Wendepolwick.[Ohm]
 Typ_Real
DEF_*PAR(rwickstirnwe)
Cmd_)*SET,lwickstirnwe
Fld_2
 Prm_Stirninduktivitaet Wendepolwick.[H]
 Typ_Real
DEF_*PAR(lwickstirnwe)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Voru65b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voru65b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Rotor Universalmaschine
:H Hlp_EMD_VOREIN5b
:D EM-Praktikum Schaltungsparameter Rotor Universalmaschine
:K #(UNI1+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Rotors
Cmd_)*SET,spulw2
Fld_2
 Prm_Spulenweite
 Typ_Real
DEF_*PAR(spulw2)
Cmd_)*SET,buebr2
Fld_2
 Prm_Buerstenbreite  [Grad]
 Typ_Real
DEF_*PAR(buebr2)
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn2
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2)
Cmd_)*SET,lwickstirn2
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn2)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung   [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,rvor2
Fld_2
 Prm_Ankervorwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rvor2)
Cmd_)KEYW,SCHALT3,1
Cmd_)KEYW,SCHALT2,0
CAL_REFRESH
:E END
:!!
:N Men_Geneu6
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Geneu6 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Universalmaschine
:D EM-Praktikum Generierung Universalmaschine
:K #(UNI1+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Universalmaschine-
Fnc_elementeu6
Fnc_materialu6
-Geometriegenerierung Universalmaschine-
Fnc_statorpolu6
Fnc_rotornutu6
Fnc_statorareau6
Fnc_rotorareau6
-Vernetzung Universalmaschine-
Fnc_Voru64
Fnc_netUNI11e
Fnc_netUNI12e
Fnc_netUNI1g
-Kopplungen Universalmaschine-
Fnc_cpUNI11
Fnc_cpUNI12
-Verschaltung Universalmaschine-
Fnc_Voru65
Fnc_schaltUNI11
Fnc_Voru65b
Fnc_schaltUNI12
-Interface Universalmaschine-
Fnc_interfaceu6
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeu6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeu6
:C )/GO
:A Elementdefinition Universalmaschine
:H Hlp_elemente
:D Elementdefinition Universalmaschine
:K #(UNI1+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Universalmaschine
Cmd_)gsm2_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialu6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialu6
:C )/GO
:A Materialdefinition Universalmaschine
:H Hlp_material
:D Materialdefinition Universalmaschine
:K #(UNI1+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Universalmaschine
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit aussen [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit innen [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fila
Fld_2
 Prm_Fuellfaktor aussen
 Typ_Real
 Def_*PAR(fila)
Cmd_)*SET,fili
Fld_2
 Prm_Fuellfaktor innen
 Typ_Real
 Def_*PAR(fili)
Cmd_)gsm2_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorpolu6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorpolu6
:C )/GO
:A Generierung Statorpol Universalmaschine
:H Hlp_statornut
:D Generierung Statorpol Universalmaschine
:K #(UNI1+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statorpol Universalmaschine
Cmd_)gsm2_SPol.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotornutu6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotornutu6
:C )/GO
:A Generierung Rotornut Universalmaschine
:H Hlp_rotornut
:D Generierung Rotornut Universalmaschine
:K #(UNI1+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornut
Cmd_)gsm2_RNut.txt
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorareau6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorareau6
:C )/GO
:A Flaechen Statornut
:H Hlp_statornut
:D Flaechen Statornut
:K #(UNI1+GEO2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Flaechen Statornu
Cmd_)gsm2_SArea.txt
Cmd_)KEYW,GEO3,1
Cmd_)KEYW,GEO2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorareau6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorareau6
:C )/GO
:A Flaechen Rotornut Universalmaschine
:H Hlp_rotornut
:D Flaechen Rotornut Universalmaschine
:K #(UNI1+GEO3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Flaechen Rotornut
Cmd_)gsm2_RArea.txt
Cmd_)KEYW,GEO,1
Cmd_)KEYW,GEO3,0
Cal_REFRESH
:E END
:!!
:N Fnc_netUNI11e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netUNI11e
:C )/GO
:A Netzgenerierung Statornut Universalmaschine
:H Hlp_elemente
:D Netzgenerierung Statornut Universalmaschine
:K #(UNI1+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Statornut
Cmd_)gsm2_Snete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netUNI12e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netUNI12e
:C )/GO
:A Netzgenerierung Rotornut Universalmaschine
:H Hlp_elemente
:D Netzgenerierung Rotornut Universalmaschine
:K #(UNI1+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotornut
Cmd_)gsm2_Rnete.txt
Cmd_)KEYW,NETZ3,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netUNI1g
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netUNI1g
:C )/GO
:A Netzgenerierung Maschine Universalmaschine
:H Hlp_elemente
:D Netzgenerierung Maschine Universalmaschine
:K #(UNI1+NETZ3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)gsm2_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ3,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpUNI11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpUNI11
:C )/GO
:A Kopplungen Stator Universalmaschine
:H Hlp_elemente
:D Kopplungen Stator Universalmaschine
:K #(UNI1+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)gsm2_cp1.txt
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpUNI12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpUNI12
:C )/GO
:A Kopplungen Rotor Universalmaschine
:H Hlp_elemente
:D Kopplungen Rotor Universalmaschine
:K #(UNI1+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)gsm2_cp2.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltUNI11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltUNI11
:C )/GO
:A Verschaltung Stator Universalmaschine
:H Hlp_elemente
:D Verschaltung Stator Universalmaschine
:K #(UNI1+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)gsm2_schalt1.txt
Cmd_)KEYW,SCHALT2,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltUNI12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltUNI12
:C )/GO
:A Verschaltung Rotor Universalmaschine
:H Hlp_elemente
:D Verschaltung Rotor Universalmaschine
:K #(UNI1+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)gsm2_schalt2.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT3,0
Cal_REFRESH
:E END
:!!
:N Fnc_interfaceu6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interfaceu6
:C )/GO
:A Interface Stator/Rotor Universalmaschine
:H Hlp_elemente
:D Interface Stator/Rotor Universalmaschine
:K #(UNI1+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)gsm2_interface.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT,0
Cal_REFRESH
:E END
:!!
:N Men_Loesu6
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loesu6 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Universalmaschine
:D Loesung Universalmaschine
:K #(UNI1+INTERF)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Universalmaschine-
Fnc_ausUNI1
-Wicklungsaenderung Universalmaschine-
Fnc_UNI1Aend
-Statische Rechnung Universalmaschine-
Fnc_loes1UNI1
Fnc_loes2UNI1
Fnc_loes3UNI1
Fnc_loes4UNI1
-Transiente Rechnung Universalmaschine-
Fnc_loes5UNI1
Fnc_loes6UNI1
Fnc_loes7UNI1
Fnc_loes8UNI1
:E END
:!!
:N Fnc_ausUNI1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausUNI1
:C )/GO
:A Ausgabedefinition Universalmaschine
:H Hlp_elemente
:D Ausgabedefinition Universalmaschine
:K #(UNI1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition UNI1
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)UNI1_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_UNI1Aend
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_UNI1Aend 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Zusatzwicklungsaenderung Universalmaschine
:H Hlp_EMD_VOREIN6c
:D EM-Praktikum Zusatzwicklungsaenderung Universalmaschine
:K #(UNI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Aenderung der Kompensationswicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,nwink
Fld_2
 Prm_Windungszahl Kompens.-Wick.
 Typ_Real
DEF_*PAR(nwink)
Cmd_)*SET,filk
Fld_2
 Prm_Fuellfaktor Kompens.-Wick.
 Typ_Real
DEF_*PAR(filk)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Aenderung der Kompoundwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,nwinko
Fld_2
 Prm_Windungszahl Kompound.-Wick.
 Typ_Real
DEF_*PAR(nwinko)
Cmd_)*SET,filko
Fld_2
 Prm_Fuellfaktor Kompound.-Wick.
 Typ_Real
DEF_*PAR(filko)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Aenderung der Wendepolwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,nwinwen
Fld_2
 Prm_Windungszahl Wendepol-Wick.
 Typ_Real
DEF_*PAR(nwinwen)
Cmd_)*SET,filwen
Fld_2
 Prm_Fuellfaktor Wendepol-Wick.
 Typ_Real
DEF_*PAR(filwen)
Cmd_)UNI1_aend.txt
CAL_REFRESH
:E END
:!!
:N Fnc_loes1UNI1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1UNI1
:C )/GO
:A Einzelschrittrechnung Universalmaschine
:H Hlp_elemente
:D Einzelschrittrechnung Universalmaschine
:K #(UNI1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i1
Fld_2
 Prm_Staendererregerstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)UNI1_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2UNI1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2UNI1
:C )/GO
:A Mehrschritt i2=0 Universalmaschine
:H Hlp_elemente
:D Mehrschritt i2=0 Universalmaschine
:K #(UNI1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung mit Erregung und i2=0
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)UNI1_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3UNI1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3UNI1
:C )/GO
:A Mehrschritt i1=0 Universalmaschine
:H Hlp_elemente
:D Mehrschritt i1=0 Universalmaschine
:K #(UNI1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung ohne Erregung mit I2
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)UNI1_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4UNI1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4UNI1
:C )/GO
:A Mehrschritt Rueckwirkung Universalmaschine
:H Hlp_elemente
:D Mehrschritt Rueckwirkung Universalmaschine
:K #(UNI1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung, Rueckwirkung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i1
Fld_2
 Prm_Staendererregerstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)UNI1_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5UNI1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5UNI1
:C )/GO
:A Induzierte Spannung Universalmaschine
:H Hlp_elemente
:D Induzierte Spannung Universalmaschine
:K #(UNI1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Cmd_)*SET,jkommu
Fld_2
 Prm_Kommutierung (ja=1)
 Typ_Real
DEF_*PAR(jkommu)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)UNI1_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6UNI1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6UNI1
:C )/GO
:A Klemmenurzschluss Universalmaschine
:H Hlp_elemente
:D Klemmenkurzschluss Universalmaschine
:K #(UNI1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung fr Klemmenkurzschluss
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)UNI1_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7UNI1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7UNI1
:C )/GO
:A Betrieb, feste Drehzahl Universalmaschine
:H Hlp_elemente
:D Betrieb, feste Drehzahl Universalmaschine
:K #(UNI1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Betrieb bei fester Drehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)UNI1_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8UNI1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8UNI1
:C )/GO
:A Hochlauf Universalmaschine
:H Hlp_elemente
:D Hochlauf Universalmaschine
:K #(UNI1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Hochlauf ab Startdrehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1i1
Fld_2
 Prm_Erregerspannung/strom
 Typ_Lis_RadioB
 Lis_Spannungserregung,0
 Lis_Stromerregung,1
 Def_*PAR(u1i1)
Cmd_)*SET,u1
Fld_2
 Prm_Erregerspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,i1
Fld_2
 Prm_Erregerstrom I1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,terreg
Fld_2
 Prm_Ankerstromverzoegerung [s]
 Typ_Real
DEF_*PAR(terreg)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,mtstep
Fld_2
 Prm_Maximaler Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,enddreh
Fld_2
 Prm_Enddrehzahl
 Typ_Real
DEF_*PAR(enddreh)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)UNI1_loes8.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_ASMK
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_ASMK 17.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Asynchron-Kaefiglaeufermaschine 
:D EM-Praktikum Asynchron-Kaefiglaeufermaschine
Men_Vor7
Sep_
Men_Gene7
Sep_
Men_Aend7
Sep_
Men_Loes7
Sep_
Men_Ausw7
:E END
:!!
:N Men_Vor7
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor7 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Asynchron-Kaefiglaeufermaschine
:D EM-Praktikum Voreinstellung Asynchron-Kaefiglaeufermaschine
Fnc_EMM_HIN
Sep_
-Einlesen-
Fnc_Rpar1
-Praeferenzen Asynchron-Kaefiglaeufermaschine-
Fnc_Vor71
Fnc_Vor72
Fnc_Vor73
Fnc_Vor73b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor71
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor71 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten Asynchron-Kaefiglaeufermaschine
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Statordaten Asynchron-Kaefiglaeufermaschine
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,raussen
Fld_2
 Prm_Aussenradius (ras)
 Typ_Real
DEF_*PAR(raussen)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Statorstaerke gesamt (ssa)
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)*SET,delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nut/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)*SET,zweischicht
Fld_2
 Prm_Einschicht/-zweischicht
 Typ_Lis_RadioB
 Lis_Einschicht,0
 Lis_Zweischicht,1
 Def_*PAR(zweischicht)
Cmd_)*SET,eps
Fld_2
 Prm_Sehnung epsilon
 Typ_Real
DEF_*PAR(eps)
Fld_0
 Typ_Sep
Cmd_)*SET,_freq
Fld_2
 Prm_(Grund)frequenz [Hz]
 Typ_Real
DEF_*PAR(_freq)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,ASMK,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor72
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor72 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten Asynchron-Kaefiglaeufermaschine
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Rotordaten Asynchron-Kaefiglaeufermaschine
:K #(ASMK+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rinnen
Fld_2
 Prm_Innenradius (rir)     [m]
 Typ_Real
DEF_*PAR(rinnen)
Cmd_)*SET,z2
Fld_2
 Prm_Rotorspulenzahl 
 Typ_Real
DEF_*PAR(z2)
Cmd_)*SET,zweischicht2,0
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor73
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor73 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut Asynchron-Kaefiglaeufermaschine
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statornut Asynchron-Kaefiglaeufermaschine
:K #(ASMK+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Statorpolgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite1
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite1)
Cmd_)*SET,wickhoehe1
Fld_2
 Prm_wicklungshoehe1 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe1)
Cmd_)*SET,wickisol1
Fld_2
 Prm_wicklungsisolationshoehe [m]
 Typ_Real
DEF_*PAR(wickisol1)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor73b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor23b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotornut Asynchron-Kaefiglaeufermaschine
:H Hlp_EMD_VOREIN7b
:D EM-Praktikum Rotornut Asynchron-Kaefiglaeufermaschine
:K #(ASMK+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite2
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite2)
Cmd_)*SET,wickhoehe2
Fld_2
 Prm_wicklungshoehe2 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe2)
Cmd_)*SET,wickisol2
Fld_2
 Prm_Isolationsstaerke   [m]
 Typ_Real
DEF_*PAR(wickisol2)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor74
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor74 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Asynchron-Kaefiglaeufermaschine
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter Asynchron-Kaefiglaeufermaschine
:K #(ASMK+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor75
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor75 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator Asynchron-Kaefiglaeufermaschine
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator Asynchron-Kaefiglaeufermaschine
:K #(ASMK+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,stern1
Fld_2
 Prm_Stern/Dreieck
 Typ_Lis_RadioB
 Lis_Stern,1
 Lis_Dreieck,0
DEF_*PAR(stern1)
Cmd_)*SET,vstern1
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor75b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor75b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Rotor Asynchron-Kaefiglaeufermaschine
:H Hlp_EMD_VOREIN5b
:D EM-Praktikum Schaltungsparameter Rotor Asynchron-Kaefiglaeufermaschine
:K #(ASMK+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Rotors
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn2
Fld_2
 Prm_Stirnstabwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2)
Cmd_)*SET,lwickstirn2
Fld_2
 Prm_Stirnstabinduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn2)
Cmd_)*SET,rwickstirn2r
Fld_2
 Prm_Stirnringwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2r)
Cmd_)KEYW,SCHALT3,1
Cmd_)KEYW,SCHALT2,0
CAL_REFRESH
:E END
:!!
:N Men_Gene7
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene7 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Asynchron-Kaefiglaeufermaschine
:D EM-Praktikum Generierung Asynchron-Kaefiglaeufermaschine
:K #(ASMK+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Asynchron-Kaefiglaeufermaschine-
Fnc_elemente7
Fnc_material7
-Geometriegenerierung Asynchron-Kaefiglaeufermaschine-
Fnc_statornut7
Fnc_rotornut7
Fnc_statorarea7
Fnc_rotorarea7
-Vernetzung Asynchron-Kaefiglaeufermaschine-
Fnc_Vor74
Fnc_netASMK1e
Fnc_netASMK2e
Fnc_netASMKg
-Kopplungen Asynchron-Kaefiglaeufermaschine-
Fnc_cpASMK1
Fnc_cpASMK2
-Verschaltung Asynchron-Kaefiglaeufermaschine-
Fnc_Vor75
Fnc_schaltASMK1
Fnc_Vor75b
Fnc_schaltASMK2
-Interface Asynchron-Kaefiglaeufermaschine-
Fnc_interface7
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente7
:C )/GO
:A Elementdefinition Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Elementdefinition Asynchron-Kaefiglaeufermaschine
:K #(ASMK+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Asynchron-Kaefiglaeufermaschine
Cmd_)ASMK_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_material7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_material7
:C )/GO
:A Materialdefinition Asynchron-Kaefiglaeufermaschine
:H Hlp_material
:D Materialdefinition Asynchron-Kaefiglaeufermaschine
:K #(ASMK+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Asynchron-Kaefiglaeufermaschine
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit aussen [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit innen [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fila
Fld_2
 Prm_Fuellfaktor aussen
 Typ_Real
 Def_*PAR(fila)
Cmd_)*SET,fili
Fld_2
 Prm_Fuellfaktor innen
 Typ_Real
 Def_*PAR(fili)
Cmd_)ASMK_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statornut7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statornut7
:C )/GO
:A Generierung Statornut Asynchron-Kaefiglaeufermaschine
:H Hlp_statornut
:D Generierung Statornut Asynchron-Kaefiglaeufermaschine
:K #(ASMK+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornut ASMK
Cmd_)ASMK_SNut.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotornut7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotornut7
:C )/GO
:A Generierung Rotornut Asynchron-Kaefiglaeufermaschine
:H Hlp_rotornut
:D Generierung Rotornut Asynchron-Kaefiglaeufermaschine
:K #(ASMK+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornut
Cmd_)ASMK_RNut.txt
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorarea7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorarea7
:C )/GO
:A Flaechen Statornut Asynchron-Kaefiglaeufermaschine
:H Hlp_statornut
:D Flaechen Statornut Asynchron-Kaefiglaeufermaschine
:K #(ASMK+GEO2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Flaechen Statornut
Cmd_)ASMK_SArea.txt
Cmd_)KEYW,GEO3,1
Cmd_)KEYW,GEO2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorarea7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorarea7
:C )/GO
:A Flaechen Rotornut Asynchron-Kaefiglaeufermaschine
:H Hlp_rotornut
:D Flaechen Rotornut Asynchron-Kaefiglaeufermaschine
:K #(ASMK+GEO3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Flaechen Rotornut
Cmd_)ASMK_RArea.txt
Cmd_)KEYW,GEO,1
Cmd_)KEYW,GEO3,0
Cal_REFRESH
:E END
:!!
:N Fnc_netASMK1e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netASMK1e
:C )/GO
:A Netzgenerierung Statornut Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Netzgenerierung Statornut Asynchron-Kaefiglaeufermaschine
:K #(ASMK+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Statornut
Cmd_)ASMK_Snete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netASMK2e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netASMK2e
:C )/GO
:A Netzgenerierung Rotornut Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Netzgenerierung Rotornut Asynchron-Kaefiglaeufermaschine
:K #(ASMK+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotornut
Cmd_)ASMK_Rnete.txt
Cmd_)KEYW,NETZ3,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netASMKg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netASMKg
:C )/GO
:A Netzgenerierung Maschine Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Netzgenerierung Maschine Asynchron-Kaefiglaeufermaschine
:K #(ASMK+NETZ3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)ASMK_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ3,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpASMK1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpASMK1
:C )/GO
:A Kopplungen Stator Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Kopplungen Stator Asynchron-Kaefiglaeufermaschine
:K #(ASMK+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)ASMK_cp1.txt
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpASMK2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpASMK2
:C )/GO
:A Kopplungen Rotor Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Kopplungen Rotor Asynchron-Kaefiglaeufermaschine
:K #(ASMK+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)ASMK_cp2.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltASMK1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltASMK1
:C )/GO
:A Verschaltung Stator
:H Hlp_elemente
:D Verschaltung Stator
:K #(ASMK+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)ASMK_schalt1.txt
Cmd_)KEYW,SCHALT2,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltASMK2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltASMK2
:C )/GO
:A Verschaltung Rotor Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Verschaltung Rotor Asynchron-Kaefiglaeufermaschine
:K #(ASMK+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)ASMK_schalt2.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT3,0
Cal_REFRESH
:E END
:!!
:N Fnc_interface7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interface7
:C )/GO
:A Interface Stator/Rotor Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Interface Stator/Rotor Asynchron-Kaefiglaeufermaschine
:K #(ASMK+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)ASMK_interface.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT,0
Cal_REFRESH
:E END
:!!
:N Men_Loes7
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loes7 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Asynchron-Kaefiglaeufermaschine
:D Loesung Asynchron-Kaefiglaeufermaschine
:K #(ASMK+INTERF)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Asynchron-Kaefiglaeufermaschine-
Fnc_ausASMK
-Statische Rechnung Asynchron-Kaefiglaeufermaschine-
Fnc_loes1ASMK
Fnc_loes2ASMK
-Harmonische Rechnung Asynchron-Kaefiglaeufermaschine-
Fnc_loes3ASMK
Fnc_loes4ASMK
-Transiente Rechnung Asynchron-Kaefiglaeufermaschine-
Fnc_loes5ASMK
Fnc_loes9ASMK
Fnc_loes10ASMK
Fnc_loes6ASMK
Fnc_loes7ASMK
:E END
:!!
:N Fnc_ausASMK
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausASMK
:C )/GO
:A Ausgabedefinition Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Ausgabedefinition Asynchron-Kaefiglaeufermaschine
:K #(ASMK+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Asynchron-Kaefiglaeufermaschine
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)ASMK_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1ASMK
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1ASMK
:C )/GO
:A Einzelschrittrechnung Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Einzelschrittrechnung Asynchron-Kaefiglaeufermaschine
:K #(ASMK+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,winkel
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkel)
Cmd_)*SET,zeit
Fld_2
 Prm_Zeit    [s]
 Typ_Real
DEF_*PAR(zeit)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom [A]
 Typ_Real
DEF_*PAR(i1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMK_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2ASMK
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2ASMK
:C )/GO
:A Statische Mehrschrittrechnung Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Statische Mehrschrittrechnung Asynchron-Kaefiglaeufermaschine
:K #(ASMK+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung ohne Erregung mit U2
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitanfang in Grad
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom [A]
 Typ_Real
DEF_*PAR(i1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMK_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3ASMK
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3ASMK
:C )/GO
:A Mehrschrittrechnung Stillstand Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Mehrschrittrechnung Stillstand Asynchron-Kaefiglaeufermaschine
:K #(ASMK+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Mehrschrittrechnung Stillstand
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitanfang in s
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderstrangspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMK_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4ASMK
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4ASMK
:C )/GO
:A Mehrschrittrechnung Leerlauf Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Mehrschrittrechnung Leerlauf Asynchron-Kaefiglaeufermaschine
:K #(ASMK+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Mehrschrittrechnung Leerlauf
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderstrangspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMK_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5ASMK
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5ASMK
:C )/GO
:A Hochlauf Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Hochlauf Asynchron-Kaefiglaeufermaschine
:K #(ASMK+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,mtstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMK_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6ASMK
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6ASMK
:C )/GO
:A U/f-Hochlauf Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D U/f-Hochlauf Asynchron-Kaefiglaeufermaschine
:K #(ASMK+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung U/f-Kennlinie
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,um
Fld_2
 Prm_Magnetisierungsspannung [V]
 Typ_Real
DEF_*PAR(um)
Cmd_)*SET,rtime
Fld_2
 Prm_Rampenzeit [s]
 Typ_Real
DEF_*PAR(rtime)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,mtstep
Fld_2
 Prm_Maximaler Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,enddreh
Fld_2
 Prm_Enddrehzahl
 Typ_Real
DEF_*PAR(enddreh)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMK_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7ASMK
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7ASMK
:C )/GO
:A Betrieb bei fester Drehzahl Asynchron-Kaefiglaeufermaschine
:H Hlp_elemente
:D Betrieb bei fester Drehzahl Asynchron-Kaefiglaeufermaschine
:K #(ASMK+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Betrieb bei fester Drehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,Drehzahlf
Fld_2
 Prm_Drehzahl
 Typ_Real
DEF_*PAR(Drehzahlf)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMK_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes9ASMK
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes9ASMK
:C )/GO
:A Stufiger Hochlauf Asynchron-Kaefiglaeufer
:H Hlp_elemente
:D Stufiger Hochlauf Asynchron-Kaefiglaeufer
:K #(ASMK+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rvor2r
Cmd_)*SET,ninit
Fld_2
 Prm_Anzahl Initialisierungsschritte
 Typ_Real
DEF_*PAR(ninit)
Cmd_)*SET,ndrehs
Fld_2
 Prm_Anzahl Drehzahlstufen
 Typ_Real
DEF_*PAR(ndrehs)
Cmd_)*SET,drehschritt
Fld_2
 Prm_Drehzahlschritt je Stufe
 Typ_Real
DEF_*PAR(drehschritt)
Cmd_)*SET,ndschritt
Fld_2
 Prm_Rechenschritte je Stufe
 Typ_Real
DEF_*PAR(ndschritt)
Cmd_)*SET,mtstep
Fld_2
 Prm_Maximaler Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMK_loes9.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes10ASMK
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes10ASMK
:C )/GO
:A Stufige Last Asynchron-Kaefiglaeufer
:H Hlp_elemente
:D Stufige Last Asynchron-Kaefiglaeufer
:K #(ASMK+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rvor2r
Cmd_)*SET,ninit
Fld_2
 Prm_Anzahl Initialisierungsschritte
 Typ_Real
DEF_*PAR(ninit)
Cmd_)*SET,ndrehs
Fld_2
 Prm_Anzahl Laststufen
 Typ_Real
DEF_*PAR(ndrehs)
Cmd_)*SET,lastschritt
Fld_2
 Prm_Lastschritt je Stufe
 Typ_Real
DEF_*PAR(lastschritt)
Cmd_)*SET,ndschritt
Fld_2
 Prm_Rechenschritte je Stufe
 Typ_Real
DEF_*PAR(ndschritt)
Cmd_)*SET,mtstep
Fld_2
 Prm_Maximaler Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMK_loes10.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_ASMS
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_ASMS 17.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Asynchron-Schleifringlaeufer
:D EM-Praktikum Asynchron-Schleifringlaeufer
Men_Vor8
Sep_
Men_Gene8
Sep_
Men_Aend8
Sep_
Men_Loes8
Sep_
Men_Ausw8
:E END
:!!
:N Men_Vor8
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor8 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Asynchron-Schleifringlaeufer
:D EM-Praktikum Voreinstellung Asynchron-Schleifringlaeufer
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Asynchron-Schleifringlaeufer-
Fnc_Vor81
Fnc_Vor82
Fnc_Vor83
Fnc_Vor83b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor81
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor81 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten Asynchron-Schleifringlaeufer
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Statordaten Asynchron-Schleifringlaeufer
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,raussen
Fld_2
 Prm_Aussenradius (ras)
 Typ_Real
DEF_*PAR(raussen)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Statorstaerke gesamt (ssa)
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)*SET,delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nut/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)*SET,zweischicht
Fld_2
 Prm_Einschicht/-zweischicht
 Typ_Lis_RadioB
 Lis_Einschicht,0
 Lis_Zweischicht,1
 Def_*PAR(zweischicht)
Cmd_)*SET,eps
Fld_2
 Prm_Sehnung epsilon
 Typ_Real
DEF_*PAR(eps)
Fld_0
 Typ_Sep
Cmd_)*SET,_freq
Fld_2
 Prm_(Grund)frequenz [Hz]
 Typ_Real
DEF_*PAR(_freq)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,ASMS,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor82
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor82 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten Asynchron-Schleifringlaeufer
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Rotordaten Asynchron-Schleifringlaeufer
:K #(ASMS+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rinnen
Fld_2
 Prm_Innenradius (rir)     [m]
 Typ_Real
DEF_*PAR(rinnen)
Cmd_)*SET,q2
Fld_2
 Prm_Nut/Pol/Phase (q2)
 Typ_Real
DEF_*PAR(q2)
Cmd_)*SET,zweischicht2
Fld_2
 Prm_Einschicht/-zweischicht
 Typ_Lis_RadioB
 Lis_Einschicht,0
 Lis_Zweischicht,1
 Def_*PAR(zweischicht2)
Cmd_)*SET,eps2
Fld_2
 Prm_Sehnung epsilon
 Typ_Real
DEF_*PAR(eps2)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor83
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor83 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut Asynchron-Schleifringlaeufer
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statornut Asynchron-Schleifringlaeufer
:K #(ASMS+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Statorpolgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite1
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite1)
Cmd_)*SET,wickhoehe1
Fld_2
 Prm_wicklungshoehe (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe1)
Cmd_)*SET,wickisol1
Fld_2
 Prm_wicklungsisolationshoehe [m]
 Typ_Real
DEF_*PAR(wickisol1)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor83b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor23b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotornut Asynchron-Schleifringlaeufer
:H Hlp_EMD_VOREIN8b
:D EM-Praktikum Rotornut Asynchron-Schleifringlaeufer
:K #(ASMS+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite2
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite2)
Cmd_)*SET,wickhoehe2
Fld_2
 Prm_wicklungshoehe (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe2)
Cmd_)*SET,wickisol2
Fld_2
 Prm_Isolationsstaerke   [m]
 Typ_Real
DEF_*PAR(wickisol2)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin2
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin2)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor84
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor84 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Asynchron-Schleifringlaeufer
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter Asynchron-Schleifringlaeufer
:K #(ASMS+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor85
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor85 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator Asynchron-Schleifringlaeufer
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator Asynchron-Schleifringlaeufer
:K #(ASMS+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,stern1
Fld_2
 Prm_Stern/Dreieck
 Typ_Lis_RadioB
 Lis_Stern,1
 Lis_Dreieck,0
DEF_*PAR(stern1)
Cmd_)*SET,vstern1
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor85b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor85b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Rotor Asynchron-Schleifringlaeufer
:H Hlp_EMD_VOREIN5b
:D EM-Praktikum Schaltungsparameter Rotor Asynchron-Schleifringlaeufer
:K #(ASMS+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Rotors
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn2
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2)
Cmd_)*SET,lwickstirn2
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn2)
Cmd_)*SET,stern2
Fld_2
 Prm_Stern/Dreieck
 Typ_Lis_RadioB
 Lis_Stern,1
 Lis_Dreieck,0
DEF_*PAR(stern2)
Cmd_)*SET,vstern2
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern2)
Cmd_)*SET,rvor2
Fld_2
 Prm_Laeufervorwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rvor2)
Cmd_)KEYW,SCHALT3,1
Cmd_)KEYW,SCHALT2,0
CAL_REFRESH
:E END
:!!
:N Men_Gene8
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene8 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Asynchron-Schleifringlaeufer
:D EM-Praktikum Generierung Asynchron-Schleifringlaeufer
:K #(ASMS+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Asynchron-Schleifringlaeufer-
Fnc_elemente8
Fnc_material8
-Geometriegenerierung Asynchron-Schleifringlaeufer-
Fnc_statornut8
Fnc_rotornut8
Fnc_statorarea8
Fnc_rotorarea8
-Vernetzung Asynchron-Schleifringlaeufer-
Fnc_Vor84
Fnc_netASMS1e
Fnc_netASMS2e
Fnc_netASMSg
-Kopplungen Asynchron-Schleifringlaeufer-
Fnc_cpASMS1
Fnc_cpASMS2
-Verschaltung Asynchron-Schleifringlaeufer-
Fnc_Vor85
Fnc_schaltASMS1
Fnc_Vor85b
Fnc_schaltASMS2
-Interface Asynchron-Schleifringlaeufer-
Fnc_interface8
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente8
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente8
:C )/GO
:A Elementdefinition Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Elementdefinition Asynchron-Schleifringlaeufer
:K #(ASMS+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Asynchron-Schleifringlaeufer
Cmd_)ASMS_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_material8
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_material8
:C )/GO
:A Materialdefinition Asynchron-Schleifringlaeufer
:H Hlp_material
:D Materialdefinition Asynchron-Schleifringlaeufer
:K #(ASMS+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Asynchronschleifringlaeufer
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit aussen [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit innen [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fila
Fld_2
 Prm_Fuellfaktor aussen
 Typ_Real
 Def_*PAR(fila)
Cmd_)*SET,fili
Fld_2
 Prm_Fuellfaktor innen
 Typ_Real
 Def_*PAR(fili)
Cmd_)ASMS_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statornut8
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statornut8
:C )/GO
:A Generierung Statornut Asynchron-Schleifringlaeufer
:H Hlp_statornut
:D Generierung Statornut Asynchron-Schleifringlaeufer
:K #(ASMS+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornut Asynchron-Schleifringlaeufer
Cmd_)ASMS_SNut.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotornut8
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotornut8
:C )/GO
:A Generierung Rotornut Asynchron-Schleifringlaeufer
:H Hlp_rotornut
:D Generierung Rotornut Asynchron-Schleifringlaeufer
:K #(ASMS+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornut
Cmd_)ASMS_RNut.txt
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorarea8
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorarea8
:C )/GO
:A Flaechen Statornut Asynchron-Schleifringlaeufer
:H Hlp_statornut
:D Flaechen Statornut Asynchron-Schleifringlaeufer
:K #(ASMS+GEO2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Flaechen Statornut
Cmd_)ASMS_SArea.txt
Cmd_)KEYW,GEO3,1
Cmd_)KEYW,GEO2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorarea8
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorarea8
:C )/GO
:A Flaechen Rotornut Asynchron-Schleifringlaeufer
:H Hlp_rotornut
:D Flaechen Rotornut Asynchron-Schleifringlaeufer
:K #(ASMS+GEO3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Flaechen Rotornut
Cmd_)ASMS_RArea.txt
Cmd_)KEYW,GEO,1
Cmd_)KEYW,GEO3,0
Cal_REFRESH
:E END
:!!
:N Fnc_netASMS1e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netASMS1e
:C )/GO
:A Netzgenerierung Statornut Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Netzgenerierung Statornut Asynchron-Schleifringlaeufer
:K #(ASMS+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Statornut
Cmd_)ASMS_Snete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netASMS2e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netASMS2e
:C )/GO
:A Netzgenerierung Rotornut Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Netzgenerierung Rotornut Asynchron-Schleifringlaeufer
:K #(ASMS+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotornut
Cmd_)ASMS_Rnete.txt
Cmd_)KEYW,NETZ3,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netASMSg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netASMSg
:C )/GO
:A Netzgenerierung Maschine Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Netzgenerierung Maschine Asynchron-Schleifringlaeufer
:K #(ASMS+NETZ3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)ASMS_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ3,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpASMS1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpASMS1
:C )/GO
:A Kopplungen Stator Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Kopplungen Stator Asynchron-Schleifringlaeufer
:K #(ASMS+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)ASMS_cp1.txt
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpASMS2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpASMS2
:C )/GO
:A Kopplungen Rotor Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Kopplungen Rotor Asynchron-Schleifringlaeufer
:K #(ASMS+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)ASMS_cp2.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltASMS1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltASMS1
:C )/GO
:A Verschaltung Stator Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Verschaltung Stator Asynchron-Schleifringlaeufer
:K #(ASMS+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)ASMS_schalt1.txt
Cmd_)KEYW,SCHALT2,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltASMS2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltASMS2
:C )/GO
:A Verschaltung Rotor Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Verschaltung Rotor Asynchron-Schleifringlaeufer
:K #(ASMS+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)ASMS_schalt2.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT3,0
Cal_REFRESH
:E END
:!!
:N Fnc_interface8
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interface8
:C )/GO
:A Interface Stator/Rotor Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Interface Stator/Rotor Asynchron-Schleifringlaeufer
:K #(ASMS+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)ASMS_interface.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT,0
Cal_REFRESH
:E END
:!!
:N Men_Loes8
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loes8 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Asynchron-Schleifringlaeufer
:D Loesung Asynchron-Schleifringlaeufer
:K #(ASMS+INTERF)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Asynchron-Schleifringlaeufer-
Fnc_ausASMS
-Statische Rechnung Asynchron-Schleifringlaeufer-
Fnc_loes1ASMS
Fnc_loes2ASMS
-Harmonische Rechnung Asynchron-Schleifringlaeufer-
Fnc_loes3ASMS
Fnc_loes4ASMS
-Transiente Rechnung Asynchron-Schleifringlaeufer-
Fnc_loes5ASMS
Fnc_loes9ASMS
Fnc_loes10ASMS
Fnc_loes6ASMS
Fnc_loes7ASMS
:E END
:!!
:N Fnc_ausASMS
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausASMS
:C )/GO
:A Ausgabedefinition Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Ausgabedefinition Asynchron-Schleifringlaeufer
:K #(ASMS+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Asynchron-Schleifringlaeufer
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)ASMS_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1ASMS
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1ASMS
:C )/GO
:A Einzelschrittrechnung Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Einzelschrittrechnung Asynchron-Schleifringlaeufer
:K #(ASMS+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,winkel
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkel)
Cmd_)*SET,zeit
Fld_2
 Prm_Zeit    [s]
 Typ_Real
DEF_*PAR(zeit)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Laeuferstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,phase2
Fld_2
 Prm_Phase_2 [Grad]
 Typ_Real
DEF_*PAR(phase2)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMS_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2ASMS
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2ASMS
:C )/GO
:A Statische Mehrschrittrechnung Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Statische Mehrschrittrechnung Asynchron-Schleifringlaeufer
:K #(ASMS+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung ohne Erregung mit U2
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitanfang in Grad
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,i2
Fld_2
 Prm_Laeuferstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMS_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3ASMS
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3ASMS
:C )/GO
:A Mehrschrittrechnung Kurzschluss Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Mehrschrittrechnung Kurzschluss Asynchron-Schleifringlaeufer
:K #(ASMS+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Mehrschrittrechnung Stillstand
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitanfang in s
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderstrangspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMS_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4ASMS
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4ASMS
:C )/GO
:A Mehrschrittrechnung Vorwiderstand Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Mehrschrittrechnung Vorwiderstand Asynchron-Schleifringlaeufer
:K #(ASMS+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Mehrschrittrechnung mit Rotorvorwiderstand
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitanfang in s
 Typ_Real
DEF_*PAR(zeita)
Cmd_)*SET,u1
Fld_2
 Prm_Staendererspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rvor2r
Fld_2
 Prm_Laeufervorwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rvor2r)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMS_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5ASMS
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5ASMS
:C )/GO
:A Hochlauf Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Hochlauf Asynchron-Schleifringlaeufer
:K #(ASMS+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rvor2r
Fld_2
 Prm_Laeufervorwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rvor2r)
Cmd_)*SET,mtstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMS_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6ASMS
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6ASMS
:C )/GO
:A U/f-Hochlauf Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D U/f-Hochlauf Asynchron-Schleifringlaeufer
:K #(ASMS+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung U/f-Kennlinie
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,um
Fld_2
 Prm_Magnetisierungsspannung [V]
 Typ_Real
DEF_*PAR(um)
Cmd_)*SET,rtime
Fld_2
 Prm_Rampenzeit [s]
 Typ_Real
DEF_*PAR(rtime)
Cmd_)*SET,rvor2r
Fld_2
 Prm_Laeufervorwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rvor2r)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,mtstep
Fld_2
 Prm_Maximaler Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,enddreh
Fld_2
 Prm_Enddrehzahl
 Typ_Real
DEF_*PAR(enddreh)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMS_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7ASMS
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6ASMS
:C )/GO
:A Betrieb, feste Drehzahl Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Betrieb, feste Drehzahl Asynchron-Schleifringlaeufer
:K #(ASMS+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Betrieb bei fester Drehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u1
Fld_2
 Prm_Staendererspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMS_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes9ASMS
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes9ASMS
:C )/GO
:A Stufiger Hochlauf Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Stufiger Hochlauf Asynchron-Schleifringlaeufer
:K #(ASMS+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rvor2r
Fld_2
 Prm_Laeufervorwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rvor2r)
Cmd_)*SET,ninit
Fld_2
 Prm_Anzahl Initialisierungsschritte
 Typ_Real
DEF_*PAR(ninit)
Cmd_)*SET,ndrehs
Fld_2
 Prm_Anzahl Drehzahlstufen
 Typ_Real
DEF_*PAR(ndrehs)
Cmd_)*SET,drehschritt
Fld_2
 Prm_Drehzahlschritt je Stufe
 Typ_Real
DEF_*PAR(drehschritt)
Cmd_)*SET,ndschritt
Fld_2
 Prm_Rechenschritte je Stufe
 Typ_Real
DEF_*PAR(ndschritt)
Cmd_)*SET,mtstep
Fld_2
 Prm_Maximaler Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMS_loes9.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes10ASMS
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes10ASMS
:C )/GO
:A Stufige Last Asynchron-Schleifringlaeufer
:H Hlp_elemente
:D Stufige Last Asynchron-Schleifringlaeufer
:K #(ASMS+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rvor2r
Fld_2
 Prm_Laeufervorwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rvor2r)
Cmd_)*SET,ninit
Fld_2
 Prm_Anzahl Initialisierungsschritte
 Typ_Real
DEF_*PAR(ninit)
Cmd_)*SET,ndrehs
Fld_2
 Prm_Anzahl Laststufen
 Typ_Real
DEF_*PAR(ndrehs)
Cmd_)*SET,lastschritt
Fld_2
 Prm_Lastschritt je Stufe
 Typ_Real
DEF_*PAR(lastschritt)
Cmd_)*SET,ndschritt
Fld_2
 Prm_Rechenschritte je Stufe
 Typ_Real
DEF_*PAR(ndschritt)
Cmd_)*SET,mtstep
Fld_2
 Prm_Maximaler Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)ASMS_loes10.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_GSM3
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_GSM3 17.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM GSM3 (GSM mit Magneten)
:D EM-Praktikum Gleichstrommaschine GSM3 (GSM mit Magneten)
Men_Vor9
Sep_
Men_Gene9
Sep_
Men_Aend9
Sep_
Men_Loes9
Sep_
Men_Ausw9
:E END
:!!
:N Men_Vor9
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor9 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung (GSM mit Magneten)
:D EM-Praktikum Voreinstellung (GSM mit Magneten)
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen (GSM mit Magneten)-
Fnc_Vor91
Fnc_Vor92
Fnc_Vor93b
Fnc_Vor93e
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor91
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor91 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten (GSM mit Magneten)
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Statordaten (GSM mit Magneten)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,raussen
Fld_2
 Prm_Aussenradius     [m]
 Typ_Real
DEF_*PAR(raussen)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Statorblechstaerke [m]
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,magnetdicke
Fld_2
 Prm_Magnetstaerke [m]
 Typ_Real
DEF_*PAR(magnetdicke)
Cmd_)*SET,polbedeckung
Fld_2
 Prm_Polbedeckungsfaktor
 Typ_Real
DEF_*PAR(polbedeckung)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)*SET,delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Fld_0
 Typ_Sep
Cmd_)*SET,wende
Fld_2
 Prm_mit Wendepolwicklung 
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(wende)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,GSM3,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor92
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor92 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten (GSM mit Magneten)
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Rotordaten (GSM mit Magneten)
:K #(GSM3+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rinnen
Fld_2
 Prm_Innenradius (rir)     [m]
 Typ_Real
DEF_*PAR(rinnen)
Cmd_)*SET,z2
Fld_2
 Prm_Rotorspulenzahl 
 Typ_Real
DEF_*PAR(z2)
Cmd_)*SET,zweischicht2,1
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor93b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor23b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotornut (GSM mit Magneten)
:H Hlp_EMD_VOREIN9b
:D EM-Praktikum Rotornut (GSM mit Magneten)
:K #(GSM3+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite2
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite2)
Cmd_)*SET,wickhoehe2
Fld_2
 Prm_wicklungshoehe2 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe2)
Cmd_)*SET,wickisol2
Fld_2
 Prm_Isolationsstaerke   [m]
 Typ_Real
DEF_*PAR(wickisol2)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin2
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin2)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor93e
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor93e 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Wendepol-Wick. (GSM mit Magneten)
:H Hlp_EMD_VOREIN9d
:D EM-Praktikum Wendepol-Wick. (GSM mit Magneten)
:K #(GSM3+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Wendepolwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wendebreite
Fld_2
 Prm_Wendepolbreite [m]
 Typ_Real
DEF_*PAR(wendebreite)
Cmd_)*SET,wendedel
Fld_2
 Prm_Wendepolluftspalt  [m]
 Typ_Real
DEF_*PAR(wendedel)
Cmd_)*SET,wickbreitewen
Fld_2
 Prm_Wendepolwicklungsbreite [m]
 Typ_Real
DEF_*PAR(wickbreitewen)
Cmd_)*SET,wickhoehewen
Fld_2
 Prm_Wendepolwicklungshoehe [m]
 Typ_Real
DEF_*PAR(wickhoehewen)
Cmd_)*SET,nwinwen
Fld_2
 Prm_Windungszahl Wendepol-Wick.
 Typ_Real
DEF_*PAR(nwinwen)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vor94
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor94 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter (GSM mit Magneten)
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter (GSM mit Magneten)
:K #(GSM3+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor95
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor95 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator (GSM mit Magneten)
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator (GSM mit Magneten)
:K #(GSM3+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Cmd_)*SET,rwickstirnwe
Fld_2
 Prm_Stirnwiderstand Wendepolwick.[Ohm]
 Typ_Real
DEF_*PAR(rwickstirnwe)
Cmd_)*SET,lwickstirnwe
Fld_2
 Prm_Stirninduktivitaet Wendepolwick.[H]
 Typ_Real
DEF_*PAR(lwickstirnwe)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor95b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor95b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Rotor (GSM mit Magneten)
:H Hlp_EMD_VOREIN5b
:D EM-Praktikum Schaltungsparameter Rotor (GSM mit Magneten)
:K #(GSM3+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Rotors
Cmd_)*SET,spulw2
Fld_2
 Prm_Spulenweite
 Typ_Real
DEF_*PAR(spulw2)
Cmd_)*SET,buebr2
Fld_2
 Prm_Buerstenbreite  [Grad]
 Typ_Real
DEF_*PAR(buebr2)
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn2
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2)
Cmd_)*SET,lwickstirn2
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn2)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung   [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,rvor2
Fld_2
 Prm_Ankervorwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rvor2)
Cmd_)KEYW,SCHALT3,1
Cmd_)KEYW,SCHALT2,0
CAL_REFRESH
:E END
:!!
:N Men_Gene9
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene9 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung (GSM mit Magneten)
:D EM-Praktikum Generierung (GSM mit Magneten)
:K #(GSM3+DATEN)
Fnc_EMM_HIN
Sep_
-Definition (GSM mit Magneten)-
Fnc_elemente9
Fnc_material9
-Geometriegenerierung (GSM mit Magneten)-
Fnc_stator9
Fnc_rotornut9
Fnc_statorarea9
Fnc_rotorarea9
-Vernetzung (GSM mit Magneten)-
Fnc_Vor94
Fnc_netGSM31e
Fnc_netGSM32e
Fnc_netGSM3g
-Kopplungen (GSM mit Magneten)-
Fnc_cpGSM31
Fnc_cpGSM32
-Verschaltung (GSM mit Magneten)-
Fnc_Vor95
Fnc_schaltGSM31
Fnc_Vor95b
Fnc_schaltGSM32
-Interface (GSM mit Magneten)-
Fnc_interface9
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente9
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente9
:C )/GO
:A Elementdefinition (GSM mit Magneten)
:H Hlp_elemente
:D Elementdefinition (GSM mit Magneten)
:K #(GSM3+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition (GSM mit Magneten)
Cmd_)GSM3_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_material9
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_material9
:C )/GO
:A Materialdefinition (GSM mit Magneten)
:H Hlp_material
:D Materialdefinition (GSM mit Magneten)
:K #(GSM3+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Gleichstrommaschine 3
 Prm_Daten fuer Permanentmagnete [SI - Einheit]:
Cmd_)*SET,rperm
Fld_2
 Prm_Relative Permaebilitaet
 Typ_Real
DEF_*PAR(rperm)
Cmd_)*SET,koerz
Fld_2
 Prm_Koerzitivkraft [A/m]
 Typ_Real
DEF_*PAR(koerz)
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit innen [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fili
Fld_2
 Prm_Fuellfaktor innen
 Typ_Real
 Def_*PAR(fili)
Cmd_)GSM3_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_stator9
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_stator9
:C )/GO
:A Generierung Statormagnet (GSM mit Magneten)
:H Hlp_statornut
:D Generierung Statormagnet (GSM mit Magneten)
:K #(GSM3+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statormagnet (GSM mit Magneten)
Cmd_)GSM3_SMag.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotornut9
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotornut9
:C )/GO
:A Generierung Rotornut (GSM mit Magneten)
:H Hlp_rotornut
:D Generierung Rotornut (GSM mit Magneten)
:K #(GSM3+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornut (GSM mit Magneten)
Cmd_)GSM3_RNut.txt
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorarea9
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorarea9
:C )/GO
:A Flaechen Stator (GSM mit Magneten)
:H Hlp_statornut
:D Flaechen Stator (GSM mit Magneten)
:K #(GSM3+GEO2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Flaechen Stator
Cmd_)GSM3_SArea.txt
Cmd_)KEYW,GEO3,1
Cmd_)KEYW,GEO2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorarea9
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorarea9
:C )/GO
:A Flaechen Rotornut (GSM mit Magneten)
:H Hlp_rotornut
:D Flaechen Rotornut (GSM mit Magneten)
:K #(GSM3+GEO3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Flaechen Rotornut
Cmd_)GSM3_RArea.txt
Cmd_)KEYW,GEO,1
Cmd_)KEYW,GEO3,0
Cal_REFRESH
:E END
:!!
:N Fnc_netGSM31e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netGSM31e
:C )/GO
:A Netzgenerierung Stator (GSM mit Magneten)
:H Hlp_elemente
:D Netzgenerierung Stator (GSM mit Magneten)
:K #(GSM3+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)GSM3_Snete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netGSM32e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netGSM32e
:C )/GO
:A Netzgenerierung Rotor (GSM mit Magneten)
:H Hlp_elemente
:D Netzgenerierung Rotor (GSM mit Magneten)
:K #(GSM3+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)GSM3_Rnete.txt
Cmd_)KEYW,NETZ3,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netGSM3g
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netGSM3g
:C )/GO
:A Netzgenerierung Maschine (GSM mit Magneten)
:H Hlp_elemente
:D Netzgenerierung Maschine (GSM mit Magneten)
:K #(GSM3+NETZ3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)GSM3_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ3,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpGSM31
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpGSM31
:C )/GO
:A Kopplungen Stator (GSM mit Magneten)
:H Hlp_elemente
:D Kopplungen Stator (GSM mit Magneten)
:K #(GSM3+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)GSM3_cp1.txt
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpGSM32
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpGSM32
:C )/GO
:A Kopplungen Rotor (GSM mit Magneten)
:H Hlp_elemente
:D Kopplungen Rotor (GSM mit Magneten)
:K #(GSM3+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)GSM3_cp2.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltGSM31
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltGSM31
:C )/GO
:A Verschaltung Stator (GSM mit Magneten)
:H Hlp_elemente
:D Verschaltung Stator (GSM mit Magneten)
:K #(GSM3+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)GSM3_schalt1.txt
Cmd_)KEYW,SCHALT2,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltGSM32
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltGSM32
:C )/GO
:A Verschaltung Rotor (GSM mit Magneten)
:H Hlp_elemente
:D Verschaltung Rotor (GSM mit Magneten)
:K #(GSM3+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)GSM3_schalt2.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT3,0
Cal_REFRESH
:E END
:!!
:N Fnc_interface9
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interface9
:C )/GO
:A Interface Stator/Rotor (GSM mit Magneten)
:H Hlp_elemente
:D Interface Stator/Rotor (GSM mit Magneten)
:K #(GSM3+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)GSM3_interface.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT,0
Cal_REFRESH
:E END
:!!
:N Men_Loes9
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loes9 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung (GSM mit Magneten)
:D Loesung (GSM mit Magneten)
:K #(GSM3+INTERF)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition (GSM mit Magneten)-
Fnc_ausGSM3
-Statische Rechnung (GSM mit Magneten)-
Fnc_loes1GSM3
Fnc_loes2GSM3
Fnc_loes3GSM3
Fnc_loes4GSM3
-Transiente Rechnung (GSM mit Magneten)-
Fnc_loes5GSM3
Fnc_loes6GSM3
Fnc_loes7GSM3
Fnc_loes8gsm3
:E END
:!!
:N Fnc_ausGSM3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausGSM3
:C )/GO
:A Ausgabedefinition (GSM mit Magneten)
:H Hlp_elemente
:D Ausgabedefinition (GSM mit Magneten)
:K #(GSM3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition (GSM mit Magneten)
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)GSM3_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1GSM3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1GSM3
:C )/GO
:A Einzelschritt (GSM mit Magneten)
:H Hlp_elemente
:D Einzelschritt (GSM mit Magneten)
:K #(GSM3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM3_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2GSM3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2GSM3
:C )/GO
:A Mehrschritt i2=0 (GSM mit Magneten)
:H Hlp_elemente
:D Mehrschrittrechnung mit i2=0 (GSM mit Magneten)
:K #(GSM3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung mit i2=0
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM3_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3GSM3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3GSM3
:C )/GO
:A Mehrschritt i2 (GSM mit Magneten)
:H Hlp_elemente
:D Mehrschritt i2 (GSM mit Magneten)
:K #(GSM3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung ohne Erregung mit i2
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM3_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4GSM3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4GSM3
:C )/GO
:A Mehrschritt Rueckwirkung (GSM mit Magneten)
:H Hlp_elemente
:D Mehrschritt Rueckwirkung (GSM mit Magneten)
:K #(GSM3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung mit Rueckwirkung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM3_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5GSM3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5GSM3
:C )/GO
:A Induzierte Spannung (GSM mit Magneten)
:H Hlp_elemente
:D Induzierte Spannung (GSM mit Magneten)
:K #(GSM3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Cmd_)*SET,jkommu
Fld_2
 Prm_Kommutierung (ja=1)
 Typ_Real
DEF_*PAR(jkommu)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM3_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6GSM3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6GSM3
:C )/GO
:A Klemmenkurzschluss (GSM mit Magneten)
:H Hlp_elemente
:D Klemmenkurzschluss (GSM mit Magneten)
:K #(GSM3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung fr Klemmenkurzschluss
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM3_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7GSM3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7GSM3
:C )/GO
:A Betrieb, feste Drehzahl (GSM mit Magneten)
:H Hlp_elemente
:D Betrieb, feste Drehzahl (GSM mit Magneten)
:K #(GSM3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Betrieb bei fester Drehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM3_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8gsm3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8gsm3
:C )/GO
:A Hochlauf (GSM mit Magneten)
:H Hlp_elemente
:D Hochlauf (GSM mit Magneten)
:K #(GSM3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Hochlauf ab Startdrehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,mtstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)gsm3_loes8.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_GSM4
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_GSM4 22.12.09
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM GSM4 (GSM mit Magnet und Anker)
:D EM-Praktikum Gleichstrommaschine GSM4 (GSM mit Magnet und Anker)
Men_Vorg49
Sep_
Men_Geneg49
Sep_
Men_Aendg49
Sep_
Men_Loesg49
Sep_
Men_Auswg49
:E END
:!!
:N Men_Vorg49
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vorg49 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung GSM 4 (GSM mit Magnet und Anker)
:D EM-Praktikum GSM 4 (GSM mit Magnet und Anker)
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen GSM 4 (GSM mit Magnet und Anker)-
Fnc_Vorg491
Fnc_Vorg492
Fnc_Vorg493b
Fnc_Vorg493e
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vorg491
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg491 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten GSM 4 (GSM mit Magnet und Anker)
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Statordaten GSM 4 (GSM mit Magnet und Anker)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,raussen
Fld_2
 Prm_Aussenradius     [m]
 Typ_Real
DEF_*PAR(raussen)
Cmd_)*SET,jochdicke
Fld_2
 Prm_Statorblechstaerke [m]
 Typ_Real
DEF_*PAR(jochdicke)
Cmd_)*SET,magnetdicke
Fld_2
 Prm_Magnetstaerke [m]
 Typ_Real
DEF_*PAR(magnetdicke)
Cmd_)*SET,polbedeckung
Fld_2
 Prm_Polbedeckungsfaktor
 Typ_Real
DEF_*PAR(polbedeckung)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)*SET,delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Fld_0
 Typ_Sep
Cmd_)*SET,wende
Fld_2
 Prm_mit Wendepolwicklung 
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(wende)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,GSM4,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg492
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg492 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten (GSM mit Magnet und Anker)
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Rotordaten (GSM mit Magnet und Anker)
:K #(GSM4+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rinnen
Fld_2
 Prm_Innenradius (rir)     [m]
 Typ_Real
DEF_*PAR(rinnen)
Fld_0
  Typ_Sep
Cmd_)*SET,polschbreite
Fld_2
 Prm_Polschuhbreite 
 Typ_Real
DEF_*PAR(polschbreite)
Cmd_)*SET,polschhoehe
Fld_2
 Prm_Polschuhhoehe 
 Typ_Real
DEF_*PAR(polschhoehe)
Cmd_)*SET,polbreite
Fld_2
 Prm_Polbreite 
 Typ_Real
DEF_*PAR(polbreite)
Cmd_)*SET,joch2
Fld_2
 Prm_Jochstaerke Rotor [m] 
 Typ_Real
DEF_*PAR(joch2)
Cmd_)*SET,deltaer
Fld_2
 Prm_Luftspalterweiterung bei Winkel halber Pol  [m]
 Typ_Real
DEF_*PAR(deltaer)
Cmd_)*SET,z2
Fld_2
 Prm_Rotorteilezahl 
 Typ_Real
DEF_*PAR(z2)
Cmd_)*SET,zweischicht2,1
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg493b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor493b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotorpol (GSM mit Magnet und Anker)
:H Hlp_EMD_VOREIN9b
:D EM-Praktikum Rotorpol (GSM mit Magnet und Anker)
:K #(GSM4+VOREIN3)
Inp_NoApply
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorpolschuh
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite2
Fld_2
 Prm_Wicklungsbreite (wb)   [m]
 Typ_Real
DEF_*PAR(wickbreite2)
Cmd_)*SET,wickhoehe2
Fld_2
 Prm_wicklungshoehe2 (wh)   [m]
 Typ_Real
DEF_*PAR(wickhoehe2)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin2
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin2)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg493e
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg493e 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Wendepol-Wick. (GSM mit Magnet und Anker)
:H Hlp_EMD_VOREIN9d
:D EM-Praktikum Wendepol-Wick. (GSM mit Magnet und Anker)
:K #(GSM4+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Wendepolwicklungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,wendebreite
Fld_2
 Prm_Wendepolbreite [m]
 Typ_Real
DEF_*PAR(wendebreite)
Cmd_)*SET,wendedel
Fld_2
 Prm_Wendepolluftspalt  [m]
 Typ_Real
DEF_*PAR(wendedel)
Cmd_)*SET,wickbreitewen
Fld_2
 Prm_Wendepolwicklungsbreite [m]
 Typ_Real
DEF_*PAR(wickbreitewen)
Cmd_)*SET,wickhoehewen
Fld_2
 Prm_Wendepolwicklungshoehe [m]
 Typ_Real
DEF_*PAR(wickhoehewen)
Cmd_)*SET,nwinwen
Fld_2
 Prm_Windungszahl Wendepol-Wick.
 Typ_Real
DEF_*PAR(nwinwen)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg494
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg494 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter (GSM mit Magnet und Anker)
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter (GSM mit Magnet und Anker)
:K #(GSM4+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg495
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg495 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator (GSM mit Magnet und Anker)
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator (GSM mit Magnet und Anker)
:K #(GSM4+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Cmd_)*SET,rwickstirnwe
Fld_2
 Prm_Stirnwiderstand Wendepolwick.[Ohm]
 Typ_Real
DEF_*PAR(rwickstirnwe)
Cmd_)*SET,lwickstirnwe
Fld_2
 Prm_Stirninduktivitaet Wendepolwick.[H]
 Typ_Real
DEF_*PAR(lwickstirnwe)
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg495b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg495b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Rotor (GSM mit Magnet und Anker)
:H Hlp_EMD_VOREIN5b
:D EM-Praktikum Schaltungsparameter Rotor (GSM mit Magnet und Anker)
:K #(GSM4+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Rotors
Cmd_)*SET,spulw2
Fld_2
 Prm_Spulenweite
 Typ_Real
DEF_*PAR(spulw2)
Cmd_)*SET,buebr2
Fld_2
 Prm_Buerstenbreite  [Grad]
 Typ_Real
DEF_*PAR(buebr2)
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn2
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn2)
Cmd_)*SET,lwickstirn2
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn2)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung   [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,rvor2
Fld_2
 Prm_Ankervorwiderstand [Ohm]
 Typ_Real
DEF_*PAR(rvor2)
Cmd_)KEYW,SCHALT3,1
Cmd_)KEYW,SCHALT2,0
CAL_REFRESH
:E END
:!!
:N Men_Geneg49
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Geneg49 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung (GSM mit Magnet und Anker)
:D EM-Praktikum Generierung (GSM mit Magnet und Anker)
:K #(GSM4+DATEN)
Fnc_EMM_HIN
Sep_
-Definition (GSM mit Magnet und Anker)-
Fnc_elementeg49
Fnc_materialg49
-Geometriegenerierung (GSM mit Magnet und Anker)-
Fnc_statorg49
Fnc_rotorpolg49
Fnc_statorareag49
Fnc_rotorareag49
-Vernetzung (GSM mit Magnet und Anker)-
Fnc_Vorg494
Fnc_netGSM41e
Fnc_netGSM42e
Fnc_netGSM4g
-Kopplungen (GSM mit Magnet und Anker)-
Fnc_cpGSM41
Fnc_cpGSM42
-Verschaltung (GSM mit Magnet und Anker)-
Fnc_Vorg495
Fnc_schaltGSM41
Fnc_Vorg495b
Fnc_schaltGSM42
-Interface (GSM mit Magnet und Anker)-
Fnc_interfaceg49
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeg49
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeg49
:C )/GO
:A Elementdefinition (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Elementdefinition (GSM mit Magnet und Anker)
:K #(GSM4+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition (GSM mit Magnet und Anker)
Cmd_)GSM4_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialg49
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialg49
:C )/GO
:A Materialdefinition (GSM mit Magnet und Anker)
:H Hlp_material
:D Materialdefinition (GSM mit Magnet und Anker)
:K #(GSM4+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition (GSM mit Magnet und Anker)
 Prm_Daten fuer Permanentmagnete [SI - Einheit]:
Cmd_)*SET,rperm
Fld_2
 Prm_Relative Permaebilitaet
 Typ_Real
DEF_*PAR(rperm)
Cmd_)*SET,koerz
Fld_2
 Prm_Koerzitivkraft [A/m]
 Typ_Real
DEF_*PAR(koerz)
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit innen [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)*SET,fili
Fld_2
 Prm_Fuellfaktor innen
 Typ_Real
 Def_*PAR(fili)
Cmd_)GSM4_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorg49
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorg49
:C )/GO
:A Generierung Statormagnet (GSM mit Magnet und Anker)
:H Hlp_statornut
:D Generierung Statormagnet (GSM mit Magnet und Anker)
:K #(GSM4+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statormagnet GSM4
Cmd_)GSM4_SMag.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorpolg49
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotornutg49
:C )/GO
:A Generierung Rotorpol (GSM mit Magnet und Anker)
:H Hlp_rotornut
:D Generierung Rotorpol (GSM mit Magnet und Anker)
:K #(GSM4+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotorpol
Cmd_)GSM4_RPol.txt
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorareag49
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorareag49
:C )/GO
:A Flaechen Stator (GSM mit Magnet und Anker)
:H Hlp_statornut
:D Flaechen Stator (GSM mit Magnet und Anker)
:K #(GSM4+GEO2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Flaechen Stator
Cmd_)GSM4_SArea.txt
Cmd_)KEYW,GEO3,1
Cmd_)KEYW,GEO2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorareag49
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorareag49
:C )/GO
:A Flaechen Rotornut (GSM mit Magnet und Anker)
:H Hlp_rotornut
:D Flaechen Rotornut (GSM mit Magnet und Anker)
:K #(GSM4+GEO3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Flaechen Rotornut
Cmd_)GSM4_RArea.txt
Cmd_)KEYW,GEO,1
Cmd_)KEYW,GEO3,0
Cal_REFRESH
:E END
:!!
:N Fnc_netGSM41e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netGSM41e
:C )/GO
:A Netzgenerierung Stator (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Netzgenerierung Stator (GSM mit Magnet und Anker)
:K #(GSM4+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)GSM4_Snete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netGSM42e
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netGSM42e
:C )/GO
:A Netzgenerierung Rotor (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Netzgenerierung Rotor (GSM mit Magnet und Anker)
:K #(GSM4+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)GSM4_Rnete.txt
Cmd_)KEYW,NETZ3,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netGSM4g
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netGSM4g
:C )/GO
:A Netzgenerierung Maschine (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Netzgenerierung Maschine (GSM mit Magnet und Anker)
:K #(GSM4+NETZ3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)GSM4_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ3,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpGSM41
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpGSM41
:C )/GO
:A Kopplungen Stator (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Kopplungen Stator (GSM mit Magnet und Anker)
:K #(GSM4+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)GSM4_cp1.txt
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpGSM42
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpGSM42
:C )/GO
:A Kopplungen Rotor (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Kopplungen Rotor (GSM mit Magnet und Anker)
:K #(GSM4+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)GSM4_cp2.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltGSM41
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltGSM41
:C )/GO
:A Verschaltung Stator (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Verschaltung Stator (GSM mit Magnet und Anker)
:K #(GSM4+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)GSM4_schalt1.txt
Cmd_)KEYW,SCHALT2,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltGSM42
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltGSM42
:C )/GO
:A Verschaltung Rotor (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Verschaltung Rotor (GSM mit Magnet und Anker)
:K #(GSM4+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)GSM4_schalt2.txt
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT3,0
Cal_REFRESH
:E END
:!!
:N Fnc_interfaceg49
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interfaceg49
:C )/GO
:A Interface Stator/Rotor (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Interface Stator/Rotor (GSM mit Magnet und Anker)
:K #(GSM4+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)GSM4_interface.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT,0
Cal_REFRESH
:E END
:!!
:N Men_Loesg49
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loesg49 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung
:D Loesung
:K #(GSM4+INTERF)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition (GSM mit Magnet und Anker)-
Fnc_ausGSM4
-Statische Rechnung (GSM mit Magnet und Anker)-
Fnc_loes1GSM4
Fnc_loes2GSM4
Fnc_loes3GSM4
Fnc_loes4GSM4
-Transiente Rechnung (GSM mit Magnet und Anker)-
Fnc_loes5GSM4
Fnc_loes6GSM4
Fnc_loes7GSM4
Fnc_loes8GSM4
:E END
:!!
:N Fnc_ausGSM4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausGSM4
:C )/GO
:A Ausgabedefinition (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Ausgabedefinition (GSM mit Magnet und Anker)
:K #(GSM4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition (GSM mit Magnet und Anker)
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)GSM4_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1GSM4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1GSM4
:C )/GO
:A Einzelschritt (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Einzelschritt (GSM mit Magnet und Anker)
:K #(GSM4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM4_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2GSM4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2GSM4
:C )/GO
:A Mehrschritt i2=0 (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Mehrschrittrechnung mit i2=0 (GSM mit Magnet und Anker)
:K #(GSM4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung mit i2=0
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM4_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3GSM4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3GSM4
:C )/GO
:A Mehrschritt i2 (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Mehrschritt i2 (GSM mit Magnet und Anker)
:K #(GSM4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung ohne Erregung mit i2
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM4_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4GSM4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4GSM4
:C )/GO
:A Mehrschritt Rueckwirkung (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Mehrschritt Rueckwirkung (GSM mit Magnet und Anker)
:K #(GSM4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung mit Rueckwirkung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,i2
Fld_2
 Prm_Ankerstrom [A]
 Typ_Real
DEF_*PAR(i2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM4_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5GSM4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5GSM4
:C )/GO
:A Induzierte Spannung (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Induzierte Spannung (GSM mit Magnet und Anker)
:K #(GSM4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Cmd_)*SET,jkommu
Fld_2
 Prm_Kommutierung (ja=1)
 Typ_Real
DEF_*PAR(jkommu)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM4_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6GSM4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6GSM4
:C )/GO
:A Klemmenurzschluss (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Klemmenkurzschluss (GSM mit Magnet und Anker)
:K #(GSM4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Rechnung fr Klemmenkurzschluss
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM4_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7GSM4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7GSM4
:C )/GO
:A Betrieb, feste Drehzahl (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Betrieb, feste Drehzahl (GSM mit Magnet und Anker)
:K #(GSM4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Betrieb bei fester Drehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Umdrehung
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Umdrehungen
 Typ_Real
DEF_*PAR(ndreh)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM4_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8GSM4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8GSM4
:C )/GO
:A Hochlauf (GSM mit Magnet und Anker)
:H Hlp_elemente
:D Hochlauf (GSM mit Magnet und Anker)
:K #(GSM4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Hochlauf ab Startdrehzahl
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,kommu
Fld_2
 Prm_Kommutierungswinkel [Grad]
 Typ_Real
DEF_*PAR(kommu)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u2
Fld_2
 Prm_Ankerspannung [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)*SET,mtstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(mtstep)
Cmd_)*SET,jrotor
Fld_2
 Prm_Traegheitsmoment Rotor
 Typ_Real
DEF_*PAR(jrotor)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)GSM4_loes8.txt
Cal_REFRESH
:E END
:!!
:N Men_VorMAX1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_VorMax1 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Maxwell'sche Theorie 1 (Streuung)
:D EM-Praktikum Maxwell'sche Theorie 1 (Streuung)
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Maxwell'sche Theorie 1 (Streuung)-
Fnc_VorMax1a
Fnc_VorMax1b
Fnc_VorMax1c
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_VorMax1a
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_VorMax1a 10.01.2010
:C )! Einstellungen Geometrie
:C )/GO
:A Geometrie Maxwell'sche Theorie 1 (Streuung)
:D EM-Praktikum Geometrie Maxwell'sche Theorie 1 (Streuung)
Inp_NoApply
Cmd_)/sys,d:\em-praktikum\Max1_geometrie.jpg &
Fld_0
 Typ_Lab
 Prm_Eingabe der Spulengeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,leiterabstand1
Fld_2
 Prm_Leiterabstand oben [m]
 Typ_Real
DEF_*PAR(leiterabstand1)
Fld_0
  Typ_Sep
Cmd_)*SET,leiterabstand2
Fld_2
 Prm_Leiterabstand unten [m]
 Typ_Real
DEF_*PAR(leiterabstand2)
Cmd_)*SET,leiterdurchmesser1
Fld_2
 Prm_Leiterdurchmesser oben [m]
 Typ_Real
DEF_*PAR(leiterdurchmesser1)
Cmd_)*SET,leiterdurchmesser2
Fld_2
 Prm_Leiterdurchmesser unten [m]
 Typ_Real
DEF_*PAR(leiterdurchmesser2)
Fld_0
  Typ_Sep
Cmd_)*SET,spulenabstand
Fld_2
 Prm_Spulenabstand [m]
 Typ_Real
DEF_*PAR(spulenabstand)
Fld_0
  Typ_Sep
Cmd_)*SET,tiefe
Fld_2
 Prm_Tiefe [m]
 Typ_Real
DEF_*PAR(tiefe)
Fld_0
  Typ_Sep
Cmd_)*SET,block_eisen
Fld_2
 Prm_Eisenblock vorhanden (ja=1)
 Typ_Real
DEF_*PAR(block_eisen)
Cmd_)*SET,eisenblockhoehe
Fld_2
 Prm_Eisenblockhoehe [m]
 Typ_Real
DEF_*PAR(eisenblockhoehe)
Cmd_)*SET,eisenblockdicke
Fld_2
 Prm_Eisenblockbreite [m]
 Typ_Real
DEF_*PAR(eisenblockdicke)
Fld_0
  Typ_Sep
Cmd_)*SET,aussen
Fld_2
 Prm_Aussenraum [m]
 Typ_Real
DEF_*PAR(aussen)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,MAX1,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_VorMax1b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_VorMax1b 10.01.2010
:C )! Einstellungen Netz
:C )/GO
:A Netzdaten Maxwell'sche Theorie 1 (Streuung)
:D EM-Praktikum Netzdaten  Maxwell'sche Theorie 1 (Streuung)
:K #(MAX1+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzdaten
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschengroesse Eisen [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshleiter
Fld_2
 Prm_Maschengroesse Leiter [m]
 Typ_Real
DEF_*PAR(meshleiter)
Cmd_)*SET,meshaussen
Fld_2
 Prm_Maschengroesse Aussenraum [m]
 Typ_Real
DEF_*PAR(meshaussen)
Cmd_)KEYW,VOREIN2,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,STV1,0
Cmd_)KEYW,MAX1,1
Cmd_)KEYW,MAX1,2
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_VorMax1c
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor11c 10.01.2010
:C )! Einstellungen Schaltung
:C )/GO
:A Schaltungsdaten Maxwell'sche Theorie 1 (Streuung)
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Schaltungsdaten Maxwell'sche Theorie 1 (Streuung)
:K #(MAX1+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,rstirn1
Fld_2
 Prm_R_stirn Spule oben [Ohm]
 Typ_Real
DEF_*PAR(rstirn1)
Cmd_)*SET,lstirn1
Fld_2
 Prm_L_stirn Spule oben [H]
 Typ_Real
DEF_*PAR(lstirn1)
Cmd_)*SET,u1
Fld_2
 Prm_Spannung Spule 1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,rstirn2
Fld_2
 Prm_R_stirn Spule unten [Ohm]
 Typ_Real
DEF_*PAR(rstirn2)
Cmd_)*SET,lstirn2
Fld_2
 Prm_L_stirn Spule unten [H]
 Typ_Real
DEF_*PAR(lstirn2)
Cmd_)*SET,u2
Fld_2
 Prm_Spannung Spule 2 [V]
 Typ_Real
DEF_*PAR(u2)
Cmd_)KEYW,VOREIN3,1
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,MAX1,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Men_GeneMAX1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_GeneMAX1 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Maxwell'sche Theorie 1 (Streuung)
:D EM-Praktikum Maxwell'sche Theorie 1 (Streuung)
:K #(MAX1+VOREIN3)
Fnc_EMM_HIN
Sep_
-Definition Maxwell'sche Theorie 1 (Streuung)-
Fnc_elementeMax1
Fnc_materialMax1
-Geometriegenerierung Maxwell'sche Theorie 1 (Streuung)-
Fnc_geometMax1
-Vernetzung Maxwell'sche Theorie 1 (Streuung)-
Fnc_netzMax1
-Kopplungen Maxwell'sche Theorie 1 (Streuung)-
Fnc_kopplungMax1
-Verschaltung Maxwell'sche Theorie 1 (Streuung)-
Fnc_schaltMax1
-Randbedingung Maxwell'sche Theorie 1 (Streuung)-
Fnc_randMax1
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeMax1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeMax1
:C )/GO
:A Elementdefinition Maxwell'sche Theorie 1 (Streuung)
:H Hlp_elemente
:D Elementdefinition Maxwell'sche Theorie 1 (Streuung)
:K #(MAX1+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Maxwell'sche Theorie 1 (Streuung)
Cmd_)MAX1_elemente.mac
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialMax1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialMax1
:C )/GO
:A Materialdefinition Maxwell'sche Theorie 1 (Streuung)
:H Hlp_material
:D Materialdefinition Maxwell'sche Theorie 1 (Streuung)
:K #(MAX1+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Maxwell'sche Theorie 1 (Streuung)
Fld_0
  Typ_Sep
Cmd_)*SET,leito
Fld_2
 Prm_Leitfaehigkeit oben [S/m]
 Typ_Real
 Def_*PAR(leito)
Fld_0
  Typ_Sep
Cmd_)*SET,leitu
Fld_2
 Prm_Leitfaehigkeit unten [S/m]
 Typ_Real
 Def_*PAR(leitu)
Fld_0
  Typ_Sep
Cmd_)*SET,murx
Fld_2
 Prm_muer Eisenklotz
 Typ_Real
 Def_*PAR(murx)
Cmd_)*SET,nichtlin
Fld_2
 Prm_(Nicht)lineares Eisen ?
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)MAX1_material.mac
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_geometMax1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_geometMax1
:C )/GO
:A Generierung Maxwell'sche Theorie 1 (Streuung)
:H Hlp_statornut
:D Generierung Maxwell'sche Theorie 1 (Streuung)
:K #(MAX1+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Maxwell'sche Theorie 1 (Streuung)
Cmd_)Max1_geometrie.mac
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netzMax1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netzMax1
:C )/GO
:A Netzgenerierung Maxwell'sche Theorie 1 (Streuung)
:H Hlp_elemente
:D Netzgenerierung Maxwell'sche Theorie 1 (Streuung)
:K #(MAX1+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maxwell'sche Theorie 1 (Streuung)
Cmd_)Max1_netz.mac
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_kopplungMax1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_kopplungMax1
:C )/GO
:A Kopplungen Maxwell'sche Theorie 1 (Streuung)
:H Hlp_elemente
:D Kopplungen Maxwell'sche Theorie 1 (Streuung)
:K #(Max1+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)Max1_kopplung.mac
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltMax1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltMax1
:C )/GO
:A Verschaltung Maxwell'sche Theorie 1 (Streuung)
:H Hlp_elemente
:D Verschaltung Max1 Maxwell'sche Theorie 1 (Streuung)
:K #(Max1+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Maxwell'sche Theorie 1
Cmd_)Max1_schaltung.mac
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_randMax1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_randMax1
:C )/GO
:A Randbedingungen Maxwell'sche Theorie 1 (Streuung)
:H Hlp_elemente
:D Randbedingungen Max1 Maxwell'sche Theorie 1 (Streuung)
:K #(Max1+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Randbedingung Maxwell'sche Theorie 1 (Streuung)
Cmd_)Max1_randbedingung.mac
Cmd_)KEYW,SCHALT1,0
Cmd_)KEYW,RAND,1
Cal_REFRESH
:E END
:!!
:N Men_LoesMAX1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_LoesMAX1 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Maxwell'sche Theorie 1 (Streuung)-
:D Loesung Maxwell'sche Theorie 1 (Streuung)-
:K #(MAX1+RAND)
Fnc_EMM_HIN
Sep_
- Ausgabedefinition Maxwell'sche Theorie 1 (Streuung)-
Fnc_ausMAX1
- Harmonische Rechnung Maxwell'sche Theorie 1 (Streuung)-
Fnc_rechMAX11
Fnc_auswMAX11
Fnc_rechMAX12
Fnc_auswMAX12
Fnc_rechMAX13
Fnc_auswMAX13
:E END
:!!
:N Fnc_ausMAX1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausMAX1
:C )/GO
:A Ausgabedefinition Maxwell'sche Theorie 1 (Streuung)
:H Hlp_elemente
:D Ausgabedefinition Maxwell'sche Theorie 1 (Streuung)
:K #(MAX1+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Maxwell'sche Theorie 1
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)MAX1_aus.mac
Cal_REFRESH
:E END
:!!
:N Fnc_rechMAX11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rechMax11
:C )/GO
:A Rechnung Maxwell'sche Theorie 1 (oben bestromt)
:D Rechnung Maxwell'sche Theorie 1 (oben bestromt)
:K #(Max1+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Rechnung Maxwell'sche Theorie 1 (oben bestromt)
Cmd_)Max1_loesung1.mac
Cal_REFRESH
:E END
:!!
:N Fnc_auswMAX11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_auswMax11
:C )/GO
:A Auswertung Maxwell'sche Theorie 1 (oben bestromt)
:D Auswerung Maxwell'sche Theorie 1 (oben bestromt)
:K #(Max1+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Auswertung Maxwell'sche Theorie 1 (oben bestromt)
Cmd_)Max1_auswertung1.mac
Cal_REFRESH
:E END
:!!
:N Fnc_rechMAX12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rechMax12
:C )/GO
:A Rechnung Maxwell'sche Theorie 1 (unten bestromt)
:D Rechnung Maxwell'sche Theorie 1 (unten bestromt)
:K #(Max1+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Rechnung Maxwell'sche Theorie 1 (unten bestromt)
Cmd_)Max1_loesung2.mac
Cal_REFRESH
:E END
:!!
:N Fnc_auswMAX12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_auswMax12
:C )/GO
:A Auswertung Maxwell'sche Theorie 1 (unten bestromt)
:D Auswerung Maxwell'sche Theorie 1 (unten bestromt)
:K #(Max1+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Auswertung Maxwell'sche Theorie 1 (unten bestromt)
Cmd_)Max1_auswertung2.mac
Cal_REFRESH
:E END
:!!
:N Fnc_rechMAX13
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rechMax13
:C )/GO
:A Rechnung Maxwell'sche Theorie 1 (Rueckwirkung)
:D Rechnung Maxwell'sche Theorie 1 (Rueckwirkung)
:K #(Max1+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Rechnung Maxwell'sche Theorie 1 (Rueckwirkung)
Cmd_)Max1_loesung3.mac
Cal_REFRESH
:E END
:!!
:N Fnc_auswMAX13
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_auswMax13
:C )/GO
:A Auswertung Maxwell'sche Theorie 1 (Rueckwirkung)
:D Auswerung Maxwell'sche Theorie 1 (Rueckwirkung)
:K #(Max1+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Auswertung Maxwell'sche Theorie 1 (Rueckwirkung)
Cmd_)Max1_auswertung3.mac
Cal_REFRESH
:E END
:!!
:N Men_VorMAX2
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_VorMax2 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:D EM-Praktikum Voreinstellung Maxwell'sche Theorie 2 (Magnetischer Kreis)
Fnc_EMM_HIN
Sep_
- Einlesen  Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_Rpar1
-Praeferenzen Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_VorMax2a
Fnc_VorMax2b
Fnc_VorMax2c
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_VorMax2a
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_VorMax2a 10.01.2010
:C )! Einstellungen Geometrie
:C )/GO
:A Geometrie Maxwell'sche Theorie 2 (Magnetischer Kreis)
:D EM-Praktikum Geometrie Maxwell'sche Theorie 2 (Magnetischer Kreis)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Geometrie
Fld_0
  Typ_Sep
Cmd_)*SET,breite
Fld_2
 Prm_Breite des Jochs [m]
 Typ_Real
DEF_*PAR(breite)
Cmd_)*SET,hoehe
Fld_2
 Prm_Hoehe Joch [m]
 Typ_Real
DEF_*PAR(hoehe)
Fld_0
  Typ_Sep
Cmd_)*SET,kerndickeoben
Fld_2
 Prm_Jochstaerke oben [m]
 Typ_Real
DEF_*PAR(kerndickeoben)
Cmd_)*SET,kerndickeunten
Fld_2
 Prm_Jochstaerke unten [m]
 Typ_Real
DEF_*PAR(kerndickeunten)
Cmd_)*SET,kerndickelinks
Fld_2
 Prm_Jochstaerke links [m]
 Typ_Real
DEF_*PAR(kerndickelinks)
Cmd_)*SET,kerndickerechts
Fld_2
 Prm_Jochstaerke rechts [m]
 Typ_Real
DEF_*PAR(kerndickerechts)
Fld_0
  Typ_Sep
Cmd_)*SET,luftspalt
Fld_2
 Prm_Luftspalt [m]
 Typ_Real
DEF_*PAR(luftspalt)
Cmd_)*SET,spalt
Fld_2
 Prm_Luftspalt vorhanden (ja=1)
 Typ_Real
DEF_*PAR(spalt)
Fld_0
  Typ_Sep
Cmd_)*SET,spulenhoehe
Fld_2
 Prm_Spulenhoehe [m]
 Typ_Real
DEF_*PAR(spulenhoehe)
Cmd_)*SET,spulendicke
Fld_2
 Prm_Spulenbreite [m]
 Typ_Real
DEF_*PAR(spulendicke)
Fld_0
  Typ_Sep
Cmd_)*SET,tiefe
Fld_2
 Prm_Tiefe [m]
 Typ_Real
DEF_*PAR(tiefe)
Fld_0
  Typ_Sep
Cmd_)*SET,nwin
Fld_2
 Prm_Windungszahl N
 Typ_Real
DEF_*PAR(nwin)
Cmd_)*SET,fuell
Fld_2
 Prm_Fuellfaktor
 Typ_Real
DEF_*PAR(fuell)
Fld_0
  Typ_Sep
Cmd_)*SET,aussen
Fld_2
 Prm_Aussenraum [m]
 Typ_Real
DEF_*PAR(aussen)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,MAX1,0
Cmd_)KEYW,MAX2,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_VorMax2b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_VorMax2b 10.01.2010
:C )! Einstellungen Netz
:C )/GO
:A Netzdaten Maxwell'sche Theorie 2 (Magnetischer Kreis)
:D EM-Praktikum Netzdaten Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(MAX2+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzdaten
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschengroesse Eisen [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschengroesse Luftspalt [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)*SET,meshaussen
Fld_2
 Prm_Maschengroesse Aussenraum [m]
 Typ_Real
DEF_*PAR(meshaussen)
Cmd_)KEYW,VOREIN2,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,STV1,0
Cmd_)KEYW,SCHEN,0
Cmd_)KEYW,MAX2,1
CAL_REFRESH
:E END
:!!
:N Fnc_VorMax2c
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_VorMax2c 10.01.2010
:C )! Einstellungen Schaltung
:C )/GO
:A Schaltungsdaten Maxwell'sche Theorie 2 (Magnetischer Kreis)
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Schaltungsdaten Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(MAX2+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,rstirn1
Fld_2
 Prm_R_stirn Spule [Ohm]
 Typ_Real
DEF_*PAR(rstirn1)
Cmd_)*SET,lstirn1
Fld_2
 Prm_L_stirn Spule [H]
 Typ_Real
DEF_*PAR(lstirn1)
Cmd_)*SET,uq1
Fld_2
 Prm_Spannung [V]
 Typ_Real
DEF_*PAR(uq1)
Cmd_)KEYW,VOREIN3,1
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,MAX1,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Men_GeneMAX2
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_GeneMAX2 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:D EM-Praktikum Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(MAX2+VOREIN3)
Fnc_EMM_HIN
Sep_
-Definition Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_elementeMax2
Fnc_materialMax2
-Geometriegenerierung Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_geometMax2
-Vernetzung Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_netzMax2
-Kopplungen Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_kopplungMax2
-Verschaltung Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_schaltMax2
-Randbedingung Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_randMax2
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeMax2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeMax2
:C )/GO
:A Elementdefinition Maxwell'sche Theorie 2 (Magnetischer Kreis)
:H Hlp_elemente
:D Elementdefinition Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(MAX2+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Maxwell'sche Theorie 2 (Magnetischer Kreis)
Cmd_)MAX2_elemente.mac
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialMax2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialMax2
:C )/GO
:A Materialdefinition Maxwell'sche Theorie 2 (Magnetischer Kreis)
:H Hlp_material
:D Materialdefinition Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(MAX2+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Maxwell'sche Theorie 2
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,murx
Fld_2
 Prm_muer Joch
 Typ_Real
 Def_*PAR(murx)
Cmd_)*SET,linear
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,1
 Lis_nichtlinear,0
 Def_*PAR(linear)
Cmd_)MAX2_material.mac
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_geometMax2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_geometMax2
:C )/GO
:A Generierung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:H Hlp_statornut
:D Generierung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(MAX2+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Maxwell'sche Theorie 2
Cmd_)MAX2_geometrie.mac
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netzMax2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netzMax2
:C )/GO
:A Netzgenerierung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:H Hlp_elemente
:D Netzgenerierung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(MAX2+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maxwell'sche Theorie 2
Cmd_)Max2_netz.mac
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_kopplungMax2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_kopplungMax2
:C )/GO
:A Kopplungen Maxwell'sche Theorie 2 (Magnetischer Kreis)
:H Hlp_elemente
:D Kopplungen Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(Max2+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)Max2_kopplung.mac
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltMax2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltMax2
:C )/GO
:A Verschaltung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:H Hlp_elemente
:D Verschaltung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(Max2+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Maxwell'sche Theorie 2
Cmd_)Max2_schaltung.mac
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_randMax2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_randMax2
:C )/GO
:A Randbedingungen Maxwell'sche Theorie 2 (Magnetischer Kreis)
:H Hlp_elemente
:D Randbedingungen Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(Max2+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Randbedingung Maxwell'sche Theorie 2
Cmd_)Max2_randbedingung.mac
Cmd_)KEYW,SCHALT1,0
Cmd_)KEYW,RAND,1
Cal_REFRESH
:E END
:!!
:N Men_LoesMAX2
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_LoesMAX2 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:D Loesung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(MAX2+RAND)
Fnc_EMM_HIN
Sep_
- Ausgabedefinition Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_ausMAX2
- Statische Rechnung Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_rechMAX21
Fnc_auswMAX21
- Harmonische Rechnung Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_rechMAX22
Fnc_auswMAX22
- Transiente Rechnung Maxwell'sche Theorie 2 (Magnetischer Kreis)-
Fnc_rechMAX23
:E END
:!!
:N Fnc_ausMAX2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausMAX1
:C )/GO
:A Ausgabedefinition Maxwell'sche Theorie 2 (Magnetischer Kreis)
:H Hlp_elemente
:D Ausgabedefinition Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(MAX2+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Maxwell'sche Theorie 2
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)MAX2_aus.mac
Cal_REFRESH
:E END
:!!
:N Fnc_rechMAX21
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rechMax21
:C )/GO
:A Rechnung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:D Rechnung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(Max2+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Rechnung Maxwell'sche Theorie 2
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Quellenspannung aendern ?
Fld_0
  Typ_Sep
Cmd_)*SET,uq1
Fld_2
 Prm_Quellenspannung [V]
 Typ_Real
 Def_*PAR(uq1)
Cmd_)Max2_rechnung_statisch.mac
Cal_REFRESH
:E END
:!!
:N Fnc_auswMAX21
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_auswMax21
:C )/GO
:A Auswertung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:D Auswerung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(Max2+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Auswertung Maxwell'sche Theorie 2
Cmd_)Max2_auswertung_statisch.mac
Cal_REFRESH
:E END
:!!
:N Fnc_rechMAX22
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rechMax22
:C )/GO
:A Rechnung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:D Rechnung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(Max2+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Rechnung Maxwell'sche Theorie 2
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Quellenspannung aendern ?
Fld_0
  Typ_Sep
Cmd_)*SET,uq1
Fld_2
 Prm_Quellenspannung (Amplitude!) [V]
 Typ_Real
 Def_*PAR(uq1)
Cmd_)*SET,freq
Fld_2
 Prm_Frequenz
 Typ_Real
 Def_*PAR(freq)
Cmd_)Max2_rechnung_harmonisch.mac
Cal_REFRESH
:E END
:!!
:N Fnc_auswMAX22
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_auswMax22
:C )/GO
:A Auswertung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:D Auswerung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(Max2+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Auswertung Maxwell'sche Theorie 2
Cmd_)Max2_auswertung_harmonisch.mac
Cal_REFRESH
:E END
:!!
:N Fnc_rechMAX23
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rechMax23
:C )/GO
:A Rechnung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:D Rechnung Maxwell'sche Theorie 2 (Magnetischer Kreis)
:K #(Max2+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Rechnung Maxwell'sche Theorie 2
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Quellenspannung aendern ?
Fld_0
  Typ_Sep
Cmd_)*SET,uq1
Fld_2
 Prm_Quellenspannung (Amplitude!) [V]
 Typ_Real
 Def_*PAR(uq1)
Fld_0
  Typ_Sep
Cmd_)*SET,steps
Fld_2
 Prm_Anzahl Zeitschritte gesamt
 Typ_Real
 Def_*PAR(steps)
Cmd_)*SET,freq
Fld_2
 Prm_Frequenz
 Typ_Real
 Def_*PAR(freq)
Cmd_)*SET,tsteps
Fld_2
 Prm_Anzahl Zeitschritte je Periode
 Typ_Real
 Def_*PAR(tsteps)
Cmd_)Max2_rech_ausw_transient.mac
Cal_REFRESH
:E END
:!!
:N Men_VorMAX3
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_VorMax3 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Maxwell'sche Theorie 3 (Lorentzkraft)
:D EM-Praktikum Maxwell'sche Theorie 3 (Lorentzkraft)
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Maxwell'sche Theorie 3 (Lorentzkraft)-
Fnc_VorMax3a
Fnc_VorMax3b
Fnc_VorMax3c
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_VorMax3a
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_VorMax3a 10.01.2010
:C )! Einstellungen Geometrie
:C )/GO
:A Geometrie Maxwell'sche Theorie 3 (Lorentzkraft)
:D EM-Praktikum Geometrie Maxwell'sche Theorie 3 (Lorentzkraft)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Geometrie
Fld_0
  Typ_Sep
Cmd_)*SET,breite
Fld_2
 Prm_Breite des Jochs [m]
 Typ_Real
DEF_*PAR(breite)
Cmd_)*SET,hoehe
Fld_2
 Prm_Hoehe Joch [m]
 Typ_Real
DEF_*PAR(hoehe)
Fld_0
  Typ_Sep
Cmd_)*SET,kerndickeoben
Fld_2
 Prm_Jochstaerke oben [m]
 Typ_Real
DEF_*PAR(kerndickeoben)
Cmd_)*SET,kerndickeunten
Fld_2
 Prm_Jochstaerke unten [m]
 Typ_Real
DEF_*PAR(kerndickeunten)
Cmd_)*SET,kerndickelinks
Fld_2
 Prm_Jochstaerke links [m]
 Typ_Real
DEF_*PAR(kerndickelinks)
Cmd_)*SET,kerndickerechts
Fld_2
 Prm_Jochstaerke rechts [m]
 Typ_Real
DEF_*PAR(kerndickerechts)
Fld_0
  Typ_Sep
Cmd_)*SET,luftspalt
Fld_2
 Prm_Luftspalt [m]
 Typ_Real
DEF_*PAR(luftspalt)
Fld_0
  Typ_Sep
Cmd_)*SET,spulenhoehe
Fld_2
 Prm_Spulenhoehe [m]
 Typ_Real
DEF_*PAR(spulenhoehe)
Cmd_)*SET,spulendicke
Fld_2
 Prm_Spulenbreite [m]
 Typ_Real
DEF_*PAR(spulendicke)
Fld_0
  Typ_Sep
Cmd_)*SET,tiefe
Fld_2
 Prm_Tiefe [m]
 Typ_Real
DEF_*PAR(tiefe)
Fld_0
  Typ_Sep
Cmd_)*SET,nwin
Fld_2
 Prm_Windungszahl N
 Typ_Real
DEF_*PAR(nwin)
Cmd_)*SET,fuell
Fld_2
 Prm_Fuellfaktor
 Typ_Real
DEF_*PAR(fuell)
Fld_0
  Typ_Sep
Cmd_)*SET,leiterdurchmesser
Fld_2
 Prm_Leiterdurchmesser
 Typ_Real
DEF_*PAR(leiterdurchmesser)
Cmd_)*SET,strom
Fld_2
 Prm_Leiterstrom [A]
 Typ_Real
DEF_*PAR(strom)
Cmd_)*SET,schieb
Fld_2
 Prm_Verschiebung aus Mitte (m)
 Typ_Real
DEF_*PAR(schieb)
Fld_0
  Typ_Sep
Cmd_)*SET,aussen
Fld_2
 Prm_Aussenraum [m]
 Typ_Real
DEF_*PAR(aussen)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,MAX1,0
Cmd_)KEYW,MAX2,0
Cmd_)KEYW,MAX3,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_VorMax3b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_VorMax3b 10.01.2010
:C )! Einstellungen Netz
:C )/GO
:A Netzdaten Maxwell'sche Theorie 3 (Lorentzkraft)
:D EM-Praktikum Netzdaten Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(MAX3+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzdaten
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschengroesse Eisen [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschengroesse Luftspalt [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)*SET,meshaussen
Fld_2
 Prm_Maschengroesse Aussenraum [m]
 Typ_Real
DEF_*PAR(meshaussen)
Cmd_)KEYW,VOREIN2,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,STV1,0
Cmd_)KEYW,SCHEN,0
Cmd_)KEYW,MAX3,1
CAL_REFRESH
:E END
:!!
:N Fnc_VorMax3c
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_VorMax3c 10.01.2010
:C )! Einstellungen Schaltung
:C )/GO
:A Schaltungsdaten Maxwell'sche Theorie 3 (Lorentzkraft)
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Schaltungsdaten Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(MAX3+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,rstirn1
Fld_2
 Prm_Stirnwiderstand Spule [Ohm]
 Typ_Real
DEF_*PAR(rstirn1)
Cmd_)*SET,lstirn1
Fld_2
 Prm_Stirninduktivitaet Spule [H]
 Typ_Real
DEF_*PAR(lstirn1)
Cmd_)*SET,i1
Fld_2
 Prm_Spulenstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)KEYW,VOREIN3,1
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,MAX3,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Men_GeneMAX3
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_GeneMAX3 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Maxwell'sche Theorie 3 (Lorentzkraft)
:D EM-Praktikum V 2.0
:K #(MAX3+VOREIN3)
Fnc_EMM_HIN
Sep_
-Definition Maxwell'sche Theorie 3 (Lorentzkraft)-
Fnc_elementeMax3
Fnc_materialMax3
-Geometriegenerierung Maxwell'sche Theorie 3 (Lorentzkraft)-
Fnc_geometMax3
-Vernetzung Maxwell'sche Theorie 3 (Lorentzkraft)-
Fnc_netzMax3
-Kopplungen Maxwell'sche Theorie 3 (Lorentzkraft)-
Fnc_kopplungMax3
-Verschaltung Maxwell'sche Theorie 3 (Lorentzkraft)-
Fnc_schaltMax3
-Randbedingung Maxwell'sche Theorie 3 (Lorentzkraft)-
Fnc_randMax3
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeMax3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeMax3
:C )/GO
:A Elementdefinition Maxwell'sche Theorie 3 (Lorentzkraft)
:H Hlp_elemente
:D Elementdefinition Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(MAX3+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Maxwell'sche Theorie 3
Cmd_)MAX3_elemente.mac
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialMax3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialMax3
:C )/GO
:A Materialdefinition Maxwell'sche Theorie 3 (Lorentzkraft)
:H Hlp_material
:D Materialdefinition Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(MAX3+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Maxwell'sche Theorie 3
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit Spule [S/m]
 Typ_Real
 Def_*PAR(leita)
Fld_0
  Typ_Sep
Cmd_)*SET,leitb
Fld_2
 Prm_Leitfaehigkeit Leiter [S/m]
 Typ_Real
 Def_*PAR(leitb)
Fld_0
  Typ_Sep
Cmd_)*SET,murx
Fld_2
 Prm_muer Joch
 Typ_Real
 Def_*PAR(murx)
Cmd_)*SET,linear,1
Cmd_)MAX3_material.mac
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_geometMax3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_geometMax3
:C )/GO
:A Generierung Maxwell'sche Theorie 3 (Lorentzkraft)
:H Hlp_statornut
:D Generierung Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(MAX3+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Maxwell'sche Theorie 3
Cmd_)MAX3_geometrie.mac
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netzMax3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netzMax3
:C )/GO
:A Netzgenerierung Maxwell'sche Theorie 3 (Lorentzkraft)
:H Hlp_elemente
:D Netzgenerierung Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(MAX3+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maxwell'sche Theorie 3
Cmd_)Max3_netz.mac
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_kopplungMax3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_kopplungMax3
:C )/GO
:A Kopplungen Maxwell'sche Theorie 3 (Lorentzkraft)
:H Hlp_elemente
:D Kopplungen Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(Max3+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)Max3_kopplung.mac
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltMax3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltMax3
:C )/GO
:A Verschaltung Maxwell'sche Theorie 3 (Lorentzkraft)
:H Hlp_elemente
:D Verschaltung Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(Max3+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Maxwell'sche Theorie 3
Cmd_)Max3_schaltung.mac
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_randMax3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_randMax3
:C )/GO
:A Randbedingungen Maxwell'sche Theorie 3 (Lorentzkraft)
:H Hlp_elemente
:D Randbedingungen Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(Max3+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Randbedingung Maxwell'sche Theorie 3
Cmd_)Max3_randbedingung.mac
Cmd_)KEYW,SCHALT1,0
Cmd_)KEYW,RAND,1
Cal_REFRESH
:E END
:!!
:N Men_LoesMAX3
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_LoesMAX3 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Maxwell'sche Theorie 3 (Lorentzkraft)
:D Loesung Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(MAX3+RAND)
Fnc_EMM_HIN
Sep_
- Ausgabedefinition  Maxwell'sche Theorie 3 (Lorentzkraft)-
Fnc_ausMAX3
- Statische Rechnung  Maxwell'sche Theorie 3 (Lorentzkraft)-
Fnc_rechMAX31
Fnc_auswMAX31
:E END
:!!
:N Fnc_ausMAX3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausMAX3
:C )/GO
:A Ausgabedefinition Maxwell'sche Theorie 3 (Lorentzkraft)
:H Hlp_elemente
:D Ausgabedefinition Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(MAX3+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Maxwell'sche Theorie 3
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)MAX3_aus.mac
Cal_REFRESH
:E END
:!!
:N Fnc_rechMAX31
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rechMax31
:C )/GO
:A Rechnung Maxwell'sche Theorie 3 (Lorentzkraft)
:D Rechnung Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(Max3+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Rechnung Maxwell'sche Theorie 3
Fld_0
  Typ_Sep
Cmd_)*SET,i1
Fld_2
 Prm_Spulenstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,strom
Fld_2
 Prm_Leiterstrom [A]
 Typ_Real
DEF_*PAR(strom)
Cmd_)Max3_rechnung1.mac
Cal_REFRESH
:E END
:!!
:N Fnc_auswMAX31
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_auswMax31
:C )/GO
:A Auswertung Maxwell'sche Theorie 3 (Lorentzkraft)
:D Auswerung Maxwell'sche Theorie 3 (Lorentzkraft)
:K #(Max3+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Auswertung Maxwell'sche Theorie 3
Cmd_)Max3_auswertung1.mac
Cal_REFRESH
:E END
:!!
:N Men_VorMAX4
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_VorMax4 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Maxwell'sche Theorie 4 (Stromverdraengung)
:D EM-Praktikum Maxwell'sche Theorie 4 (Stromverdraengung)
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Maxwell'sche Theorie 4 (Stromverdraengung)-
Fnc_VorMax4a
Fnc_VorMax4b
Fnc_VorMax4c
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_VorMax4a
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_VorMax4a 10.01.2010
:C )! Einstellungen Geometrie
:C )/GO
:A Geometrie Maxwell'sche Theorie 4 (Stromverdraengung)
:D EM-Praktikum Geometrie Maxwell'sche Theorie 4 (Stromverdraengung)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Geometrie
Fld_0
  Typ_Sep
Cmd_)*SET,Nutbreite
Fld_2
 Prm_Breite der Nut [m]
 Typ_Real
DEF_*PAR(nutbreite)
Cmd_)*SET,Nuthoehe
Fld_2
 Prm_Hoehe Nut gesamt [m]
 Typ_Real
DEF_*PAR(nuthoehe)
Fld_0
  Typ_Sep
Cmd_)*SET,stegbreite
Fld_2
 Prm_Stegbreite [m]
 Typ_Real
DEF_*PAR(stegbreite)
Cmd_)*SET,steghoehe
Fld_2
 Prm_Steghoehe [m]
 Typ_Real
DEF_*PAR(steghoehe)
Fld_0
  Typ_Sep
Cmd_)*SET,trapez
Fld_2
 Prm_Rechteck / Trapez
 Typ_Lis_RadioB
 Lis_Rechteck,0
 Lis_Trapez,1
DEF_*PAR(trapez)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,MAX1,0
Cmd_)KEYW,MAX2,0
Cmd_)KEYW,MAX3,0
Cmd_)KEYW,MAX4,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_VorMax4b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_VorMax4b 10.01.2010
:C )! Einstellungen Netz
:C )/GO
:A Netzdaten Maxwell'sche Theorie 4 (Stromverdraengung)
:D EM-Praktikum Netzdaten Maxwell'sche Theorie 4 (Stromverdraengung)
:K #(MAX4+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzdaten
Fld_0
  Typ_Sep
Cmd_)*SET,meshsteg
Fld_2
 Prm_Maschengroesse Steg [m]
 Typ_Real
DEF_*PAR(meshsteg)
Cmd_)*SET,meshleiter
Fld_2
 Prm_Maschengroesse Leiter [m]
 Typ_Real
DEF_*PAR(meshleiter)
Cmd_)KEYW,VOREIN2,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,STV1,0
Cmd_)KEYW,SCHEN,0
Cmd_)KEYW,MAX4,1
CAL_REFRESH
:E END
:!!
:N Fnc_VorMax4c
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_VorMax4c 10.01.2010
:C )! Einstellungen Schaltung
:C )/GO
:A Schaltungsdaten Maxwell'sche Theorie 4 (Stromverdraengung)
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Schaltungsdaten Maxwell'sche Theorie 4 (Stromverdraengung)
:K #(MAX4+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,i1
Fld_2
 Prm_Stabstrom [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)KEYW,VOREIN3,1
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,MAX4,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Men_GeneMAX4
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_GeneMAX4 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Maxwell'sche Theorie 4 (Stromverdraengung)
:D EM-Praktikum V 2.0
:K #(MAX4+VOREIN3)
Fnc_EMM_HIN
Sep_
-Definition Maxwell'sche Theorie 4 (Stromverdraengung)-
Fnc_elementeMax4
Fnc_materialMax4
-Geometriegenerierung Maxwell'sche Theorie 4 (Stromverdraengung)-
Fnc_geometMax4
-Vernetzung Maxwell'sche Theorie 4 (Stromverdraengung)-
Fnc_netzMax4
-Kopplungen Maxwell'sche Theorie 4 (Stromverdraengung)-
Fnc_kopplungMax4
-Verschaltung Maxwell'sche Theorie 4 (Stromverdraengung)-
Fnc_schaltMax4
-Randbedingung Maxwell'sche Theorie 4 (Stromverdraengung)-
Fnc_randMax4
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeMax4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeMax4
:C )/GO
:A Elementdefinition Maxwell'sche Theorie 4 (Stromverdraengung)
:H Hlp_elemente
:D Elementdefinition Maxwell'sche Theorie 4 (Stromverdraengung)
:K #(MAX4+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Maxwell'sche Theorie 4 (Stromverdraengung)
Cmd_)MAX4_elemente.mac
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialMax4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialMax4
:C )/GO
:A Materialdefinition Maxwell'sche Theorie 4 (Stromverdraengung)
:H Hlp_material
:D Materialdefinition Maxwell'sche Theorie 4 (Stromverdraengung)
:K #(MAX4+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Maxwell'sche Theorie 4 (Stromverdraengung)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)MAX4_material.mac
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_geometMax4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_geometMax4
:C )/GO
:A Generierung Maxwell'sche Theorie 4 (Stromverdraengung)
:H Hlp_statornut
:D Generierung Maxwell'sche Theorie 4 (Stromverdraengung)
:K #(MAX4+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Maxwell'sche Theorie 4 (Stromverdraengung)
Cmd_)MAX4_geometrie.mac
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netzMax4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netzMax4
:C )/GO
:A Netzgenerierung Maxwell'sche Theorie 4 (Stromverdraengung)
:H Hlp_elemente
:D Netzgenerierung Maxwell'sche Theorie 4 (Stromverdraengung)
:K #(MAX4+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maxwell'sche Theorie 4 (Stromverdraengung)
Cmd_)Max4_netz.mac
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_kopplungMax4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_kopplungMax4
:C )/GO
:A Kopplungen Maxwell'sche Theorie 4 (Stromverdraengung)
:H Hlp_elemente
:D Kopplungen Maxwell'sche Theorie 4 (Stromverdraengung)
:K #(Max4+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)Max4_kopplung.mac
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltMax4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltMax4
:C )/GO
:A Verschaltung Maxwell'sche Theorie 4 (Stromverdraengung)
:H Hlp_elemente
:D Verschaltung Max4
:K #(Max4+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Maxwell'sche Theorie 4 (Stromverdraengung)
Cmd_)Max4_schaltung.mac
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_randMax4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_randMax4
:C )/GO
:A Randbedingungen Maxwell'sche Theorie 4 (Stromverdraengung)
:H Hlp_elemente
:D Randbedingungen Max4
:K #(Max4+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Randbedingung Maxwell'sche Theorie 4 (Stromverdraengung)
Cmd_)Max4_randbedingung.mac
Cmd_)KEYW,SCHALT1,0
Cmd_)KEYW,RAND,1
Cal_REFRESH
:E END
:!!
:N Men_LoesMAX4
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_LoesMAX4 10.01.2010
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Maxwell'sche Theorie 4 (Stromverdraengung)
:D Loesung Maxwell'sche Theorie 4 (Stromverdraengung)
:K #(MAX4+RAND)
Fnc_EMM_HIN
Sep_
- Ausgabedefinition Maxwell'sche Theorie 4 (Stromverdraengung)-
Fnc_ausMAX4
- Harmonische Rechnung Maxwell'sche Theorie 4 (Stromverdraengung)-
Fnc_rechMAX41
:E END
:!!
:N Fnc_ausMAX4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausMAX4
:C )/GO
:A Ausgabedefinition Maxwell'sche Theorie 4 (Stromverdraengung)
:H Hlp_elemente
:D Ausgabedefinition Maxwell'sche Theorie 4 (Stromverdraengung)
:K #(MAX4+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Maxwell'sche Theorie 4 (Stromverdraengung)
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)MAX4_aus.mac
Cal_REFRESH
:E END
:!!
:N Fnc_rechMAX41
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rechMax41
:C )/GO
:A Rechnung Maxwell'sche Theorie 4 (Stromverdraengung)
:D Rechnung Maxwell'sche Theorie 4 (Stromverdraengung)
:K #(Max4+RAND)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Rechnung Maxwell'sche Theorie 4 (Stromverdraengung)
Fld_0
  Typ_Sep
Cmd_)*SET,fsteps
Fld_2
 Prm_Anzahl Frequenzschritte
 Typ_Real
DEF_*PAR(fsteps)
Cmd_)*SET,fstep
Fld_2
 Prm_Frequenzschritt
 Typ_Real
DEF_*PAR(fstep)
Cmd_)Max4_auswertung.mac
Cal_REFRESH
:E END
:!!
:N Men_Vor11
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor11 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Stromverdraengung 1 (einseitig)
:D EM-Praktikum Stromverdraengung 1 (einseitig)
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Stromverdraengung 1 (einseitig)-
Fnc_Vor11a
Fnc_Vor11b
Fnc_Vor11c
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor11a
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor11a 22.02.2000
:C )! Einstellungen Geometrie
:C )/GO
:A Geometrie Stromverdraengung 1 (einseitig)
:D EM-Praktikum Geometrie Stromverdraengung 1 (einseitig)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,wickbreite1
Fld_2
 Prm_Nutbreite oben [m]
 Typ_Real
DEF_*PAR(wickbreite1)
Cmd_)*SET,wickbreite2,wickbreite1
Cmd_)*SET,wickhoehe1
Fld_2
 Prm_Nuthoehe [m]
 Typ_Real
DEF_*PAR(wickhoehe1)
Fld_0
  Typ_Sep
Cmd_)*SET,tn1
Fld_2
 Prm_Nutteilung [m]
 Typ_Real
DEF_*PAR(tn1)
Fld_0
  Typ_Sep
Cmd_)*SET,jochhoehe
Fld_2
 Prm_Jochhoehe [m]
 Typ_Real
DEF_*PAR(jochhoehe)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe [m]
 Typ_Real
DEF_*PAR(jochtiefe)
Fld_0
  Typ_Sep
Cmd_)*SET,wickisol1
Fld_2
 Prm_Nutisolation [m]
 Typ_Real
DEF_*PAR(wickisol1)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,STV1,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor11b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor11b 22.02.2000
:C )! Einstellungen Netz
:C )/GO
:A Netzdaten Stromverdraengung 1 (einseitig)
:D EM-Praktikum Netzdaten Stromverdraengung 1 (einseitig)
:K #(STV1+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzdaten
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschengroesse Eisen [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshleiter
Fld_2
 Prm_Maschengroesse Leiter [m]
 Typ_Real
DEF_*PAR(meshleiter)
Cmd_)KEYW,VOREIN2,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,STV1,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor11c
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor11c 22.02.2000
:C )! Einstellungen Schaltung
:C )/GO
:A Schaltungsdaten Stromverdraengung 1 (einseitig)
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Schaltungsdaten Stromverdraengung 1 (einseitig)
:K #(STV1+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Stableitfaehigkeit
Fld_0
  Typ_Sep
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit Stab [S/m]
 Typ_Real
DEF_*PAR(leita)
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsdaten
Fld_0
  Typ_Sep
Cmd_)*SET,aufgeteilt
Fld_2
 Prm_aufgeteilt/vollstab
 Typ_Lis_RadioB
 Lis_vollstab,0
 Lis_dreifach geschichtet,1
DEF_*PAR(aufgeteilt)
Cmd_)*SET,serie
Fld_2
 Prm_Serien-/Parallelschaltung
 Typ_Lis_RadioB
 Lis_Serienschaltung,1
 Lis_Parallelschaltung,0
DEF_*PAR(serie)
Cmd_)KEYW,VOREIN3,1
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,STV1,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Men_Gene11
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene11 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung STV1 Stromverdraengung 1 (einseitig)
:D EM-Praktikum  Stromverdraengung 1 (einseitig)
:K #(STV1+VOREIN3)
Fnc_EMM_HIN
Sep_
-Definition Stromverdraengung 1 (einseitig)-
Fnc_elemente11
-Geometriegenerierung Stromverdraengung 1 (einseitig)-
Fnc_geometrie11
-Vernetzung Stromverdraengung 1 (einseitig)-
Fnc_netz11
-Kopplungen Stromverdraengung 1 (einseitig)-
Fnc_kopplung11
-Verschaltung Stromverdraengung 1 (einseitig)-
Fnc_schaltung11
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente11
:C )/GO
:A Elementdefinition Stromverdraengung 1 (einseitig)
:H Hlp_elemente
:D Elementdefinition Stromverdraengung 1 (einseitig)
:K #(STV1+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition einseitige Stromverdraengung
Cmd_)STV1_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_geometrie11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_geometrie11
:C )/GO
:A Generierung Stromverdraengung 1 (einseitig)
:H Hlp_statornut
:D Generierung Stromverdraengung 1 (einseitig)
:K #(STV1+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung einseitige Stromverdraengung
Cmd_)STV1_geometrie.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netz11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netz11
:C )/GO
:A Netzgenerierung Stromverdraengung 1 (einseitig)
:H Hlp_elemente
:D Netzgenerierung Stromverdraengung 1 (einseitig)
:K #(STV1+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Statornut
Cmd_)STV1_netz.txt
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_kopplung11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_kopplung11
:C )/GO
:A Kopplungen Stromverdraengung 1 (einseitig)
:H Hlp_elemente
:D Kopplungen Stromverdraengung 1 (einseitig)
:K #(STV1+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)STV1_kopplung.txt
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltung11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltung11
:C )/GO
:A Verschaltung Stromverdraengung 1 (einseitig)
:H Hlp_elemente
:D Verschaltung Stromverdraengung 1 (einseitig)
:K #(STV1+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung einseitige Stromverdraengung
Cmd_)STV1_schaltung.txt
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_rech11
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rech11
:C )/GO
:A Rechnung Stromverdraengung 1 (einseitig)
:D Rechnung Stromverdraengung 1 (einseitig)
:K #(STV1+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Rechnung einseitige Stromverdraengung
Fld_0
  Typ_Sep
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabefilenummer
 Typ_Real
DEF_*PAR(ausgabe)
Fld_0
  Typ_Sep
Cmd_)*SET,fsteps
Fld_2
 Prm_Anzahl Frequenzschritte
 Typ_Real
DEF_*PAR(fsteps)
Cmd_)*SET,fstep
Fld_2
 Prm_Frequenzschritt [Hz]
 Typ_Real
DEF_*PAR(fstep)
Cmd_)STV1_rechnung.txt
Cal_REFRESH
:E END
:!!
:N Men_Vor12
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vor12 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Stromverdraengung 2 (allseitig)
:D EM-Praktikum Stromverdraengung 2 (allseitig)
Fnc_EMM_HIN
Sep_
-Einlesen-
Fnc_Rpar1
-Praeferenzen Stromverdraengung 2 (allseitig)-
Fnc_Vor12a
Fnc_Vor12b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vor12a
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor12a 22.02.2000
:C )! Einstellungen Geometrie
:C )/GO
:A Geometrie Stromverdraengung 2 (allseitig)
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Geometrie Stromverdraengung 2 (allseitig)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Leitergeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rleiter
Fld_2
 Prm_Leiterradius [m]
 Typ_Real
DEF_*PAR(rleiter)
Cmd_)*SET,raussen
Fld_2
 Prm_Aussenraumradius [m]
 Typ_Real
DEF_*PAR(raussen)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe [m]
 Typ_Real
DEF_*PAR(jochtiefe)
Fld_0
 Typ_Lab
 Prm_Eingabe der Stableitfaehigkeit
Fld_0
  Typ_Sep
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit Stab [S/m]
 Typ_Real
DEF_*PAR(leita)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,STV2,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vor12b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vor12b 22.02.2000
:C )! Einstellungen Netz
:C )/GO
:A Netzdaten Stromverdraengung 2 (allseitig)
:H Hlp_EMD_VOREIN2
:D EM-Praktikum Netzdaten Stromverdraengung 2 (allseitig)
:K #(STV2+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzdaten
Fld_0
  Typ_Sep
Cmd_)*SET,meshleiter
Fld_2
 Prm_Maschengroesse Leiter [m]
 Typ_Real
DEF_*PAR(meshleiter)
Cmd_)*SET,meshaussen
Fld_2
 Prm_Maschengroesse aussen [m]
 Typ_Real
DEF_*PAR(meshaussen)
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,VOLL,0
Cmd_)KEYW,GSM1,0
Cmd_)KEYW,STV2,1
Cmd_)KEYW,SCHEN,0
CAL_REFRESH
:E END
:!!
:N Men_Gene12
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Gene12 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Stromverdraengung 2 (allseitig)
:D EM-Praktikum Stromverdraengung 2 (allseitig)
:K #(STV2+VOREIN2)
Fnc_EMM_HIN
Sep_
-Definition Stromverdraengung 2 (allseitig)-
Fnc_elemente12
-Geometriegenerierung Stromverdraengung 2 (allseitig)-
Fnc_geometrie12
-Vernetzung Stromverdraengung 2 (allseitig)-
Fnc_netz12
-Kopplungen Stromverdraengung 2 (allseitig)-
Fnc_kopplung12
-Verschaltung Stromverdraengung 2 (allseitig)-
Fnc_schaltung12
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elemente12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elemente12
:C )/GO
:A Elementdefinition Stromverdraengung 2 (allseitig)
:H Hlp_elemente
:D Elementdefinition Stromverdraengung 2 (allseitig)
:K #(STV2+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition allseitige Stromverdraengung
Cmd_)STV2_elemente.txt
Cmd_)KEYW,DEFI1,1
Cal_REFRESH
:E END
:!!
:N Fnc_geometrie12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_geometrie12
:C )/GO
:A Generierung Stromverdraengung 2 (allseitig)
:H Hlp_statornut
:D Generierung Stromverdraengung 2 (allseitig)
:K #(STV2+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung allseitige Stromverdraengung
Cmd_)STV2_geometrie.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netz12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netnetz12
:C )/GO
:A Netzgenerierung Stromverdraengung 2 (allseitig)
:H Hlp_elemente
:D Netzgenerierung Stromverdraengung 2 (allseitig)
:K #(STV2+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung allseitige Stromverdraengung
Cmd_)STV2_netz.txt
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
Cal_REFRESH
:E END
:!!
:N Fnc_kopplung12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_kopplung12
:C )/GO
:A Kopplungen Stromverdraengung 2 (allseitig)
:H Hlp_elemente
:D Kopplungen Stromverdraengung 2 (allseitig)
:K #(STV2+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)STV2_kopplung.txt
Cmd_)KEYW,KOPP1,1
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltung12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltung12
:C )/GO
:A Verschaltung Stromverdraengung 2 (allseitig)
:H Hlp_elemente
:D Verschaltung Stromverdraengung 2 (allseitig)
:K #(STV2+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung allseitige Stromverdraengung
Cmd_)STV2_schaltung.txt
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,KOPP1,0
Cal_REFRESH
:E END
:!!
:N Fnc_rech12
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rech12
:C )/GO
:A Rechnung Stromverdraengung 2 (allseitig)
:D Rechnung Stromverdraengung 2 (allseitig)
:K #(STV2+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Rechnung allseitige Stromverdraengung
Fld_0
  Typ_Sep
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabefilenummer
 Typ_Real
DEF_*PAR(ausgabe)
Fld_0
  Typ_Sep
Cmd_)*SET,fsteps
Fld_2
 Prm_Anzahl Frequenzschritte
 Typ_Real
DEF_*PAR(fsteps)
Cmd_)*SET,fstep
Fld_2
 Prm_Frequenzschritt [Hz]
 Typ_Real
DEF_*PAR(fstep)
Cmd_)STV2_rechnung.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_BLDC1
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_BLDC1 17.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM BLDC1 zentriert
:D EM-Praktikum-BLDC1 zentriert
Men_Vora
Sep_
Men_Genea
Sep_
Men_Aenda
Sep_
Men_Loesa
Sep_
Men_Auswa
:E END
:!!
:N Men_Vora
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vora 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung BLDC1 zentriert
:D EM-Praktikum Voreinstellung BLDC1 zentriert
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen BLDC1 zentriert-
Fnc_Vora1
Fnc_Vora2
Fnc_Vora3
Fnc_Vora3b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vora1
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vora1 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten BLDC1 zentriert
:H Hlp_EMD_VOREINa1
:D EM-Praktikum Statordaten BLDC1 zentriert
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,Radius_Delta
Fld_2
 Prm_Radius Luftspalt (ra_de)
 Typ_Real
DEF_*PAR(Radius_Delta)
Cmd_)*SET,Radius_innen
Fld_2
 Prm_Radius innen (rsi)
 Typ_Real
DEF_*PAR(Radius_Innen)
Cmd_)*SET,jochtiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(jochtiefe)
Cmd_)*SET,Dicke_Delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(Dicke_delta)
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nut/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Fld_0
 Typ_Sep
Cmd_)*SET,_freq
Fld_2
 Prm_(Grund)frequenz [Hz]
 Typ_Real
DEF_*PAR(_freq)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,BLDC1,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vora2
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vora2 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten BLDC1 zentriert
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Rotordaten BLDC1 zentriert
:K #(BLDC1+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,Dicke_Magnet
Fld_2
 Prm_Magnetstaerke (m_d)     [m]
 Typ_Real
DEF_*PAR(Dicke_Magnet)
Cmd_)*SET,Dicke_Joch2
Fld_2
 Prm_Jochstaerke (j_d)     [m]
 Typ_Real
DEF_*PAR(Dicke_Joch2)
Cmd_)*SET,nMagnet
Fld_2
 Prm_Magnetanzahl 
 Typ_Real
DEF_*PAR(nMagnet)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vora3
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vora3 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statorzahn BLDC1 zentriert
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statorzahn BLDC1 zentriert
:K #(BLDC1+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Statorzahngeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,Radius_Nuto
Fld_2
 Prm_Radius_Nut oben (rad_no)   [m]
 Typ_Real
DEF_*PAR(Radius_Nuto)
Cmd_)*SET,Radius_Nutu
Fld_2
 Prm_Radius_Nut unten (rad_nu)   [m]
 Typ_Real
DEF_*PAR(Radius_Nutu)
Cmd_)*SET,zahnbreite
Fld_2
 Prm_Zahnbreite (zb)   [m]
 Typ_Real
DEF_*PAR(zahnbreite)
Cmd_)*SET,zahnhoehe
Fld_2
 Prm_Zahnhoehe (zh)   [m]
 Typ_Real
DEF_*PAR(zahnhoehe)
Cmd_)*SET,nut_hoehe
Fld_2
 Prm_Nuthoehe (nh)   [m]
 Typ_Real
DEF_*PAR(nut_hoehe)
Cmd_)*SET,leiterabstand
Fld_2
 Prm_Leiterabstand (la)   [m]
 Typ_Real
DEF_*PAR(leiterabstand)
Cmd_)*SET,BFPole
Fld_2
 Prm_Zahnbedeckungsfaktor (wz)  [%]
 Typ_Real
DEF_*PAR(BFPole)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)*SET,fila
Fld_2
 Prm_Fuellfaktor 
 Typ_Real
DEF_*PAR(fila)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vora3b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vora3b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotormagnet BLDC1 zentriert
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Rotormagnet BLDC1 zentriert
:K #(BLDC1+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotormagnetgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,BFMagnet
Fld_2
 Prm_Magnetbedeckung (m_b)  [%]
 Typ_Real
DEF_*PAR(BFMagnet)
Fld_0
 Typ_Sep
Fld_0
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vora4
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vora4 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter BLDC1 zentriert
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter BLDC1 zentriert
:K #(BLDC1+GEO2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,GEO2,0
Cmd_)KEYW,GEO,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vora5
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vora5 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator BLDC1 zentriert
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator BLDC1 zentriert
:K #(BLDC1+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,BLDC1_styp
Fld_2
 Prm_Schaltungstyp
 Typ_Lis_RadioB
 Lis_homopolar,1
 Lis_heteropolar,2
DEF_*PAR(BLDC1_styp)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Stern / Dreieck
 Typ_Lis_RadioB
 Lis_Stern,0
 Lis_Dreieck,1
DEF_*PAR(sterndreieck)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,_freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(_freq)
Cmd_)freq=_freq
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Men_Genea
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Genea 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung BLDC1 zentriert
:D EM-Praktikum Generierung BLDC1 zentriert
:K #(BLDC1+DATEN)
Fnc_EMM_HIN
Sep_
-Definition BLDC1 zentriert-
Fnc_elementea
Fnc_materiala
-Geometriegenerierung BLDC1 zentriert-
Fnc_statorzahna
Fnc_rotormagneta
-Vernetzung BLDC1 zentriert-
Fnc_Vora4
Fnc_netBLDC1se
Fnc_netBLDC1re
Fnc_netBLDC1g
-Kopplungen BLDC1 zentriert-
Fnc_cpBLDC1
-Verschaltung BLDC1 zentriert-
Fnc_Vora5
Fnc_schaltBLDC1
-Interface BLDC1 zentriert-
Fnc_interfacea
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementea
:C )/GO
:A Elementdefinition BLDC1 zentriert
:H Hlp_elemente
:D Elementdefinition BLDC1 zentriert
:K #(BLDC1+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition BLDC1-Maschine
Cmd_)bldc1_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materiala
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materiala
:C )/GO
:A Materialdefinition BLDC1 zentriert
:H Hlp_material
:D Materialdefinition BLDC1 zentriert
:K #(BLDC1+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition BLDC-Maschine 1
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit aussen [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,koerz
Fld_2
 Prm_Koerzitivfeldstaerke [A/m]
 Typ_Real
 Def_*PAR(koerz)
Cmd_)*SET,mperm
Fld_2
 Prm_Permeabilitaet Magnet
 Typ_Real
 Def_*PAR(mperm)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)BLDC1_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorzahna
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorzahna
:C )/GO
:A Generierung Statorzahn BLDC1 zentriert
:H Hlp_statornut
:D Generierung Statorzahn BLDC1 zentriert
:K #(BLDC1+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statorzahn
Cmd_)BLDC1_SZahn.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotormagneta
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotormagneta
:C )/GO
:A Generierung Rotormagnet BLDC1 zentriert
:H Hlp_rotormagneta
:D Generierung Rotormagnet BLDC1 zentriert
:K #(BLDC1+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotormagnet
Cmd_)BLDC1_RMagnet.txt
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netBLDC1se
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netBLDC1se
:C )/GO
:A Netzgenerierung Statorzahn BLDC1 zentriert
:H Hlp_elemente
:D Netzgenerierung Statorzahn BLDC1 zentriert
:K #(BLDC1+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Statorzahn
Cmd_)BLDC1_Snete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netBLDC1re
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netBLDC1re
:C )/GO
:A Netzgenerierung Rotormagnet BLDC1 zentriert
:H Hlp_elemente
:D Netzgenerierung Rotormagnet BLDC1 zentriert
:K #(BLDC1+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotormagnet
Cmd_)BLDC1_Rnete.txt
Cmd_)KEYW,NETZ3,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netBLDC1g
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netBLDC1g
:C )/GO
:A Netzgenerierung Maschine BLDC1 zentriert
:H Hlp_elemente
:D Netzgenerierung Maschine BLDC1 zentriert
:K #(BLDC1+NETZ3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)BLDC1_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ3,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpBLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpBLDC1
:C )/GO
:A Kopplungen Stator BLDC1 zentriert
:H Hlp_elemente
:D Kopplungen Stator BLDC1 zentriert
:K #(BLDC1+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)BLDC1_cp1.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltBLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltBLDC1
:C )/GO
:A Verschaltung Stator BLDC1 zentriert
:H Hlp_elemente
:D Verschaltung Stator BLDC1 zentriert
:K #(BLDC1+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)BLDC1_schalt1.txt
Cmd_)KEYW,SCHALT,0
Cmd_)KEYW,SCHALT1,1
Cal_REFRESH
:E END
:!!
:N Fnc_interfacea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interfacea
:C )/GO
:A Interface Stator/Rotor BLDC1 zentriert
:H Hlp_elemente
:D Interface Stator/Rotor BLDC1 zentriert
:K #(BLDC1+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)BLDC1_interface.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Men_Loesa
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loesa 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung BLDC1 zentriert
:D Loesung BLDC1 zentriert
:K #(BLDC1+INTERF)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition BLDC1 zentriert-
Fnc_ausBLDC1
-Statische Rechnung BLDC1 zentriert-
Fnc_loes1BLDC1
Fnc_loes2BLDC1
Fnc_loes3BLDC1
Fnc_loes4BLDC1
Fnc_loes5BLDC1
-Transiente Rechnung BLDC1 zentriert-
Fnc_loes6BLDC1
Fnc_loes7BLDC1
Fnc_loes8BLDC1
Fnc_loes9BLDC1
Fnc_loes10BLDC1
:E END
:!!
:N Fnc_ausBLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausBLDC1
:C )/GO
:A Ausgabedefinition BLDC1 zentriert
:H Hlp_elemente
:D Ausgabedefinition BLDC1 zentriert
:K #(BLDC1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition BLDC-Maschine 1
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)BLDC1_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1BLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1BLDC1
:C )/GO
:A Einzelvollschrittrechnung BLDC1 zentriert
:H Hlp_elemente
:D Einzelvollschrittrechnung BLDC1 zentriert
:K #(BLDC1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelvollschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC1_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2BLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2BLDC1
:C )/GO
:A Einzelhalbschrittrechnung BLDC1 zentriert
:H Hlp_elemente
:D Einzelhalbschrittrechnung BLDC1 zentriert
:K #(BLDC1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelhalbschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC1_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3BLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3BLDC1
:C )/GO
:A Einzelschrittrechnung BLDC1 zentriert
:H Hlp_elemente
:D Einzelschrittrechnung BLDC1 zentriert
:K #(BLDC1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC1_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4BLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4BLDC1
:C )/GO
:A Mehrvollschrittrechnung BLDC1 zentriert
:H Hlp_elemente
:D Mehrvollschrittrechnung BLDC1 zentriert
:K #(BLDC1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrvollschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Anfangswinkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,wsteps
Fld_2
 Prm_Winkelschritte
 Typ_Real
DEF_*PAR(wsteps)
Cmd_)*SET,wschritt
Fld_2
 Prm_Winkelschritt [Grad]
 Typ_Real
DEF_*PAR(wschritt)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rblock
Fld_2
 Prm_Rechnung fuer Block 
 Typ_Real
DEF_*PAR(rblock)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC1_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5BLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5BLDC1
:C )/GO
:A Mehrhalbschrittrechnung BLDC1 zentriert
:H Hlp_elemente
:D Mehrhalbschrittrechnung BLDC1 zentriert
:K #(BLDC1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrvollschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Anfangswinkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,wsteps
Fld_2
 Prm_Winkelschritte
 Typ_Real
DEF_*PAR(wsteps)
Cmd_)*SET,wschritt
Fld_2
 Prm_Winkelschritt [Grad]
 Typ_Real
DEF_*PAR(wschritt)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rblock
Fld_2
 Prm_Rechnung fuer Block 
 Typ_Real
DEF_*PAR(rblock)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC1_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6BLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6BLDC1
:C )/GO
:A Induzierte Spannung BLDC1 zentriert
:H Hlp_elemente
:D Induzierte Spannung BLDC1 zentriert
:K #(BLDC1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Mehrschrittrechnung fuer induzierte Spannung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC1_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7BLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7BLDC1
:C )/GO
:A Kurzschluss BLDC1 zentriert
:H Hlp_elemente
:D Kurzschluss BLDC1 zentriert
:K #(BLDC1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Mehrschrittrechnung fuer Kurzschluss
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,rbrems
Fld_2
 Prm_R_Brems [Ohm]
 Typ_Real
DEF_*PAR(rbrems)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC1_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8BLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8BLDC1
:C )/GO
:A Initialisierung BLDC1 zentriert
:H Hlp_elemente
:D Initialisierung BLDC1 zentriert
:K #(BLDC1+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,jjstepsinit
Fld_2
 Prm_Initialisierungsschritte
 Typ_Real
DEF_*PAR(jjstepsinit)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,blocktyp
 Prm_Blocktypauswahl
 Typ_Lis_RadioB
 Lis_Vollblock,1
 Lis_Halbblock,2
DEF_*PAR(blocktyp)
Cmd_)*SET,rblock
Fld_2
 Prm_Block
 Typ_Real
DEF_*PAR(rblock)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC1_loes8.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes9BLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes9BLDC1
:C )/GO
:A Hochlauf Blockvorgabe BLDC1 zentriert
:H Hlp_elemente
:D Hochlauf Blockvorgabe BLDC1 zentriert
:K #(BLDC1+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1init
Fld_2
 Prm_Init-spannung [V]
 Typ_Real
DEF_*PAR(u1init)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,u1offset
Fld_2
 Prm_Offset-Spannung [V]
 Typ_Real
DEF_*PAR(u1offset)
Cmd_)*SET,jjstepsinit
Fld_2
 Prm_Initialisierungsschritte
 Typ_Real
DEF_*PAR(jjstepsinit)
Cmd_)*SET,jjsteps
Fld_2
 Prm_Schrittanzahl Betrieb
 Typ_Real
DEF_*PAR(jjsteps)
Cmd_)*SET,drehzahlz
Fld_2
 Prm_Enddrehzahl
 Typ_Real
DEF_*PAR(drehzahlz)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Cmd_)*SET,lasttyp
Fld_2
 Prm_Lastmomentfunktion
 Typ_Lis_RadioB
 Lis_konstant,0
 Lis_linear,1
 Lis_quadratisch,2
 Def_*PAR(lasttyp)
Fld_0
  Typ_Sep
Cmd_)*SET,blocktyp
 Prm_Blocktypauswahl
 Typ_Lis_RadioB
 Lis_Vollblock,1
 Lis_Halbblock,2
DEF_*PAR(blocktyp)
Cmd_)*SET,rblock
Fld_2
 Prm_Block
 Typ_Real
DEF_*PAR(rblock)
Cmd_)*SET,kommuw
Fld_2
 Prm_Kommutierung [Grad]
 Typ_Real
DEF_*PAR(kommuw)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC1_loes9.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes10BLDC1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes10BLDC1
:C )/GO
:A Hochlauf Winkel BLDC1 zentriert
:H Hlp_elemente
:D Hochlauf Winkel BLDC1 zentriert
:K #(BLDC1+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1init
Fld_2
 Prm_Init-spannung [V]
 Typ_Real
DEF_*PAR(u1init)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,u1offset
Fld_2
 Prm_Offset-Spannung [V]
 Typ_Real
DEF_*PAR(u1offset)
Cmd_)*SET,jjstepsinit
Fld_2
 Prm_Initialisierungsschritte
 Typ_Real
DEF_*PAR(jjstepsinit)
Cmd_)*SET,jjsteps
Fld_2
 Prm_Schrittanzahl Betrieb
 Typ_Real
DEF_*PAR(jjsteps)
Cmd_)*SET,drehzahlz
Fld_2
 Prm_Enddrehzahl
 Typ_Real
DEF_*PAR(drehzahlz)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Cmd_)*SET,lasttyp
Fld_2
 Prm_Lastmomentfunktion
 Typ_Lis_RadioB
 Lis_konstant,0
 Lis_linear,1
 Lis_quadratisch,2
 Def_*PAR(lasttyp)
Fld_0
  Typ_Sep
Cmd_)*SET,blocktyp
 Prm_Blocktypauswahl
 Typ_Lis_RadioB
 Lis_Vollblock,1
 Lis_Halbblock,2
DEF_*PAR(blocktyp)
Cmd_)*SET,rblock
Fld_2
 Prm_Block
 Typ_Real
DEF_*PAR(rblock)
Cmd_)*SET,kommuw
Fld_2
 Prm_Kommutierung [Grad]
 Typ_Real
DEF_*PAR(kommuw)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC1_loes10.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_BLDC2
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_BLDC2 18.12.2009
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM BLDC2 verteilt
:D EM-Praktikum BLDC2 verteilt
Men_Vorb2a
Sep_
Men_Geneb2a
Sep_
Men_Aendb2a
Sep_
Men_Loesb2a
Sep_
Men_Auswb2a
:E END
:!!
:N Men_Vorb2a
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vorb2a 18.12.2009
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung BLDC2 verteilt
:D EM-Praktikum Voreinstellung BLDC2 verteilt
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen BLDC2 verteilt-
Fnc_Vorb2a1
Fnc_Vorb2a2
Fnc_Vorb2a3
Fnc_Vorb2a3b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vorb2a1
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorb2a1 vom 18.12.2009
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten BLDC2 verteilt
:H Hlp_EMD_VOREINb2a1
:D EM-Praktikum BLDC2 verteilt
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,Radius_stator_aussen
Fld_2
 Prm_Radius Stator aussen (ras_au)
 Typ_Real
DEF_*PAR(Radius_stator_aussen)
Cmd_)*SET,Radius_stator_innen
Fld_2
 Prm_Radius Stator innen (ras_in)
 Typ_Real
DEF_*PAR(Radius_stator_innen)
Cmd_)*SET,Dicke_Delta
Fld_2
 Prm_Luftspalt (delta)
 Typ_Real
DEF_*PAR(Dicke_delta)
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nut/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Fld_0
 Typ_Sep
Cmd_)*SET,_freq
Fld_2
 Prm_(Grund)frequenz [Hz]
 Typ_Real
DEF_*PAR(_freq)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,BLDC2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorb2a2
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorb2a2 18.12.2009
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten BLDC2 verteilt
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Rotordaten BLDC2 verteilt
:K #(BLDC2+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,Radius_rotor_innen
Fld_2
 Prm_Radius Rotor innen (rar_in)
 Typ_Real
DEF_*PAR(Radius_rotor_innen)
Cmd_)*SET,Dicke_Magnet
Fld_2
 Prm_Magnetstaerke (m_d)     [m]
 Typ_Real
DEF_*PAR(Dicke_Magnet)
Cmd_)*SET,nMagnet
Fld_2
 Prm_Magnetanzahl 
 Typ_Real
DEF_*PAR(nMagnet)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorb2a3
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorb2a3 18.12.2009
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut BLDC2 verteilt
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statornut BLDC2 verteilt
:K #(BLDC2+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Statornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,stegbreite
Fld_2
 Prm_Stegbreite (sb)   [m]
 Typ_Real
DEF_*PAR(stegbreite)
Cmd_)*SET,steghoehe
Fld_2
 Prm_steghoehe (sh)   [m]
 Typ_Real
DEF_*PAR(steghoehe)
Cmd_)*SET,nutbreite
Fld_2
 Prm_nutbreite (nb)   [m]
 Typ_Real
DEF_*PAR(nutbreite)
Cmd_)*SET,nuthoehe
Fld_2
 Prm_nuthoehe (nh)   [m]
 Typ_Real
DEF_*PAR(nuthoehe)
Cmd_)*SET,Radius_Nuto
Fld_2
 Prm_Radius_Zahn oben (rad_no)   [m]
 Typ_Real
DEF_*PAR(Radius_Nuto)
Cmd_)*SET,Radius_Nutu
Fld_2
 Prm_Radius_Zahn unten (rad_nu)   [m]
 Typ_Real
DEF_*PAR(Radius_Nutu)
Cmd_)*SET,leiterabstand
Fld_2
 Prm_Leiterabstand (la)   [m]
 Typ_Real
DEF_*PAR(leiterabstand)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)*SET,fila
Fld_2
 Prm_Fuellfaktor 
 Typ_Real
DEF_*PAR(fila)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorb2a3b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorb2a3b 18.12.2009
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotormagnet BLDC2 verteilt
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Rotormagnet BLDC2 verteilt
:K #(BLDC2+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotormagnetgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,BFMagnet
Fld_2
 Prm_Magnetbedeckung (m_b)  [%]
 Typ_Real
DEF_*PAR(BFMagnet)
Fld_0
 Typ_Sep
Fld_0
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorb2a4
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorb2a4 18.12.2009
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter BLDC2 verteilt
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter BLDC2 verteilt
:K #(BLDC2+GEO2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,GEO2,0
Cmd_)KEYW,GEO,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorb2a5
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorb2a5 18.12.2009
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator BLDC2 verteilt
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator BLDC2 verteilt
:K #(BLDC2+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rwickstirn1
Fld_2
 Prm_Stirnwiderstand   [Ohm]
 Typ_Real
DEF_*PAR(rwickstirn1)
Cmd_)*SET,lwickstirn1
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lwickstirn1)
Cmd_)*SET,BLDC2_styp
Fld_2
 Prm_Schaltungstyp
 Typ_Lis_RadioB
 Lis_homopolar,1
 Lis_heteropolar,2
DEF_*PAR(BLDC2_styp)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Stern / Dreieck
 Typ_Lis_RadioB
 Lis_Stern,0
 Lis_Dreieck,1
DEF_*PAR(sterndreieck)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,_freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(_freq)
Cmd_)freq=_freq
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,KOPP,0
CAL_REFRESH
:E END
:!!
:N Men_Geneb2a
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Geneb2a 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung BLDC2 verteilt
:D EM-Praktikum Generierung BLDC2 verteilt
:K #(BLDC2+DATEN)
Fnc_EMM_HIN
Sep_
-Definition BLDC2 verteilt-
Fnc_elementeb2a
Fnc_materialb2a
-Geometriegenerierung BLDC2 verteilt-
Fnc_statornutb2a
Fnc_rotormagnetb2a
-Vernetzung BLDC2 verteilt-
Fnc_Vorb2a4
Fnc_netBLDC2se
Fnc_netBLDC2re
Fnc_netBLDC2g
-Kopplungen BLDC2 verteilt-
Fnc_cpBLDC2
-Verschaltung BLDC2 verteilt-
Fnc_Vorb2a5
Fnc_schaltBLDC2
-Interface BLDC2 verteilt-
Fnc_interfaceb2a
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeb2a
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementea
:C )/GO
:A Elementdefinition BLDC2 verteilt
:H Hlp_elemente
:D Elementdefinition BLDC2 verteilt
:K #(BLDC2+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition BLDC2-Maschine
Cmd_)bldc2_elemente.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialb2a
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialb2a
:C )/GO
:A Materialdefinition BLDC2 verteilt
:H Hlp_material
:D Materialdefinition BLDC2 verteilt
:K #(BLDC2+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition BLDC-Maschine 2
Cmd_)*SET,murxa
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_murx innen
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit aussen [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,koerz
Fld_2
 Prm_Koerzitivfeldstaerke [A/m]
 Typ_Real
 Def_*PAR(koerz)
Cmd_)*SET,mperm
Fld_2
 Prm_Permeabilitaet Magnet
 Typ_Real
 Def_*PAR(mperm)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)BLDC2_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statornutb2a
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statornutb2a
:C )/GO
:A Generierung BLDC2 verteilt
:H Hlp_statornut
:D Generierung BLDC2 verteilt
:K #(BLDC2+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornut
Cmd_)BLDC2_SNut.txt
Cmd_)KEYW,GEO1,1
Cmd_)KEYW,DEFI2,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotormagnetb2a
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotormagnetb2a
:C )/GO
:A Generierung Rotormagnet BLDC2 verteilt
:H Hlp_rotormagnetb2a
:D Generierung Rotormagnet BLDC2 verteilt
:K #(BLDC2+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotormagnet
Cmd_)BLDC2_RMagnet.txt
Cmd_)KEYW,GEO2,1
Cmd_)KEYW,GEO1,0
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netBLDC2se
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netBLDC2se
:C )/GO
:A Netzgenerierung Statornut BLDC2 verteilt
:H Hlp_elemente
:D Netzgenerierung Statornut BLDC2 verteilt
:K #(BLDC2+GEO)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Statornut
Cmd_)BLDC2_Snete.txt
Cmd_)KEYW,NETZ2,1
Cmd_)KEYW,NETZ1,0
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netBLDC2re
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netBLDC2re
:C )/GO
:A Netzgenerierung Rotormagnet BLDC2 verteilt
:H Hlp_elemente
:D Netzgenerierung Rotormagnet BLDC2 verteilt
:K #(BLDC2+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotormagnet
Cmd_)BLDC2_Rnete.txt
Cmd_)KEYW,NETZ3,1
Cmd_)KEYW,NETZ2,0
Cal_REFRESH
:E END
:!!
:N Fnc_netBLDC2g
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netBLDC2g
:C )/GO
:A Netzgenerierung Maschine BLDC2 verteilt
:H Hlp_elemente
:D Netzgenerierung Maschine BLDC2 verteilt
:K #(BLDC2+NETZ3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Maschine
Cmd_)BLDC2_netg.txt
Cmd_)KEYW,NETZ,1
Cmd_)KEYW,NETZ3,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpBLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpBLDC2
:C )/GO
:A Kopplungen Stator BLDC2 verteilt
:H Hlp_elemente
:D Kopplungen Stator BLDC2 verteilt
:K #(BLDC2+NETZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)BLDC2_cp1.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,NETZ,0
Cal_REFRESH
:E END
:!!
:N Fnc_schaltBLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltBLDC2
:C )/GO
:A Verschaltung Stator BLDC2 verteilt
:H Hlp_elemente
:D Verschaltung Stator BLDC2 verteilt
:K #(BLDC2+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)BLDC2_schalt1.txt
Cmd_)KEYW,SCHALT,0
Cmd_)KEYW,SCHALT1,1
Cal_REFRESH
:E END
:!!
:N Fnc_interfaceb2a
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interfaceb2a
:C )/GO
:A Interface Stator/Rotor BLDC2 verteilt
:H Hlp_elemente
:D Interface Stator/Rotor BLDC2 verteilt
:K #(BLDC2+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)BLDC2_interface.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Men_Loesb2a
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loesb2a 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung BLDC2 verteilt
:D Loesung BLDC2 verteilt
:K #(BLDC2+INTERF)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition BLDC2 verteilt-
Fnc_ausBLDC2
-Statische Rechnung BLDC2 verteilt-
Fnc_loes1BLDC2
Fnc_loes2BLDC2
Fnc_loes3BLDC2
Fnc_loes4BLDC2
Fnc_loes5BLDC2
-Transiente Rechnung BLDC2 verteilt-
Fnc_loes6BLDC2
Fnc_loes7BLDC2
Fnc_loes8BLDC2
Fnc_loes9BLDC2
Fnc_loes10BLDC2
:E END
:!!
:N Fnc_ausBLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausBLDC2
:C )/GO
:A Ausgabedefinition BLDC2 verteilt
:H Hlp_elemente
:D Ausgabedefinition BLDC2 verteilt
:K #(BLDC2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition BLDC-Maschine 2
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)BLDC2_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1BLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1BLDC2
:C )/GO
:A Einzelvollschrittrechnung BLDC2 verteilt
:H Hlp_elemente
:D Einzelvollschrittrechnung BLDC2 verteilt
:K #(BLDC2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelvollschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC2_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2BLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2BLDC2
:C )/GO
:A Einzelhalbschrittrechnung BLDC2 verteilt
:H Hlp_elemente
:D Einzelhalbschrittrechnung BLDC2 verteilt
:K #(BLDC2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelhalbschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC2_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3BLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3BLDC2
:C )/GO
:A Einzelschrittrechnung BLDC2 verteilt
:H Hlp_elemente
:D Einzelschrittrechnung BLDC2 verteilt
:K #(BLDC2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC2_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4BLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4BLDC2
:C )/GO
:A Mehrvollschrittrechnung BLDC2 verteilt
:H Hlp_elemente
:D Mehrvollschrittrechnung BLDC2 verteilt
:K #(BLDC2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrvollschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Anfangswinkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,wsteps
Fld_2
 Prm_Winkelschritte
 Typ_Real
DEF_*PAR(wsteps)
Cmd_)*SET,wschritt
Fld_2
 Prm_Winkelschritt [Grad]
 Typ_Real
DEF_*PAR(wschritt)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rblock
Fld_2
 Prm_Rechnung fuer Block 
 Typ_Real
DEF_*PAR(rblock)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC2_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5BLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5BLDC2
:C )/GO
:A Mehrhalbschrittrechnung BLDC2 verteilt
:H Hlp_elemente
:D Mehrhalbschrittrechnung BLDC2 verteilt
:K #(BLDC2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrvollschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Anfangswinkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,wsteps
Fld_2
 Prm_Winkelschritte
 Typ_Real
DEF_*PAR(wsteps)
Cmd_)*SET,wschritt
Fld_2
 Prm_Winkelschritt [Grad]
 Typ_Real
DEF_*PAR(wschritt)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,rblock
Fld_2
 Prm_Rechnung fuer Block 
 Typ_Real
DEF_*PAR(rblock)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC2_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6BLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6BLDC2
:C )/GO
:A Induzierte Spannung BLDC2 verteilt
:H Hlp_elemente
:D Induzierte Spannung BLDC2 verteilt
:K #(BLDC2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Mehrschrittrechnung fuer induzierte Spannung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC2_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7BLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7BLDC2
:C )/GO
:A Kurzschluss BLDC2 verteilt
:H Hlp_elemente
:D Kurzschluss BLDC2 verteilt
:K #(BLDC2+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Mehrschrittrechnung fuer Kurzschluss
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahl
Fld_2
 Prm_Drehzahl
 Typ_Real
DEF_*PAR(drehzahl)
Cmd_)*SET,jsteps
Fld_2
 Prm_Schrittanzahl pro Periode
 Typ_Real
DEF_*PAR(jsteps)
Cmd_)*SET,ndreh
Fld_2
 Prm_Anzahl Perioden
 Typ_Real
DEF_*PAR(ndreh)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,rbrems
Fld_2
 Prm_R_Brems [Ohm]
 Typ_Real
DEF_*PAR(rbrems)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC2_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8BLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8BLDC2
:C )/GO
:A Initialisierung BLDC2 verteilt
:H Hlp_elemente
:D Initialisierung BLDC2 verteilt
:K #(BLDC2+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,jjstepsinit
Fld_2
 Prm_Initialisierungsschritte
 Typ_Real
DEF_*PAR(jjstepsinit)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Fld_0
  Typ_Sep
Cmd_)*SET,blocktyp
 Prm_Blocktypauswahl
 Typ_Lis_RadioB
 Lis_Vollblock,1
 Lis_Halbblock,2
DEF_*PAR(blocktyp)
Cmd_)*SET,rblock
Fld_2
 Prm_Block
 Typ_Real
DEF_*PAR(rblock)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC2_loes8.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes9BLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes9BLDC2
:C )/GO
:A Hochlauf Blockvorgabe BLDC2 verteilt
:H Hlp_elemente
:D Hochlauf Blockvorgabe BLDC2 verteilt
:K #(BLDC2+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1init
Fld_2
 Prm_Init-spannung [V]
 Typ_Real
DEF_*PAR(u1init)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,u1offset
Fld_2
 Prm_Offset-Spannung [V]
 Typ_Real
DEF_*PAR(u1offset)
Cmd_)*SET,jjstepsinit
Fld_2
 Prm_Initialisierungsschritte
 Typ_Real
DEF_*PAR(jjstepsinit)
Cmd_)*SET,jjsteps
Fld_2
 Prm_Schrittanzahl Betrieb
 Typ_Real
DEF_*PAR(jjsteps)
Cmd_)*SET,drehzahlz
Fld_2
 Prm_Enddrehzahl
 Typ_Real
DEF_*PAR(drehzahlz)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Cmd_)*SET,lasttyp
Fld_2
 Prm_Lastmomentfunktion
 Typ_Lis_RadioB
 Lis_konstant,0
 Lis_linear,1
 Lis_quadratisch,2
 Def_*PAR(lasttyp)
Fld_0
  Typ_Sep
Cmd_)*SET,blocktyp
 Prm_Blocktypauswahl
 Typ_Lis_RadioB
 Lis_Vollblock,1
 Lis_Halbblock,2
DEF_*PAR(blocktyp)
Cmd_)*SET,rblock
Fld_2
 Prm_Block
 Typ_Real
DEF_*PAR(rblock)
Cmd_)*SET,kommuw
Fld_2
 Prm_Kommutierung [Grad]
 Typ_Real
DEF_*PAR(kommuw)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC2_loes9.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes10BLDC2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes10BLDC2
:C )/GO
:A Hochlauf Winkel BLDC2 verteilt
:H Hlp_elemente
:D Hochlauf Winkel BLDC2 verteilt
:K #(BLDC2+INTERF)
Inp_NoApply
Cmd_)*SET,winkela
Fld_2
 Prm_Winkelanfang in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,drehzahls
Fld_2
 Prm_Startdrehzahl   [U/min]
 Typ_Real
DEF_*PAR(drehzahls)
Cmd_)*SET,u1init
Fld_2
 Prm_Init-spannung [V]
 Typ_Real
DEF_*PAR(u1init)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,u1offset
Fld_2
 Prm_Offset-Spannung [V]
 Typ_Real
DEF_*PAR(u1offset)
Cmd_)*SET,jjstepsinit
Fld_2
 Prm_Initialisierungsschritte
 Typ_Real
DEF_*PAR(jjstepsinit)
Cmd_)*SET,jjsteps
Fld_2
 Prm_Schrittanzahl Betrieb
 Typ_Real
DEF_*PAR(jjsteps)
Cmd_)*SET,drehzahlz
Fld_2
 Prm_Enddrehzahl
 Typ_Real
DEF_*PAR(drehzahlz)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,j_traegheit
Fld_2
 Prm_Traegheitsmoment
 Typ_Real
DEF_*PAR(j_traegheit)
Cmd_)*SET,ML_Lastmoment
Fld_2
 Prm_Lastmoment
 Typ_Real
DEF_*PAR(ML_Lastmoment)
Cmd_)*SET,lasttyp
Fld_2
 Prm_Lastmomentfunktion
 Typ_Lis_RadioB
 Lis_konstant,0
 Lis_linear,1
 Lis_quadratisch,2
 Def_*PAR(lasttyp)
Fld_0
  Typ_Sep
Cmd_)*SET,blocktyp
 Prm_Blocktypauswahl
 Typ_Lis_RadioB
 Lis_Vollblock,1
 Lis_Halbblock,2
DEF_*PAR(blocktyp)
Cmd_)*SET,rblock
Fld_2
 Prm_Block
 Typ_Real
DEF_*PAR(rblock)
Cmd_)*SET,kommuw
Fld_2
 Prm_Kommutierung [Grad]
 Typ_Real
DEF_*PAR(kommuw)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)BLDC2_loes10.txt
Cal_REFRESH
:E END
:!!
:N Men_Vore
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vore 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Linearmotor synchron Langstator
:D EM-Praktikum Linearmotor synchron Langstator
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Linearmotor synchron Langstator-
Fnc_Vore1
Fnc_Vore2
Fnc_Vore3
Fnc_Vore3b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vore1
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg1 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten Linearmotor synchron Langstator
:H Hlp_EMD_VOREINe1
:D EM-Praktikum Linearmotor synchron Langstator
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,jochd1
Fld_2
 Prm_jochhoehe (jochd1) [m]
 Typ_Real
DEF_*PAR(jochd1)
Cmd_)*SET,tn1
Fld_2
 Prm_Nutteilung (tn1) [m]
 Typ_Real
DEF_*PAR(tn1)
Cmd_)*SET,tiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(tiefe)
Cmd_)*SET,Delta
Fld_2
 Prm_Luftspalt (delta) [m]
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,npols
Fld_2
 Prm_Segmentanzahl (p)
 Typ_Real
DEF_*PAR(npols)
Cmd_)*SET,q
Fld_2
 Prm_Nut/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,BLDC1,0
Cmd_)KEYW,LINEAR1,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vore2
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vore2 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten Linearmotor synchron Langstator
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Linearmotor synchron Langstator
:K #(LINEAR1+VOREIN1)
Inp_NoApply
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,jochd2
Fld_2
 Prm_jochhoehe (jochd2) [m]
 Typ_Real
DEF_*PAR(jochd2)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vore3
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vore3 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut Linearmotor synchron Langstator
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statornut Linearmotor synchron Langstator
:K #(LINEAR1+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Statornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,bn1
Fld_2
 Prm_Nutbreite (bn1)  [m]
 Typ_Real
DEF_*PAR(bn1)
Cmd_)*SET,bno1
Fld_2
 Prm_Nuthoehe oben (bno1)   [m]
 Typ_Real
DEF_*PAR(bno1)
Cmd_)*SET,bnu1
Fld_2
 Prm_Nuthoehe unten (bnu1)   [m]
 Typ_Real
DEF_*PAR(bnu1)
Cmd_)*SET,bnuw1
Fld_2
 Prm_Nutstegbreite (bnuw1)  [m]
 Typ_Real
DEF_*PAR(bnuw1)
Cmd_)*SET,hn1
Fld_2
 Prm_Hoehe Nut (hn1)  [m]
 Typ_Real
DEF_*PAR(hn1)
Cmd_)*SET,hso1
Fld_2
 Prm_Hoehe Steg oben (hso1)  [m]
 Typ_Real
DEF_*PAR(hso1)
Cmd_)*SET,hsu1
Fld_2
 Prm_Hoehe Steg unten (hsu1)  [m]
 Typ_Real
DEF_*PAR(hsu1)
Cmd_)*SET,rad1
Fld_2
 Prm_Leiterradius (rad1) [m]
 Typ_Real
DEF_*PAR(rad1)
Cmd_)*SET,hnr1
Fld_2
 Prm_Mittelpunktabstand (hnr1) [m]
 Typ_Real
DEF_*PAR(hnr1)
Cmd_)*SET,nseg
Fld_2
 Prm_Anzahl Segmente (nseg)
 Typ_Real
DEF_*PAR(nseg)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,wind1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(wind1)
Cmd_)*SET,draht
Fld_2
 Prm_Drahtstaerke (m)
 Typ_Real
DEF_*PAR(draht)
Cmd_)*SET,fuell1
Fld_2
 Prm_Fuellfaktor 
 Typ_Real
DEF_*PAR(fuell1)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vore3b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vore3b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotorpolschuh Linearmotor synchron Langstator
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Rotorpolschuh Linearmotor synchron Langstator
:K #(LINEAR1+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorpolschuhgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,luftbo2
Fld_2
 Prm_Nut (luftbo2)  [m]
 Typ_Real
DEF_*PAR(luftbo2)
Cmd_)*SET,spulh2
Fld_2
 Prm_Spulenhoehe (spulh2)  [m]
 Typ_Real
DEF_*PAR(spulh2)
Cmd_)*SET,isol2
Fld_2
 Prm_Isolationsstaerke (isol2)  [m]
 Typ_Real
DEF_*PAR(isol2)
Cmd_)*SET,wind2
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(wind2)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vore3c
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg3c 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Fahrzeuggeometrie Linearmotor synchron Langstator
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Fahrzeuggeometrie Linearmotor synchron Langstator
:K #(LINEAR1+GEO9)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Karosseriegeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,_nfahrz
Fld_2
 Prm_nfahrz (_nfahrz)
 Typ_Real
DEF_*PAR(_nfahrz)
Cmd_)*SET,hfahrz
Fld_2
 Prm_Hoehe Fahrzeug (hfahrz) [m]
 Typ_Real
DEF_*PAR(hfahrz)
Cmd_)*SET,lvorfz
Fld_2
 Prm_Laenge vor Fahrzeug (lvorfz) [m]
 Typ_Real
DEF_*PAR(lvorfz)
Fld_0
Cmd_)KEYW,GEO9,0
Cmd_)KEYW,GEO10,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vore4
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vore4 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Linearmotor synchron Langstator
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter Linearmotor synchron Langstator
:K #(LINEAR1+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vore5
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg5 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator Linearmotor synchron Langstator
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator Linearmotor synchron Langstator
:K #(LINEAR1+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rstirn
Fld_2
 Prm_Stirnwiderstand  [Ohm]
 Typ_Real
DEF_*PAR(rstirn)
Cmd_)*SET,lstirn
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lstirn)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_Stern,0
 Lis_Dreieck,1
DEF_*PAR(sterndreieck)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT,0
Cmd_)KEYW,SCHALT1,1
CAL_REFRESH
:E END
:!!
:N Men_Genee
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Genee 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Linearmotor synchron Langstator
:D EM-Praktikum Linearmotor synchron Langstator
:K #(LINEAR1+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Linearmotor synchron Langstator-
Fnc_elementee
Fnc_materiale
Fnc_rcone
-Geometriegenerierung Stator Linearmotor synchron Langstator-
Fnc_statore
Fnc_statorareae
Fnc_statorattre
-Vernetzung Stator Linearmotor synchron Langstator-
Fnc_Vore4
Fnc_netLINEAR1se
Fnc_netLINEAR1g
-Geometriegenerierung Rotor Linearmotor synchron Langstator-
Fnc_rotore
Fnc_rotorareae
Fnc_rotorattre
-Vernetzung Rotor Linearmotor synchron Langstator-
Fnc_netLINEAR1re
-Kopie-
Fnc_netLINEAR1sg
Fnc_netLINEAR1rg
-Fahrzeug Linearmotor synchron Langstator-
Fnc_Vore3c
Fnc_fahrze
-Kopplungen Linearmotor synchron Langstator-
Fnc_cp1LINEAR1
Fnc_cp2LINEAR1
-Verschaltung Linearmotor synchron Langstator-
Fnc_Vore5
Fnc_schalt1LINEAR1
Fnc_schalt2LINEAR1
Fnc_schalt3LINEAR1
-Interface Linearmotor synchron Langstator-
Fnc_rande
Fnc_interfacee
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementee
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementee
:C )/GO
:A Elementdefinition Linearmotor synchron Langstator
:H Hlp_elemente
:D Elementdefinition Linearmotor synchron Langstator
:K #(LINEAR1+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Linearmtor synchron Langstator
Cmd_)lin_syn_lang_elemente.mac
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materiale
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materiale
:C )/GO
:A Materialdefinition Linearmotor synchron Langstator
:H Hlp_material
:D Materialdefinition Linearmotor synchron Langstator
:K #(LINEAR1+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Linearmotor synchron Langstator
Cmd_)*SET,murxa
Fld_2
 Prm_muer Stator
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_muer Rotor
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit Stator [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit Rotor [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)lin_syn_lang_material.mac
Cmd_)KEYW,DEFI2a,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_rcone
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rcone
:C )/GO
:A Reale Konstanten Linearmotor synchron Langstator
:H Hlp_elemente
:D Reale Konstanten Linearmotor synchron Langstator
:K #(LINEAR1+DEFI2a)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Reale Konstanten Linearmtor synchron Langstator
Cmd_)lin_syn_lang_rcon.mac
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI2a,0
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_statore
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statore
:C )/GO
:A Generierung Statornut Linearmotor synchron Langstator
:H Hlp_statorh
:D Generierung Statornut Linearmotor synchron Langstator
:K #(LINEAR1+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornut
Cmd_)lin_syn_lang_geo1.mac
Cmd_)KEYW,DEFI2,0
Cmd_)KEYW,DEFI3,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorareae
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorareae
:C )/GO
:A Generierung Statornutflaechen Linearmotor synchron Langstator
:H Hlp_statornut
:D Generierung Statornutflaechen Linearmotor synchron Langstator
:K #(LINEAR1+DEFI3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornutflaechen
Cmd_)lin_syn_lang_area1.mac
Cmd_)KEYW,DEFI3,0
Cmd_)KEYW,DEFI4,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorattre
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorattre
:C )/GO
:A Attribute Stator Linearmotor synchron Langstator
:H Hlp_statornut
:D Attribute Stator Linearmotor synchron Langstator
:K #(LINEAR1+DEFI4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Stator
Cmd_)lin_syn_lang_attr1.mac
Cmd_)KEYW,DEFI4,0
Cmd_)KEYW,GEO1,1
Cal_REFRESH
:E END
:!!
:N Fnc_fahrze
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_fahrze
:C )/GO
:A Generierung Fahrzeug Linearmotor synchron Langstator
:H Hlp_klotze
:D Generierung Fahrzeug Linearmotor synchron Langstator
:K #(LINEAR1+GEO10)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Klotz
Cmd_)lin_syn_lang_fahrz.mac
Cmd_)KEYW,GEO10,0
Cmd_)KEYW,KOPP1,1
Cal_REFRESH
:E END
:!!
:N Fnc_klotzareae
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_klotzareae
:C )/GO
:A Generierung Klotzflaechen Linearmotor synchron Langstator
:H Hlp_klotze
:D Generierung Klotzflaechen Linearmotor synchron Langstator
:K #(LINEAR1+DEFI5)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Klotzflaechen
Cmd_)lin_syn_lang_klotz_area.txt
Cmd_)KEYW,DEFI5,0
Cmd_)KEYW,DEFI6,1
Cal_REFRESH
:E END
:!!
:N Fnc_klotzattre
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_klotzattre
:C )/GO
:A Generierung Klotzattribute Linearmotor synchron Langstator
:H Hlp_klotze
:D Generierung Klotzattribute Linearmotor synchron Langstator
:K #(LINEAR1+DEFI6)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Klotzattribute
Cmd_)lin_syn_lang_klotz_attr.txt
Cmd_)KEYW,DEFI6,0
Cmd_)KEYW,NETZ2,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotore
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotore
:C )/GO
:A Generierung Rotor Linearmotor synchron Langstator
:H Hlp_rotor
:D Generierung Rotor Linearmotor synchron Langstator
:K #(LINEAR1+ROTOR)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotor
Cmd_)lin_syn_lang_geo2.mac
Cmd_)KEYW,ROTOR,0
Cmd_)KEYW,GEO4,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorareae
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorareae
:C )/GO
:A Generierung Rotorflaechen Linearmotor synchron Langstator
:H Hlp_rotore
:D Generierung Rotorflaechen Linearmotor synchron Langstator
:K #(LINEAR1+GEO4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotor
Cmd_)lin_syn_lang_area2.mac
Cmd_)KEYW,GEO4,0
Cmd_)KEYW,GEO5,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorattre
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorattre
:C )/GO
:A Attribute Rotor Linearmotor synchron Langstator
:H Hlp_rotore
:D Attribute Rotor Linearmotor synchron Langstator
:K #(LINEAR1+GEO5)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Rotor
Cmd_)lin_syn_lang_attr2.mac
Cmd_)KEYW,GEO5,0
Cmd_)KEYW,GEO6,1
Cal_REFRESH
:E END
:!!
:N Fnc_realLINEAR1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_realLINEAR1
:C )/GO
:A Reale Konstanten Stator Linearmotor synchron Langstator
:H Hlp_elemente
:D Reale Konstanten Stator Linearmotor synchron Langstator
:K #(LINEAR1+REAL1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Reale Konstanten Stator
Cmd_)lin_syn_lang_real1.txt
Cmd_)KEYW,REAL1,0
Cmd_)KEYW,NETZG,1
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR1se
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR1se
:C )/GO
:A Netzgenerierung Stator Linearmotor synchron Langstator
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor synchron Langstator
:K #(LINEAR1+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_syn_lang_mesh1.mac
Cmd_)KEYW,ROTOR,1
Cmd_)KEYW,GEO,0
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR1kl
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR1kl
:C )/GO
:A Netzgenerierung Klotz Linearmotor synchron Langstator
:H Hlp_elemente
:D Netzgenerierung Klotz Linearmotor synchron Langstator
:K #(LINEAR1+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Klotz
Cmd_)lin_syn_lang_klotz_mesh.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,NETZ2,0
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR1re
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR1re
:C )/GO
:A Netzgenerierung Rotor Linearmotor synchron Langstator
:H Hlp_elemente
:D Netzgenerierung Rotor Linearmotor synchron Langstator
:K #(LINEAR1+GEO6)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)lin_syn_lang_mesh2.mac
Cmd_)KEYW,GEO6,0
Cmd_)KEYW,GEO7,1
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR1sg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR1sg
:C )/GO
:A Netzgenerierung Stator Linearmotor synchron Langstator
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor synchron Langstator
:K #(LINEAR1+GEO7)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_syn_lang_meshg1.mac
Cmd_)KEYW,GEO8,1
Cmd_)KEYW,GEO7,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR1rg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR1rg
:C )/GO
:A Netzgenerierung Rotor Linearmotor synchron Langstator
:H Hlp_elemente
:D Netzgenerierung Rotor Linearmotor synchron Langstator
:K #(LINEAR1+GEO8)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)lin_syn_lang_meshg2.mac
Cmd_)KEYW,GEO9,1
Cmd_)KEYW,GEO8,0
Cal_REFRESH
:E END
:!!
:N Fnc_cp1LINEAR1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cp1LINEAR1
:C )/GO
:A Kopplungen Stator Linearmotor synchron Langstator
:H Hlp_elemente
:D Kopplungen Stator Linearmotor synchron Langstator
:K #(LINEAR1+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)lin_syn_lang_cp1.mac
Cmd_)KEYW,KOPP1,0
Cmd_)KEYW,KOPP2,1
Cal_REFRESH
:E END
:!!
:N Fnc_cp2LINEAR1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cp2LINEAR1
:C )/GO
:A Kopplungen Rotor Linearmotor synchron Langstator
:H Hlp_elemente
:D Kopplungen Rotor Linearmotor synchron Langstator
:K #(LINEAR1+KOPP2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)lin_syn_lang_cp2.mac
Cmd_)KEYW,KOPP2,0
Cmd_)KEYW,SCHALT,1
Cal_REFRESH
:E END
:!!
:N Fnc_schalt1LINEAR1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt1LINEAR1
:C )/GO
:A Verschaltung Stator Linearmotor synchron Langstator
:H Hlp_elemente
:D Verschaltung Stator Linearmotor synchron Langstator
:K #(LINEAR1+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)lin_syn_lang_schalts1.mac
Cmd_)KEYW,SCHALT1,0
Cmd_)KEYW,SCHALT2,1
Cal_REFRESH
:E END
:!!
:N Fnc_schalt2LINEAR1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt2LINEAR1
:C )/GO
:A Verschaltung Rotor Linearmotor synchron Langstator
:H Hlp_elemente
:D Verschaltung Rotor Linearmotor synchron Langstator
:K #(LINEAR1+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)lin_syn_lang_schaltr1.mac
Cmd_)KEYW,SCHALT2,0
Cmd_)KEYW,SCHALT3,1
Cal_REFRESH
:E END
:!!
:N Fnc_schalt3LINEAR1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt3LINEAR1
:C )/GO
:A Anschlu Stator Linearmotor synchron Langstator
:H Hlp_elemente
:D Verschaltung Stator Linearmotor synchron Langstator
:K #(LINEAR1+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)lin_syn_lang_schalts2.mac
Cmd_)KEYW,SCHALT3,0
Cmd_)KEYW,INTERF,1
Cal_REFRESH
:E END
:!!
:N Fnc_rande
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rande
:C )/GO
:A Interface Stator/Rotor Linearmotor synchron Langstator
:H Hlp_elemente
:D Interface Stator/Rotor Linearmotor synchron Langstator
:K #(LINEAR1+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)lin_syn_lang_rand.mac
Cmd_)KEYW,INTERF,0
Cmd_)KEYW,FERTIG,1
Cal_REFRESH
:E END
:!!
:N Fnc_interfacee
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interfacee
:C )/GO
:A Interface Stator/Rotor Linearmotor synchron Langstator
:H Hlp_elemente
:D Interface Stator/Rotor Linearmotor synchron Langstator
:K #(LINEAR1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)lin_syn_lang_interf.mac
Cal_REFRESH
:E END
:!!
:N Men_Loese
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loese 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Linearmotor synchron Langstator
:D Loesung Linearmotor synchron Langstator
:K #(LINEAR1+FERTIG)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Linearmotor synchron Langstator-
Fnc_ausLINEAR1
-Statische Rechnung Linearmotor synchron Langstator-
Fnc_loes1LINEAR1
Fnc_loes2LINEAR1
Fnc_loes3LINEAR1
Fnc_loes4LINEAR1
Fnc_loes5LINEAR1
-Transiente Rechnung Linearmotor synchron Langstator-
Fnc_loes6LINEAR1
Fnc_loes7LINEAR1
Fnc_loes8LINEAR1
Fnc_loes9LINEAR1
Fnc_loes10LINEAR1
:E END
:!!
:N Fnc_ausLINEAR1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausLINEAR1
:C )/GO
:A Ausgabedefinition Linearmotor synchron Langstator
:H Hlp_elemente
:D Ausgabedefinition Linearmotor synchron Langstator
:K #(LINEAR1+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Linearmotor synchron Langstator
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)lin_asyn_einseit_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1LINEAR1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1LINEAR1
:C )/GO
:A Einzelvollschrittrechnung Linearmotor synchron Langstator
:H Hlp_elemente
:D Einzelvollschrittrechnung Linearmotor synchron Langstator
:K #(LINEAR1+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelvollschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_syn_lang_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2LINEAR1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2LINEAR1
:C )/GO
:A Einzelhalbschrittrechnung Linearmotor synchron Langstator
:H Hlp_elemente
:D Einzelhalbschrittrechnung Linearmotor synchron Langstator
:K #(LINEAR1+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelhalbschrittrechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_syn_lang_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5LINEAR1
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3LINEAR1
:C )/GO
:A Hochlaufrechnung Linearmotor synchron Langstator
:H Hlp_elemente
:D Hochlaufrechnung Linearmotor synchron Langstator
:K #(LINEAR1+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Hochlaufrechnung
Cmd_)*SET,xa
Fld_2
 Prm_Verschiebung xa [m]
 Typ_Real
DEF_*PAR(xa)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fgegen
Fld_2
 Prm_Gegenkraft [N]
 Typ_Real
DEF_*PAR(fgegen)
Cmd_)*SET,masse
Fld_2
 Prm_Gesamtmasse [kg]
 Typ_Real
DEF_*PAR(masse)
Fld_0
  Typ_Sep
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschritte
 Typ_Real
DEF_*PAR(tsteps)
Cmd_)*SET,periodstep
Fld_2
 Prm_Zeitschritte pro Periode
 Typ_Real
DEF_*PAR(periodstep)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_syn_lang_loes5.txt
Cal_REFRESH
:E END
:!!
:N Men_Vorea
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vorea 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Linearmotor asynchron Kurzstator
:D EM-Praktikum Linearmotor asynchron Kurzstator
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Linearmotor asynchron Kurzstator-
Fnc_Vorea1
Fnc_Vorea2
Fnc_Vorea3
Fnc_Vorea3b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vorea1
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorea1 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Rotordaten Linearmotor asynchron Kurzstator
:H Hlp_EMD_VOREINe1
:D EM-Praktikum Linearmotor asynchron Kurzstator
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Laueferblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,jochd1
Fld_2
 Prm_jochhoehe (jochd2) [m]
 Typ_Real
DEF_*PAR(jochd1)
Cmd_)*SET,tn1
Fld_2
 Prm_Nutteilung (tn2) [m]
 Typ_Real
DEF_*PAR(tn1)
Cmd_)*SET,tiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(tiefe)
Cmd_)*SET,Delta
Fld_2
 Prm_Luftspalt (delta) [m]
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Cmd_)*SET,Z2
Fld_2
 Prm_Rotor-Nutenzahl Z2
 Typ_Real
DEF_*PAR(Z2)
Fld_0
 Typ_Sep
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,BLDC1,0
Cmd_)KEYW,LINEAR2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorea2
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorea2 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statordaten Linearmotor asynchron Kurzstator
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Statordaten Linearmotor asynchron Kurzstator
:K #(LINEAR2+VOREIN1)
Inp_NoApply
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Eingabe der Statorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,jochd2
Fld_2
 Prm_jochhoehe (jochd1) [m]
 Typ_Real
DEF_*PAR(jochd2)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorea3
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorea3 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotornut Linearmotor asynchron Kurzstator
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Rotornut Linearmotor asynchron Kurzstator
:K #(LINEAR2+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,rotnuttyp
Fld_2
 Prm_Rotornuttyp
 Typ_Lis_RadioB
 Lis_Typ 1 oder 2,0
 Lis_Typ 3,1
 Def_*PAR(rotnuttyp)
Fld_0
  Typ_Sep
Cmd_)*SET,bn1
Fld_2
 Prm_Nutbreite (bn2)  [m]
 Typ_Real
DEF_*PAR(bn1)
Cmd_)*SET,bno1
Fld_2
 Prm_Nutbreite oben (bno2)   [m]
 Typ_Real
DEF_*PAR(bno1)
Cmd_)*SET,bnu1
Fld_2
 Prm_Nutbreite unten (bnu2)   [m]
 Typ_Real
DEF_*PAR(bnu1)
Cmd_)*SET,bnuw1
Fld_2
 Prm_Nutstegbreite (bnuw2)  [m]
 Typ_Real
DEF_*PAR(bnuw1)
Cmd_)*SET,hn1
Fld_2
 Prm_Hoehe Nut (hn2)  [m]
 Typ_Real
DEF_*PAR(hn1)
Cmd_)*SET,hso1
Fld_2
 Prm_Hoehe Steg oben (hso2)  [m]
 Typ_Real
DEF_*PAR(hso1)
Cmd_)*SET,hsu1
Fld_2
 Prm_Hoehe Steg unten (hsu2)  [m]
 Typ_Real
DEF_*PAR(hsu1)
Cmd_)*SET,rad1
Fld_2
 Prm_Leiterradius (rad2) [m]
 Typ_Real
DEF_*PAR(rad1)
Cmd_)*SET,hnr1
Fld_2
 Prm_Mittelpunktabstand (hnr1) [m]
 Typ_Real
DEF_*PAR(hnr1)
Fld_0
  Typ_Sep
Cmd_)*SET,bs1
Fld_2
 Prm_Nutstegbreite (bs2)  [m]
 Typ_Real
DEF_*PAR(bs1)
Cmd_)*SET,hs1
Fld_2
 Prm_Hoehe Steg (hs2)  [m]
 Typ_Real
DEF_*PAR(hs1)
Cmd_)*SET,bn1
Fld_2
 Prm_Nutbreite (bn2)  [m]
 Typ_Real
DEF_*PAR(bn1)
Cmd_)*SET,hnt1
Fld_2
 Prm_Hoehe Nut Trapez (hnt2) [m]
 Typ_Real
DEF_*PAR(hnt1)
Cmd_)*SET,hnr1
Fld_2
 Prm_Hoehe Nut Rechteck (hnr2) [m]
 Typ_Real
DEF_*PAR(hnr1)
Cmd_)*SET,gsteg
Fld_2
 Prm_Steg mit Leitermaterial (ja=1)
 Typ_Real
DEF_*PAR(gsteg)
Cmd_)*SET,gtrapez
Fld_2
 Prm_Trapez mit Leitermaterial (ja=1)
 Typ_Real
DEF_*PAR(gtrapez)
Cmd_)*SET,grecht
Fld_2
 Prm_Rechteck mit Leitermaterial (ja=1)
 Typ_Real
DEF_*PAR(grecht)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorea3b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorea3b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut Linearmotor asynchron Kurzstator
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Statornut Linearmotor asynchron Kurzstator
:K #(LINEAR2+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nuten/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)*SET,eps
Fld_2
 Prm_Sehnung in Nuten
 Typ_Real
DEF_*PAR(eps)
Cmd_)*SET,kompakt
Fld_2
 Prm_Kompakt(=1)/Gedehnt(=0)
 Typ_Real
DEF_*PAR(kompakt)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Eingabe der Statornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,tn2
Fld_2
 Prm_Nutteilung (tn1)  [m]
 Typ_Real
DEF_*PAR(tn2)
Cmd_)*SET,bs2
Fld_2
 Prm_Schlitzbreite (bs1)  [m]
 Typ_Real
DEF_*PAR(bs2)
Cmd_)*SET,hs2
Fld_2
 Prm_Schlitzhoehe (hs1)  [m]
 Typ_Real
DEF_*PAR(hs2)
Cmd_)*SET,bk2o
Fld_2
 Prm_Breite Keil oben (bk1o)  [m]
 Typ_Real
DEF_*PAR(bk2o)
Cmd_)*SET,bk2u
Fld_2
 Prm_Breite Keil unten (bk1u)  [m]
 Typ_Real
DEF_*PAR(bk2u)
Cmd_)*SET,hk2
Fld_2
 Prm_Keilhoehe (hk1)  [m]
 Typ_Real
DEF_*PAR(hk2)
Cmd_)*SET,bn2
Fld_2
 Prm_Nutbreite (bn1)  [m]
 Typ_Real
DEF_*PAR(bn2)
Cmd_)*SET,hn2
Fld_2
 Prm_Nuthoehe (hn1)  [m]
 Typ_Real
DEF_*PAR(hn2)
Fld_0
  Typ_Sep
Cmd_)*SET,iso2
Fld_2
 Prm_Nut_Isolation (iso1)  [m]
 Typ_Real
DEF_*PAR(iso2)
Cmd_)*SET,wind2
Fld_2
 Prm_Windungszahl Staender
 Typ_Real
DEF_*PAR(wind2)
Cmd_)*SET,draht2
Fld_2
 Prm_Drahtstaerke Staender
 Typ_Real
DEF_*PAR(draht2)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorea4
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorea4 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Linearmotor asynchron Kurzstator
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter Linearmotor asynchron Kurzstator
:K #(LINEAR2+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
CAL_REFRESH
:E END
:!!
:N Men_Geneea
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Geneea 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Linearmotor asynchron Kurzstator
:D EM-Praktikum Linearmotor asynchron Kurzstator
:K #(LINEAR2+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Linearmotor asynchron Kurzstator-
Fnc_elementeea
Fnc_materialea
Fnc_rconea
-Geometriegenerierung Rotor Linearmotor asynchron Kurzstator-
Fnc_rotorea
Fnc_rotorareaea
Fnc_rotorattrea
-Vernetzung Rotor Linearmotor asynchron Kurzstator-
Fnc_Vorea4
Fnc_netLINEAR2re
Fnc_netLINEAR2g
-Geometriegenerierung Stator Linearmotor asynchron Kurzstator-
Fnc_statorea
Fnc_statorareaea
Fnc_statorattrea
-Vernetzung Stator Linearmotor asynchron Kurzstator-
Fnc_netLINEAR2se
Fnc_netLINEAR2re
-Kopie der Nuten Linearmotor asynchron Kurzstator-
Fnc_netLINEAR2sg
Fnc_netLINEAR2rg
-Luecke Linearmotor asynchron Kurzstator-
Fnc_fahrzea
-Kopplungen Linearmotor asynchron Kurzstator-
Fnc_cp1LINEAR2
Fnc_cp2LINEAR2
-Verschaltung Linearmotor asynchron Kurzstator-
Fnc_Vorea5
Fnc_schalt1LIN2
Fnc_Vorea6
Fnc_schalt2LIN2
Fnc_Vorea7
Fnc_schalt3LIN2
-Interface Linearmotor asynchron Kurzstator-
Fnc_randea
Fnc_interfaceea
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeea
:C )/GO
:A Elementdefinition Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Elementdefinition Linearmotor asynchron Kurzstator
:K #(LINEAR2+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Linearmotor asynchron Kurzstator
Cmd_)lin_asyn_kurz_elemente.mac
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialea
:C )/GO
:A Materialdefinition Linearmotor asynchron Kurzstator
:H Hlp_material
:D Materialdefinition Linearmotor asynchron Kurzstator
:K #(LINEAR2+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Linearmotor asynchron Kurzstator
Cmd_)*SET,murx2
Fld_2
 Prm_muer Stator
 Typ_Real
 Def_*PAR(murx2)
Cmd_)*SET,murx1
Fld_2
 Prm_muer Rotor
 Typ_Real
 Def_*PAR(murx1)
Cmd_)*SET,leit2
Fld_2
 Prm_Leitfaehigkeit Stator [S/m]
 Typ_Real
 Def_*PAR(leit2)
Cmd_)*SET,leit1
Fld_2
 Prm_Leitfaehigkeit Rotor [S/m]
 Typ_Real
 Def_*PAR(leit1)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)lin_asyn_kurz_material.mac
Cmd_)KEYW,DEFI2a,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_rconea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rconea
:C )/GO
:A Reale Konstanten Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Reale Konstanten Linearmotor asynchron Kurzstator
:K #(LINEAR2+DEFI2a)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Reale Konstanten Linearmotor asynchron Kurzstator
Cmd_)lin_asyn_kurz_rcon.mac
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI2a,0
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorea
:C )/GO
:A Generierung Rotornut Linearmotor asynchron Kurzstator
:H Hlp_statorh
:D Generierung Rotornut Linearmotor asynchron Kurzstator
:K #(LINEAR2+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornut
Cmd_)lin_asyn_kurz_geo1.mac
Cmd_)KEYW,DEFI2,0
Cmd_)KEYW,DEFI3,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorareaea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorareaea
:C )/GO
:A Generierung Rotornutflaechen Linearmotor asynchron Kurzstator
:H Hlp_statornut
:D Generierung Rotornutflaechen Linearmotor asynchron Kurzstator
:K #(LINEAR2+DEFI3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornutflaechen
Cmd_)lin_asyn_kurz_area1.mac
Cmd_)KEYW,DEFI3,0
Cmd_)KEYW,DEFI4,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorattrea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorattrea
:C )/GO
:A Attribute Rotor Linearmotor asynchron Kurzstator
:H Hlp_Rotornut
:D Attribute Rotor Linearmotor asynchron Kurzstator
:K #(LINEAR2+DEFI4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Rotor
Cmd_)lin_asyn_kurz_attr1.mac
Cmd_)KEYW,DEFI4,0
Cmd_)KEYW,GEO1,1
Cal_REFRESH
:E END
:!!
:N Fnc_fahrzea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_fahrzea
:C )/GO
:A Generierung Luecke Linearmotor asynchron Kurzstator
:H Hlp_klotzea
:D Generierung Luecke Linearmotor asynchron Kurzstator
:K #(LINEAR2+GEO10)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Luecke
Cmd_)lin_asyn_kurz_fahrz.mac
Cmd_)KEYW,GEO10,0
Cmd_)KEYW,KOPP1,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorea
:C )/GO
:A Generierung Stator Linearmotor asynchron Kurzstator
:H Hlp_stator
:D Generierung Stator Linearmotor asynchron Kurzstator
:K #(LINEAR2+ROTOR)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Stator
Cmd_)lin_asyn_kurz_geo2.mac
Cmd_)KEYW,ROTOR,0
Cmd_)KEYW,GEO4,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorareaea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorareaea
:C )/GO
:A Generierung Statorflaechen Linearmotor asynchron Kurzstator
:H Hlp_statore
:D Generierung Statorflaechen Linearmotor asynchron Kurzstator
:K #(LINEAR2+GEO4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Stator Flaechen
Cmd_)lin_asyn_kurz_area2.mac
Cmd_)KEYW,GEO4,0
Cmd_)KEYW,GEO5,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorattrea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorattrea
:C )/GO
:A Attribute Stator Linearmotor asynchron Kurzstator
:H Hlp_rotore
:D Attribute Stator Linearmotor asynchron Kurzstator
:K #(LINEAR2+GEO5)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Stator
Cmd_)lin_asyn_kurz_attr2.mac
Cmd_)KEYW,GEO5,0
Cmd_)KEYW,GEO6,1
Cal_REFRESH
:E END
:!!
:N Fnc_realLINEAR2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_realLINEAR1
:C )/GO
:A Reale Konstanten Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Reale Konstanten Linearmotor asynchron Kurzstator
:K #(LINEAR2+REAL1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Reale Konstanten Stator
Cmd_)lin_asyn_kurz_real1.txt
Cmd_)KEYW,REAL1,0
Cmd_)KEYW,NETZG,1
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR2re
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR2re
:C )/GO
:A Netzgenerierung Rotor Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Netzgenerierung Rotor Linearmotor asynchron Kurzstator
:K #(LINEAR2+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)lin_asyn_kurz_mesh1.mac
Cmd_)KEYW,ROTOR,1
Cmd_)KEYW,GEO,0
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR2se
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR2se
:C )/GO
:A Netzgenerierung Stator Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor asynchron Kurzstator
:K #(LINEAR2+GEO6)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_asyn_kurz_mesh2.mac
Cmd_)KEYW,GEO6,0
Cmd_)KEYW,GEO7,1
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR2sg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR2sg
:C )/GO
:A Netzgenerierung Stator Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor asynchron Kurzstator
:K #(LINEAR2+GEO7)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_asyn_kurz_meshg1.mac
Cmd_)KEYW,GEO8,1
Cmd_)KEYW,GEO7,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR2rg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR2rg
:C )/GO
:A Netzgenerierung Rotor Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Netzgenerierung Rotor Linearmotor asynchron Kurzstator
:K #(LINEAR2+GEO8)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)lin_asyn_kurz_meshg2.mac
Cmd_)KEYW,GEO10,1
Cmd_)KEYW,GEO8,0
Cal_REFRESH
:E END
:!!
:N Fnc_cp1LINEAR2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cp1LINEAR2
:C )/GO
:A Kopplungen Stator Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Kopplungen Stator Linearmotor asynchron Kurzstator
:K #(LINEAR2+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)lin_asyn_kurz_cp1.mac
Cmd_)KEYW,KOPP1,0
Cmd_)KEYW,KOPP2,1
Cal_REFRESH
:E END
:!!
:N Fnc_cp2LINEAR2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cp2LINEAR2
:C )/GO
:A Kopplungen Rotor Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Kopplungen Rotor Linearmotor asynchron Kurzstator
:K #(LINEAR2+KOPP2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)lin_asyn_kurz_cp2.mac
Cmd_)KEYW,KOPP2,0
Cmd_)KEYW,SCHALT,1
Cal_REFRESH
:E END
:!!
:N Fnc_Vorea5
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorea5 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator Linearmotor asynchron Kurzstator
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator Linearmotor asynchron Kurzstator
:K #(LINEAR2+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rspul1
Fld_2
 Prm_Spulenstirnwiderstand  [Ohm]
 Typ_Real
DEF_*PAR(rspul1)
Cmd_)*SET,lspul1
Fld_2
 Prm_Spulenstirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lspul1)
Cmd_)KEYW,SCHALT,0
Cmd_)KEYW,SCHALT1,1
CAL_REFRESH
:E END
:!!
:N Fnc_schalt1LIN2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt1LIN2
:C )/GO
:A Verschaltung Stator Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Verschaltung Stator Linearmotor asynchron Kurzstator
:K #(LINEAR2+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)lin_asyn_kurz_schalt1.mac
Cmd_)KEYW,SCHALT1,0
Cmd_)KEYW,SCHALT2,1
Cal_REFRESH
:E END
:!!
:N Fnc_Vorea6
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorea6 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Rotor Linearmotor asynchron Kurzstator
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Rotor Linearmotor asynchron Kurzstator
:K #(LINEAR2+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rstirn2
Fld_2
 Prm_Stabwiderstand (aussen) [Ohm]
 Typ_Real
DEF_*PAR(rstirn2)
Cmd_)*SET,lstirn2
Fld_2
 Prm_Stabinduktivitaet (aussen) [H]
 Typ_Real
DEF_*PAR(lstirn2)
Cmd_)*SET,rring2
Fld_2
 Prm_Ringwiderstand (eine Seite) [Ohm]
 Typ_Real
DEF_*PAR(rring2)
Cmd_)KEYW,SCHALT2,0
Cmd_)KEYW,SCHALT3,1
CAL_REFRESH
:E END
:!!
:N Fnc_schalt2LIN2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt2LIN2
:C )/GO
:A Verschaltung Rotor Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Verschaltung Rotor Linearmotor asynchron Kurzstator
:K #(LINEAR2+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Rotor
Cmd_)lin_asyn_kurz_schalt2.mac
Cmd_)KEYW,SCHALT3,0
Cmd_)KEYW,SCHALT4,1
Cal_REFRESH
:E END
:!!
:N Fnc_Vorea7
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorea7 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator Linearmotor asynchron Kurzstator
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator Linearmotor asynchron Kurzstator
:K #(LINEAR2+SCHALT4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Verschaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rleit1
Fld_2
 Prm_Leitungswiderstand  [Ohm]
 Typ_Real
DEF_*PAR(rleit1)
Cmd_)*SET,lleit1
Fld_2
 Prm_Leitungsinduktivitaet [H]
 Typ_Real
DEF_*PAR(lleit1)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Schaltungsart
 Typ_Lis_RadioB
 Lis_Stern,0
 Lis_Dreieck,1
DEF_*PAR(sterndreieck)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT4,0
Cmd_)KEYW,SCHALT5,1
CAL_REFRESH
:E END
:!!
:N Fnc_schalt3LIN2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt3LIN2
:C )/GO
:A Anschluss Stator Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Anschluss Stator Linearmotor asynchron Kurzstator
:K #(LINEAR2+SCHALT5)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Anschluss Stator
Cmd_)lin_asyn_kurz_schalts2.mac
Cmd_)KEYW,SCHALT5,0
Cmd_)KEYW,INTERF1,1
Cal_REFRESH
:E END
:!!
:N Fnc_randea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_randea
:C )/GO
:A Interface Stator/Rotor Linearmotor synchron Langstator
:H Hlp_elemente
:D Interface Stator/Rotor Linearmotor synchron Langstator
:K #(LINEAR2+INTERF1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)lin_asyn_kurz_rand.mac
Cmd_)KEYW,INTERF1,0
Cmd_)KEYW,INTERF2,1
Cal_REFRESH
:E END
:!!
:N Fnc_interfaceea
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interfaceea
:C )/GO
:A Interface Stator/Rotor Linearmotor synchron Langstator
:H Hlp_elemente
:D Interface Stator/Rotor Linearmotor synchron Langstator
:K #(LINEAR2+INTERF2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface/Randbedingung Stator/Rotor
Cmd_)lin_asyn_kurz_interf.mac
Cmd_)KEYW,INTERF2,0
Cmd_)KEYW,FERTIG,1
Cal_REFRESH
:E END
:!!
:N Men_Loesea
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loesea 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Linearmotor asynchron Kurzstator
:D Loesung Linearmotor asynchron Kurzstator
:K #(LINEAR2+FERTIG)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Linearmotor asynchron Kurzstator-
Fnc_ausLINEAR2
-Statische Rechnung Linearmotor asynchron Kurzstator-
Fnc_loes1LINEAR2
Fnc_loes2LINEAR2
-Harmonische Rechnung Linearmotor asynchron Kurzstator-
Fnc_loes3LINEAR2
Fnc_loes4LINEAR2
-Transiente Rechnung Linearmotor synchron Langstator-
Fnc_loes5LINEAR2
Fnc_loes6LINEAR2
Fnc_loes7LINEAR2
Fnc_loes8LINEAR2
Fnc_loes9LINEAR2
Fnc_loes10LINEAR2
:E END
:!!
:N Fnc_ausLINEAR2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausLINEAR2
:C )/GO
:A Ausgabedefinition Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Ausgabedefinition Linearmotor asynchron Kurzstator
:K #(LINEAR2+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Linearmotor asynchron Kurzstator
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)lin_asyn_kurz_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1LINEAR2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1LINEAR2
:C )/GO
:A Einschrittrechnung Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Einschrittrechnung Linearmotor asynchron Kurzstator
:K #(LINEAR2+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einschrittrechnung (Stromquellen)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I_1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurz_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2LINEAR2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2LINEAR2
:C )/GO
:A Mehrschrittrechnung Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Mehrschrittrechnung Linearmotor asynchron Kurzstator
:K #(LINEAR2+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung (Stromquellen)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I_1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurz_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3LINEAR2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3LINEAR2
:C )/GO
:A Harmonische Rechnung Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Harmonische Rechnung Linearmotor asynchron Kurzstator
:K #(LINEAR2+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Mehrschrittrechnung (Spannungsquellen)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurz_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5LINEAR2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5LINEAR2
:C )/GO
:A Hochlauf-Rechnung Linearmotor asynchron Kurzstator
:H Hlp_elemente
:D Hochlauf-Rechnung Linearmotor asynchron Kurzstator
:K #(LINEAR2+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlauf-Rechnung
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt tstep [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,speed0
Fld_2
 Prm_Anfangs-Geschw. speed0 [m/s]
 Typ_Real
DEF_*PAR(speed0)
Fld_0
  Typ_Sep
Cmd_)*SET,massef
Fld_2
 Prm_Beschl. Masse [kg]
 Typ_Real
DEF_*PAR(massef)
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurz_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6LINEAR2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6LINEAR2
:C )/GO
:A Transiente Hochlauf-Rechnung weiterrechnen
:H Hlp_elemente
:D Transiente Hochlauf-Rechnung weiterrechnen
:K #(LINEAR2+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlaufrechnung (Spannungsquellen)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurz_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7LINEAR2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7LINEAR2
:C )/GO
:A Transiente Hochlauf-Rechnung feste v
:H Hlp_elemente
:D Transiente Hochlauf-Rechnung feste v
:K #(LINEAR2+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlaufrechnung (feste Geschwindigkeiten)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Einschwingrechnung
Cmd_)*SET,tstepse
Fld_2
 Prm_Zeitschritte zum Einschwingen
 Typ_Real
DEF_*PAR(tstepse)
Cmd_)*SET,iperiode
Fld_2
 Prm_Zeitschritte je Periode
 Typ_Real
DEF_*PAR(iperiode)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Zeitschritterhhung
Cmd_)*SET,iperiodp
Fld_2
 Prm_Zeitschritte zum Rechnen
 Typ_Real
DEF_*PAR(iperiodp)
Cmd_)*SET,iperiodi
Fld_2
 Prm_Zeitschritte je Erhhung
 Typ_Real
DEF_*PAR(iperiodi)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Rechnung bei Geschwindigkeiten
Cmd_)*SET,tstepsgs
Fld_2
 Prm_Zeitschritte einer Geschwindigkeit
 Typ_Real
DEF_*PAR(tstepsgs)
Cmd_)*SET,igeschw
Fld_2
 Prm_Anzahl Geschwindigkeiten
 Typ_Real
DEF_*PAR(igeschw)
Cmd_)*SET,geschwst
Fld_2
 Prm_Geschwindigkeitsaenderung [m/s]
 Typ_Real
DEF_*PAR(geschwst)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurz_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes8LINEAR2
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes8LINEAR2
:C )/GO
:A Transiente Hochlauf-Rechnung festes f
:H Hlp_elemente
:D Transiente Hochlauf-Rechnung festes f
:K #(LINEAR2+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlaufrechnung (feste Frequenzen)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freqstart
Fld_2
 Prm_Startfrequenz [Hz]
 Typ_Real
DEF_*PAR(freqstart)
Cmd_)*SET,freqmax
Fld_2
 Prm_Maximalfrequenz [Hz]
 Typ_Real
DEF_*PAR(freqmax)
Cmd_)*SET,freqknick
Fld_2
 Prm_Knickfrequenz [Hz]
 Typ_Real
DEF_*PAR(freqknick)
Cmd_)*SET,massef
Fld_2
 Prm_Fahrzeugmasse [kg]
 Typ_Real
DEF_*PAR(massef)
Cmd_)*SET,speed0
Fld_2
 Prm_Startgeschwindigkeit [m/s]
 Typ_Real
DEF_*PAR(speed0)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Einschwingrechnung
Cmd_)*SET,tstepse
Fld_2
 Prm_Zeitschritte zum Einschwingen
 Typ_Real
DEF_*PAR(tstepse)
Cmd_)*SET,iperiode
Fld_2
 Prm_Zeitschritte je Periode
 Typ_Real
DEF_*PAR(iperiode)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Zeitschritterhhung
Cmd_)*SET,iperiodp
Fld_2
 Prm_Zeitschritte zum Rechnen
 Typ_Real
DEF_*PAR(iperiodp)
Cmd_)*SET,iperiodi
Fld_2
 Prm_Zeitschritte je Erhhung
 Typ_Real
DEF_*PAR(iperiodi)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Rechnung bei Frequenzen
Cmd_)*SET,tstepsgs
Fld_2
 Prm_Zeitschritte einer Frequenz
 Typ_Real
DEF_*PAR(tstepsgs)
Cmd_)*SET,ifreqg
Fld_2
 Prm_Anzahl Frequenzen
 Typ_Real
DEF_*PAR(ifreqg)
Cmd_)*SET,freqstep
Fld_2
 Prm_Frequenzaenderung [Hz]
 Typ_Real
DEF_*PAR(freqstep)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurz_loes8.txt
Cal_REFRESH
:E END
:!!
:N Men_Vorg
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vorh 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung  Linearmotor einseitig
:D EM-Praktikum Voreinstellung Linearmotor einseitig
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Linearmotor einseitig-
Fnc_Vorg1
Fnc_Vorg2
Fnc_Vorg3
Fnc_Vorg3b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vorg1
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg1 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten Linearmotor einseitig
:H Hlp_EMD_VOREINh1
:D EM-Praktikum Statordaten Linearmotor einseitig
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,statorhoehe
Fld_2
 Prm_Statorhoehe (sh)
 Typ_Real
DEF_*PAR(statorhoehe)
Cmd_)*SET,Nutteilung
Fld_2
 Prm_Nutteilung (n_t)
 Typ_Real
DEF_*PAR(Nutteilung)
Cmd_)*SET,tiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(tiefe)
Cmd_)*SET,Delta
Fld_2
 Prm_Luftspalt (delta) [m]
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nut/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,BLDC1,0
Cmd_)KEYW,LINEAR3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg2
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg2 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten Linearmotor einseitig
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Rotordaten Linearmotor einseitig
:K #(LINEAR3+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,aluhoehe
Fld_2
 Prm_Aluminiumhoehe (a_h)  [m]
 Typ_Real
DEF_*PAR(aluhoehe)
Cmd_)*SET,rueckenhoehe
Fld_2
 Prm_Rueckenhoehe (r_h)     [m]
 Typ_Real
DEF_*PAR(rueckenhoehe)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg3
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorh3 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut Linearmotor einseitig
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statornut Linearmotor einseitig
:K #(LINEAR3+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Statornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,Nutbreite
Fld_2
 Prm_Nutbreite (n_b)  [m]
 Typ_Real
DEF_*PAR(Nutbreite)
Cmd_)*SET,Nuthoehe
Fld_2
 Prm_Nuthoehe (n_h)   [m]
 Typ_Real
DEF_*PAR(Nuthoehe)
Cmd_)*SET,Spaltbreite
Fld_2
 Prm_Spaltbreite (s_b)  [m]
 Typ_Real
DEF_*PAR(Spaltbreite)
Cmd_)*SET,leiterradius1
Fld_2
 Prm_Leiterradius (l_r) [m]
 Typ_Real
DEF_*PAR(leiterradius1)
Cmd_)*SET,leitermittelpunkt
Fld_2
 Prm_Leitermittelpunkt (l_m) [m]
 Typ_Real
DEF_*PAR(leitermittelpunkt)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)*SET,draht
Fld_2
 Prm_Drahtstaerke (m)
 Typ_Real
DEF_*PAR(draht)
Cmd_)*SET,fuell1
Fld_2
 Prm_Fuellfaktor 
 Typ_Real
DEF_*PAR(fuell1)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg3b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg3b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotorschicht Linearmotor einseitig
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Rotorschicht Linearmotor einseitig
:K #(LINEAR3+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorschichtgeometrie
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_! bereits in Rotorgeometrie definiert !
Fld_0
  Typ_Sep
Fld_0
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg3c
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg3c 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Klotzgeometrie Linearmotor einseitig
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Klotzgeometrie Linearmotor einseitig
:K #(LINEAR3+KLOTZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Klotzgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,klotzbreite
Fld_2
 Prm_Klotzbreite (k_b)  [m]
 Typ_Real
DEF_*PAR(klotzbreite)
Fld_0
Cmd_)KEYW,KLOTZ1,0
Cmd_)KEYW,DATEN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg4
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg4 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Linearmotor einseitig
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter Linearmotor einseitig
:K #(LINEAR3+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vorg5
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorg5 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator Linearmotor einseitig
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator Linearmotor einseitig
:K #(LINEAR3+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rstirn
Fld_2
 Prm_Stirnwiderstand  [Ohm]
 Typ_Real
DEF_*PAR(rstirn)
Cmd_)*SET,lstirn
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lstirn)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_Stern,0
 Lis_Dreieck,1
DEF_*PAR(sterndreieck)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT1,0
CAL_REFRESH
:E END
:!!
:N Men_Geneg
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Geneg 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Linearmotor einseitig
:D EM-Praktikum Generierung Linearmotor einseitig
:K #(LINEAR3+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Linearmotor einseitig-
Fnc_elementeg
Fnc_materialg
-Geometriegenerierung Stator Linearmotor einseitig-
Fnc_statorg
Fnc_statorareag
Fnc_statorattrg
-Vernetzung Stator Linearmotor einseitig-
Fnc_Vorg4
Fnc_netLINEAR3se
Fnc_realLINEAR3
Fnc_netLINEAR3g
-Geometriegenerierung Klotz Linearmotor einseitig-
Fnc_Vorg3c
Fnc_klotzg
Fnc_klotzareag
Fnc_klotzattrg
-Vernetzung Klotz Linearmotor einseitig-
Fnc_netLINEAR3kl
-Kopplungen Linearmotor einseitig-
Fnc_cpLINEAR3
-Geometriegenerierung Rotor Linearmotor einseitig-
Fnc_rotorg
Fnc_rotorareag
Fnc_rotorattrg
-Vernetzung Rotor Linearmotor einseitig-
Fnc_Vorg4
Fnc_netLINEAR3re
-Verschaltung Linearmotor einseitig-
Fnc_Vorg5
Fnc_schaltLIN3
-Interface Linearmotor einseitig-
Fnc_interfaceg
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeg
:C )/GO
:A Elementdefinition Linearmotor einseitig
:H Hlp_elemente
:D Elementdefinition Linearmotor einseitig
:K #(LINEAR3+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Linearmtor einseitig
Cmd_)lin_asyn_einseit_elemente.txt
Cmd_)lin_asyn_einseit_real.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialg
:C )/GO
:A Materialdefinition Linearmotor einseitig
:H Hlp_material
:D Materialdefinition Linearmotor einseitig
:K #(LINEAR3+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Linearmotor einseitig
Cmd_)*SET,murxa
Fld_2
 Prm_muer Stator
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_muer Rotor
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit Stator [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit Rotor [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)lin_asyn_einseit_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorg
:C )/GO
:A Generierung Statornut Linearmotor einseitig
:H Hlp_statorh
:D Generierung Statornut Linearmotor einseitig
:K #(LINEAR3+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornut
Cmd_)lin_asyn_beidseit_geo1.txt
Cmd_)KEYW,DEFI2,0
Cmd_)KEYW,DEFI3,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorareag
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorareag
:C )/GO
:A Generierung Statornutflaechen Linearmotor einseitig
:H Hlp_statornut
:D Generierung Statornutflaechen Linearmotor einseitig
:K #(LINEAR3+DEFI3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornutflaechen
Cmd_)lin_asyn_einseit_area1.txt
Cmd_)KEYW,DEFI3,0
Cmd_)KEYW,DEFI4,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorattrg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorattrg
:C )/GO
:A Attribute Stator Linearmotor einseitig
:H Hlp_statornut
:D Attribute Stator Linearmotor einseitig
:K #(LINEAR3+DEFI4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Stator
Cmd_)lin_asyn_einseit_attr1.txt
Cmd_)KEYW,DEFI4,0
Cmd_)KEYW,GEO1,1
Cal_REFRESH
:E END
:!!
:N Fnc_klotzg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_klotzg
:C )/GO
:A Generierung Klotz Linearmotor einseitig
:H Hlp_klotzg
:D Generierung Klotz Linearmotor einseitig
:K #(LINEAR3+DATEN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Klotz
Cmd_)lin_asyn_einseit_klotz_geo.txt
Cmd_)KEYW,KLOTZ,0
Cmd_)KEYW,DATEN2,0
Cmd_)KEYW,DEFI5,1
Cal_REFRESH
:E END
:!!
:N Fnc_klotzareag
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_klotzareag
:C )/GO
:A Generierung Klotzflaechen Linearmotor einseitig
:H Hlp_klotzg
:D Generierung Klotzflaechen Linearmotor einseitig
:K #(LINEAR3+DEFI5)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Klotzflaechen
Cmd_)lin_asyn_einseit_klotz_area.txt
Cmd_)KEYW,DEFI5,0
Cmd_)KEYW,DEFI6,1
Cal_REFRESH
:E END
:!!
:N Fnc_klotzattrg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_klotzattrg
:C )/GO
:A Generierung Klotzattribute Linearmotor einseitig
:H Hlp_klotzg
:D Generierung Klotzattribute Linearmotor einseitig
:K #(LINEAR3+DEFI6)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Klotzattribute
Cmd_)lin_asyn_einseit_klotz_attr.txt
Cmd_)KEYW,DEFI6,0
Cmd_)KEYW,NETZ2,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorg
:C )/GO
:A Generierung Rotor Linearmotor einseitig
:H Hlp_rotor
:D Generierung Rotor Linearmotor einseitig
:K #(LINEAR3+GEO3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotor
Cmd_)lin_asyn_einseit_geo2.txt
Cmd_)KEYW,GEO3,0
Cmd_)KEYW,GEO4,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorareag
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorareag
:C )/GO
:A Generierung Rotorflaechen Linearmotor einseitig
:H Hlp_rotorf
:D Generierung Rotorflaechen Linearmotor einseitig
:K #(LINEAR3+GEO4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotor
Cmd_)lin_asyn_einseit_area2.txt
Cmd_)KEYW,GEO4,0
Cmd_)KEYW,GEO5,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorattrg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorattrg
:C )/GO
:A Attribute Rotor Linearmotor einseitig
:H Hlp_rotorf
:D Attribute Rotor Linearmotor einseitig
:K #(LINEAR3+GEO5)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Rotor
Cmd_)lin_asyn_einseit_attr2.txt
Cmd_)KEYW,GEO5,0
Cmd_)KEYW,GEO6,1
Cal_REFRESH
:E END
:!!
:N Fnc_realLINEAR3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_realLINEAR3
:C )/GO
:A Reale Konstanten Stator Linearmotor einseitig
:H Hlp_elemente
:D Reale Konstanten Stator Linearmotor einseitig
:K #(LINEAR3+REAL1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Reale Konstanten Stator
Cmd_)lin_asyn_einseit_real1.txt
Cmd_)KEYW,REAL1,0
Cmd_)KEYW,NETZG,1
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR3se
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR3se
:C )/GO
:A Netzgenerierung Stator Linearmotor einseitig
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor einseitig
:K #(LINEAR3+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_asyn_einseit_mesh1.txt
Cmd_)KEYW,REAL1,1
Cmd_)KEYW,NETZ1,0
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR3kl
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR3kl
:C )/GO
:A Netzgenerierung Klotz Linearmotor einseitig
:H Hlp_elemente
:D Netzgenerierung Klotz Linearmotor einseitig
:K #(LINEAR3+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Klotz
Cmd_)lin_asyn_einseit_klotz_mesh.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,SCHALT1,1
Cmd_)KEYW,NETZ2,0
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR3re
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR3re
:C )/GO
:A Netzgenerierung Rotor Linearmotor einseitig
:H Hlp_elemente
:D Netzgenerierung Rotor Linearmotor einseitig
:K #(LINEAR3+GEO6)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)lin_asyn_einseit_meshr.txt
Cmd_)KEYW,GEO6,0
Cmd_)KEYW,GEO7,1
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR3g
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR3g
:C )/GO
:A Netzgenerierung Stator Linearmotor einseitig
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor einseitig
:K #(LINEAR3+NETZG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_asyn_einseit_meshg.txt
Cmd_)KEYW,KLOTZ,1
Cmd_)KEYW,NETZG,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpLINEAR3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpLINEAR3
:C )/GO
:A Kopplungen Stator Linearmotor einseitig
:H Hlp_elemente
:D Kopplungen Stator Linearmotor einseitig
:K #(LINEAR3+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)lin_asyn_einseit_cp1.txt
Cmd_)KEYW,KOPP,0
Cmd_)KEYW,GEO3,1
Cal_REFRESH
:E END
:!!
:N Fnc_schaltLIN3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltLIN3
:C )/GO
:A Verschaltung Stator Linearmotor einseitig
:H Hlp_elemente
:D Verschaltung Stator Linearmotor einseitig
:K #(LINEAR3+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)lin_asyn_einseit_schalt1.txt
Cmd_)KEYW,SCHALT,0
Cmd_)KEYW,INTERF,1
Cal_REFRESH
:E END
:!!
:N Fnc_interfaceg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interfaceg
:C )/GO
:A Interface Stator/Rotor Linearmotor einseitig
:H Hlp_elemente
:D Interface Stator/Rotor Linearmotor einseitig
:K #(LINEAR3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)lin_asyn_einseit_interf.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Men_Loesg
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loesg 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Linearmotor einseitig
:D Loesung Linearmotor einseitig
:K #(LINEAR3+INTERF)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Linearmotor einseitig-
Fnc_ausLIN3
-Statische Rechnung Linearmotor einseitig-
Fnc_loes1LIN3
Fnc_loes2LIN3
-Harmonische Rechnung Linearmotor einseitig-
Fnc_loes3LIN3
Fnc_loes4LIN3
-Transiente Rechnung Linearmotor einseitig-
Fnc_loes5LIN3
Fnc_loes6LIN3
Fnc_loes7LIN3
Fnc_loes8LIN3
Fnc_loes9LIN3
Fnc_loes10LIN3
:E END
:!!
:N Fnc_ausLIN3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausLIN3
:C )/GO
:A Ausgabedefinition Linearmotor einseitig
:H Hlp_elemente
:D Ausgabedefinition Linearmotor einseitig
:K #(LINEAR3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition einseitiger Linermotor
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)lin_asyn_einseit_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1LIN3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1LIN3
:C )/GO
:A Statische Rechnung Linearmotor einseitig
:H Hlp_elemente
:D Statische Rechnung Linearmotor einseitig
:K #(LINEAR3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Rechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_einseit_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3LIN3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3LIN3
:C )/GO
:A Harmonische Rechnung Linearmotor einseitig
:H Hlp_elemente
:D Harmonische Rechnung Linearmotor einseitig
:K #(LINEAR3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Rechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_einseit_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5LIN3
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5LIN3
:C )/GO
:A Hochlauf
:H Hlp_elemente
:D Hochlaufrechnung
:K #(LINEAR3+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Hochlaufrechnung
Cmd_)*SET,xa
Fld_2
 Prm_Verschiebung xa [m]
 Typ_Real
DEF_*PAR(xa)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fgegen
Fld_2
 Prm_Gegenkraft [N]
 Typ_Real
DEF_*PAR(fgegen)
Cmd_)*SET,masse
Fld_2
 Prm_Gesamtmasse [kg]
 Typ_Real
DEF_*PAR(masse)
Fld_0
  Typ_Sep
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschritte
 Typ_Real
DEF_*PAR(tsteps)
Cmd_)*SET,periodstep
Fld_2
 Prm_Zeitschritte pro Periode
 Typ_Real
DEF_*PAR(periodstep)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_einseit_loes5.txt
Cal_REFRESH
:E END
:!!
:N Men_Vorh
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vorh 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung
:D EM-Praktikum Linear 4
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen-
Fnc_Vorh1
Fnc_Vorh2
Fnc_Vorh3
Fnc_Vorh3b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vorh1
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorh1 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Statordaten
:H Hlp_EMD_VOREINh1
:D EM-Praktikum
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Aussenblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,statorhoehe
Fld_2
 Prm_Statorhoehe (sh)
 Typ_Real
DEF_*PAR(statorhoehe)
Cmd_)*SET,Nutteilung
Fld_2
 Prm_Nutteilung (n_t)
 Typ_Real
DEF_*PAR(Nutteilung)
Cmd_)*SET,tiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(tiefe)
Cmd_)*SET,Delta
Fld_2
 Prm_Luftspalt (delta) [m]
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nut/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,BLDC1,0
Cmd_)KEYW,LINEAR4,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorh2
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorh2 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotordaten
:H Hlp_EMD_VOREIN1
:D EM-Praktikum
:K #(LINEAR4+VOREIN1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,aluhoehe
Fld_2
 Prm_Aluminiumhoehe (a_h)  [m]
 Typ_Real
DEF_*PAR(aluhoehe)
Cmd_)*SET,rueckenhoehe
Fld_2
 Prm_Rueckenhoehe (r_h)     [m]
 Typ_Real
DEF_*PAR(rueckenhoehe)
Cmd_)KEYW,VOREIN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorh3
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorh3 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut
:H Hlp_EMD_VOREIN3
:D EM-Praktikum Statornut
:K #(LINEAR4+VOREIN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Statornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,Nutbreite
Fld_2
 Prm_Nutbreite (n_b)  [m]
 Typ_Real
DEF_*PAR(Nutbreite)
Cmd_)*SET,Nuthoehe
Fld_2
 Prm_Nuthoehe (n_h)   [m]
 Typ_Real
DEF_*PAR(Nuthoehe)
Cmd_)*SET,Spaltbreite
Fld_2
 Prm_Spaltbreite (s_b)  [m]
 Typ_Real
DEF_*PAR(Spaltbreite)
Cmd_)*SET,leiterradius
Fld_2
 Prm_Leiterradius (l_r) [m]
 Typ_Real
DEF_*PAR(leiterradius)
Cmd_)*SET,leitermittelpunkt
Fld_2
 Prm_Leitermittelpunkt (l_m) [m]
 Typ_Real
DEF_*PAR(leitermittelpunkt)
Fld_0
 Typ_Sep
Fld_0
Cmd_)*SET,nwin1
Fld_2
 Prm_Windungszahl (N)
 Typ_Real
DEF_*PAR(nwin1)
Cmd_)*SET,draht
Fld_2
 Prm_Drahtstaerke (m)
 Typ_Real
DEF_*PAR(draht)
Cmd_)*SET,fuell1
Fld_2
 Prm_Fuellfaktor 
 Typ_Real
DEF_*PAR(fuell1)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorh3b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorh3b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Rotorschicht
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Rotorschicht
:K #(LINEAR4+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Rotorschichtgeometrie
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_! bereits in Rotorgeometrie definiert !
Fld_0
  Typ_Sep
Fld_0
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorh3c
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorh3c 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Klotzgeometrie
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Klotzgeometrie
:K #(LINEAR4+KLOTZ)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Klotzgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,klotzbreite
Fld_2
 Prm_Klotzbreite (k_b)  [m]
 Typ_Real
DEF_*PAR(klotzbreite)
Fld_0
Cmd_)KEYW,KLOTZ1,0
Cmd_)KEYW,DATEN2,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorh4
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorh4 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter
:K #(LINEAR4+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
CAL_REFRESH
:E END
:!!
:N Fnc_Vorh5
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorh5 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Schaltungsparameter Stator
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Schaltungsparameter Stator
:K #(LINEAR4+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rstirn
Fld_2
 Prm_Stirnwiderstand  [Ohm]
 Typ_Real
DEF_*PAR(rstirn)
Cmd_)*SET,lstirn
Fld_2
 Prm_Stirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lstirn)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_Stern,0
 Lis_Dreieck,1
DEF_*PAR(sterndreieck)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT,1
Cmd_)KEYW,SCHALT1,0
CAL_REFRESH
:E END
:!!
:N Men_Geneh
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Geneh 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung
:D EM-Praktikum V 2.0
:K #(LINEAR4+DATEN)
Fnc_EMM_HIN
Sep_
-Definition-
Fnc_elementeh
Fnc_materialh
-Geometriegenerierung S-
Fnc_statorh
Fnc_statorareah
Fnc_statorattrh
-Vernetzung Stator-
Fnc_Vorh4
Fnc_netLINEAR4se
Fnc_realLINEAR4
Fnc_netLINEAR4g
-Geometriegenerierung K-
Fnc_Vorh3c
Fnc_klotzh
Fnc_klotzareah
Fnc_klotzattrh
-Vernetzung Klotz-
Fnc_netLINEAR4kl
-Kopplungen-
Fnc_cpLINEAR4
-Geometriegenerierung R-
Fnc_rotorh
Fnc_rotorareah
Fnc_rotorattrh
-Vernetzung Rotor-
Fnc_Vorh4
Fnc_netLINEAR4re
-Seitenkopie-
Fnc_copyLINEAR4
-Verschaltung-
Fnc_Vorh5
Fnc_schaltLINEAR4
-Interface-
Fnc_interfaceh
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeh
:C )/GO
:A Elementdefinition Linearmotor beidseitig
:H Hlp_elemente
:D Elementdefinition Linearmotor beidseitig
:K #(LINEAR4+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Linearmtor beidseitig
Cmd_)lin_asyn_beidseit_elemente.txt
Cmd_)lin_asyn_beidseit_real.txt
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialh
:C )/GO
:A Materialdefinition Linearmotor beidseitig
:H Hlp_material
:D Materialdefinition Linearmotor beidseitig
:K #(LINEAR4+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Linearmotor beidseitig
Cmd_)*SET,murxa
Fld_2
 Prm_muer Stator
 Typ_Real
 Def_*PAR(murxa)
Cmd_)*SET,murxi
Fld_2
 Prm_muer Rotor
 Typ_Real
 Def_*PAR(murxi)
Cmd_)*SET,leita
Fld_2
 Prm_Leitfaehigkeit Stator [S/m]
 Typ_Real
 Def_*PAR(leita)
Cmd_)*SET,leiti
Fld_2
 Prm_Leitfaehigkeit Rotor [S/m]
 Typ_Real
 Def_*PAR(leiti)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)lin_asyn_beidseit_material.txt
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorh
:C )/GO
:A Generierung Statornut
:H Hlp_statorh
:D Generierung Statornut
:K #(LINEAR4+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornut
Cmd_)lin_asyn_beidseit_geo1.txt
Cmd_)KEYW,DEFI2,0
Cmd_)KEYW,DEFI3,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorareah
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorareah
:C )/GO
:A Generierung Statornutflaechen
:H Hlp_statornut
:D Generierung Statornutflaechen
:K #(LINEAR4+DEFI3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Statornutflaechen
Cmd_)lin_asyn_beidseit_area1.txt
Cmd_)KEYW,DEFI3,0
Cmd_)KEYW,DEFI4,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorattrh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorattrh
:C )/GO
:A Attribute Stator
:H Hlp_statornut
:D Attribute Stator
:K #(LINEAR4+DEFI4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Stator
Cmd_)lin_asyn_beidseit_attr1.txt
Cmd_)KEYW,DEFI4,0
Cmd_)KEYW,GEO1,1
Cal_REFRESH
:E END
:!!
:N Fnc_klotzh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_klotzh
:C )/GO
:A Generierung Klotz
:H Hlp_klotzh
:D Generierung Klotz
:K #(LINEAR4+DATEN2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Klotz
Cmd_)lin_asyn_beidseit_klotz_geo.txt
Cmd_)KEYW,KLOTZ,0
Cmd_)KEYW,DATEN2,0
Cmd_)KEYW,DEFI5,1
Cal_REFRESH
:E END
:!!
:N Fnc_klotzareah
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_klotzareah
:C )/GO
:A Generierung Klotzflaechen
:H Hlp_klotzh
:D Generierung Klotzflaechen
:K #(LINEAR4+DEFI5)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Klotzflaechen
Cmd_)lin_asyn_beidseit_klotz_area.txt
Cmd_)KEYW,DEFI5,0
Cmd_)KEYW,DEFI6,1
Cal_REFRESH
:E END
:!!
:N Fnc_klotzattrh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_klotzattrh
:C )/GO
:A Generierung Klotzattribute
:H Hlp_klotzh
:D Generierung Klotzattribute
:K #(LINEAR4+DEFI6)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Klotzattribute
Cmd_)lin_asyn_beidseit_klotz_attr.txt
Cmd_)KEYW,DEFI6,0
Cmd_)KEYW,NETZ2,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorh
:C )/GO
:A Generierung Rotor
:H Hlp_rotor
:D Generierung Rotor
:K #(LINEAR4+GEO3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotor
Cmd_)lin_asyn_beidseit_geo2.txt
Cmd_)KEYW,GEO3,0
Cmd_)KEYW,GEO4,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorareah
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorareah
:C )/GO
:A Generierung Rotorflaechen
:H Hlp_rotorf
:D Generierung Rotorflaechen
:K #(LINEAR4+GEO4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotor
Cmd_)lin_asyn_beidseit_area2.txt
Cmd_)KEYW,GEO4,0
Cmd_)KEYW,GEO5,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorattrh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorattrh
:C )/GO
:A Attribute Rotor
:H Hlp_rotorf
:D Attribute Rotor
:K #(LINEAR4+GEO5)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Rotor
Cmd_)lin_asyn_beidseit_attr2.txt
Cmd_)KEYW,GEO5,0
Cmd_)KEYW,GEO6,1
Cal_REFRESH
:E END
:!!
:N Fnc_realLINEAR4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_realLINEAR4
:C )/GO
:A Reale Konstanten Stator
:H Hlp_elemente
:D Reale Konstanten Stator
:K #(LINEAR4+REAL1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Reale Konstanten Stator
Cmd_)lin_asyn_beidseit_real1.txt
Cmd_)KEYW,REAL1,0
Cmd_)KEYW,NETZG,1
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR4se
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR4se
:C )/GO
:A Netzgenerierung Stator
:H Hlp_elemente
:D Netzgenerierung Stator
:K #(LINEAR4+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_asyn_beidseit_mesh1.txt
Cmd_)KEYW,REAL1,1
Cmd_)KEYW,NETZ1,0
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR4kl
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR4kl
:C )/GO
:A Netzgenerierung Klotz
:H Hlp_elemente
:D Netzgenerierung Klotz
:K #(LINEAR4+NETZ2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Klotz
Cmd_)lin_asyn_beidseit_klotz_mesh.txt
Cmd_)KEYW,KOPP,1
Cmd_)KEYW,NETZ2,0
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR4re
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR4re
:C )/GO
:A Netzgenerierung Rotor
:H Hlp_elemente
:D Netzgenerierung Rotor
:K #(LINEAR4+GEO6)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)lin_asyn_beidseit_meshr.txt
Cmd_)KEYW,GEO6,0
Cmd_)KEYW,GEO7,1
Cal_REFRESH
:E END
:!!
:N Fnc_copyLINEAR4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_copyLINEAR4
:C )/GO
:A Seitenkopie
:H Hlp_elemente
:D Seitenkopie
:K #(LINEAR4+GEO7)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)lin_asyn_beidseit_copy.txt
Cmd_)KEYW,GEO7,0
Cmd_)KEYW,SCHALT1,1
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR4g
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR4g
:C )/GO
:A Netzgenerierung Stator
:H Hlp_elemente
:D Netzgenerierung Stator
:K #(LINEAR4+NETZG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_asyn_beidseit_meshg.txt
Cmd_)KEYW,KLOTZ,1
Cmd_)KEYW,NETZG,0
Cal_REFRESH
:E END
:!!
:N Fnc_cpLINEAR4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cpLINEAR4
:C )/GO
:A Kopplungen Stator
:H Hlp_elemente
:D Kopplungen Stator
:K #(LINEAR4+KOPP)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)lin_asyn_beidseit_cp1.txt
Cmd_)KEYW,KOPP,0
Cmd_)KEYW,GEO3,1
Cal_REFRESH
:E END
:!!
:N Fnc_schaltLINEAR4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schaltLINEAR4
:C )/GO
:A Verschaltung Stator
:H Hlp_elemente
:D Verschaltung Stator
:K #(LINEAR4+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)lin_asyn_beidseit_schalt1.txt
Cmd_)KEYW,SCHALT,0
Cmd_)KEYW,INTERF,1
Cal_REFRESH
:E END
:!!
:N Fnc_interfaceh
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interfaceh
:C )/GO
:A Interface Stator/Rotor
:H Hlp_elemente
:D Interface Stator/Rotor
:K #(LINEAR4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)lin_asyn_beidseit_interf.txt
Cmd_)KEYW,INTERF,1
Cmd_)KEYW,SCHALT1,0
Cal_REFRESH
:E END
:!!
:N Men_Loesh
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loesh 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung
:D Loesung
:K #(LINEAR4+INTERF)
Fnc_EMM_HIN
Sep_
- Ausgabedefinition -
Fnc_ausLIN4
- Statische Rechnung -
Fnc_loes1LIN4
Fnc_loes2LIN4
- Harmonische Rechnung -
Fnc_loes3LIN4
Fnc_loes4LIN4
- Transiente Rechnung -
Fnc_loes5LIN4
Fnc_loes6LIN4
Fnc_loes7LIN4
Fnc_loes8LIN4
Fnc_loes9LIN4
Fnc_loes10LIN4
:E END
:!!
:N Fnc_ausLIN4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausLIN4
:C )/GO
:A Ausgabedefinition Linearmotor 4
:H Hlp_elemente
:D Ausgabedefinition Linearmotor 4
:K #(LINEAR4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Linearmotor 4
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)*SET,_fft
Fld_2
 Prm_Fourieranalyse (ja=1)
 Typ_Real
DEF_*PAR(_fft)
Cmd_)LINEAR4_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1LIN4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1LIN4
:C )/GO
:A Statische Rechnung
:H Hlp_elemente
:D Statische Rechnung
:K #(LINEAR4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Rechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_beidseit_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3LIN4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3LIN4
:C )/GO
:A Harmonische Rechnung
:H Hlp_elemente
:D Harmonische Rechnung
:K #(LINEAR4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Rechnung
Cmd_)*SET,winkela
Fld_2
 Prm_Winkel in Grad
 Typ_Real
DEF_*PAR(winkela)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_beidseit_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5LIN4
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5LIN4
:C )/GO
:A Hochlauf
:H Hlp_elemente
:D Hochlaufrechnung
:K #(LINEAR4+INTERF)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Hochlaufrechnung
Cmd_)*SET,xa
Fld_2
 Prm_Verschiebung xa [m]
 Typ_Real
DEF_*PAR(xa)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Cmd_)*SET,fgegen
Fld_2
 Prm_Gegenkraft [N]
 Typ_Real
DEF_*PAR(fgegen)
Cmd_)*SET,masse
Fld_2
 Prm_Gesamtmasse [kg]
 Typ_Real
DEF_*PAR(masse)
Fld_0
  Typ_Sep
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschritte
 Typ_Real
DEF_*PAR(tsteps)
Cmd_)*SET,periodstep
Fld_2
 Prm_Zeitschritte pro Periode
 Typ_Real
DEF_*PAR(periodstep)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_beidseit_loes5.txt
Cal_REFRESH
:E END
:!!
:N Men_EM_LIN5
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_EM_LIN5 17.11.04
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A EM Linearmotor asynchron Kurzstator Wirbel
:D EM-Praktikum Linearmotor asynchron Kurzstator Wirbel
Men_Voreb
Sep_
Men_Geneeb
Sep_
Men_Aendeb
Sep_
Men_Loeseb
Sep_
Men_Ausweb
:E END
:!!
:N Men_Voreb
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Voreb 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Linearmotor asynchron Kurzstator Wirbel
:D EM-Praktikum Linearmotor asynchron Kurzstator Wirbel
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Linearmotor asynchron Kurzstator Wirbel-
Fnc_Voreb1
Fnc_Voreb2
Fnc_Voreb3
Fnc_Voreb3b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Voreb1
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voreb1 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Rotordaten Linearmotor asynchron Kurzstator Wirbel
:H Hlp_EMD_VOREINe1
:D EM-Praktikum Linearmotor asynchron Kurzstator Wirbel
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Laueferblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,luft2
Fld_2
 Prm_Lufthoehe (luft2) [m]
 Typ_Real
DEF_*PAR(luft2)
Cmd_)*SET,eih2
Fld_2
 Prm_Eisenhoehe (eih2) [m]
 Typ_Real
DEF_*PAR(eih2)
Cmd_)*SET,cuh2
Fld_2
 Prm_Kupferhoehe (cuh2) [m]
 Typ_Real
DEF_*PAR(cuh2)
Fld_0
 Typ_Sep
Cmd_)*SET,Eisenrueck
Fld_2
 Prm_Eisenrueckschluss (ja=1)
 Typ_Real
DEF_*PAR(eisenrueck)
Cmd_)*SET,beidseit
Fld_2
 Prm_einseitig(=0)/beidseitig(=1)
 Typ_Real
DEF_*PAR(beidseit)
Fld_0
 Typ_Lab
 Prm_Bei beidseitigem Linearmotor muss
Fld_0
 Typ_Lab
 Prm_die Schienenstaerke halbiert werden
Cmd_)*SET,eisenlaeufer
Fld_2
 Prm_Eisenlaeufer (ja=1)
 Typ_Real
DEF_*PAR(eisenlaeufer)
Fld_0
 Typ_Sep
Cmd_)*SET,tiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(tiefe)
Cmd_)*SET,Delta
Fld_2
 Prm_Luftspalt (delta) [m]
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Cmd_)*SET,laenge
Fld_2
 Prm_Gesamtlaenge (laenge) [m]
 Typ_Real
DEF_*PAR(laenge)
Fld_0
 Typ_Sep
Cmd_)*SET,nsegr
Fld_2
 Prm_Anzahl unterteilter Segmente
 Typ_Real
DEF_*PAR(nsegr)
Fld_0
 Typ_Sep
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,BLDC1,0
Cmd_)KEYW,LINEAR5,1
CAL_REFRESH
:E END
:!!
:N Fnc_Voreb2
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voreb2 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statordaten Linearmotor asynchron Kurzstator Wirbel
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Statordaten Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+VOREIN1)
Inp_NoApply
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Eingabe der Statorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,jochd1
Fld_2
 Prm_jochhoehe (jochd1) [m]
 Typ_Real
DEF_*PAR(jochd1)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Voreb3b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voreb3b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut Linearmotor asynchron Kurzstator Wirbel
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Statornut Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nuten/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)*SET,eps
Fld_2
 Prm_Sehnung in Nuten
 Typ_Real
DEF_*PAR(eps)
Cmd_)*SET,kompakt
Fld_2
 Prm_Kompakt(=1)/Gedehnt(=0)
 Typ_Real
DEF_*PAR(kompakt)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Eingabe der Statornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,tn1
Fld_2
 Prm_Nutteilung (tn1)  [m]
 Typ_Real
DEF_*PAR(tn1)
Cmd_)*SET,bs1
Fld_2
 Prm_Schlitzbreite (bs1)  [m]
 Typ_Real
DEF_*PAR(bs1)
Cmd_)*SET,hs1
Fld_2
 Prm_Schlitzhoehe (hs1)  [m]
 Typ_Real
DEF_*PAR(hs1)
Cmd_)*SET,bk1o
Fld_2
 Prm_Breite Keil oben (bk1o)  [m]
 Typ_Real
DEF_*PAR(bk1o)
Cmd_)*SET,bk1u
Fld_2
 Prm_Breite Keil unten (bk1u)  [m]
 Typ_Real
DEF_*PAR(bk1u)
Cmd_)*SET,hk1
Fld_2
 Prm_Keilhoehe (hk1)  [m]
 Typ_Real
DEF_*PAR(hk1)
Cmd_)*SET,bn1
Fld_2
 Prm_Nutbreite (bn1)  [m]
 Typ_Real
DEF_*PAR(bn1)
Cmd_)*SET,hn1
Fld_2
 Prm_Nuthoehe (hn1)  [m]
 Typ_Real
DEF_*PAR(hn1)
Fld_0
  Typ_Sep
Cmd_)*SET,iso1
Fld_2
 Prm_Nut_Isolation (iso1)  [m]
 Typ_Real
DEF_*PAR(iso1)
Cmd_)*SET,wind1
Fld_2
 Prm_Windungszahl Staender
 Typ_Real
DEF_*PAR(wind1)
Cmd_)*SET,draht1
Fld_2
 Prm_Drahtstaerke Staender
 Typ_Real
DEF_*PAR(draht1)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:!!
:N Men_Geneeb
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Geneeb 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Linearmotor asynchron Kurzstator Wirbel
:D EM-Praktikum Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Linearmotor asynchron Kurzstator Wirbel-
Fnc_elementeeb
Fnc_materialeb
Fnc_rconeb
-Geometriegenerierung Rotor Linearmotor asynchron Kurzstator Wirbel-
Fnc_rotoreb
Fnc_rotorareaeb
Fnc_rotorattreb
-Vernetzung Rotor Linearmotor asynchron Kurzstator Wirbel-
Fnc_Voreb4
Fnc_netLINEAR5re
-Geometriegenerierung Stator Linearmotor asynchron Kurzstator Wirbel-
Fnc_statoreb
Fnc_statorareaeb
Fnc_statorattreb
-Vernetzung Stator Linearmotor asynchron Kurzstator Wirbel-
Fnc_netLINEAR5se
-Kopie der Nuten Linearmotor asynchron Kurzstator Wirbel-
Fnc_netLINEAR5sg
-Luecke Linearmotor asynchron Kurzstator Wirbel-
Fnc_fahrzeb
-Kopplungen Linearmotor asynchron Kurzstator Wirbel-
Fnc_cp1LINEAR5
Fnc_cp2LINEAR5
-Verschaltung Linearmotor asynchron Kurzstator Wirbel-
Fnc_Voreb5
Fnc_schalt1LIN5
Fnc_Voreb7
Fnc_schalt3LIN5
-Interface Linearmotor asynchron Kurzstator Wirbel-
Fnc_randeb
Fnc_interfaceeb
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeeb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeeb
:C )/GO
:A Elementdefinition Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Elementdefinition Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Linearmotor asynchron Kurzstator Wirbel
Cmd_)lin_asyn_kurzw_elemente.mac
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialeb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialeb
:C )/GO
:A Materialdefinition Linearmotor asynchron Kurzstator Wirbel
:H Hlp_material
:D Materialdefinition Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Linearmotor asynchron Kurzstator Wirbel
Cmd_)*SET,murx1
Fld_2
 Prm_muer Stator
 Typ_Real
 Def_*PAR(murx1)
Cmd_)*SET,murx2
Fld_2
 Prm_muer Rotor
 Typ_Real
 Def_*PAR(murx2)
Cmd_)*SET,leit1
Fld_2
 Prm_Leitfaehigkeit Stator [S/m]
 Typ_Real
 Def_*PAR(leit1)
Cmd_)*SET,leit2
Fld_2
 Prm_Leitfaehigkeit Rotor [S/m]
 Typ_Real
 Def_*PAR(leit2)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)lin_asyn_kurzw_material.mac
Cmd_)KEYW,DEFI2a,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_rconeb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rconeb
:C )/GO
:A Reale Konstanten Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Reale Konstanten Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+DEFI2a)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Reale Konstanten Linearmotor asynchron Kurzstator Wirbel
Cmd_)lin_asyn_kurzw_rcon.mac
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI2a,0
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotoreb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotoreb
:C )/GO
:A Generierung Rotornut Linearmotor asynchron Kurzstator Wirbel
:H Hlp_statorh
:D Generierung Rotornut Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornut
Cmd_)lin_asyn_kurzw_geo1.mac
Cmd_)KEYW,DEFI2,0
Cmd_)KEYW,DEFI3,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorareaeb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorareaeb
:C )/GO
:A Generierung Rotornutflaechen Linearmotor asynchron Kurzstator Wirbel
:H Hlp_statornut
:D Generierung Rotornutflaechen Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+DEFI3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornutflaechen
Cmd_)lin_asyn_kurzw_area1.mac
Cmd_)KEYW,DEFI3,0
Cmd_)KEYW,DEFI4,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorattreb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorattreb
:C )/GO
:A Attribute Rotor Linearmotor asynchron Kurzstator Wirbel
:H Hlp_Rotornut
:D Attribute Rotor Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+DEFI4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Rotor
Cmd_)lin_asyn_kurzw_attr1.mac
Cmd_)KEYW,DEFI4,0
Cmd_)KEYW,GEO1,1
Cal_REFRESH
:E END
:!!
:N Fnc_Voreb4
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voreb4 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Linearmotor asynchron Kurzstator Wirbel
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
CAL_REFRESH
:E END
:!!
:N Fnc_netLINEAR5re
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR5re
:C )/GO
:A Netzgenerierung Rotor Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Netzgenerierung Rotor Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)lin_asyn_kurzw_mesh1.mac
Cmd_)KEYW,ROTOR,1
Cmd_)KEYW,GEO,0
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statoreb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statoreb
:C )/GO
:A Generierung Stator Linearmotor asynchron Kurzstator Wirbel
:H Hlp_stator
:D Generierung Stator Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+ROTOR)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Stator
Cmd_)lin_asyn_kurzw_geo2.mac
Cmd_)KEYW,ROTOR,0
Cmd_)KEYW,GEO4,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorareaeb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorareaeb
:C )/GO
:A Generierung Statorflaechen Linearmotor asynchron Kurzstator Wirbel
:H Hlp_statore
:D Generierung Statorflaechen Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+GEO4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Stator Flaechen
Cmd_)lin_asyn_kurzw_area2.mac
Cmd_)KEYW,GEO4,0
Cmd_)KEYW,GEO5,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorattreb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorattreb
:C )/GO
:A Attribute Stator Linearmotor asynchron Kurzstator Wirbel
:H Hlp_rotore
:D Attribute Stator Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+GEO5)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Stator
Cmd_)lin_asyn_kurzw_attr2.mac
Cmd_)KEYW,GEO5,0
Cmd_)KEYW,GEO6,1
Cal_REFRESH
:E END
:!!
:N Fnc_realLINEAR5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_realLINEAR5
:C )/GO
:A Reale Konstanten Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Reale Konstanten Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+REAL1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Reale Konstanten Stator
Cmd_)lin_asyn_kurzw_real1.txt
Cmd_)KEYW,REAL1,0
Cmd_)KEYW,NETZG,1
Cmd_)KEYW,GEO,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR5se
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR5se
:C )/GO
:A Netzgenerierung Stator Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+GEO6)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_asyn_kurzw_mesh2.mac
Cmd_)KEYW,GEO6,0
Cmd_)KEYW,GEO7,1
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR5sg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR5sg
:C )/GO
:A Netzgenerierung Stator Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+GEO7)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_asyn_kurzw_meshg2.mac
Cmd_)KEYW,GEO8,1
Cmd_)KEYW,GEO7,0
Cal_REFRESH
:E END
:!!
:N Fnc_fahrzeb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_fahrzeb
:C )/GO
:A Luecke Linearmotor asynchron Kurzstator Wirbel
:H Hlp_klotzea
:D Luecke Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+GEO8)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Luecke
Cmd_)lin_asyn_kurzw_fahrz.mac
Cmd_)KEYW,GEO8,0
Cmd_)KEYW,KOPP1,1
Cal_REFRESH
:E END
:!!
:N Fnc_cp1LINEAR5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cp1LINEAR5
:C )/GO
:A Kopplungen Stator Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Kopplungen Stator Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)lin_asyn_kurzw_cp1.mac
Cmd_)KEYW,KOPP1,0
Cmd_)KEYW,schalt,1
Cal_REFRESH
:E END
:!!
:N Fnc_Voreb5
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voreb5 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Sch-Parameter Stator Linearmotor asynchron Kurzstator Wirbel
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Sch-Parameter Stator Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rspul1
Fld_2
 Prm_Spulenstirnwiderstand  [Ohm]
 Typ_Real
DEF_*PAR(rspul1)
Cmd_)*SET,lspul1
Fld_2
 Prm_Spulenstirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lspul1)
Cmd_)KEYW,SCHALT,0
Cmd_)KEYW,SCHALT1,1
CAL_REFRESH
:E END
:!!
:N Fnc_schalt1LIN5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt1LIN5
:C )/GO
:A Verschaltung Stator Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Verschaltung Stator Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)lin_asyn_kurzw_schalt1.mac
Cmd_)KEYW,SCHALT1,0
Cmd_)KEYW,SCHALT2,1
Cal_REFRESH
:E END
:!!
:N Fnc_Voreb7
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voreb7 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Sch.-Parameter Stator Linearmotor asynchron Kurzstator Wirbel
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Sch.-Parameter Stator Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Verschaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rleit1
Fld_2
 Prm_Leitungswiderstand  [Ohm]
 Typ_Real
DEF_*PAR(rleit1)
Cmd_)*SET,lleit1
Fld_2
 Prm_Leitungsinduktivitaet [H]
 Typ_Real
DEF_*PAR(lleit1)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Schaltungsart
 Typ_Lis_RadioB
 Lis_Stern,0
 Lis_Dreieck,1
DEF_*PAR(sterndreieck)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT2,0
Cmd_)KEYW,SCHALT3,1
CAL_REFRESH
:E END
:!!
:N Fnc_schalt3LIN5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt3LIN5
:C )/GO
:A Anschlu Stator Linearmotor synchron Langstator Wirbel
:H Hlp_elemente
:D Verschaltung Stator Linearmotor synchron Langstator Wirbel
:K #(LINEAR5+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)lin_asyn_kurzw_schalts2.mac
Cmd_)KEYW,SCHALT3,0
Cmd_)KEYW,INTERF1,1
Cal_REFRESH
:E END
:!!
:N Fnc_randeb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_randeb
:C )/GO
:A Randbedingung Stator/Rotor Linearmotor synchron Langstator Wirbel
:H Hlp_elemente
:D Randbedingung Stator/Rotor Linearmotor synchron Langstator Wirbel
:K #(LINEAR5+INTERF1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)lin_asyn_kurzw_rand.mac
Cmd_)KEYW,INTERF1,0
Cmd_)KEYW,INTERF2,1
Cal_REFRESH
:E END
:!!
:N Fnc_interfaceeb
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interfaceeb
:C )/GO
:A Interface Stator/Rotor Linearmotor synchron Langstator Wirbel
:H Hlp_elemente
:D Interface Stator/Rotor Linearmotor synchron Langstator Wirbel
:K #(LINEAR5+INTERF2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface/Randbedingung Stator/Rotor
Cmd_)lin_asyn_kurzw_interf.mac
Cmd_)KEYW,INTERF2,0
Cmd_)KEYW,FERTIG,1
Cal_REFRESH
:E END
:!!
:N Men_Loeseb
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loeseb 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Linearmotor asynchron Kurzstator Wirbel
:D Loesung Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+FERTIG)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Linearmotor asynchron Kurzstator Wirbel-
Fnc_ausLINEAR5
-Statische Rechnung Linearmotor asynchron Kurzstator Wirbel-
Fnc_loes1LINEAR5
Fnc_loes2LINEAR5
-Harmonische Rechnung Linearmotor asynchron Kurzstator Wirbel-
Fnc_loes3LINEAR5
Fnc_loes4LINEAR5
-Transiente Rechnung Linearmotor synchron Langstator Wirbel-
Fnc_loes5LINEAR5
Fnc_loes6LINEAR5
Fnc_loes7LINEAR5
Fnc_loes8LINEAR5
Fnc_loes9LINEAR5
Fnc_loes10LINEAR5
:E END
:!!
:N Fnc_ausLINEAR5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausLINEAR5
:C )/GO
:A Ausgabedefinition Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Ausgabedefinition Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Linearmotor asynchron Kurzstator Wirbel
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)lin_asyn_kurzw_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1LINEAR5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1LINEAR5
:C )/GO
:A Einzelschrittrechnung Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Einzelvollschrittrechnung Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelvollschrittrechnung (Stromquellen)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I_1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurzw_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2LINEAR5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2LINEAR5
:C )/GO
:A Mehrschrittrechnung Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Mehrschrittrechnung Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung (Stromquellen)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I_1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurzw_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3LINEAR5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3LINEAR5
:C )/GO
:A Harmonische Rechnung Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Harmonische Rechnung Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Mehrschrittrechnung (Spannungsquellen)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurzw_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5LINEAR5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5LINEAR5
:C )/GO
:A Hochlauf-Rechnung Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Hochlauf-Rechnung Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR5+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlauf-Rechnung
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt tstep [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,speed0
Fld_2
 Prm_Anfangs-Geschw. speed0 [m/s]
 Typ_Real
DEF_*PAR(speed0)
Fld_0
  Typ_Sep
Cmd_)*SET,massef
Fld_2
 Prm_Beschl. Masse [kg]
 Typ_Real
DEF_*PAR(massef)
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurzw_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6LINEAR5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6LINEAR5
:C )/GO
:A Hochlauf-Rechnung Linearmotor weiterrechnen
:H Hlp_elemente
:D Hochlauf-Rechnung Linearmotor weiterrechnen
:K #(LINEAR5+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlauf-Rechnung
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt tstep [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurzw_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7LINEAR5
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7LINEAR5
:C )/GO
:A Transiente Hochlauf-Rechnung feste Steigerung v
:H Hlp_elemente
:D Transiente Hochlauf-Rechnung feste Steigerung v
:K #(LINEAR5+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlaufrechnung (feste Geschwindigkeiten)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Einschwingrechnung
Cmd_)*SET,tstepse
Fld_2
 Prm_Zeitschritte zum Einschwingen
 Typ_Real
DEF_*PAR(tstepse)
Cmd_)*SET,iperiode
Fld_2
 Prm_Zeitschritte je Periode
 Typ_Real
DEF_*PAR(iperiode)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Zeitschritterhhung
Cmd_)*SET,iperiodp
Fld_2
 Prm_Zeitschritte zum Rechnen
 Typ_Real
DEF_*PAR(iperiodp)
Cmd_)*SET,iperiodi
Fld_2
 Prm_Zeitschritte je Erhhung
 Typ_Real
DEF_*PAR(iperiodi)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Rechnung bei Geschwindigkeiten
Cmd_)*SET,tstepsgs
Fld_2
 Prm_Zeitschritte einer Geschwindigkeit
 Typ_Real
DEF_*PAR(tstepsgs)
Cmd_)*SET,igeschw
Fld_2
 Prm_Anzahl Geschwindigkeiten
 Typ_Real
DEF_*PAR(igeschw)
Cmd_)*SET,geschwst
Fld_2
 Prm_Geschwindigkeitsaenderung [m/s]
 Typ_Real
DEF_*PAR(geschwst)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asyn_kurzw_loes7.txt
Cal_REFRESH
:E END
:!!
:N Men_Vorec
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vorec 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Linearmotor synchron Permanentmagnet
:D EM-Praktikum Linearmotor synchron Permanentmagnet
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Linearmotor synchron Permanentmagnet -
Fnc_Vorec1
Fnc_Vorec2
Fnc_Vorec3
Fnc_Vorec3b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vorec1
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorec1 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Rotordaten Linearmotor synchron Permanentmagnet
:H Hlp_EMD_VOREINe1
:D EM-Praktikum Linearmotor synchron Permanentmagnet
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Laueferblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,magnethoehe
Fld_2
 Prm_Magnethoehe (mh2) [m]
 Typ_Real
DEF_*PAR(magnethoehe)
Cmd_)*SET,magnetbreite
Fld_2
 Prm_Magnetbreite (mb2) [m]
 Typ_Real
DEF_*PAR(magnetbreite)
Cmd_)*SET,jochd2
Fld_2
 Prm_jochhoehe (jochd2) [m]
 Typ_Real
DEF_*PAR(jochd2)
Fld_0
 Typ_Sep
Cmd_)*SET,tiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(tiefe)
Cmd_)*SET,Delta
Fld_2
 Prm_Luftspalt (delta) [m]
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Cmd_)*SET,npolr
Fld_2
 Prm_Anzahl Magnetpolpaare
 Typ_Real
DEF_*PAR(npolr)
Fld_0
 Typ_Sep
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,BLDC1,0
Cmd_)KEYW,LINEAR6,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorec2
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorec2 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statordaten Linearmotor synchron Permanentmagnet
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Statordaten Linearmotor synchron Permanentmagnet
:K #(LINEAR6+VOREIN1)
Inp_NoApply
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Eingabe der Statorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,jochd1
Fld_2
 Prm_jochhoehe (jochd1) [m]
 Typ_Real
DEF_*PAR(jochd1)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vorec3b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorec3b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut Linearmotor asynchron Kurzstator Wirbel
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Statornut Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR6+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Nuten/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)*SET,eps
Fld_2
 Prm_Sehnung in Nuten
 Typ_Real
DEF_*PAR(eps)
Cmd_)*SET,kompakt
Fld_2
 Prm_Kompakt(=1)/Gedehnt(=0)
 Typ_Real
DEF_*PAR(kompakt)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Eingabe der Statornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,tn1
Fld_2
 Prm_Nutteilung (tn1)  [m]
 Typ_Real
DEF_*PAR(tn1)
Cmd_)*SET,bs1
Fld_2
 Prm_Schlitzbreite (bs1)  [m]
 Typ_Real
DEF_*PAR(bs1)
Cmd_)*SET,hs1
Fld_2
 Prm_Schlitzhoehe (hs1)  [m]
 Typ_Real
DEF_*PAR(hs1)
Cmd_)*SET,bk1o
Fld_2
 Prm_Breite Keil oben (bk1o)  [m]
 Typ_Real
DEF_*PAR(bk1o)
Cmd_)*SET,bk1u
Fld_2
 Prm_Breite Keil unten (bk1u)  [m]
 Typ_Real
DEF_*PAR(bk1u)
Cmd_)*SET,hk1
Fld_2
 Prm_Keilhoehe (hk1)  [m]
 Typ_Real
DEF_*PAR(hk1)
Cmd_)*SET,bn1
Fld_2
 Prm_Nutbreite (bn1)  [m]
 Typ_Real
DEF_*PAR(bn1)
Cmd_)*SET,hn1
Fld_2
 Prm_Nuthoehe (hn1)  [m]
 Typ_Real
DEF_*PAR(hn1)
Fld_0
  Typ_Sep
Cmd_)*SET,iso1
Fld_2
 Prm_Nut_Isolation (iso1)  [m]
 Typ_Real
DEF_*PAR(iso1)
Cmd_)*SET,wind1
Fld_2
 Prm_Windungszahl Staender
 Typ_Real
DEF_*PAR(wind1)
Cmd_)*SET,draht1
Fld_2
 Prm_Drahtstaerke Staender
 Typ_Real
DEF_*PAR(draht1)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:!!
:N Men_Geneec
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Geneec 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Linearmotor synchron Permanentmagnet
:D EM-Praktikum Linearmotor synchron Permanentmagnet
:K #(LINEAR6+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Linearmotor synchron Permanentmagnet-
Fnc_elementeec
Fnc_materialec
Fnc_rconec
-Geometriegenerierung Rotor Linearmotor synchron Permanentmagnet-
Fnc_rotorec
Fnc_rotorareaec
Fnc_rotorattrec
-Vernetzung Rotor Linearmotor synchron Permanentmagnet-
Fnc_Vorec4
Fnc_netLINEAR6re
-Geometriegenerierung Stator Linearmotor synchron Permanentmagnet-
Fnc_statorec
Fnc_statorareaec
Fnc_statorattrec
-Vernetzung Stator Linearmotor synchron Permanentmagnet-
Fnc_netLINEAR6se
-Kopie der Nuten Linearmotor synchron Permanentmagnet-
Fnc_netLINEAR6sg
Fnc_netLINEAR6rg
-Luecke Linearmotor synchron Permanentmagnet-
Fnc_fahrzec
-Kopplungen Linearmotor synchron Permanentmagnet-
Fnc_cp1LINEAR6
Fnc_cp2LINEAR6
-Verschaltung Linearmotor synchron Permanentmagnet-
Fnc_Vorec5
Fnc_schalt1LIN6
Fnc_Vorec7
Fnc_schalt3LIN6
-Interface Linearmotor synchron Permanentmagnet-
Fnc_randec
Fnc_interfaceec
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeec
:C )/GO
:A Elementdefinition Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Elementdefinition Linearmotor synchron Permanentmagnet
:K #(LINEAR6+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Linearmotor synchron Permanentmagnet
Cmd_)lin_syn_perm_elemente.mac
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialec
:C )/GO
:A Materialdefinition Linearmotor synchron Permanentmagnet
:H Hlp_material
:D Materialdefinition Linearmotor synchron Permanentmagnet
:K #(LINEAR6+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Linearmotor synchron Permanentmagnet
Cmd_)*SET,murx1
Fld_2
 Prm_muer Stator
 Typ_Real
 Def_*PAR(murx1)
Cmd_)*SET,murx2
Fld_2
 Prm_muer Rotor
 Typ_Real
 Def_*PAR(murx2)
Cmd_)*SET,leit1
Fld_2
 Prm_Leitfaehigkeit Stator [S/m]
 Typ_Real
 Def_*PAR(leit1)
Cmd_)*SET,murxmag
Fld_2
 Prm_muer Magnet
 Typ_Real
 Def_*PAR(murxmag)
Cmd_)*SET,koerz
Fld_2
 Prm_Koerzitivfeldstaerke Magnet
 Typ_Real
 Def_*PAR(koerz)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)lin_syn_perm_material.mac
Cmd_)KEYW,DEFI2a,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_rconec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rconec
:C )/GO
:A Reale Konstanten Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Reale Konstanten Linearmotor synchron Permanentmagnet
:K #(LINEAR6+DEFI2a)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Reale Konstanten Linearmotor synchron Permanentmagnet
Cmd_)lin_syn_perm_rcon.mac
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI2a,0
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotorec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorec
:C )/GO
:A Generierung Rotornut Linearmotor synchron Permanentmagnet
:H Hlp_statorh
:D Generierung Rotornut Linearmotor synchron Permanentmagnet
:K #(LINEAR6+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornut
Cmd_)lin_syn_perm_geo1.mac
Cmd_)KEYW,DEFI2,0
Cmd_)KEYW,DEFI3,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorareaec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorareaec
:C )/GO
:A Generierung Rotornutflaechen Linearmotor synchron Permanentmagnet
:H Hlp_statornut
:D Generierung Rotornutflaechen Linearmotor synchron Permanentmagnet
:K #(LINEAR6+DEFI3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornutflaechen
Cmd_)lin_syn_perm_area1.mac
Cmd_)KEYW,DEFI3,0
Cmd_)KEYW,DEFI4,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorattrec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorattrec
:C )/GO
:A Attribute Rotor Linearmotor synchron Permanentmagnet
:H Hlp_Rotornut
:D Attribute Rotor Linearmotor synchron Permanentmagnet
:K #(LINEAR6+DEFI4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Rotor
Cmd_)lin_syn_perm_attr1.mac
Cmd_)KEYW,DEFI4,0
Cmd_)KEYW,GEO1,1
Cal_REFRESH
:E END
:!!
:N Fnc_Vorec4
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorec4 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Linearmotor synchron Permanentmagnet
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter Linearmotor synchron Permanentmagnet
:K #(LINEAR6+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
CAL_REFRESH
:E END
:!!
:N Fnc_netLINEAR6re
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR6re
:C )/GO
:A Netzgenerierung Rotor Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Netzgenerierung Rotor Linearmotor synchron Permanentmagnet
:K #(LINEAR6+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)lin_syn_perm_mesh1.mac
Cmd_)KEYW,ROTOR,1
Cmd_)KEYW,GEO,0
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statorec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorec
:C )/GO
:A Generierung Stator Linearmotor synchron Permanentmagnet
:H Hlp_stator
:D Generierung Stator Linearmotor synchron Permanentmagnet
:K #(LINEAR6+ROTOR)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Stator
Cmd_)lin_syn_perm_geo2.mac
Cmd_)KEYW,ROTOR,0
Cmd_)KEYW,GEO4,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorareaec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorareaec
:C )/GO
:A Generierung Statorflaechen Linearmotor synchron Permanentmagnet
:H Hlp_statore
:D Generierung Statorflaechen Linearmotor synchron Permanentmagnet
:K #(LINEAR6+GEO4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Stator Flaechen
Cmd_)lin_syn_perm_area2.mac
Cmd_)KEYW,GEO4,0
Cmd_)KEYW,GEO5,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorattrec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorattrec
:C )/GO
:A Attribute Stator Linearmotor synchron Permanentmagnet
:H Hlp_rotore
:D Attribute Stator Linearmotor synchron Permanentmagnet
:K #(LINEAR6+GEO5)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Stator
Cmd_)lin_syn_perm_attr2.mac
Cmd_)KEYW,GEO5,0
Cmd_)KEYW,GEO6,1
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR6se
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR6se
:C )/GO
:A Netzgenerierung Stator Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor synchron Permanentmagnet
:K #(LINEAR6+GEO6)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_syn_perm_mesh2.mac
Cmd_)KEYW,GEO6,0
Cmd_)KEYW,GEO7,1
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR6sg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR6sg
:C )/GO
:A Netzgenerierung Stator Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor synchron Permanentmagnet
:K #(LINEAR6+GEO7)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_syn_perm_meshg1.mac
Cmd_)KEYW,GEO8,1
Cmd_)KEYW,GEO7,0
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR6rg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR6rg
:C )/GO
:A Netzgenerierung Rotor Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Netzgenerierung Rotor Linearmotor synchron Permanentmagnet
:K #(LINEAR6+GEO8)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_syn_perm_meshg2.mac
Cmd_)KEYW,GEO9,1
Cmd_)KEYW,GEO8,0
Cal_REFRESH
:E END
:!!
:N Fnc_fahrzec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_fahrzec
:C )/GO
:A Luecke Linearmotor synchron Permanentmagnet
:H Hlp_klotzea
:D Luecke Linearmotor synchron Permanentmagnet
:K #(LINEAR6+GEO9)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Luecke
Cmd_)lin_syn_perm_fahrz.mac
Cmd_)KEYW,GEO9,0
Cmd_)KEYW,KOPP1,1
Cal_REFRESH
:E END
:!!
:N Fnc_cp1LINEAR6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cp1LINEAR6
:C )/GO
:A Kopplungen Stator Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Kopplungen Stator Linearmotor synchron Permanentmagnet
:K #(LINEAR6+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)lin_syn_perm_cp1.mac
Cmd_)KEYW,KOPP1,0
Cmd_)KEYW,schalt,1
Cal_REFRESH
:E END
:!!
:N Fnc_Vorec5
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorec5 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Sch-Parameter Stator Linearmotor synchron Permanentmagnet
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Sch-Parameter Stator Linearmotor synchron Permanentmagnet
:K #(LINEAR6+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rspul1
Fld_2
 Prm_Spulenstirnwiderstand  [Ohm]
 Typ_Real
DEF_*PAR(rspul1)
Cmd_)*SET,lspul1
Fld_2
 Prm_Spulenstirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lspul1)
Cmd_)KEYW,SCHALT,0
Cmd_)KEYW,SCHALT1,1
CAL_REFRESH
:E END
:!!
:N Fnc_schalt1LIN6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt1LIN6
:C )/GO
:A Verschaltung Stator Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Verschaltung Stator Linearmotor synchron Permanentmagnet
:K #(LINEAR6+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)lin_syn_perm_schalt1.mac
Cmd_)KEYW,SCHALT1,0
Cmd_)KEYW,SCHALT2,1
Cal_REFRESH
:E END
:!!
:N Fnc_Vorec7
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vorec7 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Sch.-Parameter Stator Linearmotor synchron Permanentmagnet
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Sch.-Parameter Stator Linearmotor synchron Permanentmagnet
:K #(LINEAR6+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Verschaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rleit1
Fld_2
 Prm_Leitungswiderstand  [Ohm]
 Typ_Real
DEF_*PAR(rleit1)
Cmd_)*SET,lleit1
Fld_2
 Prm_Leitungsinduktivitaet [H]
 Typ_Real
DEF_*PAR(lleit1)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Schaltungsart
 Typ_Lis_RadioB
 Lis_Stern,0
 Lis_Dreieck,1
DEF_*PAR(sterndreieck)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT2,0
Cmd_)KEYW,SCHALT3,1
CAL_REFRESH
:E END
:!!
:N Fnc_schalt3LIN6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt3LIN6
:C )/GO
:A Anschlu Stator Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Verschaltung Stator Linearmotor synchron Permanentmagnet
:K #(LINEAR6+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)lin_syn_perm_schalts2.mac
Cmd_)KEYW,SCHALT3,0
Cmd_)KEYW,INTERF1,1
Cal_REFRESH
:E END
:!!
:N Fnc_randec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_randec
:C )/GO
:A Randbedingung Stator/Rotor Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Randbedingung Stator/Rotor Linearmotor synchron Permanentmagnet
:K #(LINEAR6+INTERF1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)lin_syn_perm_rand.mac
Cmd_)KEYW,INTERF1,0
Cmd_)KEYW,INTERF2,1
Cal_REFRESH
:E END
:!!
:N Fnc_interfaceec
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interfaceec
:C )/GO
:A Interface Stator/Rotor Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Interface Stator/Rotor Linearmotor synchron Permanentmagnet
:K #(LINEAR6+INTERF2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface/Randbedingung Stator/Rotor
Cmd_)lin_syn_perm_interf.mac
Cmd_)KEYW,INTERF2,0
Cmd_)KEYW,FERTIG,1
Cal_REFRESH
:E END
:!!
:N Men_Loesec
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loesec 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Linearmotor synchron Permanentmagnet
:D Loesung Linearmotor synchron Permanentmagnet
:K #(LINEAR6+FERTIG)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Linearmotor synchron Permanentmagnet-
Fnc_ausLINEAR6
-Statische Rechnung Linearmotor synchron Permanentmagnet-
Fnc_loes1LINEAR6
Fnc_loes2LINEAR6
Fnc_loes3LINEAR6
Fnc_loes4LINEAR6
-Transiente Rechnung Linearmotor synchron Permanentmagnet-
Fnc_loes5LINEAR6
Fnc_loes6LINEAR6
Fnc_loes7LINEAR6
Fnc_loes8LINEAR6
Fnc_loes9LINEAR6
Fnc_loes10LINEAR6
:E END
:!!
:N Fnc_ausLINEAR6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausLINEAR5
:C )/GO
:A Ausgabedefinition Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Ausgabedefinition Linearmotor synchron Permanentmagnet
:K #(LINEAR6+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Linearmotor synchron Permanentmagnet
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)lin_syn_perm_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1LINEAR6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1LINEAR6
:C )/GO
:A Einzelschrittrechnung Lin. syn. Perm. (Strom+Magnete)
:H Hlp_elemente
:D Einzelschrittrechnung Lin. syn. Perm. (Strom+Magnete)
:K #(LINEAR6+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelvollschrittrechnung (Stromquellen+Magnet)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I_1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_syn_perm_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2LINEAR6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2LINEAR6
:C )/GO
:A Mehrschrittrechnung Lin. syn. Perm. (nur Strom)
:H Hlp_elemente
:D Mehrschrittrechnung Lin. syn. Perm. (nur Strom)
:K #(LINEAR6+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung (nur Stromquellen)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I_1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_syn_perm_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3LINEAR6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3LINEAR6
:C )/GO
:A Mehrschrittrechnung Lin. syn. Perm. (nur Magnete)
:H Hlp_elemente
:D Mehrschrittrechnung Lin. syn. Perm. (nur Magnete)
:K #(LINEAR6+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung (nur Magnete)
Fld_0
  Typ_Sep
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_syn_perm_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes4LINEAR6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes4LINEAR6
:C )/GO
:A Mehrschrittrechnung Lin. syn. Perm. (Strom+Magnete)
:H Hlp_elemente
:D Mehrschrittrechnung Lin. syn. Perm. (Strom+Magnete)
:K #(LINEAR6+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung (Stromquellen+Magnete)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I_1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_syn_perm_loes4.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5LINEAR6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5LINEAR6
:C )/GO
:A Hochlauf-Rechnung Linearmotor synchron Permanentmagnet
:H Hlp_elemente
:D Hochlauf-Rechnung Linearmotor synchron Permanentmagnet
:K #(LINEAR6+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlauf-Rechnung
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt tstep [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,speed0
Fld_2
 Prm_Anfangs-Geschw. speed0 [m/s]
 Typ_Real
DEF_*PAR(speed0)
Fld_0
  Typ_Sep
Cmd_)*SET,massef
Fld_2
 Prm_Beschl. Masse [kg]
 Typ_Real
DEF_*PAR(massef)
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_syn_perm_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6LINEAR6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6LINEAR6
:C )/GO
:A Hochlauf-Rechnung Linearmotor weiterrechnen
:H Hlp_elemente
:D Hochlauf-Rechnung Linearmotor weiterrechnen
:K #(LINEAR6+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlauf-Rechnung
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt tstep [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_syn_perm_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7LINEAR6
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7LINEAR6
:C )/GO
:A Transiente Hochlauf-Rechnung feste Steigerung v
:H Hlp_elemente
:D Transiente Hochlauf-Rechnung feste Steigerung v
:K #(LINEAR6+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlaufrechnung (feste Geschwindigkeiten)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Einschwingrechnung
Cmd_)*SET,tstepse
Fld_2
 Prm_Zeitschritte zum Einschwingen
 Typ_Real
DEF_*PAR(tstepse)
Cmd_)*SET,iperiode
Fld_2
 Prm_Zeitschritte je Periode
 Typ_Real
DEF_*PAR(iperiode)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Zeitschritterhhung
Cmd_)*SET,iperiodp
Fld_2
 Prm_Zeitschritte zum Rechnen
 Typ_Real
DEF_*PAR(iperiodp)
Cmd_)*SET,iperiodi
Fld_2
 Prm_Zeitschritte je Erhhung
 Typ_Real
DEF_*PAR(iperiodi)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Rechnung bei Geschwindigkeiten
Cmd_)*SET,tstepsgs
Fld_2
 Prm_Zeitschritte einer Geschwindigkeit
 Typ_Real
DEF_*PAR(tstepsgs)
Cmd_)*SET,igeschw
Fld_2
 Prm_Anzahl Geschwindigkeiten
 Typ_Real
DEF_*PAR(igeschw)
Cmd_)*SET,geschwst
Fld_2
 Prm_Geschwindigkeitsaenderung [m/s]
 Typ_Real
DEF_*PAR(geschwst)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_syn_perm_loes7.txt
Cal_REFRESH
:E END
:!!
:N Men_Vored
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Vored 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Voreinstellung Linearmotor asyn Zahn Kurzstator Wirbel
:D EM-Praktikum Linearmotor asyn Zahn Kurzstator Wirbel
Fnc_EMM_HIN
Sep_
- Einlesen -
Fnc_Rpar1
-Praeferenzen Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_Vored1
Fnc_Vored2
Fnc_Vored3
Fnc_Vored3b
- Sichern -
Fnc_Wpar1
:E END
:!!
:N Fnc_Vored1
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vored1 22.02.2000
:C )! Einstellungen Standard fuer Stator u Rotor
:C )/GO
:A Rotordaten Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_EMD_VOREINd1
:D EM-Praktikum Linearmotor asyn Zahn Kurzstator Wirbel
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Laueferblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,luft2
Fld_2
 Prm_Lufthoehe (luft2) [m]
 Typ_Real
DEF_*PAR(luft2)
Cmd_)*SET,eih2
Fld_2
 Prm_Eisenhoehe (eih2) [m]
 Typ_Real
DEF_*PAR(eih2)
Cmd_)*SET,cuh2
Fld_2
 Prm_Kupferhoehe (cuh2) [m]
 Typ_Real
DEF_*PAR(cuh2)
Fld_0
 Typ_Sep
Cmd_)*SET,Eisenrueck
Fld_2
 Prm_Eisenrueckschluss (ja=1)
 Typ_Real
DEF_*PAR(eisenrueck)
Cmd_)*SET,beidseit
Fld_2
 Prm_einseitig(=0)/beidseitig(=1)
 Typ_Real
DEF_*PAR(beidseit)
Fld_0
 Typ_Lab
 Prm_Bei beidseitigem Linearmotor muss
Fld_0
 Typ_Lab
 Prm_die Schienenstaerke halbiert werden
Cmd_)*SET,eisenlaeufer
Fld_2
 Prm_Eisenlaeufer (ja=1)
 Typ_Real
DEF_*PAR(eisenlaeufer)
Fld_0
 Typ_Sep
Cmd_)*SET,tiefe
Fld_2
 Prm_Jochtiefe (lfe)
 Typ_Real
DEF_*PAR(tiefe)
Cmd_)*SET,Delta
Fld_2
 Prm_Luftspalt (delta) [m]
 Typ_Real
DEF_*PAR(delta)
Fld_0
 Typ_Sep
Cmd_)*SET,laenge
Fld_2
 Prm_Gesamtlaenge (laenge) [m]
 Typ_Real
DEF_*PAR(laenge)
Fld_0
 Typ_Sep
Cmd_)*SET,nsegr
Fld_2
 Prm_Anzahl unterteilter Segmente
 Typ_Real
DEF_*PAR(nsegr)
Fld_0
 Typ_Sep
Cmd_)KEYW,VOREIN1,1
Cmd_)KEYW,TRAFO1,0
Cmd_)KEYW,TRAFO2,0
Cmd_)KEYW,DREH,0
Cmd_)KEYW,BLDC1,0
Cmd_)KEYW,LINEAR7,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vored2
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voreb2 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statordaten Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_EMD_VOREIN1
:D EM-Praktikum Statordaten Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+VOREIN1)
Inp_NoApply
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Eingabe der Statorblechgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,jochd1
Fld_2
 Prm_jochhoehe unter Zahn (jochd1) [m]
 Typ_Real
DEF_*PAR(jochd1)
Cmd_)KEYW,VOREIN3,1
CAL_REFRESH
:E END
:!!
:N Fnc_Vored3b
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Voreb3b 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Statornut Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_EMD_VOREIN3b
:D EM-Praktikum Statornut Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+VOREIN3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Angaben zur Drehstromwicklung
Cmd_)*SET,m
Fld_2
 Prm_Strangzahl
 Typ_Real
DEF_*PAR(m)
Cmd_)*SET,p
Fld_2
 Prm_Polpaarzahl (p)
 Typ_Real
DEF_*PAR(p)
Cmd_)*SET,q
Fld_2
 Prm_Zaehne/Pol/Phase (q)
 Typ_Real
DEF_*PAR(q)
Cmd_)*SET,kompakt
Fld_2
 Prm_Kompakt(=1)/Gedehnt(=0)
 Typ_Real
DEF_*PAR(kompakt)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Eingabe der Statornutgeometrie
Fld_0
  Typ_Sep
Cmd_)*SET,tn1
Fld_2
 Prm_Nutteilung (tn1)  [m]
 Typ_Real
DEF_*PAR(tn1)
Cmd_)*SET,bs1
Fld_2
 Prm_Schlitzbreite oben (bs1)  [m]
 Typ_Real
DEF_*PAR(bs1)
Cmd_)*SET,hs1
Fld_2
 Prm_Schlitzhoehe (hs1)  [m]
 Typ_Real
DEF_*PAR(hs1)
Cmd_)*SET,bk1o
Fld_2
 Prm_Breite Keil oben (bk1o)  [m]
 Typ_Real
DEF_*PAR(bk1o)
Cmd_)*SET,bk1u
Fld_2
 Prm_Breite Keil unten (bk1u)  [m]
 Typ_Real
DEF_*PAR(bk1u)
Cmd_)*SET,hk1
Fld_2
 Prm_Keilhoehe (hk1)  [m]
 Typ_Real
DEF_*PAR(hk1)
Cmd_)*SET,bn1
Fld_2
 Prm_Nutbreite (bn1)  [m]
 Typ_Real
DEF_*PAR(bn1)
Cmd_)*SET,hn1
Fld_2
 Prm_Nuthoehe (hn1)  [m]
 Typ_Real
DEF_*PAR(hn1)
Fld_0
  Typ_Sep
Cmd_)*SET,iso1
Fld_2
 Prm_Spulen_Isolation (iso1)  [m]
 Typ_Real
DEF_*PAR(iso1)
Cmd_)*SET,wind1
Fld_2
 Prm_Windungszahl Staender
 Typ_Real
DEF_*PAR(wind1)
Cmd_)*SET,draht1
Fld_2
 Prm_Drahtstaerke Staender
 Typ_Real
DEF_*PAR(draht1)
Cmd_)KEYW,VOREIN4,1
Cmd_)KEYW,DATEN,1
CAL_REFRESH
:E END
:!!
:N Men_Geneed
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Geneed 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Generierung Linearmotor asyn Zahn Kurzstator Wirbel
:D EM-Praktikum Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+DATEN)
Fnc_EMM_HIN
Sep_
-Definition Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_elementeed
Fnc_materialed
Fnc_rconed
-Geometriegenerierung Rotor Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_rotored
Fnc_rotorareaed
Fnc_rotorattred
-Vernetzung Rotor Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_Vored4
Fnc_netLINEAR7re
-Geometriegenerierung Stator Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_statored
Fnc_statorareaed
Fnc_statorattred
-Vernetzung Stator Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_netLINEAR7se
-Kopie der Nuten Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_netLINEAR7sg
-Luecke Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_fahrzed
-Kopplungen Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_cp1LINEAR7
Fnc_cp2LINEAR7
-Verschaltung Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_Vored5
Fnc_schalt1LIN7
Fnc_Vored7
Fnc_schalt3LIN7
-Interface Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_randed
Fnc_interfaceed
-Sichern-
Fnc_Wpar1
:E END
:!!
:N Fnc_elementeed
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_elementeed
:C )/GO
:A Elementdefinition Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_elemente
:D Elementdefinition Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+VOREIN4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Elementdefinition Linearmotor asyn Zahn Kurzstator Wirbel
Cmd_)lin_asynz_kurzw_elemente.mac
Cmd_)KEYW,DEFI1,1
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_materialed
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_materialed
:C )/GO
:A Materialdefinition Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_material
:D Materialdefinition Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+DEFI1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Materialdefinition Linearmotor asyn Zahn Kurzstator Wirbel
Cmd_)*SET,murx1
Fld_2
 Prm_muer Stator
 Typ_Real
 Def_*PAR(murx1)
Cmd_)*SET,murx2
Fld_2
 Prm_muer Rotor
 Typ_Real
 Def_*PAR(murx2)
Cmd_)*SET,leit1
Fld_2
 Prm_Leitfaehigkeit Stator [S/m]
 Typ_Real
 Def_*PAR(leit1)
Cmd_)*SET,leit2
Fld_2
 Prm_Leitfaehigkeit Rotor [S/m]
 Typ_Real
 Def_*PAR(leit2)
Cmd_)*SET,nichtlin
Fld_2
 Prm_Lineares oder nichtlineares Eisen
 Typ_Lis_RadioB
 Lis_linear,0
 Lis_nichtlinear,1
 Def_*PAR(nichtlin)
Cmd_)lin_asynz_kurzw_material.mac
Cmd_)KEYW,DEFI2a,1
Cmd_)KEYW,DEFI1,0
Cal_REFRESH
:E END
:!!
:N Fnc_rconed
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rconed
:C )/GO
:A Reale Konstanten Linearmotor asynchron Kurzstator Wirbel
:H Hlp_elemente
:D Reale Konstanten Linearmotor asynchron Kurzstator Wirbel
:K #(LINEAR7+DEFI2a)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Reale Konstanten Linearmotor asyn Zahn Kurzstator Wirbel
Cmd_)lin_asynz_kurzw_rcon.mac
Cmd_)KEYW,DEFI2,1
Cmd_)KEYW,DEFI2a,0
Cmd_)KEYW,VOREIN1,0
Cmd_)KEYW,VOREIN2,0
Cmd_)KEYW,VOREIN3,0
Cmd_)KEYW,VOREIN4,0
Cal_REFRESH
:E END
:!!
:N Fnc_rotored
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotored
:C )/GO
:A Generierung Rotornut Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_statorh
:D Generierung Rotornut Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+DEFI2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornut
Cmd_)lin_asynz_kurzw_geo1.mac
Cmd_)KEYW,DEFI2,0
Cmd_)KEYW,DEFI3,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorareaed
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorareaed
:C )/GO
:A Generierung Rotornutflaechen Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_statornut
:D Generierung Rotornutflaechen Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+DEFI3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Rotornutflaechen
Cmd_)lin_asynz_kurzw_area1.mac
Cmd_)KEYW,DEFI3,0
Cmd_)KEYW,DEFI4,1
Cal_REFRESH
:E END
:!!
:N Fnc_rotorattred
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_rotorattred
:C )/GO
:A Attribute Rotor Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_Rotornut
:D Attribute Rotor Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+DEFI4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Rotor
Cmd_)lin_asynz_kurzw_attr1.mac
Cmd_)KEYW,DEFI4,0
Cmd_)KEYW,GEO1,1
Cal_REFRESH
:E END
:!!
:N Fnc_Vored4
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vored4 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Netzparameter Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_EMD_VOREIN4
:D EM-Praktikum Netzparameter Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+GEO1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Netzparameter
Fld_0
  Typ_Sep
Cmd_)*SET,mesheisen
Fld_2
 Prm_Maschenweite Eisen   [m]
 Typ_Real
DEF_*PAR(mesheisen)
Cmd_)*SET,meshluft
Fld_2
 Prm_Maschenweite Luft    [m]
 Typ_Real
DEF_*PAR(meshluft)
Cmd_)KEYW,NETZ1,1
Cmd_)KEYW,GEO1,0
CAL_REFRESH
:E END
:!!
:N Fnc_netLINEAR7re
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR7re
:C )/GO
:A Netzgenerierung Rotor Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_elemente
:D Netzgenerierung Rotor Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+NETZ1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Rotor
Cmd_)lin_asynz_kurzw_mesh1.mac
Cmd_)KEYW,ROTOR,1
Cmd_)KEYW,GEO,0
Cmd_)KEYW,NETZ1,0
Cal_REFRESH
:E END
:!!
:N Fnc_statored
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statored
:C )/GO
:A Generierung Stator Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_stator
:D Generierung Stator Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+ROTOR)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Stator
Cmd_)lin_asynz_kurzw_geo2.mac
Cmd_)KEYW,ROTOR,0
Cmd_)KEYW,GEO4,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorareaed
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorareaed
:C )/GO
:A Generierung Statorflaechen Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_statore
:D Generierung Statorflaechen Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+GEO4)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Stator Flaechen
Cmd_)lin_asynz_kurzw_area2.mac
Cmd_)KEYW,GEO4,0
Cmd_)KEYW,GEO5,1
Cal_REFRESH
:E END
:!!
:N Fnc_statorattred
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_statorattred
:C )/GO
:A Attribute Stator Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_rotore
:D Attribute Stator Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+GEO5)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Attribute Stator
Cmd_)lin_asynz_kurzw_attr2.mac
Cmd_)KEYW,GEO5,0
Cmd_)KEYW,GEO6,1
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR7se
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR7se
:C )/GO
:A Netzgenerierung Stator Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+GEO6)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_asynz_kurzw_mesh2.mac
Cmd_)KEYW,GEO6,0
Cmd_)KEYW,GEO7,1
Cal_REFRESH
:E END
:!!
:N Fnc_netLINEAR7sg
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_netLINEAR7sg
:C )/GO
:A Netzgenerierung Stator Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_elemente
:D Netzgenerierung Stator Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+GEO7)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Netzgenerierung Stator
Cmd_)lin_asynz_kurzw_meshg2.mac
Cmd_)KEYW,GEO8,1
Cmd_)KEYW,GEO7,0
Cal_REFRESH
:E END
:!!
:N Fnc_fahrzed
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_fahrzed
:C )/GO
:A Luecke Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_klotzed
:D Luecke Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+GEO8)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Generierung Luecke
Cmd_)lin_asynz_kurzw_fahrz.mac
Cmd_)KEYW,GEO8,0
Cmd_)KEYW,KOPP1,1
Cal_REFRESH
:E END
:!!
:N Fnc_cp1LINEAR7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_cp1LINEAR7
:C )/GO
:A Kopplungen Stator Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_elemente
:D Kopplungen Stator Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+KOPP1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Kopplungen in az, emf, curr
Cmd_)lin_asynz_kurzw_cp1.mac
Cmd_)KEYW,KOPP1,0
Cmd_)KEYW,schalt,1
Cal_REFRESH
:E END
:!!
:N Fnc_Vored5
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vored5 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Sch-Parameter Stator Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Sch-Parameter Stator Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+SCHALT)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Schaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rspul1
Fld_2
 Prm_Spulenstirnwiderstand  [Ohm]
 Typ_Real
DEF_*PAR(rspul1)
Cmd_)*SET,lspul1
Fld_2
 Prm_Spulenstirninduktivitaet [H]
 Typ_Real
DEF_*PAR(lspul1)
Cmd_)KEYW,SCHALT,0
Cmd_)KEYW,SCHALT1,1
CAL_REFRESH
:E END
:!!
:N Fnc_schalt1LIN7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt1LIN7
:C )/GO
:A Verschaltung Stator Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_elemente
:D Verschaltung Stator Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+SCHALT1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)lin_asynz_kurzw_schalt1.mac
Cmd_)KEYW,SCHALT1,0
Cmd_)KEYW,SCHALT2,1
Cal_REFRESH
:E END
:!!
:N Fnc_Vored7
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_Vored7 22.02.2000
:C )! Einstellungen Standard fuer UND (STATOR)u(ROTOR)
:C )/GO
:A Sch.-Parameter Stator Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_EMD_VOREIN5
:D EM-Praktikum Sch.-Parameter Stator Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+SCHALT2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Eingabe der Verschaltungsparameter des Stators
Fld_0
  Typ_Sep
Cmd_)*SET,rleit1
Fld_2
 Prm_Leitungswiderstand  [Ohm]
 Typ_Real
DEF_*PAR(rleit1)
Cmd_)*SET,lleit1
Fld_2
 Prm_Leitungsinduktivitaet [H]
 Typ_Real
DEF_*PAR(lleit1)
Cmd_)*SET,sterndreieck
Fld_2
 Prm_Schaltungsart
 Typ_Lis_RadioB
 Lis_Stern,0
 Lis_Dreieck,1
DEF_*PAR(sterndreieck)
Cmd_)*SET,vstern1
Fld_2
 Prm_Sternpunkt verschalten
 Typ_Lis_RadioB
 Lis_ja,1
 Lis_nein,0
DEF_*PAR(vstern1)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung   [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,freq
Fld_2
 Prm_Netzfrequenz     [Hz]
 Typ_Real
DEF_*PAR(freq)
Cmd_)KEYW,SCHALT2,0
Cmd_)KEYW,SCHALT3,1
CAL_REFRESH
:E END
:!!
:N Fnc_schalt3LIN7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_schalt3LIN7
:C )/GO
:A Anschlu Stator Linearmotor asyn Zahn Langstator Wirbel
:H Hlp_elemente
:D Verschaltung Stator Linearmotor asyn Zahn Langstator Wirbel
:K #(LINEAR7+SCHALT3)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Verschaltung Stator
Cmd_)lin_asynz_kurzw_schalts2.mac
Cmd_)KEYW,SCHALT3,0
Cmd_)KEYW,INTERF1,1
Cal_REFRESH
:E END
:!!
:N Fnc_randed
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_randed
:C )/GO
:A Randbedingung Stator/Rotor Linearmotor asyn Zahn Langstator Wirbel
:H Hlp_elemente
:D Randbedingung Stator/Rotor Linearmotor asyn Zahn Langstator Wirbel
:K #(LINEAR7+INTERF1)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface Stator/Rotor
Cmd_)lin_asynz_kurzw_rand.mac
Cmd_)KEYW,INTERF1,0
Cmd_)KEYW,INTERF2,1
Cal_REFRESH
:E END
:!!
:N Fnc_interfaceed
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_interfaceed
:C )/GO
:A Interface Stator/Rotor Linearmotor asyn Zahn Langstator Wirbel
:H Hlp_elemente
:D Interface Stator/Rotor Linearmotor asyn Zahn Langstator Wirbel
:K #(LINEAR7+INTERF2)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Interface/Randbedingung Stator/Rotor
Cmd_)lin_asynz_kurzw_interf.mac
Cmd_)KEYW,INTERF2,0
Cmd_)KEYW,FERTIG,1
Cal_REFRESH
:E END
:!!
:N Men_Loesed
:S      0,     0,     0
:T Menu
:C )/NOPR
:C )! Men_Loeseb 06.02.2001
:C )/uis,msgpop,3
:C )*GET,_z1,ACTIVE,,ROUTIN
:C )*IF,_z1,NE,17,THEN
:C )_z2='/PREP7'
:C )*ELSE
:C )_z2=')!'
:C )*ENDIF
:C %_z2%
:C /COM, 
:C /COM, EM-Praktikum V 2.0 
:C /COM, Prof. Dr. Aschendorf, FH Dortmund
:C /COM, fuer ANSYS RELEASE  ab  11.0
:C /COM, Letzte Aenderung am 14.01.2010
:C /COM,
:C /COM, Copyright Prof. Dr. Aschendorf
:C /COM, Nutzung erfordert Lizensierung durch Prof. Dr. Aschendorf
:C /COM,
:C )/GO
:A Loesung Linearmotor asyn Zahn Kurzstator Wirbel
:D Loesung Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+FERTIG)
Fnc_EMM_HIN
Sep_
-Ausgabedefinition Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_ausLINEAR7
-Statische Rechnung Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_loes1LINEAR7
Fnc_loes2LINEAR7
-Harmonische Rechnung Linearmotor asyn Zahn Kurzstator Wirbel-
Fnc_loes3LINEAR7
Fnc_loes4LINEAR7
-Transiente Rechnung Linearmotor asyn Zahn Langstator Wirbel-
Fnc_loes5LINEAR7
Fnc_loes6LINEAR7
Fnc_loes7LINEAR7
Fnc_loes8LINEAR7
Fnc_loes9LINEAR7
Fnc_loes10LINEAR7
:E END
:!!
:N Fnc_ausLINEAR7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_ausLINEAR7
:C )/GO
:A Ausgabedefinition Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_elemente
:D Ausgabedefinition Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Ausgabedefinition Linearmotor asyn Zahn Kurzstator Wirbel
Cmd_)*SET,ausgabe
Fld_2
 Prm_Ausgabenummer
 Typ_Real
DEF_*PAR(ausgabe)
Cmd_)*SET,luftskal
Fld_2
 Prm_Skalierung maximales Luftspaltfeld (in T)
 Typ_Real
DEF_*PAR(luftskal)
Cmd_)lin_asynz_kurzw_aus.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes1LINEAR7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes1LINEAR7
:C )/GO
:A Einzelschrittrechnung Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_elemente
:D Einzelvollschrittrechnung Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Einzelvollschrittrechnung (Stromquellen)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I_1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asynz_kurzw_loes1.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes2LINEAR7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes2LINEAR7
:C )/GO
:A Mehrschrittrechnung Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_elemente
:D Mehrschrittrechnung Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Statische Mehrschrittrechnung (Stromquellen)
Cmd_)*SET,i1
Fld_2
 Prm_Staenderstrom I_1 [A]
 Typ_Real
DEF_*PAR(i1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asynz_kurzw_loes2.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes3LINEAR7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes3LINEAR7
:C )/GO
:A Harmonische Rechnung Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_elemente
:D Harmonische Rechnung Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Harmonische Mehrschrittrechnung (Spannungsquellen)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,zeita
Fld_2
 Prm_Zeitpunkt  [s]
 Typ_Real
DEF_*PAR(zeita)
Fld_0
  Typ_Sep
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt  [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asynz_kurzw_loes3.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes5LINEAR7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes5LINEAR7
:C )/GO
:A Hochlauf-Rechnung Linearmotor asyn Zahn Kurzstator Wirbel
:H Hlp_elemente
:D Hochlauf-Rechnung Linearmotor asyn Zahn Kurzstator Wirbel
:K #(LINEAR7+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlauf-Rechnung
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt tstep [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,speed0
Fld_2
 Prm_Anfangs-Geschw. speed0 [m/s]
 Typ_Real
DEF_*PAR(speed0)
Fld_0
  Typ_Sep
Cmd_)*SET,massef
Fld_2
 Prm_Beschl. Masse [kg]
 Typ_Real
DEF_*PAR(massef)
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asynz_kurzw_loes5.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes6LINEAR7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes6LINEAR7
:C )/GO
:A Hochlauf-Rechnung Linearmotor weiterrechnen
:H Hlp_elemente
:D Hochlauf-Rechnung Linearmotor weiterrechnen
:K #(LINEAR7+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlauf-Rechnung
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Cmd_)*SET,tstep
Fld_2
 Prm_Zeitschritt tstep [s]
 Typ_Real
DEF_*PAR(tstep)
Cmd_)*SET,tsteps
Fld_2
 Prm_Zeitschrittanzahl
 Typ_Real
DEF_*PAR(tsteps)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asynz_kurzw_loes6.txt
Cal_REFRESH
:E END
:!!
:N Fnc_loes7LINEAR7
:S      0,     0,      0     0
:T Cmd
:C )/NOPR
:C )! Fnc_loes7LINEAR7
:C )/GO
:A Transiente Hochlauf-Rechnung feste Steigerung v
:H Hlp_elemente
:D Transiente Hochlauf-Rechnung feste Steigerung v
:K #(LINEAR7+FERTIG)
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Transiente Hochlaufrechnung (feste Geschwindigkeiten)
Cmd_)*SET,u1
Fld_2
 Prm_Staenderspannung U_1 [V]
 Typ_Real
DEF_*PAR(u1)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Einschwingrechnung
Cmd_)*SET,tstepse
Fld_2
 Prm_Zeitschritte zum Einschwingen
 Typ_Real
DEF_*PAR(tstepse)
Cmd_)*SET,iperiode
Fld_2
 Prm_Zeitschritte je Periode
 Typ_Real
DEF_*PAR(iperiode)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Zeitschritterhhung
Cmd_)*SET,iperiodp
Fld_2
 Prm_Zeitschritte zum Rechnen
 Typ_Real
DEF_*PAR(iperiodp)
Cmd_)*SET,iperiodi
Fld_2
 Prm_Zeitschritte je Erhhung
 Typ_Real
DEF_*PAR(iperiodi)
Fld_0
  Typ_Sep
Fld_0
 Typ_Lab
 Prm_Rechnung bei Geschwindigkeiten
Cmd_)*SET,tstepsgs
Fld_2
 Prm_Zeitschritte einer Geschwindigkeit
 Typ_Real
DEF_*PAR(tstepsgs)
Cmd_)*SET,igeschw
Fld_2
 Prm_Anzahl Geschwindigkeiten
 Typ_Real
DEF_*PAR(igeschw)
Cmd_)*SET,geschwst
Fld_2
 Prm_Geschwindigkeitsaenderung [m/s]
 Typ_Real
DEF_*PAR(geschwst)
Fld_0
  Typ_Sep
Cmd_)*SET,fronspar
Fld_2
 Prm_Loesung Frontal/Sparse
 Typ_Lis_RadioB
 Lis_Frontalsolver,0
 Lis_Sparsesolver,1
 Def_*PAR(fronspar)
Cmd_)lin_asynz_kurzw_loes7.txt
Cal_REFRESH
:E END
:!!
:N Fnc_EMP_HIN
:S      0,     0,     0
:T Cmd
:C )/NOPR
:C )! Fnc_EMP_HIN 16.03.2008
:C )/GO
:A Handbuch
:D EM-Praktikum V 1.1
Inp_NoApply
Fld_0
 Typ_Lab
 Prm_Tool zur Berechnung Elektrischer Maschinen
Fld_0
 Typ_Lab
 Prm_ANSYS, basierend ab Version 11.0
Fld_0
 Typ_Lab
 Prm_
Fld_0
 Typ_Lab
 Prm_ Prof. Dr. Aschendorf
Fld_0
 Typ_Lab
 Prm_ E-Mail: aschendorf@fh-dortmund.de
Fld_0
 Typ_Lab
 Prm_ fon: 0231 / 9112-685
Fld_0
 Typ_Lab
 Prm_
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_Sie koennen die Online-Dokumentation in jedem
Fld_0
 Typ_Lab
 Prm_HTML 3.2-kompatiblen Browser ansehen.
Fld_0
 Typ_Lab
 Prm_Dieses Dokument wurde fuer Netscape Communicator 4.0 erstellt.
Fld_0
 Typ_Lab
 Prm_
Fld_0
  Typ_Sep
Fld_0
  Typ_Lab
  Prm_
Cmd_)*SET,_brow
 Fld_2
  Prm_Online-Dokumentation ansehen mit
  Typ_Lis_OptionB
   Lis_Netscape        ,1
   Lis_InternetExplorer,2
Def_*PAR(_brow)
Fld_0
 Typ_Sep
Fld_0
 Typ_Lab
 Prm_If you have access to a browser you can
Fld_0
 Typ_Lab
 Prm_access the ANSYS dokument by going to its URL at:
Fld_0
 Typ_Lab
 Prm_                         file:%ANSYS56_DIR%\emm\handbuch\index.htm
Fld_0
 Typ_Sep
Cmd_)HL_EMM22,_brow,1
Cmd_)/GO
:E END
:!!




