#N canvas 0 15 1148 1147 10; #N canvas 0 15 1148 1126 sonar 0; #X obj 339 183 inlet~; #X obj 47 311 outlet~; #N canvas 0 15 1090 1147 chirp 0; #X obj 272 662 outlet~; #X obj 189 58 table chirp2; #X obj 322 67 float; #X obj 372 69 + 1; #X obj 308 44 bang~; #X msg 349 43 0; #X obj 322 90 select 0 1; #X obj 322 137 s mkchirp1; #X obj 350 114 s mkchirp2; #X obj 207 366 vline~; #X obj 96 65 t b f f; #X obj 96 33 r blocksize; #X obj 166 251 r blocktime; #X obj 258 379 hsl 128 15 1 44000 0 1 empty empty empty -2 -8 0 10 -262144 -1 -1 7500 1; #X obj 139 278 float; #X obj 225 475 tabwrite~ freq; #X obj 139 230 r mkchirp1; #X obj 255 401 s mkchirp; #X obj 349 19 r mkchirp; #X obj 96 160 s mkchirp; #X obj 207 505 phasor~; #X obj 206 531 cos~; #X obj 124 642 tabwrite~ chirp1; #N canvas 0 0 450 300 (subpatch) 0; #X array freq 2048 float 3; #A 0 17682.6 17695.3 17708 17720.6 17733.3 17746 17758.7 17771.4 17784.1 17796.8 17809.5 17822.1 17834.8 17847.5 17860.2 17872.9 17885.6 17898.3 17911 17923.6 17936.3 17949 17961.7 17974.4 17987.1 17999.8 18012.5 18025.2 18037.8 18050.5 18063.2 18075.9 18088.6 18101.3 18114 18126.7 18139.3 18152 18164.7 18177.4 18190.1 18202.8 18215.5 18228.2 18240.8 18253.5 18266.2 18278.9 18291.6 18304.3 18317 18329.7 18342.3 18355 18367.7 18380.4 18393.1 18405.8 18418.5 18431.2 18443.8 18456.5 18469.2 18481.9 18494.6 18507.3 18520 18532.7 18545.3 18558 18570.7 18583.4 18596.1 18608.8 18621.5 18634.2 18646.9 18659.5 18672.2 18684.9 18697.6 18710.3 18723 18735.7 18748.4 18761 18773.7 18786.4 18799.1 18811.8 18824.5 18837.2 18849.9 18862.5 18875.2 18887.9 18900.6 18913.3 18926 18938.7 18951.4 18964 18976.7 18989.4 19002.1 19014.8 19027.5 19040.2 19052.9 19065.6 19078.2 19090.9 19103.6 19116.3 19129 19141.7 19154.4 19167.1 19179.7 19192.4 19205.1 19217.8 19230.5 19243.2 19255.9 19268.6 19281.2 19293.9 19306.6 19319.3 19332 19344.7 19357.4 19370.1 19382.7 19395.4 19408.1 19420.8 19433.5 19446.2 19458.9 19471.6 19484.2 19496.9 19509.6 19522.3 19535 19547.7 19560.4 19573.1 19585.8 19598.4 19611.1 19623.8 19636.5 19649.2 19661.9 19674.6 19687.3 19699.9 19712.6 19725.3 19738 19750.7 19763.4 19776.1 19788.8 19801.4 19814.1 19826.8 19839.5 19852.2 19864.9 19877.6 19890.3 19902.9 19915.6 19928.3 19941 19953.7 19966.4 19979.1 19991.8 20004.4 20017.1 20029.8 20042.5 20055.2 20067.9 20080.6 20093.3 20106 20118.6 20131.3 20144 20156.7 20169.4 20182.1 20194.8 20207.5 20220.1 20232.8 20245.5 20258.2 20270.9 20283.6 20296.3 20309 20321.6 20334.3 20347 20359.7 20372.4 20385.1 20397.8 20410.5 20423.1 20435.8 20448.5 20461.2 20473.9 20486.6 20499.3 20512 20524.7 20537.3 20550 20562.7 20575.4 20588.1 20600.8 20613.5 20626.2 20638.8 20651.5 20664.2 20676.9 20689.6 20702.3 20715 20727.7 20740.3 20753 20765.7 20778.4 20791.1 20803.8 20816.5 20829.2 20841.8 20854.5 20867.2 20879.9 20892.6 20905.3 20918 20930.7 20943.3 20956 20968.7 20981.4 20994.1 21006.8 21019.5 21032.2 21044.9 21057.5 21070.2 21082.9 21095.6 21108.3 21121 21133.7 21146.4 21159 21171.7 21184.4 21197.1 21209.8 21222.5 21235.2 21247.9 21260.5 21273.2 21285.9 21298.6 21311.3 21324 21336.7 21349.4 21362 21374.7 21387.4 21400.1 21412.8 21425.5 21438.2 21450.9 21463.6 21476.2 21488.9 21501.6 21514.3 21527 21539.7 21552.4 21565.1 21577.7 21590.4 21603.1 21615.8 21628.5 21641.2 21653.9 21666.6 21679.2 21691.9 21704.6 21717.3 21730 21742.7 21755.4 21768.1 21780.7 21793.4 21806.1 21818.8 21831.5 21844.2 21856.9 21869.6 21882.2 21894.9 21907.6 21920.3 21933 21945.7 21958.4 21971.1 21983.8 21996.4 22009.1 22021.8 22034.5 22047.2 22059.9 22072.6 22085.3 22097.9 22110.6 22123.3 22136 22148.7 22161.4 22174.1 22186.8 22199.4 22212.1 22224.8 22237.5 22250.2 22262.9 22275.6 22288.3 22300.9 22313.6 22326.3 22339 22351.7 22364.4 22377.1 22389.8 22402.4 22415.1 22427.8 22440.5 22453.2 22465.9 22478.6 22491.3 22504 22516.6 22529.3 22542 22554.7 22567.4 22580.1 22592.8 22605.5 22618.1 22630.8 22643.5 22656.2 22668.9 22681.6 22694.3 22707 22719.6 22732.3 22745 22757.7 22770.4 22783.1 22795.8 22808.5 22821.1 22833.8 22846.5 22859.2 22871.9 22884.6 22897.3 22910 22922.7 22935.3 22948 22960.7 22973.4 22986.1 22998.8 23011.5 23024.2 23036.8 23049.5 23062.2 23074.9 23087.6 23100.3 23113 23125.7 23138.3 23151 23163.7 23176.4 23189.1 23201.8 23214.5 23227.2 23239.8 23252.5 23265.2 23277.9 23290.6 23303.3 23316 23328.7 23341.3 23354 23366.7 23379.4 23392.1 23404.8 23417.5 23430.2 23442.9 23455.5 23468.2 23480.9 23493.6 23506.3 23519 23531.7 23544.4 23557 23569.7 23582.4 23595.1 23607.8 23620.5 23633.2 23645.9 23658.5 23671.2 23683.9 23696.6 23709.3 23722 23734.7 23747.4 23760 23772.7 23785.4 23798.1 23810.8 23823.5 23836.2 23848.9 23861.5 23874.2 23886.9 23899.6 23912.3 23925 23937.7 23950.4 23963.1 23975.7 23988.4 24001.1 24013.8 24026.5 24039.2 24051.9 24064.6 24077.2 24089.9 24102.6 24115.3 24128 24140.7 24153.4 24166.1 24178.7 24191.4 24204.1 24216.8 24229.5 24242.2 24254.9 24267.6 24280.2 24292.9 24305.6 24318.3 24331 24343.7 24356.4 24369.1 24381.8 24394.4 24407.1 24419.8 24432.5 24445.2 24457.9 24470.6 24483.3 24495.9 24508.6 24521.3 24534 24546.7 24559.4 24572.1 24584.8 24597.4 24610.1 24622.8 24635.5 24648.2 24660.9 24673.6 24686.3 24698.9 24711.6 24724.3 24737 24749.7 24762.4 24775.1 24787.8 24800.4 24813.1 24825.8 24838.5 24851.2 24863.9 24876.6 24889.3 24901.9 24914.6 24927.3 24940 24952.7 24965.4 24978.1 24990.8 25003.5 25016.1 25028.8 25041.5 25054.2 25066.9 25079.6 25092.3 25105 25117.6 25130.3 25143 25155.7 25168.4 25181.1 25193.8 25206.5 25219.1 25231.8 25244.5 25257.2 25269.9 25282.6 25295.3 25308 25320.6 25333.3 25346 25358.7 25371.4 25384.1 25396.8 25409.5 25422.2 25434.8 25447.5 25460.2 25472.9 25485.6 25498.3 25511 25523.7 25536.3 25549 25561.7 25574.4 25587.1 25599.8 25612.5 25625.2 25637.8 25650.5 25663.2 25675.9 25688.6 25701.3 25714 25726.7 25739.3 25752 25764.7 25777.4 25790.1 25802.8 25815.5 25828.2 25840.8 25853.5 25866.2 25878.9 25891.6 25904.3 25917 25929.7 25942.4 25955 25967.7 25980.4 25993.1 26005.8 26018.5 26031.2 26043.9 26056.5 26069.2 26081.9 26094.6 26107.3 26120 26132.7 26145.4 26158 26170.7 26183.4 26196.1 26208.8 26221.5 26234.2 26246.9 26259.5 26272.2 26284.9 26297.6 26310.3 26323 26335.7 26348.4 26361.1 26373.7 26386.4 26399.1 26411.8 26424.5 26437.2 26449.9 26462.6 26475.2 26487.9 26500.6 26513.3 26526 26538.7 26551.4 26564.1 26576.7 26589.4 26602.1 26614.8 26627.5 26640.2 26652.9 26665.6 26678.2 26690.9 26703.6 26716.3 26729 26741.7 26754.4 26767.1 26779.7 26792.4 26805.1 26817.8 26830.5 26843.2 26855.9 26868.6 26881.2 26893.9 26906.6 26919.3 26932 26944.7 26957.4 26970.1 26982.8 26995.4 27008.1 27020.8 27033.5 27046.2 27058.9 27071.6 27084.3 27096.9 27109.6 27122.3 27135 27147.7 27160.4 27173.1 27185.8 27198.4 27211.1 27223.8 27236.5 27249.2 27261.9 27274.6 27287.3 27299.9 27312.6 27325.3 27338 27350.7 27363.4 27376.1 27388.8 27401.5 27414.1 27426.8 27439.5 27452.2 27464.9 27477.6 27490.3 27503 27515.6 27528.3 27541 27553.7 27566.4 27579.1 27591.8 27604.5 27617.1 27629.8 27642.5 27655.2 27667.9 27680.6 27693.3 27706 27718.6 27731.3 27744 27756.7 27769.4 27782.1 27794.8 27807.5 27820.2 27832.8 27845.5 27858.2 27870.9 27883.6 27896.3 27909 27921.7 27934.3 27947 27959.7 27972.4 27985.1 27997.8 28010.5 28023.2 28035.8 28048.5 28061.2 28073.9 28086.6 28099.3 28112 28124.7 28137.3 28150 28162.7 28175.4 28188.1 28200.8 28213.5 28226.2 28238.8 28251.5 28264.2 28276.9 28289.6 28302.3 28315 28327.7 28340.4 28353 28365.7 28378.4 28391.1 28403.8 28416.5 28429.2 28441.9 28454.5 28467.2 28479.9 28492.6 28505.3 28518 28530.7 28543.4 28556 28568.7 28581.4 28594.1 28606.8 28619.5 28632.2 28644.9 28657.5 28670.2 28682.9 28695.6 28708.3 28721 28733.7 28746.4 28759 28771.7 28784.4 28797.1 28809.8 28822.5 28835.2 28847.9 28860.6 28873.2 28885.9 28898.6 28911.3 28924 28936.7 28949.4 28962.1 28974.7 28987.4 29000.1 29012.8 29025.5 29038.2 29050.9 29063.6 29076.2 29088.9 29101.6 29114.3 29127 29139.7 29152.4 29165.1 29177.7 29190.4 29203.1 29215.8 29228.5 29241.2 29253.9 29266.6 29279.2 29291.9 29304.6 29317.3 29330 29342.7 29355.4 29368.1 29380.8 29393.4 29406.1 29418.8 29431.5 29444.2 29456.9 29469.6 29482.3 29494.9 29507.6 29520.3 29533 29545.7 29558.4 29571.1 29583.8 29596.4 29609.1 29621.8 29634.5 29647.2 29659.9 29672.6 29685.3 29697.9 29710.6 29723.3 29736 29748.7 29761.4 29774.1 29786.8 29799.4 29812.1 29824.8 29837.5 29850.2 29862.9 29875.6 29888.3 29901 29913.6 29926.3 29939 29951.7 29964.4 29977.1 29989.8 30002.5 30015.1 30027.8 30040.5 30053.2 30065.9 30078.6 30091.3 30104 30116.6 30129.3 30142 30154.7 30167.4 30180.1 30192.8 30205.5 30218.1 30230.8 30243.5 30256.2 30268.9 30281.6 30294.3 30307 30319.7 30332.3 30345 30357.7; #A 1000 30370.4 30383.1 30395.8 30408.5 30421.2 30433.8 30446.5 30459.2 30471.9 30484.6 30497.3 30510 30522.7 30535.3 30548 30560.7 30573.4 30586.1 30598.8 30611.5 30624.2 30636.8 30649.5 30662.2 30674.9 30687.6 30700.3 30713 30725.7 30738.3 30751 30763.7 30776.4 30789.1 30801.8 30814.5 30827.2 30839.9 30852.5 30865.2 30877.9 30890.6 30903.3 30916 30928.7 30941.4 30954 30966.7 30979.4 30992.1 31004.8 31017.5 31030.2 31042.9 31055.5 31068.2 31080.9 31093.6 31106.3 31119 31131.7 31144.4 31157 31169.7 31182.4 31195.1 31207.8 31220.5 31233.2 31245.9 31258.6 31271.2 31283.9 31296.6 31309.3 31322 31334.7 31347.4 31360.1 31372.7 31385.4 31398.1 31410.8 31423.5 31436.2 31448.9 31461.6 31474.2 31486.9 31499.6 31512.3 31525 31537.7 31550.4 31563.1 31575.7 31588.4 31601.1 31613.8 31626.5 31639.2 31651.9 31664.6 31677.2 31689.9 31702.6 31715.3 31728 31740.7 31753.4 31766.1 31778.8 31791.4 31804.1 31816.8 31829.5 31842.2 31854.9 31867.6 31880.3 31892.9 31905.6 31918.3 31931 31943.7 31956.4 31969.1 31981.8 31994.4 32007.1 32019.8 32032.5 32045.2 32057.9 32070.6 32083.3 32095.9 32108.6 32121.3 32134 32146.7 32159.4 32172.1 32184.8 32197.4 32210.1 32222.8 32235.5 32248.2 32260.9 32273.6 32286.3 32299 32311.6 32324.3 32337 32349.7 32362.4 32375.1 32387.8 32400.5 32413.1 32425.8 32438.5 32451.2 32463.9 32476.6 32489.3 32502 32514.6 32527.3 32540 32552.7 32565.4 32578.1 32590.8 32603.5 32616.1 32628.8 32641.5 32654.2 32666.9 32679.6 32692.3 32705 32717.6 32730.3 32743 32755.7 32768.4 32781.1 32793.8 32806.5 32819.2 32831.8 32844.5 32857.2 32869.9 32882.6 32895.3 32908 32920.7 32933.3 32946 32958.7 32971.4 32984.1 32996.8 33009.5 33022.2 33034.8 33047.5 33060.2 33072.9 33085.6 33098.3 33111 33123.7 33136.3 33149 33161.7 33174.4 33187.1 33199.8 33212.5 33225.2 33237.9 33250.5 33263.2 33275.9 33288.6 33301.3 33314 33326.7 33339.4 33352 33364.7 33377.4 33390.1 33402.8 33415.5 33428.2 33440.9 33453.5 33466.2 33478.9 33491.6 33504.3 33517 33529.7 33542.4 33555 33567.7 33580.4 33593.1 33605.8 33618.5 33631.2 33643.9 33656.5 33669.2 33681.9 33694.6 33707.3 33720 33732.7 33745.4 33758.1 33770.7 33783.4 33796.1 33808.8 33821.5 33834.2 33846.9 33859.6 33872.2 33884.9 33897.6 33910.3 33923 33935.7 33948.4 33961.1 33973.7 33986.4 33999.1 34011.8 34024.5 34037.2 34049.9 34062.6 34075.2 34087.9 34100.6 34113.3 34126 34138.7 34151.4 34164.1 34176.8 34189.4 34202.1 34214.8 34227.5 34240.2 34252.9 34265.6 34278.2 34290.9 34303.6 34316.3 34329 34341.7 34354.4 34367.1 34379.8 34392.4 34405.1 34417.8 34430.5 34443.2 34455.9 34468.6 34481.3 34493.9 34506.6 34519.3 34532 34544.7 34557.4 34570.1 34582.8 34595.4 34608.1 34620.8 34633.5 34646.2 34658.9 34671.6 34684.3 34697 34709.6 34722.3 34735 34747.7 34760.4 34773.1 34785.8 34798.5 34811.1 34823.8 34836.5 34849.2 34861.9 34874.6 34887.3 34900 34912.6 34925.3 34938 34950.7 34963.4 34976.1 34988.8 35001.5 35014.1 35026.8 35039.5 35052.2 35064.9 35077.6 35090.3 35103 35115.6 35128.3 35141 35153.7 35166.4 35179.1 35191.8 35204.5 35217.2 35229.8 35242.5 35255.2 35267.9 35280.6 35293.3 35306 35318.7 35331.3 35344 35356.7 35369.4 35382.1 35394.8 35407.5 35420.2 35432.8 35445.5 35458.2 35470.9 35483.6 35496.3 35509 35521.7 35534.3 35547 35559.7 35572.4 35585.1 35597.8 35610.5 35623.2 35635.9 35648.5 35661.2 35673.9 35686.6 35699.3 35712 35724.7 35737.4 35750 35762.7 35775.4 35788.1 35800.8 35813.5 35826.2 35838.9 35851.5 35864.2 35876.9 35889.6 35902.3 35915 35927.7 35940.4 35953 35965.7 35978.4 35991.1 36003.8 36016.5 36029.2 36041.9 36054.5 36067.2 36079.9 36092.6 36105.3 36118 36130.7 36143.4 36156.1 36168.7 36181.4 36194.1 36206.8 36219.5 36232.2 36244.9 36257.6 36270.2 36282.9 36295.6 36308.3 36321 36333.7 36346.4 36359.1 36371.7 36384.4 36397.1 36409.8 36422.5 36435.2 36447.9 36460.6 36473.2 36485.9 36498.6 36511.3 36524 36536.7 36549.4 36562.1 36574.8 36587.4 36600.1 36612.8 36625.5 36638.2 36650.9 36663.6 36676.2 36688.9 36701.6 36714.3 36727 36739.7 36752.4 36765.1 36777.8 36790.4 36803.1 36815.8 36828.5 36841.2 36853.9 36866.6 36879.3 36891.9 36904.6 36917.3 36930 36942.7 36955.4 36968.1 36980.8 36993.4 37006.1 37018.8 37031.5 37044.2 37056.9 37069.6 37082.3 37094.9 37107.6 37120.3 37133 37145.7 37158.4 37171.1 37183.8 37196.5 37209.1 37221.8 37234.5 37247.2 37259.9 37272.6 37285.3 37298 37310.6 37323.3 37336 37348.7 37361.4 37374.1 37386.8 37399.5 37412.1 37424.8 37437.5 37450.2 37462.9 37475.6 37488.3 37501 37513.6 37526.3 37539 37551.7 37564.4 37577.1 37589.8 37602.5 37615.1 37627.8 37640.5 37653.2 37665.9 37678.6 37691.3 37704 37716.7 37729.3 37742 37754.7 37767.4 37780.1 37792.8 37805.5 37818.2 37830.8 37843.5 37856.2 37868.9 37881.6 37894.3 37907 37919.7 37932.3 37945 37957.7 37970.4 37983.1 37995.8 38008.5 38021.2 38033.8 38046.5 38059.2 38071.9 38084.6 38097.3 38110 38122.7 38135.4 38148 38160.7 38173.4 38186.1 38198.8 38211.5 38224.2 38236.9 38249.5 38262.2 38274.9 38287.6 38300.3 38313 38325.7 38338.4 38351 38363.7 38376.4 38389.1 38401.8 38414.5 38427.2 38439.9 38452.5 38465.2 38477.9 38490.6 38503.3 38516 38528.7 38541.4 38554 38566.7 38579.4 38592.1 38604.8 38617.5 38630.2 38642.9 38655.6 38668.2 38680.9 38693.6 38706.3 38719 38731.7 38744.4 38757.1 38769.7 38782.4 38795.1 38807.8 38820.5 38833.2 38845.9 38858.6 38871.2 38883.9 38896.6 38909.3 38922 38934.7 38947.4 38960.1 38972.8 38985.4 38998.1 39010.8 39023.5 39036.2 39048.9 39061.6 39074.2 39086.9 39099.6 39112.3 39125 39137.7 39150.4 39163.1 39175.8 39188.4 39201.1 39213.8 39226.5 39239.2 39251.9 39264.6 39277.3 39289.9 39302.6 39315.3 39328 39340.7 39353.4 39366.1 39378.8 39391.4 39404.1 39416.8 39429.5 39442.2 39454.9 39467.6 39480.3 39492.9 39505.6 39518.3 39531 39543.7 39556.4 39569.1 39581.8 39594.5 39607.1 39619.8 39632.5 39645.2 39657.9 39670.6 39683.3 39696 39708.6 39721.3 39734 39746.7 39759.4 39772.1 39784.8 39797.5 39810.1 39822.8 39835.5 39848.2 39860.9 39873.6 39886.3 39899 39911.6 39924.3 39937 39949.7 39962.4 39975.1 39987.8 40000.5 40013.1 40025.8 40038.5 40051.2 40063.9 40076.6 40089.3 40102 40114.7 40127.3 40140 40152.7 40165.4 40178.1 40190.8 40203.5 40216.2 40228.8 40241.5 40254.2 40266.9 40279.6 40292.3 40305 40317.7 40330.3 40343 40355.7 40368.4 40381.1 40393.8 40406.5 40419.2 40431.8 40444.5 40457.2 40469.9 40482.6 40495.3 40508 40520.7 40533.4 40546 40558.7 40571.4 40584.1 40596.8 40609.5 40622.2 40634.9 40647.5 40660.2 40672.9 40685.6 40698.3 40711 40723.7 40736.4 40749 40761.7 40774.4 40787.1 40799.8 40812.5 40825.2 40837.9 40850.5 40863.2 40875.9 40888.6 40901.3 40914 40926.7 40939.4 40952 40964.7 40977.4 40990.1 41002.8 41015.5 41028.2 41040.9 41053.6 41066.2 41078.9 41091.6 41104.3 41117 41129.7 41142.4 41155.1 41167.7 41180.4 41193.1 41205.8 41218.5 41231.2 41243.9 41256.6 41269.2 41281.9 41294.6 41307.3 41320 41332.7 41345.4 41358.1 41370.7 41383.4 41396.1 41408.8 41421.5 41434.2 41446.9 41459.6 41472.2 41484.9 41497.6 41510.3 41523 41535.7 41548.4 41561.1 41573.8 41586.4 41599.1 41611.8 41624.5 41637.2 41649.9 41662.6 41675.3 41687.9 41700.6 41713.3 41726 41738.7 41751.4 41764.1 41776.8 41789.4 41802.1 41814.8 41827.5 41840.2 41852.9 41865.6 41878.3 41890.9 41903.6 41916.3 41929 41941.7 41954.4 41967.1 41979.8 41992.4 42005.1 42017.8 42030.5 42043.2 42055.9 42068.6 42081.3 42094 42106.6 42119.3 42132 42144.7 42157.4 42170.1 42182.8 42195.5 42208.1 42220.8 42233.5 42246.2 42258.9 42271.6 42284.3 42297 42309.6 42322.3 42335 42347.7 42360.4 42373.1 42385.8 42398.5 42411.1 42423.8 42436.5 42449.2 42461.9 42474.6 42487.3 42500 42512.6 42525.3 42538 42550.7 42563.4 42576.1 42588.8 42601.5 42614.2 42626.8 42639.5 42652.2 42664.9 42677.6 42690.3 42703 42715.7 42728.3 42741 42753.7 42766.4 42779.1 42791.8 42804.5 42817.2 42829.8 42842.5 42855.2 42867.9 42880.6 42893.3 42906 42918.7 42931.3 42944 42956.7 42969.4 42982.1 42994.8 43007.5 43020.2 43032.9 43045.5; #A 2000 43058.2 43070.9 43083.6 43096.3 43109 43121.7 43134.4 43147 43159.7 43172.4 43185.1 43197.8 43210.5 43223.2 43235.9 43248.5 43261.2 43273.9 43286.6 43299.3 43312 43324.7 43337.4 43350 43362.7 43375.4 43388.1 43400.8 43413.5 43426.2 43438.9 43451.5 43464.2 43476.9 43489.6 43502.3 43515 43527.7 43540.4 43553.1 43565.7 43578.4 43591.1 43603.8 43616.5 43629.2 43641.9 43654.6; #X coords 0 44100 2048 0 512 250 1; #X restore 564 43 graph; #N canvas 0 0 450 300 (subpatch) 0; #X array amp 2048 float 3; #A 0 8.86023e-05 0.000320435 0.00072208 0.00127408 0.0019882 0.00285962 0.00388536 0.00507513 0.00641125 0.00791773 0.00956526 0.0113839 0.0133452 0.0154692 0.0177418 0.0201685 0.0227495 0.0254759 0.0283618 0.0313846 0.0345718 0.0378923 0.0413715 0.0449872 0.0487524 0.0526586 0.0567052 0.0608967 0.0652197 0.0696912 0.0742861 0.0790311 0.0838973 0.0889043 0.0940357 0.0992985 0.104688 0.1102 0.115842 0.121597 0.127482 0.133475 0.139595 0.14582 0.152164 0.158614 0.165174 0.171841 0.178608 0.185483 0.19245 0.199524 0.206685 0.213946 0.221293 0.22873 0.236253 0.243858 0.251548 0.259311 0.267157 0.27507 0.283062 0.291116 0.299241 0.307427 0.315675 0.323982 0.332342 0.340759 0.349223 0.357738 0.366295 0.374898 0.383538 0.392216 0.400928 0.409671 0.418444 0.427241 0.436062 0.444903 0.453762 0.462635 0.471521 0.480415 0.489315 0.498219 0.507123 0.516025 0.524923 0.533812 0.542691 0.551555 0.560404 0.569233 0.578041 0.586823 0.595578 0.604304 0.612994 0.621652 0.630267 0.638845 0.647375 0.655862 0.664297 0.67268 0.68101 0.68928 0.697494 0.70564 0.713728 0.72174 0.729688 0.737558 0.745356 0.753075 0.760714 0.768272 0.775741 0.783129 0.790419 0.797626 0.804729 0.811743 0.818653 0.825465 0.832173 0.838774 0.845272 0.851654 0.857934 0.864088 0.870138 0.876061 0.881872 0.887557 0.893121 0.898563 0.903873 0.909063 0.914113 0.919044 0.923828 0.928489 0.933006 0.937391 0.941636 0.945739 0.949705 0.953522 0.957206 0.96073 0.964123 0.967354 0.970448 0.973387 0.976178 0.978819 0.981304 0.983645 0.985821 0.987857 0.989721 0.991445 0.993002 0.99441 0.995657 0.996748 0.997685 0.998457 0.999081 0.999534 0.999843 0.999978 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1; #A 1000 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0.999978 0.999843 0.999534 0.999081 0.998457 0.997685 0.996748 0.995657 0.99441 0.993002 0.991445 0.989721 0.987857 0.985821 0.983644 0.981304 0.978819 0.976178 0.973386 0.970448 0.967354 0.964122 0.96073 0.957205 0.953522 0.949705 0.945739 0.941635 0.937391 0.933006 0.928489 0.923828 0.919044 0.914113 0.909063 0.903873 0.898562 0.893121 0.887557 0.881871 0.87606 0.870137 0.864087 0.857933 0.851653 0.845271 0.838773 0.832172 0.825464 0.818652 0.811742 0.804728 0.797625 0.790419 0.783129 0.775741 0.768272 0.760713 0.753075 0.745356 0.737557 0.729687 0.721739 0.713727 0.705639 0.697493 0.689279 0.681009 0.67268 0.664296 0.655861 0.647375 0.638844 0.630266 0.621651 0.612993 0.604303 0.595577 0.586822 0.57804 0.569232 0.560403 0.551554 0.54269 0.533811 0.524922 0.516025 0.507123 0.498218 0.489314 0.480414 0.47152 0.462634 0.453761 0.444902 0.436062 0.42724 0.418443 0.40967 0.400927 0.392215 0.383537 0.374897 0.366294 0.357738 0.349222 0.340758 0.332341 0.323981 0.315674 0.307426 0.29924 0.291115 0.283061 0.275069 0.267156 0.25931 0.251547 0.243858 0.236252 0.228729 0.221292 0.213945 0.206684 0.199524 0.192449 0.185483 0.178607 0.17184; #A 2000 0.165173 0.158614 0.152163 0.14582 0.139594 0.133474 0.127482 0.121596 0.115841 0.1102 0.104688 0.0992979 0.0940352 0.0889038 0.0838968 0.0790306 0.0742856 0.0696908 0.0652193 0.0608963 0.0567048 0.0526582 0.048752 0.0449868 0.0413712 0.037892 0.0345715 0.0313843 0.0283615 0.0254756 0.0227492 0.0201683 0.0177416 0.015469 0.013345 0.0113837 0.00956509 0.00791758 0.00641111 0.00507501 0.00388527 0.00285953 0.00198811 0.00127402 0.000722021 0.000320405 8.86023e-05 0; #X coords 0 1 2048 0 512 140 1; #X restore 564 308 graph; #X obj 47 425 vline~; #X obj 47 341 - 2; #X obj 47 367 float; #X msg 135 91 \; chirp1 resize \$1 \; chirp2 resize \$1 \; freq resize \$1 \; amp resize \$1; #X obj 47 451 cos~; #X obj 123 595 *~; #X obj 139 302 t b f; #X obj 310 228 r mkchirp2; #X obj 310 257 iem_tab/tab_reverse chirp1 chirp2; #X obj 412 665 outlet~; #X obj 273 634 tabreceive~ chirp1; #X obj 411 636 tabreceive~ chirp2; #X obj 74 617 sig~ 0; #X obj 77 665 tabwrite~ chirp2; #X obj 189 31 table chirp1; #X obj 48 477 *~ -0.5; #X obj 49 506 +~ 0.5; #X obj 49 535 tabwrite~ amp; #X obj 208 397 *~; #X msg 207 339 0 \, 1 \$1; #X obj 209 449 +~ 0; #X obj 258 428 hsl 128 15 1 44000 0 1 empty empty empty -2 -8 0 10 -262144 -1 -1 5100 1; #X obj 254 449 s mkchirp; #X floatatom 342 450 8 0 0 0 - - -; #X msg 47 393 0 \, 0.5 2 \, 0 2 \$1; #X connect 2 0 3 0; #X connect 2 0 6 0; #X connect 3 0 2 1; #X connect 4 0 2 0; #X connect 5 0 2 1; #X connect 6 0 7 0; #X connect 6 1 8 0; #X connect 9 0 43 0; #X connect 10 0 19 0; #X connect 10 2 28 0; #X connect 11 0 10 0; #X connect 12 0 14 1; #X connect 13 0 17 0; #X connect 13 0 43 1; #X connect 14 0 31 0; #X connect 16 0 14 0; #X connect 18 0 5 0; #X connect 20 0 21 0; #X connect 21 0 30 1; #X connect 25 0 29 0; #X connect 26 0 27 0; #X connect 27 0 49 0; #X connect 29 0 40 0; #X connect 30 0 22 0; #X connect 31 0 15 0; #X connect 31 0 22 0; #X connect 31 0 38 0; #X connect 31 0 42 0; #X connect 31 1 26 0; #X connect 31 1 44 0; #X connect 32 0 33 0; #X connect 35 0 0 0; #X connect 36 0 34 0; #X connect 37 0 38 0; #X connect 40 0 41 0; #X connect 41 0 42 0; #X connect 41 0 30 0; #X connect 43 0 45 0; #X connect 44 0 9 0; #X connect 45 0 15 0; #X connect 45 0 20 0; #X connect 46 0 47 0; #X connect 46 0 45 1; #X connect 46 0 48 0; #X connect 49 0 25 0; #X restore 146 189 pd chirp; #N canvas 0 15 1436 1147 correlate 0; #X obj 42 76 rfft~; #X obj 139 82 rfft~; #X obj 42 125 *~; #X obj 152 126 *~; #X obj 92 190 rifft~; #X obj 124 126 *~; #X obj 79 125 *~; #X obj 70 161 -~; #X obj 131 152 +~; #X obj 41 46 inlet~; #X obj 139 46 inlet~; #X obj 91 222 outlet~; #X connect 0 0 2 0; #X connect 0 0 5 0; #X connect 0 1 6 0; #X connect 0 1 3 0; #X connect 1 0 2 1; #X connect 1 0 3 1; #X connect 1 1 6 1; #X connect 1 1 5 1; #X connect 2 0 7 0; #X connect 3 0 8 1; #X connect 4 0 11 0; #X connect 5 0 8 0; #X connect 6 0 7 1; #X connect 7 0 4 0; #X connect 8 0 4 1; #X connect 9 0 0 0; #X connect 10 0 1 0; #X restore 232 334 pd correlate; #X msg 76 47 2048; #X obj 165 57 block~; #X obj 76 73 s blocksize; #X obj 165 -1 r blocksize; #X msg 165 28 set \$1 1; #X obj 256 -2 r blocksize; #X obj 283 50 samplerate~; #X obj 256 26 t f b; #X obj 256 73 /; #X obj 256 97 * 1000; #X obj 256 124 s blocktime; #X obj 76 -4 key; #X obj 76 20 select 9; #X obj 754 1 bang~; #X obj 754 27 float; #X obj 800 27 + 1; #X obj 754 76 select 0; #X obj 754 52 % 10; #X obj 754 145 s draw; #X obj 231 553 *~; #N canvas 0 15 1148 1147 corr 0; #X obj 105 61 unpack f f; #X obj 104 9 bang~; #X obj 105 140 float; #X obj 105 115 pow 0.1; #X obj 105 88 clip 0.1 10; #X obj 214 162 *; #X obj 59 165 pow -1; #X obj 59 192 outlet; #X obj 104 36 tabminmax corr; #X obj 105 164 clip 1000 1e+09; #X connect 0 0 4 0; #X connect 1 0 8 0; #X connect 2 0 6 0; #X connect 2 0 9 0; #X connect 3 0 5 0; #X connect 4 0 3 0; #X connect 5 0 2 0; #X connect 6 0 7 0; #X connect 8 1 0 0; #X connect 9 0 5 1; #X restore 246 478 pd corr AGC; #X obj 368 -3 r blocksize; #N canvas 0 15 1148 1147 (subpatch) 0; #X obj 75 61 inlet~; #X obj 137 62 inlet~; #X obj 196 64 inlet~; #X obj 258 65 inlet~; #X obj 318 66 inlet; #X obj 95 185 == 0; #X obj 74 214 *~; #X obj 138 228 *~; #X obj 156 196 == 1; #X obj 197 225 *~; #X obj 258 226 *~; #X obj 210 197 == 2; #X obj 281 202 == 3; #X obj 215 304 outlet~; #X connect 0 0 6 0; #X connect 1 0 7 0; #X connect 2 0 9 0; #X connect 3 0 10 0; #X connect 4 0 12 0; #X connect 4 0 11 0; #X connect 4 0 8 0; #X connect 4 0 5 0; #X connect 5 0 6 1; #X connect 6 0 13 0; #X connect 7 0 13 0; #X connect 8 0 7 1; #X connect 9 0 13 0; #X connect 10 0 13 0; #X connect 11 0 9 1; #X connect 12 0 10 1; #X restore 191 296 pd 4 to 1; #N canvas 0 15 1148 1147 (subpatch) 0; #X obj 75 61 inlet~; #X obj 137 62 inlet~; #X obj 196 64 inlet~; #X obj 258 65 inlet~; #X obj 318 66 inlet; #X obj 95 185 == 0; #X obj 74 214 *~; #X obj 138 228 *~; #X obj 156 196 == 1; #X obj 197 225 *~; #X obj 258 226 *~; #X obj 210 197 == 2; #X obj 281 202 == 3; #X obj 215 304 outlet~; #X connect 0 0 6 0; #X connect 1 0 7 0; #X connect 2 0 9 0; #X connect 3 0 10 0; #X connect 4 0 12 0; #X connect 4 0 11 0; #X connect 4 0 8 0; #X connect 4 0 5 0; #X connect 5 0 6 1; #X connect 6 0 13 0; #X connect 7 0 13 0; #X connect 8 0 7 1; #X connect 9 0 13 0; #X connect 10 0 13 0; #X connect 11 0 9 1; #X connect 12 0 10 1; #X restore 340 293 pd 4 to 1; #X msg 114 48 4096; #X msg 37 48 1024; #X obj 20 18 loadbang; #X obj 135 683 bang~; #X obj 135 733 unpack f f; #X obj 135 759 s s_start; #X obj 536 500 vline~; #N canvas 0 0 450 300 (subpatch) 0; #X array corr_disp_l 512 float 0; #X coords 0 1 511 0 512 140 1; #X restore 74 -160 graph; #X obj 938 145 hsl 128 15 0 1 0 1 empty empty empty -2 -8 0 10 -262144 -1 -1 2800 0; #X obj 596 397 *; #X obj 609 345 r blocksize; #X obj 581 421 +; #X msg 536 473 \$1 \, \$2 11.7; #X obj 536 446 pack f f; #X obj 609 371 t b f; #X obj 133 622 clip~ 0 0.25; #N canvas 0 15 1148 1147 envelope 0; #X obj 53 81 hilbert~; #X obj 54 114 *~; #X obj 98 115 *~; #X obj 53 147 q8_sqrt~; #X obj 55 46 inlet~; #X obj 54 183 outlet~; #X connect 0 0 1 0; #X connect 0 0 1 1; #X connect 0 1 2 0; #X connect 0 1 2 1; #X connect 1 0 3 0; #X connect 2 0 3 0; #X connect 3 0 5 0; #X connect 4 0 0 0; #X restore 271 410 pd envelope; #X text 127 786 Detect first peak; #X obj 516 -2 bang~; #X obj 516 24 float; #X obj 562 24 + 1; #X obj 516 49 % 2; #X obj 516 73 s channel; #N canvas 0 15 1148 1147 mix2 0; #X obj 92 70 outlet~; #X obj 63 -61 inlet~; #X obj 113 -61 inlet~; #X obj 211 -63 inlet; #X obj 63 13 *~; #X obj 112 13 *~; #X obj 211 34 -; #X msg 211 7 1; #X obj 211 -19 t b f; #X connect 1 0 4 0; #X connect 2 0 5 0; #X connect 3 0 8 0; #X connect 3 0 4 1; #X connect 4 0 0 0; #X connect 5 0 0 0; #X connect 6 0 5 1; #X connect 7 0 6 0; #X connect 8 0 7 0; #X connect 8 1 6 1; #X restore 680 690 pd mix2; #N canvas 0 15 1148 1147 (subpatch) 0; #X obj 75 61 inlet~; #X obj 137 62 inlet~; #X obj 196 64 inlet~; #X obj 258 65 inlet~; #X obj 318 66 inlet; #X obj 95 185 == 0; #X obj 74 214 *~; #X obj 138 228 *~; #X obj 156 196 == 1; #X obj 197 225 *~; #X obj 258 226 *~; #X obj 210 197 == 2; #X obj 281 202 == 3; #X obj 215 304 outlet~; #X connect 0 0 6 0; #X connect 1 0 7 0; #X connect 2 0 9 0; #X connect 3 0 10 0; #X connect 4 0 12 0; #X connect 4 0 11 0; #X connect 4 0 8 0; #X connect 4 0 5 0; #X connect 5 0 6 1; #X connect 6 0 13 0; #X connect 7 0 13 0; #X connect 8 0 7 1; #X connect 9 0 13 0; #X connect 10 0 13 0; #X connect 11 0 9 1; #X connect 12 0 10 1; #X restore 232 435 pd 4 to 1; #X obj 299 435 hradio 15 1 1 4 empty empty empty 0 -8 0 10 -262144 -1 -1 3; #X obj 267 296 hradio 15 1 1 4 empty empty empty 0 -8 0 10 -262144 -1 -1 1; #X obj 256 384 diode~ 2; #X obj 245 360 diode~ 1; #X obj 351 259 hp10_butt~ 16000 100; #X obj 204 267 hp10_butt~ 16000 100; #X obj 108 243 r channel; #N canvas 0 15 1436 1147 (subpatch) 0; #X obj 143 94 inlet~; #X obj 120 221 outlet~; #X obj 199 220 outlet~; #X obj 140 164 == 0; #X obj 125 190 *~; #X obj 206 186 *~; #X obj 221 160 == 1; #X obj 275 220 outlet~; #X obj 282 186 *~; #X obj 299 160 == 2; #X obj 362 225 outlet~; #X obj 369 191 *~; #X obj 383 164 == 3; #X obj 294 99 inlet; #X connect 0 0 4 0; #X connect 0 0 5 0; #X connect 0 0 8 0; #X connect 0 0 11 0; #X connect 3 0 4 1; #X connect 4 0 1 0; #X connect 5 0 2 0; #X connect 6 0 5 1; #X connect 8 0 7 0; #X connect 9 0 8 1; #X connect 11 0 10 0; #X connect 12 0 11 1; #X connect 13 0 3 0; #X connect 13 0 6 0; #X connect 13 0 9 0; #X connect 13 0 12 0; #X restore 57 271 pd 1 to 4; #X obj 102 311 outlet~; #X obj 230 577 nop~; #X obj 463 378 r channel; #X obj 612 54 table corr_l; #X obj 612 4 table corr_clip; #X obj 134 648 tabsend~ corr_clip; #X obj 612 28 table corr; #X obj 285 614 tabsend~ corr; #X obj 463 565 select 0 1; #X obj 463 403 t f b; #N canvas 0 15 1148 1147 mix2 0; #X obj 92 70 outlet~; #X obj 63 -61 inlet~; #X obj 113 -61 inlet~; #X obj 211 -63 inlet; #X obj 63 13 *~; #X obj 112 13 *~; #X obj 211 34 -; #X msg 211 7 1; #X obj 211 -19 t b f; #X connect 1 0 4 0; #X connect 2 0 5 0; #X connect 3 0 8 0; #X connect 3 0 4 1; #X connect 4 0 0 0; #X connect 5 0 0 0; #X connect 6 0 5 1; #X connect 7 0 6 0; #X connect 8 0 7 0; #X connect 8 1 6 1; #X restore 680 611 pd mix2; #X obj 738 552 hsl 128 15 0.01 1 0 1 empty empty empty -2 -8 0 10 -262144 -1 -1 11700 0; #N canvas 0 0 450 300 (subpatch) 0; #X array corr_disp_r 512 float 0; #X coords 0 1 511 0 512 140 1; #X restore 601 -159 graph; #X obj 793 54 hradio 15 1 1 8 empty empty empty 0 -8 0 10 -262144 -1 -1 3; #X obj 135 708 tabminmax corr_clip; #X obj 612 80 table corr_r; #X obj 879 687 r draw; #X text 290 651 Chirp \, correlate and cleanup; #X obj 911 818 tabreceive~ corr_r; #X obj 910 892 tabwrite~ corr_disp_r; #X obj 909 713 tabreceive~ corr_l; #X obj 910 790 tabwrite~ corr_disp_l; #X obj 107 140 tgl 15 0 calibrate empty empty 17 7 0 10 -262144 -1 -1 0 1; #X text 125 138 Calibrate; #X obj 246 528 spigot; #X obj 279 505 r calibrate; #X obj 754 121 spigot; #X obj 787 100 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X text 806 100 Draw; #X obj 612 108 table corr_l_avg; #X obj 612 134 table corr_r_avg; #X obj 681 665 tabreceive~ corr_l_avg; #X obj 679 716 tabwrite~ corr_l_avg; #X obj 681 585 tabreceive~ corr_r_avg; #X obj 680 638 tabwrite~ corr_r_avg; #X obj 924 739 tabreceive~ corr_l_avg; #X obj 910 765 -~; #X obj 910 866 -~; #X obj 926 841 tabreceive~ corr_r_avg; #X obj 535 594 tabwrite~ corr_r; #X obj 536 621 tabwrite~ corr_l; #X obj 537 528 tabread~ corr; #X obj 536 564 nop~; #X obj 629 527 spigot; #X obj 662 504 r calibrate; #X obj 629 555 select 0 1; #X obj 700 553 nop~; #X text 775 568 Averaging speed; #X msg 27 146 0; #X obj 28 102 select 1; #X obj 28 124 delay 5000; #X obj 953 333 tabminmax corr_l; #X obj 536 280 r s_start; #X obj 536 310 +; #X obj 599 281 hsl 128 15 0 200 0 1 empty empty empty -2 -8 0 10 -262144 -1 -1 5300 0; #X text 737 280 Offset; #X obj 596 323 r zoom; #X obj 935 165 s zoom; #X obj 1117 329 r zoom; #X obj 1046 359 unpack f f; #X obj 1117 359 t b f; #X obj 1103 388 *; #X msg 368 24 \; corr resize \$1 \; corr_l resize 512 \; corr_r resize 512 \; corr_l_avg resize 512 \; corr_r_avg resize 512 \; corr_clip resize 512; #X obj 1130 437 samplerate~; #X obj 1103 461 /; #X obj 1103 414 t f b; #X obj 1103 566 * 343; #X obj 953 264 r channel; #X obj 953 289 select 0 1; #X obj 1140 486 r blocksize; #X obj 1140 511 t b f; #X obj 1103 487 / 512; #X obj 1103 536 *; #X obj 1103 590 * 0.5; #X obj 981 313 tabminmax corr_r; #X obj 1142 594 r channel; #X obj 1103 619 moses 0; #X obj 1086 652 outlet; #X obj 1142 652 outlet; #X msg 1020 60 \; corr_disp_r delete me; #X connect 0 0 27 0; #X connect 0 0 57 0; #X connect 2 0 60 0; #X connect 2 1 26 0; #X connect 2 1 58 0; #X connect 3 0 52 0; #X connect 3 0 44 0; #X connect 3 0 55 0; #X connect 3 0 56 0; #X connect 4 0 6 0; #X connect 7 0 8 0; #X connect 8 0 5 0; #X connect 9 0 11 0; #X connect 10 0 12 1; #X connect 11 0 12 0; #X connect 11 1 10 0; #X connect 12 0 13 0; #X connect 13 0 14 0; #X connect 15 0 16 0; #X connect 16 0 4 0; #X connect 17 0 18 0; #X connect 18 0 19 0; #X connect 18 0 21 0; #X connect 19 0 18 1; #X connect 20 0 87 0; #X connect 21 0 20 0; #X connect 23 0 62 0; #X connect 24 0 85 0; #X connect 25 0 123 0; #X connect 26 0 3 0; #X connect 27 0 3 1; #X connect 28 0 6 0; #X connect 29 0 6 0; #X connect 30 0 4 0; #X connect 31 0 75 0; #X connect 32 1 33 0; #X connect 34 0 102 0; #X connect 36 0 118 0; #X connect 37 0 39 1; #X connect 38 0 42 0; #X connect 39 0 41 1; #X connect 40 0 34 0; #X connect 41 0 40 0; #X connect 42 0 37 0; #X connect 42 1 37 1; #X connect 43 0 66 0; #X connect 44 0 52 3; #X connect 46 0 47 0; #X connect 47 0 48 0; #X connect 47 0 49 0; #X connect 48 0 47 1; #X connect 49 0 50 0; #X connect 51 0 93 0; #X connect 52 0 23 0; #X connect 53 0 52 4; #X connect 54 0 27 4; #X connect 54 0 26 4; #X connect 55 0 52 2; #X connect 56 0 52 1; #X connect 57 0 27 1; #X connect 58 0 26 1; #X connect 59 0 60 1; #X connect 60 0 1 0; #X connect 60 1 61 0; #X connect 62 0 43 0; #X connect 62 0 68 0; #X connect 63 0 70 0; #X connect 69 0 101 0; #X connect 69 1 100 0; #X connect 70 0 69 0; #X connect 70 0 104 0; #X connect 70 1 41 0; #X connect 71 0 95 0; #X connect 72 0 71 2; #X connect 72 0 51 2; #X connect 74 0 21 1; #X connect 75 1 32 0; #X connect 77 0 80 0; #X connect 77 0 82 0; #X connect 79 0 98 0; #X connect 81 0 97 0; #X connect 83 0 110 0; #X connect 85 0 23 1; #X connect 86 0 85 1; #X connect 87 0 22 0; #X connect 88 0 87 1; #X connect 92 0 51 0; #X connect 94 0 71 0; #X connect 96 0 97 1; #X connect 97 0 82 0; #X connect 98 0 80 0; #X connect 99 0 98 1; #X connect 102 0 103 0; #X connect 102 0 107 0; #X connect 103 0 100 0; #X connect 103 0 101 0; #X connect 104 0 106 0; #X connect 105 0 104 1; #X connect 106 0 93 0; #X connect 106 1 95 0; #X connect 107 0 71 1; #X connect 107 0 51 1; #X connect 109 0 83 0; #X connect 110 0 111 0; #X connect 111 0 109 0; #X connect 112 1 120 0; #X connect 113 0 114 0; #X connect 114 0 39 0; #X connect 114 0 41 0; #X connect 115 0 114 1; #X connect 117 0 37 0; #X connect 119 0 121 0; #X connect 120 1 122 0; #X connect 121 0 122 0; #X connect 121 1 122 1; #X connect 122 0 126 0; #X connect 124 0 125 1; #X connect 125 0 132 0; #X connect 126 0 125 0; #X connect 126 1 124 0; #X connect 127 0 134 0; #X connect 128 0 129 0; #X connect 129 0 112 0; #X connect 129 1 135 0; #X connect 130 0 131 0; #X connect 131 0 133 0; #X connect 131 1 133 1; #X connect 132 0 133 0; #X connect 133 0 127 0; #X connect 134 0 137 0; #X connect 135 1 120 0; #X connect 136 0 137 1; #X connect 137 0 139 0; #X connect 137 1 138 0; #X coords 0 -1 1 1 85 60 1 100 100; #X restore 85 108 pd sonar; #X obj 85 63 adc~; #X obj 86 197 dac~; #X obj 137 241 vsl 30 200 0 1 0 0 empty empty empty 0 -9 0 10 -262144 -1 -1 478 1; #X obj 185 241 vsl 30 200 0 1 0 0 empty empty empty 0 -9 0 10 -262144 -1 -1 273 1; #X text 262 160 Now hit the 'calibrate' button \, and wait for 5 seconds. Don't place anything in front of the speakers or the mic while calibration is in progress. When the 'calibrate' button goes off \, the sonar is ready for use \, the vertical sliders should now give an indication of the distance of any object giving reflections from speaker to mic. ; #X text 261 246 For more fun \, open the sonar block \, and find the 'draw' button on right top. If this button is enabled \, the two graphs will show the reflection levels as a function of time.; #X text 260 309 Sonic Theremin - Ico Doornekamp - 2008 ; #X text 264 80 Before starting \, make sure the sample rate is set to 88200; #X text 262 108 Start audio and crank up the speakers until you hear some distorted chirps \, then turn it just a bit down so the chirps can't be heard.; #X connect 0 0 2 0; #X connect 0 1 2 1; #X connect 0 2 3 0; #X connect 0 3 4 0; #X connect 1 0 0 0;