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 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL