:THIS PROGRAM IS FROM ARRL DEP'T PX #122 AND IS IN THE PUBLIC DOMAIN:MODIFICATIONS AND COLOR ADDED BY:*: |-------------------|\: | R. W. THWING Sr. |: | K4EDE |#: | P.O. BOX 40 |(: | COLUMBUS, NC |$-: | 28722 |V2: |-------------------|^7:<:<<<<<<<<<<<<<<<<<<<<<<< PROGRAM BEGINS >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>A:d : , ,:n ,:"NON RESONANT LENGTHS OF COAXIAL CABLE"x ,: (L,"~")Ly  ,:"IN THIS PROGRAM YOU WILL BE ASKED FOR THE"z  ,:"VELOCITY FACTOR OF THE CABLE YOU WANT TO USE"{  ,:"IF YOU DON'T KNOW IT......YOU SHOULD HAVE RUN"| ,:"THE PROGRAM COAXIAL CABLE CHARACTERISTICS FIRST"T} ,:"IF YOU WANT TO DO THAT, THEN PRESS [Y] NOW - ELSE PRESS ANY KEY";n~ZZ$: ZZ$ "" ~ ZZ$ "Y" ZZ$"y" ,,::  ,&:"WAIT":"COAXCABL ,:"CONTINUE AS YOU WERE" ,#: :"[ENTER]"ZZ$: ZZ$""  ,,:, F( ,),M9( )2 " FREQUENCY BANDS FOR RESONANCE TEST (LOWEST FREQUENCY BAND TO HIGHEST)":" <<<<<<<<<<< TEN BANDS MAX. >>>>>>>>>>>":::" ENTER 0 TO END ENTRY OF BANDS):":B9!I&J +" BAND";I;": LOWER";*, 5>0 );"UPPER";S5" BOUND (MHZ)";`: F(I,J)w? F(I,J) ]DJJI J 0NB9B9SIIX I &]:" SHORTEST CABLE LENGTH TO TRY (FEET)";:;b C1.g:" LONGEST CABLE LENGTH TO TRY (FEET)";7l C2_q:" VELOCITY FACTOR OF CABLE";r;:" NORMAL .66 Yes/No ";s ZZ$: ZZ$ "Y" ZZ$ "y" V (: {t ZZ$ "N" ZZ$ "n" vu r v:" ENTER DIFFERENT VELOCITY FACTOR";z VH{:" NUMBER OF SAMPLES PER FOOT OF CABLE";R S:XhYC2(V)w I B9M9(I)(F(I,)Y) I;:" NON RESONANT CABLE LENGTHS (FEET):";CC1 )R1R2 R1 LC1 IC1S C2S% CIS/ )B R2 kU4 R1 zc9YC(S)}> LY : *);LC LY : *);L;"TO";YHR1M zk R1 zpR1uLCz I R1  LC : *);L) LC : *);L;"TO";C< ,,: I)YVCQ.M[3TMYsj TF(B9,) {oBt MM9(B) y TF(B,) ~ TF(B,) R2BB BB9 tMM MM9(B9) 3R29 ,7: :"[ENTER]"RZZ$: ZZ$"" w ,,::  ,:"WHAT NOW? " ,:"DO ANOTHER LENGTH OR BANDS?.................A" ,:"RETURN TO MAIN MENU?........................M"/ ,:"RETURN TO BASIC?............................B";HZZ$: ZZ$"" j  ZZ$ "A" ZZ$ "a" d ZZ$ "B" ZZ$ "b" ,,:: : ZZ$ "M" ZZ$ "m" ,,::"MAINMENU"