home *** CD-ROM | disk | FTP | other *** search
/ Hacker Chronicles 2 / HACKER2.BIN / 770.OSCFREQ.BAS < prev    next >
BASIC Source File  |  1985-09-24  |  640b  |  32 lines

  1. 10 REM COMPUTE FREQUENCY OF AN OSCILLATOR
  2. 20 X = 50
  3. 30 Y = 500
  4. 40 Z = 25
  5. 50 INPUT "L = (uH) " ; L
  6. 60 L = L * .000001
  7. 70  LPRINT "L (uH) =" ; L * 1E+06
  8. 80 LPRINT : LPRINT
  9. 90 LPRINT "F (Mhz)","C (pF)"
  10. 100 FOR C1 = X TO Y STEP Z
  11. 110  C = C1 * 1E-12
  12. 120 F = 1 / (2*3.1419*(SQR(L*C)))
  13. 130 F1 = F * .000001
  14. 140 C2 = C * 1E+12
  15. 150 LPRINT F1,C2
  16. 160 NEXT
  17. 170 LPRINT CHR$(12)
  18. 180 GOTO 50
  19. (2*3.1419*(SQR(L*C)))
  20. 130 F1 = F * .000001
  21. 140 C2 = C * 1E+12
  22. 150 LPRINT F1,C2
  23. 160 NEXT
  24. 170 LPRINT CHR$(12)
  25. 10 GOTO 50
  26. (2*3.1419*(SQR(L*C)))
  27. 130 F1 = F * .000001
  28. 140 C2 = C * 1E+12
  29. 150 LPRINT F1,C2
  30. 160 NEXT
  31. 170 LPRINT CHR$(12)
  32. 1