dom
/
tonalisa
Beobachten 1
Favorisieren 0
Fork 0
Code Issues 0 Pull-Requests 0 Releases 0 Wiki Aktivität
Du kannst nicht mehr als 25 Themen auswählen Themen müssen entweder mit einem Buchstaben oder einer Ziffer beginnen. Sie können Bindestriche („-“) enthalten und bis zu 35 Zeichen lang sein.
1 Commit
1 Branch
Struktur: e37c040080
Branches Tags
${ item.name }
Erstelle Branch ${ searchTerm }
von „e37c040080“
${ noResults }
tonalisa/lib/sndlib/bird.rb

1162 Zeilen
53KB
Originalformat Blame Verlauf 

  1. # bird songs

  2. # translated (semi-automatically) from a Sambox note list to bird.clm, then bird.scm, then bird.rb

  3. 

  4. $out_file = false

  5. $out_data = false

  6. $with_editable_mixes = false

  7. 

  8. def normalize_partials(lst1)

  9.   lst = lst1.flatten # i.e. copy -- there doesn't seem to be a copy method for arrays?

  10.   sum = 0.0

  11.   len = (lst.length) / 2

  12.   0.upto(len - 1) do |i|

  13.     sum = sum + lst[(i * 2) + 1]

  14.   end

  15.   0.upto(len - 1) do |i|

  16.     lst[(i * 2) + 1] = lst[(i * 2) + 1] / sum

  17.   end

  18.   lst

  19. end

  20. 

  21. def bigbird(start, dur, frequency, freqskew, amplitude, freq_envelope, amp_envelope, partials)

  22.   gls_env = make_env(freq_envelope, hz2radians(freqskew), dur)

  23.   os = make_oscil(frequency)

  24.   coeffs = partials2polynomial(normalize_partials(partials))

  25.   amp_env = make_env(amp_envelope, amplitude, dur)	

  26.   beg = (srate() * start).round

  27.   len = (srate() * dur).round

  28.   local_data  = make_vct len

  29.   local_data.map! do

  30.     env(amp_env) *

  31.     polynomial(coeffs,

  32. 	       oscil(os, env(gls_env)))

  33.   end

  34.   vct_add!($out_data, local_data, beg)

  35. end

  36. 

  37. def bird(start, dur, frequency, freqskew, amplitude, freq_envelope, amp_envelope)

  38.   gls_env = make_env(freq_envelope, hz2radians(freqskew), dur)

  39.   os = make_oscil(frequency)

  40.   amp_env = make_env(amp_envelope, amplitude, dur)

  41.   beg = (srate() * start).round

  42.   len = (srate() * dur).round

  43.   local_data  = make_vct len

  44.   local_data.map! do

  45.     env(amp_env) * oscil(os, env(gls_env))

  46.   end

  47.   vct_add!($out_data, local_data, beg)

  48. end

  49. 

  50. def one_bird(beg, maxdur, birdname, &func)

  51.   $out_data = make_vct((srate() * maxdur).round)

  52.   func.call()

  53.   mix_vct($out_data, (beg*srate()).round, $out_file, 0, $with_editable_mixes)

  54.   birdname

  55. end

  56. 

  57. $main_amp = [0.00, 0.00, 0.25, 1.00, 0.60, 0.70, 0.75, 1.00, 1.00, 0.0]

  58. $bird_tap = [0.00, 0.00, 0.01, 1.00, 0.99, 1.00, 1.00, 0.0]

  59. $bird_amp = [0.00, 0.00, 0.25, 1.00, 0.75, 1.00, 1.00, 0.0]

  60. 

  61. def orchard_oriole(beg)

  62.   oriup = [0.00, 0.00, 1.00, 1.0]

  63.   oridwn = [0.00, 1.00, 1.00, 0.0]

  64.   oriupdwna = [0.00, 0.00, 0.60, 1.00, 1.00, 0.60]

  65.   oriupdwnb = [0.00, 0.50, 0.30, 1.00, 1.00, 0.0]

  66.   oribiga = [0.00, 0.90, 0.15, 1.00, 0.40, 0.30, 0.60, 0.60, 0.85, 0.00, 1.00, 0.0]

  67.   orimid = [0.00, 1.00, 0.05, 0.50, 0.10, 1.00, 0.25, 0.00, 0.85, 0.50, 1.00, 0.0]

  68.   oridwnup = [0.00, 0.30, 0.25, 0.00, 1.00, 1.0]

  69.   oriamp = [0.00, 0.00, 0.10, 1.00, 1.00, 0.0]

  70.   

  71.   one_bird(beg, 3.0, "orchard_oriole") do

  72.    bird(0.38, 0.03, 3700, 100, 0.05, oridwn, $main_amp)

  73.    bird(0.41, 0.05, 2500, 1000, 0.1, oriup, $main_amp)

  74.    bigbird(0.5, 0.1, 2000, 800, 0.2, oriupdwna, $main_amp, [1, 1, 2, 0.02, 3, 0.05])

  75.    bird(0.65, 0.03, 3900, 1200, 0.1, oridwn, $main_amp)

  76.    bigbird(0.7, 0.21, 2000, 1200, 0.15, oribiga, $main_amp, [1, 1, 2, 0.05])

  77.    bird(1.0, 0.05, 4200, 1000, 0.1, oridwn, $main_amp)

  78.    bigbird(1.1, 0.1, 2000, 1000, 0.25, orimid, $main_amp, [1, 1, 2, 0.05])

  79.    bigbird(1.3, 0.1, 2000, 1000, 0.25, orimid, $main_amp, [1, 1, 2, 0.05])

  80.    bird(1.48, 0.1, 2300, 3200, 0.1, oriupdwnb, oriamp)

  81.    bird(1.65, 0.03, 1800, 300, 0.05, oriup, $main_amp)

  82.    bird(1.7, 0.03, 2200, 100, 0.04, oridwn, $main_amp)

  83.    bird(1.8, 0.07, 2500, 2000, 0.15, oriupdwnb, oriamp)

  84.    bigbird(1.92, 0.2, 2400, 1200, 0.25, oridwnup, $main_amp, [1, 1, 2, 0.04])

  85.    bird(2.2, 0.02, 2200, 3000, 0.04, oriup, $main_amp)

  86.    bird(2.28, 0.02, 2200, 3000, 0.04, oriup, $main_amp)

  87.    bigbird(2.4, 0.17, 2000, 1000, 0.2, oriupdwna, oriamp, [1, 1, 2, 0.04])

  88.   end

  89. end

  90. 

  91. 

  92. def cassins_kingbird(beg)

  93.   kingfirst = [0.00, 0.30, 0.45, 1.00, 0.90, 0.10, 1.00, 0.0]

  94.   kingsecond = [0.00, 0.00, 0.02, 0.50, 0.04, 0.00, 0.06, 0.55, 0.08, 0.05, 0.10, 0.60, 0.12, 0.05, 0.14, 0.65, 0.16, 0.10, 0.18, 0.70, 0.20, 0.10, 0.22, 0.75, 0.24, 0.15, 0.26, 0.80, 0.28, 0.20, 0.30, 0.85, 0.32, 0.25, 0.34, 0.90, 0.36, 0.30, 0.38, 0.95, 0.40, 0.40, 0.42, 1.00, 0.44, 0.50, 0.46, 1.00, 0.48, 0.45, 0.50, 1.00, 0.52, 0.50, 0.54, 1.00, 0.56, 0.40, 0.58, 0.95, 0.60, 0.40, 0.62, 0.90, 0.64, 0.40, 0.66, 0.85, 0.68, 0.35, 0.70, 0.80, 0.72, 0.30, 0.74, 0.75, 0.76, 0.25, 0.78, 0.70, 0.80, 0.20, 0.82, 0.65, 0.84, 0.10, 0.86, 0.60, 0.88, 0.00, 0.90, 0.55, 0.92, 0.00, 0.94, 0.50, 0.96, 0.00, 1.00, 0.40]

  95.   

  96.   one_bird(beg, 3.0, "cassins_kingbird") do

  97.    bigbird(0.03, 0.04, 1700, 1200, 0.15, kingfirst, $main_amp, [1, 1, 2, 0.5, 3, 0, 4, 0.2])

  98.    bigbird(0.12, 0.18, 1700, 900, 0.25, kingsecond, $main_amp, [1, 1, 2, 0.01, 3, 0, 4, 0.1])

  99.   end

  100. end

  101. 

  102. 

  103. def chipping_sparrow(beg)

  104.   chip_up = [0.00, 0.80, 0.15, 1.00, 0.75, 0.30, 1.00, 0.0]

  105.   

  106.   one_bird(beg, 1.1, "chipping_sparrow") do

  107.    bird(0, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  108.    bird(0.06, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  109.    bird(0.12, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  110.    bird(0.18, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  111.    bird(0.24, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  112.    bird(0.30, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  113.    bird(0.36, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  114.    bird(0.42, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  115.    bird(0.48, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  116.    bird(0.54, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  117.    bird(0.60, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  118.    bird(0.66, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  119.    bird(0.72, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  120.    bird(0.78, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  121.    bird(0.84, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  122.    bird(0.90, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  123.    bird(0.96, 0.05, 4000, 2400, 0.2, chip_up, $main_amp)

  124.   end

  125. end

  126. 

  127. 

  128. def bobwhite(beg)

  129.   bobup1 = [0.00, 0.00, 0.40, 1.00, 1.00, 1.0]

  130.   bobup2 = [0.00, 0.00, 0.65, 0.50, 1.00, 1.0]

  131.   

  132.   one_bird(beg, 2.0, "bobwhite") do

  133.    bigbird(0.4, 0.2, 1800, 200, 0.1, bobup1, $main_amp, [1, 1, 2, 0.02])

  134.    bigbird(1, 0.20, 1800, 1200, 0.2, bobup2, $main_amp, [1, 1, 2, 0.02])

  135.   end

  136. end

  137. 

  138. 

  139. def western_meadowlark(beg)

  140.   no_skw = [0.00, 0.00, 1.00, 0.0]

  141.   down_skw = [0.00, 1.00, 0.40, 0.40, 1.00, 0.0]

  142.   fas_down = [0.00, 1.00, 1.00, 0.0]

  143.   

  144.   one_bird(beg, 3.0, "western_meadowlark") do

  145.    bigbird(0.800, 0.1, 2010.000, 0.000, 0.100, no_skw, $main_amp, [1, 1, 2, 0.04])

  146.    bigbird(1.100, 0.15, 3000.000, 100.000, 0.110, down_skw, $main_amp, [1, 1, 2, 0.04])

  147.    bigbird(1.300, 0.25, 2000.000, 150.000, 0.200, down_skw, $main_amp, [1, 1, 2, 0.04])

  148.    bigbird(1.650, 0.15, 3010.000, 250.000, 0.110, down_skw, $main_amp, [1, 1, 2, 0.04])

  149.    bigbird(1.850, 0.10, 2200.000, 150.000, 0.110, down_skw, $main_amp, [1, 1, 2, 0.04])

  150.    bigbird(2.000, 0.10, 3200.000, 1400.000, 0.110, fas_down, $main_amp, [1, 1, 2, 0.04])

  151.    bigbird(2.200, 0.05, 2000.000, 200.000, 0.110, fas_down, $main_amp, [1, 1, 2, 0.04])

  152.    bigbird(2.300, 0.10, 1600.000, 0.000, 0.110, fas_down, $main_amp, [1, 1, 2, 0.04])

  153.   end

  154. end

  155. 

  156. 

  157. def scissor_tailed_flycatcher(beg)

  158.   scissor = [0.00, 0.00, 0.40, 1.00, 0.60, 1.00, 1.00, 0.0]

  159.   one_bird(beg, 1.0, "scissor_tailed_flycatcher") do

  160.    bigbird(0, 0.05, 1800, 1800, 0.2, scissor, $main_amp, [1, 0.5, 2, 1, 3, 0.5, 4, 0.1, 5, 0.01])

  161.   end

  162. end

  163. 

  164. 

  165. def great_horned_owl(beg)

  166.   owlup = [0.00, 0.00, 0.30, 1.00, 1.00, 1.0]

  167.   owldown = [0.00, 1.00, 1.00, 0.0]

  168.   

  169.   one_bird(beg, 3.0, "great_horned_owl") do

  170.    bigbird(0.3, 0.1, 300, 0, 0.1, $main_amp, $main_amp, [1, 1, 3, 0.02, 7, 0.01])

  171.    bigbird(0.6, 0.4, 293, 6, 0.1, owldown, $main_amp, [1, 1, 3, 0.02, 7, 0.01])

  172.    bigbird(1.75, 0.35, 293, 7, 0.1, owlup, $main_amp, [1, 1, 3, 0.02, 7, 0.01])

  173.    bigbird(2.5, 0.2, 300, 0, 0.1, owlup, $main_amp, [1, 1, 3, 0.02, 7, 0.01])

  174.   end

  175. end

  176. 

  177. 

  178. def black_throated_gray_warbler(beg)

  179.   grayone = [0.00, 0.50, 0.02, 0.60, 0.04, 0.45, 0.06, 0.62, 0.08, 0.40, 0.10, 0.65, 0.12, 0.35, 0.14, 0.70, 0.18, 0.30, 0.20, 0.70, 0.22, 0.30, 0.24, 0.70, 0.25, 0.20, 0.30, 0.80, 0.35, 0.10, 0.40, 0.90, 0.45, 0.00, 0.50, 1.00, 0.55, 0.00, 0.60, 1.00, 0.65, 0.00, 0.70, 1.00, 0.75, 0.00, 0.80, 1.00, 0.85, 0.00, 0.90, 1.00, 0.95, 0.00, 1.00, 0.50]

  180.   graytwo = [0.00, 0.00, 0.01, 0.40, 0.02, 0.00, 0.03, 0.40, 0.04, 0.00, 0.05, 0.40, 0.06, 0.00, 0.07, 0.40, 0.08, 0.00, 0.09, 0.40, 0.10, 0.00, 0.25, 0.80, 0.40, 0.30, 0.55, 1.00, 0.70, 0.00, 0.85, 0.80, 1.00, 0.40]

  181.   graythree = [0.00, 1.00, 0.01, 0.60, 0.02, 1.00, 0.03, 0.60, 0.04, 1.00, 0.05, 0.60, 0.06, 1.00, 0.07, 0.60, 0.08, 1.00, 0.09, 0.60, 0.10, 1.00, 0.11, 0.60, 0.12, 1.00, 0.13, 0.60, 0.14, 1.00, 0.15, 0.60, 0.16, 1.00, 0.17, 0.60, 0.18, 1.00, 0.19, 0.60, 0.20, 1.00, 0.21, 0.55, 0.22, 1.00, 0.23, 0.50, 0.24, 1.00, 0.25, 0.50, 0.26, 1.00, 0.27, 0.50, 0.28, 1.00, 0.29, 0.50, 0.30, 1.00, 0.31, 0.50, 0.32, 1.00, 0.33, 0.50, 0.34, 1.00, 0.35, 0.50, 0.36, 1.00, 0.37, 0.50, 0.38, 1.00, 0.39, 0.50, 0.40, 1.00, 0.41, 0.50, 0.42, 1.00, 0.43, 0.50, 0.44, 1.00, 0.45, 0.50, 0.46, 1.00, 0.47, 0.50, 0.48, 1.00, 0.49, 0.50, 0.50, 1.00, 0.51, 0.50, 0.52, 1.00, 0.53, 0.50, 0.54, 1.00, 0.55, 0.50, 0.56, 1.00, 0.57, 0.50, 0.58, 1.00, 0.59, 0.50, 0.60, 1.00, 1.00, 0.0]

  182.   grayfour = [0.00, 0.00, 1.00, 1.0]

  183.   

  184.   one_bird(beg, 2.0, "black_throated_gray_warbler") do

  185.    bird(0, 0.12, 3700, 600, 0.05, grayone, $main_amp)

  186.    bird(0.18, 0.08, 3000, 800, 0.07, graytwo, $main_amp)

  187.    bird(0.28, 0.12, 3700, 600, 0.12, grayone, $main_amp)

  188.    bird(0.44, 0.08, 3000, 800, 0.15, graytwo, $main_amp)

  189.    bird(0.54, 0.12, 3700, 600, 0.20, grayone, $main_amp)

  190.    bird(0.72, 0.08, 3000, 800, 0.25, graytwo, $main_amp)

  191.    bird(0.82, 0.12, 3700, 600, 0.25, grayone, $main_amp)

  192.    bird(0.96, 0.2, 3000, 2000, 0.2, graythree, $main_amp)

  193.    bird(1.2, 0.02, 4500, 500, 0.05, grayfour, $main_amp)

  194.    bird(1.25, 0.02, 4200, 800, 0.05, grayfour, $main_amp)

  195.    bird(1.3, 0.02, 4000, 900, 0.05, grayfour, $main_amp)

  196.   end

  197. end

  198. 

  199. 

  200. def yellow_warbler(beg)

  201.   yellow_up = [0.00, 0.00, 0.60, 1.00, 1.00, 0.50]

  202.   yellow_swirl = [0.00, 1.00, 0.05, 1.00, 0.60, 0.00, 0.80, 0.30, 1.00, 0.10]

  203.   yellow_down = [0.00, 1.00, 1.00, 0.0]

  204.   yellow_last = [0.00, 0.00, 0.30, 0.20, 0.80, 0.70, 1.00, 1.0]

  205.   swirl_amp = [0.00, 0.00, 0.90, 1.00, 1.00, 0.0]

  206.   

  207.   one_bird(beg, 2.0, "yellow_warbler") do

  208.    bird(0, 0.05, 5600, 400, 0.05, yellow_up, $main_amp)

  209.    bird(0.23, 0.12, 5000, 1500, 0.15, yellow_swirl, swirl_amp)

  210.    bird(0.45, 0.13, 5000, 1700, 0.17, yellow_swirl, swirl_amp)

  211.    bird(0.62, 0.16, 5000, 2000, 0.20, yellow_swirl, swirl_amp)

  212.    bird(0.85, 0.15, 5000, 2000, 0.20, yellow_swirl, swirl_amp)

  213.    bird(1.05, 0.075, 3700, 1000, 0.20, yellow_down, $main_amp)

  214.    bird(1.15, 0.075, 3700, 800, 0.15, yellow_down, $main_amp)

  215.    bird(1.25, 0.075, 3700, 800, 0.15, yellow_down, $main_amp)

  216.    bird(1.4, 0.2, 3700, 2000, 0.2, yellow_last, swirl_amp)

  217.   end

  218. end

  219. 

  220. 

  221. def black_necked_stilt(beg)

  222.   upamp = [0.00, 0.00, 0.90, 1.00, 1.00, 0.0]

  223.   rampup = [0.00, 0.00, 0.50, 1.00, 1.00, 0.20]

  224.   

  225.   one_bird(beg, 1.0, "black_necked_stilt") do

  226.    bigbird(0, 0.1, 900, 100, 0.2, rampup, upamp, [1, 0.5, 2, 1, 3, 0.75, 4, 0.5, 5, 0.1])

  227.    bigbird(0.30, 0.1, 900, 200, 0.2, rampup, upamp, [1, 0.5, 2, 1, 3, 0.75, 4, 0.5, 5, 0.1])

  228.    bigbird(0.60, 0.1, 900, 250, 0.2, rampup, upamp, [1, 0.5, 2, 1, 3, 0.75, 4, 0.5, 5, 0.1])

  229.   end

  230. end

  231. 

  232. 

  233. 

  234. def chestnut_sided_warbler(beg)

  235.   ycurve = [0.00, 1.00, 0.30, 0.50, 0.60, 1.00, 0.80, 0.20, 1.00, 0.0]

  236.   vcurve = [0.00, 0.20, 0.50, 1.00, 1.00, 0.0]

  237.   wcurve = [0.00, 0.50, 0.15, 0.00, 0.45, 0.10, 0.60, 1.00, 0.70, 0.90, 1.00, 0.90]

  238.   upcurve = [0.00, 0.00, 0.95, 1.00, 1.00, 1.0]

  239.   downcurve = [0.00, 1.00, 0.25, 0.30, 0.60, 0.15, 1.00, 0.0]

  240.   louder = [0.00, 0.00, 0.90, 1.00, 1.00, 0.0]

  241.   wamp = [0.00, 0.00, 0.10, 1.00, 0.40, 0.10, 0.50, 0.90, 0.60, 0.10, 0.70, 1.00, 1.00, 0.0]

  242.   

  243.   one_bird(beg, 2.0, "chestnut_sided_warbler") do

  244.    bigbird(0.1, 0.1, 4050, 1200, 0.05, ycurve, $main_amp, [1, 1, 2, 0.1])

  245.    bigbird(0.25, 0.03, 3900, 300, 0.075, vcurve, $main_amp, [1, 1, 2, 0.1])

  246.    bigbird(0.3, 0.1, 4050, 1200, 0.15, ycurve, louder, [1, 1, 2, 0.1])

  247.    bigbird(0.42, 0.03, 3800, 500, 0.1, vcurve, $main_amp, [1, 1, 2, 0.1])

  248.    bigbird(0.5, 0.1, 4000, 1200, 0.2, ycurve, $bird_tap, [1, 1, 2, 0.1])

  249.    bigbird(0.65, 0.03, 3800, 500, 0.15, vcurve, $main_amp, [1, 1, 2, 0.1])

  250.    bigbird(0.72, 0.1, 4000, 1200, 0.2, ycurve, $bird_tap, [1, 1, 2, 0.1])

  251.    bigbird(0.85, 0.03, 3800, 500, 0.15, vcurve, $main_amp, [1, 1, 2, 0.1])

  252.    bigbird(0.91, 0.1, 4000, 1200, 0.2, ycurve, $bird_tap, [1, 1, 2, 0.1])

  253.    bigbird(1.05, 0.12, 3800, 2200, 0.15, wcurve, wamp, [1, 1, 2, 0.1])

  254.    bigbird(1.20, 0.12, 3800, 2200, 0.15, wcurve, wamp, [1, 1, 2, 0.1])

  255.    bigbird(1.35, 0.12, 2500, 2200, 0.25, upcurve, louder, [1, 1, 2, 0.1])

  256.    bigbird(1.50, 0.12, 2500, 4000, 0.15, downcurve, $main_amp, [1, 1, 2, 0.1])

  257.   end

  258. end

  259. 

  260. 

  261. def grasshopper_sparrow(beg)

  262.   grassone = [0.00, 0.50, 0.02, 0.80, 0.04, 0.30, 0.06, 0.80, 0.07, 0.10, 0.08, 0.90, 0.10, 0.00, 0.11, 0.90, 0.12, 0.00, 0.13, 0.90, 0.14, 0.10, 0.15, 1.00, 0.16, 0.10, 0.17, 1.00, 0.18, 0.10, 0.19, 1.00, 0.20, 0.10, 0.21, 1.00, 0.22, 0.10, 0.23, 1.00, 0.24, 0.10, 0.25, 1.00, 0.26, 0.10, 0.27, 1.00, 0.28, 0.10, 0.29, 1.00, 0.30, 0.10, 0.31, 1.00, 0.32, 0.10, 0.33, 1.00, 0.34, 0.10, 0.35, 1.00, 0.36, 0.10, 0.37, 1.00, 0.38, 0.10, 0.39, 1.00, 0.40, 0.10, 0.41, 1.00, 0.42, 0.10, 0.43, 1.00, 0.44, 0.10, 0.45, 1.00, 0.46, 0.10, 0.47, 1.00, 0.48, 0.10, 0.49, 1.00, 0.50, 0.10, 0.51, 1.00, 0.52, 0.10, 0.53, 1.00, 0.54, 0.10, 0.55, 1.00, 0.56, 0.10, 0.57, 1.00, 0.58, 0.10, 0.59, 1.00, 0.60, 0.10, 0.61, 1.00, 0.62, 0.10, 0.63, 1.00, 0.64, 0.10, 0.65, 1.00, 0.66, 0.10, 0.67, 1.00, 0.68, 0.10, 0.69, 1.00, 0.70, 0.10, 0.71, 1.00, 0.72, 0.10, 0.73, 1.00, 0.74, 0.10, 0.75, 1.00, 0.76, 0.10, 0.77, 1.00, 0.78, 0.10, 0.79, 1.00, 0.80, 0.10, 0.81, 1.00, 0.82, 0.10, 0.83, 1.00, 0.84, 0.10, 0.85, 1.00, 0.86, 0.10, 0.87, 1.00, 0.88, 0.10, 0.89, 1.00, 0.90, 0.10, 0.91, 1.00, 0.92, 0.10, 0.93, 1.00, 0.94, 0.10, 0.95, 1.00, 0.96, 0.10, 0.97, 1.00, 0.98, 0.10, 1.00, 1.0]

  263.   grasstwo = [0.00, 0.00, 0.10, 1.00, 0.20, 0.00, 0.30, 1.00, 0.40, 0.00, 0.50, 1.00, 0.60, 0.00, 0.70, 1.00, 0.80, 0.00, 0.90, 1.00, 1.00, 0.0]

  264.   

  265.   one_bird(beg, 3.0, "grasshopper_sparrow") do

  266.    bird(0.49, 0.01, 8000, 100, 0.1, grasstwo, $main_amp)

  267.    bird(0.60, 0.01, 5700, 300, 0.1, grasstwo, $main_amp)

  268.    bird(0.92, 0.01, 3900, 100, 0.1, grasstwo, $main_amp)

  269.    bird(1.00, 1.4, 6000, 2500, 0.2, grassone, $main_amp)

  270.   end

  271. end

  272. 

  273. 

  274. def swamp_sparrow(beg)

  275.   swamp_up = [0.00, 0.00, 0.60, 0.70, 1.00, 1.0]

  276.   swamp_down = [0.00, 1.00, 0.50, 0.50, 0.60, 0.60, 1.00, 0.0]

  277.   

  278.   one_bird(beg, 2.0, "swamp_sparrow") do

  279.    bird(0, 0.02, 3900, 200, 0.3, swamp_up, $main_amp)

  280.    bird(0.035, 0.035, 3200, 3000, 0.1, swamp_down, $main_amp)

  281.    bird(0.08, 0.025, 3700, 0, 0.1, $main_amp, $main_amp)

  282. 

  283.    bird(0.1, 0.02, 3900, 200, 0.3, swamp_up, $main_amp)

  284.    bird(0.135, 0.035, 3200, 3000, 0.1, swamp_down, $main_amp)

  285.    bird(0.18, 0.025, 3700, 0, 0.1, $main_amp, $main_amp)

  286. 

  287.    bird(0.2, 0.02, 3900, 200, 0.3, swamp_up, $main_amp)

  288.    bird(0.235, 0.035, 3200, 3000, 0.1, swamp_down, $main_amp)

  289.    bird(0.28, 0.025, 3700, 0, 0.1, $main_amp, $main_amp)

  290. 

  291.    bird(0.3, 0.02, 3900, 200, 0.3, swamp_up, $main_amp)

  292.    bird(0.335, 0.035, 3200, 3000, 0.1, swamp_down, $main_amp)

  293.    bird(0.38, 0.025, 3700, 0, 0.1, $main_amp, $main_amp)

  294. 

  295.    bird(0.4, 0.02, 3900, 200, 0.3, swamp_up, $main_amp)

  296.    bird(0.435, 0.035, 3200, 3000, 0.1, swamp_down, $main_amp)

  297.    bird(0.48, 0.025, 3700, 0, 0.1, $main_amp, $main_amp)

  298. 

  299.    bird(0.5, 0.02, 3900, 200, 0.3, swamp_up, $main_amp)

  300.    bird(0.535, 0.035, 3200, 3000, 0.1, swamp_down, $main_amp)

  301.    bird(0.58, 0.025, 3700, 0, 0.1, $main_amp, $main_amp)

  302. 

  303.    bird(0.6, 0.02, 3900, 200, 0.3, swamp_up, $main_amp)

  304.    bird(0.635, 0.035, 3200, 3000, 0.1, swamp_down, $main_amp)

  305.    bird(0.68, 0.025, 3700, 0, 0.1, $main_amp, $main_amp)

  306. 

  307.    bird(0.7, 0.02, 3900, 200, 0.3, swamp_up, $main_amp)

  308.    bird(0.735, 0.035, 3200, 3000, 0.1, swamp_down, $main_amp)

  309.    bird(0.78, 0.025, 3700, 0, 0.1, $main_amp, $main_amp)

  310. 

  311.    bird(0.8, 0.02, 3900, 200, 0.3, swamp_up, $main_amp)

  312.    bird(0.835, 0.035, 3200, 3000, 0.1, swamp_down, $main_amp)

  313.    bird(0.88, 0.025, 3700, 0, 0.1, $main_amp, $main_amp)

  314. 

  315.    bird(0.9, 0.02, 3900, 200, 0.3, swamp_up, $main_amp)

  316.    bird(0.935, 0.035, 3200, 3000, 0.1, swamp_down, $main_amp)

  317.    bird(0.98, 0.025, 3700, 0, 0.1, $main_amp, $main_amp)

  318.   end

  319. end

  320. 

  321. 

  322. def golden_crowned_sparrow(beg)

  323.   goldone = [0.00, 1.00, 0.25, 0.20, 1.00, 0.0]

  324.   goldtwo = [0.00, 0.90, 0.05, 1.00, 0.10, 0.40, 1.00, 0.0]

  325.   goldtrill = [0.00, 0.50, 0.10, 0.00, 0.20, 1.00, 0.30, 0.00, 0.40, 1.00, 0.50, 0.00, 0.60, 1.00, 0.70, 0.00, 0.80, 1.00, 0.90, 0.00, 1.00, 0.50]

  326.   

  327.   one_bird(beg, 3.0, "golden_crowned_sparrow") do

  328.    bird(0.6, 0.5, 4300, 1000, 0.15, goldone, $main_amp)

  329.    bird(1.3, 0.45, 3300, 200, 0.15, goldone, $main_amp)

  330.    bird(1.75, 0.4, 3800, 100, 0.15, goldtwo, $main_amp)

  331.    bird(2.2, 0.3, 3800, 100, 0.1, goldtrill, $main_amp)

  332.   end

  333. end

  334. 

  335. 

  336. def indigo_bunting(beg)

  337.   buntdwn = [0.00, 1.00, 1.00, 0.0]

  338.   buntv = [0.00, 0.00, 0.50, 1.00, 1.00, 0.0]

  339.   bunty = [0.00, 1.00, 0.50, 0.00, 1.00, 0.90]

  340.   buntn = [0.00, 0.80, 0.30, 1.00, 0.70, 0.20, 1.00, 0.0]

  341.   buntx = [0.00, 1.00, 0.10, 0.50, 0.25, 0.90, 1.00, 0.0]

  342.   buntup = [0.00, 0.00, 1.00, 1.0]

  343.   

  344.   one_bird(beg, 3.0, "indigo_bunting") do

  345.    bird(0.4, 0.08, 3000, 700, 0.25, buntdwn, $main_amp)

  346.    bird(0.52, 0.02, 6200, 1000, 0.05, buntdwn, $main_amp)

  347.    bird(0.55, 0.15, 3500, 2300, 0.1, buntv, $main_amp)

  348.    bird(0.74, 0.02, 6200, 1800, 0.05, buntx, $main_amp)

  349.    bird(0.80, 0.15, 3400, 2300, 0.1, buntv, $main_amp)

  350.    bird(1.00, 0.1, 3400, 800, 0.2, buntv, $main_amp)

  351.    bird(1.13, 0.03, 4100, 2000, 0.05, buntdwn, $main_amp)

  352.    bird(1.25, 0.08, 3400, 800, 0.2, buntv, $main_amp)

  353.    bird(1.40, 0.03, 4100, 2000, 0.05, buntdwn, $main_amp)

  354.    bird(1.5, 0.07, 3700, 300, 0.1, buntdwn, $main_amp)

  355.    bird(1.6, 0.1, 4100, 2200, 0.15, bunty, $main_amp)

  356.    bird(1.72, 0.05, 3700, 300, 0.1, buntdwn, $main_amp)

  357.    bird(1.81, 0.1, 4100, 2200, 0.15, bunty, $main_amp)

  358.    bird(1.94, 0.07, 5200, 1800, 0.2, buntn, $main_amp)

  359.    bird(2.05, 0.08, 3000, 1500, 0.15, buntup, $main_amp)

  360.    bird(2.20, 0.07, 5200, 1800, 0.2, buntn, $main_amp)

  361.    bird(2.33, 0.08, 3000, 1500, 0.15, buntup, $main_amp)

  362.    bird(2.43, 0.07, 5200, 1800, 0.1, buntn, $main_amp)

  363.    bird(2.51, 0.08, 3000, 1500, 0.10, buntup, $main_amp)

  364.   end

  365. end

  366. 

  367. 

  368. def hooded_warbler(beg)

  369.   hoodup = [0.00, 0.00, 1.00, 1.0]

  370.   hooddown = [0.00, 1.00, 1.00, 0.0]

  371.   

  372.   one_bird(beg, 3.0, "hooded_warbler") do

  373.    bird(0.6, 0.03, 3900, 1600, 0.05, hooddown, $main_amp)

  374.    bird(0.64, 0.03, 3900, 1700, 0.05, hooddown, $main_amp)

  375.    bird(0.8, 0.03, 3900, 2000, 0.10, hooddown, $main_amp)

  376.    bird(0.84, 0.03, 3900, 2000, 0.10, hooddown, $main_amp)

  377.    bird(0.93, 0.03, 3900, 2100, 0.15, hooddown, $main_amp)

  378.    bird(0.97, 0.03, 3900, 2100, 0.15, hooddown, $main_amp)

  379.    bird(1.05, 0.03, 3900, 2100, 0.05, hooddown, $main_amp)

  380.    bird(1.09, 0.03, 3900, 2100, 0.2, hooddown, $main_amp)

  381.    bird(1.17, 0.03, 3900, 2100, 0.2, hooddown, $main_amp)

  382.    bird(1.21, 0.03, 3900, 2100, 0.2, hooddown, $main_amp)

  383.    bird(1.39, 0.03, 3900, 2100, 0.2, hooddown, $main_amp)

  384.    bird(1.43, 0.03, 3900, 2100, 0.2, hooddown, $main_amp)

  385.    bird(1.51, 0.03, 3900, 2100, 0.2, hooddown, $main_amp)

  386.    bird(1.55, 0.03, 3900, 2100, 0.2, hooddown, $main_amp)

  387.    bird(1.63, 0.03, 3900, 2100, 0.2, hooddown, $main_amp)

  388.    bird(1.67, 0.03, 3900, 2100, 0.2, hooddown, $main_amp)

  389.    bird(1.75, 0.03, 3900, 2100, 0.2, hooddown, $main_amp)

  390.    bird(1.80, 0.03, 3900, 2100, 0.2, hooddown, $main_amp)

  391. 

  392.    bird(1.90, 0.04, 3000, 1000, 0.15, hoodup, $main_amp)

  393.    bird(1.98, 0.04, 3000, 1000, 0.15, hoodup, $main_amp)

  394.    bird(2.05, 0.04, 3000, 1000, 0.15, hoodup, $main_amp)

  395.    bird(2.13, 0.04, 3000, 1000, 0.15, hoodup, $main_amp)

  396.    bird(2.21, 0.04, 3000, 1000, 0.15, hoodup, $main_amp)

  397.    bird(2.29, 0.04, 3000, 1000, 0.15, hoodup, $main_amp)

  398.    bird(2.37, 0.04, 3000, 1000, 0.15, hoodup, $main_amp)

  399.    bird(2.45, 0.04, 3000, 1000, 0.15, hoodup, $main_amp)

  400.   end

  401. end

  402. 

  403. 

  404. 

  405. def american_widgeon(beg)

  406.   widgeon = [0.00, 0.00, 0.50, 1.00, 1.00, 0.0]

  407.   

  408.   one_bird(beg, 1.0, "american_widgeon") do

  409.    bigbird(0.3, 0.07, 1900, 300, 0.15, widgeon, widgeon, [1, 1, 2, 0.02])

  410.    bigbird(0.4, 0.11, 1700, 1400, 0.25, widgeon, widgeon, [1, 0.7, 2, 1, 3, 0.02])

  411.    bigbird(0.55, 0.07, 1900, 300, 0.15, widgeon, widgeon, [1, 1, 2, 0.02])

  412.   end

  413. end

  414. 

  415. 

  416. def louisiana_waterthrush(beg)

  417.   water_one = [0.00, 0.80, 0.35, 0.40, 0.45, 0.90, 0.50, 1.00, 0.75, 1.00, 1.00, 0.10]

  418.   water_two = [0.00, 1.00, 0.40, 0.00, 0.60, 0.10, 1.00, 0.80]

  419.   water_three = [0.00, 1.00, 0.95, 0.00, 1.00, 0.0]

  420.   water_four = [0.00, 0.00, 1.00, 1.0]

  421.   water_five = [0.00, 1.00, 1.00, 0.0]

  422.   water_amp = [0.00, 0.00, 0.35, 1.00, 0.50, 0.20, 0.90, 1.00, 1.00, 0.0]

  423.   water_damp = [0.00, 0.00, 0.90, 1.00, 1.00, 0.0]

  424.   

  425.   one_bird(beg, 2.0, "louisiana_waterthrush") do

  426.    bird(0, 0.17, 4100, 2000, 0.2, water_one, water_amp)

  427.    bird(0.32, 0.18, 4050, 2050, 0.3, water_one, water_amp)

  428.    bird(0.64, 0.20, 4000, 1900, 0.25, water_one, water_amp)

  429.    bird(0.9, 0.2, 3900, 2000, 0.3, water_two, $bird_tap)

  430.    bird(1.25, 0.12, 3000, 3000, 0.25, water_three, water_damp)

  431.    bird(1.4, 0.1, 2700, 1500, 0.2, water_four, water_damp)

  432.    bird(1.58, 0.02, 5200, 1000, 0.1, water_five, $main_amp)

  433.    bird(1.65, 0.02, 5200, 1000, 0.1, water_five, $main_amp)

  434.    bird(1.7, 0.035, 3200, 1000, 0.1, water_four, water_damp)

  435.   end

  436. end

  437. 

  438. 

  439. def robin(beg)

  440.   r_one = [0.00, 0.10, 0.08, 0.70, 0.30, 0.00, 0.35, 1.00, 0.40, 0.30, 1.00, 0.30]

  441.   r_two = [0.00, 0.00, 0.10, 1.00, 0.20, 0.70, 0.35, 0.70, 0.65, 0.30, 0.70, 0.50, 0.80, 0.00, 0.90, 0.20, 1.00, 0.0]

  442.   r_three = [0.00, 0.20, 0.25, 1.00, 0.60, 0.70, 0.90, 0.00, 1.00, 0.10]

  443.   r_four = [0.00, 1.00, 1.00, 0.0]

  444.   r_five = [0.00, 0.50, 0.10, 0.00, 0.20, 1.00, 0.30, 0.00, 0.40, 1.00, 0.50, 0.00, 0.60, 1.00, 0.70, 0.50, 1.00, 0.20]

  445.   r_six = [0.00, 0.00, 0.12, 0.70, 0.30, 0.00, 0.70, 1.00, 1.00, 0.50]

  446.   

  447.   one_bird(beg, 3.0, "robin") do

  448.    bigbird(0.45, 0.06, 2000, 800, 0.15, r_six, $main_amp, [1, 1, 2, 0.1])

  449.    bigbird(0.56, 0.10, 2000, 900, 0.15, r_one, $main_amp, [1, 1, 2, 0.1])

  450.    bigbird(1.04, 0.24, 2000, 2000, 0.25, r_two, $main_amp, [1, 1, 2, 0.1])

  451.    bigbird(1.63, 0.13, 1900, 1600, 0.20, r_three, $main_amp, [1, 1, 2, 0.1])

  452.    bigbird(1.80, 0.11, 2200, 1200, 0.25, r_four, $main_amp, [1, 1, 2, 0.1])

  453.    bigbird(2.31, 0.21, 1950, 2000, 0.15, r_five, $main_amp, [1, 1, 2, 0.1])

  454.   end

  455. end

  456. 

  457. 

  458. def solitary_vireo(beg) 

  459.   bigskew = [0.00, 0.20, 0.03, 0.30, 0.06, 0.10, 0.10, 0.50, 0.13, 0.40, 0.16, 0.80, 0.19, 0.50, 0.22, 0.90, 0.25, 0.60, 0.28, 1.00, 0.31, 0.60, 0.34, 1.00, 0.37, 0.50, 0.41, 0.90, 0.45, 0.40, 0.49, 0.80, 0.51, 0.40, 0.54, 0.75, 0.57, 0.35, 0.60, 0.70, 0.63, 0.30, 0.66, 0.60, 0.69, 0.25, 0.72, 0.50, 0.75, 0.20, 0.78, 0.30, 0.82, 0.10, 0.85, 0.30, 0.88, 0.05, 0.91, 0.30, 0.94, 0.00, 0.95, 0.30, 0.99, 0.00, 1.00, 0.10]

  460.   one_bird(beg, 1.0, "solitary_vireo") do

  461.    bird(0, 0.4, 1800, 1200, 0.2, bigskew, $main_amp)

  462.   end

  463. end

  464. 

  465. 

  466. def pigeon_hawk(beg)

  467.   hupdown = [0.00, 0.00, 0.30, 1.00, 0.70, 1.00, 1.00, 0.0]

  468.   

  469.   one_bird(beg, 2.0, "pigeon_hawk") do

  470.    bigbird(0, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  471.    bigbird(0.12, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  472.    bigbird(0.13, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  473.    bigbird(0.25, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  474.    bigbird(0.26, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  475.    bigbird(0.38, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  476.    bigbird(0.39, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  477.    bigbird(0.51, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  478.    bigbird(0.52, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  479.    bigbird(0.64, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  480.    bigbird(0.65, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  481.    bigbird(0.77, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  482.    bigbird(0.78, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  483.    bigbird(0.90, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  484.    bigbird(0.91, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  485.    bigbird(1.03, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  486.    bigbird(1.04, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  487.    bigbird(1.16, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  488.    bigbird(1.17, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  489.    bigbird(1.29, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  490.    bigbird(1.30, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  491.    bigbird(1.42, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  492.    bigbird(1.43, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  493.    bigbird(1.55, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  494.    bigbird(1.56, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  495.    bigbird(1.68, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  496.    bigbird(1.69, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  497.    bigbird(1.81, 0.01, 2050, 0, 0.1, $main_amp, $main_amp, [1, 0.5, 2, 1])

  498.    bigbird(1.82, 0.1, 1900, 200, 0.2, hupdown, $main_amp, [1, 0.7, 2, 1])

  499.   end

  500. end

  501. 

  502. 

  503. def cerulean_warbler(beg)

  504.   w_down = [0.00, 1.00, 1.00, 0.0]

  505.   trill = [0.00, 0.80, 0.10, 1.00, 0.25, 0.50, 0.40, 1.00, 0.55, 0.50, 0.70, 1.00, 1.00, 0.0]

  506.   w_up = [0.00, 0.00, 1.00, 1.0]

  507.   

  508.   one_bird(beg, 2.0, "cerulean_warbler") do

  509.    bird(0.27, 0.05, 3000, 1000, 0.05, w_down, $main_amp)

  510.    bird(0.33, 0.05, 3000, 800, 0.075, w_up, $main_amp)

  511.    bird(0.41, 0.01, 3200, 700, 0.07, w_down, $main_amp)

  512.    bird(0.42, 0.01, 3200, 700, 0.08, w_down, $main_amp)

  513.    bird(0.43, 0.06, 3200, 700, 0.09, w_down, $main_amp)

  514.    bird(0.51, 0.06, 3200, 500, 0.1, w_up, $main_amp)

  515.    bird(0.6, 0.10, 3000, 1200, 0.2, trill, $main_amp)

  516.    bird(0.72, 0.05, 3000, 800, 0.2, w_up, $main_amp)

  517.    bird(0.8, 0.10, 3000, 1200, 0.2, trill, $main_amp)

  518.    bird(0.92, 0.05, 3000, 800, 0.2, w_up, $main_amp)

  519.    bird(1.00, 0.01, 3900, 600, 0.1, w_up, $main_amp)

  520.    bird(1.01, 0.01, 3910, 800, 0.1, w_up, $main_amp)

  521.    bird(1.02, 0.01, 3940, 500, 0.1, w_up, $main_amp)

  522.    bird(1.03, 0.01, 4000, 500, 0.1, w_up, $main_amp)

  523.    bird(1.04, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  524.    bird(1.05, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  525.    bird(1.06, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  526.    bird(1.07, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  527.    bird(1.08, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  528.    bird(1.09, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  529.    bird(1.10, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  530.    bird(1.11, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  531.    bird(1.12, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  532.    bird(1.13, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  533.    bird(1.14, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  534.    bird(1.15, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  535.    bird(1.16, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  536.    bird(1.17, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  537.    bird(1.18, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  538.    bird(1.19, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  539.    bird(1.20, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  540.    bird(1.21, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  541.    bird(1.22, 0.01, 3900, 1000, 0.1, w_up, $main_amp)

  542.    bird(1.23, 0.01, 3900, 1200, 0.1, w_up, $main_amp)

  543.    bird(1.24, 0.01, 3900, 1200, 0.1, w_up, $main_amp)

  544.    bird(1.25, 0.01, 3900, 1200, 0.1, w_up, $main_amp)

  545.    bird(1.26, 0.01, 3900, 1200, 0.1, w_up, $main_amp)

  546.    bird(1.27, 0.01, 3900, 1400, 0.1, w_up, $main_amp)

  547.    bird(1.28, 0.01, 3900, 1400, 0.1, w_up, $main_amp)

  548.    bird(1.29, 0.01, 3900, 1400, 0.1, w_up, $main_amp)

  549.    bird(1.30, 0.01, 3900, 1400, 0.1, w_up, $main_amp)

  550.   end

  551. end

  552. 

  553. 

  554. def nashville_warbler(beg)

  555.   nash_blip = [0.00, 0.60, 0.35, 1.00, 1.00, 0.0]

  556.   nash_down = [0.00, 0.90, 0.05, 1.00, 0.10, 0.90, 0.65, 0.50, 1.00, 0.0]

  557.   nash_up = [0.00, 0.00, 0.15, 0.20, 0.25, 0.05, 0.90, 0.95, 1.00, 1.0]

  558.   nash_amp = [0.00, 0.00, 0.80, 1.00, 1.00, 0.0]

  559.   

  560.   one_bird(beg, 2.0, "nashville_warbler") do

  561.    bird(0.15, 0.025, 3900, 300, 0.3, nash_blip, $main_amp)

  562.    bird(0.24, 0.16, 4200, 3800, 0.15, nash_down, nash_amp)

  563.    bird(0.42, 0.025, 3900, 300, 0.3, nash_blip, $main_amp)

  564.    bird(0.55, 0.14, 4300, 3700, 0.15, nash_down, nash_amp)

  565.    bird(0.75, 0.03, 3950, 350, 0.3, nash_blip, $main_amp)

  566.    bird(0.81, 0.17, 4200, 3900, 0.175, nash_down, $main_amp)

  567.    bird(1.0, 0.02, 3800, 400, 0.25, nash_blip, $main_amp)

  568.    bird(1.11, 0.14, 4200, 3800, 0.165, nash_down, nash_amp)

  569.    bird(1.3, 0.03, 3750, 300, 0.2, nash_blip, $main_amp)

  570.    bird(1.4, 0.11, 4200, 3700, 0.1, nash_down, $main_amp)

  571.    bird(1.57, 0.1, 3800, 2200, 0.1, nash_up, $main_amp)

  572.    bird(1.7, 0.1, 3800, 2150, 0.125, nash_up, $main_amp)

  573.    bird(1.85, 0.075, 3900, 1800, 0.1, nash_up, nash_amp)

  574.   end

  575. end

  576. 

  577. 

  578. def eastern_phoebe(beg)

  579.   phoebe_one = [0.00, 0.00, 0.30, 0.30, 0.35, 0.50, 0.55, 0.40, 0.70, 0.80, 0.75, 0.70, 0.80, 1.00, 0.95, 0.90, 1.00, 0.0]

  580.   phoebe_two = [0.00, 0.00, 0.50, 1.00, 1.00, 0.0]

  581.   phoebe_three = [0.00, 0.00, 0.10, 0.40, 0.80, 1.00, 1.00, 0.10]

  582.   phoebe_four = [0.00, 1.00, 0.50, 0.70, 1.00, 0.0]

  583.   phoebe_amp = [0.00, 0.00, 0.10, 1.00, 1.00, 0.0]

  584.   

  585.   one_bird(beg, 1.0, "eastern_phoebe") do

  586.    bird(0, 0.225, 3000, 1300, 0.3, phoebe_one, $main_amp)

  587.    bird(0.35, 0.12, 3000, 500, 0.1, phoebe_two, phoebe_amp)

  588.    bird(0.4, 0.10, 3000, 1500, 0.2, phoebe_three, phoebe_amp)

  589.    bird(0.55, 0.05, 3000, 1400, 0.2, phoebe_four, phoebe_amp)

  590.   end

  591. end

  592. 

  593. 

  594. def painted_bunting(beg)

  595.   b_one = [0.00, 0.00, 1.00, 1.0]

  596.   b_two = [0.00, 0.00, 0.90, 1.00, 1.00, 0.0]

  597.   b_three = [0.00, 1.00, 1.00, 0.0]

  598.   b_four = [0.00, 0.00, 0.50, 1.00, 1.00, 0.0]

  599.   b_five = [0.00, 0.70, 0.15, 0.00, 0.40, 1.00, 0.80, 1.00, 1.00, 0.50]

  600.   b_six = [0.00, 0.00, 0.10, 0.50, 0.15, 0.00, 0.40, 1.00, 0.90, 1.00, 1.00, 0.0]

  601.   b_seven = [0.00, 1.00, 0.25, 0.40, 0.75, 0.50, 1.00, 0.0]

  602.   b_eight = [0.00, 0.30, 0.40, 0.40, 0.50, 1.00, 0.60, 0.20, 1.00, 0.0]

  603.   b_nine = [0.00, 0.00, 0.05, 1.00, 0.30, 1.00, 0.50, 0.30, 0.90, 1.00, 1.00, 0.0]

  604.   b_ten = [0.00, 0.40, 0.25, 0.00, 0.35, 1.00, 0.50, 0.00, 0.65, 1.00, 0.75, 0.00, 0.85, 1.00, 1.00, 0.0]

  605.   b_eleven = [0.00, 1.00, 1.00, 0.0]

  606.   b_twelve = [0.00, 0.00, 0.50, 1.00, 1.00, 0.50]

  607.   b_thirteen = [0.00, 0.00, 0.05, 1.00, 0.30, 0.20, 0.60, 0.20, 0.90, 1.00, 1.00, 0.0]

  608.   b_fourteen = [0.00, 0.30, 0.30, 1.00, 0.60, 0.30, 1.00, 0.0]

  609.   b_fifteen = [0.00, 0.00, 0.10, 0.50, 0.50, 0.50, 0.90, 1.00, 1.00, 0.0]

  610.   

  611.   one_bird(beg, 2.0, "painted_bunting") do

  612.    bird(0.05, 0.10, 3100, 900, 0.05, b_one, b_two)

  613.    bird(0.21, 0.07, 4100, 700, 0.15, b_three, $main_amp)

  614.    bird(0.36, 0.12, 3700, 1000, 0.20, b_four, $main_amp)

  615.    bird(0.52, 0.08, 2300, 1600, 0.15, b_five, b_six)

  616.    bird(0.68, 0.1, 4000, 1000, 0.25, b_one, $bird_tap)

  617.    bird(0.8, 0.12, 2300, 1700, 0.2, b_seven, $main_amp)

  618.    bird(0.96, 0.15, 3800, 2200, 0.3, b_eight, b_nine)

  619.    bird(1.18, 0.1, 2300, 1600, 0.15, b_ten, $main_amp)

  620.    bird(1.3, 0.02, 3200, 1000, 0.1, b_eleven, $main_amp)

  621.    bird(1.33, 0.02, 3200, 1000, 0.1, b_eleven, $main_amp)

  622.    bird(1.36, 0.02, 3200, 1000, 0.1, b_eleven, $main_amp)

  623.    bird(1.40, 0.03, 4000, 2000, 0.12, b_twelve, b_thirteen)

  624.    bird(1.47, 0.1, 2300, 1700, 0.2, b_fourteen, b_fifteen)

  625.   end

  626. end

  627. 

  628. 

  629. def western_flycatcher(beg)

  630.   f_one = [0.00, 0.00, 0.10, 1.00, 0.20, 0.40, 0.95, 0.10, 1.00, 0.0]

  631.   a_one = [0.00, 0.00, 0.10, 0.20, 0.20, 0.10, 0.30, 1.00, 0.90, 1.00, 1.00, 0.0]

  632.   f_two = [0.00, 0.50, 0.25, 1.00, 0.50, 0.00, 0.60, 0.00, 0.95, 0.30, 1.00, 0.60]

  633.   a_two = [0.00, 0.00, 0.10, 1.00, 0.20, 1.00, 0.50, 0.10, 0.60, 0.10, 0.90, 1.00, 1.00, 0.0]

  634.   

  635.   one_bird(beg, 1.0, "western_flycatcher") do

  636.    bigbird(0, 0.2, 2000, 2200, 0.2, f_one, a_one, [1, 1, 2, 0.02, 3, 0.1, 4, 0.01])

  637.    bigbird(0.3, 0.2, 2000, 1100, 0.2, f_two, a_two, [1, 1, 2, 0.02, 3, 0.1, 4, 0.01])

  638.   end

  639. end

  640. 

  641. 

  642. def bachmans_sparrow(beg)

  643.   sopening = [0.00, 1.00, 0.10, 0.50, 0.90, 0.50, 1.00, 0.0]

  644.   sup = [0.00, 0.10, 0.35, 0.00, 1.00, 1.0]

  645.   sdwn = [0.00, 1.00, 0.40, 0.50, 1.00, 0.0]

  646.   supn = [0.00, 0.00, 1.00, 1.0]

  647.   slast = [0.00, 1.00, 0.25, 0.00, 0.75, 0.40, 1.00, 0.50]

  648.   

  649.   one_bird(beg, 5.0, "bachmans_sparrow") do

  650.    bird(0, 0.51, 4900, 200, 0.3, sopening, $main_amp)

  651.    bird(0.52, 0.015, 3800, 200, 0.1, sup, $main_amp)

  652.    bird(0.52, 0.015, 3750, 250, 0.1, sup, $main_amp)

  653.    bird(0.54, 0.015, 3600, 300, 0.1, sup, $main_amp)

  654.    bird(0.56, 0.015, 3500, 250, 0.1, sup, $main_amp)

  655.    bird(0.58, 0.015, 3400, 200, 0.1, sup, $main_amp)

  656.    bird(0.60, 0.015, 3200, 200, 0.1, sup, $main_amp)

  657.    bird(0.62, 0.015, 3800, 100, 0.1, sup, $main_amp)

  658. 

  659.    bird(0.65, 0.07, 3000, 750, 0.2, sup, $main_amp)

  660.    bird(0.73, 0.03, 5000, 1000, 0.1, sdwn, $main_amp)

  661.    bird(0.80, 0.07, 3000, 750, 0.2, sup, $main_amp)

  662.    bird(0.88, 0.03, 5000, 1000, 0.1, sdwn, $main_amp)

  663.    bird(0.95, 0.07, 3000, 750, 0.2, sup, $main_amp)

  664.    bird(1.03, 0.03, 5000, 1000, 0.1, sdwn, $main_amp)

  665.    bird(1.10, 0.07, 3000, 750, 0.2, sup, $main_amp)

  666.    bird(1.18, 0.03, 5000, 1000, 0.1, sdwn, $main_amp)

  667.    bird(1.25, 0.07, 3000, 750, 0.2, sup, $main_amp)

  668.    bird(1.33, 0.03, 5000, 1000, 0.1, sdwn, $main_amp)

  669.    bird(1.40, 0.07, 3000, 750, 0.2, sup, $main_amp)

  670.    bird(1.48, 0.03, 5000, 1000, 0.1, sdwn, $main_amp)

  671.    bird(1.55, 0.07, 3000, 750, 0.2, sup, $main_amp)

  672.    bird(1.63, 0.03, 5000, 1000, 0.1, sdwn, $main_amp)

  673. 

  674.    bird(2.8, 0.06, 4000, 1700, 0.1, supn, $main_amp)

  675.    bird(2.87, 0.01, 5200, 0, 0.2, supn, $main_amp)

  676.    bird(2.9, 0.06, 4000, 1700, 0.1, supn, $main_amp)

  677.    bird(2.97, 0.01, 5200, 0, 0.2, supn, $main_amp)

  678.    bird(3.0, 0.06, 4000, 1700, 0.1, supn, $main_amp)

  679.    bird(3.07, 0.01, 5200, 0, 0.2, supn, $main_amp)

  680.    bird(3.1, 0.06, 4000, 1700, 0.1, supn, $main_amp)

  681.    bird(3.17, 0.01, 5200, 0, 0.2, supn, $main_amp)

  682.    bird(3.2, 0.06, 4000, 1700, 0.1, supn, $main_amp)

  683.    bird(3.27, 0.01, 5200, 0, 0.2, supn, $main_amp)

  684. 

  685.    bird(3.4, 0.15, 3000, 1000, 0.2, slast, $main_amp)

  686.    bird(3.6, 0.15, 3000, 1000, 0.2, slast, $main_amp)

  687.    bird(3.8, 0.15, 3000, 1000, 0.2, slast, $main_amp)

  688.    bird(4.0, 0.15, 3000, 1000, 0.2, slast, $main_amp)

  689.    bird(4.2, 0.15, 3000, 1000, 0.2, slast, $main_amp)

  690.    bird(4.4, 0.15, 3000, 1000, 0.2, slast, $main_amp)

  691.   end

  692. end

  693. 

  694. 

  695. def cedar_waxwing(beg)

  696.   cedar = [0.00, 0.00, 0.25, 0.70, 0.70, 1.00, 0.90, 1.00, 1.00, 0.20]

  697.   cedamp = [0.00, 0.00, 0.20, 1.00, 0.40, 1.00, 1.00, 0.0]

  698. 

  699.   one_bird(beg, 1.0, "cedar_waxwing") do

  700.    bird(0, 0.50, 6000, 800, 0.2, cedar, cedamp)

  701.   end

  702. end

  703. 

  704. 

  705. def bairds_sparrow(beg)

  706.   bairdend = [0.00, 0.00, 0.25, 1.00, 0.50, 0.00, 0.75, 1.00, 1.00, 0.0]

  707.   bairdstart = [0.00, 0.50, 0.05, 1.00, 0.10, 0.00, 0.15, 1.00, 0.20, 0.00, 0.25, 1.00, 0.30, 0.00, 0.35, 1.00, 0.40, 0.00, 0.45, 1.00, 0.50, 0.00, 0.55, 1.00, 0.60, 0.00, 0.65, 1.00, 0.70, 0.00, 0.75, 1.00, 0.80, 0.00, 0.85, 1.00, 0.90, 0.00, 0.95, 1.00, 1.00, 0.0]

  708.   

  709.   one_bird(beg, 2.0, "bairds_sparrow") do

  710.    bird(0, 0.09, 6500, 1500, 0.2, bairdstart, $main_amp)

  711.    bird(0.22, 0.01, 5900, 100, 0.2, bairdend, $main_amp)

  712.    bird(0.25, 0.09, 6000, 1000, 0.2, bairdstart, $main_amp)

  713.    bird(0.45, 0.01, 4200, 100, 0.2, bairdend, $main_amp)

  714.    bird(0.50, 0.08, 4200, 600, 0.2, bairdstart, $main_amp)

  715.    bird(0.59, 0.01, 4400, 100, 0.2, bairdend, $main_amp)

  716.    bird(0.60, 0.01, 4400, 100, 0.2, bairdend, $main_amp)

  717.    bird(0.68, 0.07, 5400, 700, 0.2, bairdstart, $main_amp)

  718. 

  719.    bird(0.75, 0.01, 4200, 100, 0.2, bairdend, $main_amp)

  720.    bird(0.79, 0.01, 4400, 100, 0.2, bairdend, $main_amp)

  721.    bird(0.83, 0.01, 4200, 100, 0.19, bairdend, $main_amp)

  722.    bird(0.87, 0.01, 4400, 100, 0.19, bairdend, $main_amp)

  723.    bird(0.91, 0.01, 4200, 100, 0.18, bairdend, $main_amp)

  724.    bird(0.95, 0.01, 4400, 100, 0.18, bairdend, $main_amp)

  725.    bird(0.99, 0.01, 4200, 100, 0.17, bairdend, $main_amp)

  726.    bird(1.03, 0.01, 4400, 100, 0.17, bairdend, $main_amp)

  727.    bird(1.07, 0.01, 4200, 100, 0.16, bairdend, $main_amp)

  728.    bird(1.11, 0.01, 4400, 100, 0.16, bairdend, $main_amp)

  729.    bird(1.15, 0.01, 4200, 100, 0.15, bairdend, $main_amp)

  730.    bird(1.19, 0.01, 4400, 100, 0.15, bairdend, $main_amp)

  731.    bird(1.23, 0.01, 4200, 100, 0.14, bairdend, $main_amp)

  732.    bird(1.27, 0.01, 4400, 100, 0.14, bairdend, $main_amp)

  733.    bird(1.31, 0.01, 4200, 100, 0.13, bairdend, $main_amp)

  734.    bird(1.35, 0.01, 4400, 100, 0.13, bairdend, $main_amp)

  735.    bird(1.39, 0.01, 4200, 100, 0.12, bairdend, $main_amp)

  736.    bird(1.43, 0.01, 4400, 100, 0.12, bairdend, $main_amp)

  737.    bird(1.47, 0.01, 4200, 100, 0.11, bairdend, $main_amp)

  738.    bird(1.51, 0.01, 4400, 100, 0.11, bairdend, $main_amp)

  739.    bird(1.55, 0.01, 4200, 100, 0.10, bairdend, $main_amp)

  740.    bird(1.59, 0.01, 4400, 100, 0.10, bairdend, $main_amp)

  741.    bird(1.63, 0.01, 4200, 100, 0.09, bairdend, $main_amp)

  742.    bird(1.67, 0.01, 4400, 100, 0.09, bairdend, $main_amp)

  743.    bird(1.71, 0.01, 4200, 100, 0.08, bairdend, $main_amp)

  744.    bird(1.75, 0.01, 4400, 100, 0.08, bairdend, $main_amp)

  745.    bird(1.79, 0.01, 4200, 100, 0.07, bairdend, $main_amp)

  746.    bird(1.83, 0.01, 4400, 100, 0.07, bairdend, $main_amp)

  747.    bird(1.87, 0.01, 4200, 100, 0.06, bairdend, $main_amp)

  748.    bird(1.92, 0.01, 4400, 100, 0.06, bairdend, $main_amp)

  749.    bird(1.97, 0.01, 4200, 100, 0.05, bairdend, $main_amp)

  750.   end

  751. end

  752. 

  753. 

  754. def kentucky_warbler(beg)

  755.   kenstart = [0.00, 0.30, 0.50, 1.00, 1.00, 0.0]

  756.   kendwn = [0.00, 0.90, 0.10, 1.00, 1.00, 0.0]

  757.   kenup = [0.00, 0.00, 1.00, 1.0]

  758.   kentrill = [0.00, 1.00, 0.25, 0.00, 0.50, 0.00, 0.75, 1.00, 1.00, 0.0]

  759.   

  760.   one_bird(beg, 3.0, "kentucky_warbler") do

  761.    bigbird(0.6, 0.02, 3800, 200, 0.05, kenstart, $main_amp, [1, 1, 2, 0.03])

  762.    bigbird(0.65, 0.03, 4300, 200, 0.15, kenup, $main_amp, [1, 1, 2, 0.1])

  763.    bigbird(0.73, 0.02, 3200, 100, 0.1, kendwn, $main_amp, [1, 1, 2, 0.1])

  764. 

  765.    bigbird(0.75, 0.05, 3000, 800, 0.15, kenstart, $main_amp, [1, 1, 2, 0.01])

  766.    bigbird(0.82, 0.06, 3100, 1200, 0.1, kendwn, $main_amp, [1, 1, 2, 0.01])

  767.    bigbird(0.90, 0.06, 3200, 1200, 0.1, kendwn, $main_amp, [1, 1, 2, 0.01])

  768.    bigbird(0.98, 0.05, 4600, 100, 0.2, kentrill, $main_amp, [1, 1, 2, 0.1])

  769. 

  770.    bigbird(1.10, 0.05, 2900, 800, 0.15, kenstart, $main_amp, [1, 1, 2, 0.01])

  771.    bigbird(1.17, 0.06, 3000, 1200, 0.1, kendwn, $main_amp, [1, 1, 2, 0.01])

  772.    bigbird(1.25, 0.06, 3100, 1200, 0.1, kendwn, $main_amp, [1, 1, 2, 0.01])

  773.    bigbird(1.33, 0.05, 4600, 100, 0.2, kentrill, $main_amp, [1, 1, 2, 0.1])

  774. 

  775.    bigbird(1.43, 0.05, 2800, 800, 0.15, kenstart, $main_amp, [1, 1, 2, 0.01])

  776.    bigbird(1.50, 0.05, 2700, 1200, 0.1, kendwn, $main_amp, [1, 1, 2, 0.01])

  777.    bigbird(1.57, 0.06, 2800, 1200, 0.1, kendwn, $main_amp, [1, 1, 2, 0.01])

  778.    bigbird(1.64, 0.05, 4600, 100, 0.2, kentrill, $main_amp, [1, 1, 2, 0.1])

  779. 

  780.    bigbird(1.75, 0.05, 2700, 800, 0.15, kenstart, $main_amp, [1, 1, 2, 0.01])

  781.    bigbird(1.81, 0.05, 2600, 1200, 0.1, kendwn, $main_amp, [1, 1, 2, 0.01])

  782.    bigbird(1.88, 0.06, 2600, 1200, 0.1, kendwn, $main_amp, [1, 1, 2, 0.01])

  783.    bigbird(1.97, 0.05, 4600, 100, 0.2, kentrill, $main_amp, [1, 1, 2, 0.1])

  784. 

  785.    bigbird(2.05, 0.05, 2700, 800, 0.15, kenstart, $main_amp, [1, 1, 2, 0.01])

  786.    bigbird(2.12, 0.06, 2600, 1200, 0.1, kendwn, $main_amp, [1, 1, 2, 0.01])

  787.    bigbird(2.20, 0.05, 4600, 100, 0.2, kentrill, $main_amp, [1, 1, 2, 0.1])

  788. 

  789.    bigbird(2.30, 0.05, 2800, 800, 0.15, kenstart, $main_amp, [1, 1, 2, 0.01])

  790.    bigbird(2.37, 0.06, 2700, 1200, 0.1, kendwn, $main_amp, [1, 1, 2, 0.01])

  791.    bigbird(2.45, 0.05, 4700, 100, 0.25, kentrill, $main_amp, [1, 1, 2, 0.1])

  792.   end

  793. end

  794. 

  795. 

  796. def rufous_sided_towhee(beg)

  797.   towhee_one = [0.00, 0.10, 0.02, 0.05, 0.04, 0.15, 0.06, 0.05, 0.08, 0.20, 0.10, 0.04, 0.12, 0.25, 0.14, 0.03, 0.16, 0.30, 0.18, 0.02, 0.20, 0.35, 0.22, 0.01, 0.24, 0.40, 0.26, 0.00, 0.28, 0.45, 0.30, 0.00, 0.32, 0.50, 0.34, 0.00, 0.36, 0.50, 0.80, 1.00, 1.00, 0.0]

  798.   towhee_two = [0.00, 0.00, 1.00, 1.0]

  799.   towhee_three = [0.00, 1.00, 1.00, 0.0]

  800.   

  801.   one_bird(beg, 2.0, "rufous_sided_towhee") do

  802.    bigbird(0.25, 0.13, 1400, 1100, 0.2, towhee_one, $main_amp, [1, 0.03, 2, 1, 3, 0.03])

  803.    bigbird(0.45, 0.13, 1400, 1100, 0.2, towhee_one, $main_amp, [1, 0.03, 2, 1, 3, 0.03])

  804.    bigbird(0.60, 0.13, 1400, 1100, 0.2, towhee_one, $main_amp, [1, 0.03, 2, 1, 3, 0.03])

  805.    bigbird(0.75, 0.10, 1400, 1100, 0.2, towhee_one, $main_amp, [1, 0.03, 2, 1, 3, 0.03])

  806. 

  807.    bird(0.88, 0.01, 5100, 2000, 0.1, towhee_two, $main_amp)

  808.    bird(0.895, 0.01, 5100, 1600, 0.1, towhee_two, $main_amp)

  809.    bird(0.91, 0.01, 5100, 1000, 0.1, towhee_two, $main_amp)

  810.    bird(0.93, 0.01, 3000, 1200, 0.1, towhee_three, $main_amp)

  811. 

  812.    bird(0.945, 0.01, 5100, 2000, 0.09, towhee_two, $main_amp)

  813.    bird(0.96, 0.01, 5100, 1600, 0.09, towhee_two, $main_amp)

  814.    bird(0.975, 0.01, 5100, 1000, 0.09, towhee_two, $main_amp)

  815.    bird(0.995, 0.01, 3000, 1200, 0.09, towhee_three, $main_amp)

  816. 

  817.    bird(1.01, 0.01, 5100, 2000, 0.1, towhee_two, $main_amp)

  818.    bird(1.025, 0.01, 5100, 1600, 0.1, towhee_two, $main_amp)

  819.    bird(1.04, 0.01, 5100, 1000, 0.1, towhee_two, $main_amp)

  820.    bird(1.06, 0.01, 3000, 1200, 0.1, towhee_three, $main_amp)

  821. 

  822.    bird(1.075, 0.01, 5100, 2000, 0.09, towhee_two, $main_amp)

  823.    bird(1.09, 0.01, 5100, 1600, 0.09, towhee_two, $main_amp)

  824.    bird(1.105, 0.01, 5100, 1000, 0.09, towhee_two, $main_amp)

  825.    bird(1.125, 0.01, 3000, 1200, 0.09, towhee_three, $main_amp)

  826. 

  827.    bird(1.14, 0.01, 5100, 2000, 0.08, towhee_two, $main_amp)

  828.    bird(1.155, 0.01, 5100, 1600, 0.08, towhee_two, $main_amp)

  829.    bird(1.17, 0.01, 5100, 1000, 0.08, towhee_two, $main_amp)

  830.    bird(1.19, 0.01, 3000, 1200, 0.08, towhee_three, $main_amp)

  831. 

  832.    bird(1.205, 0.01, 5100, 2000, 0.08, towhee_two, $main_amp)

  833.    bird(1.220, 0.01, 5100, 1600, 0.08, towhee_two, $main_amp)

  834.    bird(1.235, 0.01, 5100, 1000, 0.08, towhee_two, $main_amp)

  835.    bird(1.255, 0.01, 3000, 1200, 0.08, towhee_three, $main_amp)

  836. 

  837.    bird(1.27, 0.01, 5100, 2000, 0.07, towhee_two, $main_amp)

  838.    bird(1.285, 0.01, 5100, 1600, 0.07, towhee_two, $main_amp)

  839.    bird(1.30, 0.01, 5100, 1000, 0.07, towhee_two, $main_amp)

  840.    bird(1.32, 0.01, 3000, 1200, 0.07, towhee_three, $main_amp)

  841. 

  842.    bird(1.335, 0.01, 5100, 2000, 0.06, towhee_two, $main_amp)

  843.    bird(1.350, 0.01, 5100, 1600, 0.06, towhee_two, $main_amp)

  844.    bird(1.365, 0.01, 5100, 1000, 0.06, towhee_two, $main_amp)

  845.    bird(1.385, 0.01, 3000, 1200, 0.06, towhee_three, $main_amp)

  846. 

  847.    bird(1.400, 0.01, 5100, 2000, 0.05, towhee_two, $main_amp)

  848.    bird(1.415, 0.01, 5100, 1600, 0.05, towhee_two, $main_amp)

  849.    bird(1.430, 0.01, 5100, 1000, 0.05, towhee_two, $main_amp)

  850.    bird(1.45, 0.01, 3000, 1200, 0.05, towhee_three, $main_amp)

  851. 

  852.    bird(1.465, 0.01, 5100, 2000, 0.03, towhee_two, $main_amp)

  853.    bird(1.480, 0.01, 5100, 1600, 0.03, towhee_two, $main_amp)

  854.    bird(1.495, 0.01, 5100, 1000, 0.03, towhee_two, $main_amp)

  855.    bird(1.515, 0.01, 3000, 1200, 0.03, towhee_three, $main_amp)

  856.   end

  857. end

  858. 

  859. 

  860. def prothonotary_warbler(beg)

  861.   pro_one = [0.00, 0.10, 0.20, 0.00, 1.00, 1.0]

  862.   pro_two = [0.00, 0.00, 1.00, 1.0]

  863.   pro_amp = [0.00, 0.00, 0.20, 1.00, 0.40, 0.50, 1.00, 0.0]

  864.   

  865.   one_bird(beg, 3.0, "prothonotary_warbler") do

  866.    bird(0.76, 0.08, 3000, 3000, 0.05, pro_one, pro_amp)

  867.    bird(0.85, 0.05, 4000, 2500, 0.06, pro_two, $bird_amp)

  868. 

  869.    bird(1.02, 0.09, 3000, 3000, 0.10, pro_one, pro_amp)

  870.    bird(1.12, 0.05, 4000, 2500, 0.10, pro_two, $bird_amp)

  871. 

  872.    bird(1.26, 0.08, 3000, 3000, 0.15, pro_one, pro_amp)

  873.    bird(1.35, 0.05, 4000, 2500, 0.16, pro_two, $bird_amp)

  874. 

  875.    bird(1.54, 0.08, 3000, 3000, 0.20, pro_one, pro_amp)

  876.    bird(1.63, 0.05, 4000, 2500, 0.19, pro_two, $bird_amp)

  877. 

  878.    bird(1.80, 0.08, 3000, 3000, 0.20, pro_one, pro_amp)

  879.    bird(1.89, 0.05, 4000, 2500, 0.16, pro_two, $bird_amp)

  880. 

  881.    bird(2.03, 0.08, 3000, 3000, 0.15, pro_one, pro_amp)

  882.    bird(2.12, 0.05, 4000, 2500, 0.10, pro_two, $bird_amp)

  883. 

  884.    bird(2.30, 0.08, 3000, 3000, 0.10, pro_one, pro_amp)

  885.    bird(2.39, 0.05, 4000, 2500, 0.06, pro_two, $bird_amp)

  886.   end

  887. end

  888. 

  889. 

  890. def audubons_warbler(beg)

  891.   w_up = [0.00, 0.00, 1.00, 1.0]

  892.   w_down = [0.00, 1.00, 1.00, 0.0]

  893.   w_end = [0.00, 0.00, 0.15, 1.00, 0.45, 0.90, 0.50, 0.00, 0.55, 1.00, 0.90, 0.90, 1.00, 0.10]

  894.   w_updown = [0.00, 0.10, 0.50, 1.00, 1.00, 0.0]

  895.   

  896.   one_bird(beg, 3.0, "audubons_warbler") do

  897.    bird(0.75, 0.04, 2400, 200, 0.05, w_down, $bird_amp)

  898.    bird(0.83, 0.03, 3200, 200, 0.1, w_up, $bird_amp)

  899.    bird(0.90, 0.04, 2500, 300, 0.15, w_up, $bird_amp)

  900.    bird(0.97, 0.04, 2300, 600, 0.15, w_down, $bird_amp)

  901.    bird(1.02, 0.03, 3500, 400, 0.20, w_up, $bird_amp)

  902.    bird(1.06, 0.04, 2300, 1200, 0.10, w_up, $bird_amp)

  903.    bird(1.13, 0.05, 2300, 1200, 0.15, w_down, $bird_amp)

  904.    bird(1.22, 0.02, 3200, 800, 0.25, w_up, $bird_amp)

  905.    bird(1.25, 0.08, 2400, 600, 0.20, w_updown, $bird_amp)

  906.    bird(1.35, 0.02, 2200, 400, 0.10, w_up, $bird_amp)

  907.    bird(1.38, 0.07, 2400, 1400, 0.15, w_down, $bird_amp)

  908.    bird(1.47, 0.03, 3000, 800, 0.20, w_up, $bird_amp)

  909.    bird(1.50, 0.03, 2500, 400, 0.10, w_updown, $bird_amp)

  910.    bird(1.55, 0.01, 2300, 100, 0.05, w_up, $bird_amp)

  911.    bird(1.56, 0.06, 2200, 1400, 0.15, w_down, $bird_amp)

  912.    bird(1.65, 0.03, 3100, 800, 0.10, w_up, $bird_amp)

  913.    bird(1.70, 0.07, 2800, 800, 0.15, w_updown, $bird_amp)

  914.    bird(1.79, 0.06, 2400, 1000, 0.10, w_down, $bird_amp)

  915.    bird(1.86, 0.14, 3100, 900, 0.25, w_end, $bird_amp)

  916.    bird(2.02, 0.12, 3200, 800, 0.20, w_end, $bird_amp)

  917.   end

  918. end

  919. 

  920. 

  921. def lark_bunting(beg)

  922.   b_down = [0.00, 1.00, 1.00, 0.0]

  923.   b_up = [0.00, 0.00, 1.00, 1.0]

  924.   b_trill_one = [0.00, 0.00, 0.06, 0.80, 0.12, 0.00, 0.18, 0.85, 0.24, 0.05, 0.36, 0.90, 0.42, 0.10, 0.48, 0.95, 0.54, 0.20, 0.60, 1.00, 0.66, 0.20, 0.72, 1.00, 0.78, 0.20, 0.84, 1.00, 0.90, 0.20, 1.00, 1.0]

  925.   b_trill_two = [0.00, 0.00, 0.05, 0.80, 0.10, 0.00, 0.15, 0.85, 0.20, 0.00, 0.25, 0.90, 0.30, 0.00, 0.35, 0.95, 0.40, 0.00, 0.45, 1.00, 0.50, 0.00, 0.55, 1.00, 0.60, 0.00, 0.65, 1.00, 0.70, 0.00, 0.75, 1.00, 0.80, 0.00, 0.85, 1.00, 0.90, 0.00, 0.95, 1.00, 1.00, 0.0]

  926.   

  927.   one_bird(beg, 3.0, "lark_bunting") do

  928.    bird(0.1, 0.03, 1800, 100, 0.1, b_up, $bird_amp)

  929.    bird(0.2, 0.12, 3700, 400, 0.2, b_up, $bird_amp)

  930. 

  931.    bird(0.4, 0.03, 4100, 500, 0.15, b_down, $bird_amp)

  932.    bird(0.45, 0.05, 2000, 400, 0.20, b_down, $bird_amp)

  933.    bird(0.51, 0.03, 1800, 100, 0.1, b_up, $bird_amp)

  934. 

  935.    bird(0.6, 0.03, 4100, 500, 0.15, b_down, $bird_amp)

  936.    bird(0.65, 0.05, 2000, 400, 0.20, b_down, $bird_amp)

  937.    bird(0.71, 0.03, 1800, 100, 0.1, b_up, $bird_amp)

  938. 

  939.    bird(0.8, 0.03, 4100, 500, 0.15, b_down, $bird_amp)

  940.    bird(0.85, 0.05, 2000, 400, 0.20, b_down, $bird_amp)

  941.    bird(0.91, 0.03, 1800, 100, 0.1, b_up, $bird_amp)

  942. 

  943.    bird(1.0, 0.03, 4100, 500, 0.15, b_down, $bird_amp)

  944.    bird(1.05, 0.05, 2000, 400, 0.20, b_down, $bird_amp)

  945.    bird(1.11, 0.03, 1800, 100, 0.1, b_up, $bird_amp)

  946. 

  947.    bird(1.2, 0.03, 4100, 500, 0.15, b_down, $bird_amp)

  948.    bird(1.25, 0.05, 2000, 400, 0.20, b_down, $bird_amp)

  949.    bird(1.31, 0.03, 1800, 100, 0.1, b_up, $bird_amp)

  950. 

  951.    bird(1.4, 0.03, 4100, 500, 0.15, b_down, $bird_amp)

  952.    bird(1.45, 0.05, 2000, 400, 0.20, b_down, $bird_amp)

  953.    bird(1.51, 0.03, 1800, 100, 0.1, b_up, $bird_amp)

  954. 

  955.    bird(1.6, 0.03, 4100, 500, 0.15, b_down, $bird_amp)

  956.    bird(1.65, 0.05, 2000, 400, 0.20, b_down, $bird_amp)

  957.    bird(1.71, 0.03, 1800, 100, 0.1, b_up, $bird_amp)

  958. 

  959.    bird(1.77, 0.23, 6000, 600, 0.15, b_trill_one, $bird_amp)

  960.    bird(2.005, 0.28, 6000, 600, 0.15, b_trill_two, $bird_amp)

  961.   end

  962. end

  963. 

  964. 

  965. def eastern_bluebird(beg)

  966.   blue_one = [0.00, 0.00, 1.00, 1.0]

  967.   blue_two = [0.00, 1.00, 1.00, 0.0]

  968.   blue_three = [0.00, 0.60, 0.10, 1.00, 0.20, 0.00, 0.25, 1.00, 0.30, 0.00, 0.35, 1.00, 0.40, 0.00, 0.45, 1.00, 0.50, 0.00, 0.75, 1.00, 1.00, 0.0]

  969.   blue_four = [0.00, 0.00, 0.50, 1.00, 1.00, 0.0]

  970.   blue_five = [0.00, 0.50, 0.10, 1.00, 0.20, 0.00, 0.35, 1.00, 0.50, 0.00, 0.65, 1.00, 0.80, 0.00, 0.95, 1.00, 1.00, 0.50]

  971.   

  972.   one_bird(beg, 3.0, "eastern_bluebird") do

  973.    bird(0.75, 0.02, 2000, 1600, 0.1, blue_one, $bird_amp)

  974.    bird(0.80, 0.02, 2000, 1600, 0.1, blue_one, $bird_amp)

  975.    bird(0.86, 0.02, 2000, 1600, 0.1, blue_one, $bird_amp)

  976.    bird(1.00, 0.13, 2000, 1400, 0.2, blue_two, $bird_amp)

  977.    bird(1.20, 0.24, 2000, 800, 0.2, blue_three, $bird_amp)

  978.    bird(1.68, 0.03, 2200, 400, 0.1, blue_one, $bird_amp)

  979.    bird(1.72, 0.10, 1950, 100, 0.15, blue_four, $bird_amp)

  980.    bird(1.96, 0.15, 2000, 600, 0.20, blue_five, $bird_amp)

  981.   end

  982. end

  983. 

  984. 

  985. def chuck_wills_widow(beg)

  986.   wid_down = [0.00, 1.00, 1.00, 0.0]

  987.   wid_one = [0.00, 0.00, 0.10, 0.10, 0.25, 1.00, 0.50, 0.30, 0.80, 0.70, 1.00, 0.0]

  988.   wid_two = [0.00, 0.20, 0.30, 1.00, 0.50, 0.30, 0.60, 0.70, 0.90, 0.10, 1.00, 0.0]

  989.   

  990.   one_bird(beg, 1.0, "chuck_wills_widow") do

  991.    bird(0.05, 0.03, 1000, 800, 0.1, wid_down, $bird_amp)

  992.    bird(0.32, 0.20, 1000, 1000, 0.2, wid_one, $bird_amp)

  993.    bird(0.56, 0.29, 900, 1100, 0.2, wid_two, $bird_amp)

  994.   end

  995. end

  996. 

  997. 

  998. def blue_gray_gnatcatcher(beg)	

  999.   gskw1 = [0.00, 0.00, 0.15, 1.00, 0.75, 0.80, 0.90, 1.00, 1.00, 0.70]

  1000.   gskw2 = [0.00, 0.00, 0.25, 1.00, 0.75, 0.70, 1.00, 0.0]

  1001.   

  1002.   one_bird(beg, 3.0, "blue_gray_gnatcatcher") do

  1003.    bigbird(0.5, 0.20, 4000, 1000, 0.2, gskw1, $bird_amp, [1, 0.4, 2, 1, 3, 0.1])

  1004.    bigbird(0.8, 0.13, 4000, 800, 0.2, gskw2, $bird_amp, [1, 0.4, 2, 1, 3, 0.2])

  1005. 

  1006.    bigbird(1.4, 0.25, 4000, 800, 0.2, gskw2, $bird_amp, [1, 0.4, 2, 1, 3, 0.3])

  1007.    bigbird(1.80, 0.17, 4000, 900, 0.2, gskw1, $bird_amp, [1, 0.4, 2, 1, 3, 0.3])

  1008.    bigbird(2.00, 0.17, 4000, 700, 0.2, gskw1, $bird_amp, [1, 0.4, 2, 1, 3, 0.3])

  1009.    bigbird(2.20, 0.17, 4000, 800, 0.2, gskw2, $bird_amp, [1, 0.4, 2, 1, 3, 0.3])

  1010.   end

  1011. end

  1012. 

  1013. 

  1014. def black_throated_sparrow(beg)

  1015.   black_up = [0.00, 0.00, 1.00, 1.0]

  1016.   black_down = [0.00, 1.00, 1.00, 0.0]

  1017.   black_down_amp = [0.00, 0.00, 0.75, 1.00, 1.00, 0.0]

  1018.   black_trill = [0.00, 0.00, 0.03, 0.70, 0.06, 0.00, 0.09, 0.75, 0.12, 0.00, 0.15, 0.80, 0.18, 0.05, 0.21, 0.85, 0.24, 0.10, 0.27, 0.90, 0.30, 0.10, 0.33, 1.00, 0.36, 0.10, 0.39, 1.00, 0.42, 0.10, 0.45, 1.00, 0.48, 0.10, 0.51, 1.00, 0.54, 0.10, 0.57, 1.00, 0.60, 0.10, 0.63, 1.00, 0.66, 0.10, 0.69, 1.00, 0.72, 0.10, 0.75, 1.00, 0.78, 0.10, 0.81, 1.00, 0.84, 0.10, 0.87, 1.00, 0.90, 0.00, 0.93, 0.95, 0.96, 0.00, 1.00, 0.90]

  1019.   black_up_down = [0.00, 0.00, 0.50, 1.00, 1.00, 0.20]

  1020.   black_amp = [0.00, 0.00, 0.50, 1.00, 1.00, 0.0]

  1021.   

  1022.   one_bird(beg, 3.0, "black_throated_sparrow") do

  1023.    bird(0.8, 0.02, 2200, 1000, 0.1, black_down, $bird_amp)

  1024.    bird(0.83, 0.01, 3000, 200, 0.05, black_up, $bird_amp)

  1025.    bird(0.96, 0.02, 5800, 500, 0.05, black_up, $bird_amp)

  1026.    bird(1.00, 0.02, 4000, 200, 0.05, black_up, $bird_amp)

  1027.    bird(1.04, 0.10, 2100, 1700, 0.15, black_down, black_down_amp)

  1028.    bird(1.15, 0.05, 5700, 400, 0.25, black_up, $bird_amp)

  1029.    bird(1.25, 0.25, 2000, 900, 0.2, black_trill, $bird_amp)

  1030.    bird(1.52, 0.05, 5600, 400, 0.15, black_up_down, $bird_amp)

  1031. 

  1032.    bird(1.6, 0.04, 3900, 1100, 0.15, black_up, $bird_amp)

  1033.    bird(1.66, 0.01, 1900, 100, 0.10, black_up, black_amp)

  1034. 

  1035.    bird(1.69, 0.01, 3600, 300, 0.10, black_up, black_amp)

  1036.    bird(1.71, 0.03, 3900, 1000, 0.15, black_up, black_amp)

  1037.    bird(1.74, 0.02, 5000, 100, 0.20, black_up, black_amp)

  1038.    bird(1.76, 0.01, 1900, 100, 0.10, black_up, black_amp)

  1039. 

  1040.    bird(1.78, 0.01, 3600, 300, 0.10, black_up, black_amp)

  1041.    bird(1.80, 0.03, 3900, 1000, 0.15, black_up, black_amp)

  1042.    bird(1.83, 0.02, 5000, 100, 0.20, black_up, black_amp)

  1043.    bird(1.85, 0.01, 1900, 100, 0.10, black_up, black_amp)

  1044. 

  1045.    bird(1.87, 0.01, 3600, 300, 0.10, black_up, black_amp)

  1046.    bird(1.89, 0.03, 3900, 1000, 0.15, black_up, black_amp)

  1047.    bird(1.92, 0.02, 5000, 100, 0.20, black_up, black_amp)

  1048.    bird(1.94, 0.01, 1900, 100, 0.10, black_up, black_amp)

  1049. 

  1050.    bird(1.96, 0.01, 3600, 300, 0.10, black_up, black_amp)

  1051.    bird(1.98, 0.03, 3900, 1000, 0.15, black_up, black_amp)

  1052.    bird(2.01, 0.02, 5000, 100, 0.20, black_up, black_amp)

  1053.    bird(2.03, 0.01, 1900, 100, 0.10, black_up, black_amp)

  1054. 

  1055.    bird(2.05, 0.01, 3600, 300, 0.10, black_up, black_amp)

  1056.    bird(2.07, 0.03, 3900, 1000, 0.15, black_up, black_amp)

  1057.    bird(2.10, 0.02, 5000, 100, 0.20, black_up, black_amp)

  1058.    bird(2.13, 0.01, 1900, 100, 0.10, black_up, black_amp)

  1059. 

  1060.    bird(2.16, 0.03, 3800, 300, 0.1, black_up, $bird_amp)

  1061.   end

  1062. end

  1063. 

  1064. 

  1065. 

  1066. def black_chinned_sparrow(beg)

  1067.   chin_up = [0.00, 0.00, 1.00, 1.0]

  1068.   chin_up2 = [0.00, 0.00, 0.30, 0.20, 1.00, 1.0]

  1069.   

  1070.   one_bird(beg, 3.0, "black_chinned_sparrow") do

  1071.    bird(0.6, 0.2, 4200, 100, 0.1, chin_up, $bird_amp)

  1072.    bird(1.0, 0.09, 3800, 2000, 0.1, chin_up2, $bird_amp)

  1073.    bird(1.25, 0.08, 3900, 1700, 0.12, chin_up2, $bird_amp)

  1074.    bird(1.40, 0.08, 3600, 2300, 0.13, chin_up, $bird_amp)

  1075.    bird(1.50, 0.11, 3100, 2800, 0.14, chin_up, $bird_amp)

  1076.    bird(1.65, 0.07, 2900, 2700, 0.15, chin_up, $bird_amp)

  1077.    bird(1.74, 0.07, 2900, 2700, 0.15, chin_up, $bird_amp)

  1078.    bird(1.82, 0.07, 3000, 2300, 0.13, chin_up, $bird_amp)

  1079.    bird(1.89, 0.07, 3200, 2000, 0.10, chin_up, $bird_amp)

  1080.    bird(1.97, 0.05, 3200, 1500, 0.10, chin_up, $bird_amp)

  1081.    bird(2.04, 0.04, 3400, 1000, 0.07, chin_up, $bird_amp)

  1082.    bird(2.10, 0.03, 3600, 700, 0.05, chin_up, $bird_amp)

  1083.    bird(2.15, 0.03, 3800, 300, 0.05, chin_up, $bird_amp)

  1084.    bird(2.19, 0.02, 3900, 100, 0.03, chin_up, $bird_amp)

  1085.    bird(2.22, 0.01, 3900, 100, 0.01, chin_up, $bird_amp)

  1086.    bird(2.24, 0.01, 3900, 100, 0.01, chin_up, $bird_amp)

  1087.   end

  1088. end

  1089. 

  1090. 

  1091. def various_gull_cries_from_end_of_colony_5(beg)

  1092.   gullstart = [0, 0, 10, 1, 20, 0.5000, 40, 0.6000, 60, 0.5000, 100, 0]

  1093.   gullmiddle = [0, 0, 10, 1, 30, 0.5000, 80, 0.5000, 100, 0]

  1094.   gullend = [0, 0, 5, 1, 10, 0.5000, 90, 0.4000, 100, 0]

  1095.   unknown = [1, 0.1, 2, 1, 3, 0.1, 4, 0.01, 5, 0.09, 6, 0.01, 7, 0.01]

  1096. 

  1097.   one_bird(beg, 10.0, "gulls") do

  1098.    bigbird(0.250, 0.80, 1180, 1180, 0.08, gullend, $bird_amp, unknown)

  1099.    bigbird(1.500, 0.90, 1180, 1180, 0.07, gullend, $bird_amp, unknown)

  1100.    bigbird(2.750, 1.00, 1050, 1050, 0.08, gullend, $bird_amp, unknown)

  1101.    bigbird(4.800, 0.05, 1180, 1180, 0.06, gullstart, $bird_amp, unknown)

  1102.    bigbird(4.950, 0.10, 1180, 1180, 0.08, gullstart, $bird_amp, unknown)

  1103.    bigbird(5.150, 0.10, 1180, 1180, 0.09, gullstart, $bird_amp, unknown)

  1104.    bigbird(5.350, 0.10, 1180, 1180, 0.1, gullmiddle, $bird_amp, unknown)

  1105.    bigbird(5.450, 0.40, 1050, 1050, 0.1, gullend, $bird_amp, unknown)

  1106.    bigbird(6.250, 0.80, 1050, 1050, 0.1, gullend, $bird_amp, unknown)

  1107.    bigbird(7.450, 1.80, 1050, 1050, 0.1, gullend, $bird_amp, unknown)

  1108.   end

  1109. end

  1110. 

  1111. 

  1112. def make_birds

  1113. #  atime = Time.new

  1114.   $out_file = new_sound("test.snd")

  1115.   set_squelch_update(true, $out_file, 0)

  1116.   orchard_oriole(0)

  1117.   cassins_kingbird(3)

  1118.   chipping_sparrow(6)

  1119.   bobwhite(9)

  1120.   western_meadowlark(12)

  1121.   scissor_tailed_flycatcher(15)

  1122.   great_horned_owl(18)

  1123.   black_throated_gray_warbler(21)

  1124.   yellow_warbler(24)

  1125.   black_necked_stilt(27)

  1126.   chestnut_sided_warbler(30)

  1127.   grasshopper_sparrow(33)

  1128.   swamp_sparrow(36)

  1129.   golden_crowned_sparrow(39)

  1130.   indigo_bunting(42)

  1131.   hooded_warbler(45)

  1132.   american_widgeon(48)

  1133.   louisiana_waterthrush(51)

  1134.   robin(54)

  1135.   solitary_vireo(57)

  1136.   pigeon_hawk(61)

  1137.   cerulean_warbler(64)

  1138.   nashville_warbler(67)

  1139.   eastern_phoebe(70)

  1140.   painted_bunting(73)

  1141.   western_flycatcher(76)

  1142.   bachmans_sparrow(79)

  1143.   cedar_waxwing(82)

  1144.   bairds_sparrow(85)

  1145.   kentucky_warbler(88)

  1146.   rufous_sided_towhee(91)

  1147.   prothonotary_warbler(94)

  1148.   audubons_warbler(97)

  1149.   lark_bunting(100)

  1150.   eastern_bluebird(103)

  1151.   chuck_wills_widow(106)

  1152.   blue_gray_gnatcatcher(109)

  1153.   black_throated_sparrow(112)

  1154.   black_chinned_sparrow(115)

  1155.   set_squelch_update(false, $out_file, 0)

  1156.   various_gull_cries_from_end_of_colony_5(118)

  1157.   $out_data = false

  1158. #  btime = Time.new

  1159. #  $stderr.write sprintf("time: %f\n", btime - atime)

  1160. end