Thanks for such a fast answer. here is the code (the uploading to the file didn't work). But i'm sure you can drop it in a.txt file
Thanks
.SUBCKT NTC_BASE Rn Rp Params: W=1 X=1 Y=1 Z=1 GTH=1 GTH1=1 CTH=1 A=1 R25=1 B=1 C=1 D=1 T0=273.15 TR=1 TB=1
G_G1 AOUT 0 VALUE { if(TEMP<25,V(AOUT,
+ 0)/(R25*TR*exp(((D*TB/(T0+abs(V(H))+TEMP)+C*TB)/(T0+abs(V(H))+TEMP)+B*TB)/(T0+TEMP+abs(V(H)))+A*TB)),0)
+ }
G_G2 AOUT 0 VALUE { IF(TEMP<25,0,V(AOUT,
+ 0)/(R25*TR*exp(((Z*TB/(T0+abs(V(H))+TEMP)+Y*TB)/(T0+abs(V(H))+TEMP)+X*TB)/(T0+abs(V(H))+TEMP)+W*TB)))
+ }
G_G3 H 0 VALUE {
+ if(TEMP<25,-V(RP,RN)*V(RP,RN)/(R25*TR*exp(((D*TB/(T0+abs(V(H))+TEMP)+C*TB)/(T0+abs(V(H))+TEMP)+B*TB)/
+ (T0+TEMP+abs(V(H)))+A*TB)),0)}
G_G4 H 0 VALUE {
+ if(TEMP<25,0,-V(RP,RN)*V(RP,RN)/(R25*TR*exp(((Z*TB/(T0+abs(V(H))+TEMP)+Y*TB)/(T0+abs(V(H))+TEMP)+X*TB)/
+ (T0+TEMP+abs(V(H)))+W*TB)))}
G_G5 RP RN VALUE { V(RP, RN)/V(AOUT) }
G_G6 H 0 VALUE { V(H)*(Gth + Gth1*(TEMP-25)) }
I_I1 0 AOUT DC 1Adc
R_R1 0 AOUT 1T TC=0,0
R_R2 0 H 1T TC=0,0
C_C1 0 H {Cth} IC=0 TC=0,0
.ENDS
.SUBCKT NTCS0805E3103_MT RN Rp PARAMS: TOLR=0 TOLB=0
X13 Rn Rp NTC_BASE Params:
+ w=-13.40885683108
+ x=4547.96149408261
+ y=-176965.917057285
+ z=3861153.74690121
+ gth=0.0048 gth1 = 0.0000267
+ cth=0.08216
+ a=-13.408856831082
+ r25=10000
+ b=4547.96149408261
+ c=-176965.917057285
+ d=3861153.74690121
+ T0=273.15
+ TR={1+TOLR/100}
+ TB={1+TOLB/100}
.ENDS