home *** CD-ROM | disk | FTP | other *** search
/ Explore the World of Soft…e: Engineering & Science / Explore_the_World_of_Software_Engineering_and_Science_HRS_Software_1998.iso / programs / electrnc / mcgarret.exe / ANTCAP.BAS < prev    next >
BASIC Source File  |  1986-08-11  |  710b  |  24 lines
  1. 100 REM CAPACITANCE OF A SHORT VERTICAL ANTENNA
  2. 110 REM FORMULA FROM ALLIED'S ELECTRONICS DATA HANDBOOK
  3. 120 REM PROGRAM BY D. MCGARRETT  13 JULY 1984
  4. 130 PRINT 
  5. 140 PRINT"ANTENNA CAPACITANCE FINDER PROGRAM"
  6. 150 PRINT"USE ^C TO EXIT PROGRAM"
  7. 160 PRINT
  8. 170 INPUT">>>  OPERATING FREQUENCY IN MHZ";F
  9. 180 INPUT">>>  DIAMETER OF ANTENNA CONDUCTOR IN INCHES";D
  10. 190 INPUT">>>  LENGTH OF ANTENNA IN INCHES";L
  11. 200 L=L/12
  12. 210 CA=17*L/((LOG(24*L/D)-1)*(1-(F*L/246)^2))
  13. 220 DEF FNR(R)=INT(1000*R+.5)/1000
  14. 230 PRINT
  15. 240 CA=FNR(CA)
  16. 250 PRINT "ANTENNA CAPACITANCE IS"CA"PF"
  17. 260 PRINT
  18. 270 LM=25330/(F^2*CA)
  19. 280 LM=FNR(LM)
  20. 290 PRINT "BASE LOADING COIL TO MATCH IS"LM"UH"
  21. 300 PRINT
  22. 310 PRINT
  23. 320 GOTO 190
  24.