home *** CD-ROM | disk | FTP | other *** search
/ Antennas / Antennas_CD-ROM_Walnut_Creek_September_1996.iso / public / hopkins / coax.bas < prev    next >
BASIC Source File  |  1996-06-30  |  509b  |  17 lines
  1. 10 CLS
  2. 20 PRINT "        COAXIAL DESIGN CONCENTRIC TUBES."
  3. 30 PRINT "        ================================
  4. 40 PRINT
  5. 50 PRINT
  6. 60 INPUT "WHAT IS THE INTERNAL DIAMETER OF THE OUTER TUBE IN MILLIMETERS";OD
  7. 70 PRINT
  8. 80 INPUT "WHAT IS THE OUTSIDE DIAMETER OF THE INNER TUBE IN MM";ID
  9. 90 PRINT
  10. 100 PRINT
  11. 110 PRINT "   IMPEDANCE OF LINE = ";138*(LOG(OD/ID)/LOG(10));" OHMS."
  12. 120 PRINT
  13. 130 INPUT "ANOTHER CALCULATION ? Y=YES N=NO ";A$
  14. 140 IF A$="Y"GOTO 10
  15. 150 IF A$="N"THEN RUN "MENU"
  16. 160 GOTO 130
  17.