高手看看啊:
/BATCH
/COM,ANSYS RELEASE 10.0 UP20050718 23:06:25 05/21/2007
!*
/NOPR
/PMETH,OFF,1
KEYW,PR_SET,1
KEYW,PR_STRUC,0
KEYW,PR_THERM,0
KEYW,PR_FLUID,0
KEYW,PR_ELMAG,1
KEYW,MAGNOD,0
KEYW,MAGEDG,0
KEYW,MAGHFE,0
KEYW,MAGELC,1
KEYW,PR_MULTI,0
KEYW,PR_CFD,0
/GO
!*
/COM,
/COM,Preferences for GUI filtering have been set to display:
/COM, Electric
!*
/PREP7
!*
ET,1,PLANE230
!*
!*
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,RSVX,1,,10
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,PERX,2,,1.0
BLC5,0,0,100,50
RECTNG,-50,50,-24,-25,
RECTNG,-50,50,24,25,
LPLOT
FLST,2,3,5,ORDE,2
FITEM,2,1
FITEM,2,-3
AOVLAP,P51X
FLST,5,2,5,ORDE,2
FITEM,5,4
FITEM,5,-5
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT, 1, , 1, 0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
CM,_Y,AREA
ASEL, , , , 6
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT, 2, , 1, 0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
!*
MSHAPE,0,2D
MSHKEY,0
!*
FLST,5,3,5,ORDE,2
FITEM,5,4
FITEM,5,-6
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
FINISH
/SOL
!*
ANTYPE,0
FLST,2,1,5,ORDE,1
FITEM,2,5
/GO
!*
DA,P51X,VOLT,50
FLST,2,1,5,ORDE,1
FITEM,2,4
/GO
!*
DA,P51X,VOLT,0
/STATUS,SOLU
SOLVE
SAVE
FINISH
/POST1
!*
/EFACET,1
PLNSOL, VOLT,, 0
!*
/VSCALE,1,1,0
!
!*
PLVECT,EF, , , ,VECT,ELEM,ON,0
!*
/EFACET,1
PLNSOL, VOLT,, 0
FINISH
! /EXIT,ALL |