怎样将Pspice模型改成spice模型

我现在需要在spectre用到功率NMOS管的模型，在ST公司以及其他公司网站上只找到了Pspice的模型，怎样将Pspice模型改成spectre可以识别的spice模型呢?
以下是ST公司的STFI24N60M2的Pspice模型
*******************************************************************
.SUBCKT STFI24N60M2_V3 (1 2 3 Tj Tcase)
*******************************************************************
*E1 Tj val_T VALUE={TEMP}
*R1 val_T 0 1E-03
*******************************************************************
Rtk Tj 0 1E10
Rtk1 Tj 0 1E10
*******************************************************************
Ld 1 d1k 0.1E-09
RLd 1 d1k 10
Ls ss 3 1E-09
RLs ss 3 10
Lg 2 g2 1E-09
RLg 2 g2 10
rg1 g2 g {rg}
*******************************************************************
.PARAM Area=1 BVDSS=1 Raval=336e-03
*******************************************************************
.PARAMRg=7.01 Vth0=3.85
.PARAMLambda=0.0001
.PARAMKpSat0=12.4 KpLin0=23.0 Drs=0.115
.PARAMRd=148E-03
.PARAMRpa=3E-06
*******************************************************************
.PARAMUnt=-2 Vthx=4.5E-03 Ksat=-1 Klin=-5
.PARAMA=1 B=1 Rx=2.75
E_soglia soglia 0 value {vth1(V(TJ))}
R_soglia soglia 0 1
*******************************************************************
.FUNC r_s(T) {((T+273)/300)**(unt)/drs}
.FUNC vth1(x) {vth0-vthx*(x-27)}
.FUNC kpsat(x) {kpsat0*((x+273)/300)**(ksat)}
.FUNC kplin(x) {kplin0*((x+273)/300)**(klin)}
.FUNC un(T) {b*((T+273)/300)**(unt)}
R_lambda L 0 1
V_lambda L 0 {lambda}
*******************************************************************
Gmos d s value {Area*((IF((limit((v(g,s)),-15,15))<v(soglia),0,IF(abs(v(d,s))<((limit((v(g,s)),-15,15))-v(soglia))*
+kpsat(V(TJ))/kplin(V(TJ)),
+(1+V(L)*abs(v(d,s)))*sgn(V(d,s))*(kplin(V(TJ))/2*abs(v(d,s))*(2*((limit((v(g,s)),-15,15))-v(soglia))-
+kplin(V(TJ))/kpsat(V(TJ))*abs(v(d,s)))),
+(1+v(L)*abs(v(d,s)))*sgn(V(d,s))*(kpsat(V(TJ))/2*((limit((v(g,s)),-15,15))-v(soglia))**2)*1))))}
.param Area5=0.000001
Gmos2 d s value {Area5*((IF((limit((v(g,s)),-15,15))<(v(soglia)*0.28),0,IF(abs(v(d,s))<((limit((v(g,s)),-15,15))-(v(soglia)*0.28))*
+kpsat(V(TJ))/kplin(V(TJ)),
+(1+V(L)*abs(v(d,s)))*sgn(V(d,s))*(kplin(V(TJ))/2*abs(v(d,s))*(2*((limit((v(g,s)),-15,15))-(v(soglia)*0.28))-
+kplin(V(TJ))/kpsat(V(TJ))*abs(v(d,s)))),
+(1+v(L)*abs(v(d,s)))*sgn(V(d,s))*(kpsat(V(TJ))/2*((limit((v(g,s)),-15,15))-(v(soglia)*0.28))**2)*1))))}
.param Area6=0.005
Gmos3 d s value {Area6*((IF((limit((v(g,s)),-15,15))<(v(soglia)*0.91),0,IF(abs(v(d,s))<((limit((v(g,s)),-15,15))-(v(soglia)*0.91))*
+kpsat(V(TJ))/kplin(V(TJ)),
+(1+V(L)*abs(v(d,s)))*sgn(V(d,s))*(kplin(V(TJ))/2*abs(v(d,s))*(2*((limit((v(g,s)),-15,15))-(v(soglia)*0.91))-
+kplin(V(TJ))/kpsat(V(TJ))*abs(v(d,s)))),
+(1+v(L)*abs(v(d,s)))*sgn(V(d,s))*(kpsat(V(TJ))/2*((limit((v(g,s)),-15,15))-(v(soglia)*0.91))**2)*1))))}
G_RMos d1k dd VALUE={Area*((un(V(TJ))*(V(d1k,d)))/(rd+rpa*((I(V_sense)**a))**Rx))}
G_rs s ss VALUE={(Area*(r_s(V(TJ))*v(s,ss))/drs)}
R_Grs s ss 1E03
R_Rmos d1k dd 1E03
V_sense dd d 0
*******************************************************************
rdd dd 0 1E10
rdd1 d 0 1E10
rdd3 s 0 1E10
R_DS d s 1E10
*******************************************************************
CGS g 3{1.052E-09*Area}
R_CGS g 3 500E06
*******************************************************************
Cref 40 0 1E-12
E2 40 50 value {V(g,d1k)}
V2 50 0 0
Gcdg d1k g value {3*Area*V(alfa)*i(V2)*1E12}
Rcap 0 alfa 1E03
Ecap alfa 0 TABLE = {V(d1k,ss)}
+(0.1,892.39p)
+(0.2,873.91p)
+(0.5,809.48p)
+(1,705.8p)
+(2,560.85p)
+(3,464.71p)
+(5,346.62p)
+(7,267.33p)
+(10,163.31p)
+(15,28.28p)
+(20,17.04p)
+(25,11.12p)
+(30,7.75p)
+(40,5.01p)
+(50,3.65p)
+(100,2.2p)
+(150,2.21p)
+(200,2.29p)
+(250,2.4p)
+(300,2.6p)
+(350,2.79p)
+(400,1.05p)
+(450,1.72p)
+(500,1.31p)
+(550,1.74p)
+(600,1.88p)
*******************************************************************
Cref2 402 0 1E-12
E22 402 502 value {V(ss,d1k)}
V22 502 0 0
Gcdg2 d1k ss value {1*Area*V(alfa2)*i(V22)*1E12}
Rcap2 0 alfa2 100E03
Ecap2 alfa2 0 TABLE = {V(d1k,ss)}
+(0.1,8806.33p)
+(0.2,8422.81p)
+(0.5,7286.73p)
+(1,6225.13p)
+(2,5053.75p)
+(3,4352.22p)
+(5,3561.93p)
+(7,3072.85p)
+(10,2108.63p)
+(15,701.46p)
+(20,526.02p)
+(25,391.7p)
+(30,317.24p)
+(40,196.79p)
+(50,127.9p)
+(100,53.63p)
+(150,48.82p)
+(200,46.33p)
+(250,44.42p)
+(300,42.48p)
+(350,40.98p)
+(400,39.67p)
+(450,38.86p)
+(500,38.37p)
+(550,37.93p)
+(600,37.55p)
*******************************************************************
R_bvdss
d1k d1bvdss1 {raval}
V_bvdss
d1bvdss1 d1bvdss2 0
G_bvd
d1bvdss2 ss VALUE={I_BVDSS(V(d1bvdss2,ss),v(Tj))}
R_GBDSS
d1bvdss2 0 1E10
.FUNC I_BVDSS(z,k1) {(exp(min(-175+z/(bvd(k1)),7))-10E-12)}
*******************************************************************
.FUNC bvd(k) {3.8*BVDSS+0.0029*k}
*******************************************************************
.FUNC Rdiodo(rdid) {rdid0*((rdid+273)/300)**(rdid_temp)}
.PARAM rdid0={8.5/Area} rdid_temp=0.75
G_R_didd d1k d1z VALUE={200*(V(d1k,d1z)/Rdiodo(V(TJ)))}
R_G_R_didd d1k d1z {1/Area}
V_diodo d1zd d1z 0
G_diode 3 d1zd VALUE={I_diode(V(3,d1zd),v(Tj))}
R_x 3 d1zd 1E10
.FUNC I_diode(z3,k3) {(exp(min(-15+z3/(did(k3)),7))-10E-12)}

.FUNC did(k4) {0.05-70E-06*k4}
*******************************************************************
R_R003 aa 0 500E06
R_edep d1k d_dedep 100
E_Eds d_dedep edep VALUE {-V(aa,0)*2E3}
C_Cds edep ss {60E-12*Area}
E_E001 ba 0 VALUE {-I(V_diodo)*(0.0016*v(Tj)+1)}
R_R001 aa ba 100
C aa 0 100E-12
*******************************************************************
E_Pw thx 0 VALUE ={(I(V_bvdss)*v(1,3))}
R_power thx 0 1E6
RTHXX thx thx1 1E3
CTXX thx1 0 1E-09
G_pw1 0 TJ VALUE ={Limit(v(thx1),0,100E3)}
G_pw2 0 TJ VALUE ={Limit((I(V_sense)*v(1,3)),0,10E3)}
G_pw3 0 TJ VALUE ={LIMIT((I(V_diodo)*v(3,1)),0,100E3)}
R_Gpower 0 TJ 1E6
.param Area1=0.15 Area2=0.15 Area3=0.25 Area4=1 AreaZ=0.55
Rth1 Tj Th1 {0.788E-02/Area1}
Rth2 Th1 Th2{0.350E-01/Area1}
Rth3 Th2 Th3{0.715E-01/Area2}
Rth4 Th3 Th4{0.729E-01/Area3}
Rth5 Th4 Tcase{0.776/Area3}
Cth1 Tj 0 {0.683E-03*Area4}
Cth2 Th1 0{0.085E-02*Area4}
Cth3 Th2 0{0.205E-01*Area4}
Cth4 Th3 0{3.395E-01*AreaZ}
Cth5 Th4 0{0.455*AreaZ}
Cth6 Tcase 0 0.299
*******************************************************************
ENDS STFI24N60M2_V3
* END OF MODELLING

同问，我也想知道

同问，反过来也可以转换不?

小电路可以自己改语法，大电路就不知道了 不过有的工具可以支持其他的格式语法

顶一下。

网上有工具可以支持

同问 求大神指教啊