我还有一段内容要输入的,是不是也要进行替换呢?下面我把程序放进来,希望高手赐教。
!!!!!!!!!!!!!!!!!!!!!!!!!!!!
/prep7
*do,i,1,4,1
*do,j,1,4,1
*do,k,1,4,1
/FILNAME,quarter20000--A-%i%00B-%j%00C-%k%00,0 !起文件名,0表示用新的log file
/TITLE,quarter20000--A-%i%00B-%j%00C-%k%00 ! 工作空间的标题
/prep7
!下面是在加电压
!首先使中间两层电压为0
!第二层
CMSEL,S,A1-2
D,A1-2,VOLT,0 !
CMSEL,S,A2-2
D,A2-2,VOLT,0 !
CMSEL,S,A4-2
D,A4-2,VOLT,0 !
!-------------------
!第三层
CMSEL,S,A1-3
D,A1-3,VOLT,0 !
CMSEL,S,A2-3
D,A2-3,VOLT,0 !
CMSEL,S,A4-3
D,A4-3,VOLT,0 !
!-------------------
!第一层电压设置,
CMSEL,S,A1-1
D,A1-1,VOLT,-i00 !
CMSEL,S,A2-1
D,A2-1,VOLT,-j00 !
CMSEL,S,A4-1
D,A4-1,VOLT,-k00 !
!-------------------------
CMSEL,S,A1-4
D,A1-4,VOLT,-i00 !
CMSEL,S,A2-4
D,A2-4,VOLT,-j00 !
CMSEL,S,A4-4
D,A4-4,VOLT,-k00 !
allsel,all
fini
/solu
solve
fini
SAVE,'quarter20000--A-%i%00B-%j%00C-%k%00','db','E:\ANSYS10FILE\'
/post1
/REPLO
/RGB,INDEX,100,100,100, 0
/RGB,INDEX, 80, 80, 80,13
/RGB,INDEX, 60, 60, 60,14
/RGB,INDEX, 0, 0, 0,15
/REPLOT !这一段将背景改为白色,字体改为黑色
SAVE,'A-%i%00B-%j%00C-%k%00','db','E:\ANSYS10FILE\'
*enddo
*enddo
*enddo |