home *** CD-ROM | disk | FTP | other *** search
- 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