home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Hacker Chronicles 2
/
HACKER2.BIN
/
770.OSCFREQ.BAS
< prev
next >
Wrap
BASIC Source File
|
1985-09-24
|
640b
|
32 lines
10 REM COMPUTE FREQUENCY OF AN OSCILLATOR
20 X = 50
30 Y = 500
40 Z = 25
50 INPUT "L = (uH) " ; L
60 L = L * .000001
70 LPRINT "L (uH) =" ; L * 1E+06
80 LPRINT : LPRINT
90 LPRINT "F (Mhz)","C (pF)"
100 FOR C1 = X TO Y STEP Z
110 C = C1 * 1E-12
120 F = 1 / (2*3.1419*(SQR(L*C)))
130 F1 = F * .000001
140 C2 = C * 1E+12
150 LPRINT F1,C2
160 NEXT
170 LPRINT CHR$(12)
180 GOTO 50
(2*3.1419*(SQR(L*C)))
130 F1 = F * .000001
140 C2 = C * 1E+12
150 LPRINT F1,C2
160 NEXT
170 LPRINT CHR$(12)
10 GOTO 50
(2*3.1419*(SQR(L*C)))
130 F1 = F * .000001
140 C2 = C * 1E+12
150 LPRINT F1,C2
160 NEXT
170 LPRINT CHR$(12)
1