_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

CROSSOVER.C

FILE INFORMATION

FILENAME(S): CROSSOVER.C

FILE TYPE(S): PRG

FILE SIZE: 5.1K

FIRST SEEN: 2025-11-30 21:07:08

APPEARS ON: 1 disk(s)

FILE HASH

c18a64577d50c9f90c2a6dd21b37b567091d754a14bfae1ffaaf1972fa8382f2

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
TPUG DEC 84 C CROSSOVER.C PRG DuncanTwain 17 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 21 08 0A 00 8F 20  43 52 4F 53 53 4F 56 45  |..!.... CROSSOVE|
00000010: 52 20 44 45 53 49 47 4E  20 50 52 4F 47 52 41 4D  |R DESIGN PROGRAM|
00000020: 53 00 57 08 14 00 8F 20  42 59 20 41 4E 44 52 45  |S.W.... BY ANDRE|
00000030: 57 20 43 20 45 52 49 43  4B 53 45 4E 2C 4A 52 2E  |W C ERICKSEN,JR.|
00000040: 20 20 20 4D 4F 4E 52 4F  45 2C 20 57 49 53 43 2E  |   MONROE, WISC.|
00000050: 20 20 35 33 35 36 36 00  74 08 19 00 97 35 33 32  |  53566.t....532|
00000060: 38 30 2C 31 35 3A 97 35  33 32 38 31 2C 31 35 3A  |80,15:.53281,15:|
00000070: 99 22 90 22 00 99 08 1E  00 99 22 93 22 3A 99 A3  |."."......".":..|
00000080: 31 32 29 22 43 52 4F 53  53 4F 56 45 52 20 44 45  |12)"CROSSOVER DE|
00000090: 53 49 47 4E 22 3A 99 3A  99 00 B1 08 28 00 99 22  |SIGN":.:....(.."|
000000A0: 20 31 2E 46 49 4E 44 20  4C 20 41 4E 44 20 43 2E  | 1.FIND L AND C.|
000000B0: 22 00 DD 08 2D 00 99 22  20 20 28 43 52 4F 53 53  |"...-.."  (CROSS|
000000C0: 4F 56 45 52 20 46 52 45  51 2E 26 20 49 4D 50 45  |OVER FREQ.& IMPE|
000000D0: 44 41 4E 43 45 20 4B 4E  4F 57 4E 29 22 00 FE 08  |DANCE KNOWN)"...|
000000E0: 32 00 99 3A 99 22 20 32  2E 46 49 4E 44 20 43 52  |2..:." 2.FIND CR|
000000F0: 4F 53 53 4F 56 45 52 20  46 52 45 51 2E 22 00 2E  |OSSOVER FREQ."..|
00000100: 09 37 00 99 22 20 20 28  4C 2E 2C 43 2E 2C 26 20  |.7.."  (L.,C.,& |
00000110: 49 4D 50 45 44 41 4E 43  45 20 4B 4E 4F 57 4E 29  |IMPEDANCE KNOWN)|
00000120: 20 28 31 32 44 42 2E 20  4F 4E 4C 59 29 22 00 4D  | (12DB. ONLY)".M|
00000130: 09 3C 00 99 22 20 33 2E  46 49 4E 44 20 43 52 4F  |.<.." 3.FIND CRO|
00000140: 53 53 4F 56 45 52 20 46  52 45 51 2E 22 00 78 09  |SSOVER FREQ.".x.|
00000150: 41 00 99 22 20 20 28 43  2E 26 20 49 4D 50 45 44  |A.."  (C.& IMPED|
00000160: 41 4E 43 45 20 4B 4E 4F  57 4E 29 20 28 36 44 42  |ANCE KNOWN) (6DB|
00000170: 2E 20 4F 4E 4C 59 29 22  00 99 09 46 00 99 3A 99  |. ONLY)"...F..:.|
00000180: 22 20 34 2E 46 49 4E 44  20 43 52 4F 53 53 4F 56  |" 4.FIND CROSSOV|
00000190: 45 52 20 46 52 45 51 2E  22 00 C5 09 48 00 99 22  |ER FREQ."...H.."|
000001A0: 20 20 28 4C 2E 2C 26 20  49 4D 50 45 44 41 4E 43  |  (L.,& IMPEDANC|
000001B0: 45 20 4B 4E 4F 57 4E 29  20 28 36 44 42 2E 20 4F  |E KNOWN) (6DB. O|
000001C0: 4E 4C 59 29 22 00 DF 09  4A 00 99 3A 99 22 20 35  |NLY)"...J..:." 5|
000001D0: 2E 46 49 4E 44 20 4C 20  41 4E 44 20 43 2E 22 00  |.FIND L AND C.".|
000001E0: 0B 0A 4C 00 99 22 20 20  28 43 52 4F 53 53 4F 56  |..L.."  (CROSSOV|
000001F0: 45 52 20 46 52 45 51 2E  26 20 49 4D 50 45 44 41  |ER FREQ.& IMPEDA|
00000200: 4E 43 45 20 4B 4E 4F 57  4E 29 22 00 22 0A 4E 00  |NCE KNOWN)".".N.|
00000210: 99 22 20 20 28 31 38 20  44 42 2E 20 4F 4E 4C 59  |."  (18 DB. ONLY|
00000220: 29 22 00 32 0A 60 00 99  3A 99 22 20 36 2E 45 4E  |)".2.`..:." 6.EN|
00000230: 44 22 00 51 0A 62 00 99  3A 99 3A 85 20 22 20 53  |D".Q.b..:.:. " S|
00000240: 45 4C 45 43 54 49 4F 4E  20 28 31 2D 36 29 22 3B  |ELECTION (1-6)";|
00000250: 50 00 5E 0A 64 00 8B 50  B2 31 A7 32 30 30 00 6B  |P.^.d..P.1.200.k|
00000260: 0A 6E 00 8B 50 B2 32 A7  35 39 30 00 78 0A 78 00  |.n..P.2.590.x.x.|
00000270: 8B 50 B2 33 A7 37 39 30  00 85 0A 82 00 8B 50 B2  |.P.3.790......P.|
00000280: 34 A7 39 39 30 00 93 0A  8C 00 8B 50 B2 35 A7 31  |4.990......P.5.1|
00000290: 32 30 30 00 9E 0A 96 00  8B 50 B2 36 A7 80 00 D0  |200......P.6....|
000002A0: 0A C8 00 99 22 93 22 3A  99 3A 99 3A 99 A3 35 29  |....".":.:.:..5)|
000002B0: 22 36 20 41 4E 44 20 31  32 20 44 42 2E 20 43 52  |"6 AND 12 DB. CR|
000002C0: 4F 53 53 4F 56 45 52 20  4E 45 54 57 4F 52 4B 22  |OSSOVER NETWORK"|
000002D0: 00 E7 0A CD 00 99 A3 35  29 22 43 41 4C 43 55 4C  |.......5)"CALCUL|
000002E0: 41 54 49 4F 4E 53 22 00  0A 0B D2 00 99 3A 99 A3  |ATIONS"......:..|
000002F0: 31 30 29 22 4C 2E 49 4E  20 4D 48 2E 20 41 4E 44  |10)"L.IN MH. AND|
00000300: 20 43 2E 49 4E 20 55 46  2E 22 00 2A 0B E6 00 99  | C.IN UF.".*....|
00000310: 3A 99 3A 85 20 22 20 45  4E 54 45 52 20 46 43 20  |:.:. " ENTER FC |
00000320: 49 4E 20 48 5A 2E 22 3B  46 43 00 4A 0B F0 00 99  |IN HZ.";FC.J....|
00000330: 3A 99 3A 85 20 22 20 45  4E 54 45 52 20 5A 20 49  |:.:. " ENTER Z I|
00000340: 4E 20 4F 48 4D 27 53 22  3B 5A 00 62 0B FA 00 99  |N OHM'S";Z.b....|
00000350: 22 93 22 3A 99 3A 99 3A  99 22 20 46 43 3D 22 3B  |".":.:.:." FC=";|
00000360: 46 43 00 71 0B 04 01 99  3A 99 22 20 5A 3D 22 3B  |FC.q....:." Z=";|
00000370: 5A 00 B9 0B 0E 01 4C 31  B2 31 35 39 AC 5A AD 46  |Z.....L1.159.Z.F|
00000380: 43 3A 43 31 B2 31 35 39  30 30 30 AD 28 46 43 AC  |C:C1.159000.(FC.|
00000390: 5A 29 3A 4C 32 B2 31 35  39 AC 5A AC BA 28 32 29  |Z):L2.159.Z..(2)|
000003A0: AD 46 43 3A 43 32 B2 31  35 39 30 30 30 AD 28 46  |.FC:C2.159000.(F|
000003B0: 43 AC 5A AC BA 28 32 29  29 00 F2 0B 18 01 99 3A  |C.Z..(2))......:|
000003C0: 99 22 20 36 44 42 2E 20  4C 3D 22 3B 4C 31 3B 22  |." 6DB. L=";L1;"|
000003D0: 4D 48 2E 22 3A 99 A3 36  29 22 4C 4F 57 20 50 41  |MH.":..6)"LOW PA|
000003E0: 53 53 20 4F 4E 4C 59 20  2D 20 4E 4F 20 43 41 50  |SS ONLY - NO CAP|
000003F0: 2E 22 00 2D 0C 22 01 99  3A 99 22 20 36 44 42 2E  |.".-."..:." 6DB.|
00000400: 20 43 3D 22 3B 43 31 3B  22 55 46 2E 22 3A 99 A3  | C=";C1;"UF.":..|
00000410: 36 29 22 48 49 47 48 20  50 41 53 53 20 4F 4E 4C  |6)"HIGH PASS ONL|
00000420: 59 20 2D 20 4E 4F 20 43  4F 49 4C 2E 22 00 48 0C  |Y - NO COIL.".H.|
00000430: 2C 01 99 3A 99 22 20 31  32 44 42 2E 20 4C 3D 22  |,..:." 12DB. L="|
00000440: 4C 32 3B 22 4D 48 2E 22  00 64 0C 36 01 99 3A 99  |L2;"MH.".d.6..:.|
00000450: 22 20 31 32 44 42 2E 20  43 3D 22 3B 43 32 3B 22  |" 12DB. C=";C2;"|
00000460: 55 46 2E 22 00 8E 0C 40  01 99 3A 85 22 20 4E 45  |UF."...@..:." NE|
00000470: 57 20 56 41 4C 55 45 53  20 4F 46 20 46 43 2E 20  |W VALUES OF FC. |
00000480: 26 20 5A 2E 20 28 59 2F  4E 29 22 3B 52 24 00 9E  |& Z. (Y/N)";R$..|
00000490: 0C 4A 01 8B 52 24 B2 22  59 22 A7 32 30 30 00 AE  |.J..R$."Y".200..|
000004A0: 0C 54 01 8B 52 24 B2 22  4E 22 A7 33 35 30 00 D3  |.T..R$."N".350..|
000004B0: 0C 5E 01 99 3A 99 3A 85  20 22 20 50 52 49 4E 54  |.^..:.:. " PRINT|
000004C0: 45 52 20 4F 55 54 50 55  54 20 28 59 2F 4E 29 22  |ER OUTPUT (Y/N)"|
000004D0: 3B 50 24 00 E3 0C 68 01  8B 50 24 B2 22 59 22 A7  |;P$...h..P$."Y".|
000004E0: 33 37 35 00 F2 0C 72 01  8B 50 24 B2 22 4E 22 A7  |375...r..P$."N".|
000004F0: 33 30 00 FB 0C 77 01 9F  31 2C 34 00 2E 0D 7C 01  |30...w..1,4...|.|
00000500: 98 31 2C C7 28 31 34 29  A3 32 29 22 36 20 26 20  |.1,.(14).2)"6 & |
00000510: 31 32 20 44 42 2E 20 43  52 4F 53 53 4F 56 45 52  |12 DB. CROSSOVER|
00000520: 20 43 41 4C 43 55 4C 41  54 49 4F 4E 53 22 00 40  | CALCULATIONS".@|
00000530: 0D 81 01 98 31 2C C7 28  31 35 29 C7 28 31 30 29  |....1,.(15).(10)|
00000540: 00 5A 0D 90 01 98 31 2C  A3 32 29 22 46 43 2E 3D  |.Z....1,.2)"FC.=|
00000550: 22 3B 46 43 3B 22 48 5A  2E 22 00 67 0D 95 01 98  |";FC;"HZ.".g....|
00000560: 31 2C C7 28 31 30 29 00  81 0D 9A 01 98 31 2C A3  |1,.(10)......1,.|
00000570: 32 29 22 5A 2E 3D 22 3B  5A 3B 22 4F 48 4D 27 53  |2)"Z.=";Z;"OHM'S|
00000580: 22 00 8E 0D 9F 01 98 31  2C C7 28 31 30 29 00 C9  |"......1,.(10)..|
00000590: 0D A4 01 98 31 2C A3 32  29 22 36 20 44 42 2E 20  |....1,.2)"6 DB. |
000005A0: 4C 2E 3D 22 3B 4C 31 3B  22 4D 48 2E 20 20 20 28  |L.=";L1;"MH.   (|
000005B0: 4C 4F 57 20 50 41 53 53  20 4F 4E 4C 59 20 2D 20  |LOW PASS ONLY - |
000005C0: 4E 4F 20 43 41 50 2E 29  22 00 D6 0D A6 01 98 31  |NO CAP.)"......1|
000005D0: 2C C7 28 31 30 29 00 10  0E AE 01 98 31 2C A3 32  |,.(10)......1,.2|
000005E0: 29 22 36 20 44 42 2E 20  43 2E 3D 22 3B 43 31 3B  |)"6 DB. C.=";C1;|
000005F0: 22 55 46 2E 20 20 20 28  48 49 20 50 41 53 53 20  |"UF.   (HI PASS |
00000600: 4F 4E 4C 59 20 2D 20 4E  4F 20 43 4F 49 4C 29 22  |ONLY - NO COIL)"|
00000610: 00 1D 0E B0 01 98 31 2C  C7 28 31 30 29 00 3D 0E  |......1,.(10).=.|
00000620: B8 01 98 31 2C A3 32 29  22 31 32 20 44 42 2E 20  |...1,.2)"12 DB. |
00000630: 4C 2E 3D 22 3B 4C 32 3B  22 4D 48 2E 22 00 4A 0E  |L.=";L2;"MH.".J.|
00000640: BA 01 98 31 2C C7 28 31  30 29 00 6A 0E C2 01 98  |...1,.(10).j....|
00000650: 31 2C A3 32 29 22 31 32  20 44 42 2E 20 43 2E 3D  |1,.2)"12 DB. C.=|
00000660: 22 3B 43 32 3B 22 55 46  2E 22 00 8B 0E C4 01 98  |";C2;"UF."......|
00000670: 31 2C C7 28 31 30 29 C7  28 31 30 29 C7 28 31 30  |1,.(10).(10).(10|
00000680: 29 C7 28 31 30 29 C7 28  31 30 29 00 92 0E C7 01  |).(10).(10).....|
00000690: A0 31 00 9A 0E CC 01 89  33 30 00 C7 0E 4E 02 99  |.1......30...N..|
000006A0: 22 93 22 3A 99 3A 99 3A  99 22 20 43 52 4F 53 53  |".":.:.:." CROSS|
000006B0: 4F 56 45 52 20 46 52 45  51 2E 20 43 41 4C 43 55  |OVER FREQ. CALCU|
000006C0: 4C 41 54 49 4F 4E 22 00  EF 0E 53 02 99 22 20 28  |LATION"...S.." (|
000006D0: 4C 2E 2C 43 2E 2C 26 20  5A 2E 20 4B 4E 4F 57 4E  |L.,C.,& Z. KNOWN|
000006E0: 29 20 28 31 32 20 44 42  2E 20 4F 4E 4C 59 29 00  |) (12 DB. ONLY).|
000006F0: 0D 0F 58 02 99 3A 85 20  22 20 45 4E 54 45 52 20  |..X..:. " ENTER |
00000700: 4C 2E 20 49 4E 20 4D 48  2E 3D 22 3B 4C 00 2B 0F  |L. IN MH.=";L.+.|
00000710: 62 02 99 3A 85 20 22 20  45 4E 54 45 52 20 43 2E  |b..:. " ENTER C.|
00000720: 20 49 4E 20 55 46 2E 3D  22 3B 43 00 4A 0F 6C 02  | IN UF.=";C.J.l.|
00000730: 99 3A 85 20 22 20 45 4E  54 45 52 20 5A 2E 20 49  |.:. " ENTER Z. I|
00000740: 4E 20 4F 48 4D 53 3D 22  3B 5A 00 63 0F 80 02 46  |N OHMS=";Z.c...F|
00000750: 43 B2 31 35 39 30 30 30  AD 28 43 AC 5A AC BA 28  |C.159000.(C.Z..(|
00000760: 32 29 29 00 79 0F 8A 02  46 4C B2 28 31 35 39 AC  |2)).y...FL.(159.|
00000770: 5A AC BA 28 32 29 29 AD  4C 00 A2 0F 94 02 99 3A  |Z..(2)).L......:|
00000780: 99 22 20 43 52 4F 53 53  4F 56 45 52 20 46 52 45  |." CROSSOVER FRE|
00000790: 51 2E 4F 46 20 4C 2E 3D  22 3B 46 4C 3B 22 48 5A  |Q.OF L.=";FL;"HZ|
000007A0: 2E 22 00 CC 0F 99 02 99  3A 99 22 20 43 52 4F 53  |."......:." CROS|
000007B0: 53 4F 56 45 52 20 46 52  45 51 2E 20 4F 46 20 43  |SOVER FREQ. OF C|
000007C0: 2E 3D 22 3B 46 43 3B 22  48 5A 2E 22 00 E8 0F 9B  |.=";FC;"HZ."....|
000007D0: 02 99 3A 99 22 20 31 32  20 44 42 2E 20 50 45 52  |..:." 12 DB. PER|
000007E0: 20 4F 43 54 41 56 45 22  00 18 10 9E 02 99 3A 85  | OCTAVE"......:.|
000007F0: 22 20 4E 45 57 20 56 41  4C 55 45 20 4F 46 20 43  |" NEW VALUE OF C|
00000800: 52 4F 53 53 4F 56 45 52  20 46 52 45 51 2E 20 28  |ROSSOVER FREQ. (|
00000810: 59 2F 4E 29 22 3B 52 24  00 29 10 A0 02 8B 20 52  |Y/N)";R$.).... R|
00000820: 24 B2 22 59 22 A7 35 39  30 00 3A 10 A2 02 8B 20  |$."Y".590.:.... |
00000830: 52 24 B2 22 4E 22 A7 36  39 30 00 5F 10 B2 02 99  |R$."N".690._....|
00000840: 3A 99 3A 85 20 22 20 50  52 49 4E 54 45 52 20 4F  |:.:. " PRINTER O|
00000850: 55 54 50 55 54 20 28 59  2F 4E 29 22 3B 50 24 00  |UTPUT (Y/N)";P$.|
00000860: 6F 10 B7 02 8B 50 24 B2  22 59 22 A7 37 30 35 00  |o....P$."Y".705.|
00000870: 7E 10 BC 02 8B 50 24 B2  22 4E 22 A7 33 30 00 87  |~....P$."N".30..|
00000880: 10 C1 02 9F 31 2C 34 00  B4 10 C6 02 98 31 2C C7  |....1,4......1,.|
00000890: 28 31 34 29 A3 32 29 22  43 52 4F 53 53 4F 56 45  |(14).2)"CROSSOVE|
000008A0: 52 20 46 52 45 51 2E 20  43 41 4C 43 55 4C 41 54  |R FREQ. CALCULAT|
000008B0: 49 4F 4E 22 00 C6 10 CB  02 98 31 2C C7 28 31 35  |ION"......1,.(15|
000008C0: 29 C7 28 31 30 29 00 E4  10 D0 02 98 31 2C A3 32  |).(10)......1,.2|
000008D0: 29 22 31 32 20 44 42 2E  20 50 45 52 20 4F 43 54  |)"12 DB. PER OCT|
000008E0: 41 56 45 22 00 F1 10 D2  02 98 31 2C C7 28 31 30  |AVE"......1,.(10|
000008F0: 29 00 0B 11 D3 02 98 31  2C A3 32 29 22 5A 2E 3D  |)......1,.2)"Z.=|
00000900: 22 3B 5A 3B 22 4F 48 4D  27 53 22 00 18 11 D4 02  |";Z;"OHM'S".....|
00000910: 98 31 2C C7 28 31 30 29  00 2F 11 D5 02 98 31 2C  |.1,.(10)./....1,|
00000920: A3 32 29 22 4C 2E 3D 22  3B 4C 3B 22 4D 48 2E 00  |.2)"L.=";L;"MH..|
00000930: 3C 11 D7 02 98 31 2C C7  28 31 30 29 00 67 11 DA  |<....1,.(10).g..|
00000940: 02 98 31 2C A3 32 29 22  43 52 4F 53 53 4F 56 45  |..1,.2)"CROSSOVE|
00000950: 52 20 46 52 45 51 2E 4F  46 20 4C 2E 3D 22 3B 46  |R FREQ.OF L.=";F|
00000960: 4C 3B 22 48 5A 2E 22 00  74 11 DC 02 98 31 2C C7  |L;"HZ.".t....1,.|
00000970: 28 31 39 29 00 8C 11 DF  02 98 31 2C A3 32 29 22  |(19)......1,.2)"|
00000980: 43 2E 3D 22 3B 43 3B 22  55 46 2E 22 00 99 11 E1  |C.=";C;"UF."....|
00000990: 02 98 31 2C C7 28 31 30  29 00 C5 11 E4 02 98 31  |..1,.(10)......1|
000009A0: 2C A3 32 29 22 43 52 4F  53 53 4F 56 45 52 20 46  |,.2)"CROSSOVER F|
000009B0: 52 45 51 2E 20 4F 46 20  43 2E 3D 22 3B 46 43 3B  |REQ. OF C.=";FC;|
000009C0: 22 48 5A 2E 22 00 E6 11  EB 02 98 31 2C C7 28 31  |"HZ."......1,.(1|
000009D0: 30 29 C7 28 31 30 29 C7  28 31 30 29 C7 28 31 30  |0).(10).(10).(10|
000009E0: 29 C7 28 31 30 29 00 ED  11 EE 02 A0 31 00 F5 11  |).(10)......1...|
000009F0: F3 02 89 33 30 00 22 12  16 03 99 22 93 22 3A 99  |...30."....".":.|
00000A00: 3A 99 3A 99 22 20 43 52  4F 53 53 4F 56 45 52 20  |:.:." CROSSOVER |
00000A10: 46 52 45 51 2E 20 43 41  4C 43 55 4C 41 54 49 4F  |FREQ. CALCULATIO|
00000A20: 4E 22 00 46 12 1B 03 99  22 20 28 43 2E 2C 26 20  |N".F...." (C.,& |
00000A30: 5A 2E 20 4B 4E 4F 57 4E  29 20 28 36 44 42 2E 20  |Z. KNOWN) (6DB. |
00000A40: 4F 4E 4C 59 29 22 00 64  12 20 03 99 3A 85 20 22  |ONLY)".d. ..:. "|
00000A50: 20 45 4E 54 45 52 20 43  2E 20 49 4E 20 55 46 2E  | ENTER C. IN UF.|
00000A60: 22 3B 43 31 00 83 12 2A  03 99 3A 85 20 22 20 45  |";C1...*..:. " E|
00000A70: 4E 54 45 52 20 5A 2E 20  49 4E 20 4F 48 4D 27 53  |NTER Z. IN OHM'S|
00000A80: 22 3B 5A 00 98 12 34 03  46 43 B2 31 35 39 30 30  |";Z...4.FC.15900|
00000A90: 30 AD 28 43 31 AC 5A 29  00 CA 12 3E 03 99 22 93  |0.(C1.Z)...>..".|
00000AA0: 22 3A 99 3A 99 3A 99 22  20 43 52 4F 53 53 4F 56  |":.:.:." CROSSOV|
00000AB0: 45 52 20 46 52 45 51 2E  3D 22 3B 46 43 3B 22 48  |ER FREQ.=";FC;"H|
00000AC0: 5A 2E 20 28 36 44 42 2E  29 22 00 EA 12 48 03 99  |Z. (6DB.)"...H..|
00000AD0: 3A 99 22 20 43 41 50 41  43 49 54 41 4E 43 45 3D  |:." CAPACITANCE=|
00000AE0: 22 3B 43 31 3B 22 55 46  2E 22 00 09 13 4D 03 99  |";C1;"UF."...M..|
00000AF0: 3A 99 22 20 49 4D 50 45  44 41 4E 43 45 3D 22 3B  |:." IMPEDANCE=";|
00000B00: 5A 3B 22 4F 48 4D 27 53  22 00 37 13 52 03 99 3A  |Z;"OHM'S".7.R..:|
00000B10: 99 3A 85 20 22 20 4E 45  57 20 56 41 4C 55 45 53  |.:. " NEW VALUES|
00000B20: 20 4F 46 20 43 2E 20 4F  52 20 5A 2E 3F 20 28 59  | OF C. OR Z.? (Y|
00000B30: 2F 4E 29 22 3B 52 24 00  47 13 5C 03 8B 52 24 B2  |/N)";R$.G.\..R$.|
00000B40: 22 59 22 A7 37 39 30 00  57 13 66 03 8B 52 24 B2  |"Y".790.W.f..R$.|
00000B50: 22 4E 22 A7 38 37 35 00  60 13 6B 03 9F 31 2C 34  |"N".875.`.k..1,4|
00000B60: 00 84 13 70 03 99 3A 99  3A 85 22 20 50 52 49 4E  |...p..:.:." PRIN|
00000B70: 54 45 52 20 4F 55 54 50  55 54 20 28 59 2F 4E 29  |TER OUTPUT (Y/N)|
00000B80: 22 3B 50 24 00 94 13 75  03 8B 50 24 B2 22 59 22  |";P$...u..P$."Y"|
00000B90: A7 38 39 35 00 A3 13 7A  03 8B 50 24 B2 22 4E 22  |.895...z..P$."N"|
00000BA0: A7 33 30 00 AC 13 7C 03  9F 31 2C 34 00 D9 13 7F  |.30...|..1,4....|
00000BB0: 03 98 31 2C C7 28 31 34  29 A3 32 29 22 43 52 4F  |..1,.(14).2)"CRO|
00000BC0: 53 53 4F 56 45 52 20 46  52 45 51 2E 20 43 41 4C  |SSOVER FREQ. CAL|
00000BD0: 43 55 4C 41 54 49 4F 4E  22 00 EB 13 84 03 98 31  |CULATION"......1|
00000BE0: 2C C7 28 31 35 29 C7 28  31 30 29 00 0C 14 89 03  |,.(15).(10).....|
00000BF0: 98 31 2C A3 32 29 22 49  4D 50 45 44 41 4E 43 45  |.1,.2)"IMPEDANCE|
00000C00: 3D 22 3B 5A 3B 22 4F 48  4D 27 53 22 00 19 14 8E  |=";Z;"OHM'S"....|
00000C10: 03 98 31 2C C7 28 31 30  29 00 3B 14 98 03 98 31  |..1,.(10).;....1|
00000C20: 2C A3 32 29 22 43 41 50  41 43 49 54 41 4E 43 45  |,.2)"CAPACITANCE|
00000C30: 3D 22 3B 43 31 3B 22 55  46 2E 22 00 48 14 A2 03  |=";C1;"UF.".H...|
00000C40: 98 31 2C C7 28 31 30 29  00 75 14 AC 03 98 31 2C  |.1,.(10).u....1,|
00000C50: A3 32 29 22 43 52 4F 53  53 4F 56 45 52 20 46 52  |.2)"CROSSOVER FR|
00000C60: 45 51 2E 3D 22 3B 46 43  3B 22 48 5A 2E 20 28 36  |EQ.=";FC;"HZ. (6|
00000C70: 44 42 2E 29 22 00 96 14  B1 03 98 31 2C C7 28 31  |DB.)"......1,.(1|
00000C80: 30 29 C7 28 31 30 29 C7  28 31 30 29 C7 28 31 30  |0).(10).(10).(10|
00000C90: 29 C7 28 31 30 29 00 9D  14 B6 03 A0 31 00 A5 14  |).(10)......1...|
00000CA0: BB 03 89 33 30 00 D2 14  DE 03 99 22 93 22 3A 99  |...30......".":.|
00000CB0: 3A 99 3A 99 22 20 43 52  4F 53 53 4F 56 45 52 20  |:.:." CROSSOVER |
00000CC0: 46 52 45 51 2E 20 43 41  4C 43 55 4C 41 54 49 4F  |FREQ. CALCULATIO|
00000CD0: 4E 22 00 F6 14 E3 03 99  22 20 28 4C 2E 2C 26 20  |N"......" (L.,& |
00000CE0: 5A 2E 20 4B 4E 4F 57 4E  29 20 28 36 44 42 2E 20  |Z. KNOWN) (6DB. |
00000CF0: 4F 4E 4C 59 29 22 00 14  15 E8 03 99 3A 85 20 22  |ONLY)"......:. "|
00000D00: 20 45 4E 54 45 52 20 4C  2E 20 49 4E 20 4D 48 2E  | ENTER L. IN MH.|
00000D10: 22 3B 4C 31 00 33 15 F2  03 99 3A 85 20 22 20 45  |";L1.3....:. " E|
00000D20: 4E 54 45 52 20 5A 2E 20  49 4E 20 4F 48 4D 27 53  |NTER Z. IN OHM'S|
00000D30: 22 3B 5A 00 45 15 FC 03  46 43 B2 28 31 35 39 AC  |";Z.E...FC.(159.|
00000D40: 5A 29 AD 4C 31 00 77 15  06 04 99 22 93 22 3A 99  |Z).L1.w....".":.|
00000D50: 3A 99 3A 99 22 20 43 52  4F 53 53 4F 56 45 52 20  |:.:." CROSSOVER |
00000D60: 46 52 45 51 2E 3D 22 3B  46 43 3B 22 48 5A 2E 20  |FREQ.=";FC;"HZ. |
00000D70: 28 36 44 42 2E 29 22 00  96 15 10 04 99 3A 99 22  |(6DB.)"......:."|
00000D80: 20 49 4E 44 55 43 54 41  4E 43 45 3D 22 3B 4C 31  | INDUCTANCE=";L1|
00000D90: 3B 22 4D 48 2E 22 00 B5  15 15 04 99 3A 99 22 20  |;"MH."......:." |
00000DA0: 49 4D 50 45 44 41 4E 43  45 3D 22 3B 5A 3B 22 4F  |IMPEDANCE=";Z;"O|
00000DB0: 48 4D 27 53 22 00 E1 15  1A 04 99 3A 85 22 20 4E  |HM'S"......:." N|
00000DC0: 45 57 20 56 41 4C 55 45  53 20 4F 46 20 4C 2E 2C  |EW VALUES OF L.,|
00000DD0: 20 4F 52 20 5A 2E 3F 20  28 59 2F 4E 29 22 3B 52  | OR Z.? (Y/N)";R|
00000DE0: 24 00 F1 15 24 04 8B 52  24 B2 22 59 22 A7 39 39  |$...$..R$."Y".99|
00000DF0: 30 00 02 16 2E 04 8B 52  24 B2 22 4E 22 A7 31 30  |0......R$."N".10|
00000E00: 38 30 00 26 16 38 04 99  3A 99 3A 85 22 20 50 52  |80.&.8..:.:." PR|
00000E10: 49 4E 54 45 52 20 4F 55  54 50 55 54 20 28 59 2F  |INTER OUTPUT (Y/|
00000E20: 4E 29 22 3B 50 24 00 37  16 3D 04 8B 50 24 B2 22  |N)";P$.7.=..P$."|
00000E30: 59 22 A7 31 30 39 32 00  46 16 42 04 8B 50 24 B2  |Y".1092.F.B..P$.|
00000E40: 22 4E 22 A7 33 30 00 4F  16 44 04 9F 31 2C 34 00  |"N".30.O.D..1,4.|
00000E50: 7C 16 47 04 98 31 2C C7  28 31 34 29 A3 32 29 22  ||.G..1,.(14).2)"|
00000E60: 43 52 4F 53 53 4F 56 45  52 20 46 52 45 51 2E 20  |CROSSOVER FREQ. |
00000E70: 43 41 4C 43 55 4C 41 54  49 4F 4E 22 00 8E 16 4C  |CALCULATION"...L|
00000E80: 04 98 31 2C C7 28 31 35  29 C7 28 31 30 29 00 AF  |..1,.(15).(10)..|
00000E90: 16 51 04 98 31 2C A3 32  29 22 49 4D 50 45 44 41  |.Q..1,.2)"IMPEDA|
00000EA0: 4E 43 45 3D 22 3B 5A 3B  22 4F 48 4D 27 53 22 00  |NCE=";Z;"OHM'S".|
00000EB0: BC 16 56 04 98 31 2C C7  28 31 30 29 00 DD 16 60  |..V..1,.(10)...`|
00000EC0: 04 98 31 2C A3 32 29 22  49 4E 44 55 43 54 41 4E  |..1,.2)"INDUCTAN|
00000ED0: 43 45 3D 22 3B 4C 31 3B  22 4D 48 2E 22 00 EA 16  |CE=";L1;"MH."...|
00000EE0: 6A 04 98 31 2C C7 28 31  30 29 00 17 17 74 04 98  |j..1,.(10)...t..|
00000EF0: 31 2C A3 32 29 22 43 52  4F 53 53 4F 56 45 52 20  |1,.2)"CROSSOVER |
00000F00: 46 52 45 51 2E 3D 22 3B  46 43 3B 22 48 5A 2E 20  |FREQ.=";FC;"HZ. |
00000F10: 28 36 44 42 2E 29 22 00  38 17 79 04 98 31 2C C7  |(6DB.)".8.y..1,.|
00000F20: 28 31 30 29 C7 28 31 30  29 C7 28 31 30 29 C7 28  |(10).(10).(10).(|
00000F30: 31 30 29 C7 28 31 30 29  00 3F 17 7E 04 A0 31 00  |10).(10).?.~..1.|
00000F40: 47 17 83 04 89 33 30 00  7E 17 B0 04 99 22 93 22  |G....30.~...."."|
00000F50: 3A 99 3A 99 3A 99 22 20  20 31 38 44 42 2E 20 43  |:.:.:."  18DB. C|
00000F60: 52 4F 53 53 4F 56 45 52  20 4E 45 54 57 4F 52 4B  |ROSSOVER NETWORK|
00000F70: 20 43 41 4C 43 55 4C 41  54 49 4F 4E 53 22 00 A1  | CALCULATIONS"..|
00000F80: 17 BA 04 99 3A 99 A3 31  30 29 22 4C 2E 49 4E 20  |....:..10)"L.IN |
00000F90: 4D 48 2E 20 41 4E 44 20  43 2E 49 4E 20 55 46 2E  |MH. AND C.IN UF.|
00000FA0: 22 00 C0 17 C4 04 99 3A  99 3A 85 22 20 45 4E 54  |"......:.:." ENT|
00000FB0: 45 52 20 46 43 20 49 4E  20 48 5A 2E 22 3B 46 43  |ER FC IN HZ.";FC|
00000FC0: 00 DF 17 CE 04 99 3A 99  3A 85 22 20 45 4E 54 45  |......:.:." ENTE|
00000FD0: 52 20 5A 2E 49 4E 20 4F  48 4D 27 53 22 3B 5A 00  |R Z.IN OHM'S";Z.|
00000FE0: F8 17 D8 04 99 22 93 22  3A 99 3A 99 3A 99 22 20  |.....".":.:.:." |
00000FF0: 20 46 43 3D 22 3B 46 43  00 08 18 E2 04 99 3A 99  | FC=";FC......:.|
00001000: 22 20 20 5A 3D 22 3B 5A  00 3A 18 EC 04 43 31 B2  |"  Z=";Z.:...C1.|
00001010: 31 35 39 30 30 30 AD 28  46 43 AC 5A 29 3A 43 33  |159000.(FC.Z):C3|
00001020: B2 31 35 39 30 30 30 AD  28 46 43 AC 5A AC 31 2E  |.159000.(FC.Z.1.|
00001030: 36 29 3A 43 34 B2 32 AC  43 31 00 64 18 F6 04 4C  |6):C4.2.C1.d...L|
00001040: 31 B2 31 35 39 AC 5A AD  46 43 3A 4C 33 B2 28 31  |1.159.Z.FC:L3.(1|
00001050: 35 39 AC 5A AC 31 2E 36  29 AD 46 43 3A 4C 34 B2  |59.Z.1.6).FC:L4.|
00001060: 4C 31 AD 32 00 82 18 00  05 99 3A 99 22 20 20 28  |L1.2......:."  (|
00001070: 4C 4F 57 20 50 41 53 53  20 53 45 43 54 49 4F 4E  |LOW PASS SECTION|
00001080: 29 22 00 A6 18 0A 05 99  3A 99 22 20 20 49 4E 50  |)"......:."  INP|
00001090: 55 54 20 49 4E 44 55 43  54 4F 52 3D 22 3B 4C 33  |UT INDUCTOR=";L3|
000010A0: 3B 22 4D 48 2E 22 00 C9  18 14 05 99 22 20 20 4F  |;"MH."......"  O|
000010B0: 55 54 50 55 54 20 49 4E  44 55 43 54 4F 52 3D 22  |UTPUT INDUCTOR="|
000010C0: 3B 4C 31 3B 22 4D 48 2E  22 00 EC 18 1E 05 99 22  |;L1;"MH."......"|
000010D0: 20 20 53 57 41 4D 50 20  43 41 50 41 43 49 54 4F  |  SWAMP CAPACITO|
000010E0: 52 3D 22 3B 43 34 3B 22  55 46 2E 22 00 0B 19 28  |R=";C4;"UF."...(|
000010F0: 05 99 3A 99 22 20 20 28  48 49 47 48 20 50 41 53  |..:."  (HIGH PAS|
00001100: 53 20 53 45 43 54 49 4F  4E 29 22 00 30 19 32 05  |S SECTION)".0.2.|
00001110: 99 3A 99 22 20 20 49 4E  50 55 54 20 43 41 50 41  |.:."  INPUT CAPA|
00001120: 43 49 54 4F 52 3D 22 3B  43 33 3B 22 55 46 2E 22  |CITOR=";C3;"UF."|
00001130: 00 54 19 3C 05 99 22 20  20 4F 55 54 50 55 54 20  |.T.<.."  OUTPUT |
00001140: 43 41 50 41 43 49 54 4F  52 3D 22 3B 43 31 3B 22  |CAPACITOR=";C1;"|
00001150: 55 46 2E 22 00 73 19 46  05 99 22 20 20 53 57 41  |UF.".s.F.."  SWA|
00001160: 4D 50 20 43 48 4F 4B 45  3D 22 3B 4C 34 3B 22 4D  |MP CHOKE=";L4;"M|
00001170: 48 2E 22 00 9E 19 50 05  99 3A 85 22 20 20 4E 45  |H."...P..:."  NE|
00001180: 57 20 56 41 4C 55 45 53  20 4F 46 20 46 43 2E 26  |W VALUES OF FC.&|
00001190: 20 5A 2E 20 20 28 59 2F  4E 29 22 3B 44 24 00 AF  | Z.  (Y/N)";D$..|
000011A0: 19 5A 05 8B 44 24 B2 22  59 22 A7 31 32 30 30 00  |.Z..D$."Y".1200.|
000011B0: C0 19 64 05 8B 44 24 B2  22 4E 22 A7 31 33 39 30  |..d..D$."N".1390|
000011C0: 00 E4 19 6E 05 99 3A 85  22 20 20 50 52 49 4E 54  |...n..:."  PRINT|
000011D0: 45 52 20 4F 55 54 50 55  54 20 20 28 59 2F 4E 29  |ER OUTPUT  (Y/N)|
000011E0: 22 3B 47 24 00 F5 19 78  05 8B 47 24 B2 22 59 22  |";G$...x..G$."Y"|
000011F0: A7 31 34 32 30 00 04 1A  82 05 8B 47 24 B2 22 4E  |.1420......G$."N|
00001200: 22 A7 33 30 00 0D 1A 8C  05 9F 31 2C 34 00 3D 1A  |".30......1,4.=.|
00001210: 96 05 98 31 2C C7 28 31  34 29 A3 32 29 22 20 31  |...1,.(14).2)" 1|
00001220: 38 20 44 42 2E 20 43 52  4F 53 53 4F 56 45 52 20  |8 DB. CROSSOVER |
00001230: 43 41 4C 43 55 4C 41 54  49 4F 4E 53 22 00 4F 1A  |CALCULATIONS".O.|
00001240: A0 05 98 31 2C C7 28 31  35 29 C7 28 31 30 29 00  |...1,.(15).(10).|
00001250: 68 1A A2 05 98 31 2C A3  32 29 22 46 43 3D 22 3B  |h....1,.2)"FC=";|
00001260: 46 43 3B 22 48 5A 2E 22  00 75 1A A4 05 98 31 2C  |FC;"HZ.".u....1,|
00001270: C7 28 31 30 29 00 8E 1A  A6 05 98 31 2C A3 32 29  |.(10)......1,.2)|
00001280: 22 5A 3D 22 3B 5A 3B 22  4F 48 4D 27 53 22 00 9B  |"Z=";Z;"OHM'S"..|
00001290: 1A A8 05 98 31 2C C7 28  31 30 29 00 BA 1A AA 05  |....1,.(10).....|
000012A0: 98 31 2C A3 32 29 22 28  4C 4F 57 20 50 41 53 53  |.1,.2)"(LOW PASS|
000012B0: 20 53 45 43 54 49 4F 4E  29 22 00 C7 1A B4 05 98  | SECTION)"......|
000012C0: 31 2C C7 28 31 30 29 00  EC 1A BE 05 98 31 2C A3  |1,.(10)......1,.|
000012D0: 32 29 22 49 4E 50 55 54  20 49 4E 44 55 43 54 4F  |2)"INPUT INDUCTO|
000012E0: 52 3D 22 3B 4C 33 3B 22  4D 48 2E 22 00 F9 1A C8  |R=";L3;"MH."....|
000012F0: 05 98 31 2C C7 28 31 30  29 00 1F 1B D2 05 98 31  |..1,.(10)......1|
00001300: 2C A3 32 29 22 4F 55 54  50 55 54 20 49 4E 44 55  |,.2)"OUTPUT INDU|
00001310: 43 54 4F 52 3D 22 3B 4C  31 3B 22 4D 48 2E 22 00  |CTOR=";L1;"MH.".|
00001320: 2C 1B DC 05 98 31 2C C7  28 31 30 29 00 52 1B E6  |,....1,.(10).R..|
00001330: 05 98 31 2C A3 32 29 22  53 57 41 4D 50 20 43 41  |..1,.2)"SWAMP CA|
00001340: 50 41 43 49 54 4F 52 3D  22 3B 43 34 3B 22 55 46  |PACITOR=";C4;"UF|
00001350: 2E 22 00 64 1B F0 05 98  31 2C C7 28 31 30 29 C7  |.".d....1,.(10).|
00001360: 28 31 30 29 00 84 1B FA  05 98 31 2C A3 32 29 22  |(10)......1,.2)"|
00001370: 28 48 49 47 48 20 50 41  53 53 20 53 45 43 54 49  |(HIGH PASS SECTI|
00001380: 4F 4E 29 22 00 91 1B 04  06 98 31 2C C7 28 31 30  |ON)"......1,.(10|
00001390: 29 00 B7 1B 0E 06 98 31  2C A3 32 29 22 49 4E 50  |)......1,.2)"INP|
000013A0: 55 54 20 43 41 50 41 43  49 54 4F 52 3D 22 3B 43  |UT CAPACITOR=";C|
000013B0: 33 3B 22 55 46 2E 22 00  C4 1B 18 06 98 31 2C C7  |3;"UF."......1,.|
000013C0: 28 31 30 29 00 EB 1B 22  06 98 31 2C A3 32 29 22  |(10)..."..1,.2)"|
000013D0: 4F 55 54 50 55 54 20 43  41 50 41 43 49 54 4F 52  |OUTPUT CAPACITOR|
000013E0: 3D 22 3B 43 31 3B 22 55  46 2E 22 00 F8 1B 2C 06  |=";C1;"UF."...,.|
000013F0: 98 31 2C C7 28 31 30 29  00 1D 1C 36 06 98 31 2C  |.1,.(10)...6..1,|
00001400: A3 32 29 22 53 57 41 4D  50 20 49 4E 44 55 43 54  |.2)"SWAMP INDUCT|
00001410: 4F 52 3D 22 3B 4C 34 3B  22 4D 48 2E 22 00 3E 1C  |OR=";L4;"MH.".>.|
00001420: 3B 06 98 31 2C C7 28 31  30 29 C7 28 31 30 29 C7  |;..1,.(10).(10).|
00001430: 28 31 30 29 C7 28 31 30  29 C7 28 31 30 29 00 45  |(10).(10).(10).E|
00001440: 1C 40 06 A0 31 00 4D 1C  4A 06 89 33 30 00 00 00  |.@..1.M.J..30...|
..!.... CROSSOVER DESIGN PROGRAMS.W.... 
BY ANDREW C ERICKSEN,JR.   MONROE, WISC.
  53566.T....53280,15:.53281,15:."."....
..".":..12)"CROSSOVER DESIGN":.:....(.."
 1.FIND L AND C."...-.."  (CROSSOVER FRE
Q.& IMPEDANCE KNOWN)"...2..:." 2.FIND CR
OSSOVER FREQ."...7.."  (L.,C.,& IMPEDANC
E KNOWN) (12DB. ONLY)".M.<.." 3.FIND CRO
SSOVER FREQ.".X.A.."  (C.& IMPEDANCE KNO
WN) (6DB. ONLY)"...F..:." 4.FIND CROSSOV
ER FREQ.".E.H.."  (L.,& IMPEDANCE KNOWN)
 (6DB. ONLY)"...J..:." 5.FIND L AND C.".
..L.."  (CROSSOVER FREQ.& IMPEDANCE KNOW
N)".".N.."  (18 DB. ONLY)".2.`..:." 6.EN
D".Q.B..:.:. " SELECTION (1-6)";P.^.D..P
.1.200.K.N..P.2.590.X.X..P.3.790......P.
4.990......P.5.1200......P.6...P.H..".":
.:.:..5)"6 AND 12 DB. CROSSOVER NETWORK"
...M...5)"CALCULATIONS"...R..:..10)"L.IN
 MH. AND C.IN UF.".*....:.:. " ENTER FC 
IN HZ.";FC.J....:.:. " ENTER Z IN OHM'S"
;Z.B....".":.:.:." FC=";FC.Q....:." Z=";
Z.....L1.159.Z.FC:C1.159000.(FC.Z):L2.15
9.Z..(2).FC:C2.159000.(FC.Z..(2))......:
." 6DB. L=";L1;"MH.":..6)"LOW PASS ONLY 
- NO CAP.".-."..:." 6DB. C=";C1;"UF.":..
6)"HIGH PASS ONLY - NO COIL.".H.,..:." 1
2DB. L="L2;"MH.".D.6..:." 12DB. C=";C2;"
UF."...@..:." NEW VALUES OF FC. & Z. (Y/
N)";R$...J..R$."Y".200...T..R$."N".350.S
.^..:.:. " PRINTER OUTPUT (Y/N)";P$...H.
.P$."Y".375...R..P$."N".30...W..1,4...|.
.1,G(14).2)"6 & 12 DB. CROSSOVER CALCULA
TIONS".@....1,G(15)G(10).Z....1,.2)"FC.=
";FC;"HZ.".G....1,G(10)......1,.2)"Z.=";
Z;"OHM'S"......1,G(10).I....1,.2)"6 DB. 
L.=";L1;"MH.   (LOW PASS ONLY - NO CAP.)
".V....1,G(10)......1,.2)"6 DB. C.=";C1;
"UF.   (HI PASS ONLY - NO COIL)"......1,
G(10).=....1,.2)"12 DB. L.=";L2;"MH.".J.
...1,G(10).J.B..1,.2)"12 DB. C.=";C2;"UF
."...D..1,G(10)G(10)G(10)G(10)G(10)...G.
 1...L..30.G.N..".":.:.:." CROSSOVER FRE
Q. CALCULATION"...S.." (L.,C.,& Z. KNOWN
) (12 DB. ONLY)...X..:. " ENTER L. IN MH
.=";L.+.B..:. " ENTER C. IN UF.=";C.J.L.
.:. " ENTER Z. IN OHMS=";Z.C...FC.159000
.(C.Z..(2)).Y...FL.(159.Z..(2)).L......:
." CROSSOVER FREQ.OF L.=";FL;"HZ.".L....
:." CROSSOVER FREQ. OF C.=";FC;"HZ."....
..:." 12 DB. PER OCTAVE"......:." NEW VA
LUE OF CROSSOVER FREQ. (Y/N)";R$.). .. R
$."Y".590.:.... R$."N".690._....:.:. " P
RINTER OUTPUT (Y/N)";P$.O....P$."Y".705.
~....P$."N".30...A..1,4...F..1,G(14).2)"
CROSSOVER FREQ. CALCULATION".F.K..1,G(15
)G(10)...P..1,.2)"12 DB. PER OCTAVE"...R
..1,G(10)...S..1,.2)"Z.=";Z;"OHM'S"...T.
.1,G(10)./.U..1,.2)"L.=";L;"MH..<.W..1,G
(10).G.Z..1,.2)"CROSSOVER FREQ.OF L.=";F
L;"HZ.".T....1,G(19)......1,.2)"C.=";C;"
UF."......1,G(10).E....1,.2)"CROSSOVER F
REQ. OF C.=";FC;"HZ."......1,G(10)G(10)G
(10)G(10)G(10)..... 1......30."....".":.
:.:." CROSSOVER FREQ. CALCULATION".F....
" (C.,& Z. KNOWN) (6DB. ONLY)".D. ..:. "
 ENTER C. IN UF.";C1...*..:. " ENTER Z. 
IN OHM'S";Z...4.FC.159000.(C1.Z).J.>..".
":.:.:." CROSSOVER FREQ.=";FC;"HZ. (6DB.
)"...H..:." CAPACITANCE=";C1;"UF."...M..
:." IMPEDANCE=";Z;"OHM'S".7.R..:.:. " NE
W VALUES OF C. OR Z.? (Y/N)";R$.G.\..R$.
"Y".790.W.F..R$."N".875.`.K..1,4...P..:.
:." PRINTER OUTPUT (Y/N)";P$...U..P$."Y"
.895...Z..P$."N".30...|..1,4.Y...1,G(14
).2)"CROSSOVER FREQ. CALCULATION"......1
,G(15)G(10)......1,.2)"IMPEDANCE=";Z;"OH
M'S"......1,G(10).;....1,.2)"CAPACITANCE
=";C1;"UF.".H....1,G(10).U....1,.2)"CROS
SOVER FREQ.=";FC;"HZ. (6DB.)"......1,G(1
0)G(10)G(10)G(10)G(10)..... 1......30.R.
...".":.:.:." CROSSOVER FREQ. CALCULATIO
N"......" (L.,& Z. KNOWN) (6DB. ONLY)"..
....:. " ENTER L. IN MH.";L1.3....:. " E
NTER Z. IN OHM'S";Z.E...FC.(159.Z).L1.W.
...".":.:.:." CROSSOVER FREQ.=";FC;"HZ. 
(6DB.)"......:." INDUCTANCE=";L1;"MH."..
....:." IMPEDANCE=";Z;"OHM'S"......:." N
EW VALUES OF L., OR Z.? (Y/N)";R$...$..R
$."Y".990......R$."N".1080.&.8..:.:." PR
INTER OUTPUT (Y/N)";P$.7.=..P$."Y".1092.
F.B..P$."N".30.O.D..1,4.|.G..1,G(14).2)"
CROSSOVER FREQ. CALCULATION"...L..1,G(15
)G(10)...Q..1,.2)"IMPEDANCE=";Z;"OHM'S".
..V..1,G(10)...`..1,.2)"INDUCTANCE=";L1;
"MH."...J..1,G(10)...T..1,.2)"CROSSOVER 
FREQ.=";FC;"HZ. (6DB.)".8.Y..1,G(10)G(10
)G(10)G(10)G(10).?.~. 1.G....30.~...."."
:.:.:."  18DB. CROSSOVER NETWORK CALCULA
TIONS"......:..10)"L.IN MH. AND C.IN UF.
"...D..:.:." ENTER FC IN HZ.";FC...N..:.
:." ENTER Z.IN OHM'S";Z...X..".":.:.:." 
 FC=";FC......:."  Z=";Z.:...C1.159000.(
FC.Z):C3.159000.(FC.Z.1.6):C4.2.C1.D...L
1.159.Z.FC:L3.(159.Z.1.6).FC:L4.L1.2....
..:."  (LOW PASS SECTION)"......:."  INP
UT INDUCTOR=";L3;"MH.".I...."  OUTPUT IN
DUCTOR=";L1;"MH."......"  SWAMP CAPACITO
R=";C4;"UF."...(..:."  (HIGH PASS SECTIO
N)".0.2..:."  INPUT CAPACITOR=";C3;"UF."
.T.<.."  OUTPUT CAPACITOR=";C1;"UF.".S.F
.."  SWAMP CHOKE=";L4;"MH."...P..:."  NE
W VALUES OF FC.& Z.  (Y/N)";D$...Z..D$."
Y".1200...D..D$."N".1390...N..:."  PRINT
ER OUTPUT  (Y/N)";G$...X..G$."Y".1420...
...G$."N".30......1,4.=....1,G(14).2)" 1
8 DB. CROSSOVER CALCULATIONS".O. ..1,G(1
5)G(10).H....1,.2)"FC=";FC;"HZ.".U....1,
G(10)......1,.2)"Z=";Z;"OHM'S"......1,G(
10)......1,.2)"(LOW PASS SECTION)".G....
1,G(10)......1,.2)"INPUT INDUCTOR=";L3;"
MH."...H..1,G(10)...R..1,.2)"OUTPUT INDU
CTOR=";L1;"MH.".,....1,G(10).R....1,.2)"
SWAMP CAPACITOR=";C4;"UF.".D....1,G(10)G
(10)......1,.2)"(HIGH PASS SECTION)"....
..1,G(10)......1,.2)"INPUT CAPACITOR=";C
3;"UF.".D....1,G(10)..."..1,.2)"OUTPUT C
APACITOR=";C1;"UF."...,..1,G(10)...6..1,
.2)"SWAMP INDUCTOR=";L4;"MH.".>.;..1,G(1
0)G(10)G(10)G(10)G(10).E.@. 1.M.J..30...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL