File: ONESOT.FC of Tape: Various/ETH/fc1

(.FC,.FO Focal format converted to 'WRITE' listing) 

---

C ACU-FOCAL12,1973

01.01 E
01.05 T "ONE SHOT BERECHNUNG"!!
01.10 T "BERECHNUNG DER ZEIT  TW IN MILLISEK."
01.15 A !!! "MAX. WIDERSTAND  R(K.OHM) ",R,!
01.20 A "KAPAZITAET       C(MI.FA) ",C,!
01.25 A "RECHN. INTERVALL          ",I,!
01.29 T !!,"    KILO     MILLISEK"!
01.40 F RS=I,I,R;T %5,RS;T %12.6,0.28*RS*C*(1+(.7/RS)),!
01.50 G 1.15

---