10 REM POLPLXIN PROGRAM CALCULATES DIMENSIONS FOR CIRC. WG POLAPLEXERS
20 REM
DIMENSIONS ARE IN INCHES
30 REM VERSION 1.4 OF 30 APR 1999
40 REM BY ED MUNN,
W6OYJ
50 REM
60 REM MODIFY NEXT LINE IF PROBE DIAMETER NOT AS STATED
70 PD=.0403:REM ASSUMES PROBE DIAMETER IN INCHES (#18 AWG WIRE SIZE)
80 REM SEE
LINES AT END OF PROGRAM FOR ALTERNATE PROBE SIZES
90 REM
100 KEY OFF: CLS:
REM CLEARS SCREEN
110 REM
120 PRINT " POLPLXIN PROGRAM GIVES INCH DIMENSIONS
FOR CIRCULAR WAVEGUIDE"
130 PRINT " POLAPLEXERS OPERATING IN THE DOMINANT
(TE11) MODE"
140 PRINT
150 INPUT " ENTER OPERATING FREQUENCY IN
MHZ = "; FO
160 WO = 30000 / FO: REM OPERATING WAVELENGTH IN CM
170
WI=WO/2.54:REM CONVERTS TO INCHES
180 PRINT " THE OPERATING WAVELENGTH IS
"; WO; "CM, OR ";WI;" INCHES"
190 PRINT
200 INPUT
" ENTER INSIDE DIAMETER OF THE CIRCULAR GUIDE IN INCHES ";DG
210 DG=2.54*DG:REM
CONVERTS TO CM
220 PRINT
230 C1 = 1.71 * DG: REM C1 IS CUTOFF WAVELENGTH
OF DOMINANT TE11 MODE IN CM
240 C2 = 1.31 * DG: REM C2 IS CUTOFF WAVELENGTH OF
TM01 MODE IN CM
250 C3 = 1.03 * DG: REM C3 IS CUTOFF WAVELENGTH OF TE21 MODE
IN CM
260 PRINT " THE TE11 MODE CUTOFF FREQUENCY IS "; 30000 / C1;
" MHZ"
270 PRINT " THE TM01 MODE CUTOFF FREQUENCY IS "; 30000
/ C2; " MHZ"
280 PRINT " THE TE21 MODE CUTOFF FREQUENCY IS ";
30000 / C3; " MHZ"
290 WG = WO / SQR(1 - ((WO / C1) ^ 2)): REM TE11
GUIDE WAVELENGTH IN CM
300 WG=WG/2.54:REM CONVERTS TO INCHES
310 PRINT "
THE TE11 MODE GUIDE WAVELENGTH IS "; WG; " INCHES"
320 PRINT
330 PRINT " MEASURING FROM THE SHORTED END OF THE GUIDE...."
340 PRINT
" THE FIRST PROBE SHOULD BE SPACED "; WG / 4; " INCHES"
350
PRINT" THE LO ADJUST SCREW SHOULD BE SPACED ";WG/3;" INCHES"
360 PRINT" THE SECOND PROBE SHOULD BE SPACED ";3*WG/4;" INCHES"
370 PRINT " AND THE OPEN END SHOULD BE SPACED "; 5 * WG / 4; " INCHES"
380 PRINT
390 PRINT " QUARTER WAVELENGTH PROBE FORMULA GIVES "; WI
/ 4; " INCHES"
400 WM=WO*10:REM OPERATING WAVELENGTH IN MM
410
PM=PD*25.4:REM PROBE DIAMETER IN MM
420 P=PM*3.1416/WM
430 L=2950.7*(1+P-SQR(P))/FO:REM
EMPIRICAL PROBE LENGTH FROM K6MBL - INCHES
440 PRINT" K6MBL EMPIRICAL PROBE
LENGTH =";L; "INCHES"
450 PRINT
460 END
470 REM WIRE SIZE
REFERENCE DATA FOR PROBE CALCULATIONS
480 REM AWG DIA (IN.) DIA (MM.)
490
REM 20 .032 .813
500 REM 18 .0403 1.024
510 REM
16 .0508 1.29
520 REM 14 .0641 1.63