开云体育

I'm trying to figure out how to model a standard No. 47 flashlight lamp. I'm having trouble trying to find a similar model. Oh yeah, I'm new to this software.

In message <k1giju+bb95@...>, dated Mon, 27 Aug 2012, ridethesnake7miles <ridethesnake7miles@...> writes:

I'm trying to figure out how to model a standard No. 47 flashlight lamp. I'm having trouble trying to find a similar model. Oh yeah, I'm new to this software.

You should learn to search the archive files on the list's web site. See, for example:

0message%20number/msg%203491/
--
OOO - Own Opinions Only. Try www.jmwa.demon.co.uk and www.isce.org.uk
Instead of saying that the government is doing too little, too late or too
much, too early, say they've got is exactly right, thus throwing them into
total confusion.
John Woodgate, J M Woodgate and Associates, Rayleigh, Essex UK

this was a while ago, but you can modify it appropriately
from Jim Thompson

*VO=NOMINAL OPERATING VOLTAGE
*IO=NOMINAL STEADY STATE OPERATING CURRENT
*RCOLD=FILAMEMT RESISTANCE MEASURED AT ROOM TEMP (300K)
*TAU=CURRENT TIME CONSTANT AFTER A 0 (zero) TO VO STEP IS APPLIED
.SUBCKT LAMP 1 2 PARAMS: VO=28 IO=25m RCOLD=112 TAU=22m TAMB=300
H1 6 0 VML 1
RH1 6 0 1
GP 0 4 VALUE={V(6)*V(1,2)}
*V(4,0) = FILAMENT TEMPERATURE IN KELVINS
RT 4 5 {300*(VO-IO*RCOLD)/(IO*IO*VO*RCOLD)}
CT 4 5 {TAU*IO*IO*VO*RCOLD/(300*(VO-IO*RCOLD))}
VAMB 5 0 {TAMB}
El 7 0 1 2 300
R1 7 0 1
E2 8 0 VALUE={V(4)*RCOLD}
R2 8 0 1
E3 10 0 7 9 10MEG
R3 10 0 1
E4 9 0 VALUE={V(8)*V(10)}
R4 9 0 1
GR 1 3 10 2 1
VML 3 2 0
.ENDS LAMP


--- ridethesnake7miles@... wrote:

From: "ridethesnake7miles" <ridethesnake7miles@...>
To: LTspice@...
Subject: [LTspice] basic incandescent dc lamp
Date: Mon, 27 Aug 2012 19:42:54 -0000

I'm trying to figure out how to model a standard No. 47 flashlight lamp. I'm having trouble trying to find a similar model. Oh yeah, I'm new to this software.

There's a very good lamp model by Helmut in the Files, look for lamp.sub & lamp.asy, you will need to edit the params as required to match your particular lamp.

HTH

--- In LTspice@..., "ridethesnake7miles" wrote:

I'm trying to figure out how to model a standard No. 47 flash-
light lamp. I'm having trouble trying to find a similar model.

Here's a short (but very realistic) subcircuit for a filament type
lamp that has been written for optimum convergence performance in
LTspice:

* Two Pin Incandescent Lamp Model
*
* input: Kc = conductance constant of filament
* input: Kr = radiation constant of filament
* input: CTf = filament thermal capacitance
* input: RTf = filament thermal resistance
* n = numerical dynamic range scale factor
* Cf = filament conductance
* Pf = filament power (electrical input)
* Pr = radiated power (electromagnetic output)
* Tf = filament temperature (in degrees K)
* Ta = ambient temperature (converted to deg K)
*
.subckt Lamp 1 2 params: Kc=120 Kr=.7p CTf=5m RTf=10k
.param n=1m Ta=temp-kelvin ; internal parameters
BCf 1 2 I=V(1,2)*Kc/V(Tf)**1.2
BPf 0 Tf I=V(1,2)*I(BCf)*n
BPr Tf 0 I=Kr*(V(Tf)**4-Ta**4)*n
Cfa Tf Ta {CTf*n} Rpar={RTf/n}
VTa Ta 0 {Ta}
.ends Lamp

Look here for a Lamp bulb symbol and a hierarchical model version
of this subcicuit:



LampModel.zip ; incandescent lamp model, symbol, and test files
Lamp.asc ; updated lamp model to replace the one in the zip file

Regards -- analogspiceman

Here's a short (but very realistic) subcircuit for a filament type
lamp that has been written for optimum convergence performance in
LTspice:

* Two Pin Incandescent Lamp Model
*
* input: Kc = conductance constant of filament
* input: Kr = radiation constant of filament
* input: CTf = filament thermal capacitance
* input: RTf = filament thermal resistance
* n = numerical dynamic range scale factor
* Cf = filament conductance
* Pf = filament power (electrical input)
* Pr = radiated power (electromagnetic output)
* Tf = filament temperature (in degrees K)
* Ta = ambient temperature (converted to deg K)
*
.subckt Lamp 1 2 params: Kc=120 Kr=.7p CTf=5m RTf=10k
.param n=1m Ta=temp-kelvin ; internal parameters
BCf 1 2 I=V(1,2)*Kc/V(Tf)**1.2
BPf 0 Tf I=V(1,2)*I(BCf)*n
BPr Tf 0 I=Kr*(V(Tf)**4-Ta**4)*n
Cfa Tf Ta {CTf*n} Rpar={RTf/n}
VTa Ta 0 {Ta}
.ends Lamp

It goes fast even with n=0.1 for 325V, lower values seem to take their (minor) toll for longer simulation runs without imposed timestep.

Vlad