home *** CD-ROM | disk | FTP | other *** search
/ HAM Radio 1 / HamRadio.cdr / tech / engprog / coaxial.bas (.txt) < prev    next >
Encoding:
GW-BASIC  |  1987-08-09  |  423 b   |  15 lines
  1. 10  CLS
  2. 20  KEY OFF:COLOR 0,15,4:CLS
  3. 30  LOCATE 2,30:PRINT"COAXIAL CABLE PROGRAMS"
  4. 40  PRINT:PRINT STRING$(79,"+")
  5. 50  PRINT
  6. 60  PRINT"SELECT DESIRED PROGRAM":PRINT
  7. 70  PRINT"       COAX CABLE CHARACTERISTICS........................C":PRINT
  8. 80  PRINT"       NON RESONANT LENGTHS..............................N":PRINT
  9. 90  PRINT
  10. 100  LOCATE 15,37:COLOR 20:PRINT"SELECT";
  11. 110  ZZ$=INKEY$:IF ZZ$= "" THEN 110
  12. 130  IF ZZ$= "C" OR ZZ$= "c" THEN COLOR 15,0,0:RUN"COAXCABL
  13. 140  IF ZZ$= "N" OR ZZ$= "n" THEN COLOR 15,0,0:RUN"NONRES
  14. 150  GOTO 100
  15.